Mercurial > libavformat.hg
annotate mpc8.c @ 5208:af13c900ff26 libavformat
Make MPC SV8 probe skip tags until stream header is found
author | kostya |
---|---|
date | Wed, 16 Sep 2009 18:05:21 +0000 |
parents | 9dea59f5436a |
children | 2b52ec1e8619 |
rev | line source |
---|---|
2709 | 1 /* |
2 * Musepack SV8 demuxer | |
3 * Copyright (c) 2007 Konstantin Shishkov | |
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 */ | |
3286 | 21 |
4872 | 22 #include "libavcodec/get_bits.h" |
3286 | 23 #include "libavcodec/unary.h" |
2709 | 24 #include "avformat.h" |
25 | |
26 /// Two-byte MPC tag | |
27 #define MKMPCTAG(a, b) (a | (b << 8)) | |
28 | |
29 #define TAG_MPCK MKTAG('M','P','C','K') | |
30 | |
31 /// Reserved MPC tags | |
32 enum MPCPacketTags{ | |
33 TAG_STREAMHDR = MKMPCTAG('S','H'), | |
34 TAG_STREAMEND = MKMPCTAG('S','E'), | |
35 | |
36 TAG_AUDIOPACKET = MKMPCTAG('A','P'), | |
37 | |
38 TAG_SEEKTBLOFF = MKMPCTAG('S','O'), | |
39 TAG_SEEKTABLE = MKMPCTAG('S','T'), | |
40 | |
41 TAG_REPLAYGAIN = MKMPCTAG('R','G'), | |
42 TAG_ENCINFO = MKMPCTAG('E','I'), | |
43 }; | |
44 | |
45 static const int mpc8_rate[8] = { 44100, 48000, 37800, 32000, -1, -1, -1, -1 }; | |
46 | |
47 typedef struct { | |
48 int ver; | |
49 int frame; | |
50 int64_t header_pos; | |
51 int64_t samples; | |
52 } MPCContext; | |
53 | |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
54 static inline int64_t bs_get_v(uint8_t **bs) |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
55 { |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
56 int64_t v = 0; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
57 int br = 0; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
58 int c; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
59 |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
60 do { |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
61 c = **bs; (*bs)++; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
62 v <<= 7; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
63 v |= c & 0x7F; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
64 br++; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
65 if (br > 10) |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
66 return -1; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
67 } while (c & 0x80); |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
68 |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
69 return v - br; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
70 } |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
71 |
2709 | 72 static int mpc8_probe(AVProbeData *p) |
73 { | |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
74 uint8_t *bs = p->buf + 4; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
75 uint8_t *bs_end = bs + p->buf_size; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
76 int64_t size; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
77 |
5204 | 78 if (p->buf_size < 16) |
79 return 0; | |
80 if (AV_RL32(p->buf) != TAG_MPCK) | |
81 return 0; | |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
82 while (bs < bs_end + 3) { |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
83 int header_found = (bs[0] == 'S' && bs[1] == 'H'); |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
84 if (bs[0] < 'A' || bs[0] > 'Z' || bs[1] < 'A' || bs[1] > 'Z') |
5204 | 85 return 0; |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
86 bs += 2; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
87 size = bs_get_v(&bs); |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
88 if (size < 2) |
5204 | 89 return 0; |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
90 if (bs + size - 2 >= bs_end) |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
91 return AVPROBE_SCORE_MAX / 4 - 1; //seems to be valid MPC but no header yet |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
92 if (header_found) { |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
93 |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
94 if (size < 11 || size > 28) |
5204 | 95 return 0; |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
96 if (!AV_RL32(bs)) //zero CRC is invalid |
5204 | 97 return 0; |
2709 | 98 return AVPROBE_SCORE_MAX; |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
99 } else { |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
100 bs += size - 2; |
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
101 } |
5204 | 102 } |
5208
af13c900ff26
Make MPC SV8 probe skip tags until stream header is found
kostya
parents:
5204
diff
changeset
|
103 return 0; |
2709 | 104 } |
105 | |
106 static inline int64_t gb_get_v(GetBitContext *gb) | |
107 { | |
108 int64_t v = 0; | |
109 int bits = 0; | |
110 while(get_bits1(gb) && bits < 64-7){ | |
111 v <<= 7; | |
112 v |= get_bits(gb, 7); | |
113 bits += 7; | |
114 } | |
115 v <<= 7; | |
116 v |= get_bits(gb, 7); | |
117 | |
118 return v; | |
119 } | |
120 | |
121 static void mpc8_get_chunk_header(ByteIOContext *pb, int *tag, int64_t *size) | |
122 { | |
123 int64_t pos; | |
124 pos = url_ftell(pb); | |
125 *tag = get_le16(pb); | |
126 *size = ff_get_v(pb); | |
127 *size -= url_ftell(pb) - pos; | |
128 } | |
129 | |
130 static void mpc8_parse_seektable(AVFormatContext *s, int64_t off) | |
131 { | |
132 MPCContext *c = s->priv_data; | |
133 int tag; | |
134 int64_t size, pos, ppos[2]; | |
135 uint8_t *buf; | |
136 int i, t, seekd; | |
137 GetBitContext gb; | |
138 | |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
139 url_fseek(s->pb, off, SEEK_SET); |
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
140 mpc8_get_chunk_header(s->pb, &tag, &size); |
2709 | 141 if(tag != TAG_SEEKTABLE){ |
142 av_log(s, AV_LOG_ERROR, "No seek table at given position\n"); | |
143 return; | |
144 } | |
5030
06903f8f7247
Allocate a bit more memory for MPC SV8 seek table, so bitreader won't read
kostya
parents:
4872
diff
changeset
|
145 if(!(buf = av_malloc(size + FF_INPUT_BUFFER_PADDING_SIZE))) |
2709 | 146 return; |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
147 get_buffer(s->pb, buf, size); |
2709 | 148 init_get_bits(&gb, buf, size * 8); |
149 size = gb_get_v(&gb); | |
150 if(size > UINT_MAX/4 || size > c->samples/1152){ | |
151 av_log(s, AV_LOG_ERROR, "Seek table is too big\n"); | |
152 return; | |
153 } | |
154 seekd = get_bits(&gb, 4); | |
155 for(i = 0; i < 2; i++){ | |
156 pos = gb_get_v(&gb) + c->header_pos; | |
157 ppos[1 - i] = pos; | |
158 av_add_index_entry(s->streams[0], pos, i, 0, 0, AVINDEX_KEYFRAME); | |
159 } | |
160 for(; i < size; i++){ | |
161 t = get_unary(&gb, 1, 33) << 12; | |
162 t += get_bits(&gb, 12); | |
163 if(t & 1) | |
164 t = -(t & ~1); | |
165 pos = (t >> 1) + ppos[0]*2 - ppos[1]; | |
166 av_add_index_entry(s->streams[0], pos, i << seekd, 0, 0, AVINDEX_KEYFRAME); | |
167 ppos[1] = ppos[0]; | |
168 ppos[0] = pos; | |
169 } | |
170 av_free(buf); | |
171 } | |
172 | |
173 static void mpc8_handle_chunk(AVFormatContext *s, int tag, int64_t chunk_pos, int64_t size) | |
174 { | |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
175 ByteIOContext *pb = s->pb; |
2709 | 176 int64_t pos, off; |
177 | |
178 switch(tag){ | |
179 case TAG_SEEKTBLOFF: | |
180 pos = url_ftell(pb) + size; | |
181 off = ff_get_v(pb); | |
182 mpc8_parse_seektable(s, chunk_pos + off); | |
183 url_fseek(pb, pos, SEEK_SET); | |
184 break; | |
185 default: | |
186 url_fskip(pb, size); | |
187 } | |
188 } | |
189 | |
190 static int mpc8_read_header(AVFormatContext *s, AVFormatParameters *ap) | |
191 { | |
192 MPCContext *c = s->priv_data; | |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
193 ByteIOContext *pb = s->pb; |
2709 | 194 AVStream *st; |
195 int tag = 0; | |
196 int64_t size, pos; | |
197 | |
198 c->header_pos = url_ftell(pb); | |
199 if(get_le32(pb) != TAG_MPCK){ | |
200 av_log(s, AV_LOG_ERROR, "Not a Musepack8 file\n"); | |
201 return -1; | |
202 } | |
203 | |
204 while(!url_feof(pb)){ | |
205 pos = url_ftell(pb); | |
206 mpc8_get_chunk_header(pb, &tag, &size); | |
207 if(tag == TAG_STREAMHDR) | |
208 break; | |
209 mpc8_handle_chunk(s, tag, pos, size); | |
210 } | |
211 if(tag != TAG_STREAMHDR){ | |
212 av_log(s, AV_LOG_ERROR, "Stream header not found\n"); | |
213 return -1; | |
214 } | |
215 pos = url_ftell(pb); | |
216 url_fskip(pb, 4); //CRC | |
217 c->ver = get_byte(pb); | |
218 if(c->ver != 8){ | |
219 av_log(s, AV_LOG_ERROR, "Unknown stream version %d\n", c->ver); | |
220 return -1; | |
221 } | |
222 c->samples = ff_get_v(pb); | |
223 ff_get_v(pb); //silence samples at the beginning | |
224 | |
225 st = av_new_stream(s, 0); | |
226 if (!st) | |
227 return AVERROR(ENOMEM); | |
228 st->codec->codec_type = CODEC_TYPE_AUDIO; | |
229 st->codec->codec_id = CODEC_ID_MUSEPACK8; | |
3908
1d3d17de20ba
Bump Major version, this commit is almost just renaming bits_per_sample to
michael
parents:
3424
diff
changeset
|
230 st->codec->bits_per_coded_sample = 16; |
2709 | 231 |
232 st->codec->extradata_size = 2; | |
233 st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE); | |
234 get_buffer(pb, st->codec->extradata, st->codec->extradata_size); | |
235 | |
236 st->codec->channels = (st->codec->extradata[1] >> 4) + 1; | |
237 st->codec->sample_rate = mpc8_rate[st->codec->extradata[0] >> 5]; | |
238 av_set_pts_info(st, 32, 1152 << (st->codec->extradata[1]&3)*2, st->codec->sample_rate); | |
239 st->duration = c->samples / (1152 << (st->codec->extradata[1]&3)*2); | |
240 size -= url_ftell(pb) - pos; | |
241 | |
242 return 0; | |
243 } | |
244 | |
245 static int mpc8_read_packet(AVFormatContext *s, AVPacket *pkt) | |
246 { | |
247 MPCContext *c = s->priv_data; | |
248 int tag; | |
249 int64_t pos, size; | |
250 | |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
251 while(!url_feof(s->pb)){ |
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
252 pos = url_ftell(s->pb); |
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
253 mpc8_get_chunk_header(s->pb, &tag, &size); |
2709 | 254 if(tag == TAG_AUDIOPACKET){ |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
255 if(av_get_packet(s->pb, pkt, size) < 0) |
2709 | 256 return AVERROR(ENOMEM); |
257 pkt->stream_index = 0; | |
258 pkt->pts = c->frame; | |
259 return 0; | |
260 } | |
261 if(tag == TAG_STREAMEND) | |
262 return AVERROR(EIO); | |
263 mpc8_handle_chunk(s, tag, pos, size); | |
264 } | |
265 return 0; | |
266 } | |
267 | |
268 static int mpc8_read_seek(AVFormatContext *s, int stream_index, int64_t timestamp, int flags) | |
269 { | |
270 AVStream *st = s->streams[stream_index]; | |
271 MPCContext *c = s->priv_data; | |
272 int index = av_index_search_timestamp(st, timestamp, flags); | |
273 | |
274 if(index < 0) return -1; | |
2771
d52c718e83f9
Use dynamically allocated ByteIOContext in AVFormatContext
andoma
parents:
2709
diff
changeset
|
275 url_fseek(s->pb, st->index_entries[index].pos, SEEK_SET); |
2709 | 276 c->frame = st->index_entries[index].timestamp; |
277 return 0; | |
278 } | |
279 | |
280 | |
281 AVInputFormat mpc8_demuxer = { | |
282 "mpc8", | |
3424
7a0230981402
Make long_names in lavf/lavdev optional depending on CONFIG_SMALL.
diego
parents:
3286
diff
changeset
|
283 NULL_IF_CONFIG_SMALL("Musepack SV8"), |
2709 | 284 sizeof(MPCContext), |
285 mpc8_probe, | |
286 mpc8_read_header, | |
287 mpc8_read_packet, | |
288 NULL, | |
289 mpc8_read_seek, | |
290 }; |