Move GUID-related objects to riffenc.c and riff.c.
[ffmpeg.git] / libavformat / riffdec.c
1 /*
2  * RIFF demuxing functions and data
3  * Copyright (c) 2000 Fabrice Bellard
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 "libavutil/dict.h"
23 #include "libavutil/error.h"
24 #include "libavutil/log.h"
25 #include "libavutil/mathematics.h"
26 #include "libavcodec/avcodec.h"
27 #include "libavcodec/bytestream.h"
28 #include "avformat.h"
29 #include "avio_internal.h"
30 #include "riff.h"
31
32 void ff_get_guid(AVIOContext *s, ff_asf_guid *g)
33 {
34     av_assert0(sizeof(*g) == 16); //compiler will optimize this out
35     if (avio_read(s, *g, sizeof(*g)) < (int)sizeof(*g))
36         memset(*g, 0, sizeof(*g));
37 }
38
39 enum AVCodecID ff_codec_guid_get_id(const AVCodecGuid *guids, ff_asf_guid guid)
40 {
41     int i;
42     for (i = 0; guids[i].id != AV_CODEC_ID_NONE; i++)
43         if (!ff_guidcmp(guids[i].guid, guid))
44             return guids[i].id;
45     return AV_CODEC_ID_NONE;
46 }
47
48 /* We could be given one of the three possible structures here:
49  * WAVEFORMAT, PCMWAVEFORMAT or WAVEFORMATEX. Each structure
50  * is an expansion of the previous one with the fields added
51  * at the bottom. PCMWAVEFORMAT adds 'WORD wBitsPerSample' and
52  * WAVEFORMATEX adds 'WORD  cbSize' and basically makes itself
53  * an openended structure.
54  */
55
56 static void parse_waveformatex(AVIOContext *pb, AVCodecContext *c)
57 {
58     ff_asf_guid subformat;
59     int bps = avio_rl16(pb);
60     if (bps)
61         c->bits_per_coded_sample = bps;
62
63     c->channel_layout        = avio_rl32(pb); /* dwChannelMask */
64
65     ff_get_guid(pb, &subformat);
66     if (!memcmp(subformat + 4,
67                 (const uint8_t[]){ FF_MEDIASUBTYPE_BASE_GUID }, 12)) {
68         c->codec_tag = AV_RL32(subformat);
69         c->codec_id  = ff_wav_codec_get_id(c->codec_tag,
70                                            c->bits_per_coded_sample);
71     } else {
72         c->codec_id = ff_codec_guid_get_id(ff_codec_wav_guids, subformat);
73         if (!c->codec_id)
74             av_log(c, AV_LOG_WARNING,
75                    "unknown subformat:"FF_PRI_GUID"\n",
76                    FF_ARG_GUID(subformat));
77     }
78 }
79
80 int ff_get_wav_header(AVIOContext *pb, AVCodecContext *codec, int size)
81 {
82     int id;
83
84     id                 = avio_rl16(pb);
85     codec->codec_type  = AVMEDIA_TYPE_AUDIO;
86     codec->channels    = avio_rl16(pb);
87     codec->sample_rate = avio_rl32(pb);
88     codec->bit_rate    = avio_rl32(pb) * 8;
89     codec->block_align = avio_rl16(pb);
90     if (size == 14) {  /* We're dealing with plain vanilla WAVEFORMAT */
91         codec->bits_per_coded_sample = 8;
92     } else
93         codec->bits_per_coded_sample = avio_rl16(pb);
94     if (id == 0xFFFE) {
95         codec->codec_tag = 0;
96     } else {
97         codec->codec_tag = id;
98         codec->codec_id  = ff_wav_codec_get_id(id,
99                                                codec->bits_per_coded_sample);
100     }
101     if (size >= 18) {  /* We're obviously dealing with WAVEFORMATEX */
102         int cbSize = avio_rl16(pb); /* cbSize */
103         size  -= 18;
104         cbSize = FFMIN(size, cbSize);
105         if (cbSize >= 22 && id == 0xfffe) { /* WAVEFORMATEXTENSIBLE */
106             parse_waveformatex(pb, codec);
107             cbSize -= 22;
108             size   -= 22;
109         }
110         if (cbSize > 0) {
111             av_free(codec->extradata);
112             if (ff_get_extradata(codec, pb, cbSize) < 0)
113                 return AVERROR(ENOMEM);
114             size -= cbSize;
115         }
116
117         /* It is possible for the chunk to contain garbage at the end */
118         if (size > 0)
119             avio_skip(pb, size);
120     }
121     if (codec->sample_rate <= 0) {
122         av_log(NULL, AV_LOG_ERROR,
123                "Invalid sample rate: %d\n", codec->sample_rate);
124         return AVERROR_INVALIDDATA;
125     }
126     if (codec->codec_id == AV_CODEC_ID_AAC_LATM) {
127         /* Channels and sample_rate values are those prior to applying SBR
128          * and/or PS. */
129         codec->channels    = 0;
130         codec->sample_rate = 0;
131     }
132     /* override bits_per_coded_sample for G.726 */
133     if (codec->codec_id == AV_CODEC_ID_ADPCM_G726 && codec->sample_rate)
134         codec->bits_per_coded_sample = codec->bit_rate / codec->sample_rate;
135
136     return 0;
137 }
138
139 enum AVCodecID ff_wav_codec_get_id(unsigned int tag, int bps)
140 {
141     enum AVCodecID id;
142     id = ff_codec_get_id(ff_codec_wav_tags, tag);
143     if (id <= 0)
144         return id;
145
146     if (id == AV_CODEC_ID_PCM_S16LE)
147         id = ff_get_pcm_codec_id(bps, 0, 0, ~1);
148     else if (id == AV_CODEC_ID_PCM_F32LE)
149         id = ff_get_pcm_codec_id(bps, 1, 0,  0);
150
151     if (id == AV_CODEC_ID_ADPCM_IMA_WAV && bps == 8)
152         id = AV_CODEC_ID_PCM_ZORK;
153     return id;
154 }
155
156 int ff_get_bmp_header(AVIOContext *pb, AVStream *st, unsigned *esize)
157 {
158     int tag1;
159     if(esize) *esize  = avio_rl32(pb);
160     else                avio_rl32(pb);
161     st->codec->width  = avio_rl32(pb);
162     st->codec->height = (int32_t)avio_rl32(pb);
163     avio_rl16(pb); /* planes */
164     st->codec->bits_per_coded_sample = avio_rl16(pb); /* depth */
165     tag1                             = avio_rl32(pb);
166     avio_rl32(pb); /* ImageSize */
167     avio_rl32(pb); /* XPelsPerMeter */
168     avio_rl32(pb); /* YPelsPerMeter */
169     avio_rl32(pb); /* ClrUsed */
170     avio_rl32(pb); /* ClrImportant */
171     return tag1;
172 }
173
174 int ff_read_riff_info(AVFormatContext *s, int64_t size)
175 {
176     int64_t start, end, cur;
177     AVIOContext *pb = s->pb;
178
179     start = avio_tell(pb);
180     end   = start + size;
181
182     while ((cur = avio_tell(pb)) >= 0 &&
183            cur <= end - 8 /* = tag + size */) {
184         uint32_t chunk_code;
185         int64_t chunk_size;
186         char key[5] = { 0 };
187         char *value;
188
189         chunk_code = avio_rl32(pb);
190         chunk_size = avio_rl32(pb);
191         if (url_feof(pb)) {
192             if (chunk_code || chunk_size) {
193                 av_log(s, AV_LOG_WARNING, "INFO subchunk truncated\n");
194                 return AVERROR_INVALIDDATA;
195             }
196             return AVERROR_EOF;
197         }
198         if (chunk_size > end ||
199             end - chunk_size < cur ||
200             chunk_size == UINT_MAX) {
201             avio_seek(pb, -9, SEEK_CUR);
202             chunk_code = avio_rl32(pb);
203             chunk_size = avio_rl32(pb);
204             if (chunk_size > end || end - chunk_size < cur || chunk_size == UINT_MAX) {
205                 av_log(s, AV_LOG_WARNING, "too big INFO subchunk\n");
206                 return AVERROR_INVALIDDATA;
207             }
208         }
209
210         chunk_size += (chunk_size & 1);
211
212         if (!chunk_code) {
213             if (chunk_size)
214                 avio_skip(pb, chunk_size);
215             else if (pb->eof_reached) {
216                 av_log(s, AV_LOG_WARNING, "truncated file\n");
217                 return AVERROR_EOF;
218             }
219             continue;
220         }
221
222         value = av_mallocz(chunk_size + 1);
223         if (!value) {
224             av_log(s, AV_LOG_ERROR,
225                    "out of memory, unable to read INFO tag\n");
226             return AVERROR(ENOMEM);
227         }
228
229         AV_WL32(key, chunk_code);
230
231         if (avio_read(pb, value, chunk_size) != chunk_size) {
232             av_log(s, AV_LOG_WARNING,
233                    "premature end of file while reading INFO tag\n");
234         }
235
236         av_dict_set(&s->metadata, key, value, AV_DICT_DONT_STRDUP_VAL);
237     }
238
239     return 0;
240 }