git.sesse.net Git - ffmpeg/blob - libavcodec/bfi.c

   1 /*
   2  * Brute Force & Ignorance (BFI) video decoder
   3  * Copyright (c) 2008 Sisir Koppaka
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 /**
  23  * @file
  24  * @brief Brute Force & Ignorance (.bfi) video decoder
  25  * @author Sisir Koppaka ( sisir.koppaka at gmail dot com )
  26  * @see http://wiki.multimedia.cx/index.php?title=BFI
  27  */
  28
  29 #include "libavutil/common.h"
  30 #include "avcodec.h"
  31 #include "bytestream.h"
  32
  33 typedef struct BFIContext {
  34     AVCodecContext *avctx;
  35     AVFrame frame;
  36     uint8_t *dst;
  37     uint32_t pal[256];
  38 } BFIContext;
  39
  40 static av_cold int bfi_decode_init(AVCodecContext *avctx)
  41 {
  42     BFIContext *bfi = avctx->priv_data;
  43     avctx->pix_fmt = PIX_FMT_PAL8;
  44     avcodec_get_frame_defaults(&bfi->frame);
  45     bfi->dst = av_mallocz(avctx->width * avctx->height);
  46     return 0;
  47 }
  48
  49 static int bfi_decode_frame(AVCodecContext *avctx, void *data,
  50                             int *data_size, AVPacket *avpkt)
  51 {
  52     GetByteContext g;
  53     int buf_size = avpkt->size;
  54     BFIContext *bfi = avctx->priv_data;
  55     uint8_t *dst = bfi->dst;
  56     uint8_t *src, *dst_offset, colour1, colour2;
  57     uint8_t *frame_end = bfi->dst + avctx->width * avctx->height;
  58     uint32_t *pal;
  59     int i, j, height = avctx->height;
  60
  61     if (bfi->frame.data[0])
  62         avctx->release_buffer(avctx, &bfi->frame);
  63
  64     bfi->frame.reference = 3;
  65
  66     if (avctx->get_buffer(avctx, &bfi->frame) < 0) {
  67         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
  68         return -1;
  69     }
  70
  71     bytestream2_init(&g, avpkt->data, buf_size);
  72
  73     /* Set frame parameters and palette, if necessary */
  74     if (!avctx->frame_number) {
  75         bfi->frame.pict_type = AV_PICTURE_TYPE_I;
  76         bfi->frame.key_frame = 1;
  77         /* Setting the palette */
  78         if (avctx->extradata_size > 768) {
  79             av_log(NULL, AV_LOG_ERROR, "Palette is too large.\n");
  80             return -1;
  81         }
  82         pal = (uint32_t *)bfi->frame.data[1];
  83         for (i = 0; i < avctx->extradata_size / 3; i++) {
  84             int shift = 16;
  85             *pal = 0xFF << 24;
  86             for (j = 0; j < 3; j++, shift -= 8)
  87                 *pal +=
  88                     ((avctx->extradata[i * 3 + j] << 2) |
  89                     (avctx->extradata[i * 3 + j] >> 4)) << shift;
  90             pal++;
  91         }
  92         memcpy(bfi->pal, bfi->frame.data[1], sizeof(bfi->pal));
  93         bfi->frame.palette_has_changed = 1;
  94     } else {
  95         bfi->frame.pict_type = AV_PICTURE_TYPE_P;
  96         bfi->frame.key_frame = 0;
  97         bfi->frame.palette_has_changed = 0;
  98         memcpy(bfi->frame.data[1], bfi->pal, sizeof(bfi->pal));
  99     }
 100
 101     bytestream2_skip(&g, 4); // Unpacked size, not required.
 102
 103     while (dst != frame_end) {
 104         static const uint8_t lentab[4] = { 0, 2, 0, 1 };
 105         unsigned int byte   = bytestream2_get_byte(&g), av_uninit(offset);
 106         unsigned int code   = byte >> 6;
 107         unsigned int length = byte & ~0xC0;
 108
 109         if (!bytestream2_get_bytes_left(&g)) {
 110             av_log(avctx, AV_LOG_ERROR,
 111                    "Input resolution larger than actual frame.\n");
 112             return -1;
 113         }
 114
 115         /* Get length and offset(if required) */
 116         if (length == 0) {
 117             if (code == 1) {
 118                 length = bytestream2_get_byte(&g);
 119                 offset = bytestream2_get_le16(&g);
 120             } else {
 121                 length = bytestream2_get_le16(&g);
 122                 if (code == 2 && length == 0)
 123                     break;
 124             }
 125         } else {
 126             if (code == 1)
 127                 offset = bytestream2_get_byte(&g);
 128         }
 129
 130         /* Do boundary check */
 131         if (dst + (length << lentab[code]) > frame_end)
 132             break;
 133
 134         switch (code) {
 135
 136         case 0:                //Normal Chain
 137             if (length >= bytestream2_get_bytes_left(&g)) {
 138                 av_log(avctx, AV_LOG_ERROR, "Frame larger than buffer.\n");
 139                 return -1;
 140             }
 141             bytestream2_get_buffer(&g, dst, length);
 142             dst += length;
 143             break;
 144
 145         case 1:                //Back Chain
 146             dst_offset = dst - offset;
 147             length *= 4;        //Convert dwords to bytes.
 148             if (dst_offset < bfi->dst)
 149                 break;
 150             while (length--)
 151                 *dst++ = *dst_offset++;
 152             break;
 153
 154         case 2:                //Skip Chain
 155             dst += length;
 156             break;
 157
 158         case 3:                //Fill Chain
 159             colour1 = bytestream2_get_byte(&g);
 160             colour2 = bytestream2_get_byte(&g);
 161             while (length--) {
 162                 *dst++ = colour1;
 163                 *dst++ = colour2;
 164             }
 165             break;
 166
 167         }
 168     }
 169
 170     src = bfi->dst;
 171     dst = bfi->frame.data[0];
 172     while (height--) {
 173         memcpy(dst, src, avctx->width);
 174         src += avctx->width;
 175         dst += bfi->frame.linesize[0];
 176     }
 177     *data_size = sizeof(AVFrame);
 178     *(AVFrame *)data = bfi->frame;
 179     return buf_size;
 180 }
 181
 182 static av_cold int bfi_decode_close(AVCodecContext * avctx)
 183 {
 184     BFIContext *bfi = avctx->priv_data;
 185     if (bfi->frame.data[0])
 186         avctx->release_buffer(avctx, &bfi->frame);
 187     av_free(bfi->dst);
 188     return 0;
 189 }
 190
 191 AVCodec ff_bfi_decoder = {
 192     .name = "bfi",
 193     .type = AVMEDIA_TYPE_VIDEO,
 194     .id = CODEC_ID_BFI,
 195     .priv_data_size = sizeof(BFIContext),
 196     .init = bfi_decode_init,
 197     .close = bfi_decode_close,
 198     .decode = bfi_decode_frame,
 199     .capabilities = CODEC_CAP_DR1,
 200     .long_name = NULL_IF_CONFIG_SMALL("Brute Force & Ignorance"),
 201 };