wav.c 11.9 KB
Newer Older
Fabrice Bellard's avatar
Fabrice Bellard committed
1 2
/* 
 * WAV encoder and decoder
3
 * Copyright (c) 2001, 2002 Fabrice Bellard.
Fabrice Bellard's avatar
Fabrice Bellard committed
4
 *
5 6 7 8
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
Fabrice Bellard's avatar
Fabrice Bellard committed
9
 *
10
 * This library is distributed in the hope that it will be useful,
Fabrice Bellard's avatar
Fabrice Bellard committed
11
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
Fabrice Bellard's avatar
Fabrice Bellard committed
14
 *
15 16 17
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
Fabrice Bellard's avatar
Fabrice Bellard committed
18 19 20 21
 */
#include "avformat.h"
#include "avi.h"

22
const CodecTag codec_wav_tags[] = {
23
    { CODEC_ID_MP2, 0x50 },
24
    { CODEC_ID_MP3, 0x55 },
25 26 27
    { CODEC_ID_AC3, 0x2000 },
    { CODEC_ID_PCM_S16LE, 0x01 },
    { CODEC_ID_PCM_U8, 0x01 }, /* must come after s16le in this list */
28 29
    { CODEC_ID_PCM_S24LE, 0x01 },
    { CODEC_ID_PCM_S32LE, 0x01 },
30 31
    { CODEC_ID_PCM_ALAW, 0x06 },
    { CODEC_ID_PCM_MULAW, 0x07 },
32 33
    { CODEC_ID_ADPCM_MS, 0x02 },
    { CODEC_ID_ADPCM_IMA_WAV, 0x11 },
34
    { CODEC_ID_ADPCM_YAMAHA, 0x20 },
35
    { CODEC_ID_ADPCM_G726, 0x45 },
36 37
    { CODEC_ID_ADPCM_IMA_DK4, 0x61 },  /* rogue format number */
    { CODEC_ID_ADPCM_IMA_DK3, 0x62 },  /* rogue format number */
38 39
    { CODEC_ID_WMAV1, 0x160 },
    { CODEC_ID_WMAV2, 0x161 },
40
    { CODEC_ID_AAC, 0x706d },
41
    { CODEC_ID_VORBIS, ('V'<<8)+'o' }, //HACK/FIXME, does vorbis in WAV/AVI have an (in)official id?
42 43
    { CODEC_ID_SONIC, 0x2048 },
    { CODEC_ID_SONIC_LS, 0x2048 },
44
    { CODEC_ID_ADPCM_CT, 0x200 },
45
    { CODEC_ID_ADPCM_SWF, ('S'<<8)+'F' },
46 47 48
    { 0, 0 },
};

49
#ifdef CONFIG_MUXERS
50
/* WAVEFORMATEX header */
51
/* returns the size or -1 on error */
52 53
int put_wav_header(ByteIOContext *pb, AVCodecContext *enc)
{
54
    int bps, blkalign, bytespersec;
55
    int hdrsize = 18;
56

57 58 59
    if(!enc->codec_tag)
       enc->codec_tag = codec_get_tag(codec_wav_tags, enc->codec_id);
    if(!enc->codec_tag)
60
        return -1;
61 62

    put_le16(pb, enc->codec_tag);
63 64 65 66 67 68
    put_le16(pb, enc->channels);
    put_le32(pb, enc->sample_rate);
    if (enc->codec_id == CODEC_ID_PCM_U8 ||
        enc->codec_id == CODEC_ID_PCM_ALAW ||
        enc->codec_id == CODEC_ID_PCM_MULAW) {
        bps = 8;
69
    } else if (enc->codec_id == CODEC_ID_MP2 || enc->codec_id == CODEC_ID_MP3) {
70
        bps = 0;
71
    } else if (enc->codec_id == CODEC_ID_ADPCM_IMA_WAV || enc->codec_id == CODEC_ID_ADPCM_MS || enc->codec_id == CODEC_ID_ADPCM_G726 || enc->codec_id == CODEC_ID_ADPCM_YAMAHA) { //
72
        bps = 4;
73 74 75 76
    } else if (enc->codec_id == CODEC_ID_PCM_S24LE) {
        bps = 24;
    } else if (enc->codec_id == CODEC_ID_PCM_S32LE) {
        bps = 32;
77 78 79 80
    } else {
        bps = 16;
    }
    
81
    if (enc->codec_id == CODEC_ID_MP2 || enc->codec_id == CODEC_ID_MP3) {
82
        blkalign = enc->frame_size; //this is wrong, but seems many demuxers dont work if this is set correctly
83
        //blkalign = 144 * enc->bit_rate/enc->sample_rate;
84 85
    } else if (enc->codec_id == CODEC_ID_ADPCM_G726) { //
        blkalign = 1;
86 87
    } else if (enc->block_align != 0) { /* specified by the codec */
        blkalign = enc->block_align;
88
    } else
89 90
        blkalign = enc->channels*bps >> 3;
    if (enc->codec_id == CODEC_ID_PCM_U8 ||
91 92
        enc->codec_id == CODEC_ID_PCM_S24LE ||
        enc->codec_id == CODEC_ID_PCM_S32LE ||
93 94 95 96 97 98 99 100
        enc->codec_id == CODEC_ID_PCM_S16LE) {
        bytespersec = enc->sample_rate * blkalign;
    } else {
        bytespersec = enc->bit_rate / 8;
    }
    put_le32(pb, bytespersec); /* bytes per second */
    put_le16(pb, blkalign); /* block align */
    put_le16(pb, bps); /* bits per sample */
101
    if (enc->codec_id == CODEC_ID_MP3) {
102
        put_le16(pb, 12); /* wav_extra_size */
103
        hdrsize += 12;
104 105 106 107 108
        put_le16(pb, 1); /* wID */
        put_le32(pb, 2); /* fdwFlags */
        put_le16(pb, 1152); /* nBlockSize */
        put_le16(pb, 1); /* nFramesPerBlock */
        put_le16(pb, 1393); /* nCodecDelay */
109 110
    } else if (enc->codec_id == CODEC_ID_MP2) {
        put_le16(pb, 22); /* wav_extra_size */
111
        hdrsize += 22;
112 113 114 115 116 117 118 119
        put_le16(pb, 2);  /* fwHeadLayer */
        put_le32(pb, enc->bit_rate); /* dwHeadBitrate */
        put_le16(pb, enc->channels == 2 ? 1 : 8); /* fwHeadMode */
        put_le16(pb, 0);  /* fwHeadModeExt */
        put_le16(pb, 1);  /* wHeadEmphasis */
        put_le16(pb, 16); /* fwHeadFlags */
        put_le32(pb, 0);  /* dwPTSLow */
        put_le32(pb, 0);  /* dwPTSHigh */
120 121
    } else if (enc->codec_id == CODEC_ID_ADPCM_IMA_WAV) {
        put_le16(pb, 2); /* wav_extra_size */
122
        hdrsize += 2;
123
        put_le16(pb, ((enc->block_align - 4 * enc->channels) / (4 * enc->channels)) * 8 + 1); /* wSamplesPerBlock */
124
    } else if(enc->extradata_size){
125 126 127
        put_le16(pb, enc->extradata_size);
        put_buffer(pb, enc->extradata, enc->extradata_size);
        hdrsize += enc->extradata_size;
Michael Niedermayer's avatar
Michael Niedermayer committed
128 129 130 131
        if(hdrsize&1){
            hdrsize++;
            put_byte(pb, 0);
        }
132 133
    } else {
        hdrsize -= 2;
134
    }
135

136
    return hdrsize;
137
}
138
#endif //CONFIG_MUXERS
139

140 141 142 143 144 145 146 147
/* We could be given one of the three possible structures here:
 * WAVEFORMAT, PCMWAVEFORMAT or WAVEFORMATEX. Each structure
 * is an expansion of the previous one with the fields added
 * at the bottom. PCMWAVEFORMAT adds 'WORD wBitsPerSample' and
 * WAVEFORMATEX adds 'WORD  cbSize' and basically makes itself
 * an openended structure.
 */
void get_wav_header(ByteIOContext *pb, AVCodecContext *codec, int size) 
148
{
149
    int id;
150 151 152 153 154 155 156 157

    id = get_le16(pb);
    codec->codec_type = CODEC_TYPE_AUDIO;
    codec->codec_tag = id;
    codec->channels = get_le16(pb);
    codec->sample_rate = get_le32(pb);
    codec->bit_rate = get_le32(pb) * 8;
    codec->block_align = get_le16(pb);
158 159
    if (size == 14) {  /* We're dealing with plain vanilla WAVEFORMAT */
        codec->bits_per_sample = 8;
Michael Niedermayer's avatar
Michael Niedermayer committed
160 161 162
    }else
        codec->bits_per_sample = get_le16(pb);
    codec->codec_id = wav_codec_get_id(id, codec->bits_per_sample);
163
    
164
    if (size > 16) {  /* We're obviously dealing with WAVEFORMATEX */
165 166
	codec->extradata_size = get_le16(pb);
	if (codec->extradata_size > 0) {
167 168
	    if (codec->extradata_size > size - 18)
	        codec->extradata_size = size - 18;
169
            codec->extradata = av_mallocz(codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
170
            get_buffer(pb, codec->extradata, codec->extradata_size);
171 172 173 174 175 176
        } else
	    codec->extradata_size = 0;
	
	/* It is possible for the chunk to contain garbage at the end */
	if (size - codec->extradata_size - 18 > 0)
	    url_fskip(pb, size - codec->extradata_size - 18);
177 178 179 180
    }
}


181 182 183 184 185 186 187 188 189
int wav_codec_get_id(unsigned int tag, int bps)
{
    int id;
    id = codec_get_id(codec_wav_tags, tag);
    if (id <= 0)
        return id;
    /* handle specific u8 codec */
    if (id == CODEC_ID_PCM_S16LE && bps == 8)
        id = CODEC_ID_PCM_U8;
190 191 192 193
    if (id == CODEC_ID_PCM_S16LE && bps == 24)
        id = CODEC_ID_PCM_S24LE;
    if (id == CODEC_ID_PCM_S16LE && bps == 32)
        id = CODEC_ID_PCM_S32LE;
194 195 196
    return id;
}

197
#ifdef CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
198 199 200 201 202 203
typedef struct {
    offset_t data;
} WAVContext;

static int wav_write_header(AVFormatContext *s)
{
Fabrice Bellard's avatar
Fabrice Bellard committed
204
    WAVContext *wav = s->priv_data;
Fabrice Bellard's avatar
Fabrice Bellard committed
205 206 207 208 209 210 211 212 213
    ByteIOContext *pb = &s->pb;
    offset_t fmt;

    put_tag(pb, "RIFF");
    put_le32(pb, 0); /* file length */
    put_tag(pb, "WAVE");

    /* format header */
    fmt = start_tag(pb, "fmt ");
214
    if (put_wav_header(pb, s->streams[0]->codec) < 0) {
215
        av_free(wav);
216 217
        return -1;
    }
Fabrice Bellard's avatar
Fabrice Bellard committed
218 219
    end_tag(pb, fmt);

220
    av_set_pts_info(s->streams[0], 64, 1, s->streams[0]->codec->sample_rate);
221

Fabrice Bellard's avatar
Fabrice Bellard committed
222 223 224 225 226 227 228 229
    /* data header */
    wav->data = start_tag(pb, "data");
    
    put_flush_packet(pb);

    return 0;
}

230
static int wav_write_packet(AVFormatContext *s, AVPacket *pkt)
Fabrice Bellard's avatar
Fabrice Bellard committed
231 232
{
    ByteIOContext *pb = &s->pb;
233
    put_buffer(pb, pkt->data, pkt->size);
Fabrice Bellard's avatar
Fabrice Bellard committed
234 235 236 237 238 239 240 241 242 243 244 245 246 247 248
    return 0;
}

static int wav_write_trailer(AVFormatContext *s)
{
    ByteIOContext *pb = &s->pb;
    WAVContext *wav = s->priv_data;
    offset_t file_size;

    if (!url_is_streamed(&s->pb)) {
        end_tag(pb, wav->data);

        /* update file size */
        file_size = url_ftell(pb);
        url_fseek(pb, 4, SEEK_SET);
249
        put_le32(pb, (uint32_t)(file_size - 8));
Fabrice Bellard's avatar
Fabrice Bellard committed
250 251 252 253 254 255
        url_fseek(pb, file_size, SEEK_SET);

        put_flush_packet(pb);
    }
    return 0;
}
256
#endif //CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
257 258 259

/* return the size of the found tag */
/* XXX: > 2GB ? */
260
static int find_tag(ByteIOContext *pb, uint32_t tag1)
Fabrice Bellard's avatar
Fabrice Bellard committed
261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278
{
    unsigned int tag;
    int size;

    for(;;) {
        if (url_feof(pb))
            return -1;
        tag = get_le32(pb);
        size = get_le32(pb);
        if (tag == tag1)
            break;
        url_fseek(pb, size, SEEK_CUR);
    }
    if (size < 0)
        size = 0x7fffffff;
    return size;
}

Fabrice Bellard's avatar
Fabrice Bellard committed
279 280 281 282 283 284 285 286 287 288 289 290 291 292
static int wav_probe(AVProbeData *p)
{
    /* check file header */
    if (p->buf_size <= 32)
        return 0;
    if (p->buf[0] == 'R' && p->buf[1] == 'I' &&
        p->buf[2] == 'F' && p->buf[3] == 'F' &&
        p->buf[8] == 'W' && p->buf[9] == 'A' &&
        p->buf[10] == 'V' && p->buf[11] == 'E')
        return AVPROBE_SCORE_MAX;
    else
        return 0;
}

Fabrice Bellard's avatar
Fabrice Bellard committed
293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315
/* wav input */
static int wav_read_header(AVFormatContext *s,
                           AVFormatParameters *ap)
{
    int size;
    unsigned int tag;
    ByteIOContext *pb = &s->pb;
    AVStream *st;

    /* check RIFF header */
    tag = get_le32(pb);

    if (tag != MKTAG('R', 'I', 'F', 'F'))
        return -1;
    get_le32(pb); /* file size */
    tag = get_le32(pb);
    if (tag != MKTAG('W', 'A', 'V', 'E'))
        return -1;
    
    /* parse fmt header */
    size = find_tag(pb, MKTAG('f', 'm', 't', ' '));
    if (size < 0)
        return -1;
Fabrice Bellard's avatar
Fabrice Bellard committed
316
    st = av_new_stream(s, 0);
Fabrice Bellard's avatar
Fabrice Bellard committed
317
    if (!st)
Fabrice Bellard's avatar
Fabrice Bellard committed
318
        return AVERROR_NOMEM;
Fabrice Bellard's avatar
Fabrice Bellard committed
319

320
    get_wav_header(pb, st->codec, size);
321
    st->need_parsing = 1;
322

323
    av_set_pts_info(st, 64, 1, st->codec->sample_rate);
324

325 326 327
    size = find_tag(pb, MKTAG('d', 'a', 't', 'a'));
    if (size < 0)
        return -1;
Fabrice Bellard's avatar
Fabrice Bellard committed
328 329 330 331 332 333 334 335
    return 0;
}

#define MAX_SIZE 4096

static int wav_read_packet(AVFormatContext *s,
                           AVPacket *pkt)
{
336 337
    int ret, size;
    AVStream *st;
Fabrice Bellard's avatar
Fabrice Bellard committed
338 339

    if (url_feof(&s->pb))
340
        return AVERROR_IO;
341 342 343
    st = s->streams[0];

    size = MAX_SIZE;
344 345 346 347
    if (st->codec->block_align > 1) {
        if (size < st->codec->block_align)
            size = st->codec->block_align;
        size = (size / st->codec->block_align) * st->codec->block_align;
348 349
    }
    if (av_new_packet(pkt, size))
350
        return AVERROR_IO;
Fabrice Bellard's avatar
Fabrice Bellard committed
351 352 353 354 355
    pkt->stream_index = 0;

    ret = get_buffer(&s->pb, pkt->data, pkt->size);
    if (ret < 0)
        av_free_packet(pkt);
Fabrice Bellard's avatar
Fabrice Bellard committed
356 357 358
    /* note: we need to modify the packet size here to handle the last
       packet */
    pkt->size = ret;
Fabrice Bellard's avatar
Fabrice Bellard committed
359 360 361 362 363 364 365 366
    return ret;
}

static int wav_read_close(AVFormatContext *s)
{
    return 0;
}

367
static int wav_read_seek(AVFormatContext *s, 
368
                         int stream_index, int64_t timestamp, int flags)
369 370 371 372
{
    AVStream *st;

    st = s->streams[0];
373
    switch(st->codec->codec_id) {
374 375 376
    case CODEC_ID_MP2:
    case CODEC_ID_MP3:
    case CODEC_ID_AC3:
377
    case CODEC_ID_DTS:
378 379 380 381 382
        /* use generic seeking with dynamically generated indexes */
        return -1;
    default:
        break;
    }
383
    return pcm_read_seek(s, stream_index, timestamp, flags);
384 385 386
}


Fabrice Bellard's avatar
Fabrice Bellard committed
387 388 389 390 391 392 393 394
static AVInputFormat wav_iformat = {
    "wav",
    "wav format",
    0,
    wav_probe,
    wav_read_header,
    wav_read_packet,
    wav_read_close,
395
    wav_read_seek,
Fabrice Bellard's avatar
Fabrice Bellard committed
396 397
};

398
#ifdef CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
399
static AVOutputFormat wav_oformat = {
Fabrice Bellard's avatar
Fabrice Bellard committed
400 401 402 403
    "wav",
    "wav format",
    "audio/x-wav",
    "wav",
Fabrice Bellard's avatar
Fabrice Bellard committed
404
    sizeof(WAVContext),
Fabrice Bellard's avatar
Fabrice Bellard committed
405
    CODEC_ID_PCM_S16LE,
Fabrice Bellard's avatar
Fabrice Bellard committed
406 407 408 409 410
    CODEC_ID_NONE,
    wav_write_header,
    wav_write_packet,
    wav_write_trailer,
};
411
#endif //CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
412

413
int ff_wav_init(void)
Fabrice Bellard's avatar
Fabrice Bellard committed
414 415
{
    av_register_input_format(&wav_iformat);
416
#ifdef CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
417
    av_register_output_format(&wav_oformat);
418
#endif //CONFIG_MUXERS
Fabrice Bellard's avatar
Fabrice Bellard committed
419 420
    return 0;
}