1 /*
2  *  Copyright (c) 2010 The WebM project authors. All Rights Reserved.
3  *
4  *  Use of this source code is governed by a BSD-style license
5  *  that can be found in the LICENSE file in the root of the source
6  *  tree. An additional intellectual property rights grant can be found
7  *  in the file PATENTS.  All contributing project authors may
8  *  be found in the AUTHORS file in the root of the source tree.
9  */
10 
11 #include "vpx_config.h"
12 #include "vp8_rtcd.h"
13 #include "./vpx_scale_rtcd.h"
14 #include "onyxd_int.h"
15 #include "vp8/common/header.h"
16 #include "vp8/common/reconintra4x4.h"
17 #include "vp8/common/reconinter.h"
18 #include "detokenize.h"
19 #include "vp8/common/common.h"
20 #include "vp8/common/invtrans.h"
21 #include "vp8/common/alloccommon.h"
22 #include "vp8/common/entropymode.h"
23 #include "vp8/common/quant_common.h"
24 #include "vpx_scale/vpx_scale.h"
25 #include "vp8/common/reconintra.h"
26 #include "vp8/common/setupintrarecon.h"
27 
28 #include "decodemv.h"
29 #include "vp8/common/extend.h"
30 #if CONFIG_ERROR_CONCEALMENT
31 #include "error_concealment.h"
32 #endif
33 #include "vpx_mem/vpx_mem.h"
34 #include "vp8/common/threading.h"
35 #include "decoderthreading.h"
36 #include "dboolhuff.h"
37 #include "vpx_dsp/vpx_dsp_common.h"
38 
39 #include <assert.h>
40 #include <stdio.h>
41 
vp8cx_init_de_quantizer(VP8D_COMP * pbi)42 void vp8cx_init_de_quantizer(VP8D_COMP *pbi) {
43   int Q;
44   VP8_COMMON *const pc = &pbi->common;
45 
46   for (Q = 0; Q < QINDEX_RANGE; ++Q) {
47     pc->Y1dequant[Q][0] = (short)vp8_dc_quant(Q, pc->y1dc_delta_q);
48     pc->Y2dequant[Q][0] = (short)vp8_dc2quant(Q, pc->y2dc_delta_q);
49     pc->UVdequant[Q][0] = (short)vp8_dc_uv_quant(Q, pc->uvdc_delta_q);
50 
51     pc->Y1dequant[Q][1] = (short)vp8_ac_yquant(Q);
52     pc->Y2dequant[Q][1] = (short)vp8_ac2quant(Q, pc->y2ac_delta_q);
53     pc->UVdequant[Q][1] = (short)vp8_ac_uv_quant(Q, pc->uvac_delta_q);
54   }
55 }
56 
vp8_mb_init_dequantizer(VP8D_COMP * pbi,MACROBLOCKD * xd)57 void vp8_mb_init_dequantizer(VP8D_COMP *pbi, MACROBLOCKD *xd) {
58   int i;
59   int QIndex;
60   MB_MODE_INFO *mbmi = &xd->mode_info_context->mbmi;
61   VP8_COMMON *const pc = &pbi->common;
62 
63   /* Decide whether to use the default or alternate baseline Q value. */
64   if (xd->segmentation_enabled) {
65     /* Abs Value */
66     if (xd->mb_segement_abs_delta == SEGMENT_ABSDATA) {
67       QIndex = xd->segment_feature_data[MB_LVL_ALT_Q][mbmi->segment_id];
68 
69       /* Delta Value */
70     } else {
71       QIndex = pc->base_qindex +
72                xd->segment_feature_data[MB_LVL_ALT_Q][mbmi->segment_id];
73     }
74 
75     QIndex = (QIndex >= 0) ? ((QIndex <= MAXQ) ? QIndex : MAXQ)
76                            : 0; /* Clamp to valid range */
77   } else {
78     QIndex = pc->base_qindex;
79   }
80 
81   /* Set up the macroblock dequant constants */
82   xd->dequant_y1_dc[0] = 1;
83   xd->dequant_y1[0] = pc->Y1dequant[QIndex][0];
84   xd->dequant_y2[0] = pc->Y2dequant[QIndex][0];
85   xd->dequant_uv[0] = pc->UVdequant[QIndex][0];
86 
87   for (i = 1; i < 16; ++i) {
88     xd->dequant_y1_dc[i] = xd->dequant_y1[i] = pc->Y1dequant[QIndex][1];
89     xd->dequant_y2[i] = pc->Y2dequant[QIndex][1];
90     xd->dequant_uv[i] = pc->UVdequant[QIndex][1];
91   }
92 }
93 
decode_macroblock(VP8D_COMP * pbi,MACROBLOCKD * xd,unsigned int mb_idx)94 static void decode_macroblock(VP8D_COMP *pbi, MACROBLOCKD *xd,
95                               unsigned int mb_idx) {
96   MB_PREDICTION_MODE mode;
97   int i;
98 #if CONFIG_ERROR_CONCEALMENT
99   int corruption_detected = 0;
100 #else
101   (void)mb_idx;
102 #endif
103 
104   if (xd->mode_info_context->mbmi.mb_skip_coeff) {
105     vp8_reset_mb_tokens_context(xd);
106   } else if (!vp8dx_bool_error(xd->current_bc)) {
107     int eobtotal;
108     eobtotal = vp8_decode_mb_tokens(pbi, xd);
109 
110     /* Special case:  Force the loopfilter to skip when eobtotal is zero */
111     xd->mode_info_context->mbmi.mb_skip_coeff = (eobtotal == 0);
112   }
113 
114   mode = xd->mode_info_context->mbmi.mode;
115 
116   if (xd->segmentation_enabled) vp8_mb_init_dequantizer(pbi, xd);
117 
118 #if CONFIG_ERROR_CONCEALMENT
119 
120   if (pbi->ec_active) {
121     int throw_residual;
122     /* When we have independent partitions we can apply residual even
123      * though other partitions within the frame are corrupt.
124      */
125     throw_residual =
126         (!pbi->independent_partitions && pbi->frame_corrupt_residual);
127     throw_residual = (throw_residual || vp8dx_bool_error(xd->current_bc));
128 
129     if ((mb_idx >= pbi->mvs_corrupt_from_mb || throw_residual)) {
130       /* MB with corrupt residuals or corrupt mode/motion vectors.
131        * Better to use the predictor as reconstruction.
132        */
133       pbi->frame_corrupt_residual = 1;
134       memset(xd->qcoeff, 0, sizeof(xd->qcoeff));
135 
136       corruption_detected = 1;
137 
138       /* force idct to be skipped for B_PRED and use the
139        * prediction only for reconstruction
140        * */
141       memset(xd->eobs, 0, 25);
142     }
143   }
144 #endif
145 
146   /* do prediction */
147   if (xd->mode_info_context->mbmi.ref_frame == INTRA_FRAME) {
148     vp8_build_intra_predictors_mbuv_s(
149         xd, xd->recon_above[1], xd->recon_above[2], xd->recon_left[1],
150         xd->recon_left[2], xd->recon_left_stride[1], xd->dst.u_buffer,
151         xd->dst.v_buffer, xd->dst.uv_stride);
152 
153     if (mode != B_PRED) {
154       vp8_build_intra_predictors_mby_s(
155           xd, xd->recon_above[0], xd->recon_left[0], xd->recon_left_stride[0],
156           xd->dst.y_buffer, xd->dst.y_stride);
157     } else {
158       short *DQC = xd->dequant_y1;
159       int dst_stride = xd->dst.y_stride;
160 
161       /* clear out residual eob info */
162       if (xd->mode_info_context->mbmi.mb_skip_coeff) memset(xd->eobs, 0, 25);
163 
164       intra_prediction_down_copy(xd, xd->recon_above[0] + 16);
165 
166       for (i = 0; i < 16; ++i) {
167         BLOCKD *b = &xd->block[i];
168         unsigned char *dst = xd->dst.y_buffer + b->offset;
169         B_PREDICTION_MODE b_mode = xd->mode_info_context->bmi[i].as_mode;
170         unsigned char *Above = dst - dst_stride;
171         unsigned char *yleft = dst - 1;
172         int left_stride = dst_stride;
173         unsigned char top_left = Above[-1];
174 
175         vp8_intra4x4_predict(Above, yleft, left_stride, b_mode, dst, dst_stride,
176                              top_left);
177 
178         if (xd->eobs[i]) {
179           if (xd->eobs[i] > 1) {
180             vp8_dequant_idct_add(b->qcoeff, DQC, dst, dst_stride);
181           } else {
182             vp8_dc_only_idct_add(b->qcoeff[0] * DQC[0], dst, dst_stride, dst,
183                                  dst_stride);
184             memset(b->qcoeff, 0, 2 * sizeof(b->qcoeff[0]));
185           }
186         }
187       }
188     }
189   } else {
190     vp8_build_inter_predictors_mb(xd);
191   }
192 
193 #if CONFIG_ERROR_CONCEALMENT
194   if (corruption_detected) {
195     return;
196   }
197 #endif
198 
199   if (!xd->mode_info_context->mbmi.mb_skip_coeff) {
200     /* dequantization and idct */
201     if (mode != B_PRED) {
202       short *DQC = xd->dequant_y1;
203 
204       if (mode != SPLITMV) {
205         BLOCKD *b = &xd->block[24];
206 
207         /* do 2nd order transform on the dc block */
208         if (xd->eobs[24] > 1) {
209           vp8_dequantize_b(b, xd->dequant_y2);
210 
211           vp8_short_inv_walsh4x4(&b->dqcoeff[0], xd->qcoeff);
212           memset(b->qcoeff, 0, 16 * sizeof(b->qcoeff[0]));
213         } else {
214           b->dqcoeff[0] = (short)(b->qcoeff[0] * xd->dequant_y2[0]);
215           vp8_short_inv_walsh4x4_1(&b->dqcoeff[0], xd->qcoeff);
216           memset(b->qcoeff, 0, 2 * sizeof(b->qcoeff[0]));
217         }
218 
219         /* override the dc dequant constant in order to preserve the
220          * dc components
221          */
222         DQC = xd->dequant_y1_dc;
223       }
224 
225       vp8_dequant_idct_add_y_block(xd->qcoeff, DQC, xd->dst.y_buffer,
226                                    xd->dst.y_stride, xd->eobs);
227     }
228 
229     vp8_dequant_idct_add_uv_block(xd->qcoeff + 16 * 16, xd->dequant_uv,
230                                   xd->dst.u_buffer, xd->dst.v_buffer,
231                                   xd->dst.uv_stride, xd->eobs + 16);
232   }
233 }
234 
get_delta_q(vp8_reader * bc,int prev,int * q_update)235 static int get_delta_q(vp8_reader *bc, int prev, int *q_update) {
236   int ret_val = 0;
237 
238   if (vp8_read_bit(bc)) {
239     ret_val = vp8_read_literal(bc, 4);
240 
241     if (vp8_read_bit(bc)) ret_val = -ret_val;
242   }
243 
244   /* Trigger a quantizer update if the delta-q value has changed */
245   if (ret_val != prev) *q_update = 1;
246 
247   return ret_val;
248 }
249 
250 #ifdef PACKET_TESTING
251 #include <stdio.h>
252 FILE *vpxlog = 0;
253 #endif
254 
yv12_extend_frame_top_c(YV12_BUFFER_CONFIG * ybf)255 static void yv12_extend_frame_top_c(YV12_BUFFER_CONFIG *ybf) {
256   int i;
257   unsigned char *src_ptr1;
258   unsigned char *dest_ptr1;
259 
260   unsigned int Border;
261   int plane_stride;
262 
263   /***********/
264   /* Y Plane */
265   /***********/
266   Border = ybf->border;
267   plane_stride = ybf->y_stride;
268   src_ptr1 = ybf->y_buffer - Border;
269   dest_ptr1 = src_ptr1 - (Border * plane_stride);
270 
271   for (i = 0; i < (int)Border; ++i) {
272     memcpy(dest_ptr1, src_ptr1, plane_stride);
273     dest_ptr1 += plane_stride;
274   }
275 
276   /***********/
277   /* U Plane */
278   /***********/
279   plane_stride = ybf->uv_stride;
280   Border /= 2;
281   src_ptr1 = ybf->u_buffer - Border;
282   dest_ptr1 = src_ptr1 - (Border * plane_stride);
283 
284   for (i = 0; i < (int)(Border); ++i) {
285     memcpy(dest_ptr1, src_ptr1, plane_stride);
286     dest_ptr1 += plane_stride;
287   }
288 
289   /***********/
290   /* V Plane */
291   /***********/
292 
293   src_ptr1 = ybf->v_buffer - Border;
294   dest_ptr1 = src_ptr1 - (Border * plane_stride);
295 
296   for (i = 0; i < (int)(Border); ++i) {
297     memcpy(dest_ptr1, src_ptr1, plane_stride);
298     dest_ptr1 += plane_stride;
299   }
300 }
301 
yv12_extend_frame_bottom_c(YV12_BUFFER_CONFIG * ybf)302 static void yv12_extend_frame_bottom_c(YV12_BUFFER_CONFIG *ybf) {
303   int i;
304   unsigned char *src_ptr1, *src_ptr2;
305   unsigned char *dest_ptr2;
306 
307   unsigned int Border;
308   int plane_stride;
309   int plane_height;
310 
311   /***********/
312   /* Y Plane */
313   /***********/
314   Border = ybf->border;
315   plane_stride = ybf->y_stride;
316   plane_height = ybf->y_height;
317 
318   src_ptr1 = ybf->y_buffer - Border;
319   src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
320   dest_ptr2 = src_ptr2 + plane_stride;
321 
322   for (i = 0; i < (int)Border; ++i) {
323     memcpy(dest_ptr2, src_ptr2, plane_stride);
324     dest_ptr2 += plane_stride;
325   }
326 
327   /***********/
328   /* U Plane */
329   /***********/
330   plane_stride = ybf->uv_stride;
331   plane_height = ybf->uv_height;
332   Border /= 2;
333 
334   src_ptr1 = ybf->u_buffer - Border;
335   src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
336   dest_ptr2 = src_ptr2 + plane_stride;
337 
338   for (i = 0; i < (int)(Border); ++i) {
339     memcpy(dest_ptr2, src_ptr2, plane_stride);
340     dest_ptr2 += plane_stride;
341   }
342 
343   /***********/
344   /* V Plane */
345   /***********/
346 
347   src_ptr1 = ybf->v_buffer - Border;
348   src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
349   dest_ptr2 = src_ptr2 + plane_stride;
350 
351   for (i = 0; i < (int)(Border); ++i) {
352     memcpy(dest_ptr2, src_ptr2, plane_stride);
353     dest_ptr2 += plane_stride;
354   }
355 }
356 
yv12_extend_frame_left_right_c(YV12_BUFFER_CONFIG * ybf,unsigned char * y_src,unsigned char * u_src,unsigned char * v_src)357 static void yv12_extend_frame_left_right_c(YV12_BUFFER_CONFIG *ybf,
358                                            unsigned char *y_src,
359                                            unsigned char *u_src,
360                                            unsigned char *v_src) {
361   int i;
362   unsigned char *src_ptr1, *src_ptr2;
363   unsigned char *dest_ptr1, *dest_ptr2;
364 
365   unsigned int Border;
366   int plane_stride;
367   int plane_height;
368   int plane_width;
369 
370   /***********/
371   /* Y Plane */
372   /***********/
373   Border = ybf->border;
374   plane_stride = ybf->y_stride;
375   plane_height = 16;
376   plane_width = ybf->y_width;
377 
378   /* copy the left and right most columns out */
379   src_ptr1 = y_src;
380   src_ptr2 = src_ptr1 + plane_width - 1;
381   dest_ptr1 = src_ptr1 - Border;
382   dest_ptr2 = src_ptr2 + 1;
383 
384   for (i = 0; i < plane_height; ++i) {
385     memset(dest_ptr1, src_ptr1[0], Border);
386     memset(dest_ptr2, src_ptr2[0], Border);
387     src_ptr1 += plane_stride;
388     src_ptr2 += plane_stride;
389     dest_ptr1 += plane_stride;
390     dest_ptr2 += plane_stride;
391   }
392 
393   /***********/
394   /* U Plane */
395   /***********/
396   plane_stride = ybf->uv_stride;
397   plane_height = 8;
398   plane_width = ybf->uv_width;
399   Border /= 2;
400 
401   /* copy the left and right most columns out */
402   src_ptr1 = u_src;
403   src_ptr2 = src_ptr1 + plane_width - 1;
404   dest_ptr1 = src_ptr1 - Border;
405   dest_ptr2 = src_ptr2 + 1;
406 
407   for (i = 0; i < plane_height; ++i) {
408     memset(dest_ptr1, src_ptr1[0], Border);
409     memset(dest_ptr2, src_ptr2[0], Border);
410     src_ptr1 += plane_stride;
411     src_ptr2 += plane_stride;
412     dest_ptr1 += plane_stride;
413     dest_ptr2 += plane_stride;
414   }
415 
416   /***********/
417   /* V Plane */
418   /***********/
419 
420   /* copy the left and right most columns out */
421   src_ptr1 = v_src;
422   src_ptr2 = src_ptr1 + plane_width - 1;
423   dest_ptr1 = src_ptr1 - Border;
424   dest_ptr2 = src_ptr2 + 1;
425 
426   for (i = 0; i < plane_height; ++i) {
427     memset(dest_ptr1, src_ptr1[0], Border);
428     memset(dest_ptr2, src_ptr2[0], Border);
429     src_ptr1 += plane_stride;
430     src_ptr2 += plane_stride;
431     dest_ptr1 += plane_stride;
432     dest_ptr2 += plane_stride;
433   }
434 }
435 
decode_mb_rows(VP8D_COMP * pbi)436 static void decode_mb_rows(VP8D_COMP *pbi) {
437   VP8_COMMON *const pc = &pbi->common;
438   MACROBLOCKD *const xd = &pbi->mb;
439 
440   MODE_INFO *lf_mic = xd->mode_info_context;
441 
442   int ibc = 0;
443   int num_part = 1 << pc->multi_token_partition;
444 
445   int recon_yoffset, recon_uvoffset;
446   int mb_row, mb_col;
447   int mb_idx = 0;
448 
449   YV12_BUFFER_CONFIG *yv12_fb_new = pbi->dec_fb_ref[INTRA_FRAME];
450 
451   int recon_y_stride = yv12_fb_new->y_stride;
452   int recon_uv_stride = yv12_fb_new->uv_stride;
453 
454   unsigned char *ref_buffer[MAX_REF_FRAMES][3];
455   unsigned char *dst_buffer[3];
456   unsigned char *lf_dst[3];
457   unsigned char *eb_dst[3];
458   int i;
459   int ref_fb_corrupted[MAX_REF_FRAMES];
460 
461   ref_fb_corrupted[INTRA_FRAME] = 0;
462 
463   for (i = 1; i < MAX_REF_FRAMES; ++i) {
464     YV12_BUFFER_CONFIG *this_fb = pbi->dec_fb_ref[i];
465 
466     ref_buffer[i][0] = this_fb->y_buffer;
467     ref_buffer[i][1] = this_fb->u_buffer;
468     ref_buffer[i][2] = this_fb->v_buffer;
469 
470     ref_fb_corrupted[i] = this_fb->corrupted;
471   }
472 
473   /* Set up the buffer pointers */
474   eb_dst[0] = lf_dst[0] = dst_buffer[0] = yv12_fb_new->y_buffer;
475   eb_dst[1] = lf_dst[1] = dst_buffer[1] = yv12_fb_new->u_buffer;
476   eb_dst[2] = lf_dst[2] = dst_buffer[2] = yv12_fb_new->v_buffer;
477 
478   xd->up_available = 0;
479 
480   /* Initialize the loop filter for this frame. */
481   if (pc->filter_level) vp8_loop_filter_frame_init(pc, xd, pc->filter_level);
482 
483   vp8_setup_intra_recon_top_line(yv12_fb_new);
484 
485   /* Decode the individual macro block */
486   for (mb_row = 0; mb_row < pc->mb_rows; ++mb_row) {
487     if (num_part > 1) {
488       xd->current_bc = &pbi->mbc[ibc];
489       ibc++;
490 
491       if (ibc == num_part) ibc = 0;
492     }
493 
494     recon_yoffset = mb_row * recon_y_stride * 16;
495     recon_uvoffset = mb_row * recon_uv_stride * 8;
496 
497     /* reset contexts */
498     xd->above_context = pc->above_context;
499     memset(xd->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES));
500 
501     xd->left_available = 0;
502 
503     xd->mb_to_top_edge = -((mb_row * 16) << 3);
504     xd->mb_to_bottom_edge = ((pc->mb_rows - 1 - mb_row) * 16) << 3;
505 
506     xd->recon_above[0] = dst_buffer[0] + recon_yoffset;
507     xd->recon_above[1] = dst_buffer[1] + recon_uvoffset;
508     xd->recon_above[2] = dst_buffer[2] + recon_uvoffset;
509 
510     xd->recon_left[0] = xd->recon_above[0] - 1;
511     xd->recon_left[1] = xd->recon_above[1] - 1;
512     xd->recon_left[2] = xd->recon_above[2] - 1;
513 
514     xd->recon_above[0] -= xd->dst.y_stride;
515     xd->recon_above[1] -= xd->dst.uv_stride;
516     xd->recon_above[2] -= xd->dst.uv_stride;
517 
518     /* TODO: move to outside row loop */
519     xd->recon_left_stride[0] = xd->dst.y_stride;
520     xd->recon_left_stride[1] = xd->dst.uv_stride;
521 
522     setup_intra_recon_left(xd->recon_left[0], xd->recon_left[1],
523                            xd->recon_left[2], xd->dst.y_stride,
524                            xd->dst.uv_stride);
525 
526     for (mb_col = 0; mb_col < pc->mb_cols; ++mb_col) {
527       /* Distance of Mb to the various image edges.
528        * These are specified to 8th pel as they are always compared to values
529        * that are in 1/8th pel units
530        */
531       xd->mb_to_left_edge = -((mb_col * 16) << 3);
532       xd->mb_to_right_edge = ((pc->mb_cols - 1 - mb_col) * 16) << 3;
533 
534 #if CONFIG_ERROR_CONCEALMENT
535       {
536         int corrupt_residual =
537             (!pbi->independent_partitions && pbi->frame_corrupt_residual) ||
538             vp8dx_bool_error(xd->current_bc);
539         if (pbi->ec_active &&
540             xd->mode_info_context->mbmi.ref_frame == INTRA_FRAME &&
541             corrupt_residual) {
542           /* We have an intra block with corrupt coefficients, better to
543            * conceal with an inter block. Interpolate MVs from neighboring
544            * MBs.
545            *
546            * Note that for the first mb with corrupt residual in a frame,
547            * we might not discover that before decoding the residual. That
548            * happens after this check, and therefore no inter concealment
549            * will be done.
550            */
551           vp8_interpolate_motion(xd, mb_row, mb_col, pc->mb_rows, pc->mb_cols);
552         }
553       }
554 #endif
555 
556       xd->dst.y_buffer = dst_buffer[0] + recon_yoffset;
557       xd->dst.u_buffer = dst_buffer[1] + recon_uvoffset;
558       xd->dst.v_buffer = dst_buffer[2] + recon_uvoffset;
559 
560       if (xd->mode_info_context->mbmi.ref_frame >= LAST_FRAME) {
561         const MV_REFERENCE_FRAME ref = xd->mode_info_context->mbmi.ref_frame;
562         xd->pre.y_buffer = ref_buffer[ref][0] + recon_yoffset;
563         xd->pre.u_buffer = ref_buffer[ref][1] + recon_uvoffset;
564         xd->pre.v_buffer = ref_buffer[ref][2] + recon_uvoffset;
565       } else {
566         // ref_frame is INTRA_FRAME, pre buffer should not be used.
567         xd->pre.y_buffer = 0;
568         xd->pre.u_buffer = 0;
569         xd->pre.v_buffer = 0;
570       }
571 
572       /* propagate errors from reference frames */
573       xd->corrupted |= ref_fb_corrupted[xd->mode_info_context->mbmi.ref_frame];
574 
575       decode_macroblock(pbi, xd, mb_idx);
576 
577       mb_idx++;
578       xd->left_available = 1;
579 
580       /* check if the boolean decoder has suffered an error */
581       xd->corrupted |= vp8dx_bool_error(xd->current_bc);
582 
583       xd->recon_above[0] += 16;
584       xd->recon_above[1] += 8;
585       xd->recon_above[2] += 8;
586       xd->recon_left[0] += 16;
587       xd->recon_left[1] += 8;
588       xd->recon_left[2] += 8;
589 
590       recon_yoffset += 16;
591       recon_uvoffset += 8;
592 
593       ++xd->mode_info_context; /* next mb */
594 
595       xd->above_context++;
596     }
597 
598     /* adjust to the next row of mbs */
599     vp8_extend_mb_row(yv12_fb_new, xd->dst.y_buffer + 16, xd->dst.u_buffer + 8,
600                       xd->dst.v_buffer + 8);
601 
602     ++xd->mode_info_context; /* skip prediction column */
603     xd->up_available = 1;
604 
605     if (pc->filter_level) {
606       if (mb_row > 0) {
607         if (pc->filter_type == NORMAL_LOOPFILTER) {
608           vp8_loop_filter_row_normal(pc, lf_mic, mb_row - 1, recon_y_stride,
609                                      recon_uv_stride, lf_dst[0], lf_dst[1],
610                                      lf_dst[2]);
611         } else {
612           vp8_loop_filter_row_simple(pc, lf_mic, mb_row - 1, recon_y_stride,
613                                      lf_dst[0]);
614         }
615         if (mb_row > 1) {
616           yv12_extend_frame_left_right_c(yv12_fb_new, eb_dst[0], eb_dst[1],
617                                          eb_dst[2]);
618 
619           eb_dst[0] += recon_y_stride * 16;
620           eb_dst[1] += recon_uv_stride * 8;
621           eb_dst[2] += recon_uv_stride * 8;
622         }
623 
624         lf_dst[0] += recon_y_stride * 16;
625         lf_dst[1] += recon_uv_stride * 8;
626         lf_dst[2] += recon_uv_stride * 8;
627         lf_mic += pc->mb_cols;
628         lf_mic++; /* Skip border mb */
629       }
630     } else {
631       if (mb_row > 0) {
632         /**/
633         yv12_extend_frame_left_right_c(yv12_fb_new, eb_dst[0], eb_dst[1],
634                                        eb_dst[2]);
635         eb_dst[0] += recon_y_stride * 16;
636         eb_dst[1] += recon_uv_stride * 8;
637         eb_dst[2] += recon_uv_stride * 8;
638       }
639     }
640   }
641 
642   if (pc->filter_level) {
643     if (pc->filter_type == NORMAL_LOOPFILTER) {
644       vp8_loop_filter_row_normal(pc, lf_mic, mb_row - 1, recon_y_stride,
645                                  recon_uv_stride, lf_dst[0], lf_dst[1],
646                                  lf_dst[2]);
647     } else {
648       vp8_loop_filter_row_simple(pc, lf_mic, mb_row - 1, recon_y_stride,
649                                  lf_dst[0]);
650     }
651 
652     yv12_extend_frame_left_right_c(yv12_fb_new, eb_dst[0], eb_dst[1],
653                                    eb_dst[2]);
654     eb_dst[0] += recon_y_stride * 16;
655     eb_dst[1] += recon_uv_stride * 8;
656     eb_dst[2] += recon_uv_stride * 8;
657   }
658   yv12_extend_frame_left_right_c(yv12_fb_new, eb_dst[0], eb_dst[1], eb_dst[2]);
659   yv12_extend_frame_top_c(yv12_fb_new);
660   yv12_extend_frame_bottom_c(yv12_fb_new);
661 }
662 
read_partition_size(VP8D_COMP * pbi,const unsigned char * cx_size)663 static unsigned int read_partition_size(VP8D_COMP *pbi,
664                                         const unsigned char *cx_size) {
665   unsigned char temp[3];
666   if (pbi->decrypt_cb) {
667     pbi->decrypt_cb(pbi->decrypt_state, cx_size, temp, 3);
668     cx_size = temp;
669   }
670   return cx_size[0] + (cx_size[1] << 8) + (cx_size[2] << 16);
671 }
672 
read_is_valid(const unsigned char * start,size_t len,const unsigned char * end)673 static int read_is_valid(const unsigned char *start, size_t len,
674                          const unsigned char *end) {
675   return len != 0 && end > start && len <= (size_t)(end - start);
676 }
677 
read_available_partition_size(VP8D_COMP * pbi,const unsigned char * token_part_sizes,const unsigned char * fragment_start,const unsigned char * first_fragment_end,const unsigned char * fragment_end,int i,int num_part)678 static unsigned int read_available_partition_size(
679     VP8D_COMP *pbi, const unsigned char *token_part_sizes,
680     const unsigned char *fragment_start,
681     const unsigned char *first_fragment_end, const unsigned char *fragment_end,
682     int i, int num_part) {
683   VP8_COMMON *pc = &pbi->common;
684   const unsigned char *partition_size_ptr = token_part_sizes + i * 3;
685   unsigned int partition_size = 0;
686   ptrdiff_t bytes_left = fragment_end - fragment_start;
687   if (bytes_left < 0) {
688     vpx_internal_error(
689         &pc->error, VPX_CODEC_CORRUPT_FRAME,
690         "Truncated packet or corrupt partition. No bytes left %d.",
691         (int)bytes_left);
692   }
693   /* Calculate the length of this partition. The last partition
694    * size is implicit. If the partition size can't be read, then
695    * either use the remaining data in the buffer (for EC mode)
696    * or throw an error.
697    */
698   if (i < num_part - 1) {
699     if (read_is_valid(partition_size_ptr, 3, first_fragment_end)) {
700       partition_size = read_partition_size(pbi, partition_size_ptr);
701     } else if (pbi->ec_active) {
702       partition_size = (unsigned int)bytes_left;
703     } else {
704       vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
705                          "Truncated partition size data");
706     }
707   } else {
708     partition_size = (unsigned int)bytes_left;
709   }
710 
711   /* Validate the calculated partition length. If the buffer
712    * described by the partition can't be fully read, then restrict
713    * it to the portion that can be (for EC mode) or throw an error.
714    */
715   if (!read_is_valid(fragment_start, partition_size, fragment_end)) {
716     if (pbi->ec_active) {
717       partition_size = (unsigned int)bytes_left;
718     } else {
719       vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
720                          "Truncated packet or corrupt partition "
721                          "%d length",
722                          i + 1);
723     }
724   }
725   return partition_size;
726 }
727 
setup_token_decoder(VP8D_COMP * pbi,const unsigned char * token_part_sizes)728 static void setup_token_decoder(VP8D_COMP *pbi,
729                                 const unsigned char *token_part_sizes) {
730   vp8_reader *bool_decoder = &pbi->mbc[0];
731   unsigned int partition_idx;
732   unsigned int fragment_idx;
733   unsigned int num_token_partitions;
734   const unsigned char *first_fragment_end =
735       pbi->fragments.ptrs[0] + pbi->fragments.sizes[0];
736 
737   TOKEN_PARTITION multi_token_partition =
738       (TOKEN_PARTITION)vp8_read_literal(&pbi->mbc[8], 2);
739   if (!vp8dx_bool_error(&pbi->mbc[8])) {
740     pbi->common.multi_token_partition = multi_token_partition;
741   }
742   num_token_partitions = 1 << pbi->common.multi_token_partition;
743 
744   /* Check for partitions within the fragments and unpack the fragments
745    * so that each fragment pointer points to its corresponding partition. */
746   for (fragment_idx = 0; fragment_idx < pbi->fragments.count; ++fragment_idx) {
747     unsigned int fragment_size = pbi->fragments.sizes[fragment_idx];
748     const unsigned char *fragment_end =
749         pbi->fragments.ptrs[fragment_idx] + fragment_size;
750     /* Special case for handling the first partition since we have already
751      * read its size. */
752     if (fragment_idx == 0) {
753       /* Size of first partition + token partition sizes element */
754       ptrdiff_t ext_first_part_size = token_part_sizes -
755                                       pbi->fragments.ptrs[0] +
756                                       3 * (num_token_partitions - 1);
757       if (fragment_size < (unsigned int)ext_first_part_size)
758         vpx_internal_error(&pbi->common.error, VPX_CODEC_CORRUPT_FRAME,
759                            "Corrupted fragment size %d", fragment_size);
760       fragment_size -= (unsigned int)ext_first_part_size;
761       if (fragment_size > 0) {
762         pbi->fragments.sizes[0] = (unsigned int)ext_first_part_size;
763         /* The fragment contains an additional partition. Move to
764          * next. */
765         fragment_idx++;
766         pbi->fragments.ptrs[fragment_idx] =
767             pbi->fragments.ptrs[0] + pbi->fragments.sizes[0];
768       }
769     }
770     /* Split the chunk into partitions read from the bitstream */
771     while (fragment_size > 0) {
772       ptrdiff_t partition_size = read_available_partition_size(
773           pbi, token_part_sizes, pbi->fragments.ptrs[fragment_idx],
774           first_fragment_end, fragment_end, fragment_idx - 1,
775           num_token_partitions);
776       pbi->fragments.sizes[fragment_idx] = (unsigned int)partition_size;
777       if (fragment_size < (unsigned int)partition_size)
778         vpx_internal_error(&pbi->common.error, VPX_CODEC_CORRUPT_FRAME,
779                            "Corrupted fragment size %d", fragment_size);
780       fragment_size -= (unsigned int)partition_size;
781       assert(fragment_idx <= num_token_partitions);
782       if (fragment_size > 0) {
783         /* The fragment contains an additional partition.
784          * Move to next. */
785         fragment_idx++;
786         pbi->fragments.ptrs[fragment_idx] =
787             pbi->fragments.ptrs[fragment_idx - 1] + partition_size;
788       }
789     }
790   }
791 
792   pbi->fragments.count = num_token_partitions + 1;
793 
794   for (partition_idx = 1; partition_idx < pbi->fragments.count;
795        ++partition_idx) {
796     if (vp8dx_start_decode(bool_decoder, pbi->fragments.ptrs[partition_idx],
797                            pbi->fragments.sizes[partition_idx], pbi->decrypt_cb,
798                            pbi->decrypt_state)) {
799       vpx_internal_error(&pbi->common.error, VPX_CODEC_MEM_ERROR,
800                          "Failed to allocate bool decoder %d", partition_idx);
801     }
802 
803     bool_decoder++;
804   }
805 
806 #if CONFIG_MULTITHREAD
807   /* Clamp number of decoder threads */
808   if (pbi->decoding_thread_count > num_token_partitions - 1) {
809     pbi->decoding_thread_count = num_token_partitions - 1;
810   }
811   if ((int)pbi->decoding_thread_count > pbi->common.mb_rows - 1) {
812     assert(pbi->common.mb_rows > 0);
813     pbi->decoding_thread_count = pbi->common.mb_rows - 1;
814   }
815 #endif
816 }
817 
init_frame(VP8D_COMP * pbi)818 static void init_frame(VP8D_COMP *pbi) {
819   VP8_COMMON *const pc = &pbi->common;
820   MACROBLOCKD *const xd = &pbi->mb;
821 
822   if (pc->frame_type == KEY_FRAME) {
823     /* Various keyframe initializations */
824     memcpy(pc->fc.mvc, vp8_default_mv_context, sizeof(vp8_default_mv_context));
825 
826     vp8_init_mbmode_probs(pc);
827 
828     vp8_default_coef_probs(pc);
829 
830     /* reset the segment feature data to 0 with delta coding (Default state). */
831     memset(xd->segment_feature_data, 0, sizeof(xd->segment_feature_data));
832     xd->mb_segement_abs_delta = SEGMENT_DELTADATA;
833 
834     /* reset the mode ref deltasa for loop filter */
835     memset(xd->ref_lf_deltas, 0, sizeof(xd->ref_lf_deltas));
836     memset(xd->mode_lf_deltas, 0, sizeof(xd->mode_lf_deltas));
837 
838     /* All buffers are implicitly updated on key frames. */
839     pc->refresh_golden_frame = 1;
840     pc->refresh_alt_ref_frame = 1;
841     pc->copy_buffer_to_gf = 0;
842     pc->copy_buffer_to_arf = 0;
843 
844     /* Note that Golden and Altref modes cannot be used on a key frame so
845      * ref_frame_sign_bias[] is undefined and meaningless
846      */
847     pc->ref_frame_sign_bias[GOLDEN_FRAME] = 0;
848     pc->ref_frame_sign_bias[ALTREF_FRAME] = 0;
849   } else {
850     /* To enable choice of different interploation filters */
851     if (!pc->use_bilinear_mc_filter) {
852       xd->subpixel_predict = vp8_sixtap_predict4x4;
853       xd->subpixel_predict8x4 = vp8_sixtap_predict8x4;
854       xd->subpixel_predict8x8 = vp8_sixtap_predict8x8;
855       xd->subpixel_predict16x16 = vp8_sixtap_predict16x16;
856     } else {
857       xd->subpixel_predict = vp8_bilinear_predict4x4;
858       xd->subpixel_predict8x4 = vp8_bilinear_predict8x4;
859       xd->subpixel_predict8x8 = vp8_bilinear_predict8x8;
860       xd->subpixel_predict16x16 = vp8_bilinear_predict16x16;
861     }
862 
863     if (pbi->decoded_key_frame && pbi->ec_enabled && !pbi->ec_active) {
864       pbi->ec_active = 1;
865     }
866   }
867 
868   xd->left_context = &pc->left_context;
869   xd->mode_info_context = pc->mi;
870   xd->frame_type = pc->frame_type;
871   xd->mode_info_context->mbmi.mode = DC_PRED;
872   xd->mode_info_stride = pc->mode_info_stride;
873   xd->corrupted = 0; /* init without corruption */
874 
875   xd->fullpixel_mask = 0xffffffff;
876   if (pc->full_pixel) xd->fullpixel_mask = 0xfffffff8;
877 }
878 
vp8_decode_frame(VP8D_COMP * pbi)879 int vp8_decode_frame(VP8D_COMP *pbi) {
880   vp8_reader *const bc = &pbi->mbc[8];
881   VP8_COMMON *const pc = &pbi->common;
882   MACROBLOCKD *const xd = &pbi->mb;
883   const unsigned char *data = pbi->fragments.ptrs[0];
884   const unsigned int data_sz = pbi->fragments.sizes[0];
885   const unsigned char *data_end = data + data_sz;
886   ptrdiff_t first_partition_length_in_bytes;
887 
888   int i, j, k, l;
889   const int *const mb_feature_data_bits = vp8_mb_feature_data_bits;
890   int corrupt_tokens = 0;
891   int prev_independent_partitions = pbi->independent_partitions;
892 
893   YV12_BUFFER_CONFIG *yv12_fb_new = pbi->dec_fb_ref[INTRA_FRAME];
894 
895   /* start with no corruption of current frame */
896   xd->corrupted = 0;
897   yv12_fb_new->corrupted = 0;
898 
899   if (data_end - data < 3) {
900     if (!pbi->ec_active) {
901       vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
902                          "Truncated packet");
903     }
904 
905     /* Declare the missing frame as an inter frame since it will
906        be handled as an inter frame when we have estimated its
907        motion vectors. */
908     pc->frame_type = INTER_FRAME;
909     pc->version = 0;
910     pc->show_frame = 1;
911     first_partition_length_in_bytes = 0;
912   } else {
913     unsigned char clear_buffer[10];
914     const unsigned char *clear = data;
915     if (pbi->decrypt_cb) {
916       int n = (int)VPXMIN(sizeof(clear_buffer), data_sz);
917       pbi->decrypt_cb(pbi->decrypt_state, data, clear_buffer, n);
918       clear = clear_buffer;
919     }
920 
921     pc->frame_type = (FRAME_TYPE)(clear[0] & 1);
922     pc->version = (clear[0] >> 1) & 7;
923     pc->show_frame = (clear[0] >> 4) & 1;
924     first_partition_length_in_bytes =
925         (clear[0] | (clear[1] << 8) | (clear[2] << 16)) >> 5;
926 
927     if (!pbi->ec_active && (data + first_partition_length_in_bytes > data_end ||
928                             data + first_partition_length_in_bytes < data)) {
929       vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
930                          "Truncated packet or corrupt partition 0 length");
931     }
932 
933     data += 3;
934     clear += 3;
935 
936     vp8_setup_version(pc);
937 
938     if (pc->frame_type == KEY_FRAME) {
939       /* vet via sync code */
940       /* When error concealment is enabled we should only check the sync
941        * code if we have enough bits available
942        */
943       if (data + 3 < data_end) {
944         if (clear[0] != 0x9d || clear[1] != 0x01 || clear[2] != 0x2a) {
945           vpx_internal_error(&pc->error, VPX_CODEC_UNSUP_BITSTREAM,
946                              "Invalid frame sync code");
947         }
948       }
949 
950       /* If error concealment is enabled we should only parse the new size
951        * if we have enough data. Otherwise we will end up with the wrong
952        * size.
953        */
954       if (data + 6 < data_end) {
955         pc->Width = (clear[3] | (clear[4] << 8)) & 0x3fff;
956         pc->horiz_scale = clear[4] >> 6;
957         pc->Height = (clear[5] | (clear[6] << 8)) & 0x3fff;
958         pc->vert_scale = clear[6] >> 6;
959         data += 7;
960       } else if (!pbi->ec_active) {
961         vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
962                            "Truncated key frame header");
963       } else {
964         /* Error concealment is active, clear the frame. */
965         data = data_end;
966       }
967     } else {
968       memcpy(&xd->pre, yv12_fb_new, sizeof(YV12_BUFFER_CONFIG));
969       memcpy(&xd->dst, yv12_fb_new, sizeof(YV12_BUFFER_CONFIG));
970     }
971   }
972   if ((!pbi->decoded_key_frame && pc->frame_type != KEY_FRAME)) {
973     return -1;
974   }
975 
976   init_frame(pbi);
977 
978   if (vp8dx_start_decode(bc, data, (unsigned int)(data_end - data),
979                          pbi->decrypt_cb, pbi->decrypt_state)) {
980     vpx_internal_error(&pc->error, VPX_CODEC_MEM_ERROR,
981                        "Failed to allocate bool decoder 0");
982   }
983   if (pc->frame_type == KEY_FRAME) {
984     (void)vp8_read_bit(bc);  // colorspace
985     pc->clamp_type = (CLAMP_TYPE)vp8_read_bit(bc);
986   }
987 
988   /* Is segmentation enabled */
989   xd->segmentation_enabled = (unsigned char)vp8_read_bit(bc);
990 
991   if (xd->segmentation_enabled) {
992     /* Signal whether or not the segmentation map is being explicitly updated
993      * this frame. */
994     xd->update_mb_segmentation_map = (unsigned char)vp8_read_bit(bc);
995     xd->update_mb_segmentation_data = (unsigned char)vp8_read_bit(bc);
996 
997     if (xd->update_mb_segmentation_data) {
998       xd->mb_segement_abs_delta = (unsigned char)vp8_read_bit(bc);
999 
1000       memset(xd->segment_feature_data, 0, sizeof(xd->segment_feature_data));
1001 
1002       /* For each segmentation feature (Quant and loop filter level) */
1003       for (i = 0; i < MB_LVL_MAX; ++i) {
1004         for (j = 0; j < MAX_MB_SEGMENTS; ++j) {
1005           /* Frame level data */
1006           if (vp8_read_bit(bc)) {
1007             xd->segment_feature_data[i][j] =
1008                 (signed char)vp8_read_literal(bc, mb_feature_data_bits[i]);
1009 
1010             if (vp8_read_bit(bc)) {
1011               xd->segment_feature_data[i][j] = -xd->segment_feature_data[i][j];
1012             }
1013           } else {
1014             xd->segment_feature_data[i][j] = 0;
1015           }
1016         }
1017       }
1018     }
1019 
1020     if (xd->update_mb_segmentation_map) {
1021       /* Which macro block level features are enabled */
1022       memset(xd->mb_segment_tree_probs, 255, sizeof(xd->mb_segment_tree_probs));
1023 
1024       /* Read the probs used to decode the segment id for each macro block. */
1025       for (i = 0; i < MB_FEATURE_TREE_PROBS; ++i) {
1026         /* If not explicitly set value is defaulted to 255 by memset above */
1027         if (vp8_read_bit(bc)) {
1028           xd->mb_segment_tree_probs[i] = (vp8_prob)vp8_read_literal(bc, 8);
1029         }
1030       }
1031     }
1032   } else {
1033     /* No segmentation updates on this frame */
1034     xd->update_mb_segmentation_map = 0;
1035     xd->update_mb_segmentation_data = 0;
1036   }
1037 
1038   /* Read the loop filter level and type */
1039   pc->filter_type = (LOOPFILTERTYPE)vp8_read_bit(bc);
1040   pc->filter_level = vp8_read_literal(bc, 6);
1041   pc->sharpness_level = vp8_read_literal(bc, 3);
1042 
1043   /* Read in loop filter deltas applied at the MB level based on mode or ref
1044    * frame. */
1045   xd->mode_ref_lf_delta_update = 0;
1046   xd->mode_ref_lf_delta_enabled = (unsigned char)vp8_read_bit(bc);
1047 
1048   if (xd->mode_ref_lf_delta_enabled) {
1049     /* Do the deltas need to be updated */
1050     xd->mode_ref_lf_delta_update = (unsigned char)vp8_read_bit(bc);
1051 
1052     if (xd->mode_ref_lf_delta_update) {
1053       /* Send update */
1054       for (i = 0; i < MAX_REF_LF_DELTAS; ++i) {
1055         if (vp8_read_bit(bc)) {
1056           /*sign = vp8_read_bit( bc );*/
1057           xd->ref_lf_deltas[i] = (signed char)vp8_read_literal(bc, 6);
1058 
1059           if (vp8_read_bit(bc)) { /* Apply sign */
1060             xd->ref_lf_deltas[i] = xd->ref_lf_deltas[i] * -1;
1061           }
1062         }
1063       }
1064 
1065       /* Send update */
1066       for (i = 0; i < MAX_MODE_LF_DELTAS; ++i) {
1067         if (vp8_read_bit(bc)) {
1068           /*sign = vp8_read_bit( bc );*/
1069           xd->mode_lf_deltas[i] = (signed char)vp8_read_literal(bc, 6);
1070 
1071           if (vp8_read_bit(bc)) { /* Apply sign */
1072             xd->mode_lf_deltas[i] = xd->mode_lf_deltas[i] * -1;
1073           }
1074         }
1075       }
1076     }
1077   }
1078 
1079   setup_token_decoder(pbi, data + first_partition_length_in_bytes);
1080 
1081   xd->current_bc = &pbi->mbc[0];
1082 
1083   /* Read the default quantizers. */
1084   {
1085     int Q, q_update;
1086 
1087     Q = vp8_read_literal(bc, 7); /* AC 1st order Q = default */
1088     pc->base_qindex = Q;
1089     q_update = 0;
1090     pc->y1dc_delta_q = get_delta_q(bc, pc->y1dc_delta_q, &q_update);
1091     pc->y2dc_delta_q = get_delta_q(bc, pc->y2dc_delta_q, &q_update);
1092     pc->y2ac_delta_q = get_delta_q(bc, pc->y2ac_delta_q, &q_update);
1093     pc->uvdc_delta_q = get_delta_q(bc, pc->uvdc_delta_q, &q_update);
1094     pc->uvac_delta_q = get_delta_q(bc, pc->uvac_delta_q, &q_update);
1095 
1096     if (q_update) vp8cx_init_de_quantizer(pbi);
1097 
1098     /* MB level dequantizer setup */
1099     vp8_mb_init_dequantizer(pbi, &pbi->mb);
1100   }
1101 
1102   /* Determine if the golden frame or ARF buffer should be updated and how.
1103    * For all non key frames the GF and ARF refresh flags and sign bias
1104    * flags must be set explicitly.
1105    */
1106   if (pc->frame_type != KEY_FRAME) {
1107     /* Should the GF or ARF be updated from the current frame */
1108     pc->refresh_golden_frame = vp8_read_bit(bc);
1109 #if CONFIG_ERROR_CONCEALMENT
1110     /* Assume we shouldn't refresh golden if the bit is missing */
1111     xd->corrupted |= vp8dx_bool_error(bc);
1112     if (pbi->ec_active && xd->corrupted) pc->refresh_golden_frame = 0;
1113 #endif
1114 
1115     pc->refresh_alt_ref_frame = vp8_read_bit(bc);
1116 #if CONFIG_ERROR_CONCEALMENT
1117     /* Assume we shouldn't refresh altref if the bit is missing */
1118     xd->corrupted |= vp8dx_bool_error(bc);
1119     if (pbi->ec_active && xd->corrupted) pc->refresh_alt_ref_frame = 0;
1120 #endif
1121 
1122     /* Buffer to buffer copy flags. */
1123     pc->copy_buffer_to_gf = 0;
1124 
1125     if (!pc->refresh_golden_frame) {
1126       pc->copy_buffer_to_gf = vp8_read_literal(bc, 2);
1127     }
1128 
1129 #if CONFIG_ERROR_CONCEALMENT
1130     /* Assume we shouldn't copy to the golden if the bit is missing */
1131     xd->corrupted |= vp8dx_bool_error(bc);
1132     if (pbi->ec_active && xd->corrupted) pc->copy_buffer_to_gf = 0;
1133 #endif
1134 
1135     pc->copy_buffer_to_arf = 0;
1136 
1137     if (!pc->refresh_alt_ref_frame) {
1138       pc->copy_buffer_to_arf = vp8_read_literal(bc, 2);
1139     }
1140 
1141 #if CONFIG_ERROR_CONCEALMENT
1142     /* Assume we shouldn't copy to the alt-ref if the bit is missing */
1143     xd->corrupted |= vp8dx_bool_error(bc);
1144     if (pbi->ec_active && xd->corrupted) pc->copy_buffer_to_arf = 0;
1145 #endif
1146 
1147     pc->ref_frame_sign_bias[GOLDEN_FRAME] = vp8_read_bit(bc);
1148     pc->ref_frame_sign_bias[ALTREF_FRAME] = vp8_read_bit(bc);
1149   }
1150 
1151   pc->refresh_entropy_probs = vp8_read_bit(bc);
1152 #if CONFIG_ERROR_CONCEALMENT
1153   /* Assume we shouldn't refresh the probabilities if the bit is
1154    * missing */
1155   xd->corrupted |= vp8dx_bool_error(bc);
1156   if (pbi->ec_active && xd->corrupted) pc->refresh_entropy_probs = 0;
1157 #endif
1158   if (pc->refresh_entropy_probs == 0) {
1159     memcpy(&pc->lfc, &pc->fc, sizeof(pc->fc));
1160   }
1161 
1162   pc->refresh_last_frame = pc->frame_type == KEY_FRAME || vp8_read_bit(bc);
1163 
1164 #if CONFIG_ERROR_CONCEALMENT
1165   /* Assume we should refresh the last frame if the bit is missing */
1166   xd->corrupted |= vp8dx_bool_error(bc);
1167   if (pbi->ec_active && xd->corrupted) pc->refresh_last_frame = 1;
1168 #endif
1169 
1170   if (0) {
1171     FILE *z = fopen("decodestats.stt", "a");
1172     fprintf(z, "%6d F:%d,G:%d,A:%d,L:%d,Q:%d\n", pc->current_video_frame,
1173             pc->frame_type, pc->refresh_golden_frame, pc->refresh_alt_ref_frame,
1174             pc->refresh_last_frame, pc->base_qindex);
1175     fclose(z);
1176   }
1177 
1178   {
1179     pbi->independent_partitions = 1;
1180 
1181     /* read coef probability tree */
1182     for (i = 0; i < BLOCK_TYPES; ++i) {
1183       for (j = 0; j < COEF_BANDS; ++j) {
1184         for (k = 0; k < PREV_COEF_CONTEXTS; ++k) {
1185           for (l = 0; l < ENTROPY_NODES; ++l) {
1186             vp8_prob *const p = pc->fc.coef_probs[i][j][k] + l;
1187 
1188             if (vp8_read(bc, vp8_coef_update_probs[i][j][k][l])) {
1189               *p = (vp8_prob)vp8_read_literal(bc, 8);
1190             }
1191             if (k > 0 && *p != pc->fc.coef_probs[i][j][k - 1][l]) {
1192               pbi->independent_partitions = 0;
1193             }
1194           }
1195         }
1196       }
1197     }
1198   }
1199 
1200   /* clear out the coeff buffer */
1201   memset(xd->qcoeff, 0, sizeof(xd->qcoeff));
1202 
1203   vp8_decode_mode_mvs(pbi);
1204 
1205 #if CONFIG_ERROR_CONCEALMENT
1206   if (pbi->ec_active &&
1207       pbi->mvs_corrupt_from_mb < (unsigned int)pc->mb_cols * pc->mb_rows) {
1208     /* Motion vectors are missing in this frame. We will try to estimate
1209      * them and then continue decoding the frame as usual */
1210     vp8_estimate_missing_mvs(pbi);
1211   }
1212 #endif
1213 
1214   memset(pc->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) * pc->mb_cols);
1215   pbi->frame_corrupt_residual = 0;
1216 
1217 #if CONFIG_MULTITHREAD
1218   if (vpx_atomic_load_acquire(&pbi->b_multithreaded_rd) &&
1219       pc->multi_token_partition != ONE_PARTITION) {
1220     unsigned int thread;
1221     if (vp8mt_decode_mb_rows(pbi, xd)) {
1222       vp8_decoder_remove_threads(pbi);
1223       pbi->restart_threads = 1;
1224       vpx_internal_error(&pbi->common.error, VPX_CODEC_CORRUPT_FRAME, NULL);
1225     }
1226     vp8_yv12_extend_frame_borders(yv12_fb_new);
1227     for (thread = 0; thread < pbi->decoding_thread_count; ++thread) {
1228       corrupt_tokens |= pbi->mb_row_di[thread].mbd.corrupted;
1229     }
1230   } else
1231 #endif
1232   {
1233     decode_mb_rows(pbi);
1234     corrupt_tokens |= xd->corrupted;
1235   }
1236 
1237   /* Collect information about decoder corruption. */
1238   /* 1. Check first boolean decoder for errors. */
1239   yv12_fb_new->corrupted = vp8dx_bool_error(bc);
1240   /* 2. Check the macroblock information */
1241   yv12_fb_new->corrupted |= corrupt_tokens;
1242 
1243   if (!pbi->decoded_key_frame) {
1244     if (pc->frame_type == KEY_FRAME && !yv12_fb_new->corrupted) {
1245       pbi->decoded_key_frame = 1;
1246     } else {
1247       vpx_internal_error(&pbi->common.error, VPX_CODEC_CORRUPT_FRAME,
1248                          "A stream must start with a complete key frame");
1249     }
1250   }
1251 
1252   /* vpx_log("Decoder: Frame Decoded, Size Roughly:%d bytes
1253    * \n",bc->pos+pbi->bc2.pos); */
1254 
1255   if (pc->refresh_entropy_probs == 0) {
1256     memcpy(&pc->fc, &pc->lfc, sizeof(pc->fc));
1257     pbi->independent_partitions = prev_independent_partitions;
1258   }
1259 
1260 #ifdef PACKET_TESTING
1261   {
1262     FILE *f = fopen("decompressor.VP8", "ab");
1263     unsigned int size = pbi->bc2.pos + pbi->bc.pos + 8;
1264     fwrite((void *)&size, 4, 1, f);
1265     fwrite((void *)pbi->Source, size, 1, f);
1266     fclose(f);
1267   }
1268 #endif
1269 
1270   return 0;
1271 }
1272