Merge commit '7f549b8338ed3775fec4bf10421ff5744e5866dd'
[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 int ff_get_guid(AVIOContext *s, ff_asf_guid *g)
33 {
34     int ret;
35     av_assert0(sizeof(*g) == 16); //compiler will optimize this out
36     ret = avio_read(s, *g, sizeof(*g));
37     if (ret < (int)sizeof(*g)) {
38         memset(*g, 0, sizeof(*g));
39         return ret < 0 ? ret : AVERROR_INVALIDDATA;
40     }
41     return 0;
42 }
43
44 enum AVCodecID ff_codec_guid_get_id(const AVCodecGuid *guids, ff_asf_guid guid)
45 {
46     int i;
47     for (i = 0; guids[i].id != AV_CODEC_ID_NONE; i++)
48         if (!ff_guidcmp(guids[i].guid, guid))
49             return guids[i].id;
50     return AV_CODEC_ID_NONE;
51 }
52
53 /* We could be given one of the three possible structures here:
54  * WAVEFORMAT, PCMWAVEFORMAT or WAVEFORMATEX. Each structure
55  * is an expansion of the previous one with the fields added
56  * at the bottom. PCMWAVEFORMAT adds 'WORD wBitsPerSample' and
57  * WAVEFORMATEX adds 'WORD  cbSize' and basically makes itself
58  * an openended structure.
59  */
60
61 static void parse_waveformatex(AVIOContext *pb, AVCodecParameters *par)
62 {
63     ff_asf_guid subformat;
64     int bps;
65
66     bps = avio_rl16(pb);
67     if (bps)
68         par->bits_per_coded_sample = bps;
69     par->channel_layout        = avio_rl32(pb); /* dwChannelMask */
70
71     ff_get_guid(pb, &subformat);
72     if (!memcmp(subformat + 4,
73                 (const uint8_t[]){ FF_AMBISONIC_BASE_GUID }, 12) ||
74         !memcmp(subformat + 4,
75                 (const uint8_t[]){ FF_MEDIASUBTYPE_BASE_GUID }, 12)) {
76         par->codec_tag = AV_RL32(subformat);
77         par->codec_id  = ff_wav_codec_get_id(par->codec_tag,
78                                              par->bits_per_coded_sample);
79     } else {
80         par->codec_id = ff_codec_guid_get_id(ff_codec_wav_guids, subformat);
81         if (!par->codec_id)
82             av_log(pb, AV_LOG_WARNING,
83                    "unknown subformat:"FF_PRI_GUID"\n",
84                    FF_ARG_GUID(subformat));
85     }
86 }
87
88 /* "big_endian" values are needed for RIFX file format */
89 int ff_get_wav_header(AVFormatContext *s, AVIOContext *pb,
90                       AVCodecParameters *par, int size, int big_endian)
91 {
92     int id;
93     uint64_t bitrate = 0;
94
95     if (size < 14) {
96         avpriv_request_sample(s, "wav header size < 14");
97         return AVERROR_INVALIDDATA;
98     }
99
100     par->codec_type  = AVMEDIA_TYPE_AUDIO;
101     if (!big_endian) {
102         id                 = avio_rl16(pb);
103         if (id != 0x0165) {
104             par->channels    = avio_rl16(pb);
105             par->sample_rate = avio_rl32(pb);
106             bitrate            = avio_rl32(pb) * 8LL;
107             par->block_align = avio_rl16(pb);
108         }
109     } else {
110         id                 = avio_rb16(pb);
111         par->channels    = avio_rb16(pb);
112         par->sample_rate = avio_rb32(pb);
113         bitrate            = avio_rb32(pb) * 8LL;
114         par->block_align = avio_rb16(pb);
115     }
116     if (size == 14) {  /* We're dealing with plain vanilla WAVEFORMAT */
117         par->bits_per_coded_sample = 8;
118     } else {
119         if (!big_endian) {
120             par->bits_per_coded_sample = avio_rl16(pb);
121         } else {
122             par->bits_per_coded_sample = avio_rb16(pb);
123         }
124     }
125     if (id == 0xFFFE) {
126         par->codec_tag = 0;
127     } else {
128         par->codec_tag = id;
129         par->codec_id  = ff_wav_codec_get_id(id,
130                                              par->bits_per_coded_sample);
131     }
132     if (size >= 18 && id != 0x0165) {  /* We're obviously dealing with WAVEFORMATEX */
133         int cbSize = avio_rl16(pb); /* cbSize */
134         if (big_endian) {
135             avpriv_report_missing_feature(s, "WAVEFORMATEX support for RIFX files");
136             return AVERROR_PATCHWELCOME;
137         }
138         size  -= 18;
139         cbSize = FFMIN(size, cbSize);
140         if (cbSize >= 22 && id == 0xfffe) { /* WAVEFORMATEXTENSIBLE */
141             parse_waveformatex(pb, par);
142             cbSize -= 22;
143             size   -= 22;
144         }
145         if (cbSize > 0) {
146             av_freep(&par->extradata);
147             if (ff_get_extradata(s, par, pb, cbSize) < 0)
148                 return AVERROR(ENOMEM);
149             size -= cbSize;
150         }
151
152         /* It is possible for the chunk to contain garbage at the end */
153         if (size > 0)
154             avio_skip(pb, size);
155     } else if (id == 0x0165 && size >= 32) {
156         int nb_streams, i;
157
158         size -= 4;
159         av_freep(&par->extradata);
160         if (ff_get_extradata(s, par, pb, size) < 0)
161             return AVERROR(ENOMEM);
162         nb_streams         = AV_RL16(par->extradata + 4);
163         par->sample_rate   = AV_RL32(par->extradata + 12);
164         par->channels      = 0;
165         bitrate            = 0;
166         if (size < 8 + nb_streams * 20)
167             return AVERROR_INVALIDDATA;
168         for (i = 0; i < nb_streams; i++)
169             par->channels += par->extradata[8 + i * 20 + 17];
170     }
171
172     par->bit_rate = bitrate;
173
174     if (par->sample_rate <= 0) {
175         av_log(s, AV_LOG_ERROR,
176                "Invalid sample rate: %d\n", par->sample_rate);
177         return AVERROR_INVALIDDATA;
178     }
179     if (par->codec_id == AV_CODEC_ID_AAC_LATM) {
180         /* Channels and sample_rate values are those prior to applying SBR
181          * and/or PS. */
182         par->channels    = 0;
183         par->sample_rate = 0;
184     }
185     /* override bits_per_coded_sample for G.726 */
186     if (par->codec_id == AV_CODEC_ID_ADPCM_G726 && par->sample_rate)
187         par->bits_per_coded_sample = par->bit_rate / par->sample_rate;
188
189     return 0;
190 }
191
192 enum AVCodecID ff_wav_codec_get_id(unsigned int tag, int bps)
193 {
194     enum AVCodecID id;
195     id = ff_codec_get_id(ff_codec_wav_tags, tag);
196     if (id <= 0)
197         return id;
198
199     if (id == AV_CODEC_ID_PCM_S16LE)
200         id = ff_get_pcm_codec_id(bps, 0, 0, ~1);
201     else if (id == AV_CODEC_ID_PCM_F32LE)
202         id = ff_get_pcm_codec_id(bps, 1, 0,  0);
203
204     if (id == AV_CODEC_ID_ADPCM_IMA_WAV && bps == 8)
205         id = AV_CODEC_ID_PCM_ZORK;
206     return id;
207 }
208
209 int ff_get_bmp_header(AVIOContext *pb, AVStream *st, unsigned *esize)
210 {
211     int tag1;
212     if(esize) *esize  = avio_rl32(pb);
213     else                avio_rl32(pb);
214     st->codecpar->width  = avio_rl32(pb);
215     st->codecpar->height = (int32_t)avio_rl32(pb);
216     avio_rl16(pb); /* planes */
217     st->codecpar->bits_per_coded_sample = avio_rl16(pb); /* depth */
218     tag1                                = avio_rl32(pb);
219     avio_rl32(pb); /* ImageSize */
220     avio_rl32(pb); /* XPelsPerMeter */
221     avio_rl32(pb); /* YPelsPerMeter */
222     avio_rl32(pb); /* ClrUsed */
223     avio_rl32(pb); /* ClrImportant */
224     return tag1;
225 }
226
227 int ff_read_riff_info(AVFormatContext *s, int64_t size)
228 {
229     int64_t start, end, cur;
230     AVIOContext *pb = s->pb;
231
232     start = avio_tell(pb);
233     end   = start + size;
234
235     while ((cur = avio_tell(pb)) >= 0 &&
236            cur <= end - 8 /* = tag + size */) {
237         uint32_t chunk_code;
238         int64_t chunk_size;
239         char key[5] = { 0 };
240         char *value;
241
242         chunk_code = avio_rl32(pb);
243         chunk_size = avio_rl32(pb);
244         if (avio_feof(pb)) {
245             if (chunk_code || chunk_size) {
246                 av_log(s, AV_LOG_WARNING, "INFO subchunk truncated\n");
247                 return AVERROR_INVALIDDATA;
248             }
249             return AVERROR_EOF;
250         }
251         if (chunk_size > end ||
252             end - chunk_size < cur ||
253             chunk_size == UINT_MAX) {
254             avio_seek(pb, -9, SEEK_CUR);
255             chunk_code = avio_rl32(pb);
256             chunk_size = avio_rl32(pb);
257             if (chunk_size > end || end - chunk_size < cur || chunk_size == UINT_MAX) {
258                 av_log(s, AV_LOG_WARNING, "too big INFO subchunk\n");
259                 return AVERROR_INVALIDDATA;
260             }
261         }
262
263         chunk_size += (chunk_size & 1);
264
265         if (!chunk_code) {
266             if (chunk_size)
267                 avio_skip(pb, chunk_size);
268             else if (pb->eof_reached) {
269                 av_log(s, AV_LOG_WARNING, "truncated file\n");
270                 return AVERROR_EOF;
271             }
272             continue;
273         }
274
275         value = av_mallocz(chunk_size + 1);
276         if (!value) {
277             av_log(s, AV_LOG_ERROR,
278                    "out of memory, unable to read INFO tag\n");
279             return AVERROR(ENOMEM);
280         }
281
282         AV_WL32(key, chunk_code);
283         // Work around VC++ 2015 Update 1 code-gen bug:
284         // https://connect.microsoft.com/VisualStudio/feedback/details/2291638
285         key[4] = 0;
286
287         if (avio_read(pb, value, chunk_size) != chunk_size) {
288             av_log(s, AV_LOG_WARNING,
289                    "premature end of file while reading INFO tag\n");
290         }
291
292         av_dict_set(&s->metadata, key, value, AV_DICT_DONT_STRDUP_VAL);
293     }
294
295     return 0;
296 }