oggparsevorbis: check allocations
[ffmpeg.git] / libavformat / oggparsevorbis.c
1 /*
2  * Copyright (C) 2005  Michael Ahlberg, Måns Rullgård
3  *
4  * Permission is hereby granted, free of charge, to any person
5  * obtaining a copy of this software and associated documentation
6  * files (the "Software"), to deal in the Software without
7  * restriction, including without limitation the rights to use, copy,
8  * modify, merge, publish, distribute, sublicense, and/or sell copies
9  * of the Software, and to permit persons to whom the Software is
10  * furnished to do so, subject to the following conditions:
11  *
12  *  The above copyright notice and this permission notice shall be
13  *  included in all copies or substantial portions of the Software.
14  *
15  *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
16  *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
17  *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
18  *  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
19  *  HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
20  *  WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21  *  OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22  *  DEALINGS IN THE SOFTWARE.
23  */
24
25 #include <stdlib.h>
26
27 #include "libavutil/avstring.h"
28 #include "libavutil/bswap.h"
29 #include "libavutil/dict.h"
30 #include "libavcodec/bytestream.h"
31 #include "libavcodec/get_bits.h"
32 #include "libavcodec/vorbis_parser.h"
33 #include "avformat.h"
34 #include "internal.h"
35 #include "oggdec.h"
36 #include "vorbiscomment.h"
37
38 static int ogm_chapter(AVFormatContext *as, uint8_t *key, uint8_t *val)
39 {
40     int i, cnum, h, m, s, ms, keylen = strlen(key);
41     AVChapter *chapter = NULL;
42
43     if (keylen < 9 || sscanf(key, "CHAPTER%03d", &cnum) != 1)
44         return 0;
45
46     if (keylen <= 10) {
47         if (sscanf(val, "%02d:%02d:%02d.%03d", &h, &m, &s, &ms) < 4)
48             return 0;
49
50         avpriv_new_chapter(as, cnum, (AVRational) { 1, 1000 },
51                            ms + 1000 * (s + 60 * (m + 60 * h)),
52                            AV_NOPTS_VALUE, NULL);
53         av_free(val);
54     } else if (!strcmp(key + keylen - 4, "NAME")) {
55         for (i = 0; i < as->nb_chapters; i++)
56             if (as->chapters[i]->id == cnum) {
57                 chapter = as->chapters[i];
58                 break;
59             }
60         if (!chapter)
61             return 0;
62
63         av_dict_set(&chapter->metadata, "title", val, AV_DICT_DONT_STRDUP_VAL);
64     } else
65         return 0;
66
67     av_free(key);
68     return 1;
69 }
70
71 int ff_vorbis_comment(AVFormatContext *as, AVDictionary **m,
72                       const uint8_t *buf, int size)
73 {
74     const uint8_t *p   = buf;
75     const uint8_t *end = buf + size;
76     unsigned n, j;
77     int s;
78
79     /* must have vendor_length and user_comment_list_length */
80     if (size < 8)
81         return AVERROR_INVALIDDATA;
82
83     s = bytestream_get_le32(&p);
84
85     if (end - p - 4 < s || s < 0)
86         return AVERROR_INVALIDDATA;
87
88     p += s;
89
90     n = bytestream_get_le32(&p);
91
92     while (end - p >= 4 && n > 0) {
93         const char *t, *v;
94         int tl, vl;
95
96         s = bytestream_get_le32(&p);
97
98         if (end - p < s || s < 0)
99             break;
100
101         t  = p;
102         p += s;
103         n--;
104
105         v = memchr(t, '=', s);
106         if (!v)
107             continue;
108
109         tl = v - t;
110         vl = s - tl - 1;
111         v++;
112
113         if (tl && vl) {
114             char *tt, *ct;
115
116             tt = av_malloc(tl + 1);
117             ct = av_malloc(vl + 1);
118             if (!tt || !ct) {
119                 av_freep(&tt);
120                 av_freep(&ct);
121                 av_log(as, AV_LOG_WARNING,
122                        "out-of-memory error. skipping VorbisComment tag.\n");
123                 continue;
124             }
125
126             for (j = 0; j < tl; j++)
127                 tt[j] = av_toupper(t[j]);
128             tt[tl] = 0;
129
130             memcpy(ct, v, vl);
131             ct[vl] = 0;
132
133             if (!ogm_chapter(as, tt, ct))
134                 av_dict_set(m, tt, ct,
135                             AV_DICT_DONT_STRDUP_KEY |
136                             AV_DICT_DONT_STRDUP_VAL);
137         }
138     }
139
140     if (p != end)
141         av_log(as, AV_LOG_INFO,
142                "%ti bytes of comment header remain\n", end - p);
143     if (n > 0)
144         av_log(as, AV_LOG_INFO,
145                "truncated comment header, %i comments not found\n", n);
146
147     ff_metadata_conv(m, NULL, ff_vorbiscomment_metadata_conv);
148
149     return 0;
150 }
151
152 /*
153  * Parse the vorbis header
154  *
155  * Vorbis Identification header from Vorbis_I_spec.html#vorbis-spec-codec
156  * [vorbis_version] = read 32 bits as unsigned integer | Not used
157  * [audio_channels] = read 8 bit integer as unsigned | Used
158  * [audio_sample_rate] = read 32 bits as unsigned integer | Used
159  * [bitrate_maximum] = read 32 bits as signed integer | Not used yet
160  * [bitrate_nominal] = read 32 bits as signed integer | Not used yet
161  * [bitrate_minimum] = read 32 bits as signed integer | Used as bitrate
162  * [blocksize_0] = read 4 bits as unsigned integer | Not Used
163  * [blocksize_1] = read 4 bits as unsigned integer | Not Used
164  * [framing_flag] = read one bit | Not Used
165  */
166
167 struct oggvorbis_private {
168     unsigned int len[3];
169     unsigned char *packet[3];
170     VorbisParseContext vp;
171     int64_t final_pts;
172     int final_duration;
173 };
174
175 static int fixup_vorbis_headers(AVFormatContext *as,
176                                 struct oggvorbis_private *priv,
177                                 uint8_t **buf)
178 {
179     int i, offset, len, err;
180     unsigned char *ptr;
181
182     len = priv->len[0] + priv->len[1] + priv->len[2];
183     ptr = *buf = av_mallocz(len + len / 255 + 64);
184     if (!ptr)
185         return AVERROR(ENOMEM);
186
187     ptr[0]  = 2;
188     offset  = 1;
189     offset += av_xiphlacing(&ptr[offset], priv->len[0]);
190     offset += av_xiphlacing(&ptr[offset], priv->len[1]);
191     for (i = 0; i < 3; i++) {
192         memcpy(&ptr[offset], priv->packet[i], priv->len[i]);
193         offset += priv->len[i];
194         av_freep(&priv->packet[i]);
195     }
196     if ((err = av_reallocp(buf, offset + FF_INPUT_BUFFER_PADDING_SIZE)) < 0)
197         return err;
198     return offset;
199 }
200
201 static void vorbis_cleanup(AVFormatContext *s, int idx)
202 {
203     struct ogg *ogg = s->priv_data;
204     struct ogg_stream *os = ogg->streams + idx;
205     struct oggvorbis_private *priv = os->private;
206     int i;
207     if (os->private)
208         for (i = 0; i < 3; i++)
209             av_freep(&priv->packet[i]);
210 }
211
212 static int vorbis_header(AVFormatContext *s, int idx)
213 {
214     struct ogg *ogg = s->priv_data;
215     AVStream *st    = s->streams[idx];
216     struct ogg_stream *os = ogg->streams + idx;
217     struct oggvorbis_private *priv;
218     int pkt_type = os->buf[os->pstart];
219
220     if (!os->private) {
221         os->private = av_mallocz(sizeof(struct oggvorbis_private));
222         if (!os->private)
223             return AVERROR(ENOMEM);
224     }
225
226     if (!(pkt_type & 1))
227         return 0;
228
229     if (os->psize < 1 || pkt_type > 5)
230         return AVERROR_INVALIDDATA;
231
232     priv = os->private;
233
234     if (priv->packet[pkt_type >> 1])
235         return AVERROR_INVALIDDATA;
236     if (pkt_type > 1 && !priv->packet[0] || pkt_type > 3 && !priv->packet[1])
237         return AVERROR_INVALIDDATA;
238
239     priv->len[pkt_type >> 1]    = os->psize;
240     priv->packet[pkt_type >> 1] = av_mallocz(os->psize);
241     if (!priv->packet[pkt_type >> 1])
242         return AVERROR(ENOMEM);
243     memcpy(priv->packet[pkt_type >> 1], os->buf + os->pstart, os->psize);
244     if (os->buf[os->pstart] == 1) {
245         const uint8_t *p = os->buf + os->pstart + 7; /* skip "\001vorbis" tag */
246         unsigned blocksize, bs0, bs1;
247         int srate;
248
249         if (os->psize != 30)
250             return AVERROR_INVALIDDATA;
251
252         if (bytestream_get_le32(&p) != 0) /* vorbis_version */
253             return AVERROR_INVALIDDATA;
254
255         st->codec->channels = bytestream_get_byte(&p);
256         srate               = bytestream_get_le32(&p);
257         p += 4; // skip maximum bitrate
258         st->codec->bit_rate = bytestream_get_le32(&p); // nominal bitrate
259         p += 4; // skip minimum bitrate
260
261         blocksize = bytestream_get_byte(&p);
262         bs0       = blocksize & 15;
263         bs1       = blocksize >> 4;
264
265         if (bs0 > bs1)
266             return AVERROR_INVALIDDATA;
267         if (bs0 < 6 || bs1 > 13)
268             return AVERROR_INVALIDDATA;
269
270         if (bytestream_get_byte(&p) != 1) /* framing_flag */
271             return AVERROR_INVALIDDATA;
272
273         st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
274         st->codec->codec_id   = AV_CODEC_ID_VORBIS;
275
276         if (srate > 0) {
277             st->codec->sample_rate = srate;
278             avpriv_set_pts_info(st, 64, 1, srate);
279         }
280     } else if (os->buf[os->pstart] == 3) {
281         if (os->psize > 8 &&
282             ff_vorbis_comment(s, &st->metadata, os->buf + os->pstart + 7,
283                               os->psize - 8) >= 0) {
284             // drop all metadata we parsed and which is not required by libvorbis
285             unsigned new_len = 7 + 4 + AV_RL32(priv->packet[1] + 7) + 4 + 1;
286             if (new_len >= 16 && new_len < os->psize) {
287                 AV_WL32(priv->packet[1] + new_len - 5, 0);
288                 priv->packet[1][new_len - 1] = 1;
289                 priv->len[1]                 = new_len;
290             }
291         }
292     } else {
293         int ret = fixup_vorbis_headers(s, priv, &st->codec->extradata);
294         if (ret < 0) {
295             st->codec->extradata_size = 0;
296             return ret;
297         }
298         st->codec->extradata_size = ret;
299         if ((ret = avpriv_vorbis_parse_extradata(st->codec, &priv->vp))) {
300             av_freep(&st->codec->extradata);
301             st->codec->extradata_size = 0;
302             return ret;
303         }
304     }
305
306     return 1;
307 }
308
309 static int vorbis_packet(AVFormatContext *s, int idx)
310 {
311     struct ogg *ogg = s->priv_data;
312     struct ogg_stream *os = ogg->streams + idx;
313     struct oggvorbis_private *priv = os->private;
314     int duration;
315
316     /* first packet handling
317      * here we parse the duration of each packet in the first page and compare
318      * the total duration to the page granule to find the encoder delay and
319      * set the first timestamp */
320     if (!os->lastpts) {
321         int seg;
322         uint8_t *last_pkt  = os->buf + os->pstart;
323         uint8_t *next_pkt  = last_pkt;
324         int first_duration = 0;
325
326         avpriv_vorbis_parse_reset(&priv->vp);
327         duration = 0;
328         for (seg = 0; seg < os->nsegs; seg++) {
329             if (os->segments[seg] < 255) {
330                 int d = avpriv_vorbis_parse_frame(&priv->vp, last_pkt, 1);
331                 if (d < 0) {
332                     duration = os->granule;
333                     break;
334                 }
335                 if (!duration)
336                     first_duration = d;
337                 duration += d;
338                 last_pkt  = next_pkt + os->segments[seg];
339             }
340             next_pkt += os->segments[seg];
341         }
342         os->lastpts                 =
343         os->lastdts                 = os->granule - duration;
344         s->streams[idx]->start_time = os->lastpts + first_duration;
345         if (s->streams[idx]->duration)
346             s->streams[idx]->duration -= s->streams[idx]->start_time;
347         s->streams[idx]->cur_dts = AV_NOPTS_VALUE;
348         priv->final_pts          = AV_NOPTS_VALUE;
349         avpriv_vorbis_parse_reset(&priv->vp);
350     }
351
352     /* parse packet duration */
353     if (os->psize > 0) {
354         duration = avpriv_vorbis_parse_frame(&priv->vp, os->buf + os->pstart, 1);
355         if (duration <= 0) {
356             os->pflags |= AV_PKT_FLAG_CORRUPT;
357             return 0;
358         }
359         os->pduration = duration;
360     }
361
362     /* final packet handling
363      * here we save the pts of the first packet in the final page, sum up all
364      * packet durations in the final page except for the last one, and compare
365      * to the page granule to find the duration of the final packet */
366     if (os->flags & OGG_FLAG_EOS) {
367         if (os->lastpts != AV_NOPTS_VALUE) {
368             priv->final_pts      = os->lastpts;
369             priv->final_duration = 0;
370         }
371         if (os->segp == os->nsegs)
372             os->pduration = os->granule - priv->final_pts - priv->final_duration;
373         priv->final_duration += os->pduration;
374     }
375
376     return 0;
377 }
378
379 const struct ogg_codec ff_vorbis_codec = {
380     .magic     = "\001vorbis",
381     .magicsize = 7,
382     .header    = vorbis_header,
383     .packet    = vorbis_packet,
384     .cleanup   = vorbis_cleanup,
385     .nb_header = 3,
386 };