1/*
2 * Error resilience / concealment
3 *
4 * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
5 *
6 * This file is part of FFmpeg.
7 *
8 * FFmpeg is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * FFmpeg is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with FFmpeg; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 */
22
23/**
24 * @file
25 * Error resilience / concealment.
26 */
27
28#include <limits.h>
29
30#include "libavutil/internal.h"
31#include "avcodec.h"
32#include "error_resilience.h"
33#include "me_cmp.h"
34#include "mpegutils.h"
35#include "mpegvideo.h"
36#include "rectangle.h"
37#include "threadframe.h"
38
39/**
40 * @param stride the number of MVs to get to the next row
41 * @param mv_step the number of MVs per row or column in a macroblock
42 */
43static void set_mv_strides(ERContext *s, ptrdiff_t *mv_step, ptrdiff_t *stride)
44{
45    if (s->avctx->codec_id == AV_CODEC_ID_H264) {
46        av_assert0(s->quarter_sample);
47        *mv_step = 4;
48        *stride  = s->mb_width * 4;
49    } else {
50        *mv_step = 2;
51        *stride  = s->b8_stride;
52    }
53}
54
55/**
56 * Replace the current MB with a flat dc-only version.
57 */
58static void put_dc(ERContext *s, uint8_t *dest_y, uint8_t *dest_cb,
59                   uint8_t *dest_cr, int mb_x, int mb_y)
60{
61    int *linesize = s->cur_pic.f->linesize;
62    int dc, dcu, dcv, y, i;
63    for (i = 0; i < 4; i++) {
64        dc = s->dc_val[0][mb_x * 2 + (i &  1) + (mb_y * 2 + (i >> 1)) * s->b8_stride];
65        if (dc < 0)
66            dc = 0;
67        else if (dc > 2040)
68            dc = 2040;
69        for (y = 0; y < 8; y++) {
70            int x;
71            for (x = 0; x < 8; x++)
72                dest_y[x + (i &  1) * 8 + (y + (i >> 1) * 8) * linesize[0]] = dc / 8;
73        }
74    }
75    dcu = s->dc_val[1][mb_x + mb_y * s->mb_stride];
76    dcv = s->dc_val[2][mb_x + mb_y * s->mb_stride];
77    if (dcu < 0)
78        dcu = 0;
79    else if (dcu > 2040)
80        dcu = 2040;
81    if (dcv < 0)
82        dcv = 0;
83    else if (dcv > 2040)
84        dcv = 2040;
85
86    if (dest_cr)
87    for (y = 0; y < 8; y++) {
88        int x;
89        for (x = 0; x < 8; x++) {
90            dest_cb[x + y * linesize[1]] = dcu / 8;
91            dest_cr[x + y * linesize[2]] = dcv / 8;
92        }
93    }
94}
95
96static void filter181(int16_t *data, int width, int height, ptrdiff_t stride)
97{
98    int x, y;
99
100    /* horizontal filter */
101    for (y = 1; y < height - 1; y++) {
102        int prev_dc = data[0 + y * stride];
103
104        for (x = 1; x < width - 1; x++) {
105            int dc;
106            dc = -prev_dc +
107                 data[x     + y * stride] * 8 -
108                 data[x + 1 + y * stride];
109            dc = (av_clip(dc, INT_MIN/10923, INT_MAX/10923 - 32768) * 10923 + 32768) >> 16;
110            prev_dc = data[x + y * stride];
111            data[x + y * stride] = dc;
112        }
113    }
114
115    /* vertical filter */
116    for (x = 1; x < width - 1; x++) {
117        int prev_dc = data[x];
118
119        for (y = 1; y < height - 1; y++) {
120            int dc;
121
122            dc = -prev_dc +
123                 data[x +  y      * stride] * 8 -
124                 data[x + (y + 1) * stride];
125            dc = (av_clip(dc, INT_MIN/10923, INT_MAX/10923 - 32768) * 10923 + 32768) >> 16;
126            prev_dc = data[x + y * stride];
127            data[x + y * stride] = dc;
128        }
129    }
130}
131
132/**
133 * guess the dc of blocks which do not have an undamaged dc
134 * @param w     width in 8 pixel blocks
135 * @param h     height in 8 pixel blocks
136 */
137static void guess_dc(ERContext *s, int16_t *dc, int w,
138                     int h, ptrdiff_t stride, int is_luma)
139{
140    int b_x, b_y;
141    int16_t  (*col )[4] = av_malloc_array(stride, h*sizeof( int16_t)*4);
142    uint32_t (*dist)[4] = av_malloc_array(stride, h*sizeof(uint32_t)*4);
143
144    if(!col || !dist) {
145        av_log(s->avctx, AV_LOG_ERROR, "guess_dc() is out of memory\n");
146        goto fail;
147    }
148
149    for(b_y=0; b_y<h; b_y++){
150        int color= 1024;
151        int distance= -1;
152        for(b_x=0; b_x<w; b_x++){
153            int mb_index_j= (b_x>>is_luma) + (b_y>>is_luma)*s->mb_stride;
154            int error_j= s->error_status_table[mb_index_j];
155            int intra_j = IS_INTRA(s->cur_pic.mb_type[mb_index_j]);
156            if(intra_j==0 || !(error_j&ER_DC_ERROR)){
157                color= dc[b_x + b_y*stride];
158                distance= b_x;
159            }
160            col [b_x + b_y*stride][1]= color;
161            dist[b_x + b_y*stride][1]= distance >= 0 ? b_x-distance : 9999;
162        }
163        color= 1024;
164        distance= -1;
165        for(b_x=w-1; b_x>=0; b_x--){
166            int mb_index_j= (b_x>>is_luma) + (b_y>>is_luma)*s->mb_stride;
167            int error_j= s->error_status_table[mb_index_j];
168            int intra_j = IS_INTRA(s->cur_pic.mb_type[mb_index_j]);
169            if(intra_j==0 || !(error_j&ER_DC_ERROR)){
170                color= dc[b_x + b_y*stride];
171                distance= b_x;
172            }
173            col [b_x + b_y*stride][0]= color;
174            dist[b_x + b_y*stride][0]= distance >= 0 ? distance-b_x : 9999;
175        }
176    }
177    for(b_x=0; b_x<w; b_x++){
178        int color= 1024;
179        int distance= -1;
180        for(b_y=0; b_y<h; b_y++){
181            int mb_index_j= (b_x>>is_luma) + (b_y>>is_luma)*s->mb_stride;
182            int error_j= s->error_status_table[mb_index_j];
183            int intra_j = IS_INTRA(s->cur_pic.mb_type[mb_index_j]);
184            if(intra_j==0 || !(error_j&ER_DC_ERROR)){
185                color= dc[b_x + b_y*stride];
186                distance= b_y;
187            }
188            col [b_x + b_y*stride][3]= color;
189            dist[b_x + b_y*stride][3]= distance >= 0 ? b_y-distance : 9999;
190        }
191        color= 1024;
192        distance= -1;
193        for(b_y=h-1; b_y>=0; b_y--){
194            int mb_index_j= (b_x>>is_luma) + (b_y>>is_luma)*s->mb_stride;
195            int error_j= s->error_status_table[mb_index_j];
196            int intra_j = IS_INTRA(s->cur_pic.mb_type[mb_index_j]);
197            if(intra_j==0 || !(error_j&ER_DC_ERROR)){
198                color= dc[b_x + b_y*stride];
199                distance= b_y;
200            }
201            col [b_x + b_y*stride][2]= color;
202            dist[b_x + b_y*stride][2]= distance >= 0 ? distance-b_y : 9999;
203        }
204    }
205
206    for (b_y = 0; b_y < h; b_y++) {
207        for (b_x = 0; b_x < w; b_x++) {
208            int mb_index, error, j;
209            int64_t guess, weight_sum;
210            mb_index = (b_x >> is_luma) + (b_y >> is_luma) * s->mb_stride;
211            error    = s->error_status_table[mb_index];
212
213            if (IS_INTER(s->cur_pic.mb_type[mb_index]))
214                continue; // inter
215            if (!(error & ER_DC_ERROR))
216                continue; // dc-ok
217
218            weight_sum = 0;
219            guess      = 0;
220            for (j = 0; j < 4; j++) {
221                int64_t weight  = 256 * 256 * 256 * 16 / FFMAX(dist[b_x + b_y*stride][j], 1);
222                guess          += weight*(int64_t)col[b_x + b_y*stride][j];
223                weight_sum     += weight;
224            }
225            guess = (guess + weight_sum / 2) / weight_sum;
226            dc[b_x + b_y * stride] = guess;
227        }
228    }
229
230fail:
231    av_freep(&col);
232    av_freep(&dist);
233}
234
235/**
236 * simple horizontal deblocking filter used for error resilience
237 * @param w     width in 8 pixel blocks
238 * @param h     height in 8 pixel blocks
239 */
240static void h_block_filter(ERContext *s, uint8_t *dst, int w,
241                           int h, ptrdiff_t stride, int is_luma)
242{
243    int b_x, b_y;
244    ptrdiff_t mvx_stride, mvy_stride;
245    const uint8_t *cm = ff_crop_tab + MAX_NEG_CROP;
246    set_mv_strides(s, &mvx_stride, &mvy_stride);
247    mvx_stride >>= is_luma;
248    mvy_stride *= mvx_stride;
249
250    for (b_y = 0; b_y < h; b_y++) {
251        for (b_x = 0; b_x < w - 1; b_x++) {
252            int y;
253            int left_status  = s->error_status_table[( b_x      >> is_luma) + (b_y >> is_luma) * s->mb_stride];
254            int right_status = s->error_status_table[((b_x + 1) >> is_luma) + (b_y >> is_luma) * s->mb_stride];
255            int left_intra   = IS_INTRA(s->cur_pic.mb_type[( b_x      >> is_luma) + (b_y >> is_luma) * s->mb_stride]);
256            int right_intra  = IS_INTRA(s->cur_pic.mb_type[((b_x + 1) >> is_luma) + (b_y >> is_luma) * s->mb_stride]);
257            int left_damage  = left_status & ER_MB_ERROR;
258            int right_damage = right_status & ER_MB_ERROR;
259            int offset       = b_x * 8 + b_y * stride * 8;
260            int16_t *left_mv  = s->cur_pic.motion_val[0][mvy_stride * b_y + mvx_stride *  b_x];
261            int16_t *right_mv = s->cur_pic.motion_val[0][mvy_stride * b_y + mvx_stride * (b_x + 1)];
262            if (!(left_damage || right_damage))
263                continue; // both undamaged
264            if ((!left_intra) && (!right_intra) &&
265                FFABS(left_mv[0] - right_mv[0]) +
266                FFABS(left_mv[1] + right_mv[1]) < 2)
267                continue;
268
269            for (y = 0; y < 8; y++) {
270                int a, b, c, d;
271
272                a = dst[offset + 7 + y * stride] - dst[offset + 6 + y * stride];
273                b = dst[offset + 8 + y * stride] - dst[offset + 7 + y * stride];
274                c = dst[offset + 9 + y * stride] - dst[offset + 8 + y * stride];
275
276                d = FFABS(b) - ((FFABS(a) + FFABS(c) + 1) >> 1);
277                d = FFMAX(d, 0);
278                if (b < 0)
279                    d = -d;
280
281                if (d == 0)
282                    continue;
283
284                if (!(left_damage && right_damage))
285                    d = d * 16 / 9;
286
287                if (left_damage) {
288                    dst[offset + 7 + y * stride] = cm[dst[offset + 7 + y * stride] + ((d * 7) >> 4)];
289                    dst[offset + 6 + y * stride] = cm[dst[offset + 6 + y * stride] + ((d * 5) >> 4)];
290                    dst[offset + 5 + y * stride] = cm[dst[offset + 5 + y * stride] + ((d * 3) >> 4)];
291                    dst[offset + 4 + y * stride] = cm[dst[offset + 4 + y * stride] + ((d * 1) >> 4)];
292                }
293                if (right_damage) {
294                    dst[offset + 8 + y * stride] = cm[dst[offset +  8 + y * stride] - ((d * 7) >> 4)];
295                    dst[offset + 9 + y * stride] = cm[dst[offset +  9 + y * stride] - ((d * 5) >> 4)];
296                    dst[offset + 10+ y * stride] = cm[dst[offset + 10 + y * stride] - ((d * 3) >> 4)];
297                    dst[offset + 11+ y * stride] = cm[dst[offset + 11 + y * stride] - ((d * 1) >> 4)];
298                }
299            }
300        }
301    }
302}
303
304/**
305 * simple vertical deblocking filter used for error resilience
306 * @param w     width in 8 pixel blocks
307 * @param h     height in 8 pixel blocks
308 */
309static void v_block_filter(ERContext *s, uint8_t *dst, int w, int h,
310                           ptrdiff_t stride, int is_luma)
311{
312    int b_x, b_y;
313    ptrdiff_t mvx_stride, mvy_stride;
314    const uint8_t *cm = ff_crop_tab + MAX_NEG_CROP;
315    set_mv_strides(s, &mvx_stride, &mvy_stride);
316    mvx_stride >>= is_luma;
317    mvy_stride *= mvx_stride;
318
319    for (b_y = 0; b_y < h - 1; b_y++) {
320        for (b_x = 0; b_x < w; b_x++) {
321            int x;
322            int top_status    = s->error_status_table[(b_x >> is_luma) +  (b_y      >> is_luma) * s->mb_stride];
323            int bottom_status = s->error_status_table[(b_x >> is_luma) + ((b_y + 1) >> is_luma) * s->mb_stride];
324            int top_intra     = IS_INTRA(s->cur_pic.mb_type[(b_x >> is_luma) + ( b_y      >> is_luma) * s->mb_stride]);
325            int bottom_intra  = IS_INTRA(s->cur_pic.mb_type[(b_x >> is_luma) + ((b_y + 1) >> is_luma) * s->mb_stride]);
326            int top_damage    = top_status & ER_MB_ERROR;
327            int bottom_damage = bottom_status & ER_MB_ERROR;
328            int offset        = b_x * 8 + b_y * stride * 8;
329
330            int16_t *top_mv    = s->cur_pic.motion_val[0][mvy_stride *  b_y      + mvx_stride * b_x];
331            int16_t *bottom_mv = s->cur_pic.motion_val[0][mvy_stride * (b_y + 1) + mvx_stride * b_x];
332
333            if (!(top_damage || bottom_damage))
334                continue; // both undamaged
335
336            if ((!top_intra) && (!bottom_intra) &&
337                FFABS(top_mv[0] - bottom_mv[0]) +
338                FFABS(top_mv[1] + bottom_mv[1]) < 2)
339                continue;
340
341            for (x = 0; x < 8; x++) {
342                int a, b, c, d;
343
344                a = dst[offset + x + 7 * stride] - dst[offset + x + 6 * stride];
345                b = dst[offset + x + 8 * stride] - dst[offset + x + 7 * stride];
346                c = dst[offset + x + 9 * stride] - dst[offset + x + 8 * stride];
347
348                d = FFABS(b) - ((FFABS(a) + FFABS(c) + 1) >> 1);
349                d = FFMAX(d, 0);
350                if (b < 0)
351                    d = -d;
352
353                if (d == 0)
354                    continue;
355
356                if (!(top_damage && bottom_damage))
357                    d = d * 16 / 9;
358
359                if (top_damage) {
360                    dst[offset + x +  7 * stride] = cm[dst[offset + x +  7 * stride] + ((d * 7) >> 4)];
361                    dst[offset + x +  6 * stride] = cm[dst[offset + x +  6 * stride] + ((d * 5) >> 4)];
362                    dst[offset + x +  5 * stride] = cm[dst[offset + x +  5 * stride] + ((d * 3) >> 4)];
363                    dst[offset + x +  4 * stride] = cm[dst[offset + x +  4 * stride] + ((d * 1) >> 4)];
364                }
365                if (bottom_damage) {
366                    dst[offset + x +  8 * stride] = cm[dst[offset + x +  8 * stride] - ((d * 7) >> 4)];
367                    dst[offset + x +  9 * stride] = cm[dst[offset + x +  9 * stride] - ((d * 5) >> 4)];
368                    dst[offset + x + 10 * stride] = cm[dst[offset + x + 10 * stride] - ((d * 3) >> 4)];
369                    dst[offset + x + 11 * stride] = cm[dst[offset + x + 11 * stride] - ((d * 1) >> 4)];
370                }
371            }
372        }
373    }
374}
375
376#define MV_FROZEN    8
377#define MV_CHANGED   4
378#define MV_UNCHANGED 2
379#define MV_LISTED    1
380static av_always_inline void add_blocklist(int (*blocklist)[2], int *blocklist_length, uint8_t *fixed, int mb_x, int mb_y, int mb_xy)
381{
382    if (fixed[mb_xy])
383        return;
384    fixed[mb_xy] = MV_LISTED;
385    blocklist[ *blocklist_length   ][0] = mb_x;
386    blocklist[(*blocklist_length)++][1] = mb_y;
387}
388
389static void guess_mv(ERContext *s)
390{
391    int (*blocklist)[2], (*next_blocklist)[2];
392    uint8_t *fixed;
393    const ptrdiff_t mb_stride = s->mb_stride;
394    const int mb_width  = s->mb_width;
395    int mb_height = s->mb_height;
396    int i, depth, num_avail;
397    int mb_x, mb_y;
398    ptrdiff_t mot_step, mot_stride;
399    int blocklist_length, next_blocklist_length;
400
401    if (s->last_pic.f && s->last_pic.f->data[0])
402        mb_height = FFMIN(mb_height, (s->last_pic.f->height+15)>>4);
403    if (s->next_pic.f && s->next_pic.f->data[0])
404        mb_height = FFMIN(mb_height, (s->next_pic.f->height+15)>>4);
405
406    blocklist      = (int (*)[2])s->er_temp_buffer;
407    next_blocklist = blocklist + s->mb_stride * s->mb_height;
408    fixed          = (uint8_t *)(next_blocklist + s->mb_stride * s->mb_height);
409
410    set_mv_strides(s, &mot_step, &mot_stride);
411
412    num_avail = 0;
413    if (s->last_pic.motion_val[0])
414        ff_thread_await_progress(s->last_pic.tf, mb_height-1, 0);
415    for (i = 0; i < mb_width * mb_height; i++) {
416        const int mb_xy = s->mb_index2xy[i];
417        int f = 0;
418        int error = s->error_status_table[mb_xy];
419
420        if (IS_INTRA(s->cur_pic.mb_type[mb_xy]))
421            f = MV_FROZEN; // intra // FIXME check
422        if (!(error & ER_MV_ERROR))
423            f = MV_FROZEN; // inter with undamaged MV
424
425        fixed[mb_xy] = f;
426        if (f == MV_FROZEN)
427            num_avail++;
428        else if(s->last_pic.f->data[0] && s->last_pic.motion_val[0]){
429            const int mb_y= mb_xy / s->mb_stride;
430            const int mb_x= mb_xy % s->mb_stride;
431            const int mot_index= (mb_x + mb_y*mot_stride) * mot_step;
432            s->cur_pic.motion_val[0][mot_index][0]= s->last_pic.motion_val[0][mot_index][0];
433            s->cur_pic.motion_val[0][mot_index][1]= s->last_pic.motion_val[0][mot_index][1];
434            s->cur_pic.ref_index[0][4*mb_xy]      = s->last_pic.ref_index[0][4*mb_xy];
435        }
436    }
437
438    if ((!(s->avctx->error_concealment&FF_EC_GUESS_MVS)) ||
439        num_avail <= FFMAX(mb_width, mb_height) / 2) {
440        for (mb_y = 0; mb_y < mb_height; mb_y++) {
441            for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
442                const int mb_xy = mb_x + mb_y * s->mb_stride;
443                int mv_dir = (s->last_pic.f && s->last_pic.f->data[0]) ? MV_DIR_FORWARD : MV_DIR_BACKWARD;
444
445                if (IS_INTRA(s->cur_pic.mb_type[mb_xy]))
446                    continue;
447                if (!(s->error_status_table[mb_xy] & ER_MV_ERROR))
448                    continue;
449
450                s->mv[0][0][0] = 0;
451                s->mv[0][0][1] = 0;
452                s->decode_mb(s->opaque, 0, mv_dir, MV_TYPE_16X16, &s->mv,
453                             mb_x, mb_y, 0, 0);
454            }
455        }
456        return;
457    }
458
459    blocklist_length = 0;
460    for (mb_y = 0; mb_y < mb_height; mb_y++) {
461        for (mb_x = 0; mb_x < mb_width; mb_x++) {
462            const int mb_xy = mb_x + mb_y * mb_stride;
463            if (fixed[mb_xy] == MV_FROZEN) {
464                if (mb_x)               add_blocklist(blocklist, &blocklist_length, fixed, mb_x - 1, mb_y, mb_xy - 1);
465                if (mb_y)               add_blocklist(blocklist, &blocklist_length, fixed, mb_x, mb_y - 1, mb_xy - mb_stride);
466                if (mb_x+1 < mb_width)  add_blocklist(blocklist, &blocklist_length, fixed, mb_x + 1, mb_y, mb_xy + 1);
467                if (mb_y+1 < mb_height) add_blocklist(blocklist, &blocklist_length, fixed, mb_x, mb_y + 1, mb_xy + mb_stride);
468            }
469        }
470    }
471
472    for (depth = 0; ; depth++) {
473        int changed, pass, none_left;
474        int blocklist_index;
475
476        none_left = 1;
477        changed   = 1;
478        for (pass = 0; (changed || pass < 2) && pass < 10; pass++) {
479            changed = 0;
480            for (blocklist_index = 0; blocklist_index < blocklist_length; blocklist_index++) {
481                const int mb_x = blocklist[blocklist_index][0];
482                const int mb_y = blocklist[blocklist_index][1];
483                const int mb_xy = mb_x + mb_y * mb_stride;
484                int mv_predictor[8][2];
485                int ref[8];
486                int pred_count;
487                int j;
488                int best_score;
489                int best_pred;
490                int mot_index;
491                int prev_x, prev_y, prev_ref;
492
493                if ((mb_x ^ mb_y ^ pass) & 1)
494                    continue;
495                av_assert2(fixed[mb_xy] != MV_FROZEN);
496
497
498                av_assert1(!IS_INTRA(s->cur_pic.mb_type[mb_xy]));
499                av_assert1(s->last_pic.f && s->last_pic.f->data[0]);
500
501                j = 0;
502                if (mb_x > 0)
503                    j |= fixed[mb_xy - 1];
504                if (mb_x + 1 < mb_width)
505                    j |= fixed[mb_xy + 1];
506                if (mb_y > 0)
507                    j |= fixed[mb_xy - mb_stride];
508                if (mb_y + 1 < mb_height)
509                    j |= fixed[mb_xy + mb_stride];
510
511                av_assert2(j & MV_FROZEN);
512
513                if (!(j & MV_CHANGED) && pass > 1)
514                    continue;
515
516                none_left = 0;
517                pred_count = 0;
518                mot_index  = (mb_x + mb_y * mot_stride) * mot_step;
519
520                if (mb_x > 0 && fixed[mb_xy - 1] > 1) {
521                    mv_predictor[pred_count][0] =
522                        s->cur_pic.motion_val[0][mot_index - mot_step][0];
523                    mv_predictor[pred_count][1] =
524                        s->cur_pic.motion_val[0][mot_index - mot_step][1];
525                    ref[pred_count] =
526                        s->cur_pic.ref_index[0][4 * (mb_xy - 1)];
527                    pred_count++;
528                }
529                if (mb_x + 1 < mb_width && fixed[mb_xy + 1] > 1) {
530                    mv_predictor[pred_count][0] =
531                        s->cur_pic.motion_val[0][mot_index + mot_step][0];
532                    mv_predictor[pred_count][1] =
533                        s->cur_pic.motion_val[0][mot_index + mot_step][1];
534                    ref[pred_count] =
535                        s->cur_pic.ref_index[0][4 * (mb_xy + 1)];
536                    pred_count++;
537                }
538                if (mb_y > 0 && fixed[mb_xy - mb_stride] > 1) {
539                    mv_predictor[pred_count][0] =
540                        s->cur_pic.motion_val[0][mot_index - mot_stride * mot_step][0];
541                    mv_predictor[pred_count][1] =
542                        s->cur_pic.motion_val[0][mot_index - mot_stride * mot_step][1];
543                    ref[pred_count] =
544                        s->cur_pic.ref_index[0][4 * (mb_xy - s->mb_stride)];
545                    pred_count++;
546                }
547                if (mb_y + 1<mb_height && fixed[mb_xy + mb_stride] > 1) {
548                    mv_predictor[pred_count][0] =
549                        s->cur_pic.motion_val[0][mot_index + mot_stride * mot_step][0];
550                    mv_predictor[pred_count][1] =
551                        s->cur_pic.motion_val[0][mot_index + mot_stride * mot_step][1];
552                    ref[pred_count] =
553                        s->cur_pic.ref_index[0][4 * (mb_xy + s->mb_stride)];
554                    pred_count++;
555                }
556                if (pred_count == 0)
557                    continue;
558
559                if (pred_count > 1) {
560                    int sum_x = 0, sum_y = 0, sum_r = 0;
561                    int max_x, max_y, min_x, min_y, max_r, min_r;
562
563                    for (j = 0; j < pred_count; j++) {
564                        sum_x += mv_predictor[j][0];
565                        sum_y += mv_predictor[j][1];
566                        sum_r += ref[j];
567                        if (j && ref[j] != ref[j - 1])
568                            goto skip_mean_and_median;
569                    }
570
571                    /* mean */
572                    mv_predictor[pred_count][0] = sum_x / j;
573                    mv_predictor[pred_count][1] = sum_y / j;
574                             ref[pred_count]    = sum_r / j;
575
576                    /* median */
577                    if (pred_count >= 3) {
578                        min_y = min_x = min_r =  99999;
579                        max_y = max_x = max_r = -99999;
580                    } else {
581                        min_x = min_y = max_x = max_y = min_r = max_r = 0;
582                    }
583                    for (j = 0; j < pred_count; j++) {
584                        max_x = FFMAX(max_x, mv_predictor[j][0]);
585                        max_y = FFMAX(max_y, mv_predictor[j][1]);
586                        max_r = FFMAX(max_r, ref[j]);
587                        min_x = FFMIN(min_x, mv_predictor[j][0]);
588                        min_y = FFMIN(min_y, mv_predictor[j][1]);
589                        min_r = FFMIN(min_r, ref[j]);
590                    }
591                    mv_predictor[pred_count + 1][0] = sum_x - max_x - min_x;
592                    mv_predictor[pred_count + 1][1] = sum_y - max_y - min_y;
593                             ref[pred_count + 1]    = sum_r - max_r - min_r;
594
595                    if (pred_count == 4) {
596                        mv_predictor[pred_count + 1][0] /= 2;
597                        mv_predictor[pred_count + 1][1] /= 2;
598                                 ref[pred_count + 1]    /= 2;
599                    }
600                    pred_count += 2;
601                }
602
603skip_mean_and_median:
604                /* zero MV */
605                mv_predictor[pred_count][0] =
606                mv_predictor[pred_count][1] =
607                         ref[pred_count]    = 0;
608                pred_count++;
609
610                prev_x   = s->cur_pic.motion_val[0][mot_index][0];
611                prev_y   = s->cur_pic.motion_val[0][mot_index][1];
612                prev_ref = s->cur_pic.ref_index[0][4 * mb_xy];
613
614                /* last MV */
615                mv_predictor[pred_count][0] = prev_x;
616                mv_predictor[pred_count][1] = prev_y;
617                         ref[pred_count]    = prev_ref;
618                pred_count++;
619
620                best_pred = 0;
621                best_score = 256 * 256 * 256 * 64;
622                for (j = 0; j < pred_count; j++) {
623                    int *linesize = s->cur_pic.f->linesize;
624                    int score = 0;
625                    uint8_t *src = s->cur_pic.f->data[0] +
626                                   mb_x * 16 + mb_y * 16 * linesize[0];
627
628                    s->cur_pic.motion_val[0][mot_index][0] =
629                        s->mv[0][0][0] = mv_predictor[j][0];
630                    s->cur_pic.motion_val[0][mot_index][1] =
631                        s->mv[0][0][1] = mv_predictor[j][1];
632
633                    // predictor intra or otherwise not available
634                    if (ref[j] < 0)
635                        continue;
636
637                    s->decode_mb(s->opaque, ref[j], MV_DIR_FORWARD,
638                                 MV_TYPE_16X16, &s->mv, mb_x, mb_y, 0, 0);
639
640                    if (mb_x > 0 && fixed[mb_xy - 1] > 1) {
641                        int k;
642                        for (k = 0; k < 16; k++)
643                            score += FFABS(src[k * linesize[0] - 1] -
644                                           src[k * linesize[0]]);
645                    }
646                    if (mb_x + 1 < mb_width && fixed[mb_xy + 1] > 1) {
647                        int k;
648                        for (k = 0; k < 16; k++)
649                            score += FFABS(src[k * linesize[0] + 15] -
650                                           src[k * linesize[0] + 16]);
651                    }
652                    if (mb_y > 0 && fixed[mb_xy - mb_stride] > 1) {
653                        int k;
654                        for (k = 0; k < 16; k++)
655                            score += FFABS(src[k - linesize[0]] - src[k]);
656                    }
657                    if (mb_y + 1 < mb_height && fixed[mb_xy + mb_stride] > 1) {
658                        int k;
659                        for (k = 0; k < 16; k++)
660                            score += FFABS(src[k + linesize[0] * 15] -
661                                           src[k + linesize[0] * 16]);
662                    }
663
664                    if (score <= best_score) { // <= will favor the last MV
665                        best_score = score;
666                        best_pred  = j;
667                    }
668                }
669                s->mv[0][0][0] = mv_predictor[best_pred][0];
670                s->mv[0][0][1] = mv_predictor[best_pred][1];
671
672                for (i = 0; i < mot_step; i++)
673                    for (j = 0; j < mot_step; j++) {
674                        s->cur_pic.motion_val[0][mot_index + i + j * mot_stride][0] = s->mv[0][0][0];
675                        s->cur_pic.motion_val[0][mot_index + i + j * mot_stride][1] = s->mv[0][0][1];
676                    }
677
678                s->decode_mb(s->opaque, ref[best_pred], MV_DIR_FORWARD,
679                             MV_TYPE_16X16, &s->mv, mb_x, mb_y, 0, 0);
680
681
682                if (s->mv[0][0][0] != prev_x || s->mv[0][0][1] != prev_y) {
683                    fixed[mb_xy] = MV_CHANGED;
684                    changed++;
685                } else
686                    fixed[mb_xy] = MV_UNCHANGED;
687            }
688        }
689
690        if (none_left)
691            return;
692
693        next_blocklist_length = 0;
694
695        for (blocklist_index = 0; blocklist_index < blocklist_length; blocklist_index++) {
696            const int mb_x = blocklist[blocklist_index][0];
697            const int mb_y = blocklist[blocklist_index][1];
698            const int mb_xy = mb_x + mb_y * mb_stride;
699
700            if (fixed[mb_xy] & (MV_CHANGED|MV_UNCHANGED|MV_FROZEN)) {
701                fixed[mb_xy] = MV_FROZEN;
702                if (mb_x > 0)
703                    add_blocklist(next_blocklist, &next_blocklist_length, fixed, mb_x - 1, mb_y, mb_xy - 1);
704                if (mb_y > 0)
705                    add_blocklist(next_blocklist, &next_blocklist_length, fixed, mb_x, mb_y - 1, mb_xy - mb_stride);
706                if (mb_x + 1 < mb_width)
707                    add_blocklist(next_blocklist, &next_blocklist_length, fixed, mb_x + 1, mb_y, mb_xy + 1);
708                if (mb_y + 1 < mb_height)
709                    add_blocklist(next_blocklist, &next_blocklist_length, fixed, mb_x, mb_y + 1, mb_xy + mb_stride);
710            }
711        }
712        av_assert0(next_blocklist_length <= mb_height * mb_width);
713        FFSWAP(int , blocklist_length, next_blocklist_length);
714        FFSWAP(void*, blocklist, next_blocklist);
715    }
716}
717
718static int is_intra_more_likely(ERContext *s)
719{
720    int is_intra_likely, i, j, undamaged_count, skip_amount, mb_x, mb_y;
721
722    if (!s->last_pic.f || !s->last_pic.f->data[0])
723        return 1; // no previous frame available -> use spatial prediction
724
725    if (s->avctx->error_concealment & FF_EC_FAVOR_INTER)
726        return 0;
727
728    undamaged_count = 0;
729    for (i = 0; i < s->mb_num; i++) {
730        const int mb_xy = s->mb_index2xy[i];
731        const int error = s->error_status_table[mb_xy];
732        if (!((error & ER_DC_ERROR) && (error & ER_MV_ERROR)))
733            undamaged_count++;
734    }
735
736    if (undamaged_count < 5)
737        return 0; // almost all MBs damaged -> use temporal prediction
738
739    skip_amount     = FFMAX(undamaged_count / 50, 1); // check only up to 50 MBs
740    is_intra_likely = 0;
741
742    j = 0;
743    for (mb_y = 0; mb_y < s->mb_height - 1; mb_y++) {
744        for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
745            int error;
746            const int mb_xy = mb_x + mb_y * s->mb_stride;
747
748            error = s->error_status_table[mb_xy];
749            if ((error & ER_DC_ERROR) && (error & ER_MV_ERROR))
750                continue; // skip damaged
751
752            j++;
753            // skip a few to speed things up
754            if ((j % skip_amount) != 0)
755                continue;
756
757            if (s->cur_pic.f->pict_type == AV_PICTURE_TYPE_I) {
758                int *linesize = s->cur_pic.f->linesize;
759                uint8_t *mb_ptr      = s->cur_pic.f->data[0] +
760                                       mb_x * 16 + mb_y * 16 * linesize[0];
761                uint8_t *last_mb_ptr = s->last_pic.f->data[0] +
762                                       mb_x * 16 + mb_y * 16 * linesize[0];
763
764                if (s->avctx->codec_id == AV_CODEC_ID_H264) {
765                    // FIXME
766                } else {
767                    ff_thread_await_progress(s->last_pic.tf, mb_y, 0);
768                }
769                is_intra_likely += s->sad(NULL, last_mb_ptr, mb_ptr,
770                                          linesize[0], 16);
771                // FIXME need await_progress() here
772                is_intra_likely -= s->sad(NULL, last_mb_ptr,
773                                          last_mb_ptr + linesize[0] * 16,
774                                          linesize[0], 16);
775            } else {
776                if (IS_INTRA(s->cur_pic.mb_type[mb_xy]))
777                   is_intra_likely++;
778                else
779                   is_intra_likely--;
780            }
781        }
782    }
783//      av_log(NULL, AV_LOG_ERROR, "is_intra_likely: %d type:%d\n", is_intra_likely, s->pict_type);
784    return is_intra_likely > 0;
785}
786
787void ff_er_frame_start(ERContext *s)
788{
789    if (!s->avctx->error_concealment)
790        return;
791
792    if (!s->mecc_inited) {
793        MECmpContext mecc;
794        ff_me_cmp_init(&mecc, s->avctx);
795        s->sad = mecc.sad[0];
796        s->mecc_inited = 1;
797    }
798
799    memset(s->error_status_table, ER_MB_ERROR | VP_START | ER_MB_END,
800           s->mb_stride * s->mb_height * sizeof(uint8_t));
801    atomic_init(&s->error_count, 3 * s->mb_num);
802    s->error_occurred = 0;
803}
804
805static int er_supported(ERContext *s)
806{
807    if(s->avctx->hwaccel && s->avctx->hwaccel->decode_slice           ||
808       !s->cur_pic.f                                                  ||
809       s->cur_pic.field_picture
810    )
811        return 0;
812    return 1;
813}
814
815/**
816 * Add a slice.
817 * @param endx   x component of the last macroblock, can be -1
818 *               for the last of the previous line
819 * @param status the status at the end (ER_MV_END, ER_AC_ERROR, ...), it is
820 *               assumed that no earlier end or error of the same type occurred
821 */
822void ff_er_add_slice(ERContext *s, int startx, int starty,
823                     int endx, int endy, int status)
824{
825    const int start_i  = av_clip(startx + starty * s->mb_width, 0, s->mb_num - 1);
826    const int end_i    = av_clip(endx   + endy   * s->mb_width, 0, s->mb_num);
827    const int start_xy = s->mb_index2xy[start_i];
828    const int end_xy   = s->mb_index2xy[end_i];
829    int mask           = -1;
830
831    if (s->avctx->hwaccel && s->avctx->hwaccel->decode_slice)
832        return;
833
834    if (start_i > end_i || start_xy > end_xy) {
835        av_log(s->avctx, AV_LOG_ERROR,
836               "internal error, slice end before start\n");
837        return;
838    }
839
840    if (!s->avctx->error_concealment)
841        return;
842
843    mask &= ~VP_START;
844    if (status & (ER_AC_ERROR | ER_AC_END)) {
845        mask           &= ~(ER_AC_ERROR | ER_AC_END);
846        atomic_fetch_add(&s->error_count, start_i - end_i - 1);
847    }
848    if (status & (ER_DC_ERROR | ER_DC_END)) {
849        mask           &= ~(ER_DC_ERROR | ER_DC_END);
850        atomic_fetch_add(&s->error_count, start_i - end_i - 1);
851    }
852    if (status & (ER_MV_ERROR | ER_MV_END)) {
853        mask           &= ~(ER_MV_ERROR | ER_MV_END);
854        atomic_fetch_add(&s->error_count, start_i - end_i - 1);
855    }
856
857    if (status & ER_MB_ERROR) {
858        s->error_occurred = 1;
859        atomic_store(&s->error_count, INT_MAX);
860    }
861
862    if (mask == ~0x7F) {
863        memset(&s->error_status_table[start_xy], 0,
864               (end_xy - start_xy) * sizeof(uint8_t));
865    } else {
866        int i;
867        for (i = start_xy; i < end_xy; i++)
868            s->error_status_table[i] &= mask;
869    }
870
871    if (end_i == s->mb_num)
872        atomic_store(&s->error_count, INT_MAX);
873    else {
874        s->error_status_table[end_xy] &= mask;
875        s->error_status_table[end_xy] |= status;
876    }
877
878    s->error_status_table[start_xy] |= VP_START;
879
880    if (start_xy > 0 && !(s->avctx->active_thread_type & FF_THREAD_SLICE) &&
881        er_supported(s) && s->avctx->skip_top * s->mb_width < start_i) {
882        int prev_status = s->error_status_table[s->mb_index2xy[start_i - 1]];
883
884        prev_status &= ~ VP_START;
885        if (prev_status != (ER_MV_END | ER_DC_END | ER_AC_END)) {
886            s->error_occurred = 1;
887            atomic_store(&s->error_count, INT_MAX);
888        }
889    }
890}
891
892void ff_er_frame_end(ERContext *s)
893{
894    int *linesize = NULL;
895    int i, mb_x, mb_y, error, error_type, dc_error, mv_error, ac_error;
896    int distance;
897    int threshold_part[4] = { 100, 100, 100 };
898    int threshold = 50;
899    int is_intra_likely;
900    int size = s->b8_stride * 2 * s->mb_height;
901
902    /* We do not support ER of field pictures yet,
903     * though it should not crash if enabled. */
904    if (!s->avctx->error_concealment || !atomic_load(&s->error_count)  ||
905        s->avctx->lowres                                               ||
906        !er_supported(s)                                               ||
907        atomic_load(&s->error_count) == 3 * s->mb_width *
908                          (s->avctx->skip_top + s->avctx->skip_bottom)) {
909        return;
910    }
911    linesize = s->cur_pic.f->linesize;
912
913    if (   s->avctx->codec_id == AV_CODEC_ID_MPEG2VIDEO
914        && (FFALIGN(s->avctx->height, 16)&16)
915        && atomic_load(&s->error_count) == 3 * s->mb_width * (s->avctx->skip_top + s->avctx->skip_bottom + 1)) {
916        for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
917            int status = s->error_status_table[mb_x + (s->mb_height - 1) * s->mb_stride];
918            if (status != 0x7F)
919                break;
920        }
921
922        if (mb_x == s->mb_width) {
923            av_log(s->avctx, AV_LOG_DEBUG, "ignoring last missing slice\n");
924            return;
925        }
926    }
927
928    if (s->last_pic.f) {
929        if (s->last_pic.f->width  != s->cur_pic.f->width  ||
930            s->last_pic.f->height != s->cur_pic.f->height ||
931            s->last_pic.f->format != s->cur_pic.f->format) {
932            av_log(s->avctx, AV_LOG_WARNING, "Cannot use previous picture in error concealment\n");
933            memset(&s->last_pic, 0, sizeof(s->last_pic));
934        }
935    }
936    if (s->next_pic.f) {
937        if (s->next_pic.f->width  != s->cur_pic.f->width  ||
938            s->next_pic.f->height != s->cur_pic.f->height ||
939            s->next_pic.f->format != s->cur_pic.f->format) {
940            av_log(s->avctx, AV_LOG_WARNING, "Cannot use next picture in error concealment\n");
941            memset(&s->next_pic, 0, sizeof(s->next_pic));
942        }
943    }
944
945    if (!s->cur_pic.motion_val[0] || !s->cur_pic.ref_index[0]) {
946        av_log(s->avctx, AV_LOG_ERROR, "Warning MVs not available\n");
947
948        for (i = 0; i < 2; i++) {
949            s->ref_index_buf[i]  = av_buffer_allocz(s->mb_stride * s->mb_height * 4 * sizeof(uint8_t));
950            s->motion_val_buf[i] = av_buffer_allocz((size + 4) * 2 * sizeof(uint16_t));
951            if (!s->ref_index_buf[i] || !s->motion_val_buf[i])
952                break;
953            s->cur_pic.ref_index[i]  = s->ref_index_buf[i]->data;
954            s->cur_pic.motion_val[i] = (int16_t (*)[2])s->motion_val_buf[i]->data + 4;
955        }
956        if (i < 2) {
957            for (i = 0; i < 2; i++) {
958                av_buffer_unref(&s->ref_index_buf[i]);
959                av_buffer_unref(&s->motion_val_buf[i]);
960                s->cur_pic.ref_index[i]  = NULL;
961                s->cur_pic.motion_val[i] = NULL;
962            }
963            return;
964        }
965    }
966
967    if (s->avctx->debug & FF_DEBUG_ER) {
968        for (mb_y = 0; mb_y < s->mb_height; mb_y++) {
969            for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
970                int status = s->error_status_table[mb_x + mb_y * s->mb_stride];
971
972                av_log(s->avctx, AV_LOG_DEBUG, "%2X ", status);
973            }
974            av_log(s->avctx, AV_LOG_DEBUG, "\n");
975        }
976    }
977
978#if 1
979    /* handle overlapping slices */
980    for (error_type = 1; error_type <= 3; error_type++) {
981        int end_ok = 0;
982
983        for (i = s->mb_num - 1; i >= 0; i--) {
984            const int mb_xy = s->mb_index2xy[i];
985            int error       = s->error_status_table[mb_xy];
986
987            if (error & (1 << error_type))
988                end_ok = 1;
989            if (error & (8 << error_type))
990                end_ok = 1;
991
992            if (!end_ok)
993                s->error_status_table[mb_xy] |= 1 << error_type;
994
995            if (error & VP_START)
996                end_ok = 0;
997        }
998    }
999#endif
1000#if 1
1001    /* handle slices with partitions of different length */
1002    if (s->partitioned_frame) {
1003        int end_ok = 0;
1004
1005        for (i = s->mb_num - 1; i >= 0; i--) {
1006            const int mb_xy = s->mb_index2xy[i];
1007            int error       = s->error_status_table[mb_xy];
1008
1009            if (error & ER_AC_END)
1010                end_ok = 0;
1011            if ((error & ER_MV_END) ||
1012                (error & ER_DC_END) ||
1013                (error & ER_AC_ERROR))
1014                end_ok = 1;
1015
1016            if (!end_ok)
1017                s->error_status_table[mb_xy]|= ER_AC_ERROR;
1018
1019            if (error & VP_START)
1020                end_ok = 0;
1021        }
1022    }
1023#endif
1024    /* handle missing slices */
1025    if (s->avctx->err_recognition & AV_EF_EXPLODE) {
1026        int end_ok = 1;
1027
1028        // FIXME + 100 hack
1029        for (i = s->mb_num - 2; i >= s->mb_width + 100; i--) {
1030            const int mb_xy = s->mb_index2xy[i];
1031            int error1 = s->error_status_table[mb_xy];
1032            int error2 = s->error_status_table[s->mb_index2xy[i + 1]];
1033
1034            if (error1 & VP_START)
1035                end_ok = 1;
1036
1037            if (error2 == (VP_START | ER_MB_ERROR | ER_MB_END) &&
1038                error1 != (VP_START | ER_MB_ERROR | ER_MB_END) &&
1039                ((error1 & ER_AC_END) || (error1 & ER_DC_END) ||
1040                (error1 & ER_MV_END))) {
1041                // end & uninit
1042                end_ok = 0;
1043            }
1044
1045            if (!end_ok)
1046                s->error_status_table[mb_xy] |= ER_MB_ERROR;
1047        }
1048    }
1049
1050#if 1
1051    /* backward mark errors */
1052    distance = 9999999;
1053    for (error_type = 1; error_type <= 3; error_type++) {
1054        for (i = s->mb_num - 1; i >= 0; i--) {
1055            const int mb_xy = s->mb_index2xy[i];
1056            int       error = s->error_status_table[mb_xy];
1057
1058            if (!s->mbskip_table || !s->mbskip_table[mb_xy]) // FIXME partition specific
1059                distance++;
1060            if (error & (1 << error_type))
1061                distance = 0;
1062
1063            if (s->partitioned_frame) {
1064                if (distance < threshold_part[error_type - 1])
1065                    s->error_status_table[mb_xy] |= 1 << error_type;
1066            } else {
1067                if (distance < threshold)
1068                    s->error_status_table[mb_xy] |= 1 << error_type;
1069            }
1070
1071            if (error & VP_START)
1072                distance = 9999999;
1073        }
1074    }
1075#endif
1076
1077    /* forward mark errors */
1078    error = 0;
1079    for (i = 0; i < s->mb_num; i++) {
1080        const int mb_xy = s->mb_index2xy[i];
1081        int old_error   = s->error_status_table[mb_xy];
1082
1083        if (old_error & VP_START) {
1084            error = old_error & ER_MB_ERROR;
1085        } else {
1086            error |= old_error & ER_MB_ERROR;
1087            s->error_status_table[mb_xy] |= error;
1088        }
1089    }
1090#if 1
1091    /* handle not partitioned case */
1092    if (!s->partitioned_frame) {
1093        for (i = 0; i < s->mb_num; i++) {
1094            const int mb_xy = s->mb_index2xy[i];
1095            int error = s->error_status_table[mb_xy];
1096            if (error & ER_MB_ERROR)
1097                error |= ER_MB_ERROR;
1098            s->error_status_table[mb_xy] = error;
1099        }
1100    }
1101#endif
1102
1103    dc_error = ac_error = mv_error = 0;
1104    for (i = 0; i < s->mb_num; i++) {
1105        const int mb_xy = s->mb_index2xy[i];
1106        int error = s->error_status_table[mb_xy];
1107        if (error & ER_DC_ERROR)
1108            dc_error++;
1109        if (error & ER_AC_ERROR)
1110            ac_error++;
1111        if (error & ER_MV_ERROR)
1112            mv_error++;
1113    }
1114    av_log(s->avctx, AV_LOG_INFO, "concealing %d DC, %d AC, %d MV errors in %c frame\n",
1115           dc_error, ac_error, mv_error, av_get_picture_type_char(s->cur_pic.f->pict_type));
1116
1117    s->cur_pic.f->decode_error_flags |= FF_DECODE_ERROR_CONCEALMENT_ACTIVE;
1118
1119    is_intra_likely = is_intra_more_likely(s);
1120
1121    /* set unknown mb-type to most likely */
1122    for (i = 0; i < s->mb_num; i++) {
1123        const int mb_xy = s->mb_index2xy[i];
1124        int error = s->error_status_table[mb_xy];
1125        if (!((error & ER_DC_ERROR) && (error & ER_MV_ERROR)))
1126            continue;
1127
1128        if (is_intra_likely)
1129            s->cur_pic.mb_type[mb_xy] = MB_TYPE_INTRA4x4;
1130        else
1131            s->cur_pic.mb_type[mb_xy] = MB_TYPE_16x16 | MB_TYPE_L0;
1132    }
1133
1134    // change inter to intra blocks if no reference frames are available
1135    if (!(s->last_pic.f && s->last_pic.f->data[0]) &&
1136        !(s->next_pic.f && s->next_pic.f->data[0]))
1137        for (i = 0; i < s->mb_num; i++) {
1138            const int mb_xy = s->mb_index2xy[i];
1139            if (!IS_INTRA(s->cur_pic.mb_type[mb_xy]))
1140                s->cur_pic.mb_type[mb_xy] = MB_TYPE_INTRA4x4;
1141        }
1142
1143    /* handle inter blocks with damaged AC */
1144    for (mb_y = 0; mb_y < s->mb_height; mb_y++) {
1145        for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
1146            const int mb_xy   = mb_x + mb_y * s->mb_stride;
1147            const int mb_type = s->cur_pic.mb_type[mb_xy];
1148            const int dir     = !(s->last_pic.f && s->last_pic.f->data[0]);
1149            const int mv_dir  = dir ? MV_DIR_BACKWARD : MV_DIR_FORWARD;
1150            int mv_type;
1151
1152            int error = s->error_status_table[mb_xy];
1153
1154            if (IS_INTRA(mb_type))
1155                continue; // intra
1156            if (error & ER_MV_ERROR)
1157                continue; // inter with damaged MV
1158            if (!(error & ER_AC_ERROR))
1159                continue; // undamaged inter
1160
1161            if (IS_8X8(mb_type)) {
1162                int mb_index = mb_x * 2 + mb_y * 2 * s->b8_stride;
1163                int j;
1164                mv_type = MV_TYPE_8X8;
1165                for (j = 0; j < 4; j++) {
1166                    s->mv[0][j][0] = s->cur_pic.motion_val[dir][mb_index + (j & 1) + (j >> 1) * s->b8_stride][0];
1167                    s->mv[0][j][1] = s->cur_pic.motion_val[dir][mb_index + (j & 1) + (j >> 1) * s->b8_stride][1];
1168                }
1169            } else {
1170                mv_type     = MV_TYPE_16X16;
1171                s->mv[0][0][0] = s->cur_pic.motion_val[dir][mb_x * 2 + mb_y * 2 * s->b8_stride][0];
1172                s->mv[0][0][1] = s->cur_pic.motion_val[dir][mb_x * 2 + mb_y * 2 * s->b8_stride][1];
1173            }
1174
1175            s->decode_mb(s->opaque, 0 /* FIXME H.264 partitioned slices need this set */,
1176                         mv_dir, mv_type, &s->mv, mb_x, mb_y, 0, 0);
1177        }
1178    }
1179
1180    /* guess MVs */
1181    if (s->cur_pic.f->pict_type == AV_PICTURE_TYPE_B) {
1182        for (mb_y = 0; mb_y < s->mb_height; mb_y++) {
1183            for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
1184                int       xy      = mb_x * 2 + mb_y * 2 * s->b8_stride;
1185                const int mb_xy   = mb_x + mb_y * s->mb_stride;
1186                const int mb_type = s->cur_pic.mb_type[mb_xy];
1187                int mv_dir = MV_DIR_FORWARD | MV_DIR_BACKWARD;
1188
1189                int error = s->error_status_table[mb_xy];
1190
1191                if (IS_INTRA(mb_type))
1192                    continue;
1193                if (!(error & ER_MV_ERROR))
1194                    continue; // inter with undamaged MV
1195                if (!(error & ER_AC_ERROR))
1196                    continue; // undamaged inter
1197
1198                if (!(s->last_pic.f && s->last_pic.f->data[0]))
1199                    mv_dir &= ~MV_DIR_FORWARD;
1200                if (!(s->next_pic.f && s->next_pic.f->data[0]))
1201                    mv_dir &= ~MV_DIR_BACKWARD;
1202
1203                if (s->pp_time) {
1204                    int time_pp = s->pp_time;
1205                    int time_pb = s->pb_time;
1206
1207                    av_assert0(s->avctx->codec_id != AV_CODEC_ID_H264);
1208                    ff_thread_await_progress(s->next_pic.tf, mb_y, 0);
1209
1210                    s->mv[0][0][0] = s->next_pic.motion_val[0][xy][0] *  time_pb            / time_pp;
1211                    s->mv[0][0][1] = s->next_pic.motion_val[0][xy][1] *  time_pb            / time_pp;
1212                    s->mv[1][0][0] = s->next_pic.motion_val[0][xy][0] * (time_pb - time_pp) / time_pp;
1213                    s->mv[1][0][1] = s->next_pic.motion_val[0][xy][1] * (time_pb - time_pp) / time_pp;
1214                } else {
1215                    s->mv[0][0][0] = 0;
1216                    s->mv[0][0][1] = 0;
1217                    s->mv[1][0][0] = 0;
1218                    s->mv[1][0][1] = 0;
1219                }
1220
1221                s->decode_mb(s->opaque, 0, mv_dir, MV_TYPE_16X16, &s->mv,
1222                             mb_x, mb_y, 0, 0);
1223            }
1224        }
1225    } else
1226        guess_mv(s);
1227
1228    /* fill DC for inter blocks */
1229    for (mb_y = 0; mb_y < s->mb_height; mb_y++) {
1230        for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
1231            int dc, dcu, dcv, y, n;
1232            int16_t *dc_ptr;
1233            uint8_t *dest_y, *dest_cb, *dest_cr;
1234            const int mb_xy   = mb_x + mb_y * s->mb_stride;
1235            const int mb_type = s->cur_pic.mb_type[mb_xy];
1236
1237            // error = s->error_status_table[mb_xy];
1238
1239            if (IS_INTRA(mb_type) && s->partitioned_frame)
1240                continue;
1241            // if (error & ER_MV_ERROR)
1242            //     continue; // inter data damaged FIXME is this good?
1243
1244            dest_y  = s->cur_pic.f->data[0] + mb_x * 16 + mb_y * 16 * linesize[0];
1245            dest_cb = s->cur_pic.f->data[1] + mb_x *  8 + mb_y *  8 * linesize[1];
1246            dest_cr = s->cur_pic.f->data[2] + mb_x *  8 + mb_y *  8 * linesize[2];
1247
1248            dc_ptr = &s->dc_val[0][mb_x * 2 + mb_y * 2 * s->b8_stride];
1249            for (n = 0; n < 4; n++) {
1250                dc = 0;
1251                for (y = 0; y < 8; y++) {
1252                    int x;
1253                    for (x = 0; x < 8; x++)
1254                       dc += dest_y[x + (n & 1) * 8 +
1255                             (y + (n >> 1) * 8) * linesize[0]];
1256                }
1257                dc_ptr[(n & 1) + (n >> 1) * s->b8_stride] = (dc + 4) >> 3;
1258            }
1259
1260            if (!s->cur_pic.f->data[2])
1261                continue;
1262
1263            dcu = dcv = 0;
1264            for (y = 0; y < 8; y++) {
1265                int x;
1266                for (x = 0; x < 8; x++) {
1267                    dcu += dest_cb[x + y * linesize[1]];
1268                    dcv += dest_cr[x + y * linesize[2]];
1269                }
1270            }
1271            s->dc_val[1][mb_x + mb_y * s->mb_stride] = (dcu + 4) >> 3;
1272            s->dc_val[2][mb_x + mb_y * s->mb_stride] = (dcv + 4) >> 3;
1273        }
1274    }
1275#if 1
1276    /* guess DC for damaged blocks */
1277    guess_dc(s, s->dc_val[0], s->mb_width*2, s->mb_height*2, s->b8_stride, 1);
1278    guess_dc(s, s->dc_val[1], s->mb_width  , s->mb_height  , s->mb_stride, 0);
1279    guess_dc(s, s->dc_val[2], s->mb_width  , s->mb_height  , s->mb_stride, 0);
1280#endif
1281
1282    /* filter luma DC */
1283    filter181(s->dc_val[0], s->mb_width * 2, s->mb_height * 2, s->b8_stride);
1284
1285#if 1
1286    /* render DC only intra */
1287    for (mb_y = 0; mb_y < s->mb_height; mb_y++) {
1288        for (mb_x = 0; mb_x < s->mb_width; mb_x++) {
1289            uint8_t *dest_y, *dest_cb, *dest_cr;
1290            const int mb_xy   = mb_x + mb_y * s->mb_stride;
1291            const int mb_type = s->cur_pic.mb_type[mb_xy];
1292
1293            int error = s->error_status_table[mb_xy];
1294
1295            if (IS_INTER(mb_type))
1296                continue;
1297            if (!(error & ER_AC_ERROR))
1298                continue; // undamaged
1299
1300            dest_y  = s->cur_pic.f->data[0] + mb_x * 16 + mb_y * 16 * linesize[0];
1301            dest_cb = s->cur_pic.f->data[1] + mb_x *  8 + mb_y *  8 * linesize[1];
1302            dest_cr = s->cur_pic.f->data[2] + mb_x *  8 + mb_y *  8 * linesize[2];
1303            if (!s->cur_pic.f->data[2])
1304                dest_cb = dest_cr = NULL;
1305
1306            put_dc(s, dest_y, dest_cb, dest_cr, mb_x, mb_y);
1307        }
1308    }
1309#endif
1310
1311    if (s->avctx->error_concealment & FF_EC_DEBLOCK) {
1312        /* filter horizontal block boundaries */
1313        h_block_filter(s, s->cur_pic.f->data[0], s->mb_width * 2,
1314                       s->mb_height * 2, linesize[0], 1);
1315
1316        /* filter vertical block boundaries */
1317        v_block_filter(s, s->cur_pic.f->data[0], s->mb_width * 2,
1318                       s->mb_height * 2, linesize[0], 1);
1319
1320        if (s->cur_pic.f->data[2]) {
1321            h_block_filter(s, s->cur_pic.f->data[1], s->mb_width,
1322                        s->mb_height, linesize[1], 0);
1323            h_block_filter(s, s->cur_pic.f->data[2], s->mb_width,
1324                        s->mb_height, linesize[2], 0);
1325            v_block_filter(s, s->cur_pic.f->data[1], s->mb_width,
1326                        s->mb_height, linesize[1], 0);
1327            v_block_filter(s, s->cur_pic.f->data[2], s->mb_width,
1328                        s->mb_height, linesize[2], 0);
1329        }
1330    }
1331
1332    /* clean a few tables */
1333    for (i = 0; i < s->mb_num; i++) {
1334        const int mb_xy = s->mb_index2xy[i];
1335        int       error = s->error_status_table[mb_xy];
1336
1337        if (s->mbskip_table && s->cur_pic.f->pict_type != AV_PICTURE_TYPE_B &&
1338            (error & (ER_DC_ERROR | ER_MV_ERROR | ER_AC_ERROR))) {
1339            s->mbskip_table[mb_xy] = 0;
1340        }
1341        if (s->mbintra_table)
1342            s->mbintra_table[mb_xy] = 1;
1343    }
1344
1345    for (i = 0; i < 2; i++) {
1346        av_buffer_unref(&s->ref_index_buf[i]);
1347        av_buffer_unref(&s->motion_val_buf[i]);
1348        s->cur_pic.ref_index[i]  = NULL;
1349        s->cur_pic.motion_val[i] = NULL;
1350    }
1351
1352    memset(&s->cur_pic, 0, sizeof(ERPicture));
1353    memset(&s->last_pic, 0, sizeof(ERPicture));
1354    memset(&s->next_pic, 0, sizeof(ERPicture));
1355}
1356