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