29f86228 |
/*
* 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
*/
/** |
ba87f080 |
* @file |
29f86228 |
* Tiertex Limited SEQ video decoder
*/
#include "avcodec.h" |
aaf47bcd |
#define BITSTREAM_READER_LE |
9106a698 |
#include "get_bits.h" |
29f86228 |
typedef struct SeqVideoContext {
AVCodecContext *avctx;
AVFrame frame;
} SeqVideoContext;
|
5d7e3d71 |
static const unsigned char *seq_unpack_rle_block(const unsigned char *src,
const unsigned char *src_end,
unsigned char *dst, int dst_size) |
29f86228 |
{
int i, len, sz;
GetBitContext gb;
int code_table[64];
|
5d7e3d71 |
/* get the rle codes */
init_get_bits(&gb, src, (src_end - src) * 8); |
29f86228 |
for (i = 0, sz = 0; i < 64 && sz < dst_size; i++) { |
5d7e3d71 |
if (get_bits_left(&gb) < 4)
return NULL; |
29f86228 |
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; |
5d7e3d71 |
if (src_end - src < 1)
return NULL; |
29f86228 |
memset(dst, *src++, FFMIN(len, dst_size));
} else { |
5d7e3d71 |
if (src_end - src < len)
return NULL; |
29f86228 |
memcpy(dst, src, FFMIN(len, dst_size));
src += len;
}
dst += len;
dst_size -= len;
}
return src;
}
|
5d7e3d71 |
static const unsigned char *seq_decode_op1(SeqVideoContext *seq,
const unsigned char *src,
const unsigned char *src_end,
unsigned char *dst) |
29f86228 |
{ |
4a431e9e |
const unsigned char *color_table; |
29f86228 |
int b, i, len, bits;
GetBitContext gb; |
7bd2f502 |
unsigned char block[8 * 8]; |
29f86228 |
|
5d7e3d71 |
if (src_end - src < 1)
return NULL; |
29f86228 |
len = *src++;
if (len & 0x80) {
switch (len & 3) {
case 1: |
5d7e3d71 |
src = seq_unpack_rle_block(src, src_end, block, sizeof(block)); |
29f86228 |
for (b = 0; b < 8; b++) { |
7bd2f502 |
memcpy(dst, &block[b * 8], 8); |
29f86228 |
dst += seq->frame.linesize[0];
}
break;
case 2: |
5d7e3d71 |
src = seq_unpack_rle_block(src, src_end, block, sizeof(block)); |
29f86228 |
for (i = 0; i < 8; i++) {
for (b = 0; b < 8; b++) |
7bd2f502 |
dst[b * seq->frame.linesize[0]] = block[i * 8 + b]; |
29f86228 |
++dst;
}
break;
}
} else { |
5d7e3d71 |
if (len <= 0)
return NULL;
bits = ff_log2_tab[len - 1] + 1;
if (src_end - src < len + 8 * bits)
return NULL; |
29f86228 |
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;
}
|
5d7e3d71 |
static const unsigned char *seq_decode_op2(SeqVideoContext *seq,
const unsigned char *src,
const unsigned char *src_end,
unsigned char *dst) |
29f86228 |
{
int i;
|
5d7e3d71 |
if (src_end - src < 8 * 8)
return NULL;
|
29f86228 |
for (i = 0; i < 8; i++) {
memcpy(dst, src, 8);
src += 8;
dst += seq->frame.linesize[0];
}
return src;
}
|
5d7e3d71 |
static const unsigned char *seq_decode_op3(SeqVideoContext *seq,
const unsigned char *src,
const unsigned char *src_end,
unsigned char *dst) |
29f86228 |
{
int pos, offset;
do { |
5d7e3d71 |
if (src_end - src < 2)
return NULL; |
29f86228 |
pos = *src++;
offset = ((pos >> 3) & 7) * seq->frame.linesize[0] + (pos & 7);
dst[offset] = *src++;
} while (!(pos & 0x80));
return src;
}
|
5d7e3d71 |
static int seqvideo_decode(SeqVideoContext *seq, const unsigned char *data, int data_size) |
29f86228 |
{ |
5d7e3d71 |
const unsigned char *data_end = data + data_size; |
29f86228 |
GetBitContext gb;
int flags, i, j, x, y, op;
unsigned char c[3];
unsigned char *dst; |
7bd2f502 |
uint32_t *palette; |
29f86228 |
flags = *data++;
if (flags & 1) { |
7bd2f502 |
palette = (uint32_t *)seq->frame.data[1]; |
5d7e3d71 |
if (data_end - data < 256 * 3)
return AVERROR_INVALIDDATA; |
29f86228 |
for (i = 0; i < 256; i++) {
for (j = 0; j < 3; j++, data++)
c[j] = (*data << 2) | (*data >> 4); |
b12d92ef |
palette[i] = 0xFFU << 24 | AV_RB24(c); |
29f86228 |
}
seq->frame.palette_has_changed = 1;
}
if (flags & 2) { |
5d7e3d71 |
if (data_end - data < 128)
return AVERROR_INVALIDDATA; |
29f86228 |
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: |
5d7e3d71 |
data = seq_decode_op1(seq, data, data_end, dst); |
29f86228 |
break;
case 2: |
5d7e3d71 |
data = seq_decode_op2(seq, data, data_end, dst); |
29f86228 |
break;
case 3: |
5d7e3d71 |
data = seq_decode_op3(seq, data, data_end, dst); |
29f86228 |
break;
} |
5d7e3d71 |
if (!data)
return AVERROR_INVALIDDATA; |
29f86228 |
}
} |
5d7e3d71 |
return 0; |
29f86228 |
}
|
98a6fff9 |
static av_cold int seqvideo_decode_init(AVCodecContext *avctx) |
29f86228 |
{ |
e4141433 |
SeqVideoContext *seq = avctx->priv_data; |
29f86228 |
seq->avctx = avctx; |
716d413c |
avctx->pix_fmt = AV_PIX_FMT_PAL8; |
29f86228 |
|
01042d41 |
avcodec_get_frame_defaults(&seq->frame); |
29f86228 |
seq->frame.data[0] = NULL;
return 0;
}
|
ce83d48b |
static int seqvideo_decode_frame(AVCodecContext *avctx, |
df9b9567 |
void *data, int *got_frame, |
7a00bbad |
AVPacket *avpkt) |
29f86228 |
{ |
7a00bbad |
const uint8_t *buf = avpkt->data;
int buf_size = avpkt->size; |
29f86228 |
|
e4141433 |
SeqVideoContext *seq = avctx->priv_data; |
29f86228 |
|
371e1654 |
seq->frame.reference = 3; |
29f86228 |
seq->frame.buffer_hints = FF_BUFFER_HINTS_VALID | FF_BUFFER_HINTS_PRESERVE | FF_BUFFER_HINTS_REUSABLE;
if (avctx->reget_buffer(avctx, &seq->frame)) { |
85761efa |
av_log(seq->avctx, AV_LOG_ERROR, "reget_buffer() failed\n"); |
29f86228 |
return -1;
}
|
5d7e3d71 |
if (seqvideo_decode(seq, buf, buf_size))
return AVERROR_INVALIDDATA; |
29f86228 |
|
df9b9567 |
*got_frame = 1; |
29f86228 |
*(AVFrame *)data = seq->frame;
return buf_size;
}
|
ce83d48b |
static av_cold int seqvideo_decode_end(AVCodecContext *avctx) |
29f86228 |
{ |
e4141433 |
SeqVideoContext *seq = avctx->priv_data; |
29f86228 |
if (seq->frame.data[0])
avctx->release_buffer(avctx, &seq->frame);
return 0;
}
|
e7e2df27 |
AVCodec ff_tiertexseqvideo_decoder = { |
ec6402b7 |
.name = "tiertexseqvideo",
.type = AVMEDIA_TYPE_VIDEO, |
36ef5369 |
.id = AV_CODEC_ID_TIERTEXSEQVIDEO, |
ec6402b7 |
.priv_data_size = sizeof(SeqVideoContext),
.init = seqvideo_decode_init,
.close = seqvideo_decode_end,
.decode = seqvideo_decode_frame,
.capabilities = CODEC_CAP_DR1, |
00c3b67b |
.long_name = NULL_IF_CONFIG_SMALL("Tiertex Limited SEQ video"), |
29f86228 |
}; |