Don't include common.h from avutil.h
[ffmpeg.git] / libavcodec / 8bps.c
1 /*
2  * Quicktime Planar RGB (8BPS) Video Decoder
3  * Copyright (C) 2003 Roberto Togni
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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  * Libav 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 Libav; 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  * QT 8BPS Video Decoder by Roberto Togni
25  * For more information about the 8BPS format, visit:
26  *   http://www.pcisys.net/~melanson/codecs/
27  *
28  * Supports: PAL8 (RGB 8bpp, paletted)
29  *         : BGR24 (RGB 24bpp) (can also output it as RGB32)
30  *         : RGB32 (RGB 32bpp, 4th plane is probably alpha and it's ignored)
31  *
32  */
33
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <string.h>
37
38 #include "libavutil/internal.h"
39 #include "libavutil/intreadwrite.h"
40 #include "avcodec.h"
41
42
43 static const enum PixelFormat pixfmt_rgb24[] = {
44     PIX_FMT_BGR24, PIX_FMT_RGB32, PIX_FMT_NONE };
45
46 /*
47  * Decoder context
48  */
49 typedef struct EightBpsContext {
50     AVCodecContext *avctx;
51     AVFrame pic;
52
53     unsigned char planes;
54     unsigned char planemap[4];
55
56     uint32_t pal[256];
57 } EightBpsContext;
58
59
60 /*
61  *
62  * Decode a frame
63  *
64  */
65 static int decode_frame(AVCodecContext *avctx, void *data,
66                         int *data_size, AVPacket *avpkt)
67 {
68     const uint8_t *buf = avpkt->data;
69     int buf_size       = avpkt->size;
70     EightBpsContext * const c = avctx->priv_data;
71     const unsigned char *encoded = buf;
72     unsigned char *pixptr, *pixptr_end;
73     unsigned int height = avctx->height; // Real image height
74     unsigned int dlen, p, row;
75     const unsigned char *lp, *dp;
76     unsigned char count;
77     unsigned int px_inc;
78     unsigned int planes     = c->planes;
79     unsigned char *planemap = c->planemap;
80
81     if (c->pic.data[0])
82         avctx->release_buffer(avctx, &c->pic);
83
84     c->pic.reference    = 0;
85     c->pic.buffer_hints = FF_BUFFER_HINTS_VALID;
86     if (avctx->get_buffer(avctx, &c->pic) < 0){
87         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
88         return -1;
89     }
90
91     /* Set data pointer after line lengths */
92     dp = encoded + planes * (height << 1);
93
94     /* Ignore alpha plane, don't know what to do with it */
95     if (planes == 4)
96         planes--;
97
98     px_inc = planes + (avctx->pix_fmt == PIX_FMT_RGB32);
99
100     for (p = 0; p < planes; p++) {
101         /* Lines length pointer for this plane */
102         lp = encoded + p * (height << 1);
103
104         /* Decode a plane */
105         for (row = 0; row < height; row++) {
106             pixptr = c->pic.data[0] + row * c->pic.linesize[0] + planemap[p];
107             pixptr_end = pixptr + c->pic.linesize[0];
108             dlen = av_be2ne16(*(const unsigned short *)(lp + row * 2));
109             /* Decode a row of this plane */
110             while (dlen > 0) {
111                 if (dp + 1 >= buf + buf_size)
112                     return -1;
113                 if ((count = *dp++) <= 127) {
114                     count++;
115                     dlen -= count + 1;
116                     if (pixptr + count * px_inc > pixptr_end)
117                         break;
118                     if (dp + count > buf + buf_size)
119                         return -1;
120                     while (count--) {
121                         *pixptr = *dp++;
122                         pixptr += px_inc;
123                     }
124                 } else {
125                     count = 257 - count;
126                     if (pixptr + count * px_inc > pixptr_end)
127                         break;
128                     while (count--) {
129                         *pixptr = *dp;
130                         pixptr += px_inc;
131                     }
132                     dp++;
133                     dlen -= 2;
134                 }
135             }
136         }
137     }
138
139     if (avctx->bits_per_coded_sample <= 8) {
140         const uint8_t *pal = av_packet_get_side_data(avpkt,
141                                                      AV_PKT_DATA_PALETTE,
142                                                      NULL);
143         if (pal) {
144             c->pic.palette_has_changed = 1;
145             memcpy(c->pal, pal, AVPALETTE_SIZE);
146         }
147
148         memcpy (c->pic.data[1], c->pal, AVPALETTE_SIZE);
149     }
150
151     *data_size = sizeof(AVFrame);
152     *(AVFrame*)data = c->pic;
153
154     /* always report that the buffer was completely consumed */
155     return buf_size;
156 }
157
158
159 /*
160  *
161  * Init 8BPS decoder
162  *
163  */
164 static av_cold int decode_init(AVCodecContext *avctx)
165 {
166     EightBpsContext * const c = avctx->priv_data;
167
168     c->avctx       = avctx;
169     c->pic.data[0] = NULL;
170
171     switch (avctx->bits_per_coded_sample) {
172     case 8:
173         avctx->pix_fmt = PIX_FMT_PAL8;
174         c->planes      = 1;
175         c->planemap[0] = 0; // 1st plane is palette indexes
176         break;
177     case 24:
178         avctx->pix_fmt = avctx->get_format(avctx, pixfmt_rgb24);
179         c->planes      = 3;
180         c->planemap[0] = 2; // 1st plane is red
181         c->planemap[1] = 1; // 2nd plane is green
182         c->planemap[2] = 0; // 3rd plane is blue
183         break;
184     case 32:
185         avctx->pix_fmt = PIX_FMT_RGB32;
186         c->planes      = 4;
187 #if HAVE_BIGENDIAN
188         c->planemap[0] = 1; // 1st plane is red
189         c->planemap[1] = 2; // 2nd plane is green
190         c->planemap[2] = 3; // 3rd plane is blue
191         c->planemap[3] = 0; // 4th plane is alpha???
192 #else
193         c->planemap[0] = 2; // 1st plane is red
194         c->planemap[1] = 1; // 2nd plane is green
195         c->planemap[2] = 0; // 3rd plane is blue
196         c->planemap[3] = 3; // 4th plane is alpha???
197 #endif
198         break;
199     default:
200         av_log(avctx, AV_LOG_ERROR, "Error: Unsupported color depth: %u.\n",
201                avctx->bits_per_coded_sample);
202         return -1;
203     }
204
205     return 0;
206 }
207
208
209
210
211 /*
212  *
213  * Uninit 8BPS decoder
214  *
215  */
216 static av_cold int decode_end(AVCodecContext *avctx)
217 {
218     EightBpsContext * const c = avctx->priv_data;
219
220     if (c->pic.data[0])
221         avctx->release_buffer(avctx, &c->pic);
222
223     return 0;
224 }
225
226
227
228 AVCodec ff_eightbps_decoder = {
229     .name           = "8bps",
230     .type           = AVMEDIA_TYPE_VIDEO,
231     .id             = AV_CODEC_ID_8BPS,
232     .priv_data_size = sizeof(EightBpsContext),
233     .init           = decode_init,
234     .close          = decode_end,
235     .decode         = decode_frame,
236     .capabilities   = CODEC_CAP_DR1,
237     .long_name      = NULL_IF_CONFIG_SMALL("QuickTime 8BPS video"),
238 };