pineapple-src/externals/ffmpeg/libavcodec/bintext.c
2021-02-09 04:25:58 +01:00

252 lines
7.6 KiB
C
Executable file

/*
* Binary text decoder
* eXtended BINary text (XBIN) decoder
* iCEDraw File decoder
* Copyright (c) 2010 Peter Ross (pross@xvid.org)
*
* 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
* Binary text decoder
* eXtended BINary text (XBIN) decoder
* iCEDraw File decoder
*/
#include "libavutil/intreadwrite.h"
#include "libavutil/xga_font_data.h"
#include "avcodec.h"
#include "cga_data.h"
#include "bintext.h"
#include "internal.h"
#define FONT_WIDTH 8
typedef struct XbinContext {
AVFrame *frame;
int palette[16];
int flags;
int font_height;
const uint8_t *font;
int x, y;
} XbinContext;
static av_cold int decode_init(AVCodecContext *avctx)
{
XbinContext *s = avctx->priv_data;
uint8_t *p;
int i;
avctx->pix_fmt = AV_PIX_FMT_PAL8;
p = avctx->extradata;
if (p) {
s->font_height = p[0];
s->flags = p[1];
p += 2;
if(avctx->extradata_size < 2 + (!!(s->flags & BINTEXT_PALETTE))*3*16
+ (!!(s->flags & BINTEXT_FONT))*s->font_height*256) {
av_log(avctx, AV_LOG_ERROR, "not enough extradata\n");
return AVERROR_INVALIDDATA;
}
if (!s->font_height) {
av_log(avctx, AV_LOG_ERROR, "invalid font height\n");
return AVERROR_INVALIDDATA;
}
} else {
s->font_height = 8;
s->flags = 0;
}
if ((s->flags & BINTEXT_PALETTE)) {
for (i = 0; i < 16; i++) {
s->palette[i] = 0xFF000000 | (AV_RB24(p) << 2) | ((AV_RB24(p) >> 4) & 0x30303);
p += 3;
}
} else {
for (i = 0; i < 16; i++)
s->palette[i] = 0xFF000000 | ff_cga_palette[i];
}
if ((s->flags & BINTEXT_FONT)) {
s->font = p;
} else {
switch(s->font_height) {
default:
av_log(avctx, AV_LOG_WARNING, "font height %i not supported\n", s->font_height);
s->font_height = 8;
case 8:
s->font = avpriv_cga_font;
break;
case 16:
s->font = avpriv_vga16_font;
break;
}
}
if (avctx->width < FONT_WIDTH || avctx->height < s->font_height) {
av_log(avctx, AV_LOG_ERROR, "Resolution too small for font.\n");
return AVERROR_INVALIDDATA;
}
return 0;
}
#define DEFAULT_BG_COLOR 0
av_unused static void hscroll(AVCodecContext *avctx)
{
XbinContext *s = avctx->priv_data;
if (s->y < avctx->height - s->font_height) {
s->y += s->font_height;
} else {
memmove(s->frame->data[0], s->frame->data[0] + s->font_height*s->frame->linesize[0],
(avctx->height - s->font_height)*s->frame->linesize[0]);
memset(s->frame->data[0] + (avctx->height - s->font_height)*s->frame->linesize[0],
DEFAULT_BG_COLOR, s->font_height * s->frame->linesize[0]);
}
}
/**
* Draw character to screen
*/
static void draw_char(AVCodecContext *avctx, int c, int a)
{
XbinContext *s = avctx->priv_data;
if (s->y > avctx->height - s->font_height)
return;
ff_draw_pc_font(s->frame->data[0] + s->y * s->frame->linesize[0] + s->x,
s->frame->linesize[0], s->font, s->font_height, c,
a & 0x0F, a >> 4);
s->x += FONT_WIDTH;
if (s->x > avctx->width - FONT_WIDTH) {
s->x = 0;
s->y += s->font_height;
}
}
static int decode_frame(AVCodecContext *avctx,
void *data, int *got_frame,
AVPacket *avpkt)
{
XbinContext *s = avctx->priv_data;
const uint8_t *buf = avpkt->data;
int buf_size = avpkt->size;
const uint8_t *buf_end = buf+buf_size;
int ret;
if ((avctx->width / FONT_WIDTH) * (avctx->height / s->font_height) / 256 > buf_size)
return AVERROR_INVALIDDATA;
s->frame = data;
s->x = s->y = 0;
if ((ret = ff_get_buffer(avctx, s->frame, 0)) < 0)
return ret;
s->frame->pict_type = AV_PICTURE_TYPE_I;
s->frame->palette_has_changed = 1;
memcpy(s->frame->data[1], s->palette, 16 * 4);
if (avctx->codec_id == AV_CODEC_ID_XBIN) {
while (buf + 2 < buf_end) {
int i,c,a;
int type = *buf >> 6;
int count = (*buf & 0x3F) + 1;
buf++;
switch (type) {
case 0: //no compression
for (i = 0; i < count && buf + 1 < buf_end; i++) {
draw_char(avctx, buf[0], buf[1]);
buf += 2;
}
break;
case 1: //character compression
c = *buf++;
for (i = 0; i < count && buf < buf_end; i++)
draw_char(avctx, c, *buf++);
break;
case 2: //attribute compression
a = *buf++;
for (i = 0; i < count && buf < buf_end; i++)
draw_char(avctx, *buf++, a);
break;
case 3: //character/attribute compression
c = *buf++;
a = *buf++;
for (i = 0; i < count && buf < buf_end; i++)
draw_char(avctx, c, a);
break;
}
}
} else if (avctx->codec_id == AV_CODEC_ID_IDF) {
while (buf + 2 < buf_end) {
if (AV_RL16(buf) == 1) {
int i;
if (buf + 6 > buf_end)
break;
for (i = 0; i < buf[2]; i++)
draw_char(avctx, buf[4], buf[5]);
buf += 6;
} else {
draw_char(avctx, buf[0], buf[1]);
buf += 2;
}
}
} else {
while (buf + 1 < buf_end) {
draw_char(avctx, buf[0], buf[1]);
buf += 2;
}
}
*got_frame = 1;
return buf_size;
}
#if CONFIG_BINTEXT_DECODER
AVCodec ff_bintext_decoder = {
.name = "bintext",
.long_name = NULL_IF_CONFIG_SMALL("Binary text"),
.type = AVMEDIA_TYPE_VIDEO,
.id = AV_CODEC_ID_BINTEXT,
.priv_data_size = sizeof(XbinContext),
.init = decode_init,
.decode = decode_frame,
.capabilities = AV_CODEC_CAP_DR1,
};
#endif
#if CONFIG_XBIN_DECODER
AVCodec ff_xbin_decoder = {
.name = "xbin",
.long_name = NULL_IF_CONFIG_SMALL("eXtended BINary text"),
.type = AVMEDIA_TYPE_VIDEO,
.id = AV_CODEC_ID_XBIN,
.priv_data_size = sizeof(XbinContext),
.init = decode_init,
.decode = decode_frame,
.capabilities = AV_CODEC_CAP_DR1,
};
#endif
#if CONFIG_IDF_DECODER
AVCodec ff_idf_decoder = {
.name = "idf",
.long_name = NULL_IF_CONFIG_SMALL("iCEDraw text"),
.type = AVMEDIA_TYPE_VIDEO,
.id = AV_CODEC_ID_IDF,
.priv_data_size = sizeof(XbinContext),
.init = decode_init,
.decode = decode_frame,
.capabilities = AV_CODEC_CAP_DR1,
};
#endif