?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
r105: This commit was manufactured by cvs2svn to create tag
[cinelerra_cv/mob.git] / hvirtual / quicktime / libavcodec / error_resilience.c
blob3cb8d40bcf11b45581cf7aaca4098ce379cec6c7
1 /*
2 * Error resilience / concealment
3 *
4 * Copyright (c) 2002 Michael Niedermayer <michaelni@gmx.at>
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 #include "avcodec.h"
22 #include "dsputil.h"
23 #include "mpegvideo.h"
24
25 /**
26 * replaces the current MB with a flat dc only version.
27 */
28 static void put_dc(MpegEncContext *s, uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr, int mb_x, int mb_y)
29 {
30 int dc, dcu, dcv, y, i;
31 for(i=0; i<4; i++){
32 dc= s->dc_val[0][mb_x*2+1 + (i&1) + (mb_y*2+1 + (i>>1))*(s->mb_width*2+2)];
33 if(dc<0) dc=0;
34 else if(dc>2040) dc=2040;
35 for(y=0; y<8; y++){
36 int x;
37 for(x=0; x<8; x++){
38 dest_y[x + (i&1)*8 + (y + (i>>1)*8)*s->linesize]= dc/8;
39 }
40 }
41 }
42 dcu = s->dc_val[1][mb_x+1 + (mb_y+1)*(s->mb_width+2)];
43 dcv = s->dc_val[2][mb_x+1 + (mb_y+1)*(s->mb_width+2)];
44 if (dcu<0 ) dcu=0;
45 else if(dcu>2040) dcu=2040;
46 if (dcv<0 ) dcv=0;
47 else if(dcv>2040) dcv=2040;
48 for(y=0; y<8; y++){
49 int x;
50 for(x=0; x<8; x++){
51 dest_cb[x + y*(s->uvlinesize)]= dcu/8;
52 dest_cr[x + y*(s->uvlinesize)]= dcv/8;
53 }
54 }
55 }
56
57 static void filter181(INT16 *data, int width, int height, int stride){
58 int x,y;
59
60 /* horizontal filter */
61 for(y=1; y<height-1; y++){
62 int prev_dc= data[0 + y*stride];
63
64 for(x=1; x<width-1; x++){
65 int dc;
66
67 dc= - prev_dc
68 + data[x + y*stride]*8
69 - data[x + 1 + y*stride];
70 dc= (dc*10923 + 32768)>>16;
71 prev_dc= data[x + y*stride];
72 data[x + y*stride]= dc;
73 }
74 }
75
76 /* vertical filter */
77 for(x=1; x<width-1; x++){
78 int prev_dc= data[x];
79
80 for(y=1; y<height-1; y++){
81 int dc;
82
83 dc= - prev_dc
84 + data[x + y *stride]*8
85 - data[x + (y+1)*stride];
86 dc= (dc*10923 + 32768)>>16;
87 prev_dc= data[x + y*stride];
88 data[x + y*stride]= dc;
89 }
90 }
91 }
92
93 /**
94 * guess the dc of blocks which dont have a undamaged dc
95 * @param w width in 8 pixel blocks
96 * @param h height in 8 pixel blocks
97 */
98 static void guess_dc(MpegEncContext *s, INT16 *dc, int w, int h, int stride, int is_luma){
99 int b_x, b_y;
100
101 for(b_y=0; b_y<h; b_y++){
102 for(b_x=0; b_x<w; b_x++){
103 int color[4]={1024,1024,1024,1024};
104 int distance[4]={9999,9999,9999,9999};
105 int mb_index, error, j;
106 INT64 guess, weight_sum;
107
108 mb_index= (b_x>>is_luma) + (b_y>>is_luma)*s->mb_width;
109
110 error= s->error_status_table[mb_index];
111
112 if(!(s->mb_type[mb_index]&MB_TYPE_INTRA)) continue; //inter
113 if(!(error&DC_ERROR)) continue; //dc-ok
114
115 /* right block */
116 for(j=b_x+1; j<w; j++){
117 int mb_index_j= (j>>is_luma) + (b_y>>is_luma)*s->mb_width;
118 int error_j= s->error_status_table[mb_index_j];
119 int intra_j= s->mb_type[mb_index_j]&MB_TYPE_INTRA;
120 if(intra_j==0 || !(error_j&DC_ERROR)){
121 color[0]= dc[j + b_y*stride];
122 distance[0]= j-b_x;
123 break;
124 }
125 }
126
127 /* left block */
128 for(j=b_x-1; j>=0; j--){
129 int mb_index_j= (j>>is_luma) + (b_y>>is_luma)*s->mb_width;
130 int error_j= s->error_status_table[mb_index_j];
131 int intra_j= s->mb_type[mb_index_j]&MB_TYPE_INTRA;
132 if(intra_j==0 || !(error_j&DC_ERROR)){
133 color[1]= dc[j + b_y*stride];
134 distance[1]= b_x-j;
135 break;
136 }
137 }
138
139 /* bottom block */
140 for(j=b_y+1; j<h; j++){
141 int mb_index_j= (b_x>>is_luma) + (j>>is_luma)*s->mb_width;
142 int error_j= s->error_status_table[mb_index_j];
143 int intra_j= s->mb_type[mb_index_j]&MB_TYPE_INTRA;
144 if(intra_j==0 || !(error_j&DC_ERROR)){
145 color[2]= dc[b_x + j*stride];
146 distance[2]= j-b_y;
147 break;
148 }
149 }
150
151 /* top block */
152 for(j=b_y-1; j>=0; j--){
153 int mb_index_j= (b_x>>is_luma) + (j>>is_luma)*s->mb_width;
154 int error_j= s->error_status_table[mb_index_j];
155 int intra_j= s->mb_type[mb_index_j]&MB_TYPE_INTRA;
156 if(intra_j==0 || !(error_j&DC_ERROR)){
157 color[3]= dc[b_x + j*stride];
158 distance[3]= b_y-j;
159 break;
160 }
161 }
162
163 weight_sum=0;
164 guess=0;
165 for(j=0; j<4; j++){
166 INT64 weight= 256*256*256*16/distance[j];
167 guess+= weight*(INT64)color[j];
168 weight_sum+= weight;
169 }
170 guess= (guess + weight_sum/2) / weight_sum;
171
172 dc[b_x + b_y*stride]= guess;
173 }
174 }
175 }
176
177 /**
178 * simple horizontal deblocking filter used for error resilience
179 * @param w width in 8 pixel blocks
180 * @param h height in 8 pixel blocks
181 */
182 static void h_block_filter(MpegEncContext *s, UINT8 *dst, int w, int h, int stride, int is_luma){
183 int b_x, b_y;
184 UINT8 *cm = cropTbl + MAX_NEG_CROP;
185
186 for(b_y=0; b_y<h; b_y++){
187 for(b_x=0; b_x<w-1; b_x++){
188 int y;
189 int left_status = s->error_status_table[( b_x >>is_luma) + (b_y>>is_luma)*s->mb_width];
190 int right_status= s->error_status_table[((b_x+1)>>is_luma) + (b_y>>is_luma)*s->mb_width];
191 int left_intra= s->mb_type [( b_x >>is_luma) + (b_y>>is_luma)*s->mb_width]&MB_TYPE_INTRA;
192 int right_intra= s->mb_type [((b_x+1)>>is_luma) + (b_y>>is_luma)*s->mb_width]&MB_TYPE_INTRA;
193 int left_damage = left_status&(DC_ERROR|AC_ERROR|MV_ERROR);
194 int right_damage= right_status&(DC_ERROR|AC_ERROR|MV_ERROR);
195 int offset= b_x*8 + b_y*stride*8;
196 INT16 *left_mv= s->motion_val[s->block_wrap[0]*((b_y<<(1-is_luma)) + 1) + ( b_x <<(1-is_luma))];
197 INT16 *right_mv= s->motion_val[s->block_wrap[0]*((b_y<<(1-is_luma)) + 1) + ((b_x+1)<<(1-is_luma))];
198
199 if(!(left_damage||right_damage)) continue; // both undamaged
200
201 if( (!left_intra) && (!right_intra)
202 && ABS(left_mv[0]-right_mv[0]) + ABS(left_mv[1]+right_mv[1]) < 2) continue;
203
204 for(y=0; y<8; y++){
205 int a,b,c,d;
206
207 a= dst[offset + 7 + y*stride] - dst[offset + 6 + y*stride];
208 b= dst[offset + 8 + y*stride] - dst[offset + 7 + y*stride];
209 c= dst[offset + 9 + y*stride] - dst[offset + 8 + y*stride];
210
211 d= ABS(b) - ((ABS(a) + ABS(c) + 1)>>1);
212 d= FFMAX(d, 0);
213 if(b<0) d= -d;
214
215 if(d==0) continue;
216
217 if(!(left_damage && right_damage))
218 d= d*16/9;
219
220 if(left_damage){
221 dst[offset + 7 + y*stride] = cm[dst[offset + 7 + y*stride] + ((d*7)>>4)];
222 dst[offset + 6 + y*stride] = cm[dst[offset + 6 + y*stride] + ((d*5)>>4)];
223 dst[offset + 5 + y*stride] = cm[dst[offset + 5 + y*stride] + ((d*3)>>4)];
224 dst[offset + 4 + y*stride] = cm[dst[offset + 4 + y*stride] + ((d*1)>>4)];
225 }
226 if(right_damage){
227 dst[offset + 8 + y*stride] = cm[dst[offset + 8 + y*stride] - ((d*7)>>4)];
228 dst[offset + 9 + y*stride] = cm[dst[offset + 9 + y*stride] - ((d*5)>>4)];
229 dst[offset + 10+ y*stride] = cm[dst[offset +10 + y*stride] - ((d*3)>>4)];
230 dst[offset + 11+ y*stride] = cm[dst[offset +11 + y*stride] - ((d*1)>>4)];
231 }
232 }
233 }
234 }
235 }
236
237 /**
238 * simple vertical deblocking filter used for error resilience
239 * @param w width in 8 pixel blocks
240 * @param h height in 8 pixel blocks
241 */
242 static void v_block_filter(MpegEncContext *s, UINT8 *dst, int w, int h, int stride, int is_luma){
243 int b_x, b_y;
244 UINT8 *cm = cropTbl + MAX_NEG_CROP;
245
246 for(b_y=0; b_y<h-1; b_y++){
247 for(b_x=0; b_x<w; b_x++){
248 int x;
249 int top_status = s->error_status_table[(b_x>>is_luma) + ( b_y >>is_luma)*s->mb_width];
250 int bottom_status= s->error_status_table[(b_x>>is_luma) + ((b_y+1)>>is_luma)*s->mb_width];
251 int top_intra= s->mb_type [(b_x>>is_luma) + ( b_y >>is_luma)*s->mb_width]&MB_TYPE_INTRA;
252 int bottom_intra= s->mb_type [(b_x>>is_luma) + ((b_y+1)>>is_luma)*s->mb_width]&MB_TYPE_INTRA;
253 int top_damage = top_status&(DC_ERROR|AC_ERROR|MV_ERROR);
254 int bottom_damage= bottom_status&(DC_ERROR|AC_ERROR|MV_ERROR);
255 int offset= b_x*8 + b_y*stride*8;
256 INT16 *top_mv= s->motion_val[s->block_wrap[0]*(( b_y <<(1-is_luma)) + 1) + (b_x<<(1-is_luma))];
257 INT16 *bottom_mv= s->motion_val[s->block_wrap[0]*(((b_y+1)<<(1-is_luma)) + 1) + (b_x<<(1-is_luma))];
258
259 if(!(top_damage||bottom_damage)) continue; // both undamaged
260
261 if( (!top_intra) && (!bottom_intra)
262 && ABS(top_mv[0]-bottom_mv[0]) + ABS(top_mv[1]+bottom_mv[1]) < 2) continue;
263
264 for(x=0; x<8; x++){
265 int a,b,c,d;
266
267 a= dst[offset + x + 7*stride] - dst[offset + x + 6*stride];
268 b= dst[offset + x + 8*stride] - dst[offset + x + 7*stride];
269 c= dst[offset + x + 9*stride] - dst[offset + x + 8*stride];
270
271 d= ABS(b) - ((ABS(a) + ABS(c)+1)>>1);
272 d= FFMAX(d, 0);
273 if(b<0) d= -d;
274
275 if(d==0) continue;
276
277 if(!(top_damage && bottom_damage))
278 d= d*16/9;
279
280 if(top_damage){
281 dst[offset + x + 7*stride] = cm[dst[offset + x + 7*stride] + ((d*7)>>4)];
282 dst[offset + x + 6*stride] = cm[dst[offset + x + 6*stride] + ((d*5)>>4)];
283 dst[offset + x + 5*stride] = cm[dst[offset + x + 5*stride] + ((d*3)>>4)];
284 dst[offset + x + 4*stride] = cm[dst[offset + x + 4*stride] + ((d*1)>>4)];
285 }
286 if(bottom_damage){
287 dst[offset + x + 8*stride] = cm[dst[offset + x + 8*stride] - ((d*7)>>4)];
288 dst[offset + x + 9*stride] = cm[dst[offset + x + 9*stride] - ((d*5)>>4)];
289 dst[offset + x + 10*stride] = cm[dst[offset + x + 10*stride] - ((d*3)>>4)];
290 dst[offset + x + 11*stride] = cm[dst[offset + x + 11*stride] - ((d*1)>>4)];
291 }
292 }
293 }
294 }
295 }
296
297 static void guess_mv(MpegEncContext *s){
298 UINT8 fixed[s->mb_num];
299 #define MV_FROZEN 3
300 #define MV_CHANGED 2
301 #define MV_UNCHANGED 1
302 const int mb_width = s->mb_width;
303 const int mb_height= s->mb_height;
304 int i, depth, num_avail;
305
306 num_avail=0;
307 for(i=0; i<s->mb_num; i++){
308 int f=0;
309 int error= s->error_status_table[i];
310
311 if(s->mb_type[i]&MB_TYPE_INTRA) f=MV_FROZEN; //intra //FIXME check
312 if(!(error&MV_ERROR)) f=MV_FROZEN; //inter with undamaged MV
313
314 fixed[i]= f;
315 if(f==MV_FROZEN)
316 num_avail++;
317 }
318
319 if((!(s->avctx->error_concealment&FF_EC_GUESS_MVS)) || num_avail <= mb_width/2){
320 int mb_x, mb_y;
321 i= -1;
322 for(mb_y=0; mb_y<s->mb_height; mb_y++){
323 for(mb_x=0; mb_x<s->mb_width; mb_x++){
324 i++;
325
326 if(s->mb_type[i]&MB_TYPE_INTRA) continue;
327 if(!(s->error_status_table[i]&MV_ERROR)) continue;
328
329 s->mv_dir = MV_DIR_FORWARD;
330 s->mb_intra=0;
331 s->mv_type = MV_TYPE_16X16;
332 s->mb_skiped=0;
333
334 s->dsp.clear_blocks(s->block[0]);
335
336 s->mb_x= mb_x;
337 s->mb_y= mb_y;
338 s->mv[0][0][0]= 0;
339 s->mv[0][0][1]= 0;
340 MPV_decode_mb(s, s->block);
341 }
342 }
343 return;
344 }
345
346 for(depth=0;; depth++){
347 int changed, pass, none_left;
348
349 none_left=1;
350 changed=1;
351 for(pass=0; (changed || pass<2) && pass<10; pass++){
352 int i,mb_x, mb_y;
353 int score_sum=0;
354
355 changed=0;
356 i= -1;
357 for(mb_y=0; mb_y<s->mb_height; mb_y++){
358 for(mb_x=0; mb_x<s->mb_width; mb_x++){
359 int mv_predictor[8][2]={{0}};
360 int pred_count=0;
361 int j;
362 int best_score=256*256*256*64;
363 int best_pred=0;
364 const int mot_stride= mb_width*2+2;
365 const int mot_index= mb_x*2 + 1 + (mb_y*2+1)*mot_stride;
366 int prev_x= s->motion_val[mot_index][0];
367 int prev_y= s->motion_val[mot_index][1];
368
369 i++;
370 if((mb_x^mb_y^pass)&1) continue;
371
372 if(fixed[i]==MV_FROZEN) continue;
373
374 j=0;
375 if(mb_x>0 && fixed[i-1 ]==MV_FROZEN) j=1;
376 if(mb_x+1<mb_width && fixed[i+1 ]==MV_FROZEN) j=1;
377 if(mb_y>0 && fixed[i-mb_width]==MV_FROZEN) j=1;
378 if(mb_y+1<mb_height && fixed[i+mb_width]==MV_FROZEN) j=1;
379 if(j==0) continue;
380
381 j=0;
382 if(mb_x>0 && fixed[i-1 ]==MV_CHANGED) j=1;
383 if(mb_x+1<mb_width && fixed[i+1 ]==MV_CHANGED) j=1;
384 if(mb_y>0 && fixed[i-mb_width]==MV_CHANGED) j=1;
385 if(mb_y+1<mb_height && fixed[i+mb_width]==MV_CHANGED) j=1;
386 if(j==0 && pass>1) continue;
387
388 none_left=0;
389
390 if(mb_x>0 && fixed[i-1]){
391 mv_predictor[pred_count][0]= s->motion_val[mot_index - 2][0];
392 mv_predictor[pred_count][1]= s->motion_val[mot_index - 2][1];
393 pred_count++;
394 }
395 if(mb_x+1<mb_width && fixed[i+1]){
396 mv_predictor[pred_count][0]= s->motion_val[mot_index + 2][0];
397 mv_predictor[pred_count][1]= s->motion_val[mot_index + 2][1];
398 pred_count++;
399 }
400 if(mb_y>0 && fixed[i-mb_width]){
401 mv_predictor[pred_count][0]= s->motion_val[mot_index - mot_stride*2][0];
402 mv_predictor[pred_count][1]= s->motion_val[mot_index - mot_stride*2][1];
403 pred_count++;
404 }
405 if(mb_y+1<mb_height && fixed[i+mb_width]){
406 mv_predictor[pred_count][0]= s->motion_val[mot_index + mot_stride*2][0];
407 mv_predictor[pred_count][1]= s->motion_val[mot_index + mot_stride*2][1];
408 pred_count++;
409 }
410 if(pred_count==0) continue;
411
412 if(pred_count>1){
413 int sum_x=0, sum_y=0;
414 int max_x, max_y, min_x, min_y;
415
416 for(j=0; j<pred_count; j++){
417 sum_x+= mv_predictor[j][0];
418 sum_y+= mv_predictor[j][1];
419 }
420
421 /* mean */
422 mv_predictor[pred_count][0] = sum_x/j;
423 mv_predictor[pred_count][1] = sum_y/j;
424
425 /* median */
426 if(pred_count>=3){
427 min_y= min_x= 99999;
428 max_y= max_x=-99999;
429 }else{
430 min_x=min_y=max_x=max_y=0;
431 }
432 for(j=0; j<pred_count; j++){
433 max_x= FFMAX(max_x, mv_predictor[j][0]);
434 max_y= FFMAX(max_y, mv_predictor[j][1]);
435 min_x= FFMIN(min_x, mv_predictor[j][0]);
436 min_y= FFMIN(min_y, mv_predictor[j][1]);
437 }
438 mv_predictor[pred_count+1][0] = sum_x - max_x - min_x;
439 mv_predictor[pred_count+1][1] = sum_y - max_y - min_y;
440
441 if(pred_count==4){
442 mv_predictor[pred_count+1][0] /= 2;
443 mv_predictor[pred_count+1][1] /= 2;
444 }
445 pred_count+=2;
446 }
447
448 /* zero MV */
449 pred_count++;
450
451 /* last MV */
452 mv_predictor[pred_count][0]= s->motion_val[mot_index][0];
453 mv_predictor[pred_count][1]= s->motion_val[mot_index][1];
454 pred_count++;
455
456 s->mv_dir = MV_DIR_FORWARD;
457 s->mb_intra=0;
458 s->mv_type = MV_TYPE_16X16;
459 s->mb_skiped=0;
460
461 s->dsp.clear_blocks(s->block[0]);
462
463 s->mb_x= mb_x;
464 s->mb_y= mb_y;
465 for(j=0; j<pred_count; j++){
466 int score=0;
467 UINT8 *src= s->current_picture.data[0] + mb_x*16 + mb_y*16*s->linesize;
468
469 s->motion_val[mot_index][0]= s->mv[0][0][0]= mv_predictor[j][0];
470 s->motion_val[mot_index][1]= s->mv[0][0][1]= mv_predictor[j][1];
471 MPV_decode_mb(s, s->block);
472
473 if(mb_x>0 && fixed[i-1]){
474 int k;
475 for(k=0; k<16; k++)
476 score += ABS(src[k*s->linesize-1 ]-src[k*s->linesize ]);
477 }
478 if(mb_x+1<mb_width && fixed[i+1]){
479 int k;
480 for(k=0; k<16; k++)
481 score += ABS(src[k*s->linesize+15]-src[k*s->linesize+16]);
482 }
483 if(mb_y>0 && fixed[i-mb_width]){
484 int k;
485 for(k=0; k<16; k++)
486 score += ABS(src[k-s->linesize ]-src[k ]);
487 }
488 if(mb_y+1<mb_height && fixed[i+mb_width]){
489 int k;
490 for(k=0; k<16; k++)
491 score += ABS(src[k+s->linesize*15]-src[k+s->linesize*16]);
492 }
493
494 if(score <= best_score){ // <= will favor the last MV
495 best_score= score;
496 best_pred= j;
497 }
498 }
499 score_sum+= best_score;
500 //FIXME no need to set s->motion_val[mot_index][0] explicit
501 s->motion_val[mot_index][0]= s->mv[0][0][0]= mv_predictor[best_pred][0];
502 s->motion_val[mot_index][1]= s->mv[0][0][1]= mv_predictor[best_pred][1];
503
504 MPV_decode_mb(s, s->block);
505
506
507 if(s->mv[0][0][0] != prev_x || s->mv[0][0][1] != prev_y){
508 fixed[i]=MV_CHANGED;
509 changed++;
510 }else
511 fixed[i]=MV_UNCHANGED;
512 }
513 }
514
515 // printf(".%d/%d", changed, score_sum); fflush(stdout);
516 }
517
518 if(none_left)
519 return;
520
521 for(i=0; i<s->mb_num; i++){
522 if(fixed[i])
523 fixed[i]=MV_FROZEN;
524 }
525 // printf(":"); fflush(stdout);
526 }
527 }
528
529 static int is_intra_more_likely(MpegEncContext *s){
530 int is_intra_likely, i, j, undamaged_count, skip_amount, mb_x, mb_y;
531
532 if(s->last_picture.data[0]==NULL) return 1; //no previous frame available -> use spatial prediction
533
534 undamaged_count=0;
535 for(i=0; i<s->mb_num; i++){
536 int error= s->error_status_table[i];
537 if(!((error&DC_ERROR) && (error&MV_ERROR)))
538 undamaged_count++;
539 }
540
541 if(undamaged_count < 5) return 0; //allmost all MBs damaged -> use temporal prediction
542
543 skip_amount= FFMAX(undamaged_count/50, 1); //check only upto 50 MBs
544 is_intra_likely=0;
545
546 j=0;
547 i=-1;
548 for(mb_y= 0; mb_y<s->mb_height-1; mb_y++){
549 for(mb_x= 0; mb_x<s->mb_width; mb_x++){
550 int error;
551
552 i++;
553 error= s->error_status_table[i];
554 if((error&DC_ERROR) && (error&MV_ERROR))
555 continue; //skip damaged
556
557 j++;
558 if((j%skip_amount) != 0) continue; //skip a few to speed things up
559
560 if(s->pict_type==I_TYPE){
561 UINT8 *mb_ptr = s->current_picture.data[0] + mb_x*16 + mb_y*16*s->linesize;
562 UINT8 *last_mb_ptr= s->last_picture.data [0] + mb_x*16 + mb_y*16*s->linesize;
563
564 is_intra_likely += s->dsp.pix_abs16x16(last_mb_ptr, mb_ptr , s->linesize);
565 is_intra_likely -= s->dsp.pix_abs16x16(last_mb_ptr, last_mb_ptr+s->linesize*16, s->linesize);
566 }else{
567 if(s->mbintra_table[i]) //HACK (this is allways inited but we should use mb_type[])
568 is_intra_likely++;
569 else
570 is_intra_likely--;
571 }
572 }
573 }
574 //printf("is_intra_likely: %d type:%d\n", is_intra_likely, s->pict_type);
575 return is_intra_likely > 0;
576 }
577
578 void ff_error_resilience(MpegEncContext *s){
579 int i, mb_x, mb_y, error, error_type;
580 int distance;
581 int threshold_part[4]= {100,100,100};
582 int threshold= 50;
583 int is_intra_likely;
584
585 #if 1
586 /* handle overlapping slices */
587 for(error_type=1; error_type<=3; error_type++){
588 int end_ok=0;
589
590 for(i=s->mb_num-1; i>=0; i--){
591 int error= s->error_status_table[i];
592
593 if(error&(1<<error_type))
594 end_ok=1;
595 if(error&(8<<error_type))
596 end_ok=1;
597
598 if(!end_ok)
599 s->error_status_table[i]|= 1<<error_type;
600
601 if(error&VP_START)
602 end_ok=0;
603 }
604 }
605 #endif
606 #if 1
607 /* handle slices with partitions of different length */
608 if(s->partitioned_frame){
609 int end_ok=0;
610
611 for(i=s->mb_num-1; i>=0; i--){
612 int error= s->error_status_table[i];
613
614 if(error&AC_END)
615 end_ok=0;
616 if((error&MV_END) || (error&DC_END) || (error&AC_ERROR))
617 end_ok=1;
618
619 if(!end_ok)
620 s->error_status_table[i]|= AC_ERROR;
621
622 if(error&VP_START)
623 end_ok=0;
624 }
625 }
626 #endif
627 /* handle missing slices */
628 if(s->error_resilience>=4){
629 int end_ok=1;
630
631 for(i=s->mb_num-2; i>=s->mb_width+100; i--){ //FIXME +100 hack
632 int error1= s->error_status_table[i ];
633 int error2= s->error_status_table[i+1];
634
635 if(error1&VP_START)
636 end_ok=1;
637
638 if( error2==(VP_START|DC_ERROR|AC_ERROR|MV_ERROR|AC_END|DC_END|MV_END)
639 && error1!=(VP_START|DC_ERROR|AC_ERROR|MV_ERROR|AC_END|DC_END|MV_END)
640 && ((error1&AC_END) || (error1&DC_END) || (error1&MV_END))){ //end & uninited
641 end_ok=0;
642 }
643
644 if(!end_ok)
645 s->error_status_table[i]|= DC_ERROR|AC_ERROR|MV_ERROR;
646 }
647 }
648
649 #if 1
650 /* backward mark errors */
651 distance=9999999;
652 for(error_type=1; error_type<=3; error_type++){
653 for(i=s->mb_num-1; i>=0; i--){
654 int error= s->error_status_table[i];
655
656 if(!s->mbskip_table[i]) //FIXME partition specific
657 distance++;
658 if(error&(1<<error_type))
659 distance= 0;
660
661 if(s->partitioned_frame){
662 if(distance < threshold_part[error_type-1])
663 s->error_status_table[i]|= 1<<error_type;
664 }else{
665 if(distance < threshold)
666 s->error_status_table[i]|= 1<<error_type;
667 }
668
669 if(error&VP_START)
670 distance= 9999999;
671 }
672 }
673 #endif
674
675 /* forward mark errors */
676 error=0;
677 for(i=0; i<s->mb_num; i++){
678 int old_error= s->error_status_table[i];
679
680 if(old_error&VP_START)
681 error= old_error& (DC_ERROR|AC_ERROR|MV_ERROR);
682 else{
683 error|= old_error& (DC_ERROR|AC_ERROR|MV_ERROR);
684 s->error_status_table[i]|= error;
685 }
686 }
687 #if 1
688 /* handle not partitioned case */
689 if(!s->partitioned_frame){
690 for(i=0; i<s->mb_num; i++){
691 error= s->error_status_table[i];
692 if(error&(AC_ERROR|DC_ERROR|MV_ERROR))
693 error|= AC_ERROR|DC_ERROR|MV_ERROR;
694 s->error_status_table[i]= error;
695 }
696 }
697 #endif
698 is_intra_likely= is_intra_more_likely(s);
699
700 /* set unknown mb-type to most likely */
701 for(i=0; i<s->mb_num; i++){
702 int intra;
703 error= s->error_status_table[i];
704 if((error&DC_ERROR) && (error&MV_ERROR))
705 intra= is_intra_likely;
706 else
707 intra= s->mbintra_table[i];
708
709 if(intra)
710 s->mb_type[i]|= MB_TYPE_INTRA;
711 else
712 s->mb_type[i]&= ~MB_TYPE_INTRA;
713 }
714
715 /* handle inter blocks with damaged AC */
716 i= -1;
717 for(mb_y=0; mb_y<s->mb_height; mb_y++){
718 for(mb_x=0; mb_x<s->mb_width; mb_x++){
719 i++;
720 error= s->error_status_table[i];
721
722 if(s->mb_type[i]&MB_TYPE_INTRA) continue; //intra
723 if(error&MV_ERROR) continue; //inter with damaged MV
724 if(!(error&AC_ERROR)) continue; //undamaged inter
725
726 s->mv_dir = MV_DIR_FORWARD;
727 s->mb_intra=0;
728 s->mb_skiped=0;
729 if(s->mb_type[i]&MB_TYPE_INTER4V){
730 int mb_index= mb_x*2+1 + (mb_y*2+1)*s->block_wrap[0];
731 int j;
732 s->mv_type = MV_TYPE_8X8;
733 for(j=0; j<4; j++){
734 s->mv[0][j][0] = s->motion_val[ mb_index + (j&1) + (j>>1)*s->block_wrap[0] ][0];
735 s->mv[0][j][1] = s->motion_val[ mb_index + (j&1) + (j>>1)*s->block_wrap[0] ][1];
736 }
737 }else{
738 s->mv_type = MV_TYPE_16X16;
739 s->mv[0][0][0] = s->motion_val[ mb_x*2+1 + (mb_y*2+1)*s->block_wrap[0] ][0];
740 s->mv[0][0][1] = s->motion_val[ mb_x*2+1 + (mb_y*2+1)*s->block_wrap[0] ][1];
741 }
742
743 s->dsp.clear_blocks(s->block[0]);
744
745 s->mb_x= mb_x;
746 s->mb_y= mb_y;
747 MPV_decode_mb(s, s->block);
748 }
749 }
750
751 /* guess MVs */
752 if(s->pict_type==B_TYPE){
753 i= -1;
754 for(mb_y=0; mb_y<s->mb_height; mb_y++){
755 for(mb_x=0; mb_x<s->mb_width; mb_x++){
756 int xy= mb_x*2+1 + (mb_y*2+1)*s->block_wrap[0];
757 i++;
758 error= s->error_status_table[i];
759
760 if(s->mb_type[i]&MB_TYPE_INTRA) continue; //intra
761 if(!(error&MV_ERROR)) continue; //inter with undamaged MV
762 if(!(error&AC_ERROR)) continue; //undamaged inter
763
764 s->mv_dir = MV_DIR_FORWARD|MV_DIR_BACKWARD;
765 s->mb_intra=0;
766 s->mv_type = MV_TYPE_16X16;
767 s->mb_skiped=0;
768
769 if(s->pp_time){
770 int time_pp= s->pp_time;
771 int time_pb= s->pb_time;
772
773 s->mv[0][0][0] = s->motion_val[xy][0]*time_pb/time_pp;
774 s->mv[0][0][1] = s->motion_val[xy][1]*time_pb/time_pp;
775 s->mv[1][0][0] = s->motion_val[xy][0]*(time_pb - time_pp)/time_pp;
776 s->mv[1][0][1] = s->motion_val[xy][1]*(time_pb - time_pp)/time_pp;
777 }else{
778 s->mv[0][0][0]= 0;
779 s->mv[0][0][1]= 0;
780 s->mv[1][0][0]= 0;
781 s->mv[1][0][1]= 0;
782 }
783
784 s->dsp.clear_blocks(s->block[0]);
785 s->mb_x= mb_x;
786 s->mb_y= mb_y;
787 MPV_decode_mb(s, s->block);
788 }
789 }
790 }else
791 guess_mv(s);
792
793 /* fill DC for inter blocks */
794 i= -1;
795 for(mb_y=0; mb_y<s->mb_height; mb_y++){
796 for(mb_x=0; mb_x<s->mb_width; mb_x++){
797 int dc, dcu, dcv, y, n;
798 INT16 *dc_ptr;
799 UINT8 *dest_y, *dest_cb, *dest_cr;
800
801 i++;
802 error= s->error_status_table[i];
803
804 if(s->mb_type[i]&MB_TYPE_INTRA) continue; //intra
805 // if(error&MV_ERROR) continue; //inter data damaged FIXME is this good?
806
807 dest_y = s->current_picture.data[0] + mb_x*16 + mb_y*16*s->linesize;
808 dest_cb= s->current_picture.data[1] + mb_x*8 + mb_y*8 *s->uvlinesize;
809 dest_cr= s->current_picture.data[2] + mb_x*8 + mb_y*8 *s->uvlinesize;
810
811 dc_ptr= &s->dc_val[0][mb_x*2+1 + (mb_y*2+1)*(s->mb_width*2+2)];
812 for(n=0; n<4; n++){
813 dc=0;
814 for(y=0; y<8; y++){
815 int x;
816 for(x=0; x<8; x++){
817 dc+= dest_y[x + (n&1)*8 + (y + (n>>1)*8)*s->linesize];
818 }
819 }
820 dc_ptr[(n&1) + (n>>1)*(s->mb_width*2+2)]= (dc+4)>>3;
821 }
822
823 dcu=dcv=0;
824 for(y=0; y<8; y++){
825 int x;
826 for(x=0; x<8; x++){
827 dcu+=dest_cb[x + y*(s->uvlinesize)];
828 dcv+=dest_cr[x + y*(s->uvlinesize)];
829 }
830 }
831 s->dc_val[1][mb_x+1 + (mb_y+1)*(s->mb_width+2)]= (dcu+4)>>3;
832 s->dc_val[2][mb_x+1 + (mb_y+1)*(s->mb_width+2)]= (dcv+4)>>3;
833 }
834 }
835 #if 1
836 /* guess DC for damaged blocks */
837 guess_dc(s, s->dc_val[0] + s->mb_width*2+3, s->mb_width*2, s->mb_height*2, s->mb_width*2+2, 1);
838 guess_dc(s, s->dc_val[1] + s->mb_width +3, s->mb_width , s->mb_height , s->mb_width +2, 0);
839 guess_dc(s, s->dc_val[2] + s->mb_width +3, s->mb_width , s->mb_height , s->mb_width +2, 0);
840 #endif
841 /* filter luma DC */
842 filter181(s->dc_val[0] + s->mb_width*2+3, s->mb_width*2, s->mb_height*2, s->mb_width*2+2);
843
844 #if 1
845 /* render DC only intra */
846 i= -1;
847 for(mb_y=0; mb_y<s->mb_height; mb_y++){
848 for(mb_x=0; mb_x<s->mb_width; mb_x++){
849 UINT8 *dest_y, *dest_cb, *dest_cr;
850
851 i++;
852 error= s->error_status_table[i];
853
854 if(!(s->mb_type[i]&MB_TYPE_INTRA)) continue; //inter
855 if(!(error&AC_ERROR)) continue; //undamaged
856
857 dest_y = s->current_picture.data[0] + mb_x*16 + mb_y*16*s->linesize;
858 dest_cb= s->current_picture.data[1] + mb_x*8 + mb_y*8 *s->uvlinesize;
859 dest_cr= s->current_picture.data[2] + mb_x*8 + mb_y*8 *s->uvlinesize;
860
861 put_dc(s, dest_y, dest_cb, dest_cr, mb_x, mb_y);
862 }
863 }
864 #endif
865
866 if(s->avctx->error_concealment&FF_EC_DEBLOCK){
867 /* filter horizontal block boundaries */
868 h_block_filter(s, s->current_picture.data[0], s->mb_width*2, s->mb_height*2, s->linesize , 1);
869 h_block_filter(s, s->current_picture.data[1], s->mb_width , s->mb_height , s->uvlinesize, 0);
870 h_block_filter(s, s->current_picture.data[2], s->mb_width , s->mb_height , s->uvlinesize, 0);
871
872 /* filter vertical block boundaries */
873 v_block_filter(s, s->current_picture.data[0], s->mb_width*2, s->mb_height*2, s->linesize , 1);
874 v_block_filter(s, s->current_picture.data[1], s->mb_width , s->mb_height , s->uvlinesize, 0);
875 v_block_filter(s, s->current_picture.data[2], s->mb_width , s->mb_height , s->uvlinesize, 0);
876 }
877
878 /* clean a few tables */
879 for(i=0; i<s->mb_num; i++){
880 int error= s->error_status_table[i];
881
882 if(s->pict_type!=B_TYPE && (error&(DC_ERROR|MV_ERROR|AC_ERROR))){
883 s->mbskip_table[i]=0;
884 }
885 s->mbintra_table[i]=1;
886 }
887 }
mob repository