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