Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / 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 };