two more typos spotted by Mike
[ffmpeg.git] / libavcodec / xvmcvideo.c
1 /*
2  * XVideo Motion Compensation
3  * Copyright (c) 2003 Ivan Kalvachev
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 #include <limits.h>
23
24 //avcodec include
25 #include "avcodec.h"
26 #include "dsputil.h"
27 #include "mpegvideo.h"
28
29 #undef NDEBUG
30 #include <assert.h>
31
32 #ifdef HAVE_XVMC
33
34 //X11 includes are in the xvmc_render.h
35 //by replacing it with none-X one
36 //XvMC emulation could be performed
37
38 #include "xvmc_render.h"
39
40 //#include "xvmc_debug.h"
41
42 //set s->block
43 void XVMC_init_block(MpegEncContext *s){
44 xvmc_render_state_t * render;
45     render = (xvmc_render_state_t*)s->current_picture.data[2];
46     assert(render != NULL);
47     if( (render == NULL) || (render->magic != MP_XVMC_RENDER_MAGIC) ){
48         assert(0);
49         return;//make sure that this is render packet
50     }
51     s->block =(DCTELEM *)(render->data_blocks+(render->next_free_data_block_num)*64);
52 }
53
54 void XVMC_pack_pblocks(MpegEncContext *s, int cbp){
55 int i,j;
56 const int mb_block_count = 4+(1<<s->chroma_format);
57
58     j=0;
59     cbp<<= 12-mb_block_count;
60     for(i=0; i<mb_block_count; i++){
61         if(cbp & (1<<11)) {
62            s->pblocks[i] = (short *)(&s->block[(j++)]);
63         }else{
64            s->pblocks[i] = NULL;
65         }
66         cbp+=cbp;
67 //        printf("s->pblocks[%d]=%p ,s->block=%p cbp=%d\n",i,s->pblocks[i],s->block,cbp);
68     }
69 }
70
71 //these functions should be called on every new field or/and frame
72 //They should be safe if they are called few times for same field!
73 int XVMC_field_start(MpegEncContext*s, AVCodecContext *avctx){
74 xvmc_render_state_t * render,* last, * next;
75
76     assert(avctx != NULL);
77
78     render = (xvmc_render_state_t*)s->current_picture.data[2];
79     assert(render != NULL);
80     if( (render == NULL) || (render->magic != MP_XVMC_RENDER_MAGIC) )
81         return -1;//make sure that this is render packet
82
83     render->picture_structure = s->picture_structure;
84     render->flags = (s->first_field)? 0: XVMC_SECOND_FIELD;
85
86 //make sure that all data is drawn by XVMC_end_frame
87     assert(render->filled_mv_blocks_num==0);
88
89     render->p_future_surface = NULL;
90     render->p_past_surface = NULL;
91
92     switch(s->pict_type){
93         case  FF_I_TYPE:
94             return 0;// no prediction from other frames
95         case  FF_B_TYPE:
96             next = (xvmc_render_state_t*)s->next_picture.data[2];
97             assert(next!=NULL);
98             assert(next->state & MP_XVMC_STATE_PREDICTION);
99             if(next == NULL) return -1;
100             if(next->magic != MP_XVMC_RENDER_MAGIC) return -1;
101             render->p_future_surface = next->p_surface;
102             //no return here, going to set forward prediction
103         case  FF_P_TYPE:
104             last = (xvmc_render_state_t*)s->last_picture.data[2];
105             if(last == NULL)// && !s->first_field)
106                 last = render;//predict second field from the first
107             if(last->magic != MP_XVMC_RENDER_MAGIC) return -1;
108             assert(last->state & MP_XVMC_STATE_PREDICTION);
109             render->p_past_surface = last->p_surface;
110             return 0;
111     }
112
113 return -1;
114 }
115
116 void XVMC_field_end(MpegEncContext *s){
117 xvmc_render_state_t * render;
118     render = (xvmc_render_state_t*)s->current_picture.data[2];
119     assert(render != NULL);
120
121     if(render->filled_mv_blocks_num > 0){
122 //        printf("xvmcvideo.c: rendering %d left blocks after last slice!!!\n",render->filled_mv_blocks_num );
123         ff_draw_horiz_band(s,0,0);
124     }
125 }
126
127 void XVMC_decode_mb(MpegEncContext *s){
128 XvMCMacroBlock * mv_block;
129 xvmc_render_state_t * render;
130 int i,cbp,blocks_per_mb;
131
132 const int mb_xy = s->mb_y * s->mb_stride + s->mb_x;
133
134
135     if(s->encoding){
136         av_log(s->avctx, AV_LOG_ERROR, "XVMC doesn't support encoding!!!\n");
137         return;
138     }
139
140    //from MPV_decode_mb(),
141     /* update DC predictors for P macroblocks */
142     if (!s->mb_intra) {
143         s->last_dc[0] =
144         s->last_dc[1] =
145         s->last_dc[2] =  128 << s->intra_dc_precision;
146     }
147
148    //MC doesn't skip blocks
149     s->mb_skipped = 0;
150
151
152    // do I need to export quant when I could not perform postprocessing?
153    // anyway, it doesn't hurrt
154     s->current_picture.qscale_table[mb_xy] = s->qscale;
155
156 //START OF XVMC specific code
157     render = (xvmc_render_state_t*)s->current_picture.data[2];
158     assert(render!=NULL);
159     assert(render->magic==MP_XVMC_RENDER_MAGIC);
160     assert(render->mv_blocks);
161
162     //take the next free macroblock
163     mv_block = &render->mv_blocks[render->start_mv_blocks_num +
164                                    render->filled_mv_blocks_num ];
165
166 // memset(mv_block,0,sizeof(XvMCMacroBlock));
167
168     mv_block->x = s->mb_x;
169     mv_block->y = s->mb_y;
170     mv_block->dct_type = s->interlaced_dct;//XVMC_DCT_TYPE_FRAME/FIELD;
171 //    mv_block->motion_type = 0;  //zero to silense warnings
172     if(s->mb_intra){
173         mv_block->macroblock_type = XVMC_MB_TYPE_INTRA;//no MC, all done
174     }else{
175         mv_block->macroblock_type = XVMC_MB_TYPE_PATTERN;
176
177         if(s->mv_dir & MV_DIR_FORWARD){
178             mv_block->macroblock_type|= XVMC_MB_TYPE_MOTION_FORWARD;
179             //pmv[n][dir][xy]=mv[dir][n][xy]
180             mv_block->PMV[0][0][0] = s->mv[0][0][0];
181             mv_block->PMV[0][0][1] = s->mv[0][0][1];
182             mv_block->PMV[1][0][0] = s->mv[0][1][0];
183             mv_block->PMV[1][0][1] = s->mv[0][1][1];
184         }
185         if(s->mv_dir & MV_DIR_BACKWARD){
186             mv_block->macroblock_type|=XVMC_MB_TYPE_MOTION_BACKWARD;
187             mv_block->PMV[0][1][0] = s->mv[1][0][0];
188             mv_block->PMV[0][1][1] = s->mv[1][0][1];
189             mv_block->PMV[1][1][0] = s->mv[1][1][0];
190             mv_block->PMV[1][1][1] = s->mv[1][1][1];
191         }
192
193         switch(s->mv_type){
194             case  MV_TYPE_16X16:
195                 mv_block->motion_type = XVMC_PREDICTION_FRAME;
196                 break;
197             case  MV_TYPE_16X8:
198                 mv_block->motion_type = XVMC_PREDICTION_16x8;
199                 break;
200             case  MV_TYPE_FIELD:
201                 mv_block->motion_type = XVMC_PREDICTION_FIELD;
202                 if(s->picture_structure == PICT_FRAME){
203                     mv_block->PMV[0][0][1]<<=1;
204                     mv_block->PMV[1][0][1]<<=1;
205                     mv_block->PMV[0][1][1]<<=1;
206                     mv_block->PMV[1][1][1]<<=1;
207                 }
208                 break;
209             case  MV_TYPE_DMV:
210                 mv_block->motion_type = XVMC_PREDICTION_DUAL_PRIME;
211                 if(s->picture_structure == PICT_FRAME){
212
213                     mv_block->PMV[0][0][0] = s->mv[0][0][0];//top from top
214                     mv_block->PMV[0][0][1] = s->mv[0][0][1]<<1;
215
216                     mv_block->PMV[0][1][0] = s->mv[0][0][0];//bottom from bottom
217                     mv_block->PMV[0][1][1] = s->mv[0][0][1]<<1;
218
219                     mv_block->PMV[1][0][0] = s->mv[0][2][0];//dmv00, top from bottom
220                     mv_block->PMV[1][0][1] = s->mv[0][2][1]<<1;//dmv01
221
222                     mv_block->PMV[1][1][0] = s->mv[0][3][0];//dmv10, bottom from top
223                     mv_block->PMV[1][1][1] = s->mv[0][3][1]<<1;//dmv11
224
225                 }else{
226                     mv_block->PMV[0][1][0] = s->mv[0][2][0];//dmv00
227                     mv_block->PMV[0][1][1] = s->mv[0][2][1];//dmv01
228                 }
229                 break;
230             default:
231                 assert(0);
232         }
233
234         mv_block->motion_vertical_field_select = 0;
235
236 //set correct field referenses
237         if(s->mv_type == MV_TYPE_FIELD || s->mv_type == MV_TYPE_16X8){
238             if( s->field_select[0][0] ) mv_block->motion_vertical_field_select|=1;
239             if( s->field_select[1][0] ) mv_block->motion_vertical_field_select|=2;
240             if( s->field_select[0][1] ) mv_block->motion_vertical_field_select|=4;
241             if( s->field_select[1][1] ) mv_block->motion_vertical_field_select|=8;
242         }
243     }//!intra
244 //time to handle data blocks;
245     mv_block->index = render->next_free_data_block_num;
246
247     blocks_per_mb = 6;
248     if( s->chroma_format >= 2){
249         blocks_per_mb = 4 + (1 << (s->chroma_format));
250     }
251
252 //  calculate cbp
253     cbp = 0;
254     for(i=0; i<blocks_per_mb; i++) {
255         cbp+= cbp;
256         if(s->block_last_index[i] >= 0)
257             cbp++;
258     }
259
260     if(s->flags & CODEC_FLAG_GRAY){
261         if(s->mb_intra){//intra frames are alwasy full chroma block
262             for(i=4; i<blocks_per_mb; i++){
263                 memset(s->pblocks[i],0,sizeof(short)*8*8);//so we need to clear them
264                 if(!render->unsigned_intra)
265                     s->pblocks[i][0] = 1<<10;
266             }
267         }else{
268             cbp&= 0xf << (blocks_per_mb - 4);
269             blocks_per_mb = 4;//Luminance blocks only
270         }
271     }
272     mv_block->coded_block_pattern = cbp;
273     if(cbp == 0)
274         mv_block->macroblock_type &= ~XVMC_MB_TYPE_PATTERN;
275
276     for(i=0; i<blocks_per_mb; i++){
277         if(s->block_last_index[i] >= 0){
278             // I do not have unsigned_intra MOCO to test, hope it is OK
279             if( (s->mb_intra) && ( render->idct || (!render->idct && !render->unsigned_intra)) )
280                 s->pblocks[i][0]-=1<<10;
281             if(!render->idct){
282                 s->dsp.idct(s->pblocks[i]);
283                 //!!TODO!clip!!!
284             }
285 //copy blocks only if the codec doesn't support pblocks reordering
286             if(s->avctx->xvmc_acceleration == 1){
287                 memcpy(&render->data_blocks[(render->next_free_data_block_num)*64],
288                         s->pblocks[i],sizeof(short)*8*8);
289             }else{
290 /*              if(s->pblocks[i] != &render->data_blocks[
291                         (render->next_free_data_block_num)*64]){
292                    printf("ERROR mb(%d,%d) s->pblocks[i]=%p data_block[]=%p\n",
293                    s->mb_x,s->mb_y, s->pblocks[i],
294                    &render->data_blocks[(render->next_free_data_block_num)*64]);
295                 }*/
296             }
297             render->next_free_data_block_num++;
298         }
299     }
300     render->filled_mv_blocks_num++;
301
302     assert(render->filled_mv_blocks_num <= render->total_number_of_mv_blocks);
303     assert(render->next_free_data_block_num <= render->total_number_of_data_blocks);
304
305
306     if(render->filled_mv_blocks_num >= render->total_number_of_mv_blocks)
307         ff_draw_horiz_band(s,0,0);
308
309 // DumpRenderInfo(render);
310 // DumpMBlockInfo(mv_block);
311
312 }
313
314 #endif