1/*
2 * Copyright (C) 2006  Aurelien Jacobs <aurel@gnuage.org>
3 *
4 * This file is part of Libav.
5 *
6 * Libav is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * Libav is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with Libav; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21/**
22 * @file
23 * VP5 and VP6 compatible video decoder (common features)
24 */
25
26#include "avcodec.h"
27#include "bytestream.h"
28
29#include "vp56.h"
30#include "vp56data.h"
31
32
33void ff_vp56_init_dequant(VP56Context *s, int quantizer)
34{
35    s->quantizer = quantizer;
36    s->dequant_dc = vp56_dc_dequant[quantizer] << 2;
37    s->dequant_ac = vp56_ac_dequant[quantizer] << 2;
38    memset(s->qscale_table, quantizer, s->mb_width);
39}
40
41static int vp56_get_vectors_predictors(VP56Context *s, int row, int col,
42                                       VP56Frame ref_frame)
43{
44    int nb_pred = 0;
45    VP56mv vect[2] = {{0,0}, {0,0}};
46    int pos, offset;
47    VP56mv mvp;
48
49    for (pos=0; pos<12; pos++) {
50        mvp.x = col + vp56_candidate_predictor_pos[pos][0];
51        mvp.y = row + vp56_candidate_predictor_pos[pos][1];
52        if (mvp.x < 0 || mvp.x >= s->mb_width ||
53            mvp.y < 0 || mvp.y >= s->mb_height)
54            continue;
55        offset = mvp.x + s->mb_width*mvp.y;
56
57        if (vp56_reference_frame[s->macroblocks[offset].type] != ref_frame)
58            continue;
59        if ((s->macroblocks[offset].mv.x == vect[0].x &&
60             s->macroblocks[offset].mv.y == vect[0].y) ||
61            (s->macroblocks[offset].mv.x == 0 &&
62             s->macroblocks[offset].mv.y == 0))
63            continue;
64
65        vect[nb_pred++] = s->macroblocks[offset].mv;
66        if (nb_pred > 1) {
67            nb_pred = -1;
68            break;
69        }
70        s->vector_candidate_pos = pos;
71    }
72
73    s->vector_candidate[0] = vect[0];
74    s->vector_candidate[1] = vect[1];
75
76    return nb_pred+1;
77}
78
79static void vp56_parse_mb_type_models(VP56Context *s)
80{
81    VP56RangeCoder *c = &s->c;
82    VP56Model *model = s->modelp;
83    int i, ctx, type;
84
85    for (ctx=0; ctx<3; ctx++) {
86        if (vp56_rac_get_prob(c, 174)) {
87            int idx = vp56_rac_gets(c, 4);
88            memcpy(model->mb_types_stats[ctx],
89                   vp56_pre_def_mb_type_stats[idx][ctx],
90                   sizeof(model->mb_types_stats[ctx]));
91        }
92        if (vp56_rac_get_prob(c, 254)) {
93            for (type=0; type<10; type++) {
94                for(i=0; i<2; i++) {
95                    if (vp56_rac_get_prob(c, 205)) {
96                        int delta, sign = vp56_rac_get(c);
97
98                        delta = vp56_rac_get_tree(c, vp56_pmbtm_tree,
99                                                  vp56_mb_type_model_model);
100                        if (!delta)
101                            delta = 4 * vp56_rac_gets(c, 7);
102                        model->mb_types_stats[ctx][type][i] += (delta ^ -sign) + sign;
103                    }
104                }
105            }
106        }
107    }
108
109    /* compute MB type probability tables based on previous MB type */
110    for (ctx=0; ctx<3; ctx++) {
111        int p[10];
112
113        for (type=0; type<10; type++)
114            p[type] = 100 * model->mb_types_stats[ctx][type][1];
115
116        for (type=0; type<10; type++) {
117            int p02, p34, p0234, p17, p56, p89, p5689, p156789;
118
119            /* conservative MB type probability */
120            model->mb_type[ctx][type][0] = 255 - (255 * model->mb_types_stats[ctx][type][0]) / (1 + model->mb_types_stats[ctx][type][0] + model->mb_types_stats[ctx][type][1]);
121
122            p[type] = 0;    /* same MB type => weight is null */
123
124            /* binary tree parsing probabilities */
125            p02 = p[0] + p[2];
126            p34 = p[3] + p[4];
127            p0234 = p02 + p34;
128            p17 = p[1] + p[7];
129            p56 = p[5] + p[6];
130            p89 = p[8] + p[9];
131            p5689 = p56 + p89;
132            p156789 = p17 + p5689;
133
134            model->mb_type[ctx][type][1] = 1 + 255 * p0234/(1+p0234+p156789);
135            model->mb_type[ctx][type][2] = 1 + 255 * p02  / (1+p0234);
136            model->mb_type[ctx][type][3] = 1 + 255 * p17  / (1+p156789);
137            model->mb_type[ctx][type][4] = 1 + 255 * p[0] / (1+p02);
138            model->mb_type[ctx][type][5] = 1 + 255 * p[3] / (1+p34);
139            model->mb_type[ctx][type][6] = 1 + 255 * p[1] / (1+p17);
140            model->mb_type[ctx][type][7] = 1 + 255 * p56  / (1+p5689);
141            model->mb_type[ctx][type][8] = 1 + 255 * p[5] / (1+p56);
142            model->mb_type[ctx][type][9] = 1 + 255 * p[8] / (1+p89);
143
144            /* restore initial value */
145            p[type] = 100 * model->mb_types_stats[ctx][type][1];
146        }
147    }
148}
149
150static VP56mb vp56_parse_mb_type(VP56Context *s,
151                                 VP56mb prev_type, int ctx)
152{
153    uint8_t *mb_type_model = s->modelp->mb_type[ctx][prev_type];
154    VP56RangeCoder *c = &s->c;
155
156    if (vp56_rac_get_prob(c, mb_type_model[0]))
157        return prev_type;
158    else
159        return vp56_rac_get_tree(c, vp56_pmbt_tree, mb_type_model);
160}
161
162static void vp56_decode_4mv(VP56Context *s, int row, int col)
163{
164    VP56mv mv = {0,0};
165    int type[4];
166    int b;
167
168    /* parse each block type */
169    for (b=0; b<4; b++) {
170        type[b] = vp56_rac_gets(&s->c, 2);
171        if (type[b])
172            type[b]++;  /* only returns 0, 2, 3 or 4 (all INTER_PF) */
173    }
174
175    /* get vectors */
176    for (b=0; b<4; b++) {
177        switch (type[b]) {
178            case VP56_MB_INTER_NOVEC_PF:
179                s->mv[b] = (VP56mv) {0,0};
180                break;
181            case VP56_MB_INTER_DELTA_PF:
182                s->parse_vector_adjustment(s, &s->mv[b]);
183                break;
184            case VP56_MB_INTER_V1_PF:
185                s->mv[b] = s->vector_candidate[0];
186                break;
187            case VP56_MB_INTER_V2_PF:
188                s->mv[b] = s->vector_candidate[1];
189                break;
190        }
191        mv.x += s->mv[b].x;
192        mv.y += s->mv[b].y;
193    }
194
195    /* this is the one selected for the whole MB for prediction */
196    s->macroblocks[row * s->mb_width + col].mv = s->mv[3];
197
198    /* chroma vectors are average luma vectors */
199    if (s->avctx->codec->id == CODEC_ID_VP5) {
200        s->mv[4].x = s->mv[5].x = RSHIFT(mv.x,2);
201        s->mv[4].y = s->mv[5].y = RSHIFT(mv.y,2);
202    } else {
203        s->mv[4] = s->mv[5] = (VP56mv) {mv.x/4, mv.y/4};
204    }
205}
206
207static VP56mb vp56_decode_mv(VP56Context *s, int row, int col)
208{
209    VP56mv *mv, vect = {0,0};
210    int ctx, b;
211
212    ctx = vp56_get_vectors_predictors(s, row, col, VP56_FRAME_PREVIOUS);
213    s->mb_type = vp56_parse_mb_type(s, s->mb_type, ctx);
214    s->macroblocks[row * s->mb_width + col].type = s->mb_type;
215
216    switch (s->mb_type) {
217        case VP56_MB_INTER_V1_PF:
218            mv = &s->vector_candidate[0];
219            break;
220
221        case VP56_MB_INTER_V2_PF:
222            mv = &s->vector_candidate[1];
223            break;
224
225        case VP56_MB_INTER_V1_GF:
226            vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
227            mv = &s->vector_candidate[0];
228            break;
229
230        case VP56_MB_INTER_V2_GF:
231            vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
232            mv = &s->vector_candidate[1];
233            break;
234
235        case VP56_MB_INTER_DELTA_PF:
236            s->parse_vector_adjustment(s, &vect);
237            mv = &vect;
238            break;
239
240        case VP56_MB_INTER_DELTA_GF:
241            vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
242            s->parse_vector_adjustment(s, &vect);
243            mv = &vect;
244            break;
245
246        case VP56_MB_INTER_4V:
247            vp56_decode_4mv(s, row, col);
248            return s->mb_type;
249
250        default:
251            mv = &vect;
252            break;
253    }
254
255    s->macroblocks[row*s->mb_width + col].mv = *mv;
256
257    /* same vector for all blocks */
258    for (b=0; b<6; b++)
259        s->mv[b] = *mv;
260
261    return s->mb_type;
262}
263
264static void vp56_add_predictors_dc(VP56Context *s, VP56Frame ref_frame)
265{
266    int idx = s->scantable.permutated[0];
267    int b;
268
269    for (b=0; b<6; b++) {
270        VP56RefDc *ab = &s->above_blocks[s->above_block_idx[b]];
271        VP56RefDc *lb = &s->left_block[vp56_b6to4[b]];
272        int count = 0;
273        int dc = 0;
274        int i;
275
276        if (ref_frame == lb->ref_frame) {
277            dc += lb->dc_coeff;
278            count++;
279        }
280        if (ref_frame == ab->ref_frame) {
281            dc += ab->dc_coeff;
282            count++;
283        }
284        if (s->avctx->codec->id == CODEC_ID_VP5)
285            for (i=0; i<2; i++)
286                if (count < 2 && ref_frame == ab[-1+2*i].ref_frame) {
287                    dc += ab[-1+2*i].dc_coeff;
288                    count++;
289                }
290        if (count == 0)
291            dc = s->prev_dc[vp56_b2p[b]][ref_frame];
292        else if (count == 2)
293            dc /= 2;
294
295        s->block_coeff[b][idx] += dc;
296        s->prev_dc[vp56_b2p[b]][ref_frame] = s->block_coeff[b][idx];
297        ab->dc_coeff = s->block_coeff[b][idx];
298        ab->ref_frame = ref_frame;
299        lb->dc_coeff = s->block_coeff[b][idx];
300        lb->ref_frame = ref_frame;
301        s->block_coeff[b][idx] *= s->dequant_dc;
302    }
303}
304
305static void vp56_deblock_filter(VP56Context *s, uint8_t *yuv,
306                                int stride, int dx, int dy)
307{
308    int t = vp56_filter_threshold[s->quantizer];
309    if (dx)  s->vp56dsp.edge_filter_hor(yuv +         10-dx , stride, t);
310    if (dy)  s->vp56dsp.edge_filter_ver(yuv + stride*(10-dy), stride, t);
311}
312
313static void vp56_mc(VP56Context *s, int b, int plane, uint8_t *src,
314                    int stride, int x, int y)
315{
316    uint8_t *dst=s->framep[VP56_FRAME_CURRENT]->data[plane]+s->block_offset[b];
317    uint8_t *src_block;
318    int src_offset;
319    int overlap_offset = 0;
320    int mask = s->vp56_coord_div[b] - 1;
321    int deblock_filtering = s->deblock_filtering;
322    int dx;
323    int dy;
324
325    if (s->avctx->skip_loop_filter >= AVDISCARD_ALL ||
326        (s->avctx->skip_loop_filter >= AVDISCARD_NONKEY
327         && !s->framep[VP56_FRAME_CURRENT]->key_frame))
328        deblock_filtering = 0;
329
330    dx = s->mv[b].x / s->vp56_coord_div[b];
331    dy = s->mv[b].y / s->vp56_coord_div[b];
332
333    if (b >= 4) {
334        x /= 2;
335        y /= 2;
336    }
337    x += dx - 2;
338    y += dy - 2;
339
340    if (x<0 || x+12>=s->plane_width[plane] ||
341        y<0 || y+12>=s->plane_height[plane]) {
342        s->dsp.emulated_edge_mc(s->edge_emu_buffer,
343                            src + s->block_offset[b] + (dy-2)*stride + (dx-2),
344                            stride, 12, 12, x, y,
345                            s->plane_width[plane],
346                            s->plane_height[plane]);
347        src_block = s->edge_emu_buffer;
348        src_offset = 2 + 2*stride;
349    } else if (deblock_filtering) {
350        /* only need a 12x12 block, but there is no such dsp function, */
351        /* so copy a 16x12 block */
352        s->dsp.put_pixels_tab[0][0](s->edge_emu_buffer,
353                                    src + s->block_offset[b] + (dy-2)*stride + (dx-2),
354                                    stride, 12);
355        src_block = s->edge_emu_buffer;
356        src_offset = 2 + 2*stride;
357    } else {
358        src_block = src;
359        src_offset = s->block_offset[b] + dy*stride + dx;
360    }
361
362    if (deblock_filtering)
363        vp56_deblock_filter(s, src_block, stride, dx&7, dy&7);
364
365    if (s->mv[b].x & mask)
366        overlap_offset += (s->mv[b].x > 0) ? 1 : -1;
367    if (s->mv[b].y & mask)
368        overlap_offset += (s->mv[b].y > 0) ? stride : -stride;
369
370    if (overlap_offset) {
371        if (s->filter)
372            s->filter(s, dst, src_block, src_offset, src_offset+overlap_offset,
373                      stride, s->mv[b], mask, s->filter_selection, b<4);
374        else
375            s->dsp.put_no_rnd_pixels_l2[1](dst, src_block+src_offset,
376                                           src_block+src_offset+overlap_offset,
377                                           stride, 8);
378    } else {
379        s->dsp.put_pixels_tab[1][0](dst, src_block+src_offset, stride, 8);
380    }
381}
382
383static void vp56_decode_mb(VP56Context *s, int row, int col, int is_alpha)
384{
385    AVFrame *frame_current, *frame_ref;
386    VP56mb mb_type;
387    VP56Frame ref_frame;
388    int b, ab, b_max, plane, off;
389
390    if (s->framep[VP56_FRAME_CURRENT]->key_frame)
391        mb_type = VP56_MB_INTRA;
392    else
393        mb_type = vp56_decode_mv(s, row, col);
394    ref_frame = vp56_reference_frame[mb_type];
395
396    s->dsp.clear_blocks(*s->block_coeff);
397
398    s->parse_coeff(s);
399
400    vp56_add_predictors_dc(s, ref_frame);
401
402    frame_current = s->framep[VP56_FRAME_CURRENT];
403    frame_ref = s->framep[ref_frame];
404    if (mb_type != VP56_MB_INTRA && !frame_ref->data[0])
405        return;
406
407    ab = 6*is_alpha;
408    b_max = 6 - 2*is_alpha;
409
410    switch (mb_type) {
411        case VP56_MB_INTRA:
412            for (b=0; b<b_max; b++) {
413                plane = vp56_b2p[b+ab];
414                s->dsp.idct_put(frame_current->data[plane] + s->block_offset[b],
415                                s->stride[plane], s->block_coeff[b]);
416            }
417            break;
418
419        case VP56_MB_INTER_NOVEC_PF:
420        case VP56_MB_INTER_NOVEC_GF:
421            for (b=0; b<b_max; b++) {
422                plane = vp56_b2p[b+ab];
423                off = s->block_offset[b];
424                s->dsp.put_pixels_tab[1][0](frame_current->data[plane] + off,
425                                            frame_ref->data[plane] + off,
426                                            s->stride[plane], 8);
427                s->dsp.idct_add(frame_current->data[plane] + off,
428                                s->stride[plane], s->block_coeff[b]);
429            }
430            break;
431
432        case VP56_MB_INTER_DELTA_PF:
433        case VP56_MB_INTER_V1_PF:
434        case VP56_MB_INTER_V2_PF:
435        case VP56_MB_INTER_DELTA_GF:
436        case VP56_MB_INTER_4V:
437        case VP56_MB_INTER_V1_GF:
438        case VP56_MB_INTER_V2_GF:
439            for (b=0; b<b_max; b++) {
440                int x_off = b==1 || b==3 ? 8 : 0;
441                int y_off = b==2 || b==3 ? 8 : 0;
442                plane = vp56_b2p[b+ab];
443                vp56_mc(s, b, plane, frame_ref->data[plane], s->stride[plane],
444                        16*col+x_off, 16*row+y_off);
445                s->dsp.idct_add(frame_current->data[plane] + s->block_offset[b],
446                                s->stride[plane], s->block_coeff[b]);
447            }
448            break;
449    }
450}
451
452static int vp56_size_changed(AVCodecContext *avctx)
453{
454    VP56Context *s = avctx->priv_data;
455    int stride = s->framep[VP56_FRAME_CURRENT]->linesize[0];
456    int i;
457
458    s->plane_width[0]  = s->plane_width[3]  = avctx->coded_width;
459    s->plane_width[1]  = s->plane_width[2]  = avctx->coded_width/2;
460    s->plane_height[0] = s->plane_height[3] = avctx->coded_height;
461    s->plane_height[1] = s->plane_height[2] = avctx->coded_height/2;
462
463    for (i=0; i<4; i++)
464        s->stride[i] = s->flip * s->framep[VP56_FRAME_CURRENT]->linesize[i];
465
466    s->mb_width  = (avctx->coded_width +15) / 16;
467    s->mb_height = (avctx->coded_height+15) / 16;
468
469    if (s->mb_width > 1000 || s->mb_height > 1000) {
470        avcodec_set_dimensions(avctx, 0, 0);
471        av_log(avctx, AV_LOG_ERROR, "picture too big\n");
472        return -1;
473    }
474
475    s->qscale_table = av_realloc(s->qscale_table, s->mb_width);
476    s->above_blocks = av_realloc(s->above_blocks,
477                                 (4*s->mb_width+6) * sizeof(*s->above_blocks));
478    s->macroblocks = av_realloc(s->macroblocks,
479                                s->mb_width*s->mb_height*sizeof(*s->macroblocks));
480    av_free(s->edge_emu_buffer_alloc);
481    s->edge_emu_buffer_alloc = av_malloc(16*stride);
482    s->edge_emu_buffer = s->edge_emu_buffer_alloc;
483    if (s->flip < 0)
484        s->edge_emu_buffer += 15 * stride;
485
486    return 0;
487}
488
489int ff_vp56_decode_frame(AVCodecContext *avctx, void *data, int *data_size,
490                         AVPacket *avpkt)
491{
492    const uint8_t *buf = avpkt->data;
493    VP56Context *s = avctx->priv_data;
494    AVFrame *const p = s->framep[VP56_FRAME_CURRENT];
495    int remaining_buf_size = avpkt->size;
496    int is_alpha, av_uninit(alpha_offset);
497
498    if (s->has_alpha) {
499        if (remaining_buf_size < 3)
500            return -1;
501        alpha_offset = bytestream_get_be24(&buf);
502        remaining_buf_size -= 3;
503        if (remaining_buf_size < alpha_offset)
504            return -1;
505    }
506
507    for (is_alpha=0; is_alpha < 1+s->has_alpha; is_alpha++) {
508        int mb_row, mb_col, mb_row_flip, mb_offset = 0;
509        int block, y, uv, stride_y, stride_uv;
510        int golden_frame = 0;
511        int res;
512
513        s->modelp = &s->models[is_alpha];
514
515        res = s->parse_header(s, buf, remaining_buf_size, &golden_frame);
516        if (res < 0) {
517            int i;
518            for (i = 0; i < 4; i++) {
519                if (s->frames[i].data[0])
520                    avctx->release_buffer(avctx, &s->frames[i]);
521            }
522            return res;
523        }
524
525        if (res == VP56_SIZE_CHANGE) {
526            int i;
527            for (i = 0; i < 4; i++) {
528                if (s->frames[i].data[0])
529                    avctx->release_buffer(avctx, &s->frames[i]);
530            }
531            if (is_alpha) {
532                avcodec_set_dimensions(avctx, 0, 0);
533                return -1;
534            }
535        }
536
537        if (!is_alpha) {
538            p->reference = 1;
539            if (avctx->get_buffer(avctx, p) < 0) {
540                av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
541                return -1;
542            }
543
544            if (res == VP56_SIZE_CHANGE)
545                if (vp56_size_changed(avctx)) {
546                    avctx->release_buffer(avctx, p);
547                    return -1;
548                }
549        }
550
551        if (p->key_frame) {
552            p->pict_type = AV_PICTURE_TYPE_I;
553            s->default_models_init(s);
554            for (block=0; block<s->mb_height*s->mb_width; block++)
555                s->macroblocks[block].type = VP56_MB_INTRA;
556        } else {
557            p->pict_type = AV_PICTURE_TYPE_P;
558            vp56_parse_mb_type_models(s);
559            s->parse_vector_models(s);
560            s->mb_type = VP56_MB_INTER_NOVEC_PF;
561        }
562
563        if (s->parse_coeff_models(s))
564            goto next;
565
566        memset(s->prev_dc, 0, sizeof(s->prev_dc));
567        s->prev_dc[1][VP56_FRAME_CURRENT] = 128;
568        s->prev_dc[2][VP56_FRAME_CURRENT] = 128;
569
570        for (block=0; block < 4*s->mb_width+6; block++) {
571            s->above_blocks[block].ref_frame = VP56_FRAME_NONE;
572            s->above_blocks[block].dc_coeff = 0;
573            s->above_blocks[block].not_null_dc = 0;
574        }
575        s->above_blocks[2*s->mb_width + 2].ref_frame = VP56_FRAME_CURRENT;
576        s->above_blocks[3*s->mb_width + 4].ref_frame = VP56_FRAME_CURRENT;
577
578        stride_y  = p->linesize[0];
579        stride_uv = p->linesize[1];
580
581        if (s->flip < 0)
582            mb_offset = 7;
583
584        /* main macroblocks loop */
585        for (mb_row=0; mb_row<s->mb_height; mb_row++) {
586            if (s->flip < 0)
587                mb_row_flip = s->mb_height - mb_row - 1;
588            else
589                mb_row_flip = mb_row;
590
591            for (block=0; block<4; block++) {
592                s->left_block[block].ref_frame = VP56_FRAME_NONE;
593                s->left_block[block].dc_coeff = 0;
594                s->left_block[block].not_null_dc = 0;
595            }
596            memset(s->coeff_ctx, 0, sizeof(s->coeff_ctx));
597            memset(s->coeff_ctx_last, 24, sizeof(s->coeff_ctx_last));
598
599            s->above_block_idx[0] = 1;
600            s->above_block_idx[1] = 2;
601            s->above_block_idx[2] = 1;
602            s->above_block_idx[3] = 2;
603            s->above_block_idx[4] = 2*s->mb_width + 2 + 1;
604            s->above_block_idx[5] = 3*s->mb_width + 4 + 1;
605
606            s->block_offset[s->frbi] = (mb_row_flip*16 + mb_offset) * stride_y;
607            s->block_offset[s->srbi] = s->block_offset[s->frbi] + 8*stride_y;
608            s->block_offset[1] = s->block_offset[0] + 8;
609            s->block_offset[3] = s->block_offset[2] + 8;
610            s->block_offset[4] = (mb_row_flip*8 + mb_offset) * stride_uv;
611            s->block_offset[5] = s->block_offset[4];
612
613            for (mb_col=0; mb_col<s->mb_width; mb_col++) {
614                vp56_decode_mb(s, mb_row, mb_col, is_alpha);
615
616                for (y=0; y<4; y++) {
617                    s->above_block_idx[y] += 2;
618                    s->block_offset[y] += 16;
619                }
620
621                for (uv=4; uv<6; uv++) {
622                    s->above_block_idx[uv] += 1;
623                    s->block_offset[uv] += 8;
624                }
625            }
626        }
627
628    next:
629        if (p->key_frame || golden_frame) {
630            if (s->framep[VP56_FRAME_GOLDEN]->data[0] &&
631                s->framep[VP56_FRAME_GOLDEN] != s->framep[VP56_FRAME_GOLDEN2])
632                avctx->release_buffer(avctx, s->framep[VP56_FRAME_GOLDEN]);
633            s->framep[VP56_FRAME_GOLDEN] = p;
634        }
635
636        if (s->has_alpha) {
637            FFSWAP(AVFrame *, s->framep[VP56_FRAME_GOLDEN],
638                              s->framep[VP56_FRAME_GOLDEN2]);
639            buf += alpha_offset;
640            remaining_buf_size -= alpha_offset;
641        }
642    }
643
644    if (s->framep[VP56_FRAME_PREVIOUS] == s->framep[VP56_FRAME_GOLDEN] ||
645        s->framep[VP56_FRAME_PREVIOUS] == s->framep[VP56_FRAME_GOLDEN2]) {
646        if (s->framep[VP56_FRAME_UNUSED] != s->framep[VP56_FRAME_GOLDEN] &&
647            s->framep[VP56_FRAME_UNUSED] != s->framep[VP56_FRAME_GOLDEN2])
648            FFSWAP(AVFrame *, s->framep[VP56_FRAME_PREVIOUS],
649                              s->framep[VP56_FRAME_UNUSED]);
650        else
651            FFSWAP(AVFrame *, s->framep[VP56_FRAME_PREVIOUS],
652                              s->framep[VP56_FRAME_UNUSED2]);
653    } else if (s->framep[VP56_FRAME_PREVIOUS]->data[0])
654        avctx->release_buffer(avctx, s->framep[VP56_FRAME_PREVIOUS]);
655    FFSWAP(AVFrame *, s->framep[VP56_FRAME_CURRENT],
656                      s->framep[VP56_FRAME_PREVIOUS]);
657
658    p->qstride = 0;
659    p->qscale_table = s->qscale_table;
660    p->qscale_type = FF_QSCALE_TYPE_VP56;
661    *(AVFrame*)data = *p;
662    *data_size = sizeof(AVFrame);
663
664    return avpkt->size;
665}
666
667av_cold void ff_vp56_init(AVCodecContext *avctx, int flip, int has_alpha)
668{
669    VP56Context *s = avctx->priv_data;
670    int i;
671
672    s->avctx = avctx;
673    avctx->pix_fmt = has_alpha ? PIX_FMT_YUVA420P : PIX_FMT_YUV420P;
674
675    if (avctx->idct_algo == FF_IDCT_AUTO)
676        avctx->idct_algo = FF_IDCT_VP3;
677    dsputil_init(&s->dsp, avctx);
678    ff_vp56dsp_init(&s->vp56dsp, avctx->codec->id);
679    ff_init_scantable(s->dsp.idct_permutation, &s->scantable,ff_zigzag_direct);
680
681    for (i=0; i<4; i++)
682        s->framep[i] = &s->frames[i];
683    s->framep[VP56_FRAME_UNUSED] = s->framep[VP56_FRAME_GOLDEN];
684    s->framep[VP56_FRAME_UNUSED2] = s->framep[VP56_FRAME_GOLDEN2];
685    s->edge_emu_buffer_alloc = NULL;
686
687    s->above_blocks = NULL;
688    s->macroblocks = NULL;
689    s->quantizer = -1;
690    s->deblock_filtering = 1;
691
692    s->filter = NULL;
693
694    s->has_alpha = has_alpha;
695    if (flip) {
696        s->flip = -1;
697        s->frbi = 2;
698        s->srbi = 0;
699    } else {
700        s->flip = 1;
701        s->frbi = 0;
702        s->srbi = 2;
703    }
704}
705
706av_cold int ff_vp56_free(AVCodecContext *avctx)
707{
708    VP56Context *s = avctx->priv_data;
709
710    av_freep(&s->qscale_table);
711    av_freep(&s->above_blocks);
712    av_freep(&s->macroblocks);
713    av_freep(&s->edge_emu_buffer_alloc);
714    if (s->framep[VP56_FRAME_GOLDEN]->data[0])
715        avctx->release_buffer(avctx, s->framep[VP56_FRAME_GOLDEN]);
716    if (s->framep[VP56_FRAME_GOLDEN2]->data[0])
717        avctx->release_buffer(avctx, s->framep[VP56_FRAME_GOLDEN2]);
718    if (s->framep[VP56_FRAME_PREVIOUS]->data[0])
719        avctx->release_buffer(avctx, s->framep[VP56_FRAME_PREVIOUS]);
720    return 0;
721}
722