Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / libavcodec / rv30.c
1 /*
2  * RV30 decoder
3  * Copyright (c) 2007 Konstantin Shishkov
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  * RV30 decoder
25  */
26
27 #include "avcodec.h"
28 #include "dsputil.h"
29 #include "mpegvideo.h"
30 #include "golomb.h"
31
32 #include "rv34.h"
33 #include "rv30data.h"
34
35
36 static int rv30_parse_slice_header(RV34DecContext *r, GetBitContext *gb, SliceInfo *si)
37 {
38     int mb_bits;
39     int w = r->s.width, h = r->s.height;
40     int mb_size;
41     int rpr;
42
43     memset(si, 0, sizeof(SliceInfo));
44     if(get_bits(gb, 3))
45         return -1;
46     si->type = get_bits(gb, 2);
47     if(si->type == 1) si->type = 0;
48     if(get_bits1(gb))
49         return -1;
50     si->quant = get_bits(gb, 5);
51     skip_bits1(gb);
52     si->pts = get_bits(gb, 13);
53     rpr = get_bits(gb, r->rpr);
54     if (r->s.avctx->extradata_size < 8 + rpr*2) {
55         av_log(r->s.avctx, AV_LOG_WARNING,
56                "Extradata does not contain selected resolution\n");
57         rpr = 0;
58     }
59     if(rpr){
60         w = r->s.avctx->extradata[6 + rpr*2] << 2;
61         h = r->s.avctx->extradata[7 + rpr*2] << 2;
62     }
63     si->width  = w;
64     si->height = h;
65     mb_size = ((w + 15) >> 4) * ((h + 15) >> 4);
66     mb_bits = ff_rv34_get_start_offset(gb, mb_size);
67     si->start = get_bits(gb, mb_bits);
68     skip_bits1(gb);
69     return 0;
70 }
71
72 /**
73  * Decode 4x4 intra types array.
74  */
75 static int rv30_decode_intra_types(RV34DecContext *r, GetBitContext *gb, int8_t *dst)
76 {
77     int i, j, k;
78
79     for(i = 0; i < 4; i++, dst += r->intra_types_stride - 4){
80         for(j = 0; j < 4; j+= 2){
81             int code = svq3_get_ue_golomb(gb) << 1;
82             if(code > 80U*2U){
83                 av_log(r->s.avctx, AV_LOG_ERROR, "Incorrect intra prediction code\n");
84                 return -1;
85             }
86             for(k = 0; k < 2; k++){
87                 int A = dst[-r->intra_types_stride] + 1;
88                 int B = dst[-1] + 1;
89                 *dst++ = rv30_itype_from_context[A * 90 + B * 9 + rv30_itype_code[code + k]];
90                 if(dst[-1] == 9){
91                     av_log(r->s.avctx, AV_LOG_ERROR, "Incorrect intra prediction mode\n");
92                     return -1;
93                 }
94             }
95         }
96     }
97     return 0;
98 }
99
100 /**
101  * Decode macroblock information.
102  */
103 static int rv30_decode_mb_info(RV34DecContext *r)
104 {
105     static const int rv30_p_types[6] = { RV34_MB_SKIP, RV34_MB_P_16x16, RV34_MB_P_8x8, -1, RV34_MB_TYPE_INTRA, RV34_MB_TYPE_INTRA16x16 };
106     static const int rv30_b_types[6] = { RV34_MB_SKIP, RV34_MB_B_DIRECT, RV34_MB_B_FORWARD, RV34_MB_B_BACKWARD, RV34_MB_TYPE_INTRA, RV34_MB_TYPE_INTRA16x16 };
107     MpegEncContext *s = &r->s;
108     GetBitContext *gb = &s->gb;
109     int code = svq3_get_ue_golomb(gb);
110
111     if(code > 11U){
112         av_log(s->avctx, AV_LOG_ERROR, "Incorrect MB type code\n");
113         return -1;
114     }
115     if(code > 5){
116         av_log(s->avctx, AV_LOG_ERROR, "dquant needed\n");
117         code -= 6;
118     }
119     if(s->pict_type != AV_PICTURE_TYPE_B)
120         return rv30_p_types[code];
121     else
122         return rv30_b_types[code];
123 }
124
125 static inline void rv30_weak_loop_filter(uint8_t *src, const int step,
126                                          const int stride, const int lim)
127 {
128     uint8_t *cm = ff_cropTbl + MAX_NEG_CROP;
129     int i, diff;
130
131     for(i = 0; i < 4; i++){
132         diff = ((src[-2*step] - src[1*step]) - (src[-1*step] - src[0*step])*4) >> 3;
133         diff = av_clip(diff, -lim, lim);
134         src[-1*step] = cm[src[-1*step] + diff];
135         src[ 0*step] = cm[src[ 0*step] - diff];
136         src += stride;
137     }
138 }
139
140 static void rv30_loop_filter(RV34DecContext *r, int row)
141 {
142     MpegEncContext *s = &r->s;
143     int mb_pos, mb_x;
144     int i, j, k;
145     uint8_t *Y, *C;
146     int loc_lim, cur_lim, left_lim = 0, top_lim = 0;
147
148     mb_pos = row * s->mb_stride;
149     for(mb_x = 0; mb_x < s->mb_width; mb_x++, mb_pos++){
150         int mbtype = s->current_picture_ptr->f.mb_type[mb_pos];
151         if(IS_INTRA(mbtype) || IS_SEPARATE_DC(mbtype))
152             r->deblock_coefs[mb_pos] = 0xFFFF;
153         if(IS_INTRA(mbtype))
154             r->cbp_chroma[mb_pos] = 0xFF;
155     }
156
157     /* all vertical edges are filtered first
158      * and horizontal edges are filtered on the next iteration
159      */
160     mb_pos = row * s->mb_stride;
161     for(mb_x = 0; mb_x < s->mb_width; mb_x++, mb_pos++){
162         cur_lim = rv30_loop_filt_lim[s->current_picture_ptr->f.qscale_table[mb_pos]];
163         if(mb_x)
164             left_lim = rv30_loop_filt_lim[s->current_picture_ptr->f.qscale_table[mb_pos - 1]];
165         for(j = 0; j < 16; j += 4){
166             Y = s->current_picture_ptr->f.data[0] + mb_x*16 + (row*16 + j) * s->linesize + 4 * !mb_x;
167             for(i = !mb_x; i < 4; i++, Y += 4){
168                 int ij = i + j;
169                 loc_lim = 0;
170                 if(r->deblock_coefs[mb_pos] & (1 << ij))
171                     loc_lim = cur_lim;
172                 else if(!i && r->deblock_coefs[mb_pos - 1] & (1 << (ij + 3)))
173                     loc_lim = left_lim;
174                 else if( i && r->deblock_coefs[mb_pos]     & (1 << (ij - 1)))
175                     loc_lim = cur_lim;
176                 if(loc_lim)
177                     rv30_weak_loop_filter(Y, 1, s->linesize, loc_lim);
178             }
179         }
180         for(k = 0; k < 2; k++){
181             int cur_cbp, left_cbp = 0;
182             cur_cbp = (r->cbp_chroma[mb_pos] >> (k*4)) & 0xF;
183             if(mb_x)
184                 left_cbp = (r->cbp_chroma[mb_pos - 1] >> (k*4)) & 0xF;
185             for(j = 0; j < 8; j += 4){
186                 C = s->current_picture_ptr->f.data[k + 1] + mb_x*8 + (row*8 + j) * s->uvlinesize + 4 * !mb_x;
187                 for(i = !mb_x; i < 2; i++, C += 4){
188                     int ij = i + (j >> 1);
189                     loc_lim = 0;
190                     if(cur_cbp && (1 << ij))
191                         loc_lim = cur_lim;
192                     else if(!i && left_cbp & (1 << (ij + 1)))
193                         loc_lim = left_lim;
194                     else if( i && cur_cbp  & (1 << (ij - 1)))
195                         loc_lim = cur_lim;
196                     if(loc_lim)
197                         rv30_weak_loop_filter(C, 1, s->uvlinesize, loc_lim);
198                 }
199             }
200         }
201     }
202     mb_pos = row * s->mb_stride;
203     for(mb_x = 0; mb_x < s->mb_width; mb_x++, mb_pos++){
204         cur_lim = rv30_loop_filt_lim[s->current_picture_ptr->f.qscale_table[mb_pos]];
205         if(row)
206             top_lim = rv30_loop_filt_lim[s->current_picture_ptr->f.qscale_table[mb_pos - s->mb_stride]];
207         for(j = 4*!row; j < 16; j += 4){
208             Y = s->current_picture_ptr->f.data[0] + mb_x*16 + (row*16 + j) * s->linesize;
209             for(i = 0; i < 4; i++, Y += 4){
210                 int ij = i + j;
211                 loc_lim = 0;
212                 if(r->deblock_coefs[mb_pos] & (1 << ij))
213                     loc_lim = cur_lim;
214                 else if(!j && r->deblock_coefs[mb_pos - s->mb_stride] & (1 << (ij + 12)))
215                     loc_lim = top_lim;
216                 else if( j && r->deblock_coefs[mb_pos]                & (1 << (ij - 4)))
217                     loc_lim = cur_lim;
218                 if(loc_lim)
219                     rv30_weak_loop_filter(Y, s->linesize, 1, loc_lim);
220             }
221         }
222         for(k = 0; k < 2; k++){
223             int cur_cbp, top_cbp = 0;
224             cur_cbp = (r->cbp_chroma[mb_pos] >> (k*4)) & 0xF;
225             if(row)
226                 top_cbp = (r->cbp_chroma[mb_pos - s->mb_stride] >> (k*4)) & 0xF;
227             for(j = 4*!row; j < 8; j += 4){
228                 C = s->current_picture_ptr->f.data[k+1] + mb_x*8 + (row*8 + j) * s->uvlinesize;
229                 for(i = 0; i < 2; i++, C += 4){
230                     int ij = i + (j >> 1);
231                     loc_lim = 0;
232                     if(r->cbp_chroma[mb_pos] && (1 << ij))
233                         loc_lim = cur_lim;
234                     else if(!j && top_cbp & (1 << (ij + 2)))
235                         loc_lim = top_lim;
236                     else if( j && cur_cbp & (1 << (ij - 2)))
237                         loc_lim = cur_lim;
238                     if(loc_lim)
239                         rv30_weak_loop_filter(C, s->uvlinesize, 1, loc_lim);
240                 }
241             }
242         }
243     }
244 }
245
246 /**
247  * Initialize decoder.
248  */
249 static av_cold int rv30_decode_init(AVCodecContext *avctx)
250 {
251     RV34DecContext *r = avctx->priv_data;
252
253     r->rv30 = 1;
254     ff_rv34_decode_init(avctx);
255     if(avctx->extradata_size < 2){
256         av_log(avctx, AV_LOG_ERROR, "Extradata is too small.\n");
257         return -1;
258     }
259     r->rpr = (avctx->extradata[1] & 7) >> 1;
260     r->rpr = FFMIN(r->rpr + 1, 3);
261     if(avctx->extradata_size - 8 < (r->rpr - 1) * 2){
262         av_log(avctx, AV_LOG_ERROR, "Insufficient extradata - need at least %d bytes, got %d\n",
263                6 + r->rpr * 2, avctx->extradata_size);
264     }
265     r->parse_slice_header = rv30_parse_slice_header;
266     r->decode_intra_types = rv30_decode_intra_types;
267     r->decode_mb_info     = rv30_decode_mb_info;
268     r->loop_filter        = rv30_loop_filter;
269     r->luma_dc_quant_i = rv30_luma_dc_quant;
270     r->luma_dc_quant_p = rv30_luma_dc_quant;
271     return 0;
272 }
273
274 AVCodec ff_rv30_decoder = {
275     .name                  = "rv30",
276     .type                  = AVMEDIA_TYPE_VIDEO,
277     .id                    = AV_CODEC_ID_RV30,
278     .priv_data_size        = sizeof(RV34DecContext),
279     .init                  = rv30_decode_init,
280     .close                 = ff_rv34_decode_end,
281     .decode                = ff_rv34_decode_frame,
282     .capabilities          = CODEC_CAP_DR1 | CODEC_CAP_DELAY |
283                              CODEC_CAP_FRAME_THREADS,
284     .flush                 = ff_mpeg_flush,
285     .long_name             = NULL_IF_CONFIG_SMALL("RealVideo 3.0"),
286     .pix_fmts              = ff_pixfmt_list_420,
287     .init_thread_copy      = ONLY_IF_THREADS_ENABLED(ff_rv34_decode_init_thread_copy),
288     .update_thread_context = ONLY_IF_THREADS_ENABLED(ff_rv34_decode_update_thread_context),
289 };