10l
[ffmpeg.git] / libavformat / wav.c
1 /* 
2  * WAV encoder and decoder
3  * Copyright (c) 2001, 2002 Fabrice Bellard.
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19 #include "avformat.h"
20 #include "avi.h"
21
22 const CodecTag codec_wav_tags[] = {
23     { CODEC_ID_MP2, 0x50 },
24     { CODEC_ID_MP3, 0x55 },
25     { CODEC_ID_AC3, 0x2000 },
26     { CODEC_ID_PCM_S16LE, 0x01 },
27     { CODEC_ID_PCM_U8, 0x01 }, /* must come after s16le in this list */
28     { CODEC_ID_PCM_ALAW, 0x06 },
29     { CODEC_ID_PCM_MULAW, 0x07 },
30     { CODEC_ID_ADPCM_MS, 0x02 },
31     { CODEC_ID_ADPCM_IMA_WAV, 0x11 },
32     { CODEC_ID_ADPCM_G726, 0x45 },
33     { CODEC_ID_ADPCM_IMA_DK4, 0x61 },  /* rogue format number */
34     { CODEC_ID_ADPCM_IMA_DK3, 0x62 },  /* rogue format number */
35     { CODEC_ID_WMAV1, 0x160 },
36     { CODEC_ID_WMAV2, 0x161 },
37     { CODEC_ID_VORBIS, ('V'<<8)+'o' }, //HACK/FIXME, does vorbis in WAV/AVI have an (in)official id?
38     { 0, 0 },
39 };
40
41 #ifdef CONFIG_ENCODERS
42 /* WAVEFORMATEX header */
43 /* returns the size or -1 on error */
44 int put_wav_header(ByteIOContext *pb, AVCodecContext *enc)
45 {
46     int bps, blkalign, bytespersec;
47     int hdrsize = 18;
48
49     if(!enc->codec_tag)
50        enc->codec_tag = codec_get_tag(codec_wav_tags, enc->codec_id);
51     if(!enc->codec_tag)
52         return -1;
53
54     put_le16(pb, enc->codec_tag);
55     put_le16(pb, enc->channels);
56     put_le32(pb, enc->sample_rate);
57     if (enc->codec_id == CODEC_ID_PCM_U8 ||
58         enc->codec_id == CODEC_ID_PCM_ALAW ||
59         enc->codec_id == CODEC_ID_PCM_MULAW) {
60         bps = 8;
61     } else if (enc->codec_id == CODEC_ID_MP2 || enc->codec_id == CODEC_ID_MP3) {
62         bps = 0;
63     } else if (enc->codec_id == CODEC_ID_ADPCM_IMA_WAV || enc->codec_id == CODEC_ID_ADPCM_MS) {
64         bps = 4;
65     } else {
66         bps = 16;
67     }
68     
69     if (enc->codec_id == CODEC_ID_MP2 || enc->codec_id == CODEC_ID_MP3) {
70         blkalign = 1;
71         //blkalign = 144 * enc->bit_rate/enc->sample_rate;
72     } else if (enc->block_align != 0) { /* specified by the codec */
73         blkalign = enc->block_align;
74     } else
75         blkalign = enc->channels*bps >> 3;
76     if (enc->codec_id == CODEC_ID_PCM_U8 ||
77         enc->codec_id == CODEC_ID_PCM_S16LE) {
78         bytespersec = enc->sample_rate * blkalign;
79     } else {
80         bytespersec = enc->bit_rate / 8;
81     }
82     put_le32(pb, bytespersec); /* bytes per second */
83     put_le16(pb, blkalign); /* block align */
84     put_le16(pb, bps); /* bits per sample */
85     if (enc->codec_id == CODEC_ID_MP3) {
86         put_le16(pb, 12); /* wav_extra_size */
87         hdrsize += 12;
88         put_le16(pb, 1); /* wID */
89         put_le32(pb, 2); /* fdwFlags */
90         put_le16(pb, 1152); /* nBlockSize */
91         put_le16(pb, 1); /* nFramesPerBlock */
92         put_le16(pb, 1393); /* nCodecDelay */
93     } else if (enc->codec_id == CODEC_ID_MP2) {
94         put_le16(pb, 22); /* wav_extra_size */
95         hdrsize += 22;
96         put_le16(pb, 2);  /* fwHeadLayer */
97         put_le32(pb, enc->bit_rate); /* dwHeadBitrate */
98         put_le16(pb, enc->channels == 2 ? 1 : 8); /* fwHeadMode */
99         put_le16(pb, 0);  /* fwHeadModeExt */
100         put_le16(pb, 1);  /* wHeadEmphasis */
101         put_le16(pb, 16); /* fwHeadFlags */
102         put_le32(pb, 0);  /* dwPTSLow */
103         put_le32(pb, 0);  /* dwPTSHigh */
104     } else if (enc->codec_id == CODEC_ID_ADPCM_IMA_WAV) {
105         put_le16(pb, 2); /* wav_extra_size */
106         hdrsize += 2;
107         put_le16(pb, ((enc->block_align - 4 * enc->channels) / (4 * enc->channels)) * 8 + 1); /* wSamplesPerBlock */
108     } else {
109         put_le16(pb, enc->extradata_size);
110         put_buffer(pb, enc->extradata, enc->extradata_size);
111         hdrsize += enc->extradata_size;
112         if(hdrsize&1){
113             hdrsize++;
114             put_byte(pb, 0);
115         }
116     }
117
118     return hdrsize;
119 }
120 #endif //CONFIG_ENCODERS
121
122 /* We could be given one of the three possible structures here:
123  * WAVEFORMAT, PCMWAVEFORMAT or WAVEFORMATEX. Each structure
124  * is an expansion of the previous one with the fields added
125  * at the bottom. PCMWAVEFORMAT adds 'WORD wBitsPerSample' and
126  * WAVEFORMATEX adds 'WORD  cbSize' and basically makes itself
127  * an openended structure.
128  */
129 void get_wav_header(ByteIOContext *pb, AVCodecContext *codec, int size) 
130 {
131     int id;
132
133     id = get_le16(pb);
134     codec->codec_type = CODEC_TYPE_AUDIO;
135     codec->codec_tag = id;
136     codec->channels = get_le16(pb);
137     codec->sample_rate = get_le32(pb);
138     codec->bit_rate = get_le32(pb) * 8;
139     codec->block_align = get_le16(pb);
140     if (size == 14) {  /* We're dealing with plain vanilla WAVEFORMAT */
141         codec->bits_per_sample = 8;
142     }else
143         codec->bits_per_sample = get_le16(pb);
144     codec->codec_id = wav_codec_get_id(id, codec->bits_per_sample);
145     
146     if (size > 16) {  /* We're obviously dealing with WAVEFORMATEX */
147         codec->extradata_size = get_le16(pb);
148         if (codec->extradata_size > 0) {
149             if (codec->extradata_size > size - 18)
150                 codec->extradata_size = size - 18;
151             codec->extradata = av_mallocz(codec->extradata_size);
152             get_buffer(pb, codec->extradata, codec->extradata_size);
153         } else
154             codec->extradata_size = 0;
155         
156         /* It is possible for the chunk to contain garbage at the end */
157         if (size - codec->extradata_size - 18 > 0)
158             url_fskip(pb, size - codec->extradata_size - 18);
159     }
160 }
161
162
163 int wav_codec_get_id(unsigned int tag, int bps)
164 {
165     int id;
166     id = codec_get_id(codec_wav_tags, tag);
167     if (id <= 0)
168         return id;
169     /* handle specific u8 codec */
170     if (id == CODEC_ID_PCM_S16LE && bps == 8)
171         id = CODEC_ID_PCM_U8;
172     return id;
173 }
174
175 #ifdef CONFIG_ENCODERS
176 typedef struct {
177     offset_t data;
178 } WAVContext;
179
180 static int wav_write_header(AVFormatContext *s)
181 {
182     WAVContext *wav = s->priv_data;
183     ByteIOContext *pb = &s->pb;
184     offset_t fmt;
185
186     put_tag(pb, "RIFF");
187     put_le32(pb, 0); /* file length */
188     put_tag(pb, "WAVE");
189
190     /* format header */
191     fmt = start_tag(pb, "fmt ");
192     if (put_wav_header(pb, &s->streams[0]->codec) < 0) {
193         av_free(wav);
194         return -1;
195     }
196     end_tag(pb, fmt);
197
198     /* data header */
199     wav->data = start_tag(pb, "data");
200     
201     put_flush_packet(pb);
202
203     return 0;
204 }
205
206 static int wav_write_packet(AVFormatContext *s, int stream_index_ptr,
207                             const uint8_t *buf, int size, int64_t pts)
208 {
209     ByteIOContext *pb = &s->pb;
210     put_buffer(pb, buf, size);
211     return 0;
212 }
213
214 static int wav_write_trailer(AVFormatContext *s)
215 {
216     ByteIOContext *pb = &s->pb;
217     WAVContext *wav = s->priv_data;
218     offset_t file_size;
219
220     if (!url_is_streamed(&s->pb)) {
221         end_tag(pb, wav->data);
222
223         /* update file size */
224         file_size = url_ftell(pb);
225         url_fseek(pb, 4, SEEK_SET);
226         put_le32(pb, (uint32_t)(file_size - 8));
227         url_fseek(pb, file_size, SEEK_SET);
228
229         put_flush_packet(pb);
230     }
231     return 0;
232 }
233 #endif //CONFIG_ENCODERS
234
235 /* return the size of the found tag */
236 /* XXX: > 2GB ? */
237 static int find_tag(ByteIOContext *pb, uint32_t tag1)
238 {
239     unsigned int tag;
240     int size;
241
242     for(;;) {
243         if (url_feof(pb))
244             return -1;
245         tag = get_le32(pb);
246         size = get_le32(pb);
247         if (tag == tag1)
248             break;
249         url_fseek(pb, size, SEEK_CUR);
250     }
251     if (size < 0)
252         size = 0x7fffffff;
253     return size;
254 }
255
256 static int wav_probe(AVProbeData *p)
257 {
258     /* check file header */
259     if (p->buf_size <= 32)
260         return 0;
261     if (p->buf[0] == 'R' && p->buf[1] == 'I' &&
262         p->buf[2] == 'F' && p->buf[3] == 'F' &&
263         p->buf[8] == 'W' && p->buf[9] == 'A' &&
264         p->buf[10] == 'V' && p->buf[11] == 'E')
265         return AVPROBE_SCORE_MAX;
266     else
267         return 0;
268 }
269
270 /* wav input */
271 static int wav_read_header(AVFormatContext *s,
272                            AVFormatParameters *ap)
273 {
274     int size;
275     unsigned int tag;
276     ByteIOContext *pb = &s->pb;
277     AVStream *st;
278
279     /* check RIFF header */
280     tag = get_le32(pb);
281
282     if (tag != MKTAG('R', 'I', 'F', 'F'))
283         return -1;
284     get_le32(pb); /* file size */
285     tag = get_le32(pb);
286     if (tag != MKTAG('W', 'A', 'V', 'E'))
287         return -1;
288     
289     /* parse fmt header */
290     size = find_tag(pb, MKTAG('f', 'm', 't', ' '));
291     if (size < 0)
292         return -1;
293     st = av_new_stream(s, 0);
294     if (!st)
295         return AVERROR_NOMEM;
296
297     get_wav_header(pb, &st->codec, size);
298     st->need_parsing = 1;
299     
300     size = find_tag(pb, MKTAG('d', 'a', 't', 'a'));
301     if (size < 0)
302         return -1;
303     return 0;
304 }
305
306 #define MAX_SIZE 4096
307
308 static int wav_read_packet(AVFormatContext *s,
309                            AVPacket *pkt)
310 {
311     int ret, size;
312     AVStream *st;
313
314     if (url_feof(&s->pb))
315         return -EIO;
316     st = s->streams[0];
317
318     size = MAX_SIZE;
319     if (st->codec.block_align > 1) {
320         if (size < st->codec.block_align)
321             size = st->codec.block_align;
322         size = (size / st->codec.block_align) * st->codec.block_align;
323     }
324     if (av_new_packet(pkt, size))
325         return -EIO;
326     pkt->stream_index = 0;
327
328     ret = get_buffer(&s->pb, pkt->data, pkt->size);
329     if (ret < 0)
330         av_free_packet(pkt);
331     /* note: we need to modify the packet size here to handle the last
332        packet */
333     pkt->size = ret;
334     return ret;
335 }
336
337 static int wav_read_close(AVFormatContext *s)
338 {
339     return 0;
340 }
341
342 static int wav_read_seek(AVFormatContext *s, 
343                          int stream_index, int64_t timestamp)
344 {
345     AVStream *st;
346
347     st = s->streams[0];
348     switch(st->codec.codec_id) {
349     case CODEC_ID_MP2:
350     case CODEC_ID_MP3:
351     case CODEC_ID_AC3:
352         /* use generic seeking with dynamically generated indexes */
353         return -1;
354     default:
355         break;
356     }
357     return pcm_read_seek(s, stream_index, timestamp);
358 }
359
360
361 static AVInputFormat wav_iformat = {
362     "wav",
363     "wav format",
364     0,
365     wav_probe,
366     wav_read_header,
367     wav_read_packet,
368     wav_read_close,
369     wav_read_seek,
370 };
371
372 #ifdef CONFIG_ENCODERS
373 static AVOutputFormat wav_oformat = {
374     "wav",
375     "wav format",
376     "audio/x-wav",
377     "wav",
378     sizeof(WAVContext),
379     CODEC_ID_PCM_S16LE,
380     CODEC_ID_NONE,
381     wav_write_header,
382     wav_write_packet,
383     wav_write_trailer,
384 };
385 #endif //CONFIG_ENCODERS
386
387 int ff_wav_init(void)
388 {
389     av_register_input_format(&wav_iformat);
390 #ifdef CONFIG_ENCODERS
391     av_register_output_format(&wav_oformat);
392 #endif //CONFIG_ENCODERS
393     return 0;
394 }