vp9: allocate 'b', 'block/uvblock' and 'eob/uveob' dynamically.
[ffmpeg.git] / libavcodec / vp9block.c
1 /*
2  * VP9 compatible video decoder
3  *
4  * Copyright (C) 2013 Ronald S. Bultje <rsbultje gmail com>
5  * Copyright (C) 2013 Clément Bœsch <u pkh me>
6  *
7  * This file is part of Libav.
8  *
9  * Libav is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * Libav is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with Libav; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22  */
23
24 #include "libavutil/avassert.h"
25
26 #include "avcodec.h"
27 #include "internal.h"
28 #include "videodsp.h"
29 #include "vp56.h"
30 #include "vp9.h"
31 #include "vp9data.h"
32
33 static const uint8_t bwh_tab[2][N_BS_SIZES][2] = {
34     {
35         { 16, 16 }, { 16, 8 }, { 8, 16 }, { 8, 8 }, { 8, 4 }, { 4, 8 },
36         {  4,  4 }, {  4, 2 }, { 2,  4 }, { 2, 2 }, { 2, 1 }, { 1, 2 }, { 1, 1 },
37     },  {
38         {  8,  8 }, {  8, 4 }, { 4,  8 }, { 4, 4 }, { 4, 2 }, { 2, 4 },
39         {  2,  2 }, {  2, 1 }, { 1,  2 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 },
40     }
41 };
42
43 // differential forward probability updates
44 static void decode_mode(VP9Context *s, VP9Block *const b)
45 {
46     static const uint8_t left_ctx[N_BS_SIZES] = {
47         0x0, 0x8, 0x0, 0x8, 0xc, 0x8, 0xc, 0xe, 0xc, 0xe, 0xf, 0xe, 0xf
48     };
49     static const uint8_t above_ctx[N_BS_SIZES] = {
50         0x0, 0x0, 0x8, 0x8, 0x8, 0xc, 0xc, 0xc, 0xe, 0xe, 0xe, 0xf, 0xf
51     };
52     static const uint8_t max_tx_for_bl_bp[N_BS_SIZES] = {
53         TX_32X32, TX_32X32, TX_32X32, TX_32X32, TX_16X16, TX_16X16,
54         TX_16X16, TX_8X8,   TX_8X8,   TX_8X8,   TX_4X4,   TX_4X4,  TX_4X4
55     };
56     int row = b->row, col = b->col, row7 = b->row7;
57     enum TxfmMode max_tx = max_tx_for_bl_bp[b->bs];
58     int w4 = FFMIN(s->cols - col, bwh_tab[1][b->bs][0]);
59     int h4 = FFMIN(s->rows - row, bwh_tab[1][b->bs][1]);
60     int have_a = row > 0, have_l = col > s->tiling.tile_col_start;
61     int y;
62
63     if (!s->segmentation.enabled) {
64         b->seg_id = 0;
65     } else if (s->keyframe || s->intraonly) {
66         b->seg_id = s->segmentation.update_map ?
67                     vp8_rac_get_tree(&s->c, ff_vp9_segmentation_tree, s->prob.seg) : 0;
68     } else if (!s->segmentation.update_map ||
69                (s->segmentation.temporal &&
70                 vp56_rac_get_prob_branchy(&s->c,
71                                           s->prob.segpred[s->above_segpred_ctx[col] +
72                                                           s->left_segpred_ctx[row7]]))) {
73         uint8_t *refsegmap = s->frames[LAST_FRAME].segmentation_map;
74         int pred = MAX_SEGMENT - 1;
75         int x;
76
77         for (y = 0; y < h4; y++)
78             for (x = 0; x < w4; x++)
79                 pred = FFMIN(pred,
80                              refsegmap[(y + row) * 8 * s->sb_cols + x + col]);
81         b->seg_id = pred;
82
83         memset(&s->above_segpred_ctx[col], 1, w4);
84         memset(&s->left_segpred_ctx[row7], 1, h4);
85     } else {
86         b->seg_id = vp8_rac_get_tree(&s->c, ff_vp9_segmentation_tree,
87                                      s->prob.seg);
88
89         memset(&s->above_segpred_ctx[col], 0, w4);
90         memset(&s->left_segpred_ctx[row7], 0, h4);
91     }
92     if ((s->segmentation.enabled && s->segmentation.update_map) || s->keyframe) {
93         uint8_t *segmap = s->frames[CUR_FRAME].segmentation_map;
94
95         for (y = 0; y < h4; y++)
96             memset(&segmap[(y + row) * 8 * s->sb_cols + col],
97                    b->seg_id, w4);
98     }
99
100     b->skip = s->segmentation.enabled &&
101               s->segmentation.feat[b->seg_id].skip_enabled;
102     if (!b->skip) {
103         int c = s->left_skip_ctx[row7] + s->above_skip_ctx[col];
104         b->skip = vp56_rac_get_prob(&s->c, s->prob.p.skip[c]);
105         s->counts.skip[c][b->skip]++;
106     }
107
108     if (s->keyframe || s->intraonly) {
109         b->intra = 1;
110     } else if (s->segmentation.feat[b->seg_id].ref_enabled) {
111         b->intra = !s->segmentation.feat[b->seg_id].ref_val;
112     } else {
113         int c, bit;
114
115         if (have_a && have_l) {
116             c  = s->above_intra_ctx[col] + s->left_intra_ctx[row7];
117             c += (c == 2);
118         } else {
119             c = have_a ? 2 * s->above_intra_ctx[col] :
120                 have_l ? 2 * s->left_intra_ctx[row7] : 0;
121         }
122         bit = vp56_rac_get_prob(&s->c, s->prob.p.intra[c]);
123         s->counts.intra[c][bit]++;
124         b->intra = !bit;
125     }
126
127     if ((b->intra || !b->skip) && s->txfmmode == TX_SWITCHABLE) {
128         int c;
129         if (have_a) {
130             if (have_l) {
131                 c = (s->above_skip_ctx[col] ? max_tx :
132                      s->above_txfm_ctx[col]) +
133                     (s->left_skip_ctx[row7] ? max_tx :
134                      s->left_txfm_ctx[row7]) > max_tx;
135             } else {
136                 c = s->above_skip_ctx[col] ? 1 :
137                     (s->above_txfm_ctx[col] * 2 > max_tx);
138             }
139         } else if (have_l) {
140             c = s->left_skip_ctx[row7] ? 1 :
141                 (s->left_txfm_ctx[row7] * 2 > max_tx);
142         } else {
143             c = 1;
144         }
145         switch (max_tx) {
146         case TX_32X32:
147             b->tx = vp56_rac_get_prob(&s->c, s->prob.p.tx32p[c][0]);
148             if (b->tx) {
149                 b->tx += vp56_rac_get_prob(&s->c, s->prob.p.tx32p[c][1]);
150                 if (b->tx == 2)
151                     b->tx += vp56_rac_get_prob(&s->c, s->prob.p.tx32p[c][2]);
152             }
153             s->counts.tx32p[c][b->tx]++;
154             break;
155         case TX_16X16:
156             b->tx = vp56_rac_get_prob(&s->c, s->prob.p.tx16p[c][0]);
157             if (b->tx)
158                 b->tx += vp56_rac_get_prob(&s->c, s->prob.p.tx16p[c][1]);
159             s->counts.tx16p[c][b->tx]++;
160             break;
161         case TX_8X8:
162             b->tx = vp56_rac_get_prob(&s->c, s->prob.p.tx8p[c]);
163             s->counts.tx8p[c][b->tx]++;
164             break;
165         case TX_4X4:
166             b->tx = TX_4X4;
167             break;
168         }
169     } else {
170         b->tx = FFMIN(max_tx, s->txfmmode);
171     }
172
173     if (s->keyframe || s->intraonly) {
174         uint8_t *a = &s->above_mode_ctx[col * 2];
175         uint8_t *l = &s->left_mode_ctx[(row7) << 1];
176
177         b->comp = 0;
178         if (b->bs > BS_8x8) {
179             // FIXME the memory storage intermediates here aren't really
180             // necessary, they're just there to make the code slightly
181             // simpler for now
182             b->mode[0] =
183             a[0]       = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
184                                           ff_vp9_default_kf_ymode_probs[a[0]][l[0]]);
185             if (b->bs != BS_8x4) {
186                 b->mode[1] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
187                                               ff_vp9_default_kf_ymode_probs[a[1]][b->mode[0]]);
188                 l[0]       =
189                 a[1]       = b->mode[1];
190             } else {
191                 l[0]       =
192                 a[1]       =
193                 b->mode[1] = b->mode[0];
194             }
195             if (b->bs != BS_4x8) {
196                 b->mode[2] =
197                 a[0]       = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
198                                               ff_vp9_default_kf_ymode_probs[a[0]][l[1]]);
199                 if (b->bs != BS_8x4) {
200                     b->mode[3] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
201                                                   ff_vp9_default_kf_ymode_probs[a[1]][b->mode[2]]);
202                     l[1]       =
203                     a[1]       = b->mode[3];
204                 } else {
205                     l[1]       =
206                     a[1]       =
207                     b->mode[3] = b->mode[2];
208                 }
209             } else {
210                 b->mode[2] = b->mode[0];
211                 l[1]       =
212                 a[1]       =
213                 b->mode[3] = b->mode[1];
214             }
215         } else {
216             b->mode[0] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
217                                           ff_vp9_default_kf_ymode_probs[*a][*l]);
218             b->mode[3] =
219             b->mode[2] =
220             b->mode[1] = b->mode[0];
221             // FIXME this can probably be optimized
222             memset(a, b->mode[0], bwh_tab[0][b->bs][0]);
223             memset(l, b->mode[0], bwh_tab[0][b->bs][1]);
224         }
225         b->uvmode = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
226                                      ff_vp9_default_kf_uvmode_probs[b->mode[3]]);
227     } else if (b->intra) {
228         b->comp = 0;
229         if (b->bs > BS_8x8) {
230             b->mode[0] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
231                                           s->prob.p.y_mode[0]);
232             s->counts.y_mode[0][b->mode[0]]++;
233             if (b->bs != BS_8x4) {
234                 b->mode[1] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
235                                               s->prob.p.y_mode[0]);
236                 s->counts.y_mode[0][b->mode[1]]++;
237             } else {
238                 b->mode[1] = b->mode[0];
239             }
240             if (b->bs != BS_4x8) {
241                 b->mode[2] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
242                                               s->prob.p.y_mode[0]);
243                 s->counts.y_mode[0][b->mode[2]]++;
244                 if (b->bs != BS_8x4) {
245                     b->mode[3] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
246                                                   s->prob.p.y_mode[0]);
247                     s->counts.y_mode[0][b->mode[3]]++;
248                 } else {
249                     b->mode[3] = b->mode[2];
250                 }
251             } else {
252                 b->mode[2] = b->mode[0];
253                 b->mode[3] = b->mode[1];
254             }
255         } else {
256             static const uint8_t size_group[10] = {
257                 3, 3, 3, 3, 2, 2, 2, 1, 1, 1
258             };
259             int sz = size_group[b->bs];
260
261             b->mode[0] = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
262                                           s->prob.p.y_mode[sz]);
263             b->mode[1] =
264             b->mode[2] =
265             b->mode[3] = b->mode[0];
266             s->counts.y_mode[sz][b->mode[3]]++;
267         }
268         b->uvmode = vp8_rac_get_tree(&s->c, ff_vp9_intramode_tree,
269                                      s->prob.p.uv_mode[b->mode[3]]);
270         s->counts.uv_mode[b->mode[3]][b->uvmode]++;
271     } else {
272         static const uint8_t inter_mode_ctx_lut[14][14] = {
273             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
274             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
275             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
276             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
277             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
278             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
279             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
280             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
281             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
282             { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5 },
283             { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 2, 2, 1, 3 },
284             { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 2, 2, 1, 3 },
285             { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 1, 1, 0, 3 },
286             { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 3, 3, 3, 4 },
287         };
288
289         if (s->segmentation.feat[b->seg_id].ref_enabled) {
290             av_assert2(s->segmentation.feat[b->seg_id].ref_val != 0);
291             b->comp   = 0;
292             b->ref[0] = s->segmentation.feat[b->seg_id].ref_val - 1;
293         } else {
294             // read comp_pred flag
295             if (s->comppredmode != PRED_SWITCHABLE) {
296                 b->comp = s->comppredmode == PRED_COMPREF;
297             } else {
298                 int c;
299
300                 // FIXME add intra as ref=0xff (or -1) to make these easier?
301                 if (have_a) {
302                     if (have_l) {
303                         if (s->above_comp_ctx[col] && s->left_comp_ctx[row7]) {
304                             c = 4;
305                         } else if (s->above_comp_ctx[col]) {
306                             c = 2 + (s->left_intra_ctx[row7] ||
307                                      s->left_ref_ctx[row7] == s->fixcompref);
308                         } else if (s->left_comp_ctx[row7]) {
309                             c = 2 + (s->above_intra_ctx[col] ||
310                                      s->above_ref_ctx[col] == s->fixcompref);
311                         } else {
312                             c = (!s->above_intra_ctx[col] &&
313                                  s->above_ref_ctx[col] == s->fixcompref) ^
314                                 (!s->left_intra_ctx[row7] &&
315                                  s->left_ref_ctx[row & 7] == s->fixcompref);
316                         }
317                     } else {
318                         c = s->above_comp_ctx[col] ? 3 :
319                             (!s->above_intra_ctx[col] && s->above_ref_ctx[col] == s->fixcompref);
320                     }
321                 } else if (have_l) {
322                     c = s->left_comp_ctx[row7] ? 3 :
323                         (!s->left_intra_ctx[row7] && s->left_ref_ctx[row7] == s->fixcompref);
324                 } else {
325                     c = 1;
326                 }
327                 b->comp = vp56_rac_get_prob(&s->c, s->prob.p.comp[c]);
328                 s->counts.comp[c][b->comp]++;
329             }
330
331             // read actual references
332             // FIXME probably cache a few variables here to prevent repetitive
333             // memory accesses below
334             if (b->comp) { /* two references */
335                 int fix_idx = s->signbias[s->fixcompref], var_idx = !fix_idx, c, bit;
336
337                 b->ref[fix_idx] = s->fixcompref;
338                 // FIXME can this codeblob be replaced by some sort of LUT?
339                 if (have_a) {
340                     if (have_l) {
341                         if (s->above_intra_ctx[col]) {
342                             if (s->left_intra_ctx[row7]) {
343                                 c = 2;
344                             } else {
345                                 c = 1 + 2 * (s->left_ref_ctx[row7] != s->varcompref[1]);
346                             }
347                         } else if (s->left_intra_ctx[row7]) {
348                             c = 1 + 2 * (s->above_ref_ctx[col] != s->varcompref[1]);
349                         } else {
350                             int refl = s->left_ref_ctx[row7], refa = s->above_ref_ctx[col];
351
352                             if (refl == refa && refa == s->varcompref[1]) {
353                                 c = 0;
354                             } else if (!s->left_comp_ctx[row7] && !s->above_comp_ctx[col]) {
355                                 if ((refa == s->fixcompref && refl == s->varcompref[0]) ||
356                                     (refl == s->fixcompref && refa == s->varcompref[0])) {
357                                     c = 4;
358                                 } else {
359                                     c = (refa == refl) ? 3 : 1;
360                                 }
361                             } else if (!s->left_comp_ctx[row7]) {
362                                 if (refa == s->varcompref[1] && refl != s->varcompref[1]) {
363                                     c = 1;
364                                 } else {
365                                     c = (refl == s->varcompref[1] &&
366                                          refa != s->varcompref[1]) ? 2 : 4;
367                                 }
368                             } else if (!s->above_comp_ctx[col]) {
369                                 if (refl == s->varcompref[1] && refa != s->varcompref[1]) {
370                                     c = 1;
371                                 } else {
372                                     c = (refa == s->varcompref[1] &&
373                                          refl != s->varcompref[1]) ? 2 : 4;
374                                 }
375                             } else {
376                                 c = (refl == refa) ? 4 : 2;
377                             }
378                         }
379                     } else {
380                         if (s->above_intra_ctx[col]) {
381                             c = 2;
382                         } else if (s->above_comp_ctx[col]) {
383                             c = 4 * (s->above_ref_ctx[col] != s->varcompref[1]);
384                         } else {
385                             c = 3 * (s->above_ref_ctx[col] != s->varcompref[1]);
386                         }
387                     }
388                 } else if (have_l) {
389                     if (s->left_intra_ctx[row7]) {
390                         c = 2;
391                     } else if (s->left_comp_ctx[row7]) {
392                         c = 4 * (s->left_ref_ctx[row7] != s->varcompref[1]);
393                     } else {
394                         c = 3 * (s->left_ref_ctx[row7] != s->varcompref[1]);
395                     }
396                 } else {
397                     c = 2;
398                 }
399                 bit = vp56_rac_get_prob(&s->c, s->prob.p.comp_ref[c]);
400                 b->ref[var_idx] = s->varcompref[bit];
401                 s->counts.comp_ref[c][bit]++;
402             } else { /* single reference */
403                 int bit, c;
404
405                 if (have_a && !s->above_intra_ctx[col]) {
406                     if (have_l && !s->left_intra_ctx[row7]) {
407                         if (s->left_comp_ctx[row7]) {
408                             if (s->above_comp_ctx[col]) {
409                                 c = 1 + (!s->fixcompref || !s->left_ref_ctx[row7] ||
410                                          !s->above_ref_ctx[col]);
411                             } else {
412                                 c = (3 * !s->above_ref_ctx[col]) +
413                                     (!s->fixcompref || !s->left_ref_ctx[row7]);
414                             }
415                         } else if (s->above_comp_ctx[col]) {
416                             c = (3 * !s->left_ref_ctx[row7]) +
417                                 (!s->fixcompref || !s->above_ref_ctx[col]);
418                         } else {
419                             c = 2 * !s->left_ref_ctx[row7] + 2 * !s->above_ref_ctx[col];
420                         }
421                     } else if (s->above_intra_ctx[col]) {
422                         c = 2;
423                     } else if (s->above_comp_ctx[col]) {
424                         c = 1 + (!s->fixcompref || !s->above_ref_ctx[col]);
425                     } else {
426                         c = 4 * (!s->above_ref_ctx[col]);
427                     }
428                 } else if (have_l && !s->left_intra_ctx[row7]) {
429                     if (s->left_intra_ctx[row7]) {
430                         c = 2;
431                     } else if (s->left_comp_ctx[row7]) {
432                         c = 1 + (!s->fixcompref || !s->left_ref_ctx[row7]);
433                     } else {
434                         c = 4 * (!s->left_ref_ctx[row7]);
435                     }
436                 } else {
437                     c = 2;
438                 }
439                 bit = vp56_rac_get_prob(&s->c, s->prob.p.single_ref[c][0]);
440                 s->counts.single_ref[c][0][bit]++;
441                 if (!bit) {
442                     b->ref[0] = 0;
443                 } else {
444                     // FIXME can this codeblob be replaced by some sort of LUT?
445                     if (have_a) {
446                         if (have_l) {
447                             if (s->left_intra_ctx[row7]) {
448                                 if (s->above_intra_ctx[col]) {
449                                     c = 2;
450                                 } else if (s->above_comp_ctx[col]) {
451                                     c = 1 + 2 * (s->fixcompref == 1 ||
452                                                  s->above_ref_ctx[col] == 1);
453                                 } else if (!s->above_ref_ctx[col]) {
454                                     c = 3;
455                                 } else {
456                                     c = 4 * (s->above_ref_ctx[col] == 1);
457                                 }
458                             } else if (s->above_intra_ctx[col]) {
459                                 if (s->left_intra_ctx[row7]) {
460                                     c = 2;
461                                 } else if (s->left_comp_ctx[row7]) {
462                                     c = 1 + 2 * (s->fixcompref == 1 ||
463                                                  s->left_ref_ctx[row7] == 1);
464                                 } else if (!s->left_ref_ctx[row7]) {
465                                     c = 3;
466                                 } else {
467                                     c = 4 * (s->left_ref_ctx[row7] == 1);
468                                 }
469                             } else if (s->above_comp_ctx[col]) {
470                                 if (s->left_comp_ctx[row7]) {
471                                     if (s->left_ref_ctx[row7] == s->above_ref_ctx[col]) {
472                                         c = 3 * (s->fixcompref == 1 ||
473                                                  s->left_ref_ctx[row7] == 1);
474                                     } else {
475                                         c = 2;
476                                     }
477                                 } else if (!s->left_ref_ctx[row7]) {
478                                     c = 1 + 2 * (s->fixcompref == 1 ||
479                                                  s->above_ref_ctx[col] == 1);
480                                 } else {
481                                     c = 3 * (s->left_ref_ctx[row7] == 1) +
482                                         (s->fixcompref == 1 || s->above_ref_ctx[col] == 1);
483                                 }
484                             } else if (s->left_comp_ctx[row7]) {
485                                 if (!s->above_ref_ctx[col]) {
486                                     c = 1 + 2 * (s->fixcompref == 1 ||
487                                                  s->left_ref_ctx[row7] == 1);
488                                 } else {
489                                     c = 3 * (s->above_ref_ctx[col] == 1) +
490                                         (s->fixcompref == 1 || s->left_ref_ctx[row7] == 1);
491                                 }
492                             } else if (!s->above_ref_ctx[col]) {
493                                 if (!s->left_ref_ctx[row7]) {
494                                     c = 3;
495                                 } else {
496                                     c = 4 * (s->left_ref_ctx[row7] == 1);
497                                 }
498                             } else if (!s->left_ref_ctx[row7]) {
499                                 c = 4 * (s->above_ref_ctx[col] == 1);
500                             } else {
501                                 c = 2 * (s->left_ref_ctx[row7] == 1) +
502                                     2 * (s->above_ref_ctx[col] == 1);
503                             }
504                         } else {
505                             if (s->above_intra_ctx[col] ||
506                                 (!s->above_comp_ctx[col] && !s->above_ref_ctx[col])) {
507                                 c = 2;
508                             } else if (s->above_comp_ctx[col]) {
509                                 c = 3 * (s->fixcompref == 1 || s->above_ref_ctx[col] == 1);
510                             } else {
511                                 c = 4 * (s->above_ref_ctx[col] == 1);
512                             }
513                         }
514                     } else if (have_l) {
515                         if (s->left_intra_ctx[row7] ||
516                             (!s->left_comp_ctx[row7] && !s->left_ref_ctx[row7])) {
517                             c = 2;
518                         } else if (s->left_comp_ctx[row7]) {
519                             c = 3 * (s->fixcompref == 1 || s->left_ref_ctx[row7] == 1);
520                         } else {
521                             c = 4 * (s->left_ref_ctx[row7] == 1);
522                         }
523                     } else {
524                         c = 2;
525                     }
526                     bit = vp56_rac_get_prob(&s->c, s->prob.p.single_ref[c][1]);
527                     s->counts.single_ref[c][1][bit]++;
528                     b->ref[0] = 1 + bit;
529                 }
530             }
531         }
532
533         if (b->bs <= BS_8x8) {
534             if (s->segmentation.feat[b->seg_id].skip_enabled) {
535                 b->mode[0] =
536                 b->mode[1] =
537                 b->mode[2] =
538                 b->mode[3] = ZEROMV;
539             } else {
540                 static const uint8_t off[10] = {
541                     3, 0, 0, 1, 0, 0, 0, 0, 0, 0
542                 };
543
544                 // FIXME this needs to use the LUT tables from find_ref_mvs
545                 // because not all are -1,0/0,-1
546                 int c = inter_mode_ctx_lut[s->above_mode_ctx[col + off[b->bs]]]
547                                           [s->left_mode_ctx[row7 + off[b->bs]]];
548
549                 b->mode[0] = vp8_rac_get_tree(&s->c, ff_vp9_inter_mode_tree,
550                                               s->prob.p.mv_mode[c]);
551                 b->mode[1] =
552                 b->mode[2] =
553                 b->mode[3] = b->mode[0];
554                 s->counts.mv_mode[c][b->mode[0] - 10]++;
555             }
556         }
557
558         if (s->filtermode == FILTER_SWITCHABLE) {
559             int c;
560
561             if (have_a && s->above_mode_ctx[col] >= NEARESTMV) {
562                 if (have_l && s->left_mode_ctx[row7] >= NEARESTMV) {
563                     c = s->above_filter_ctx[col] == s->left_filter_ctx[row7] ?
564                         s->left_filter_ctx[row7] : 3;
565                 } else {
566                     c = s->above_filter_ctx[col];
567                 }
568             } else if (have_l && s->left_mode_ctx[row7] >= NEARESTMV) {
569                 c = s->left_filter_ctx[row7];
570             } else {
571                 c = 3;
572             }
573
574             b->filter = vp8_rac_get_tree(&s->c, ff_vp9_filter_tree,
575                                          s->prob.p.filter[c]);
576             s->counts.filter[c][b->filter]++;
577         } else {
578             b->filter = s->filtermode;
579         }
580
581         if (b->bs > BS_8x8) {
582             int c = inter_mode_ctx_lut[s->above_mode_ctx[col]][s->left_mode_ctx[row7]];
583
584             b->mode[0] = vp8_rac_get_tree(&s->c, ff_vp9_inter_mode_tree,
585                                           s->prob.p.mv_mode[c]);
586             s->counts.mv_mode[c][b->mode[0] - 10]++;
587             ff_vp9_fill_mv(s, b->mv[0], b->mode[0], 0);
588
589             if (b->bs != BS_8x4) {
590                 b->mode[1] = vp8_rac_get_tree(&s->c, ff_vp9_inter_mode_tree,
591                                               s->prob.p.mv_mode[c]);
592                 s->counts.mv_mode[c][b->mode[1] - 10]++;
593                 ff_vp9_fill_mv(s, b->mv[1], b->mode[1], 1);
594             } else {
595                 b->mode[1] = b->mode[0];
596                 AV_COPY32(&b->mv[1][0], &b->mv[0][0]);
597                 AV_COPY32(&b->mv[1][1], &b->mv[0][1]);
598             }
599
600             if (b->bs != BS_4x8) {
601                 b->mode[2] = vp8_rac_get_tree(&s->c, ff_vp9_inter_mode_tree,
602                                               s->prob.p.mv_mode[c]);
603                 s->counts.mv_mode[c][b->mode[2] - 10]++;
604                 ff_vp9_fill_mv(s, b->mv[2], b->mode[2], 2);
605
606                 if (b->bs != BS_8x4) {
607                     b->mode[3] = vp8_rac_get_tree(&s->c, ff_vp9_inter_mode_tree,
608                                                   s->prob.p.mv_mode[c]);
609                     s->counts.mv_mode[c][b->mode[3] - 10]++;
610                     ff_vp9_fill_mv(s, b->mv[3], b->mode[3], 3);
611                 } else {
612                     b->mode[3] = b->mode[2];
613                     AV_COPY32(&b->mv[3][0], &b->mv[2][0]);
614                     AV_COPY32(&b->mv[3][1], &b->mv[2][1]);
615                 }
616             } else {
617                 b->mode[2] = b->mode[0];
618                 AV_COPY32(&b->mv[2][0], &b->mv[0][0]);
619                 AV_COPY32(&b->mv[2][1], &b->mv[0][1]);
620                 b->mode[3] = b->mode[1];
621                 AV_COPY32(&b->mv[3][0], &b->mv[1][0]);
622                 AV_COPY32(&b->mv[3][1], &b->mv[1][1]);
623             }
624         } else {
625             ff_vp9_fill_mv(s, b->mv[0], b->mode[0], -1);
626             AV_COPY32(&b->mv[1][0], &b->mv[0][0]);
627             AV_COPY32(&b->mv[2][0], &b->mv[0][0]);
628             AV_COPY32(&b->mv[3][0], &b->mv[0][0]);
629             AV_COPY32(&b->mv[1][1], &b->mv[0][1]);
630             AV_COPY32(&b->mv[2][1], &b->mv[0][1]);
631             AV_COPY32(&b->mv[3][1], &b->mv[0][1]);
632         }
633     }
634
635     // FIXME this can probably be optimized
636     memset(&s->above_skip_ctx[col], b->skip, w4);
637     memset(&s->left_skip_ctx[row7], b->skip, h4);
638     memset(&s->above_txfm_ctx[col], b->tx, w4);
639     memset(&s->left_txfm_ctx[row7], b->tx, h4);
640     memset(&s->above_partition_ctx[col], above_ctx[b->bs], w4);
641     memset(&s->left_partition_ctx[row7], left_ctx[b->bs], h4);
642     if (!s->keyframe && !s->intraonly) {
643         memset(&s->above_intra_ctx[col], b->intra, w4);
644         memset(&s->left_intra_ctx[row7], b->intra, h4);
645         memset(&s->above_comp_ctx[col], b->comp, w4);
646         memset(&s->left_comp_ctx[row7], b->comp, h4);
647         memset(&s->above_mode_ctx[col], b->mode[3], w4);
648         memset(&s->left_mode_ctx[row7], b->mode[3], h4);
649         if (s->filtermode == FILTER_SWITCHABLE && !b->intra) {
650             memset(&s->above_filter_ctx[col], b->filter, w4);
651             memset(&s->left_filter_ctx[row7], b->filter, h4);
652             b->filter = ff_vp9_filter_lut[b->filter];
653         }
654         if (b->bs > BS_8x8) {
655             int mv0 = AV_RN32A(&b->mv[3][0]), mv1 = AV_RN32A(&b->mv[3][1]);
656
657             AV_COPY32(&s->left_mv_ctx[row7 * 2 + 0][0], &b->mv[1][0]);
658             AV_COPY32(&s->left_mv_ctx[row7 * 2 + 0][1], &b->mv[1][1]);
659             AV_WN32A(&s->left_mv_ctx[row7 * 2 + 1][0], mv0);
660             AV_WN32A(&s->left_mv_ctx[row7 * 2 + 1][1], mv1);
661             AV_COPY32(&s->above_mv_ctx[col * 2 + 0][0], &b->mv[2][0]);
662             AV_COPY32(&s->above_mv_ctx[col * 2 + 0][1], &b->mv[2][1]);
663             AV_WN32A(&s->above_mv_ctx[col * 2 + 1][0], mv0);
664             AV_WN32A(&s->above_mv_ctx[col * 2 + 1][1], mv1);
665         } else {
666             int n, mv0 = AV_RN32A(&b->mv[3][0]), mv1 = AV_RN32A(&b->mv[3][1]);
667
668             for (n = 0; n < w4 * 2; n++) {
669                 AV_WN32A(&s->above_mv_ctx[col * 2 + n][0], mv0);
670                 AV_WN32A(&s->above_mv_ctx[col * 2 + n][1], mv1);
671             }
672             for (n = 0; n < h4 * 2; n++) {
673                 AV_WN32A(&s->left_mv_ctx[row7 * 2 + n][0], mv0);
674                 AV_WN32A(&s->left_mv_ctx[row7 * 2 + n][1], mv1);
675             }
676         }
677
678         if (!b->intra) { // FIXME write 0xff or -1 if intra, so we can use this
679                          // as a direct check in above branches
680             int vref = b->ref[b->comp ? s->signbias[s->varcompref[0]] : 0];
681
682             memset(&s->above_ref_ctx[col], vref, w4);
683             memset(&s->left_ref_ctx[row7], vref, h4);
684         }
685     }
686
687     // FIXME kinda ugly
688     for (y = 0; y < h4; y++) {
689         int x, o = (row + y) * s->sb_cols * 8 + col;
690         VP9MVRefPair *mv = &s->frames[CUR_FRAME].mv[o];
691
692         if (b->intra) {
693             for (x = 0; x < w4; x++) {
694                 mv[x].ref[0] =
695                 mv[x].ref[1] = -1;
696             }
697         } else if (b->comp) {
698             for (x = 0; x < w4; x++) {
699                 mv[x].ref[0] = b->ref[0];
700                 mv[x].ref[1] = b->ref[1];
701                 AV_COPY32(&mv[x].mv[0], &b->mv[3][0]);
702                 AV_COPY32(&mv[x].mv[1], &b->mv[3][1]);
703             }
704         } else {
705             for (x = 0; x < w4; x++) {
706                 mv[x].ref[0] = b->ref[0];
707                 mv[x].ref[1] = -1;
708                 AV_COPY32(&mv[x].mv[0], &b->mv[3][0]);
709             }
710         }
711     }
712 }
713
714 // FIXME remove tx argument, and merge cnt/eob arguments?
715 static int decode_block_coeffs(VP56RangeCoder *c, int16_t *coef, int n_coeffs,
716                                enum TxfmMode tx, unsigned (*cnt)[6][3],
717                                unsigned (*eob)[6][2], uint8_t(*p)[6][11],
718                                int nnz, const int16_t *scan,
719                                const int16_t(*nb)[2],
720                                const int16_t *band_counts, const int16_t *qmul)
721 {
722     int i = 0, band = 0, band_left = band_counts[band];
723     uint8_t *tp = p[0][nnz];
724     uint8_t cache[1024];
725
726     do {
727         int val, rc;
728
729         val = vp56_rac_get_prob_branchy(c, tp[0]); // eob
730         eob[band][nnz][val]++;
731         if (!val)
732             break;
733
734 skip_eob:
735         if (!vp56_rac_get_prob_branchy(c, tp[1])) { // zero
736             cnt[band][nnz][0]++;
737             if (!--band_left)
738                 band_left = band_counts[++band];
739             cache[scan[i]] = 0;
740             nnz            = (1 + cache[nb[i][0]] + cache[nb[i][1]]) >> 1;
741             tp             = p[band][nnz];
742             if (++i == n_coeffs)
743                 break;  //invalid input; blocks should end with EOB
744             goto skip_eob;
745         }
746
747         rc = scan[i];
748         if (!vp56_rac_get_prob_branchy(c, tp[2])) { // one
749             cnt[band][nnz][1]++;
750             val       = 1;
751             cache[rc] = 1;
752         } else {
753             // fill in p[3-10] (model fill) - only once per frame for each pos
754             if (!tp[3])
755                 memcpy(&tp[3], ff_vp9_model_pareto8[tp[2]], 8);
756
757             cnt[band][nnz][2]++;
758             if (!vp56_rac_get_prob_branchy(c, tp[3])) { // 2, 3, 4
759                 if (!vp56_rac_get_prob_branchy(c, tp[4])) {
760                     cache[rc] = val = 2;
761                 } else {
762                     val       = 3 + vp56_rac_get_prob(c, tp[5]);
763                     cache[rc] = 3;
764                 }
765             } else if (!vp56_rac_get_prob_branchy(c, tp[6])) { // cat1/2
766                 cache[rc] = 4;
767                 if (!vp56_rac_get_prob_branchy(c, tp[7])) {
768                     val  =  vp56_rac_get_prob(c, 159) + 5;
769                 } else {
770                     val  = (vp56_rac_get_prob(c, 165) << 1) + 7;
771                     val +=  vp56_rac_get_prob(c, 145);
772                 }
773             } else { // cat 3-6
774                 cache[rc] = 5;
775                 if (!vp56_rac_get_prob_branchy(c, tp[8])) {
776                     if (!vp56_rac_get_prob_branchy(c, tp[9])) {
777                         val  = (vp56_rac_get_prob(c, 173) << 2) + 11;
778                         val += (vp56_rac_get_prob(c, 148) << 1);
779                         val +=  vp56_rac_get_prob(c, 140);
780                     } else {
781                         val  = (vp56_rac_get_prob(c, 176) << 3) + 19;
782                         val += (vp56_rac_get_prob(c, 155) << 2);
783                         val += (vp56_rac_get_prob(c, 140) << 1);
784                         val +=  vp56_rac_get_prob(c, 135);
785                     }
786                 } else if (!vp56_rac_get_prob_branchy(c, tp[10])) {
787                     val  = (vp56_rac_get_prob(c, 180) << 4) + 35;
788                     val += (vp56_rac_get_prob(c, 157) << 3);
789                     val += (vp56_rac_get_prob(c, 141) << 2);
790                     val += (vp56_rac_get_prob(c, 134) << 1);
791                     val +=  vp56_rac_get_prob(c, 130);
792                 } else {
793                     val  = (vp56_rac_get_prob(c, 254) << 13) + 67;
794                     val += (vp56_rac_get_prob(c, 254) << 12);
795                     val += (vp56_rac_get_prob(c, 254) << 11);
796                     val += (vp56_rac_get_prob(c, 252) << 10);
797                     val += (vp56_rac_get_prob(c, 249) << 9);
798                     val += (vp56_rac_get_prob(c, 243) << 8);
799                     val += (vp56_rac_get_prob(c, 230) << 7);
800                     val += (vp56_rac_get_prob(c, 196) << 6);
801                     val += (vp56_rac_get_prob(c, 177) << 5);
802                     val += (vp56_rac_get_prob(c, 153) << 4);
803                     val += (vp56_rac_get_prob(c, 140) << 3);
804                     val += (vp56_rac_get_prob(c, 133) << 2);
805                     val += (vp56_rac_get_prob(c, 130) << 1);
806                     val +=  vp56_rac_get_prob(c, 129);
807                 }
808             }
809         }
810         if (!--band_left)
811             band_left = band_counts[++band];
812         if (tx == TX_32X32) // FIXME slow
813             coef[rc] = ((vp8_rac_get(c) ? -val : val) * qmul[!!i]) / 2;
814         else
815             coef[rc] = (vp8_rac_get(c) ? -val : val) * qmul[!!i];
816         nnz = (1 + cache[nb[i][0]] + cache[nb[i][1]]) >> 1;
817         tp  = p[band][nnz];
818     } while (++i < n_coeffs);
819
820     return i;
821 }
822
823 static int decode_coeffs(AVCodecContext *avctx)
824 {
825     VP9Context *s = avctx->priv_data;
826     VP9Block *b = s->b;
827     int row = b->row, col = b->col;
828     uint8_t (*p)[6][11] = s->prob.coef[b->tx][0 /* y */][!b->intra];
829     unsigned (*c)[6][3] = s->counts.coef[b->tx][0 /* y */][!b->intra];
830     unsigned (*e)[6][2] = s->counts.eob[b->tx][0 /* y */][!b->intra];
831     int w4 = bwh_tab[1][b->bs][0] << 1, h4 = bwh_tab[1][b->bs][1] << 1;
832     int end_x = FFMIN(2 * (s->cols - col), w4);
833     int end_y = FFMIN(2 * (s->rows - row), h4);
834     int n, pl, x, y, step1d = 1 << b->tx, step = 1 << (b->tx * 2);
835     int uvstep1d = 1 << b->uvtx, uvstep = 1 << (b->uvtx * 2), ret;
836     int16_t (*qmul)[2] = s->segmentation.feat[b->seg_id].qmul;
837     int tx = 4 * s->lossless + b->tx;
838     const int16_t **yscans = ff_vp9_scans[tx];
839     const int16_t (**ynbs)[2] = ff_vp9_scans_nb[tx];
840     const int16_t *uvscan = ff_vp9_scans[b->uvtx][DCT_DCT];
841     const int16_t (*uvnb)[2] = ff_vp9_scans_nb[b->uvtx][DCT_DCT];
842     uint8_t *a = &s->above_y_nnz_ctx[col * 2];
843     uint8_t *l = &s->left_y_nnz_ctx[(row & 7) << 1];
844     static const int16_t band_counts[4][8] = {
845         { 1, 2, 3, 4,  3,   16 - 13, 0 },
846         { 1, 2, 3, 4, 11,   64 - 21, 0 },
847         { 1, 2, 3, 4, 11,  256 - 21, 0 },
848         { 1, 2, 3, 4, 11, 1024 - 21, 0 },
849     };
850     const int16_t *y_band_counts  = band_counts[b->tx];
851     const int16_t *uv_band_counts = band_counts[b->uvtx];
852
853     /* y tokens */
854     if (b->tx > TX_4X4) { // FIXME slow
855         for (y = 0; y < end_y; y += step1d)
856             for (x = 1; x < step1d; x++)
857                 l[y] |= l[y + x];
858         for (x = 0; x < end_x; x += step1d)
859             for (y = 1; y < step1d; y++)
860                 a[x] |= a[x + y];
861     }
862     for (n = 0, y = 0; y < end_y; y += step1d) {
863         for (x = 0; x < end_x; x += step1d, n += step) {
864             enum TxfmType txtp = ff_vp9_intra_txfm_type[b->mode[b->tx == TX_4X4 &&
865                                                                 b->bs > BS_8x8 ?
866                                                                 n : 0]];
867             int nnz = a[x] + l[y];
868             if ((ret = decode_block_coeffs(&s->c, s->block + 16 * n, 16 * step,
869                                            b->tx, c, e, p, nnz, yscans[txtp],
870                                            ynbs[txtp], y_band_counts,
871                                            qmul[0])) < 0)
872                 return ret;
873             a[x] = l[y] = !!ret;
874             if (b->tx > TX_8X8)
875                 AV_WN16A(&s->eob[n], ret);
876             else
877                 s->eob[n] = ret;
878         }
879     }
880     if (b->tx > TX_4X4) { // FIXME slow
881         for (y = 0; y < end_y; y += step1d)
882             memset(&l[y + 1], l[y], FFMIN(end_y - y - 1, step1d - 1));
883         for (x = 0; x < end_x; x += step1d)
884             memset(&a[x + 1], a[x], FFMIN(end_x - x - 1, step1d - 1));
885     }
886
887     p = s->prob.coef[b->uvtx][1 /* uv */][!b->intra];
888     c = s->counts.coef[b->uvtx][1 /* uv */][!b->intra];
889     e = s->counts.eob[b->uvtx][1 /* uv */][!b->intra];
890     w4    >>= 1;
891     h4    >>= 1;
892     end_x >>= 1;
893     end_y >>= 1;
894     for (pl = 0; pl < 2; pl++) {
895         a = &s->above_uv_nnz_ctx[pl][col];
896         l = &s->left_uv_nnz_ctx[pl][row & 7];
897         if (b->uvtx > TX_4X4) { // FIXME slow
898             for (y = 0; y < end_y; y += uvstep1d)
899                 for (x = 1; x < uvstep1d; x++)
900                     l[y] |= l[y + x];
901             for (x = 0; x < end_x; x += uvstep1d)
902                 for (y = 1; y < uvstep1d; y++)
903                     a[x] |= a[x + y];
904         }
905         for (n = 0, y = 0; y < end_y; y += uvstep1d) {
906             for (x = 0; x < end_x; x += uvstep1d, n += uvstep) {
907                 int nnz = a[x] + l[y];
908                 if ((ret = decode_block_coeffs(&s->c, s->uvblock[pl] + 16 * n,
909                                                16 * uvstep, b->uvtx, c, e, p,
910                                                nnz, uvscan, uvnb,
911                                                uv_band_counts, qmul[1])) < 0)
912                     return ret;
913                 a[x] = l[y] = !!ret;
914                 if (b->uvtx > TX_8X8)
915                     AV_WN16A(&s->uveob[pl][n], ret);
916                 else
917                     s->uveob[pl][n] = ret;
918             }
919         }
920         if (b->uvtx > TX_4X4) { // FIXME slow
921             for (y = 0; y < end_y; y += uvstep1d)
922                 memset(&l[y + 1], l[y], FFMIN(end_y - y - 1, uvstep1d - 1));
923             for (x = 0; x < end_x; x += uvstep1d)
924                 memset(&a[x + 1], a[x], FFMIN(end_x - x - 1, uvstep1d - 1));
925         }
926     }
927
928     return 0;
929 }
930
931 static av_always_inline int check_intra_mode(VP9Context *s, int mode,
932                                              uint8_t **a,
933                                              uint8_t *dst_edge,
934                                              ptrdiff_t stride_edge,
935                                              uint8_t *dst_inner,
936                                              ptrdiff_t stride_inner,
937                                              uint8_t *l, int col, int x, int w,
938                                              int row, int y, enum TxfmMode tx,
939                                              int p)
940 {
941     int have_top   = row > 0 || y > 0;
942     int have_left  = col > s->tiling.tile_col_start || x > 0;
943     int have_right = x < w - 1;
944     static const uint8_t mode_conv[10][2 /* have_left */][2 /* have_top */] = {
945         [VERT_PRED]            = { { DC_127_PRED,          VERT_PRED            },
946                                    { DC_127_PRED,          VERT_PRED            } },
947         [HOR_PRED]             = { { DC_129_PRED,          DC_129_PRED          },
948                                    { HOR_PRED,             HOR_PRED             } },
949         [DC_PRED]              = { { DC_128_PRED,          TOP_DC_PRED          },
950                                    { LEFT_DC_PRED,         DC_PRED              } },
951         [DIAG_DOWN_LEFT_PRED]  = { { DC_127_PRED,          DIAG_DOWN_LEFT_PRED  },
952                                    { DC_127_PRED,          DIAG_DOWN_LEFT_PRED  } },
953         [DIAG_DOWN_RIGHT_PRED] = { { DIAG_DOWN_RIGHT_PRED, DIAG_DOWN_RIGHT_PRED },
954                                    { DIAG_DOWN_RIGHT_PRED, DIAG_DOWN_RIGHT_PRED } },
955         [VERT_RIGHT_PRED]      = { { VERT_RIGHT_PRED,      VERT_RIGHT_PRED      },
956                                    { VERT_RIGHT_PRED,      VERT_RIGHT_PRED      } },
957         [HOR_DOWN_PRED]        = { { HOR_DOWN_PRED,        HOR_DOWN_PRED        },
958                                    { HOR_DOWN_PRED,        HOR_DOWN_PRED        } },
959         [VERT_LEFT_PRED]       = { { DC_127_PRED,          VERT_LEFT_PRED       },
960                                    { DC_127_PRED,          VERT_LEFT_PRED       } },
961         [HOR_UP_PRED]          = { { DC_129_PRED,          DC_129_PRED          },
962                                    { HOR_UP_PRED,          HOR_UP_PRED          } },
963         [TM_VP8_PRED]          = { { DC_129_PRED,          VERT_PRED            },
964                                    { HOR_PRED,             TM_VP8_PRED          } },
965     };
966     static const struct {
967         uint8_t needs_left:1;
968         uint8_t needs_top:1;
969         uint8_t needs_topleft:1;
970         uint8_t needs_topright:1;
971     } edges[N_INTRA_PRED_MODES] = {
972         [VERT_PRED]            = { .needs_top  = 1 },
973         [HOR_PRED]             = { .needs_left = 1 },
974         [DC_PRED]              = { .needs_top  = 1, .needs_left = 1 },
975         [DIAG_DOWN_LEFT_PRED]  = { .needs_top  = 1, .needs_topright = 1 },
976         [DIAG_DOWN_RIGHT_PRED] = { .needs_left = 1, .needs_top = 1,
977                                    .needs_topleft = 1 },
978         [VERT_RIGHT_PRED]      = { .needs_left = 1, .needs_top = 1,
979                                    .needs_topleft = 1 },
980         [HOR_DOWN_PRED]        = { .needs_left = 1, .needs_top = 1,
981                                    .needs_topleft = 1 },
982         [VERT_LEFT_PRED]       = { .needs_top  = 1, .needs_topright = 1 },
983         [HOR_UP_PRED]          = { .needs_left = 1 },
984         [TM_VP8_PRED]          = { .needs_left = 1, .needs_top = 1,
985                                    .needs_topleft = 1 },
986         [LEFT_DC_PRED]         = { .needs_left = 1 },
987         [TOP_DC_PRED]          = { .needs_top  = 1 },
988         [DC_128_PRED]          = { 0 },
989         [DC_127_PRED]          = { 0 },
990         [DC_129_PRED]          = { 0 }
991     };
992
993     av_assert2(mode >= 0 && mode < 10);
994     mode = mode_conv[mode][have_left][have_top];
995     if (edges[mode].needs_top) {
996         uint8_t *top = NULL, *topleft = NULL;
997         int n_px_need = 4 << tx, n_px_have = (((s->cols - col) << !p) - x) * 4;
998         int n_px_need_tr = 0;
999
1000         if (tx == TX_4X4 && edges[mode].needs_topright && have_right)
1001             n_px_need_tr = 4;
1002
1003         // if top of sb64-row, use s->intra_pred_data[] instead of
1004         // dst[-stride] for intra prediction (it contains pre- instead of
1005         // post-loopfilter data)
1006         if (have_top) {
1007             top = !(row & 7) && !y ?
1008                   s->intra_pred_data[p] + col * (8 >> !!p) + x * 4 :
1009                   y == 0 ? &dst_edge[-stride_edge] : &dst_inner[-stride_inner];
1010             if (have_left)
1011                 topleft = !(row & 7) && !y ?
1012                           s->intra_pred_data[p] + col * (8 >> !!p) + x * 4 :
1013                           y == 0 || x == 0 ? &dst_edge[-stride_edge] :
1014                           &dst_inner[-stride_inner];
1015         }
1016
1017         if (have_top &&
1018             (!edges[mode].needs_topleft || (have_left && top == topleft)) &&
1019             (tx != TX_4X4 || !edges[mode].needs_topright || have_right) &&
1020             n_px_need + n_px_need_tr <= n_px_have) {
1021             *a = top;
1022         } else {
1023             if (have_top) {
1024                 if (n_px_need <= n_px_have) {
1025                     memcpy(*a, top, n_px_need);
1026                 } else {
1027                     memcpy(*a, top, n_px_have);
1028                     memset(&(*a)[n_px_have], (*a)[n_px_have - 1],
1029                            n_px_need - n_px_have);
1030                 }
1031             } else {
1032                 memset(*a, 127, n_px_need);
1033             }
1034             if (edges[mode].needs_topleft) {
1035                 if (have_left && have_top)
1036                     (*a)[-1] = topleft[-1];
1037                 else
1038                     (*a)[-1] = have_top ? 129 : 127;
1039             }
1040             if (tx == TX_4X4 && edges[mode].needs_topright) {
1041                 if (have_top && have_right &&
1042                     n_px_need + n_px_need_tr <= n_px_have) {
1043                     memcpy(&(*a)[4], &top[4], 4);
1044                 } else {
1045                     memset(&(*a)[4], (*a)[3], 4);
1046                 }
1047             }
1048         }
1049     }
1050     if (edges[mode].needs_left) {
1051         if (have_left) {
1052             int i;
1053             int n_px_need = 4 << tx;
1054             int n_px_have = (((s->rows - row) << !p) - y) * 4;
1055             uint8_t *dst     = x == 0 ? dst_edge : dst_inner;
1056             ptrdiff_t stride = x == 0 ? stride_edge : stride_inner;
1057
1058             if (n_px_need <= n_px_have) {
1059                 for (i = 0; i < n_px_need; i++)
1060                     l[i] = dst[i * stride - 1];
1061             } else {
1062                 for (i = 0; i < n_px_have; i++)
1063                     l[i] = dst[i * stride - 1];
1064                 memset(&l[i], l[i - 1], n_px_need - n_px_have);
1065             }
1066         } else {
1067             memset(l, 129, 4 << tx);
1068         }
1069     }
1070
1071     return mode;
1072 }
1073
1074 static void intra_recon(AVCodecContext *avctx, ptrdiff_t y_off, ptrdiff_t uv_off)
1075 {
1076     VP9Context *s = avctx->priv_data;
1077     VP9Block *b = s->b;
1078     AVFrame *f = s->frames[CUR_FRAME].tf.f;
1079     int row = b->row, col = b->col;
1080     int w4 = bwh_tab[1][b->bs][0] << 1, step1d = 1 << b->tx, n;
1081     int h4 = bwh_tab[1][b->bs][1] << 1, x, y, step = 1 << (b->tx * 2);
1082     int end_x = FFMIN(2 * (s->cols - col), w4);
1083     int end_y = FFMIN(2 * (s->rows - row), h4);
1084     int tx = 4 * s->lossless + b->tx, uvtx = b->uvtx + 4 * s->lossless;
1085     int uvstep1d = 1 << b->uvtx, p;
1086     uint8_t *dst = b->dst[0], *dst_r = f->data[0] + y_off;
1087
1088     for (n = 0, y = 0; y < end_y; y += step1d) {
1089         uint8_t *ptr = dst, *ptr_r = dst_r;
1090         for (x = 0; x < end_x;
1091              x += step1d, ptr += 4 * step1d, ptr_r += 4 * step1d, n += step) {
1092             int mode = b->mode[b->bs > BS_8x8 && b->tx == TX_4X4 ?
1093                                y * 2 + x : 0];
1094             LOCAL_ALIGNED_16(uint8_t, a_buf, [48]);
1095             uint8_t *a = &a_buf[16], l[32];
1096             enum TxfmType txtp = ff_vp9_intra_txfm_type[mode];
1097             int eob = b->tx > TX_8X8 ? AV_RN16A(&s->eob[n]) : s->eob[n];
1098
1099             mode = check_intra_mode(s, mode, &a, ptr_r,
1100                                     f->linesize[0],
1101                                     ptr, b->y_stride, l,
1102                                     col, x, w4, row, y, b->tx, 0);
1103             s->dsp.intra_pred[b->tx][mode](ptr, b->y_stride, l, a);
1104             if (eob)
1105                 s->dsp.itxfm_add[tx][txtp](ptr, b->y_stride,
1106                                            s->block + 16 * n, eob);
1107         }
1108         dst_r += 4 * f->linesize[0] * step1d;
1109         dst   += 4 * b->y_stride * step1d;
1110     }
1111
1112     // U/V
1113     h4    >>= 1;
1114     w4    >>= 1;
1115     end_x >>= 1;
1116     end_y >>= 1;
1117     step    = 1 << (b->uvtx * 2);
1118     for (p = 0; p < 2; p++) {
1119         dst   = b->dst[1 + p];
1120         dst_r = f->data[1 + p] + uv_off;
1121         for (n = 0, y = 0; y < end_y; y += uvstep1d) {
1122             uint8_t *ptr = dst, *ptr_r = dst_r;
1123             for (x = 0; x < end_x;
1124                  x += uvstep1d, ptr += 4 * uvstep1d,
1125                  ptr_r += 4 * uvstep1d, n += step) {
1126                 int mode = b->uvmode;
1127                 LOCAL_ALIGNED_16(uint8_t, a_buf, [48]);
1128                 uint8_t *a = &a_buf[16], l[32];
1129                 int eob    = b->uvtx > TX_8X8 ? AV_RN16A(&s->uveob[p][n])
1130                                               : s->uveob[p][n];
1131
1132                 mode = check_intra_mode(s, mode, &a, ptr_r,
1133                                         f->linesize[1],
1134                                         ptr, b->uv_stride, l,
1135                                         col, x, w4, row, y, b->uvtx, p + 1);
1136                 s->dsp.intra_pred[b->uvtx][mode](ptr, b->uv_stride, l, a);
1137                 if (eob)
1138                     s->dsp.itxfm_add[uvtx][DCT_DCT](ptr, b->uv_stride,
1139                                                     s->uvblock[p] + 16 * n,
1140                                                     eob);
1141             }
1142             dst_r += 4 * uvstep1d * f->linesize[1];
1143             dst   += 4 * uvstep1d * b->uv_stride;
1144         }
1145     }
1146 }
1147
1148 static av_always_inline void mc_luma_dir(VP9Context *s, vp9_mc_func(*mc)[2],
1149                                          uint8_t *dst, ptrdiff_t dst_stride,
1150                                          const uint8_t *ref,
1151                                          ptrdiff_t ref_stride,
1152                                          ptrdiff_t y, ptrdiff_t x,
1153                                          const VP56mv *mv,
1154                                          int bw, int bh, int w, int h)
1155 {
1156     int mx = mv->x, my = mv->y;
1157
1158     y   += my >> 3;
1159     x   += mx >> 3;
1160     ref += y * ref_stride + x;
1161     mx  &= 7;
1162     my  &= 7;
1163     // FIXME bilinear filter only needs 0/1 pixels, not 3/4
1164     if (x < !!mx * 3 || y < !!my * 3 ||
1165         x + !!mx * 4 > w - bw || y + !!my * 4 > h - bh) {
1166         s->vdsp.emulated_edge_mc(s->edge_emu_buffer,
1167                                  ref - !!my * 3 * ref_stride - !!mx * 3,
1168                                  80,
1169                                  ref_stride,
1170                                  bw + !!mx * 7, bh + !!my * 7,
1171                                  x - !!mx * 3, y - !!my * 3, w, h);
1172         ref        = s->edge_emu_buffer + !!my * 3 * 80 + !!mx * 3;
1173         ref_stride = 80;
1174     }
1175     mc[!!mx][!!my](dst, ref, dst_stride, ref_stride, bh, mx << 1, my << 1);
1176 }
1177
1178 static av_always_inline void mc_chroma_dir(VP9Context *s, vp9_mc_func(*mc)[2],
1179                                            uint8_t *dst_u, uint8_t *dst_v,
1180                                            ptrdiff_t dst_stride,
1181                                            const uint8_t *ref_u,
1182                                            ptrdiff_t src_stride_u,
1183                                            const uint8_t *ref_v,
1184                                            ptrdiff_t src_stride_v,
1185                                            ptrdiff_t y, ptrdiff_t x,
1186                                            const VP56mv *mv,
1187                                            int bw, int bh, int w, int h)
1188 {
1189     int mx = mv->x, my = mv->y;
1190
1191     y     += my >> 4;
1192     x     += mx >> 4;
1193     ref_u += y * src_stride_u + x;
1194     ref_v += y * src_stride_v + x;
1195     mx    &= 15;
1196     my    &= 15;
1197     // FIXME bilinear filter only needs 0/1 pixels, not 3/4
1198     if (x < !!mx * 3 || y < !!my * 3 ||
1199         x + !!mx * 4 > w - bw || y + !!my * 4 > h - bh) {
1200         s->vdsp.emulated_edge_mc(s->edge_emu_buffer,
1201                                  ref_u - !!my * 3 * src_stride_u - !!mx * 3,
1202                                  80,
1203                                  src_stride_u,
1204                                  bw + !!mx * 7, bh + !!my * 7,
1205                                  x - !!mx * 3, y - !!my * 3, w, h);
1206         ref_u = s->edge_emu_buffer + !!my * 3 * 80 + !!mx * 3;
1207         mc[!!mx][!!my](dst_u, ref_u, dst_stride, 80, bh, mx, my);
1208
1209         s->vdsp.emulated_edge_mc(s->edge_emu_buffer,
1210                                  ref_v - !!my * 3 * src_stride_v - !!mx * 3,
1211                                  80,
1212                                  src_stride_v,
1213                                  bw + !!mx * 7, bh + !!my * 7,
1214                                  x - !!mx * 3, y - !!my * 3, w, h);
1215         ref_v = s->edge_emu_buffer + !!my * 3 * 80 + !!mx * 3;
1216         mc[!!mx][!!my](dst_v, ref_v, dst_stride, 80, bh, mx, my);
1217     } else {
1218         mc[!!mx][!!my](dst_u, ref_u, dst_stride, src_stride_u, bh, mx, my);
1219         mc[!!mx][!!my](dst_v, ref_v, dst_stride, src_stride_v, bh, mx, my);
1220     }
1221 }
1222
1223 static int inter_recon(AVCodecContext *avctx)
1224 {
1225     static const uint8_t bwlog_tab[2][N_BS_SIZES] = {
1226         { 0, 0, 1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4 },
1227         { 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4, 4, 4 },
1228     };
1229     VP9Context *s = avctx->priv_data;
1230     VP9Block *b = s->b;
1231     int row = b->row, col = b->col;
1232
1233     ThreadFrame *tref1 = &s->refs[s->refidx[b->ref[0]]];
1234     ThreadFrame *tref2 = b->comp ? &s->refs[s->refidx[b->ref[1]]] : NULL;
1235     AVFrame      *ref1 = tref1->f;
1236     AVFrame      *ref2 = tref2 ? tref2->f : NULL;
1237
1238     int w = avctx->width, h = avctx->height;
1239     ptrdiff_t ls_y = b->y_stride, ls_uv = b->uv_stride;
1240
1241     if (!ref1->data[0] || (b->comp && !ref2->data[0]))
1242         return AVERROR_INVALIDDATA;
1243
1244     // y inter pred
1245     if (b->bs > BS_8x8) {
1246         if (b->bs == BS_8x4) {
1247             mc_luma_dir(s, s->dsp.mc[3][b->filter][0], b->dst[0], ls_y,
1248                         ref1->data[0], ref1->linesize[0],
1249                         row << 3, col << 3, &b->mv[0][0], 8, 4, w, h);
1250             mc_luma_dir(s, s->dsp.mc[3][b->filter][0],
1251                         b->dst[0] + 4 * ls_y, ls_y,
1252                         ref1->data[0], ref1->linesize[0],
1253                         (row << 3) + 4, col << 3, &b->mv[2][0], 8, 4, w, h);
1254
1255             if (b->comp) {
1256                 mc_luma_dir(s, s->dsp.mc[3][b->filter][1], b->dst[0], ls_y,
1257                             ref2->data[0], ref2->linesize[0],
1258                             row << 3, col << 3, &b->mv[0][1], 8, 4, w, h);
1259                 mc_luma_dir(s, s->dsp.mc[3][b->filter][1],
1260                             b->dst[0] + 4 * ls_y, ls_y,
1261                             ref2->data[0], ref2->linesize[0],
1262                             (row << 3) + 4, col << 3, &b->mv[2][1], 8, 4, w, h);
1263             }
1264         } else if (b->bs == BS_4x8) {
1265             mc_luma_dir(s, s->dsp.mc[4][b->filter][0], b->dst[0], ls_y,
1266                         ref1->data[0], ref1->linesize[0],
1267                         row << 3, col << 3, &b->mv[0][0], 4, 8, w, h);
1268             mc_luma_dir(s, s->dsp.mc[4][b->filter][0], b->dst[0] + 4, ls_y,
1269                         ref1->data[0], ref1->linesize[0],
1270                         row << 3, (col << 3) + 4, &b->mv[1][0], 4, 8, w, h);
1271
1272             if (b->comp) {
1273                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1], b->dst[0], ls_y,
1274                             ref2->data[0], ref2->linesize[0],
1275                             row << 3, col << 3, &b->mv[0][1], 4, 8, w, h);
1276                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1], b->dst[0] + 4, ls_y,
1277                             ref2->data[0], ref2->linesize[0],
1278                             row << 3, (col << 3) + 4, &b->mv[1][1], 4, 8, w, h);
1279             }
1280         } else {
1281             av_assert2(b->bs == BS_4x4);
1282
1283             // FIXME if two horizontally adjacent blocks have the same MV,
1284             // do a w8 instead of a w4 call
1285             mc_luma_dir(s, s->dsp.mc[4][b->filter][0], b->dst[0], ls_y,
1286                         ref1->data[0], ref1->linesize[0],
1287                         row << 3, col << 3, &b->mv[0][0], 4, 4, w, h);
1288             mc_luma_dir(s, s->dsp.mc[4][b->filter][0], b->dst[0] + 4, ls_y,
1289                         ref1->data[0], ref1->linesize[0],
1290                         row << 3, (col << 3) + 4, &b->mv[1][0], 4, 4, w, h);
1291             mc_luma_dir(s, s->dsp.mc[4][b->filter][0],
1292                         b->dst[0] + 4 * ls_y, ls_y,
1293                         ref1->data[0], ref1->linesize[0],
1294                         (row << 3) + 4, col << 3, &b->mv[2][0], 4, 4, w, h);
1295             mc_luma_dir(s, s->dsp.mc[4][b->filter][0],
1296                         b->dst[0] + 4 * ls_y + 4, ls_y,
1297                         ref1->data[0], ref1->linesize[0],
1298                         (row << 3) + 4, (col << 3) + 4, &b->mv[3][0], 4, 4, w, h);
1299
1300             if (b->comp) {
1301                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1], b->dst[0], ls_y,
1302                             ref2->data[0], ref2->linesize[0],
1303                             row << 3, col << 3, &b->mv[0][1], 4, 4, w, h);
1304                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1], b->dst[0] + 4, ls_y,
1305                             ref2->data[0], ref2->linesize[0],
1306                             row << 3, (col << 3) + 4, &b->mv[1][1], 4, 4, w, h);
1307                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1],
1308                             b->dst[0] + 4 * ls_y, ls_y,
1309                             ref2->data[0], ref2->linesize[0],
1310                             (row << 3) + 4, col << 3, &b->mv[2][1], 4, 4, w, h);
1311                 mc_luma_dir(s, s->dsp.mc[4][b->filter][1],
1312                             b->dst[0] + 4 * ls_y + 4, ls_y,
1313                             ref2->data[0], ref2->linesize[0],
1314                             (row << 3) + 4, (col << 3) + 4, &b->mv[3][1], 4, 4, w, h);
1315             }
1316         }
1317     } else {
1318         int bwl = bwlog_tab[0][b->bs];
1319         int bw  = bwh_tab[0][b->bs][0] * 4;
1320         int bh  = bwh_tab[0][b->bs][1] * 4;
1321
1322         mc_luma_dir(s, s->dsp.mc[bwl][b->filter][0], b->dst[0], ls_y,
1323                     ref1->data[0], ref1->linesize[0],
1324                     row << 3, col << 3, &b->mv[0][0], bw, bh, w, h);
1325
1326         if (b->comp)
1327             mc_luma_dir(s, s->dsp.mc[bwl][b->filter][1], b->dst[0], ls_y,
1328                         ref2->data[0], ref2->linesize[0],
1329                         row << 3, col << 3, &b->mv[0][1], bw, bh, w, h);
1330     }
1331
1332     // uv inter pred
1333     {
1334         int bwl = bwlog_tab[1][b->bs];
1335         int bw  = bwh_tab[1][b->bs][0] * 4, bh = bwh_tab[1][b->bs][1] * 4;
1336         VP56mv mvuv;
1337
1338         w = (w + 1) >> 1;
1339         h = (h + 1) >> 1;
1340         if (b->bs > BS_8x8) {
1341             mvuv.x = ROUNDED_DIV(b->mv[0][0].x + b->mv[1][0].x +
1342                                  b->mv[2][0].x + b->mv[3][0].x, 4);
1343             mvuv.y = ROUNDED_DIV(b->mv[0][0].y + b->mv[1][0].y +
1344                                  b->mv[2][0].y + b->mv[3][0].y, 4);
1345         } else {
1346             mvuv = b->mv[0][0];
1347         }
1348
1349         mc_chroma_dir(s, s->dsp.mc[bwl][b->filter][0],
1350                       b->dst[1], b->dst[2], ls_uv,
1351                       ref1->data[1], ref1->linesize[1],
1352                       ref1->data[2], ref1->linesize[2],
1353                       row << 2, col << 2, &mvuv, bw, bh, w, h);
1354
1355         if (b->comp) {
1356             if (b->bs > BS_8x8) {
1357                 mvuv.x = ROUNDED_DIV(b->mv[0][1].x + b->mv[1][1].x +
1358                                      b->mv[2][1].x + b->mv[3][1].x, 4);
1359                 mvuv.y = ROUNDED_DIV(b->mv[0][1].y + b->mv[1][1].y +
1360                                      b->mv[2][1].y + b->mv[3][1].y, 4);
1361             } else {
1362                 mvuv = b->mv[0][1];
1363             }
1364             mc_chroma_dir(s, s->dsp.mc[bwl][b->filter][1],
1365                           b->dst[1], b->dst[2], ls_uv,
1366                           ref2->data[1], ref2->linesize[1],
1367                           ref2->data[2], ref2->linesize[2],
1368                           row << 2, col << 2, &mvuv, bw, bh, w, h);
1369         }
1370     }
1371
1372     if (!b->skip) {
1373         /* mostly copied intra_reconn() */
1374
1375         int w4 = bwh_tab[1][b->bs][0] << 1, step1d = 1 << b->tx, n;
1376         int h4 = bwh_tab[1][b->bs][1] << 1, x, y, step = 1 << (b->tx * 2);
1377         int end_x = FFMIN(2 * (s->cols - col), w4);
1378         int end_y = FFMIN(2 * (s->rows - row), h4);
1379         int tx = 4 * s->lossless + b->tx, uvtx = b->uvtx + 4 * s->lossless;
1380         int uvstep1d = 1 << b->uvtx, p;
1381         uint8_t *dst = b->dst[0];
1382
1383         // y itxfm add
1384         for (n = 0, y = 0; y < end_y; y += step1d) {
1385             uint8_t *ptr = dst;
1386             for (x = 0; x < end_x; x += step1d, ptr += 4 * step1d, n += step) {
1387                 int eob = b->tx > TX_8X8 ? AV_RN16A(&s->eob[n]) : s->eob[n];
1388
1389                 if (eob)
1390                     s->dsp.itxfm_add[tx][DCT_DCT](ptr, b->y_stride,
1391                                                   s->block + 16 * n, eob);
1392             }
1393             dst += 4 * b->y_stride * step1d;
1394         }
1395
1396         // uv itxfm add
1397         h4    >>= 1;
1398         w4    >>= 1;
1399         end_x >>= 1;
1400         end_y >>= 1;
1401         step    = 1 << (b->uvtx * 2);
1402         for (p = 0; p < 2; p++) {
1403             dst = b->dst[p + 1];
1404             for (n = 0, y = 0; y < end_y; y += uvstep1d) {
1405                 uint8_t *ptr = dst;
1406                 for (x = 0; x < end_x; x += uvstep1d, ptr += 4 * uvstep1d, n += step) {
1407                     int eob = b->uvtx > TX_8X8 ? AV_RN16A(&s->uveob[p][n])
1408                                                : s->uveob[p][n];
1409                     if (eob)
1410                         s->dsp.itxfm_add[uvtx][DCT_DCT](ptr, b->uv_stride,
1411                                                         s->uvblock[p] + 16 * n, eob);
1412                 }
1413                 dst += 4 * uvstep1d * b->uv_stride;
1414             }
1415         }
1416     }
1417     return 0;
1418 }
1419
1420 static av_always_inline void mask_edges(VP9Filter *lflvl, int is_uv,
1421                                         int row_and_7, int col_and_7,
1422                                         int w, int h, int col_end, int row_end,
1423                                         enum TxfmMode tx, int skip_inter)
1424 {
1425     // FIXME I'm pretty sure all loops can be replaced by a single LUT if
1426     // we make VP9Filter.mask uint64_t (i.e. row/col all single variable)
1427     // and make the LUT 5-indexed (bl, bp, is_uv, tx and row/col), and then
1428     // use row_and_7/col_and_7 as shifts (1*col_and_7+8*row_and_7)
1429
1430     // the intended behaviour of the vp9 loopfilter is to work on 8-pixel
1431     // edges. This means that for UV, we work on two subsampled blocks at
1432     // a time, and we only use the topleft block's mode information to set
1433     // things like block strength. Thus, for any block size smaller than
1434     // 16x16, ignore the odd portion of the block.
1435     if (tx == TX_4X4 && is_uv) {
1436         if (h == 1) {
1437             if (row_and_7 & 1)
1438                 return;
1439             if (!row_end)
1440                 h += 1;
1441         }
1442         if (w == 1) {
1443             if (col_and_7 & 1)
1444                 return;
1445             if (!col_end)
1446                 w += 1;
1447         }
1448     }
1449
1450     if (tx == TX_4X4 && !skip_inter) {
1451         int t = 1 << col_and_7, m_col = (t << w) - t, y;
1452         int m_col_odd = (t << (w - 1)) - t;
1453
1454         // on 32-px edges, use the 8-px wide loopfilter; else, use 4-px wide
1455         if (is_uv) {
1456             int m_row_8 = m_col & 0x01, m_row_4 = m_col - m_row_8;
1457
1458             for (y = row_and_7; y < h + row_and_7; y++) {
1459                 int col_mask_id = 2 - !(y & 7);
1460
1461                 lflvl->mask[is_uv][0][y][1] |= m_row_8;
1462                 lflvl->mask[is_uv][0][y][2] |= m_row_4;
1463                 // for odd lines, if the odd col is not being filtered,
1464                 // skip odd row also:
1465                 // .---. <-- a
1466                 // |   |
1467                 // |___| <-- b
1468                 // ^   ^
1469                 // c   d
1470                 //
1471                 // if a/c are even row/col and b/d are odd, and d is skipped,
1472                 // e.g. right edge of size-66x66.webm, then skip b also (bug)
1473                 if ((col_end & 1) && (y & 1)) {
1474                     lflvl->mask[is_uv][1][y][col_mask_id] |= m_col_odd;
1475                 } else {
1476                     lflvl->mask[is_uv][1][y][col_mask_id] |= m_col;
1477                 }
1478             }
1479         } else {
1480             int m_row_8 = m_col & 0x11, m_row_4 = m_col - m_row_8;
1481
1482             for (y = row_and_7; y < h + row_and_7; y++) {
1483                 int col_mask_id = 2 - !(y & 3);
1484
1485                 lflvl->mask[is_uv][0][y][1]           |= m_row_8; // row edge
1486                 lflvl->mask[is_uv][0][y][2]           |= m_row_4;
1487                 lflvl->mask[is_uv][1][y][col_mask_id] |= m_col; // col edge
1488                 lflvl->mask[is_uv][0][y][3]           |= m_col;
1489                 lflvl->mask[is_uv][1][y][3]           |= m_col;
1490             }
1491         }
1492     } else {
1493         int y, t = 1 << col_and_7, m_col = (t << w) - t;
1494
1495         if (!skip_inter) {
1496             int mask_id = (tx == TX_8X8);
1497             int l2 = tx + is_uv - 1, step1d = 1 << l2;
1498             static const unsigned masks[4] = { 0xff, 0x55, 0x11, 0x01 };
1499             int m_row = m_col & masks[l2];
1500
1501             // at odd UV col/row edges tx16/tx32 loopfilter edges, force
1502             // 8wd loopfilter to prevent going off the visible edge.
1503             if (is_uv && tx > TX_8X8 && (w ^ (w - 1)) == 1) {
1504                 int m_row_16 = ((t << (w - 1)) - t) & masks[l2];
1505                 int m_row_8  = m_row - m_row_16;
1506
1507                 for (y = row_and_7; y < h + row_and_7; y++) {
1508                     lflvl->mask[is_uv][0][y][0] |= m_row_16;
1509                     lflvl->mask[is_uv][0][y][1] |= m_row_8;
1510                 }
1511             } else {
1512                 for (y = row_and_7; y < h + row_and_7; y++)
1513                     lflvl->mask[is_uv][0][y][mask_id] |= m_row;
1514             }
1515
1516             if (is_uv && tx > TX_8X8 && (h ^ (h - 1)) == 1) {
1517                 for (y = row_and_7; y < h + row_and_7 - 1; y += step1d)
1518                     lflvl->mask[is_uv][1][y][0] |= m_col;
1519                 if (y - row_and_7 == h - 1)
1520                     lflvl->mask[is_uv][1][y][1] |= m_col;
1521             } else {
1522                 for (y = row_and_7; y < h + row_and_7; y += step1d)
1523                     lflvl->mask[is_uv][1][y][mask_id] |= m_col;
1524             }
1525         } else if (tx != TX_4X4) {
1526             int mask_id;
1527
1528             mask_id = (tx == TX_8X8) || (is_uv && h == 1);
1529             lflvl->mask[is_uv][1][row_and_7][mask_id] |= m_col;
1530             mask_id = (tx == TX_8X8) || (is_uv && w == 1);
1531             for (y = row_and_7; y < h + row_and_7; y++)
1532                 lflvl->mask[is_uv][0][y][mask_id] |= t;
1533         } else if (is_uv) {
1534             int t8 = t & 0x01, t4 = t - t8;
1535
1536             for (y = row_and_7; y < h + row_and_7; y++) {
1537                 lflvl->mask[is_uv][0][y][2] |= t4;
1538                 lflvl->mask[is_uv][0][y][1] |= t8;
1539             }
1540             lflvl->mask[is_uv][1][row_and_7][2 - !(row_and_7 & 7)] |= m_col;
1541         } else {
1542             int t8 = t & 0x11, t4 = t - t8;
1543
1544             for (y = row_and_7; y < h + row_and_7; y++) {
1545                 lflvl->mask[is_uv][0][y][2] |= t4;
1546                 lflvl->mask[is_uv][0][y][1] |= t8;
1547             }
1548             lflvl->mask[is_uv][1][row_and_7][2 - !(row_and_7 & 3)] |= m_col;
1549         }
1550     }
1551 }
1552
1553 int ff_vp9_decode_block(AVCodecContext *avctx, int row, int col,
1554                         VP9Filter *lflvl, ptrdiff_t yoff, ptrdiff_t uvoff,
1555                         enum BlockLevel bl, enum BlockPartition bp)
1556 {
1557     VP9Context *s = avctx->priv_data;
1558     VP9Block *b = s->b;
1559     AVFrame *f = s->frames[CUR_FRAME].tf.f;
1560     enum BlockSize bs = bl * 3 + bp;
1561     int ret, y, w4 = bwh_tab[1][bs][0], h4 = bwh_tab[1][bs][1], lvl;
1562     int emu[2];
1563
1564     b->row  = row;
1565     b->row7 = row & 7;
1566     b->col  = col;
1567     b->col7 = col & 7;
1568
1569     s->min_mv.x = -(128 + col * 64);
1570     s->min_mv.y = -(128 + row * 64);
1571     s->max_mv.x = 128 + (s->cols - col - w4) * 64;
1572     s->max_mv.y = 128 + (s->rows - row - h4) * 64;
1573
1574     b->bs = bs;
1575     decode_mode(s, b);
1576     b->uvtx = b->tx - (w4 * 2 == (1 << b->tx) || h4 * 2 == (1 << b->tx));
1577
1578     if (!b->skip) {
1579         if ((ret = decode_coeffs(avctx)) < 0)
1580             return ret;
1581     } else {
1582         int pl;
1583
1584         memset(&s->above_y_nnz_ctx[col * 2], 0, w4 * 2);
1585         memset(&s->left_y_nnz_ctx[(row & 7) << 1], 0, h4 * 2);
1586         for (pl = 0; pl < 2; pl++) {
1587             memset(&s->above_uv_nnz_ctx[pl][col], 0, w4);
1588             memset(&s->left_uv_nnz_ctx[pl][row & 7], 0, h4);
1589         }
1590     }
1591
1592     /* Emulated overhangs if the stride of the target buffer can't hold.
1593      * This allows to support emu-edge and so on even if we have large
1594      * block overhangs. */
1595     emu[0] = (col + w4) * 8 > f->linesize[0] ||
1596              (row + h4) > s->rows;
1597     emu[1] = (col + w4) * 4 > f->linesize[1] ||
1598              (row + h4) > s->rows;
1599     if (emu[0]) {
1600         b->dst[0]   = s->tmp_y;
1601         b->y_stride = 64;
1602     } else {
1603         b->dst[0]   = f->data[0] + yoff;
1604         b->y_stride = f->linesize[0];
1605     }
1606     if (emu[1]) {
1607         b->dst[1]    = s->tmp_uv[0];
1608         b->dst[2]    = s->tmp_uv[1];
1609         b->uv_stride = 32;
1610     } else {
1611         b->dst[1]    = f->data[1] + uvoff;
1612         b->dst[2]    = f->data[2] + uvoff;
1613         b->uv_stride = f->linesize[1];
1614     }
1615     if (b->intra) {
1616         intra_recon(avctx, yoff, uvoff);
1617     } else {
1618         if ((ret = inter_recon(avctx)) < 0)
1619             return ret;
1620     }
1621     if (emu[0]) {
1622         int w = FFMIN(s->cols - col, w4) * 8;
1623         int h = FFMIN(s->rows - row, h4) * 8;
1624         int n, o = 0;
1625
1626         for (n = 0; o < w; n++) {
1627             int bw = 64 >> n;
1628
1629             av_assert2(n <= 4);
1630             if (w & bw) {
1631                 s->dsp.mc[n][0][0][0][0](f->data[0] + yoff + o,
1632                                          s->tmp_y + o,
1633                                          f->linesize[0],
1634                                          64, h, 0, 0);
1635                 o += bw;
1636             }
1637         }
1638     }
1639     if (emu[1]) {
1640         int w = FFMIN(s->cols - col, w4) * 4;
1641         int h = FFMIN(s->rows - row, h4) * 4;
1642         int n, o = 0;
1643
1644         for (n = 1; o < w; n++) {
1645             int bw = 64 >> n;
1646
1647             av_assert2(n <= 4);
1648             if (w & bw) {
1649                 s->dsp.mc[n][0][0][0][0](f->data[1] + uvoff + o,
1650                                          s->tmp_uv[0] + o,
1651                                          f->linesize[1],
1652                                          32, h, 0, 0);
1653                 s->dsp.mc[n][0][0][0][0](f->data[2] + uvoff + o,
1654                                          s->tmp_uv[1] + o,
1655                                          f->linesize[2],
1656                                          32, h, 0, 0);
1657                 o += bw;
1658             }
1659         }
1660     }
1661
1662     // pick filter level and find edges to apply filter to
1663     if (s->filter.level &&
1664         (lvl = s->segmentation.feat[b->seg_id].lflvl[b->intra ? 0 : b->ref[0] + 1]
1665                                                     [b->mode[3] != ZEROMV]) > 0) {
1666         int x_end = FFMIN(s->cols - col, w4);
1667         int y_end = FFMIN(s->rows - row, h4);
1668         int skip_inter = !b->intra && b->skip;
1669
1670         for (y = 0; y < h4; y++)
1671             memset(&lflvl->level[((row & 7) + y) * 8 + (col & 7)], lvl, w4);
1672         mask_edges(lflvl, 0, row & 7, col & 7, x_end, y_end, 0, 0, b->tx, skip_inter);
1673         mask_edges(lflvl, 1, row & 7, col & 7, x_end, y_end,
1674                    s->cols & 1 && col + w4 >= s->cols ? s->cols & 7 : 0,
1675                    s->rows & 1 && row + h4 >= s->rows ? s->rows & 7 : 0,
1676                    b->uvtx, skip_inter);
1677
1678         if (!s->filter.lim_lut[lvl]) {
1679             int sharp = s->filter.sharpness;
1680             int limit = lvl;
1681
1682             if (sharp > 0) {
1683                 limit >>= (sharp + 3) >> 2;
1684                 limit   = FFMIN(limit, 9 - sharp);
1685             }
1686             limit = FFMAX(limit, 1);
1687
1688             s->filter.lim_lut[lvl]   = limit;
1689             s->filter.mblim_lut[lvl] = 2 * (lvl + 2) + limit;
1690         }
1691     }
1692
1693     return 0;
1694 }