xref: /third_party/ffmpeg/libavcodec/rv30.c (revision cabdff1a)
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
38static 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 */
88static 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 */
116static 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
138static 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
153static 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 */
262static 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
294const 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