]> git.sesse.net Git - ffmpeg/blob - libavformat/takdec.c
6d18b6af21d2c44a29dcbf4f81509ea808e5ac01
[ffmpeg] / libavformat / takdec.c
1 /*
2  * Raw TAK demuxer
3  * Copyright (c) 2012 Paul B Mahol
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/crc.h"
23
24 #define BITSTREAM_READER_LE
25 #include "libavcodec/tak.h"
26
27 #include "apetag.h"
28 #include "avformat.h"
29 #include "avio_internal.h"
30 #include "internal.h"
31 #include "rawdec.h"
32
33 typedef struct TAKDemuxContext {
34     AVClass *class;
35     int     raw_packet_size;
36     int     mlast_frame;
37     int64_t data_end;
38 } TAKDemuxContext;
39
40 static int tak_probe(const AVProbeData *p)
41 {
42     if (!memcmp(p->buf, "tBaK", 4))
43         return AVPROBE_SCORE_EXTENSION;
44     return 0;
45 }
46
47 static unsigned long tak_check_crc(unsigned long checksum, const uint8_t *buf,
48                                    unsigned int len)
49 {
50     return av_crc(av_crc_get_table(AV_CRC_24_IEEE), checksum, buf, len);
51 }
52
53 static int tak_read_header(AVFormatContext *s)
54 {
55     TAKDemuxContext *tc = s->priv_data;
56     AVIOContext *pb     = s->pb;
57     GetBitContext gb;
58     AVStream *st;
59     uint8_t *buffer = NULL;
60     int ret;
61
62     st = avformat_new_stream(s, 0);
63     if (!st)
64         return AVERROR(ENOMEM);
65
66     st->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
67     st->codecpar->codec_id   = AV_CODEC_ID_TAK;
68     st->need_parsing         = AVSTREAM_PARSE_FULL_RAW;
69
70     tc->mlast_frame = 0;
71     if (avio_rl32(pb) != MKTAG('t', 'B', 'a', 'K')) {
72         avio_seek(pb, -4, SEEK_CUR);
73         return 0;
74     }
75
76     while (!avio_feof(pb)) {
77         enum TAKMetaDataType type;
78         int size;
79
80         type = avio_r8(pb) & 0x7f;
81         size = avio_rl24(pb);
82
83         switch (type) {
84         case TAK_METADATA_STREAMINFO:
85             if (st->codecpar->extradata)
86                 return AVERROR_INVALIDDATA;
87         case TAK_METADATA_LAST_FRAME:
88         case TAK_METADATA_ENCODER:
89             if (size <= 3)
90                 return AVERROR_INVALIDDATA;
91
92             buffer = av_malloc(size - 3 + AV_INPUT_BUFFER_PADDING_SIZE);
93             if (!buffer)
94                 return AVERROR(ENOMEM);
95             memset(buffer + size - 3, 0, AV_INPUT_BUFFER_PADDING_SIZE);
96
97             ffio_init_checksum(pb, tak_check_crc, 0xCE04B7U);
98             if (avio_read(pb, buffer, size - 3) != size - 3) {
99                 av_freep(&buffer);
100                 return AVERROR(EIO);
101             }
102             if (ffio_get_checksum(s->pb) != avio_rb24(pb)) {
103                 av_log(s, AV_LOG_ERROR, "%d metadata block CRC error.\n", type);
104                 if (s->error_recognition & AV_EF_EXPLODE) {
105                     av_freep(&buffer);
106                     return AVERROR_INVALIDDATA;
107                 }
108             }
109
110             break;
111         case TAK_METADATA_MD5: {
112             uint8_t md5[16];
113             int i;
114
115             if (size != 19)
116                 return AVERROR_INVALIDDATA;
117             ffio_init_checksum(pb, tak_check_crc, 0xCE04B7U);
118             avio_read(pb, md5, 16);
119             if (ffio_get_checksum(s->pb) != avio_rb24(pb)) {
120                 av_log(s, AV_LOG_ERROR, "MD5 metadata block CRC error.\n");
121                 if (s->error_recognition & AV_EF_EXPLODE)
122                     return AVERROR_INVALIDDATA;
123             }
124
125             av_log(s, AV_LOG_VERBOSE, "MD5=");
126             for (i = 0; i < 16; i++)
127                 av_log(s, AV_LOG_VERBOSE, "%02x", md5[i]);
128             av_log(s, AV_LOG_VERBOSE, "\n");
129             break;
130         }
131         case TAK_METADATA_END: {
132             int64_t curpos = avio_tell(pb);
133
134             if (pb->seekable & AVIO_SEEKABLE_NORMAL) {
135                 ff_ape_parse_tag(s);
136                 avio_seek(pb, curpos, SEEK_SET);
137             }
138
139             tc->data_end += curpos;
140             return 0;
141         }
142         default:
143             ret = avio_skip(pb, size);
144             if (ret < 0)
145                 return ret;
146         }
147
148         if (type == TAK_METADATA_STREAMINFO) {
149             TAKStreamInfo ti;
150
151             ret = avpriv_tak_parse_streaminfo(&ti, buffer, size -3);
152             if (ret < 0)
153                 goto end;
154             if (ti.samples > 0)
155                 st->duration = ti.samples;
156             st->codecpar->bits_per_coded_sample = ti.bps;
157             if (ti.ch_layout)
158                 st->codecpar->channel_layout = ti.ch_layout;
159             st->codecpar->sample_rate           = ti.sample_rate;
160             st->codecpar->channels              = ti.channels;
161             st->start_time                   = 0;
162             avpriv_set_pts_info(st, 64, 1, st->codecpar->sample_rate);
163             st->codecpar->extradata             = buffer;
164             st->codecpar->extradata_size        = size - 3;
165             buffer                           = NULL;
166         } else if (type == TAK_METADATA_LAST_FRAME) {
167             if (size != 11) {
168                 ret = AVERROR_INVALIDDATA;
169                 goto end;
170             }
171             init_get_bits8(&gb, buffer, size - 3);
172             tc->mlast_frame = 1;
173             tc->data_end    = get_bits64(&gb, TAK_LAST_FRAME_POS_BITS) +
174                               get_bits(&gb, TAK_LAST_FRAME_SIZE_BITS);
175             av_freep(&buffer);
176         } else if (type == TAK_METADATA_ENCODER) {
177             init_get_bits8(&gb, buffer, size - 3);
178             av_log(s, AV_LOG_VERBOSE, "encoder version: %0X\n",
179                    get_bits_long(&gb, TAK_ENCODER_VERSION_BITS));
180             av_freep(&buffer);
181         }
182     }
183
184     return AVERROR_EOF;
185 end:
186     av_freep(&buffer);
187     return ret;
188 }
189
190 static int raw_read_packet(AVFormatContext *s, AVPacket *pkt)
191 {
192     TAKDemuxContext *tc = s->priv_data;
193     int ret;
194
195     if (tc->mlast_frame) {
196         AVIOContext *pb = s->pb;
197         int64_t size, left;
198
199         left = tc->data_end - avio_tell(pb);
200         size = FFMIN(left, 1024);
201         if (size <= 0)
202             return AVERROR_EOF;
203
204         ret = av_get_packet(pb, pkt, size);
205         if (ret < 0)
206             return ret;
207
208         pkt->stream_index = 0;
209     } else {
210         ret = ff_raw_read_partial_packet(s, pkt);
211     }
212
213     return ret;
214 }
215
216 FF_RAW_DEMUXER_CLASS(tak)
217 AVInputFormat ff_tak_demuxer = {
218     .name           = "tak",
219     .long_name      = NULL_IF_CONFIG_SMALL("raw TAK"),
220     .priv_data_size = sizeof(TAKDemuxContext),
221     .read_probe     = tak_probe,
222     .read_header    = tak_read_header,
223     .read_packet    = raw_read_packet,
224     .flags          = AVFMT_GENERIC_INDEX,
225     .extensions     = "tak",
226     .raw_codec_id   = AV_CODEC_ID_TAK,
227     .priv_class     = &tak_demuxer_class,
228 };