1/* 2 * BRSTM 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/intreadwrite.h" 23#include "libavcodec/bytestream.h" 24#include "avformat.h" 25#include "internal.h" 26 27typedef struct BRSTMDemuxContext { 28 uint32_t block_size; 29 uint32_t block_count; 30 uint32_t current_block; 31 uint32_t samples_per_block; 32 uint32_t last_block_used_bytes; 33 uint8_t *table; 34 uint8_t *adpc; 35} BRSTMDemuxContext; 36 37static int probe(AVProbeData *p) 38{ 39 if (AV_RL32(p->buf) == MKTAG('R','S','T','M') && 40 (AV_RL16(p->buf + 4) == 0xFFFE || 41 AV_RL16(p->buf + 4) == 0xFEFF)) 42 return AVPROBE_SCORE_MAX / 3 * 2; 43 return 0; 44} 45 46static int read_close(AVFormatContext *s) 47{ 48 BRSTMDemuxContext *b = s->priv_data; 49 50 av_freep(&b->table); 51 av_freep(&b->adpc); 52 53 return 0; 54} 55 56static int read_header(AVFormatContext *s) 57{ 58 BRSTMDemuxContext *b = s->priv_data; 59 int bom, major, minor, codec, chunk; 60 int64_t pos, h1offset, toffset; 61 uint32_t size, start, asize; 62 AVStream *st; 63 int ret = AVERROR_EOF; 64 65 st = avformat_new_stream(s, NULL); 66 if (!st) 67 return AVERROR(ENOMEM); 68 st->codec->codec_type = AVMEDIA_TYPE_AUDIO; 69 70 avio_skip(s->pb, 4); 71 72 bom = avio_rb16(s->pb); 73 if (bom != 0xFEFF && bom != 0xFFFE) { 74 av_log(s, AV_LOG_ERROR, "invalid byte order: %X\n", bom); 75 return AVERROR_INVALIDDATA; 76 } 77 if (bom == 0xFFFE) { 78 avpriv_request_sample(s, "little endian byte order"); 79 return AVERROR_PATCHWELCOME; 80 } 81 82 major = avio_r8(s->pb); 83 minor = avio_r8(s->pb); 84 avio_skip(s->pb, 4); // size of file 85 size = avio_rb16(s->pb); 86 if (size < 14) 87 return AVERROR_INVALIDDATA; 88 89 avio_skip(s->pb, size - 14); 90 pos = avio_tell(s->pb); 91 if (avio_rl32(s->pb) != MKTAG('H','E','A','D')) 92 return AVERROR_INVALIDDATA; 93 size = avio_rb32(s->pb); 94 if (size < 256) 95 return AVERROR_INVALIDDATA; 96 avio_skip(s->pb, 4); // unknown 97 h1offset = avio_rb32(s->pb); 98 if (h1offset > size) 99 return AVERROR_INVALIDDATA; 100 avio_skip(s->pb, 12); 101 toffset = avio_rb32(s->pb) + 16LL; 102 if (toffset > size) 103 return AVERROR_INVALIDDATA; 104 105 avio_skip(s->pb, pos + h1offset + 8 - avio_tell(s->pb)); 106 codec = avio_r8(s->pb); 107 108 switch (codec) { 109 case 0: codec = AV_CODEC_ID_PCM_S8_PLANAR; break; 110 case 1: codec = AV_CODEC_ID_PCM_S16BE_PLANAR; break; 111 case 2: codec = AV_CODEC_ID_ADPCM_THP; break; 112 default: 113 avpriv_request_sample(s, "codec %d", codec); 114 return AVERROR_PATCHWELCOME; 115 } 116 117 avio_skip(s->pb, 1); // loop flag 118 st->codec->codec_id = codec; 119 st->codec->channels = avio_r8(s->pb); 120 if (!st->codec->channels) 121 return AVERROR_INVALIDDATA; 122 123 avio_skip(s->pb, 1); // padding 124 st->codec->sample_rate = avio_rb16(s->pb); 125 if (!st->codec->sample_rate) 126 return AVERROR_INVALIDDATA; 127 128 avio_skip(s->pb, 2); // padding 129 avio_skip(s->pb, 4); // loop start sample 130 st->start_time = 0; 131 st->duration = avio_rb32(s->pb); 132 avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate); 133 134 start = avio_rb32(s->pb); 135 b->current_block = 0; 136 b->block_count = avio_rb32(s->pb); 137 if (b->block_count > UINT16_MAX) { 138 av_log(s, AV_LOG_WARNING, "too many blocks: %u\n", b->block_count); 139 return AVERROR_INVALIDDATA; 140 } 141 142 b->block_size = avio_rb32(s->pb); 143 if (b->block_size > UINT16_MAX / st->codec->channels) 144 return AVERROR_INVALIDDATA; 145 b->block_size *= st->codec->channels; 146 147 b->samples_per_block = avio_rb32(s->pb); 148 b->last_block_used_bytes = avio_rb32(s->pb); 149 if (b->last_block_used_bytes > UINT16_MAX / st->codec->channels) 150 return AVERROR_INVALIDDATA; 151 b->last_block_used_bytes *= st->codec->channels; 152 153 avio_skip(s->pb, 4); // last block samples 154 avio_skip(s->pb, 4); // last block size 155 156 if (codec == AV_CODEC_ID_ADPCM_THP) { 157 int ch; 158 159 avio_skip(s->pb, pos + toffset - avio_tell(s->pb)); 160 toffset = avio_rb32(s->pb) + 16LL; 161 if (toffset > size) 162 return AVERROR_INVALIDDATA; 163 164 avio_skip(s->pb, pos + toffset - avio_tell(s->pb)); 165 b->table = av_mallocz(32 * st->codec->channels); 166 if (!b->table) 167 return AVERROR(ENOMEM); 168 169 for (ch = 0; ch < st->codec->channels; ch++) { 170 if (avio_read(s->pb, b->table + ch * 32, 32) != 32) { 171 ret = AVERROR_INVALIDDATA; 172 goto fail; 173 } 174 avio_skip(s->pb, 24); 175 } 176 } 177 178 if (size < (avio_tell(s->pb) - pos)) { 179 ret = AVERROR_INVALIDDATA; 180 goto fail; 181 } 182 avio_skip(s->pb, size - (avio_tell(s->pb) - pos)); 183 184 while (!url_feof(s->pb)) { 185 chunk = avio_rl32(s->pb); 186 size = avio_rb32(s->pb); 187 if (size < 8) { 188 ret = AVERROR_INVALIDDATA; 189 goto fail; 190 } 191 size -= 8; 192 switch (chunk) { 193 case MKTAG('A','D','P','C'): 194 if (codec != AV_CODEC_ID_ADPCM_THP) 195 goto skip; 196 197 asize = b->block_count * st->codec->channels * 4; 198 if (size < asize) { 199 ret = AVERROR_INVALIDDATA; 200 goto fail; 201 } 202 if (b->adpc) { 203 av_log(s, AV_LOG_WARNING, "skipping additional ADPC chunk\n"); 204 goto skip; 205 } else { 206 b->adpc = av_mallocz(asize); 207 if (!b->adpc) { 208 ret = AVERROR(ENOMEM); 209 goto fail; 210 } 211 avio_read(s->pb, b->adpc, asize); 212 avio_skip(s->pb, size - asize); 213 } 214 break; 215 case MKTAG('D','A','T','A'): 216 if ((start < avio_tell(s->pb)) || 217 (!b->adpc && codec == AV_CODEC_ID_ADPCM_THP)) { 218 ret = AVERROR_INVALIDDATA; 219 goto fail; 220 } 221 avio_skip(s->pb, start - avio_tell(s->pb)); 222 223 if (major != 1 || minor) 224 avpriv_request_sample(s, "Version %d.%d", major, minor); 225 226 return 0; 227 default: 228 av_log(s, AV_LOG_WARNING, "skipping unknown chunk: %X\n", chunk); 229skip: 230 avio_skip(s->pb, size); 231 } 232 } 233 234fail: 235 read_close(s); 236 237 return ret; 238} 239 240static int read_packet(AVFormatContext *s, AVPacket *pkt) 241{ 242 AVCodecContext *codec = s->streams[0]->codec; 243 BRSTMDemuxContext *b = s->priv_data; 244 uint32_t samples, size; 245 int ret; 246 247 if (url_feof(s->pb)) 248 return AVERROR_EOF; 249 b->current_block++; 250 if (b->current_block == b->block_count) { 251 size = b->last_block_used_bytes; 252 samples = size / (8 * codec->channels) * 14; 253 } else if (b->current_block < b->block_count) { 254 size = b->block_size; 255 samples = b->samples_per_block; 256 } else { 257 return AVERROR_EOF; 258 } 259 260 if (codec->codec_id == AV_CODEC_ID_ADPCM_THP) { 261 uint8_t *dst; 262 263 if (av_new_packet(pkt, 8 + (32 + 4) * codec->channels + size) < 0) 264 return AVERROR(ENOMEM); 265 dst = pkt->data; 266 bytestream_put_be32(&dst, size); 267 bytestream_put_be32(&dst, samples); 268 bytestream_put_buffer(&dst, b->table, 32 * codec->channels); 269 bytestream_put_buffer(&dst, b->adpc + 4 * codec->channels * 270 (b->current_block - 1), 4 * codec->channels); 271 272 ret = avio_read(s->pb, dst, size); 273 if (ret != size) 274 av_free_packet(pkt); 275 pkt->duration = samples; 276 } else { 277 ret = av_get_packet(s->pb, pkt, size); 278 } 279 280 pkt->stream_index = 0; 281 282 if (ret != size) 283 ret = AVERROR(EIO); 284 285 return ret; 286} 287 288AVInputFormat ff_brstm_demuxer = { 289 .name = "brstm", 290 .long_name = NULL_IF_CONFIG_SMALL("BRSTM (Binary Revolution Stream)"), 291 .priv_data_size = sizeof(BRSTMDemuxContext), 292 .read_probe = probe, 293 .read_header = read_header, 294 .read_packet = read_packet, 295 .read_close = read_close, 296 .extensions = "brstm", 297}; 298