/* * Smacker demuxer * Copyright (c) 2006 Konstantin Shishkov * * 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 */ /* * Based on http://wiki.multimedia.cx/index.php?title=Smacker */ #include <inttypes.h> #include "libavutil/channel_layout.h" #include "libavutil/intreadwrite.h" #include "avformat.h" #include "avio_internal.h" #include "internal.h" #define SMACKER_PAL 0x01 #define SMACKER_FLAG_RING_FRAME 0x01 enum SAudFlags { SMK_AUD_PACKED = 0x80, SMK_AUD_16BITS = 0x20, SMK_AUD_STEREO = 0x10, SMK_AUD_BINKAUD = 0x08, SMK_AUD_USEDCT = 0x04 }; typedef struct SmackerContext { uint32_t frames; /* frame info */ uint32_t *frm_size; uint8_t *frm_flags; /* internal variables */ int cur_frame; /* current frame for demuxing */ uint8_t pal[768]; int indexes[7]; int videoindex; uint8_t *bufs[7]; int buf_sizes[7]; int stream_id[7]; int curstream; int64_t nextpos; int64_t aud_pts[7]; } SmackerContext; /* palette used in Smacker */ static const uint8_t smk_pal[64] = { 0x00, 0x04, 0x08, 0x0C, 0x10, 0x14, 0x18, 0x1C, 0x20, 0x24, 0x28, 0x2C, 0x30, 0x34, 0x38, 0x3C, 0x41, 0x45, 0x49, 0x4D, 0x51, 0x55, 0x59, 0x5D, 0x61, 0x65, 0x69, 0x6D, 0x71, 0x75, 0x79, 0x7D, 0x82, 0x86, 0x8A, 0x8E, 0x92, 0x96, 0x9A, 0x9E, 0xA2, 0xA6, 0xAA, 0xAE, 0xB2, 0xB6, 0xBA, 0xBE, 0xC3, 0xC7, 0xCB, 0xCF, 0xD3, 0xD7, 0xDB, 0xDF, 0xE3, 0xE7, 0xEB, 0xEF, 0xF3, 0xF7, 0xFB, 0xFF }; static int smacker_probe(const AVProbeData *p) { if ( AV_RL32(p->buf) != MKTAG('S', 'M', 'K', '2') && AV_RL32(p->buf) != MKTAG('S', 'M', 'K', '4')) return 0; if (AV_RL32(p->buf+4) > 32768U || AV_RL32(p->buf+8) > 32768U) return AVPROBE_SCORE_MAX/4; return AVPROBE_SCORE_MAX; } static int smacker_read_header(AVFormatContext *s) { AVIOContext *pb = s->pb; SmackerContext *smk = s->priv_data; AVStream *st; AVCodecParameters *par; uint32_t magic, width, height, flags, treesize; int i, ret, pts_inc; int tbase; /* read and check header */ magic = avio_rl32(pb); if (magic != MKTAG('S', 'M', 'K', '2') && magic != MKTAG('S', 'M', 'K', '4')) return AVERROR_INVALIDDATA; width = avio_rl32(pb); height = avio_rl32(pb); smk->frames = avio_rl32(pb); pts_inc = avio_rl32(pb); if (pts_inc > INT_MAX / 100) { av_log(s, AV_LOG_ERROR, "pts_inc %d is too large\n", pts_inc); return AVERROR_INVALIDDATA; } flags = avio_rl32(pb); if (flags & SMACKER_FLAG_RING_FRAME) smk->frames++; if (smk->frames > 0xFFFFFF) { av_log(s, AV_LOG_ERROR, "Too many frames: %"PRIu32"\n", smk->frames); return AVERROR_INVALIDDATA; } avio_skip(pb, 28); /* Unused audio related data */ treesize = avio_rl32(pb); if (treesize >= UINT_MAX/4) { // treesize + 16 must not overflow (this check is probably redundant) av_log(s, AV_LOG_ERROR, "treesize too large\n"); return AVERROR_INVALIDDATA; } st = avformat_new_stream(s, NULL); if (!st) return AVERROR(ENOMEM); smk->videoindex = st->index; /* Smacker uses 100000 as internal timebase */ if (pts_inc < 0) pts_inc = -pts_inc; else pts_inc *= 100; tbase = 100000; av_reduce(&tbase, &pts_inc, tbase, pts_inc, (1UL << 31) - 1); avpriv_set_pts_info(st, 33, pts_inc, tbase); st->duration = smk->frames; /* init video codec */ par = st->codecpar; par->width = width; par->height = height; par->format = AV_PIX_FMT_PAL8; par->codec_type = AVMEDIA_TYPE_VIDEO; par->codec_id = AV_CODEC_ID_SMACKVIDEO; par->codec_tag = magic; if ((ret = ff_alloc_extradata(par, treesize + 16)) < 0) { av_log(s, AV_LOG_ERROR, "Cannot allocate %"PRIu32" bytes of extradata\n", treesize + 16); return ret; } if ((ret = ffio_read_size(pb, par->extradata, 16)) < 0) return ret; /* handle possible audio streams */ for (i = 0; i < 7; i++) { uint32_t rate = avio_rl24(pb); uint8_t aflag = avio_r8(pb); smk->indexes[i] = -1; if (rate) { AVStream *ast = avformat_new_stream(s, NULL); AVCodecParameters *par; if (!ast) return AVERROR(ENOMEM); smk->indexes[i] = ast->index; par = ast->codecpar; par->codec_type = AVMEDIA_TYPE_AUDIO; if (aflag & SMK_AUD_BINKAUD) { par->codec_id = AV_CODEC_ID_BINKAUDIO_RDFT; } else if (aflag & SMK_AUD_USEDCT) { par->codec_id = AV_CODEC_ID_BINKAUDIO_DCT; } else if (aflag & SMK_AUD_PACKED) { par->codec_id = AV_CODEC_ID_SMACKAUDIO; par->codec_tag = MKTAG('S', 'M', 'K', 'A'); } else { par->codec_id = AV_CODEC_ID_PCM_U8; } if (aflag & SMK_AUD_STEREO) { par->channels = 2; par->channel_layout = AV_CH_LAYOUT_STEREO; } else { par->channels = 1; par->channel_layout = AV_CH_LAYOUT_MONO; } par->sample_rate = rate; par->bits_per_coded_sample = (aflag & SMK_AUD_16BITS) ? 16 : 8; if (par->bits_per_coded_sample == 16 && par->codec_id == AV_CODEC_ID_PCM_U8) par->codec_id = AV_CODEC_ID_PCM_S16LE; avpriv_set_pts_info(ast, 64, 1, par->sample_rate * par->channels * par->bits_per_coded_sample / 8); } } avio_rl32(pb); /* padding */ /* setup data */ smk->frm_size = av_malloc_array(smk->frames, sizeof(*smk->frm_size)); smk->frm_flags = av_malloc(smk->frames); if (!smk->frm_size || !smk->frm_flags) { av_freep(&smk->frm_size); av_freep(&smk->frm_flags); return AVERROR(ENOMEM); } /* read frame info */ for (i = 0; i < smk->frames; i++) { smk->frm_size[i] = avio_rl32(pb); } for (i = 0; i < smk->frames; i++) { smk->frm_flags[i] = avio_r8(pb); } /* load trees to extradata, they will be unpacked by decoder */ ret = avio_read(pb, par->extradata + 16, par->extradata_size - 16); if (ret != par->extradata_size - 16) { av_freep(&smk->frm_size); av_freep(&smk->frm_flags); return AVERROR(EIO); } smk->curstream = -1; smk->nextpos = avio_tell(pb); return 0; } static int smacker_read_packet(AVFormatContext *s, AVPacket *pkt) { SmackerContext *smk = s->priv_data; int flags; int ret; int i; int frame_size = 0; int palchange = 0; if (avio_feof(s->pb) || smk->cur_frame >= smk->frames) return AVERROR_EOF; /* if we demuxed all streams, pass another frame */ if(smk->curstream < 0) { avio_seek(s->pb, smk->nextpos, 0); frame_size = smk->frm_size[smk->cur_frame] & (~3); flags = smk->frm_flags[smk->cur_frame]; /* handle palette change event */ if(flags & SMACKER_PAL){ int size, sz, t, off, j, pos; uint8_t *pal = smk->pal; uint8_t oldpal[768]; memcpy(oldpal, pal, 768); size = avio_r8(s->pb); size = size * 4 - 1; if(size + 1 > frame_size) return AVERROR_INVALIDDATA; frame_size -= size; frame_size--; sz = 0; pos = avio_tell(s->pb) + size; while(sz < 256){ t = avio_r8(s->pb); if(t & 0x80){ /* skip palette entries */ sz += (t & 0x7F) + 1; pal += ((t & 0x7F) + 1) * 3; } else if(t & 0x40){ /* copy with offset */ off = avio_r8(s->pb); j = (t & 0x3F) + 1; if (off + j > 0x100) { av_log(s, AV_LOG_ERROR, "Invalid palette update, offset=%d length=%d extends beyond palette size\n", off, j); return AVERROR_INVALIDDATA; } off *= 3; while(j-- && sz < 256) { *pal++ = oldpal[off + 0]; *pal++ = oldpal[off + 1]; *pal++ = oldpal[off + 2]; sz++; off += 3; } } else { /* new entries */ *pal++ = smk_pal[t]; *pal++ = smk_pal[avio_r8(s->pb) & 0x3F]; *pal++ = smk_pal[avio_r8(s->pb) & 0x3F]; sz++; } } avio_seek(s->pb, pos, 0); palchange |= 1; } flags >>= 1; smk->curstream = -1; /* if audio chunks are present, put them to stack and retrieve later */ for(i = 0; i < 7; i++) { if(flags & 1) { uint32_t size; int err; size = avio_rl32(s->pb) - 4; if (!size || size + 4LL > frame_size) { av_log(s, AV_LOG_ERROR, "Invalid audio part size\n"); return AVERROR_INVALIDDATA; } frame_size -= size; frame_size -= 4; smk->curstream++; if ((err = av_reallocp(&smk->bufs[smk->curstream], size)) < 0) { smk->buf_sizes[smk->curstream] = 0; return err; } smk->buf_sizes[smk->curstream] = size; ret = avio_read(s->pb, smk->bufs[smk->curstream], size); if(ret != size) return AVERROR(EIO); smk->stream_id[smk->curstream] = smk->indexes[i]; } flags >>= 1; } if (frame_size < 0 || frame_size >= INT_MAX/2) return AVERROR_INVALIDDATA; if ((ret = av_new_packet(pkt, frame_size + 769)) < 0) return ret; if(smk->frm_size[smk->cur_frame] & 1) palchange |= 2; pkt->data[0] = palchange; memcpy(pkt->data + 1, smk->pal, 768); ret = avio_read(s->pb, pkt->data + 769, frame_size); if(ret != frame_size) return AVERROR(EIO); pkt->stream_index = smk->videoindex; pkt->pts = smk->cur_frame; pkt->size = ret + 769; smk->cur_frame++; smk->nextpos = avio_tell(s->pb); } else { if (smk->stream_id[smk->curstream] < 0 || !smk->bufs[smk->curstream]) return AVERROR_INVALIDDATA; if ((ret = av_new_packet(pkt, smk->buf_sizes[smk->curstream])) < 0) return ret; memcpy(pkt->data, smk->bufs[smk->curstream], smk->buf_sizes[smk->curstream]); pkt->size = smk->buf_sizes[smk->curstream]; pkt->stream_index = smk->stream_id[smk->curstream]; pkt->pts = smk->aud_pts[smk->curstream]; smk->aud_pts[smk->curstream] += AV_RL32(pkt->data); smk->curstream--; } return 0; } static int smacker_read_close(AVFormatContext *s) { SmackerContext *smk = s->priv_data; int i; for(i = 0; i < 7; i++) av_freep(&smk->bufs[i]); av_freep(&smk->frm_size); av_freep(&smk->frm_flags); return 0; } AVInputFormat ff_smacker_demuxer = { .name = "smk", .long_name = NULL_IF_CONFIG_SMALL("Smacker"), .priv_data_size = sizeof(SmackerContext), .read_probe = smacker_probe, .read_header = smacker_read_header, .read_packet = smacker_read_packet, .read_close = smacker_read_close, };