Line | Branch | Exec | Source |
---|---|---|---|
1 | /* | ||
2 | * Yamaha SMAF format | ||
3 | * Copyright (c) 2005 Vidar Madsen | ||
4 | * | ||
5 | * This file is part of FFmpeg. | ||
6 | * | ||
7 | * FFmpeg is free software; you can redistribute it and/or | ||
8 | * modify it under the terms of the GNU Lesser General Public | ||
9 | * License as published by the Free Software Foundation; either | ||
10 | * version 2.1 of the License, or (at your option) any later version. | ||
11 | * | ||
12 | * FFmpeg is distributed in the hope that it will be useful, | ||
13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
15 | * Lesser General Public License for more details. | ||
16 | * | ||
17 | * You should have received a copy of the GNU Lesser General Public | ||
18 | * License along with FFmpeg; if not, write to the Free Software | ||
19 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | ||
20 | */ | ||
21 | |||
22 | #include "config_components.h" | ||
23 | |||
24 | #include "libavutil/channel_layout.h" | ||
25 | #include "avformat.h" | ||
26 | #include "avio_internal.h" | ||
27 | #include "internal.h" | ||
28 | #include "mux.h" | ||
29 | #include "pcm.h" | ||
30 | #include "rawenc.h" | ||
31 | #include "riff.h" | ||
32 | #include "version.h" | ||
33 | |||
34 | typedef struct MMFContext { | ||
35 | int64_t atrpos, atsqpos, awapos; | ||
36 | int64_t data_end; | ||
37 | int stereo; | ||
38 | } MMFContext; | ||
39 | |||
40 | static const int mmf_rates[] = { 4000, 8000, 11025, 22050, 44100 }; | ||
41 | |||
42 | 2 | static int mmf_rate(int code) | |
43 | { | ||
44 |
2/4✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 2 times.
|
2 | if ((code < 0) || (code > 4)) |
45 | ✗ | return -1; | |
46 | 2 | return mmf_rates[code]; | |
47 | } | ||
48 | |||
49 | #if CONFIG_MMF_MUXER | ||
50 | 1 | static int mmf_rate_code(int rate) | |
51 | { | ||
52 | int i; | ||
53 |
1/2✓ Branch 0 taken 5 times.
✗ Branch 1 not taken.
|
5 | for (i = 0; i < 5; i++) |
54 |
2/2✓ Branch 0 taken 1 times.
✓ Branch 1 taken 4 times.
|
5 | if (mmf_rates[i] == rate) |
55 | 1 | return i; | |
56 | ✗ | return -1; | |
57 | } | ||
58 | |||
59 | /* Copy of end_tag() from avienc.c, but for big-endian chunk size */ | ||
60 | 5 | static void end_tag_be(AVIOContext *pb, int64_t start) | |
61 | { | ||
62 | int64_t pos; | ||
63 | |||
64 | 5 | pos = avio_tell(pb); | |
65 | 5 | avio_seek(pb, start - 4, SEEK_SET); | |
66 | 5 | avio_wb32(pb, (uint32_t)(pos - start)); | |
67 | 5 | avio_seek(pb, pos, SEEK_SET); | |
68 | 5 | } | |
69 | |||
70 | 1 | static int mmf_write_header(AVFormatContext *s) | |
71 | { | ||
72 | 1 | MMFContext *mmf = s->priv_data; | |
73 | 1 | AVIOContext *pb = s->pb; | |
74 | int64_t pos; | ||
75 | int rate; | ||
76 | 2 | const char *version = s->flags & AVFMT_FLAG_BITEXACT ? | |
77 |
1/2✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
|
1 | "VN:Lavf," : |
78 | "VN:"LIBAVFORMAT_IDENT","; | ||
79 | |||
80 | 1 | rate = mmf_rate_code(s->streams[0]->codecpar->sample_rate); | |
81 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 1 times.
|
1 | if (rate < 0) { |
82 | ✗ | av_log(s, AV_LOG_ERROR, "Unsupported sample rate %d, supported are 4000, 8000, 11025, 22050 and 44100\n", | |
83 | ✗ | s->streams[0]->codecpar->sample_rate); | |
84 | ✗ | return AVERROR(EINVAL); | |
85 | } | ||
86 | |||
87 | 1 | mmf->stereo = s->streams[0]->codecpar->ch_layout.nb_channels > 1; | |
88 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 1 times.
|
1 | if (mmf->stereo && |
89 | ✗ | s->strict_std_compliance > FF_COMPLIANCE_EXPERIMENTAL) { | |
90 | ✗ | av_log(s, AV_LOG_ERROR, "Yamaha SMAF stereo is experimental, " | |
91 | "add '-strict %d' if you want to use it.\n", | ||
92 | FF_COMPLIANCE_EXPERIMENTAL); | ||
93 | ✗ | return AVERROR(EINVAL); | |
94 | } | ||
95 | |||
96 | 1 | ffio_wfourcc(pb, "MMMD"); | |
97 | 1 | avio_wb32(pb, 0); | |
98 | 1 | pos = ff_start_tag(pb, "CNTI"); | |
99 | 1 | avio_w8(pb, 0); /* class */ | |
100 | 1 | avio_w8(pb, 1); /* type */ | |
101 | 1 | avio_w8(pb, 1); /* code type */ | |
102 | 1 | avio_w8(pb, 0); /* status */ | |
103 | 1 | avio_w8(pb, 0); /* counts */ | |
104 | 1 | end_tag_be(pb, pos); | |
105 | |||
106 | 1 | pos = ff_start_tag(pb, "OPDA"); | |
107 | 1 | avio_write(pb, version, strlen(version)); /* metadata ("ST:songtitle,VN:version,...") */ | |
108 | 1 | end_tag_be(pb, pos); | |
109 | |||
110 | 1 | avio_write(pb, "ATR\x00", 4); | |
111 | 1 | avio_wb32(pb, 0); | |
112 | 1 | mmf->atrpos = avio_tell(pb); | |
113 | 1 | avio_w8(pb, 0); /* format type */ | |
114 | 1 | avio_w8(pb, 0); /* sequence type */ | |
115 | 1 | avio_w8(pb, (mmf->stereo << 7) | (1 << 4) | rate); /* (channel << 7) | (format << 4) | rate */ | |
116 | 1 | avio_w8(pb, 0); /* wave base bit */ | |
117 | 1 | avio_w8(pb, 2); /* time base d */ | |
118 | 1 | avio_w8(pb, 2); /* time base g */ | |
119 | |||
120 | 1 | ffio_wfourcc(pb, "Atsq"); | |
121 | 1 | avio_wb32(pb, 16); | |
122 | 1 | mmf->atsqpos = avio_tell(pb); | |
123 | /* Will be filled on close */ | ||
124 | 1 | avio_write(pb, "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 16); | |
125 | |||
126 | 1 | mmf->awapos = ff_start_tag(pb, "Awa\x01"); | |
127 | |||
128 | 1 | avpriv_set_pts_info(s->streams[0], 64, 1, s->streams[0]->codecpar->sample_rate); | |
129 | |||
130 | 1 | return 0; | |
131 | } | ||
132 | |||
133 | /* Write a variable-length symbol */ | ||
134 | 2 | static void put_varlength(AVIOContext *pb, int val) | |
135 | { | ||
136 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if (val < 128) |
137 | ✗ | avio_w8(pb, val); | |
138 | else { | ||
139 | 2 | val -= 128; | |
140 | 2 | avio_w8(pb, 0x80 | val >> 7); | |
141 | 2 | avio_w8(pb, 0x7f & val); | |
142 | } | ||
143 | 2 | } | |
144 | |||
145 | 1 | static int mmf_write_trailer(AVFormatContext *s) | |
146 | { | ||
147 | 1 | AVIOContext *pb = s->pb; | |
148 | 1 | MMFContext *mmf = s->priv_data; | |
149 | int64_t pos, size; | ||
150 | int gatetime; | ||
151 | |||
152 |
1/2✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
|
1 | if (s->pb->seekable & AVIO_SEEKABLE_NORMAL) { |
153 | /* Fill in length fields */ | ||
154 | 1 | end_tag_be(pb, mmf->awapos); | |
155 | 1 | end_tag_be(pb, mmf->atrpos); | |
156 | 1 | end_tag_be(pb, 8); | |
157 | |||
158 | 1 | pos = avio_tell(pb); | |
159 | 1 | size = pos - mmf->awapos; | |
160 | |||
161 | /* Fill Atsq chunk */ | ||
162 | 1 | avio_seek(pb, mmf->atsqpos, SEEK_SET); | |
163 | |||
164 | /* "play wav" */ | ||
165 | 1 | avio_w8(pb, 0); /* start time */ | |
166 | 1 | avio_w8(pb, (mmf->stereo << 6) | 1); /* (channel << 6) | wavenum */ | |
167 | 1 | gatetime = size * 500 / s->streams[0]->codecpar->sample_rate; | |
168 | 1 | put_varlength(pb, gatetime); /* duration */ | |
169 | |||
170 | /* "nop" */ | ||
171 | 1 | put_varlength(pb, gatetime); /* start time */ | |
172 | 1 | avio_write(pb, "\xff\x00", 2); /* nop */ | |
173 | |||
174 | /* "end of sequence" */ | ||
175 | 1 | avio_write(pb, "\x00\x00\x00\x00", 4); | |
176 | |||
177 | 1 | avio_seek(pb, pos, SEEK_SET); | |
178 | } | ||
179 | 1 | return 0; | |
180 | } | ||
181 | #endif /* CONFIG_MMF_MUXER */ | ||
182 | |||
183 | 6956 | static int mmf_probe(const AVProbeData *p) | |
184 | { | ||
185 | /* check file header */ | ||
186 |
4/4✓ Branch 0 taken 36 times.
✓ Branch 1 taken 6920 times.
✓ Branch 2 taken 4 times.
✓ Branch 3 taken 32 times.
|
6956 | if (p->buf[0] == 'M' && p->buf[1] == 'M' && |
187 |
3/4✓ Branch 0 taken 2 times.
✓ Branch 1 taken 2 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
|
4 | p->buf[2] == 'M' && p->buf[3] == 'D' && |
188 |
2/4✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
|
2 | p->buf[8] == 'C' && p->buf[9] == 'N' && |
189 |
2/4✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
|
2 | p->buf[10] == 'T' && p->buf[11] == 'I') |
190 | 2 | return AVPROBE_SCORE_MAX; | |
191 | else | ||
192 | 6954 | return 0; | |
193 | } | ||
194 | |||
195 | /* mmf input */ | ||
196 | 2 | static int mmf_read_header(AVFormatContext *s) | |
197 | { | ||
198 | 2 | MMFContext *mmf = s->priv_data; | |
199 | unsigned int tag; | ||
200 | 2 | AVIOContext *pb = s->pb; | |
201 | AVStream *st; | ||
202 | int64_t size; | ||
203 | int rate, params; | ||
204 | |||
205 | 2 | tag = avio_rl32(pb); | |
206 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if (tag != MKTAG('M', 'M', 'M', 'D')) |
207 | ✗ | return AVERROR_INVALIDDATA; | |
208 | 2 | avio_skip(pb, 4); /* file_size */ | |
209 | |||
210 | /* Skip some unused chunks that may or may not be present */ | ||
211 | 4 | for (;; avio_skip(pb, size)) { | |
212 | 6 | tag = avio_rl32(pb); | |
213 | 6 | size = avio_rb32(pb); | |
214 |
2/2✓ Branch 0 taken 2 times.
✓ Branch 1 taken 4 times.
|
6 | if (tag == MKTAG('C', 'N', 'T', 'I')) |
215 | 2 | continue; | |
216 |
2/2✓ Branch 0 taken 2 times.
✓ Branch 1 taken 2 times.
|
4 | if (tag == MKTAG('O', 'P', 'D', 'A')) |
217 | 2 | continue; | |
218 | 2 | break; | |
219 | } | ||
220 | |||
221 | /* Tag = "ATRx", where "x" = track number */ | ||
222 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if ((tag & 0xffffff) == MKTAG('M', 'T', 'R', 0)) { |
223 | ✗ | av_log(s, AV_LOG_ERROR, "MIDI like format found, unsupported\n"); | |
224 | ✗ | return AVERROR_PATCHWELCOME; | |
225 | } | ||
226 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if ((tag & 0xffffff) != MKTAG('A', 'T', 'R', 0)) { |
227 | ✗ | av_log(s, AV_LOG_ERROR, "Unsupported SMAF chunk %08x\n", tag); | |
228 | ✗ | return AVERROR_PATCHWELCOME; | |
229 | } | ||
230 | |||
231 | 2 | avio_r8(pb); /* format type */ | |
232 | 2 | avio_r8(pb); /* sequence type */ | |
233 | 2 | params = avio_r8(pb); /* (channel << 7) | (format << 4) | rate */ | |
234 | 2 | rate = mmf_rate(params & 0x0f); | |
235 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if (rate < 0) { |
236 | ✗ | av_log(s, AV_LOG_ERROR, "Invalid sample rate\n"); | |
237 | ✗ | return AVERROR_INVALIDDATA; | |
238 | } | ||
239 | 2 | avio_r8(pb); /* wave base bit */ | |
240 | 2 | avio_r8(pb); /* time base d */ | |
241 | 2 | avio_r8(pb); /* time base g */ | |
242 | |||
243 | /* Skip some unused chunks that may or may not be present */ | ||
244 | 2 | for (;; avio_skip(pb, size)) { | |
245 | 4 | tag = avio_rl32(pb); | |
246 | 4 | size = avio_rb32(pb); | |
247 |
2/2✓ Branch 0 taken 2 times.
✓ Branch 1 taken 2 times.
|
4 | if (tag == MKTAG('A', 't', 's', 'q')) |
248 | 2 | continue; | |
249 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if (tag == MKTAG('A', 's', 'p', 'I')) |
250 | ✗ | continue; | |
251 | 2 | break; | |
252 | } | ||
253 | |||
254 | /* Make sure it's followed by an Awa chunk, aka wave data */ | ||
255 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if ((tag & 0xffffff) != MKTAG('A', 'w', 'a', 0)) { |
256 | ✗ | av_log(s, AV_LOG_ERROR, "Unexpected SMAF chunk %08x\n", tag); | |
257 | ✗ | return AVERROR_INVALIDDATA; | |
258 | } | ||
259 | 2 | mmf->data_end = avio_tell(pb) + size; | |
260 | |||
261 | 2 | st = avformat_new_stream(s, NULL); | |
262 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
|
2 | if (!st) |
263 | ✗ | return AVERROR(ENOMEM); | |
264 | |||
265 | 2 | st->codecpar->codec_type = AVMEDIA_TYPE_AUDIO; | |
266 | 2 | st->codecpar->codec_id = AV_CODEC_ID_ADPCM_YAMAHA; | |
267 | 2 | st->codecpar->sample_rate = rate; | |
268 | 2 | av_channel_layout_default(&st->codecpar->ch_layout, (params >> 7) + 1); | |
269 | 2 | st->codecpar->bits_per_coded_sample = 4; | |
270 | 2 | st->codecpar->bit_rate = st->codecpar->sample_rate * | |
271 | 2 | st->codecpar->bits_per_coded_sample; | |
272 | |||
273 | 2 | avpriv_set_pts_info(st, 64, 1, st->codecpar->sample_rate); | |
274 | |||
275 | 2 | return 0; | |
276 | } | ||
277 | |||
278 | #define MAX_SIZE 4096 | ||
279 | |||
280 | 58 | static int mmf_read_packet(AVFormatContext *s, AVPacket *pkt) | |
281 | { | ||
282 | 58 | MMFContext *mmf = s->priv_data; | |
283 | int64_t left, size; | ||
284 | int ret; | ||
285 | |||
286 | 58 | left = mmf->data_end - avio_tell(s->pb); | |
287 | 58 | size = FFMIN(left, MAX_SIZE); | |
288 |
3/4✓ Branch 1 taken 58 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 15 times.
✓ Branch 4 taken 43 times.
|
58 | if (avio_feof(s->pb) || size <= 0) |
289 | 15 | return AVERROR_EOF; | |
290 | |||
291 | 43 | ret = av_get_packet(s->pb, pkt, size); | |
292 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 43 times.
|
43 | if (ret < 0) |
293 | ✗ | return ret; | |
294 | |||
295 | 43 | pkt->stream_index = 0; | |
296 | |||
297 | 43 | return ret; | |
298 | } | ||
299 | |||
300 | #if CONFIG_MMF_DEMUXER | ||
301 | const AVInputFormat ff_mmf_demuxer = { | ||
302 | .name = "mmf", | ||
303 | .long_name = NULL_IF_CONFIG_SMALL("Yamaha SMAF"), | ||
304 | .priv_data_size = sizeof(MMFContext), | ||
305 | .read_probe = mmf_probe, | ||
306 | .read_header = mmf_read_header, | ||
307 | .read_packet = mmf_read_packet, | ||
308 | .flags = AVFMT_GENERIC_INDEX, | ||
309 | }; | ||
310 | #endif | ||
311 | |||
312 | #if CONFIG_MMF_MUXER | ||
313 | const FFOutputFormat ff_mmf_muxer = { | ||
314 | .p.name = "mmf", | ||
315 | .p.long_name = NULL_IF_CONFIG_SMALL("Yamaha SMAF"), | ||
316 | .p.mime_type = "application/vnd.smaf", | ||
317 | .p.extensions = "mmf", | ||
318 | .priv_data_size = sizeof(MMFContext), | ||
319 | .p.audio_codec = AV_CODEC_ID_ADPCM_YAMAHA, | ||
320 | .p.video_codec = AV_CODEC_ID_NONE, | ||
321 | .write_header = mmf_write_header, | ||
322 | .write_packet = ff_raw_write_packet, | ||
323 | .write_trailer = mmf_write_trailer, | ||
324 | }; | ||
325 | #endif | ||
326 |