877b1a9a8a606be5432e6ad1e31c5c756e182b83
[libav.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 #include "avformat.h"
27 #include "bitstream.h"
28 #include "bswap.h"
29 #include "ogg2.h"
30
31 extern int
32 vorbis_comment (AVFormatContext * as, char *buf, int size)
33 {
34 char *p = buf;
35 int s, n, j;
36
37 if (size < 4)
38 return -1;
39
40 s = le2me_32 (unaligned32 (p));
41 p += 4;
42 size -= 4;
43
44 if (size < s + 4)
45 return -1;
46
47 p += s;
48 size -= s;
49
50 n = le2me_32 (unaligned32 (p));
51 p += 4;
52 size -= 4;
53
54 while (size >= 4){
55 char *t, *v;
56 int tl, vl;
57
58 s = le2me_32 (unaligned32 (p));
59 p += 4;
60 size -= 4;
61
62 if (size < s)
63 break;
64
65 t = p;
66 p += s;
67 size -= s;
68 n--;
69
70 v = memchr (t, '=', s);
71 if (!v)
72 continue;
73
74 tl = v - t;
75 vl = s - tl - 1;
76 v++;
77
78 if (tl && vl){
79 char tt[tl + 1];
80 char ct[vl + 1];
81
82 for (j = 0; j < tl; j++)
83 tt[j] = toupper (t[j]);
84 tt[tl] = 0;
85
86 memcpy (ct, v, vl);
87 ct[vl] = 0;
88
89 // took from Vorbis_I_spec
90 if (!strcmp (tt, "AUTHOR"))
91 strncpy (as->author, ct, FFMIN(sizeof (as->author), vl));
92 else if (!strcmp (tt, "TITLE"))
93 strncpy (as->title, ct, FFMIN(sizeof (as->title), vl));
94 else if (!strcmp (tt, "COPYRIGHT"))
95 strncpy (as->copyright, ct, FFMIN(sizeof (as->copyright), vl));
96 else if (!strcmp (tt, "DESCRIPTION"))
97 strncpy (as->comment, ct, FFMIN(sizeof (as->comment), vl));
98 else if (!strcmp (tt, "GENRE"))
99 strncpy (as->genre, ct, FFMIN(sizeof (as->genre), vl));
100 else if (!strcmp (tt, "TRACKNUMBER"))
101 as->track = atoi (ct);
102 //Too bored to add others for today
103 }
104 }
105
106 if (size > 0)
107 av_log (as, AV_LOG_INFO, "%i bytes of comment header remain\n", size);
108 if (n > 0)
109 av_log (as, AV_LOG_INFO,
110 "truncated comment header, %i comments not found\n", n);
111
112 return 0;
113 }
114
115
116 /** Parse the vorbis header
117 * Vorbis Identification header from Vorbis_I_spec.html#vorbis-spec-codec
118 * [vorbis_version] = read 32 bits as unsigned integer | Not used
119 * [audio_channels] = read 8 bit integer as unsigned | Used
120 * [audio_sample_rate] = read 32 bits as unsigned integer | Used
121 * [bitrate_maximum] = read 32 bits as signed integer | Not used yet
122 * [bitrate_nominal] = read 32 bits as signed integer | Not used yet
123 * [bitrate_minimum] = read 32 bits as signed integer | Used as bitrate
124 * [blocksize_0] = read 4 bits as unsigned integer | Not Used
125 * [blocksize_1] = read 4 bits as unsigned integer | Not Used
126 * [framing_flag] = read one bit | Not Used
127 * */
128
129 typedef struct {
130 unsigned int len[3];
131 unsigned char *packet[3];
132 } oggvorbis_private_t;
133
134
135 static unsigned int
136 fixup_vorbis_headers(AVFormatContext * as, oggvorbis_private_t *priv,
137 void **buf)
138 {
139 int i,offset, len;
140 unsigned char *ptr;
141
142 len = priv->len[0] + priv->len[1] + priv->len[2];
143 ptr = *buf = av_mallocz(len + len/255 + 64);
144
145 ptr[0] = 2;
146 offset = 1;
147 offset += av_xiphlacing(&ptr[offset], priv->len[0]);
148 offset += av_xiphlacing(&ptr[offset], priv->len[1]);
149 for(i = 0; i < 3; i++) {
150 memcpy(&ptr[offset], priv->packet[i], priv->len[i]);
151 offset += priv->len[i];
152 }
153 *buf = av_realloc(*buf, offset);
154 return offset;
155 }
156
157
158 static int
159 vorbis_header (AVFormatContext * s, int idx)
160 {
161 ogg_t *ogg = s->priv_data;
162 ogg_stream_t *os = ogg->streams + idx;
163 AVStream *st = s->streams[idx];
164 oggvorbis_private_t *priv;
165
166 if (os->seq > 2)
167 return 0;
168
169 if(os->seq == 0) {
170 os->private = av_mallocz(sizeof(oggvorbis_private_t));
171 if(!os->private)
172 return 0;
173 }
174
175 priv = os->private;
176 priv->len[os->seq] = os->psize;
177 priv->packet[os->seq] = av_mallocz(os->psize);
178 memcpy(priv->packet[os->seq], os->buf + os->pstart, os->psize);
179 if (os->buf[os->pstart] == 1) {
180 uint8_t *p = os->buf + os->pstart + 11; //skip up to the audio channels
181 st->codec.channels = *p++;
182 st->codec.sample_rate = le2me_32 (unaligned32 (p));
183 p += 8; //skip maximum and and nominal bitrate
184 st->codec.bit_rate = le2me_32 (unaligned32 (p)); //Minimum bitrate
185
186 st->codec.codec_type = CODEC_TYPE_AUDIO;
187 st->codec.codec_id = CODEC_ID_VORBIS;
188
189 } else if (os->buf[os->pstart] == 3) {
190 vorbis_comment (s, os->buf + os->pstart + 7, os->psize - 8);
191 } else {
192 st->codec.extradata_size =
193 fixup_vorbis_headers(s, priv, &st->codec.extradata);
194 }
195
196 return os->seq < 3;
197 }
198
199 ogg_codec_t vorbis_codec = {
200 .magic = "\001vorbis",
201 .magicsize = 7,
202 .header = vorbis_header
203 };