mirror of https://github.com/FFmpeg/FFmpeg.git
Paul B Mahol
12 years ago
parent
6abb9a901f
commit
9a31997938
6 changed files with 300 additions and 1 deletions
@ -0,0 +1,294 @@ |
||||
/*
|
||||
* BRSTM demuxer |
||||
* Copyright (c) 2012 Paul B Mahol |
||||
* |
||||
* This file is part of FFmpeg. |
||||
* |
||||
* FFmpeg is free software; you can redistribute it and/or |
||||
* modify it under the terms of the GNU Lesser General Public |
||||
* License as published by the Free Software Foundation; either |
||||
* version 2.1 of the License, or (at your option) any later version. |
||||
* |
||||
* FFmpeg is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||
* Lesser General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU Lesser General Public |
||||
* License along with FFmpeg; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
#include "libavutil/intreadwrite.h" |
||||
#include "libavcodec/bytestream.h" |
||||
#include "avformat.h" |
||||
#include "internal.h" |
||||
|
||||
typedef struct BRSTMDemuxContext { |
||||
uint32_t block_size; |
||||
uint32_t block_count; |
||||
uint32_t current_block; |
||||
uint32_t samples_per_block; |
||||
uint32_t last_block_used_bytes; |
||||
uint8_t *table; |
||||
uint8_t *adpc; |
||||
} BRSTMDemuxContext; |
||||
|
||||
static int probe(AVProbeData *p) |
||||
{ |
||||
if (AV_RL32(p->buf) == MKTAG('R','S','T','M') && |
||||
(AV_RL16(p->buf + 4) == 0xFFFE || |
||||
AV_RL16(p->buf + 4) == 0xFEFF)) |
||||
return AVPROBE_SCORE_MAX / 3 * 2; |
||||
return 0; |
||||
} |
||||
|
||||
static int read_close(AVFormatContext *s) |
||||
{ |
||||
BRSTMDemuxContext *b = s->priv_data; |
||||
|
||||
av_freep(&b->table); |
||||
av_freep(&b->adpc); |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
static int read_header(AVFormatContext *s) |
||||
{ |
||||
BRSTMDemuxContext *b = s->priv_data; |
||||
int bom, major, minor, codec, chunk; |
||||
int64_t pos, h1offset, toffset; |
||||
uint32_t size, start, asize; |
||||
AVStream *st; |
||||
int ret = AVERROR_EOF; |
||||
|
||||
st = avformat_new_stream(s, NULL); |
||||
if (!st) |
||||
return AVERROR(ENOMEM); |
||||
st->codec->codec_type = AVMEDIA_TYPE_AUDIO; |
||||
|
||||
avio_skip(s->pb, 4); |
||||
|
||||
bom = avio_rb16(s->pb); |
||||
if (bom != 0xFEFF && bom != 0xFFFE) { |
||||
av_log(s, AV_LOG_ERROR, "invalid byte order: %X\n", bom); |
||||
return AVERROR_INVALIDDATA; |
||||
} |
||||
if (bom == 0xFFFE) { |
||||
av_log_ask_for_sample(s, "unsupported byte order"); |
||||
return AVERROR_PATCHWELCOME; |
||||
} |
||||
|
||||
major = avio_r8(s->pb); |
||||
minor = avio_r8(s->pb); |
||||
avio_skip(s->pb, 4); // size of file
|
||||
size = avio_rb16(s->pb); |
||||
if (size < 14) |
||||
return AVERROR_INVALIDDATA; |
||||
|
||||
avio_skip(s->pb, size - 14); |
||||
pos = avio_tell(s->pb); |
||||
if (avio_rl32(s->pb) != MKTAG('H','E','A','D')) |
||||
return AVERROR_INVALIDDATA; |
||||
size = avio_rb32(s->pb); |
||||
if (size < 256) |
||||
return AVERROR_INVALIDDATA; |
||||
avio_skip(s->pb, 4); // unknown
|
||||
h1offset = avio_rb32(s->pb); |
||||
if (h1offset > size) |
||||
return AVERROR_INVALIDDATA; |
||||
avio_skip(s->pb, 12); |
||||
toffset = avio_rb32(s->pb) + 16LL; |
||||
if (toffset > size) |
||||
return AVERROR_INVALIDDATA; |
||||
|
||||
avio_skip(s->pb, pos + h1offset + 8 - avio_tell(s->pb)); |
||||
codec = avio_r8(s->pb); |
||||
|
||||
switch (codec) { |
||||
case 0: codec = AV_CODEC_ID_PCM_S8_PLANAR; break; |
||||
case 1: codec = AV_CODEC_ID_PCM_S16BE_PLANAR; break; |
||||
case 2: codec = AV_CODEC_ID_ADPCM_THP; break; |
||||
default: |
||||
av_log_ask_for_sample(s, "unsupported codec: %d", codec); |
||||
return AVERROR_PATCHWELCOME; |
||||
} |
||||
|
||||
avio_skip(s->pb, 1); // loop flag
|
||||
st->codec->codec_id = codec; |
||||
st->codec->channels = avio_r8(s->pb); |
||||
if (!st->codec->channels) |
||||
return AVERROR_INVALIDDATA; |
||||
|
||||
avio_skip(s->pb, 1); // padding
|
||||
st->codec->sample_rate = avio_rb16(s->pb); |
||||
if (!st->codec->sample_rate) |
||||
return AVERROR_INVALIDDATA; |
||||
|
||||
avio_skip(s->pb, 2); // padding
|
||||
avio_skip(s->pb, 4); // loop start sample
|
||||
st->start_time = 0; |
||||
st->duration = avio_rb32(s->pb); |
||||
avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate); |
||||
|
||||
start = avio_rb32(s->pb); |
||||
b->current_block = 0; |
||||
b->block_count = avio_rb32(s->pb); |
||||
if (b->block_count > UINT16_MAX) { |
||||
av_log(s, AV_LOG_WARNING, "too many blocks: %u\n", b->block_count); |
||||
return AVERROR_INVALIDDATA; |
||||
} |
||||
|
||||
b->block_size = avio_rb32(s->pb); |
||||
if (b->block_size > UINT16_MAX / st->codec->channels) |
||||
return AVERROR_INVALIDDATA; |
||||
b->block_size *= st->codec->channels; |
||||
|
||||
b->samples_per_block = avio_rb32(s->pb); |
||||
b->last_block_used_bytes = avio_rb32(s->pb); |
||||
if (b->last_block_used_bytes > UINT16_MAX / st->codec->channels) |
||||
return AVERROR_INVALIDDATA; |
||||
b->last_block_used_bytes *= st->codec->channels; |
||||
|
||||
avio_skip(s->pb, 4); // last block samples
|
||||
avio_skip(s->pb, 4); // last block size
|
||||
|
||||
if (codec == AV_CODEC_ID_ADPCM_THP) { |
||||
int ch; |
||||
|
||||
avio_skip(s->pb, pos + toffset - avio_tell(s->pb)); |
||||
toffset = avio_rb32(s->pb) + 16LL; |
||||
if (toffset > size) |
||||
return AVERROR_INVALIDDATA; |
||||
|
||||
avio_skip(s->pb, pos + toffset - avio_tell(s->pb)); |
||||
b->table = av_mallocz(32 * st->codec->channels); |
||||
if (!b->table) |
||||
return AVERROR(ENOMEM); |
||||
|
||||
for (ch = 0; ch < st->codec->channels; ch++) { |
||||
if (avio_read(s->pb, b->table + ch * 32, 32) != 32) { |
||||
ret = AVERROR_INVALIDDATA; |
||||
goto fail; |
||||
} |
||||
avio_skip(s->pb, 24); |
||||
} |
||||
} |
||||
|
||||
if (size < (avio_tell(s->pb) - pos)) { |
||||
ret = AVERROR_INVALIDDATA; |
||||
goto fail; |
||||
} |
||||
avio_skip(s->pb, size - (avio_tell(s->pb) - pos)); |
||||
|
||||
while (!url_feof(s->pb)) { |
||||
chunk = avio_rl32(s->pb); |
||||
size = avio_rb32(s->pb); |
||||
if (size < 8) { |
||||
ret = AVERROR_INVALIDDATA; |
||||
goto fail; |
||||
} |
||||
size -= 8; |
||||
switch (chunk) { |
||||
case MKTAG('A','D','P','C'): |
||||
if (codec != AV_CODEC_ID_ADPCM_THP) |
||||
goto skip; |
||||
|
||||
asize = b->block_count * st->codec->channels * 4; |
||||
if (size < asize) { |
||||
ret = AVERROR_INVALIDDATA; |
||||
goto fail; |
||||
} |
||||
if (b->adpc) { |
||||
av_log(s, AV_LOG_WARNING, "skipping additonal ADPC chunk\n"); |
||||
goto skip; |
||||
} else { |
||||
b->adpc = av_mallocz(asize); |
||||
if (!b->adpc) { |
||||
ret = AVERROR(ENOMEM); |
||||
goto fail; |
||||
} |
||||
avio_read(s->pb, b->adpc, asize); |
||||
avio_skip(s->pb, size - asize); |
||||
} |
||||
break; |
||||
case MKTAG('D','A','T','A'): |
||||
if ((start < avio_tell(s->pb)) || |
||||
(!b->adpc && codec == AV_CODEC_ID_ADPCM_THP)) { |
||||
ret = AVERROR_INVALIDDATA; |
||||
goto fail; |
||||
} |
||||
avio_skip(s->pb, start - avio_tell(s->pb)); |
||||
return 0; |
||||
default: |
||||
av_log(s, AV_LOG_WARNING, "skipping unknown chunk: %X\n", chunk); |
||||
skip: |
||||
avio_skip(s->pb, size); |
||||
} |
||||
} |
||||
|
||||
fail: |
||||
read_close(s); |
||||
|
||||
return ret; |
||||
} |
||||
|
||||
static int read_packet(AVFormatContext *s, AVPacket *pkt) |
||||
{ |
||||
AVCodecContext *codec = s->streams[0]->codec; |
||||
BRSTMDemuxContext *b = s->priv_data; |
||||
uint32_t samples, size; |
||||
int ret; |
||||
|
||||
if (url_feof(s->pb)) |
||||
return AVERROR_EOF; |
||||
b->current_block++; |
||||
if (b->current_block == b->block_count) { |
||||
size = b->last_block_used_bytes; |
||||
samples = size / 16 * 14; |
||||
} else if (b->current_block < b->block_count) { |
||||
size = b->block_size; |
||||
samples = b->samples_per_block; |
||||
} else { |
||||
return AVERROR_EOF; |
||||
} |
||||
|
||||
if (codec->codec_id == AV_CODEC_ID_ADPCM_THP) { |
||||
uint8_t *dst; |
||||
|
||||
if (av_new_packet(pkt, 8 + (32 + 4) * codec->channels + size) < 0) |
||||
return AVERROR(ENOMEM); |
||||
dst = pkt->data; |
||||
bytestream_put_be32(&dst, size); |
||||
bytestream_put_be32(&dst, samples); |
||||
bytestream_put_buffer(&dst, b->table, 32 * codec->channels); |
||||
bytestream_put_buffer(&dst, b->adpc + 4 * codec->channels * |
||||
(b->current_block - 1), 4 * codec->channels); |
||||
|
||||
ret = avio_read(s->pb, dst, size); |
||||
if (ret < 0) { |
||||
av_free_packet(pkt); |
||||
return ret; |
||||
} |
||||
pkt->duration = samples; |
||||
} else { |
||||
ret = av_get_packet(s->pb, pkt, size); |
||||
if (ret < 0) |
||||
return ret; |
||||
} |
||||
|
||||
pkt->stream_index = 0; |
||||
|
||||
return ret; |
||||
} |
||||
|
||||
AVInputFormat ff_brstm_demuxer = { |
||||
.name = "brstm", |
||||
.long_name = NULL_IF_CONFIG_SMALL("BRSTM (Binary Revolution Stream)"), |
||||
.priv_data_size = sizeof(BRSTMDemuxContext), |
||||
.read_probe = probe, |
||||
.read_header = read_header, |
||||
.read_packet = read_packet, |
||||
.read_close = read_close, |
||||
.extensions = "brstm", |
||||
}; |
||||
Loading…
Reference in new issue