diff options
Diffstat (limited to 'ffmpeg1/libavcodec/tiertexseqv.c')
| -rw-r--r-- | ffmpeg1/libavcodec/tiertexseqv.c | 267 |
1 files changed, 267 insertions, 0 deletions
diff --git a/ffmpeg1/libavcodec/tiertexseqv.c b/ffmpeg1/libavcodec/tiertexseqv.c new file mode 100644 index 0000000..f892e4d --- /dev/null +++ b/ffmpeg1/libavcodec/tiertexseqv.c @@ -0,0 +1,267 @@ +/* + * Tiertex Limited SEQ Video Decoder + * Copyright (c) 2006 Gregory Montoir (cyx@users.sourceforge.net) + * + * 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 + */ + +/** + * @file + * Tiertex Limited SEQ video decoder + */ + +#include "avcodec.h" +#define BITSTREAM_READER_LE +#include "get_bits.h" +#include "internal.h" + + +typedef struct SeqVideoContext { + AVCodecContext *avctx; + AVFrame frame; +} SeqVideoContext; + + +static const unsigned char *seq_unpack_rle_block(const unsigned char *src, + const unsigned char *src_end, + unsigned char *dst, int dst_size) +{ + int i, len, sz; + GetBitContext gb; + int code_table[64]; + + /* get the rle codes */ + init_get_bits(&gb, src, (src_end - src) * 8); + for (i = 0, sz = 0; i < 64 && sz < dst_size; i++) { + if (get_bits_left(&gb) < 4) + return NULL; + code_table[i] = get_sbits(&gb, 4); + sz += FFABS(code_table[i]); + } + src += (get_bits_count(&gb) + 7) / 8; + + /* do the rle unpacking */ + for (i = 0; i < 64 && dst_size > 0; i++) { + len = code_table[i]; + if (len < 0) { + len = -len; + if (src_end - src < 1) + return NULL; + memset(dst, *src++, FFMIN(len, dst_size)); + } else { + if (src_end - src < len) + return NULL; + memcpy(dst, src, FFMIN(len, dst_size)); + src += len; + } + dst += len; + dst_size -= len; + } + return src; +} + +static const unsigned char *seq_decode_op1(SeqVideoContext *seq, + const unsigned char *src, + const unsigned char *src_end, + unsigned char *dst) +{ + const unsigned char *color_table; + int b, i, len, bits; + GetBitContext gb; + unsigned char block[8 * 8]; + + if (src_end - src < 1) + return NULL; + len = *src++; + if (len & 0x80) { + switch (len & 3) { + case 1: + src = seq_unpack_rle_block(src, src_end, block, sizeof(block)); + for (b = 0; b < 8; b++) { + memcpy(dst, &block[b * 8], 8); + dst += seq->frame.linesize[0]; + } + break; + case 2: + src = seq_unpack_rle_block(src, src_end, block, sizeof(block)); + for (i = 0; i < 8; i++) { + for (b = 0; b < 8; b++) + dst[b * seq->frame.linesize[0]] = block[i * 8 + b]; + ++dst; + } + break; + } + } else { + if (len <= 0) + return NULL; + bits = ff_log2_tab[len - 1] + 1; + if (src_end - src < len + 8 * bits) + return NULL; + color_table = src; + src += len; + init_get_bits(&gb, src, bits * 8 * 8); src += bits * 8; + for (b = 0; b < 8; b++) { + for (i = 0; i < 8; i++) + dst[i] = color_table[get_bits(&gb, bits)]; + dst += seq->frame.linesize[0]; + } + } + + return src; +} + +static const unsigned char *seq_decode_op2(SeqVideoContext *seq, + const unsigned char *src, + const unsigned char *src_end, + unsigned char *dst) +{ + int i; + + if (src_end - src < 8 * 8) + return NULL; + + for (i = 0; i < 8; i++) { + memcpy(dst, src, 8); + src += 8; + dst += seq->frame.linesize[0]; + } + + return src; +} + +static const unsigned char *seq_decode_op3(SeqVideoContext *seq, + const unsigned char *src, + const unsigned char *src_end, + unsigned char *dst) +{ + int pos, offset; + + do { + if (src_end - src < 2) + return NULL; + pos = *src++; + offset = ((pos >> 3) & 7) * seq->frame.linesize[0] + (pos & 7); + dst[offset] = *src++; + } while (!(pos & 0x80)); + + return src; +} + +static int seqvideo_decode(SeqVideoContext *seq, const unsigned char *data, int data_size) +{ + const unsigned char *data_end = data + data_size; + GetBitContext gb; + int flags, i, j, x, y, op; + unsigned char c[3]; + unsigned char *dst; + uint32_t *palette; + + flags = *data++; + + if (flags & 1) { + palette = (uint32_t *)seq->frame.data[1]; + if (data_end - data < 256 * 3) + return AVERROR_INVALIDDATA; + for (i = 0; i < 256; i++) { + for (j = 0; j < 3; j++, data++) + c[j] = (*data << 2) | (*data >> 4); + palette[i] = 0xFFU << 24 | AV_RB24(c); + } + seq->frame.palette_has_changed = 1; + } + + if (flags & 2) { + if (data_end - data < 128) + return AVERROR_INVALIDDATA; + init_get_bits(&gb, data, 128 * 8); data += 128; + for (y = 0; y < 128; y += 8) + for (x = 0; x < 256; x += 8) { + dst = &seq->frame.data[0][y * seq->frame.linesize[0] + x]; + op = get_bits(&gb, 2); + switch (op) { + case 1: + data = seq_decode_op1(seq, data, data_end, dst); + break; + case 2: + data = seq_decode_op2(seq, data, data_end, dst); + break; + case 3: + data = seq_decode_op3(seq, data, data_end, dst); + break; + } + if (!data) + return AVERROR_INVALIDDATA; + } + } + return 0; +} + +static av_cold int seqvideo_decode_init(AVCodecContext *avctx) +{ + SeqVideoContext *seq = avctx->priv_data; + + seq->avctx = avctx; + avctx->pix_fmt = AV_PIX_FMT_PAL8; + + avcodec_get_frame_defaults(&seq->frame); + + return 0; +} + +static int seqvideo_decode_frame(AVCodecContext *avctx, + void *data, int *got_frame, + AVPacket *avpkt) +{ + const uint8_t *buf = avpkt->data; + int buf_size = avpkt->size; + int ret; + + SeqVideoContext *seq = avctx->priv_data; + + if ((ret = ff_reget_buffer(avctx, &seq->frame)) < 0) + return ret; + + if (seqvideo_decode(seq, buf, buf_size)) + return AVERROR_INVALIDDATA; + + if ((ret = av_frame_ref(data, &seq->frame)) < 0) + return ret; + *got_frame = 1; + + return buf_size; +} + +static av_cold int seqvideo_decode_end(AVCodecContext *avctx) +{ + SeqVideoContext *seq = avctx->priv_data; + + av_frame_unref(&seq->frame); + + return 0; +} + +AVCodec ff_tiertexseqvideo_decoder = { + .name = "tiertexseqvideo", + .type = AVMEDIA_TYPE_VIDEO, + .id = AV_CODEC_ID_TIERTEXSEQVIDEO, + .priv_data_size = sizeof(SeqVideoContext), + .init = seqvideo_decode_init, + .close = seqvideo_decode_end, + .decode = seqvideo_decode_frame, + .capabilities = CODEC_CAP_DR1, + .long_name = NULL_IF_CONFIG_SMALL("Tiertex Limited SEQ video"), +}; |
