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