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