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