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