Miro VideoXL (VIXL) decoder, courtesy of Konstantin Shishkov
[ffmpeg.git] / libavcodec / xl.c
1 /*
2  * Miro VideoXL codec
3  * Copyright (c) 2004 Konstantin Shishkov
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  *
19  */
20  
21 /**
22  * @file xl.c
23  * Miro VideoXL codec.
24  */
25  
26 #include "avcodec.h"
27 #include "mpegvideo.h"
28
29 typedef struct VideoXLContext{
30     AVCodecContext *avctx;
31     AVFrame pic;
32 } VideoXLContext;
33
34 const int xl_table[32] = {
35    0,   1,   2,   3,   4,   5,   6,   7,
36    8,   9,  12,  15,  20,  25,  34,  46,
37   64,  82,  94, 103, 108, 113, 116, 119,
38  120, 121, 122, 123, 124, 125, 126, 127};
39
40 static int decode_frame(AVCodecContext *avctx, 
41                         void *data, int *data_size,
42                         uint8_t *buf, int buf_size)
43 {
44     VideoXLContext * const a = avctx->priv_data;
45     AVFrame * const p= (AVFrame*)&a->pic;
46     uint8_t *Y, *U, *V;
47     int i, j;
48     int stride;
49     uint32_t val;
50     int y0, y1, y2, y3, c0, c1;
51         
52     
53     /* special case for last picture */
54     if (buf_size == 0) {
55         return 0;
56     }
57
58     if(p->data[0])
59         avctx->release_buffer(avctx, p);
60
61     p->reference = 0;
62     if(avctx->get_buffer(avctx, p) < 0){
63         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
64         return -1;
65     }
66     p->pict_type= I_TYPE;
67     p->key_frame= 1;
68
69     Y = a->pic.data[0];
70     U = a->pic.data[1];
71     V = a->pic.data[2];
72     
73     stride = avctx->width - 4;
74     for (i = 0; i < avctx->height; i++) {
75         /* lines are stored in reversed order */
76         buf += stride;
77         
78         for (j = 0; j < avctx->width; j += 4) {
79             /* value is stored in LE dword with word swapped */
80             val = LE_32(buf);
81             buf -= 4;
82             val = ((val >> 16) & 0xFFFF) | ((val & 0xFFFF) << 16);
83     
84             if(!j)
85                 y0 = (val & 0x1F) << 2;
86             else
87                 y0 = y3 + xl_table[val & 0x1F];
88             val >>= 5;
89             y1 = y0 + xl_table[val & 0x1F];
90             val >>= 5;
91             y2 = y1 + xl_table[val & 0x1F];
92             val >>= 6; /* align to word */
93             y3 = y2 + xl_table[val & 0x1F];
94             val >>= 5;
95             if(!j)
96                 c0 = (val & 0x1F) << 2;
97             else
98                 c0 += xl_table[val & 0x1F];
99             val >>= 5;
100             if(!j)
101                 c1 = (val & 0x1F) << 2;
102             else
103                 c1 += xl_table[val & 0x1F];
104             
105             Y[j + 0] = y0 << 1;
106             Y[j + 1] = y1 << 1;
107             Y[j + 2] = y2 << 1;
108             Y[j + 3] = y3 << 1;
109             
110             U[j >> 2] = c0 << 1;
111             V[j >> 2] = c1 << 1;
112         }
113         
114         buf += avctx->width + 4;
115         Y += a->pic.linesize[0];
116         U += a->pic.linesize[1];
117         V += a->pic.linesize[2];
118     }
119
120     *data_size = sizeof(AVFrame);
121     *(AVFrame*)data = a->pic;
122     
123     return buf_size;
124 }
125
126 static int decode_init(AVCodecContext *avctx){
127 //    VideoXLContext * const a = avctx->priv_data;
128
129     avctx->pix_fmt= PIX_FMT_YUV411P;
130
131     return 0;
132 }
133
134 AVCodec xl_decoder = {
135     "xl",
136     CODEC_TYPE_VIDEO,
137     CODEC_ID_VIXL,
138     sizeof(VideoXLContext),
139     decode_init,
140     NULL,
141     NULL,
142     decode_frame,
143     CODEC_CAP_DR1,
144 };