3 * Copyright (c) 2005 Vidar Madsen
5 * This file is part of FFmpeg.
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.
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.
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
26 int64_t atrpos
, atsqpos
, awapos
;
30 static const int mmf_rates
[] = { 4000, 8000, 11025, 22050, 44100 };
32 static int mmf_rate(int code
)
34 if((code
< 0) || (code
> 4))
36 return mmf_rates
[code
];
39 #ifdef CONFIG_MMF_MUXER
40 static int mmf_rate_code(int rate
)
43 for(i
= 0; i
< 5; i
++)
44 if(mmf_rates
[i
] == rate
)
49 /* Copy of end_tag() from avienc.c, but for big-endian chunk size */
50 static void end_tag_be(ByteIOContext
*pb
, int64_t start
)
55 url_fseek(pb
, start
- 4, SEEK_SET
);
56 put_be32(pb
, (uint32_t)(pos
- start
));
57 url_fseek(pb
, pos
, SEEK_SET
);
60 static int mmf_write_header(AVFormatContext
*s
)
62 MMFContext
*mmf
= s
->priv_data
;
63 ByteIOContext
*pb
= s
->pb
;
67 rate
= mmf_rate_code(s
->streams
[0]->codec
->sample_rate
);
69 av_log(s
, AV_LOG_ERROR
, "Unsupported sample rate %d\n", s
->streams
[0]->codec
->sample_rate
);
75 pos
= start_tag(pb
, "CNTI");
76 put_byte(pb
, 0); /* class */
77 put_byte(pb
, 0); /* type */
78 put_byte(pb
, 0); /* code type */
79 put_byte(pb
, 0); /* status */
80 put_byte(pb
, 0); /* counts */
81 put_tag(pb
, "VN:libavcodec,"); /* metadata ("ST:songtitle,VN:version,...") */
84 put_buffer(pb
, "ATR\x00", 4);
86 mmf
->atrpos
= url_ftell(pb
);
87 put_byte(pb
, 0); /* format type */
88 put_byte(pb
, 0); /* sequence type */
89 put_byte(pb
, (0 << 7) | (1 << 4) | rate
); /* (channel << 7) | (format << 4) | rate */
90 put_byte(pb
, 0); /* wave base bit */
91 put_byte(pb
, 2); /* time base d */
92 put_byte(pb
, 2); /* time base g */
96 mmf
->atsqpos
= url_ftell(pb
);
97 /* Will be filled on close */
98 put_buffer(pb
, "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 16);
100 mmf
->awapos
= start_tag(pb
, "Awa\x01");
102 av_set_pts_info(s
->streams
[0], 64, 1, s
->streams
[0]->codec
->sample_rate
);
104 put_flush_packet(pb
);
109 static int mmf_write_packet(AVFormatContext
*s
, AVPacket
*pkt
)
111 ByteIOContext
*pb
= s
->pb
;
112 put_buffer(pb
, pkt
->data
, pkt
->size
);
116 /* Write a variable-length symbol */
117 static void put_varlength(ByteIOContext
*pb
, int val
)
123 put_byte(pb
, 0x80 | val
>> 7);
124 put_byte(pb
, 0x7f & val
);
128 static int mmf_write_trailer(AVFormatContext
*s
)
130 ByteIOContext
*pb
= s
->pb
;
131 MMFContext
*mmf
= s
->priv_data
;
135 if (!url_is_streamed(s
->pb
)) {
136 /* Fill in length fields */
137 end_tag_be(pb
, mmf
->awapos
);
138 end_tag_be(pb
, mmf
->atrpos
);
142 size
= pos
- mmf
->awapos
;
144 /* Fill Atsq chunk */
145 url_fseek(pb
, mmf
->atsqpos
, SEEK_SET
);
148 put_byte(pb
, 0); /* start time */
149 put_byte(pb
, 1); /* (channel << 6) | wavenum */
150 gatetime
= size
* 500 / s
->streams
[0]->codec
->sample_rate
;
151 put_varlength(pb
, gatetime
); /* duration */
154 put_varlength(pb
, gatetime
); /* start time */
155 put_buffer(pb
, "\xff\x00", 2); /* nop */
157 /* "end of sequence" */
158 put_buffer(pb
, "\x00\x00\x00\x00", 4);
160 url_fseek(pb
, pos
, SEEK_SET
);
162 put_flush_packet(pb
);
166 #endif /* CONFIG_MMF_MUXER */
168 static int mmf_probe(AVProbeData
*p
)
170 /* check file header */
171 if (p
->buf
[0] == 'M' && p
->buf
[1] == 'M' &&
172 p
->buf
[2] == 'M' && p
->buf
[3] == 'D' &&
173 p
->buf
[8] == 'C' && p
->buf
[9] == 'N' &&
174 p
->buf
[10] == 'T' && p
->buf
[11] == 'I')
175 return AVPROBE_SCORE_MAX
;
181 static int mmf_read_header(AVFormatContext
*s
,
182 AVFormatParameters
*ap
)
184 MMFContext
*mmf
= s
->priv_data
;
186 ByteIOContext
*pb
= s
->pb
;
188 int64_t file_size
, size
;
192 if (tag
!= MKTAG('M', 'M', 'M', 'D'))
194 file_size
= get_be32(pb
);
196 /* Skip some unused chunks that may or may not be present */
197 for(;; url_fseek(pb
, size
, SEEK_CUR
)) {
200 if(tag
== MKTAG('C','N','T','I')) continue;
201 if(tag
== MKTAG('O','P','D','A')) continue;
205 /* Tag = "ATRx", where "x" = track number */
206 if ((tag
& 0xffffff) == MKTAG('M', 'T', 'R', 0)) {
207 av_log(s
, AV_LOG_ERROR
, "MIDI like format found, unsupported\n");
210 if ((tag
& 0xffffff) != MKTAG('A', 'T', 'R', 0)) {
211 av_log(s
, AV_LOG_ERROR
, "Unsupported SMAF chunk %08x\n", tag
);
215 get_byte(pb
); /* format type */
216 get_byte(pb
); /* sequence type */
217 params
= get_byte(pb
); /* (channel << 7) | (format << 4) | rate */
218 rate
= mmf_rate(params
& 0x0f);
220 av_log(s
, AV_LOG_ERROR
, "Invalid sample rate\n");
223 get_byte(pb
); /* wave base bit */
224 get_byte(pb
); /* time base d */
225 get_byte(pb
); /* time base g */
227 /* Skip some unused chunks that may or may not be present */
228 for(;; url_fseek(pb
, size
, SEEK_CUR
)) {
231 if(tag
== MKTAG('A','t','s','q')) continue;
232 if(tag
== MKTAG('A','s','p','I')) continue;
236 /* Make sure it's followed by an Awa chunk, aka wave data */
237 if ((tag
& 0xffffff) != MKTAG('A', 'w', 'a', 0)) {
238 av_log(s
, AV_LOG_ERROR
, "Unexpected SMAF chunk %08x\n", tag
);
241 mmf
->data_size
= size
;
243 st
= av_new_stream(s
, 0);
245 return AVERROR(ENOMEM
);
247 st
->codec
->codec_type
= CODEC_TYPE_AUDIO
;
248 st
->codec
->codec_id
= CODEC_ID_ADPCM_YAMAHA
;
249 st
->codec
->sample_rate
= rate
;
250 st
->codec
->channels
= 1;
251 st
->codec
->bits_per_coded_sample
= 4;
252 st
->codec
->bit_rate
= st
->codec
->sample_rate
* st
->codec
->bits_per_coded_sample
;
254 av_set_pts_info(st
, 64, 1, st
->codec
->sample_rate
);
259 #define MAX_SIZE 4096
261 static int mmf_read_packet(AVFormatContext
*s
,
264 MMFContext
*mmf
= s
->priv_data
;
273 if(size
> mmf
->data_size
)
274 size
= mmf
->data_size
;
279 if (av_new_packet(pkt
, size
))
281 pkt
->stream_index
= 0;
283 ret
= get_buffer(s
->pb
, pkt
->data
, pkt
->size
);
287 mmf
->data_size
-= ret
;
293 #ifdef CONFIG_MMF_DEMUXER
294 AVInputFormat mmf_demuxer
= {
296 NULL_IF_CONFIG_SMALL("mmf format"),
305 #ifdef CONFIG_MMF_MUXER
306 AVOutputFormat mmf_muxer
= {
308 NULL_IF_CONFIG_SMALL("mmf format"),
309 "application/vnd.smaf",
312 CODEC_ID_ADPCM_YAMAHA
,