Split spatial and temporal direct MV generation.
[ffmpeg.git] / libavcodec / h264_direct.c
1 /*
2  * H.26L/H.264/AVC/JVT/14496-10/... direct mb/block decoding
3  * Copyright (c) 2003 Michael Niedermayer <michaelni@gmx.at>
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file libavcodec/h264_direct.c
24  * H.264 / AVC / MPEG4 part10 direct mb/block decoding.
25  * @author Michael Niedermayer <michaelni@gmx.at>
26  */
27
28 #include "internal.h"
29 #include "dsputil.h"
30 #include "avcodec.h"
31 #include "mpegvideo.h"
32 #include "h264.h"
33 #include "rectangle.h"
34
35 //#undef NDEBUG
36 #include <assert.h>
37
38
39 static int get_scale_factor(H264Context * const h, int poc, int poc1, int i){
40     int poc0 = h->ref_list[0][i].poc;
41     int td = av_clip(poc1 - poc0, -128, 127);
42     if(td == 0 || h->ref_list[0][i].long_ref){
43         return 256;
44     }else{
45         int tb = av_clip(poc - poc0, -128, 127);
46         int tx = (16384 + (FFABS(td) >> 1)) / td;
47         return av_clip((tb*tx + 32) >> 6, -1024, 1023);
48     }
49 }
50
51 void ff_h264_direct_dist_scale_factor(H264Context * const h){
52     MpegEncContext * const s = &h->s;
53     const int poc = h->s.current_picture_ptr->field_poc[ s->picture_structure == PICT_BOTTOM_FIELD ];
54     const int poc1 = h->ref_list[1][0].poc;
55     int i, field;
56     for(field=0; field<2; field++){
57         const int poc  = h->s.current_picture_ptr->field_poc[field];
58         const int poc1 = h->ref_list[1][0].field_poc[field];
59         for(i=0; i < 2*h->ref_count[0]; i++)
60             h->dist_scale_factor_field[field][i^field] = get_scale_factor(h, poc, poc1, i+16);
61     }
62
63     for(i=0; i<h->ref_count[0]; i++){
64         h->dist_scale_factor[i] = get_scale_factor(h, poc, poc1, i);
65     }
66 }
67
68 static void fill_colmap(H264Context *h, int map[2][16+32], int list, int field, int colfield, int mbafi){
69     MpegEncContext * const s = &h->s;
70     Picture * const ref1 = &h->ref_list[1][0];
71     int j, old_ref, rfield;
72     int start= mbafi ? 16                      : 0;
73     int end  = mbafi ? 16+2*h->ref_count[0]    : h->ref_count[0];
74     int interl= mbafi || s->picture_structure != PICT_FRAME;
75
76     /* bogus; fills in for missing frames */
77     memset(map[list], 0, sizeof(map[list]));
78
79     for(rfield=0; rfield<2; rfield++){
80         for(old_ref=0; old_ref<ref1->ref_count[colfield][list]; old_ref++){
81             int poc = ref1->ref_poc[colfield][list][old_ref];
82
83             if     (!interl)
84                 poc |= 3;
85             else if( interl && (poc&3) == 3) //FIXME store all MBAFF references so this isnt needed
86                 poc= (poc&~3) + rfield + 1;
87
88             for(j=start; j<end; j++){
89                 if(4*h->ref_list[0][j].frame_num + (h->ref_list[0][j].reference&3) == poc){
90                     int cur_ref= mbafi ? (j-16)^field : j;
91                     map[list][2*old_ref + (rfield^field) + 16] = cur_ref;
92                     if(rfield == field || !interl)
93                         map[list][old_ref] = cur_ref;
94                     break;
95                 }
96             }
97         }
98     }
99 }
100
101 void ff_h264_direct_ref_list_init(H264Context * const h){
102     MpegEncContext * const s = &h->s;
103     Picture * const ref1 = &h->ref_list[1][0];
104     Picture * const cur = s->current_picture_ptr;
105     int list, j, field;
106     int sidx= (s->picture_structure&1)^1;
107     int ref1sidx= (ref1->reference&1)^1;
108
109     for(list=0; list<2; list++){
110         cur->ref_count[sidx][list] = h->ref_count[list];
111         for(j=0; j<h->ref_count[list]; j++)
112             cur->ref_poc[sidx][list][j] = 4*h->ref_list[list][j].frame_num + (h->ref_list[list][j].reference&3);
113     }
114
115     if(s->picture_structure == PICT_FRAME){
116         memcpy(cur->ref_count[1], cur->ref_count[0], sizeof(cur->ref_count[0]));
117         memcpy(cur->ref_poc  [1], cur->ref_poc  [0], sizeof(cur->ref_poc  [0]));
118     }
119
120     cur->mbaff= FRAME_MBAFF;
121
122     h->col_fieldoff= 0;
123     if(s->picture_structure == PICT_FRAME){
124         int cur_poc = s->current_picture_ptr->poc;
125         int *col_poc = h->ref_list[1]->field_poc;
126         h->col_parity= (FFABS(col_poc[0] - cur_poc) >= FFABS(col_poc[1] - cur_poc));
127         ref1sidx=sidx= h->col_parity;
128     }else if(!(s->picture_structure & h->ref_list[1][0].reference) && !h->ref_list[1][0].mbaff){ // FL -> FL & differ parity
129         h->col_fieldoff= s->mb_stride*(2*(h->ref_list[1][0].reference) - 3);
130     }
131
132     if(cur->pict_type != FF_B_TYPE || h->direct_spatial_mv_pred)
133         return;
134
135     for(list=0; list<2; list++){
136         fill_colmap(h, h->map_col_to_list0, list, sidx, ref1sidx, 0);
137         if(FRAME_MBAFF)
138         for(field=0; field<2; field++)
139             fill_colmap(h, h->map_col_to_list0_field[field], list, field, field, 1);
140     }
141 }
142
143 static void pred_spatial_direct_motion(H264Context * const h, int *mb_type){
144     MpegEncContext * const s = &h->s;
145     int b8_stride = h->b8_stride;
146     int b4_stride = h->b_stride;
147     int mb_xy = h->mb_xy;
148     int mb_type_col[2];
149     const int16_t (*l1mv0)[2], (*l1mv1)[2];
150     const int8_t *l1ref0, *l1ref1;
151     const int is_b8x8 = IS_8X8(*mb_type);
152     unsigned int sub_mb_type;
153     int i8, i4;
154
155     assert(h->ref_list[1][0].reference&3);
156
157 #define MB_TYPE_16x16_OR_INTRA (MB_TYPE_16x16|MB_TYPE_INTRA4x4|MB_TYPE_INTRA16x16|MB_TYPE_INTRA_PCM)
158
159     if(IS_INTERLACED(h->ref_list[1][0].mb_type[mb_xy])){ // AFL/AFR/FR/FL -> AFL/FL
160         if(!IS_INTERLACED(*mb_type)){                    //     AFR/FR    -> AFL/FL
161             mb_xy= s->mb_x + ((s->mb_y&~1) + h->col_parity)*s->mb_stride;
162             b8_stride = 0;
163         }else{
164             mb_xy += h->col_fieldoff; // non zero for FL -> FL & differ parity
165         }
166         goto single_col;
167     }else{                                               // AFL/AFR/FR/FL -> AFR/FR
168         if(IS_INTERLACED(*mb_type)){                     // AFL       /FL -> AFR/FR
169             mb_xy= s->mb_x + (s->mb_y&~1)*s->mb_stride;
170             mb_type_col[0] = h->ref_list[1][0].mb_type[mb_xy];
171             mb_type_col[1] = h->ref_list[1][0].mb_type[mb_xy + s->mb_stride];
172             b8_stride *= 3;
173             b4_stride *= 6;
174
175             sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */
176             if(    (mb_type_col[0] & MB_TYPE_16x16_OR_INTRA)
177                 && (mb_type_col[1] & MB_TYPE_16x16_OR_INTRA)
178                 && !is_b8x8){
179                 *mb_type   |= MB_TYPE_16x8 |MB_TYPE_L0L1|MB_TYPE_DIRECT2; /* B_16x8 */
180             }else{
181                 *mb_type   |= MB_TYPE_8x8|MB_TYPE_L0L1;
182             }
183         }else{                                           //     AFR/FR    -> AFR/FR
184 single_col:
185             mb_type_col[0] =
186             mb_type_col[1] = h->ref_list[1][0].mb_type[mb_xy];
187
188             sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */
189             if(!is_b8x8 && (mb_type_col[0] & MB_TYPE_16x16_OR_INTRA)){
190                 *mb_type   |= MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_16x16 */
191             }else if(!is_b8x8 && (mb_type_col[0] & (MB_TYPE_16x8|MB_TYPE_8x16))){
192                 *mb_type   |= MB_TYPE_L0L1|MB_TYPE_DIRECT2 | (mb_type_col[0] & (MB_TYPE_16x8|MB_TYPE_8x16));
193             }else{
194                 if(!h->sps.direct_8x8_inference_flag){
195                     /* FIXME save sub mb types from previous frames (or derive from MVs)
196                     * so we know exactly what block size to use */
197                     sub_mb_type = MB_TYPE_8x8|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_4x4 */
198                 }
199                 *mb_type   |= MB_TYPE_8x8|MB_TYPE_L0L1;
200             }
201         }
202     }
203
204     l1mv0  = &h->ref_list[1][0].motion_val[0][h->mb2b_xy [mb_xy]];
205     l1mv1  = &h->ref_list[1][0].motion_val[1][h->mb2b_xy [mb_xy]];
206     l1ref0 = &h->ref_list[1][0].ref_index [0][h->mb2b8_xy[mb_xy]];
207     l1ref1 = &h->ref_list[1][0].ref_index [1][h->mb2b8_xy[mb_xy]];
208     if(!b8_stride){
209         if(s->mb_y&1){
210             l1ref0 += h->b8_stride;
211             l1ref1 += h->b8_stride;
212             l1mv0  +=  2*b4_stride;
213             l1mv1  +=  2*b4_stride;
214         }
215     }
216
217     {
218         int ref[2];
219         int mv[2];
220         int list;
221
222         /* ref = min(neighbors) */
223         for(list=0; list<2; list++){
224             int left_ref = h->ref_cache[list][scan8[0] - 1];
225             int top_ref  = h->ref_cache[list][scan8[0] - 8];
226             int refc = h->ref_cache[list][scan8[0] - 8 + 4];
227             const int16_t *C= h->mv_cache[list][ scan8[0] - 8 + 4];
228             if(refc == PART_NOT_AVAILABLE){
229                 refc = h->ref_cache[list][scan8[0] - 8 - 1];
230                 C    = h-> mv_cache[list][scan8[0] - 8 - 1];
231             }
232             ref[list] = FFMIN3((unsigned)left_ref, (unsigned)top_ref, (unsigned)refc);
233             if(ref[list] >= 0){
234                 //this is just pred_motion() but with the cases removed that cannot happen for direct blocks
235                 const int16_t * const A= h->mv_cache[list][ scan8[0] - 1 ];
236                 const int16_t * const B= h->mv_cache[list][ scan8[0] - 8 ];
237
238                 int match_count= (left_ref==ref[list]) + (top_ref==ref[list]) + (refc==ref[list]);
239                 if(match_count > 1){ //most common
240                     mv[list]= (mid_pred(A[0], B[0], C[0])&0xFFFF)
241                              +(mid_pred(A[1], B[1], C[1])<<16);
242                 }else {
243                     assert(match_count==1);
244                     if(left_ref==ref[list]){
245                         mv[list]= *(uint32_t*)A;
246                     }else if(top_ref==ref[list]){
247                         mv[list]= *(uint32_t*)B;
248                     }else{
249                         mv[list]= *(uint32_t*)C;
250                     }
251                 }
252             }else{
253                 int mask= ~(MB_TYPE_L0 << (2*list));
254                 mv[list] = 0;
255                 ref[list] = -1;
256                 if(!is_b8x8)
257                     *mb_type &= mask;
258                 sub_mb_type &= mask;
259             }
260         }
261         if(ref[0] < 0 && ref[1] < 0){
262             ref[0] = ref[1] = 0;
263             if(!is_b8x8)
264                 *mb_type |= MB_TYPE_L0L1;
265             sub_mb_type |= MB_TYPE_L0L1;
266         }
267
268         if(!is_b8x8 && (mv[0]|mv[1]) == 0){
269             fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, (uint8_t)ref[0], 1);
270             fill_rectangle(&h->ref_cache[1][scan8[0]], 4, 4, 8, (uint8_t)ref[1], 1);
271             fill_rectangle(&h->mv_cache[0][scan8[0]], 4, 4, 8, 0, 4);
272             fill_rectangle(&h->mv_cache[1][scan8[0]], 4, 4, 8, 0, 4);
273             *mb_type= (*mb_type & ~(MB_TYPE_8x8|MB_TYPE_16x8|MB_TYPE_8x16|MB_TYPE_P1L0|MB_TYPE_P1L1))|MB_TYPE_16x16|MB_TYPE_DIRECT2;
274         }else if(IS_INTERLACED(*mb_type) != IS_INTERLACED(mb_type_col[0])){
275             int n=0;
276             for(i8=0; i8<4; i8++){
277                 int x8 = i8&1;
278                 int y8 = i8>>1;
279                 int xy8 = x8+y8*b8_stride;
280                 int xy4 = 3*x8+y8*b4_stride;
281                 int a,b;
282
283                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))
284                     continue;
285                 h->sub_mb_type[i8] = sub_mb_type;
286
287                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[0], 1);
288                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[1], 1);
289                 if(!IS_INTRA(mb_type_col[y8]) && !h->ref_list[1][0].long_ref
290                    && (   (l1ref0[xy8] == 0 && FFABS(l1mv0[xy4][0]) <= 1 && FFABS(l1mv0[xy4][1]) <= 1)
291                        || (l1ref0[xy8]  < 0 && l1ref1[xy8] == 0 && FFABS(l1mv1[xy4][0]) <= 1 && FFABS(l1mv1[xy4][1]) <= 1))){
292                     a=b=0;
293                     if(ref[0] > 0)
294                         a= mv[0];
295                     if(ref[1] > 0)
296                         b= mv[1];
297                     n++;
298                 }else{
299                     a= mv[0];
300                     b= mv[1];
301                 }
302                 fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, a, 4);
303                 fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, b, 4);
304             }
305             if(!is_b8x8 && !(n&3))
306                 *mb_type= (*mb_type & ~(MB_TYPE_8x8|MB_TYPE_16x8|MB_TYPE_8x16|MB_TYPE_P1L0|MB_TYPE_P1L1))|MB_TYPE_16x16|MB_TYPE_DIRECT2;
307         }else if(IS_16X16(*mb_type)){
308             int a,b;
309
310             fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, (uint8_t)ref[0], 1);
311             fill_rectangle(&h->ref_cache[1][scan8[0]], 4, 4, 8, (uint8_t)ref[1], 1);
312             if(!IS_INTRA(mb_type_col[0]) && !h->ref_list[1][0].long_ref
313                && (   (l1ref0[0] == 0 && FFABS(l1mv0[0][0]) <= 1 && FFABS(l1mv0[0][1]) <= 1)
314                    || (l1ref0[0]  < 0 && l1ref1[0] == 0 && FFABS(l1mv1[0][0]) <= 1 && FFABS(l1mv1[0][1]) <= 1
315                        && h->x264_build>33U))){
316                 a=b=0;
317                 if(ref[0] > 0)
318                     a= mv[0];
319                 if(ref[1] > 0)
320                     b= mv[1];
321             }else{
322                 a= mv[0];
323                 b= mv[1];
324             }
325             fill_rectangle(&h->mv_cache[0][scan8[0]], 4, 4, 8, a, 4);
326             fill_rectangle(&h->mv_cache[1][scan8[0]], 4, 4, 8, b, 4);
327         }else{
328             int n=0;
329             for(i8=0; i8<4; i8++){
330                 const int x8 = i8&1;
331                 const int y8 = i8>>1;
332
333                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))
334                     continue;
335                 h->sub_mb_type[i8] = sub_mb_type;
336
337                 fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, mv[0], 4);
338                 fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, mv[1], 4);
339                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[0], 1);
340                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[1], 1);
341
342                 /* col_zero_flag */
343                 if(!IS_INTRA(mb_type_col[0]) && !h->ref_list[1][0].long_ref && (   l1ref0[x8 + y8*b8_stride] == 0
344                                               || (l1ref0[x8 + y8*b8_stride] < 0 && l1ref1[x8 + y8*b8_stride] == 0
345                                                   && h->x264_build>33U))){
346                     const int16_t (*l1mv)[2]= l1ref0[x8 + y8*b8_stride] == 0 ? l1mv0 : l1mv1;
347                     if(IS_SUB_8X8(sub_mb_type)){
348                         const int16_t *mv_col = l1mv[x8*3 + y8*3*b4_stride];
349                         if(FFABS(mv_col[0]) <= 1 && FFABS(mv_col[1]) <= 1){
350                             if(ref[0] == 0)
351                                 fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);
352                             if(ref[1] == 0)
353                                 fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);
354                             n+=4;
355                         }
356                     }else{
357                         int m=0;
358                     for(i4=0; i4<4; i4++){
359                         const int16_t *mv_col = l1mv[x8*2 + (i4&1) + (y8*2 + (i4>>1))*b4_stride];
360                         if(FFABS(mv_col[0]) <= 1 && FFABS(mv_col[1]) <= 1){
361                             if(ref[0] == 0)
362                                 *(uint32_t*)h->mv_cache[0][scan8[i8*4+i4]] = 0;
363                             if(ref[1] == 0)
364                                 *(uint32_t*)h->mv_cache[1][scan8[i8*4+i4]] = 0;
365                             m++;
366                         }
367                     }
368                     if(!(m&3))
369                         h->sub_mb_type[i8]+= MB_TYPE_16x16 - MB_TYPE_8x8;
370                     n+=m;
371                     }
372                 }
373             }
374             if(!is_b8x8 && !(n&15))
375                 *mb_type= (*mb_type & ~(MB_TYPE_8x8|MB_TYPE_16x8|MB_TYPE_8x16|MB_TYPE_P1L0|MB_TYPE_P1L1))|MB_TYPE_16x16|MB_TYPE_DIRECT2;
376         }
377     }
378 }
379
380 static void pred_temp_direct_motion(H264Context * const h, int *mb_type){
381     MpegEncContext * const s = &h->s;
382     int b8_stride = h->b8_stride;
383     int b4_stride = h->b_stride;
384     int mb_xy = h->mb_xy;
385     int mb_type_col[2];
386     const int16_t (*l1mv0)[2], (*l1mv1)[2];
387     const int8_t *l1ref0, *l1ref1;
388     const int is_b8x8 = IS_8X8(*mb_type);
389     unsigned int sub_mb_type;
390     int i8, i4;
391
392     assert(h->ref_list[1][0].reference&3);
393
394     if(IS_INTERLACED(h->ref_list[1][0].mb_type[mb_xy])){ // AFL/AFR/FR/FL -> AFL/FL
395         if(!IS_INTERLACED(*mb_type)){                    //     AFR/FR    -> AFL/FL
396             mb_xy= s->mb_x + ((s->mb_y&~1) + h->col_parity)*s->mb_stride;
397             b8_stride = 0;
398         }else{
399             mb_xy += h->col_fieldoff; // non zero for FL -> FL & differ parity
400         }
401         goto single_col;
402     }else{                                               // AFL/AFR/FR/FL -> AFR/FR
403         if(IS_INTERLACED(*mb_type)){                     // AFL       /FL -> AFR/FR
404             mb_xy= s->mb_x + (s->mb_y&~1)*s->mb_stride;
405             mb_type_col[0] = h->ref_list[1][0].mb_type[mb_xy];
406             mb_type_col[1] = h->ref_list[1][0].mb_type[mb_xy + s->mb_stride];
407             b8_stride *= 3;
408             b4_stride *= 6;
409
410             sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */
411
412             if(    (mb_type_col[0] & MB_TYPE_16x16_OR_INTRA)
413                 && (mb_type_col[1] & MB_TYPE_16x16_OR_INTRA)
414                 && !is_b8x8){
415                 *mb_type   |= MB_TYPE_16x8 |MB_TYPE_L0L1|MB_TYPE_DIRECT2; /* B_16x8 */
416             }else{
417                 *mb_type   |= MB_TYPE_8x8|MB_TYPE_L0L1;
418             }
419         }else{                                           //     AFR/FR    -> AFR/FR
420 single_col:
421             mb_type_col[0] =
422             mb_type_col[1] = h->ref_list[1][0].mb_type[mb_xy];
423
424             sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */
425             if(!is_b8x8 && (mb_type_col[0] & MB_TYPE_16x16_OR_INTRA)){
426                 *mb_type   |= MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_16x16 */
427             }else if(!is_b8x8 && (mb_type_col[0] & (MB_TYPE_16x8|MB_TYPE_8x16))){
428                 *mb_type   |= MB_TYPE_L0L1|MB_TYPE_DIRECT2 | (mb_type_col[0] & (MB_TYPE_16x8|MB_TYPE_8x16));
429             }else{
430                 if(!h->sps.direct_8x8_inference_flag){
431                     /* FIXME save sub mb types from previous frames (or derive from MVs)
432                     * so we know exactly what block size to use */
433                     sub_mb_type = MB_TYPE_8x8|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_4x4 */
434                 }
435                 *mb_type   |= MB_TYPE_8x8|MB_TYPE_L0L1;
436             }
437         }
438     }
439
440     l1mv0  = &h->ref_list[1][0].motion_val[0][h->mb2b_xy [mb_xy]];
441     l1mv1  = &h->ref_list[1][0].motion_val[1][h->mb2b_xy [mb_xy]];
442     l1ref0 = &h->ref_list[1][0].ref_index [0][h->mb2b8_xy[mb_xy]];
443     l1ref1 = &h->ref_list[1][0].ref_index [1][h->mb2b8_xy[mb_xy]];
444     if(!b8_stride){
445         if(s->mb_y&1){
446             l1ref0 += h->b8_stride;
447             l1ref1 += h->b8_stride;
448             l1mv0  +=  2*b4_stride;
449             l1mv1  +=  2*b4_stride;
450         }
451     }
452
453     {
454         const int *map_col_to_list0[2] = {h->map_col_to_list0[0], h->map_col_to_list0[1]};
455         const int *dist_scale_factor = h->dist_scale_factor;
456         int ref_offset;
457
458         if(FRAME_MBAFF && IS_INTERLACED(*mb_type)){
459             map_col_to_list0[0] = h->map_col_to_list0_field[s->mb_y&1][0];
460             map_col_to_list0[1] = h->map_col_to_list0_field[s->mb_y&1][1];
461             dist_scale_factor   =h->dist_scale_factor_field[s->mb_y&1];
462         }
463         ref_offset = (h->ref_list[1][0].mbaff<<4) & (mb_type_col[0]>>3); //if(h->ref_list[1][0].mbaff && IS_INTERLACED(mb_type_col[0])) ref_offset=16 else 0
464
465         if(IS_INTERLACED(*mb_type) != IS_INTERLACED(mb_type_col[0])){
466             int y_shift  = 2*!IS_INTERLACED(*mb_type);
467             assert(h->sps.direct_8x8_inference_flag);
468
469             for(i8=0; i8<4; i8++){
470                 const int x8 = i8&1;
471                 const int y8 = i8>>1;
472                 int ref0, scale;
473                 const int16_t (*l1mv)[2]= l1mv0;
474
475                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))
476                     continue;
477                 h->sub_mb_type[i8] = sub_mb_type;
478
479                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, 0, 1);
480                 if(IS_INTRA(mb_type_col[y8])){
481                     fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, 0, 1);
482                     fill_rectangle(&h-> mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);
483                     fill_rectangle(&h-> mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);
484                     continue;
485                 }
486
487                 ref0 = l1ref0[x8 + y8*b8_stride];
488                 if(ref0 >= 0)
489                     ref0 = map_col_to_list0[0][ref0 + ref_offset];
490                 else{
491                     ref0 = map_col_to_list0[1][l1ref1[x8 + y8*b8_stride] + ref_offset];
492                     l1mv= l1mv1;
493                 }
494                 scale = dist_scale_factor[ref0];
495                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, ref0, 1);
496
497                 {
498                     const int16_t *mv_col = l1mv[x8*3 + y8*b4_stride];
499                     int my_col = (mv_col[1]<<y_shift)/2;
500                     int mx = (scale * mv_col[0] + 128) >> 8;
501                     int my = (scale * my_col + 128) >> 8;
502                     fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, pack16to32(mx,my), 4);
503                     fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, pack16to32(mx-mv_col[0],my-my_col), 4);
504                 }
505             }
506             return;
507         }
508
509         /* one-to-one mv scaling */
510
511         if(IS_16X16(*mb_type)){
512             int ref, mv0, mv1;
513
514             fill_rectangle(&h->ref_cache[1][scan8[0]], 4, 4, 8, 0, 1);
515             if(IS_INTRA(mb_type_col[0])){
516                 ref=mv0=mv1=0;
517             }else{
518                 const int ref0 = l1ref0[0] >= 0 ? map_col_to_list0[0][l1ref0[0] + ref_offset]
519                                                 : map_col_to_list0[1][l1ref1[0] + ref_offset];
520                 const int scale = dist_scale_factor[ref0];
521                 const int16_t *mv_col = l1ref0[0] >= 0 ? l1mv0[0] : l1mv1[0];
522                 int mv_l0[2];
523                 mv_l0[0] = (scale * mv_col[0] + 128) >> 8;
524                 mv_l0[1] = (scale * mv_col[1] + 128) >> 8;
525                 ref= ref0;
526                 mv0= pack16to32(mv_l0[0],mv_l0[1]);
527                 mv1= pack16to32(mv_l0[0]-mv_col[0],mv_l0[1]-mv_col[1]);
528             }
529             fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, ref, 1);
530             fill_rectangle(&h-> mv_cache[0][scan8[0]], 4, 4, 8, mv0, 4);
531             fill_rectangle(&h-> mv_cache[1][scan8[0]], 4, 4, 8, mv1, 4);
532         }else{
533             for(i8=0; i8<4; i8++){
534                 const int x8 = i8&1;
535                 const int y8 = i8>>1;
536                 int ref0, scale;
537                 const int16_t (*l1mv)[2]= l1mv0;
538
539                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))
540                     continue;
541                 h->sub_mb_type[i8] = sub_mb_type;
542                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, 0, 1);
543                 if(IS_INTRA(mb_type_col[0])){
544                     fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, 0, 1);
545                     fill_rectangle(&h-> mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);
546                     fill_rectangle(&h-> mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);
547                     continue;
548                 }
549
550                 ref0 = l1ref0[x8 + y8*b8_stride];
551                 if(ref0 >= 0)
552                     ref0 = map_col_to_list0[0][ref0 + ref_offset];
553                 else{
554                     ref0 = map_col_to_list0[1][l1ref1[x8 + y8*b8_stride] + ref_offset];
555                     l1mv= l1mv1;
556                 }
557                 scale = dist_scale_factor[ref0];
558
559                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, ref0, 1);
560                 if(IS_SUB_8X8(sub_mb_type)){
561                     const int16_t *mv_col = l1mv[x8*3 + y8*3*b4_stride];
562                     int mx = (scale * mv_col[0] + 128) >> 8;
563                     int my = (scale * mv_col[1] + 128) >> 8;
564                     fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, pack16to32(mx,my), 4);
565                     fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, pack16to32(mx-mv_col[0],my-mv_col[1]), 4);
566                 }else
567                 for(i4=0; i4<4; i4++){
568                     const int16_t *mv_col = l1mv[x8*2 + (i4&1) + (y8*2 + (i4>>1))*b4_stride];
569                     int16_t *mv_l0 = h->mv_cache[0][scan8[i8*4+i4]];
570                     mv_l0[0] = (scale * mv_col[0] + 128) >> 8;
571                     mv_l0[1] = (scale * mv_col[1] + 128) >> 8;
572                     *(uint32_t*)h->mv_cache[1][scan8[i8*4+i4]] =
573                         pack16to32(mv_l0[0]-mv_col[0],mv_l0[1]-mv_col[1]);
574                 }
575             }
576         }
577     }
578 }
579
580 void ff_h264_pred_direct_motion(H264Context * const h, int *mb_type){
581     if(h->direct_spatial_mv_pred){
582         pred_spatial_direct_motion(h, mb_type);
583     }else{
584         pred_temp_direct_motion(h, mb_type);
585     }
586 }