]> git.sesse.net Git - vlc/blob - src/video_parser/vpar_blocks.c
* Optimisation de vdec_motion.c et video_decoder.c ;
[vlc] / src / video_parser / vpar_blocks.c
1 /*****************************************************************************
2  * vpar_blocks.c : blocks parsing
3  * (c)1999 VideoLAN
4  *****************************************************************************/
5
6 /*****************************************************************************
7  * Preamble
8  *****************************************************************************/
9 #include <errno.h>
10 #include <stdlib.h>
11 #include <stdio.h>
12 #include <unistd.h>
13 #include <string.h>
14 #include <sys/uio.h>
15
16 #include "config.h"
17 #include "common.h"
18 #include "mtime.h"
19 #include "vlc_thread.h"
20
21 #include "intf_msg.h"
22 #include "debug.h"                    /* ?? temporaire, requis par netlist.h */
23
24 #include "input.h"
25 #include "input_netlist.h"
26 #include "decoder_fifo.h"
27 #include "video.h"
28 #include "video_output.h"
29
30 #include "vdec_idct.h"
31 #include "video_decoder.h"
32 #include "vdec_motion.h"
33
34 #include "vpar_blocks.h"
35 #include "vpar_headers.h"
36 #include "vpar_synchro.h"
37 #include "video_parser.h"
38 #include "video_fifo.h"
39
40
41 /*
42  * Local prototypes
43  */
44 typedef void (*f_decode_block_t)( vpar_thread_t *, macroblock_t *, int );
45 static void vpar_DecodeMPEG1Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b );
46 static void vpar_DecodeMPEG1Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b );
47 static void vpar_DecodeMPEG2Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b );
48 static void vpar_DecodeMPEG2Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b );
49
50 /*
51  * Initialisation tables
52  */
53     /* Table for coded_block_pattern resolution */
54 static lookup_t     pl_coded_pattern_init_table[512] = 
55     { {MB_ERROR, 0}, {0, 9}, {39, 9}, {27, 9}, {59, 9}, {55, 9}, {47, 9}, {31, 9},
56     {58, 8}, {58, 8}, {54, 8}, {54, 8}, {46, 8}, {46, 8}, {30, 8}, {30, 8},
57     {57, 8}, {57, 8}, {53, 8}, {53, 8}, {45, 8}, {45, 8}, {29, 8}, {29, 8},
58     {38, 8}, {38, 8}, {26, 8}, {26, 8}, {37, 8}, {37, 8}, {25, 8}, {25, 8},
59     {43, 8}, {43, 8}, {23, 8}, {23, 8}, {51, 8}, {51, 8}, {15, 8}, {15, 8},
60     {42, 8}, {42, 8}, {22, 8}, {22, 8}, {50, 8}, {50, 8}, {14, 8}, {14, 8},
61     {41, 8}, {41, 8}, {21, 8}, {21, 8}, {49, 8}, {49, 8}, {13, 8}, {13, 8},
62     {35, 8}, {35, 8}, {19, 8}, {19, 8}, {11, 8}, {11, 8}, {7, 8}, {7, 8},
63     {34, 7}, {34, 7}, {34, 7}, {34, 7}, {18, 7}, {18, 7}, {18, 7}, {18, 7},
64     {10, 7}, {10, 7}, {10, 7}, {10, 7}, {6, 7}, {6, 7}, {6, 7}, {6, 7}, 
65     {33, 7}, {33, 7}, {33, 7}, {33, 7}, {17, 7}, {17, 7}, {17, 7}, {17, 7}, 
66     {9, 7}, {9, 7}, {9, 7}, {9, 7}, {5, 7}, {5, 7}, {5, 7}, {5, 7}, 
67     {63, 6}, {63, 6}, {63, 6}, {63, 6}, {63, 6}, {63, 6}, {63, 6}, {63, 6}, 
68     {3, 6}, {3, 6}, {3, 6}, {3, 6}, {3, 6}, {3, 6}, {3, 6}, {3, 6}, 
69     {36, 6}, {36, 6}, {36, 6}, {36, 6}, {36, 6}, {36, 6}, {36, 6}, {36, 6}, 
70     {24, 6}, {24, 6}, {24, 6}, {24, 6}, {24, 6}, {24, 6}, {24, 6}, {24, 6}, 
71     {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5},
72     {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5}, {62, 5},
73     {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, 
74     {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, {2, 5}, 
75     {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, 
76     {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, {61, 5}, 
77     {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, 
78     {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, {1, 5}, 
79     {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, 
80     {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, {56, 5}, 
81     {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, 
82     {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, {52, 5}, 
83     {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, 
84     {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, {44, 5}, 
85     {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, 
86     {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, {28, 5}, 
87     {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, 
88     {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, {40, 5}, 
89     {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, 
90     {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, {20, 5}, 
91     {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, 
92     {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, {48, 5}, 
93     {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, 
94     {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, {12, 5}, 
95     {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, 
96     {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, 
97     {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, 
98     {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, {32, 4}, 
99     {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, 
100     {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, 
101     {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, 
102     {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, {16, 4}, 
103     {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, 
104     {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, 
105     {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, 
106     {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4}, {8, 4},
107     {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4},
108     {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, 
109     {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, 
110     {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4}, {4, 4},
111     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
112     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
113     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
114     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
115     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
116     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
117     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, 
118     {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3}, {60, 3} };
119
120     /* Tables for dc DCT coefficients 
121      * Tables are cut in two parts to reduce memory occupation
122      */
123     
124     /* Table B-12, dct_dc_size_luminance, codes 00xxx ... 11110 */
125 static lookup_t     pl_dct_dc_lum_init_table_1[32] =
126     { {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2},
127       {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2},
128       {0, 3}, {0, 3}, {0, 3}, {0, 3}, {3, 3}, {3, 3}, {3, 3}, {3, 3},
129       {4, 3}, {4, 3}, {4, 3}, {4, 3}, {5, 4}, {5, 4}, {6, 5}, {MB_ERROR, 0}
130     };
131
132     /* Table B-12, dct_dc_size_luminance, codes 111110xxx ... 111111111 */
133 static lookup_t     pl_dct_dc_lum_init_table_2[32] =
134     { {7, 6}, {7, 6}, {7, 6}, {7, 6}, {7, 6}, {7, 6}, {7, 6}, {7, 6},
135       {8, 7}, {8, 7}, {8, 7}, {8, 7}, {9, 8}, {9, 8}, {10,9}, {11,9},
136       {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0},
137       {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0},
138       {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0},
139       {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0}, {MB_ERROR, 0}
140     };
141
142     /* Table B-13, dct_dc_size_chrominance, codes 00xxx ... 11110 */
143 static lookup_t     pl_dct_dc_chrom_init_table_1[32] =
144     { {0, 2}, {0, 2}, {0, 2}, {0, 2}, {0, 2}, {0, 2}, {0, 2}, {0, 2},
145       {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2}, {1, 2},
146       {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2}, {2, 2},
147       {3, 3}, {3, 3}, {3, 3}, {3, 3}, {4, 4}, {4, 4}, {5, 5}, {MB_ERROR, 0}
148     };
149
150     /* Table B-13, dct_dc_size_chrominance, codes 111110xxxx ... 1111111111 */
151 static lookup_t     pl_dct_dc_chrom_init_table_2[32] =
152     { {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6},
153       {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6}, {6, 6},
154       {7, 7}, {7, 7}, {7, 7}, {7, 7}, {7, 7}, {7, 7}, {7, 7}, {7, 7},
155       {8, 8}, {8, 8}, {8, 8}, {8, 8}, {9, 9}, {9, 9}, {10,10}, {11,10}
156     };
157     
158     /* 
159      * Structure to store the tables B14 & B15 
160      * Is constructed from the tables below 
161      */
162     dct_lookup_t            ppl_dct_coef[2][16384];
163
164
165     /* Tables for ac DCT coefficients. There are cut in many parts to save space */
166     /* Table B-14, DCT coefficients table zero,
167      * codes 0100 ... 1xxx (used for first (DC) coefficient)
168      */
169 static dct_lookup_t pl_DCT_tab_dc[12] =
170     {
171         {0,2,4}, {2,1,4}, {1,1,3}, {1,1,3},
172         {0,1,1}, {0,1,1}, {0,1,1}, {0,1,1},
173         {0,1,1}, {0,1,1}, {0,1,1}, {0,1,1}
174     };
175
176     /* Table B-14, DCT coefficients table zero,
177      * codes 0100 ... 1xxx (used for all other coefficients)
178      */
179 static dct_lookup_t pl_DCT_tab_ac[12] =
180     {
181         {0,2,4},  {2,1,4},  {1,1,3},  {1,1,3},
182         {DCT_EOB,0,2}, {DCT_EOB,0,2}, {DCT_EOB,0,2}, {DCT_EOB,0,2}, /* EOB */
183         {0,1,2},  {0,1,2},  {0,1,2},  {0,1,2}
184     };
185
186     /* Table B-14, DCT coefficients table zero,
187      * codes 000001xx ... 00111xxx
188      */
189 static dct_lookup_t pl_DCT_tab0[60] =
190     {
191         {DCT_ESCAPE,0,6}, {DCT_ESCAPE,0,6}, {DCT_ESCAPE,0,6}, {DCT_ESCAPE,0,6},
192         /* Escape */
193         {2,2,7}, {2,2,7}, {9,1,7}, {9,1,7},
194         {0,4,7}, {0,4,7}, {8,1,7}, {8,1,7},
195         {7,1,6}, {7,1,6}, {7,1,6}, {7,1,6},
196         {6,1,6}, {6,1,6}, {6,1,6}, {6,1,6},
197         {1,2,6}, {1,2,6}, {1,2,6}, {1,2,6},
198         {5,1,6}, {5,1,6}, {5,1,6}, {5,1,6},
199         {13,1,8}, {0,6,8}, {12,1,8}, {11,1,8},
200         {3,2,8}, {1,3,8}, {0,5,8}, {10,1,8},
201         {0,3,5}, {0,3,5}, {0,3,5}, {0,3,5},
202         {0,3,5}, {0,3,5}, {0,3,5}, {0,3,5},
203         {4,1,5}, {4,1,5}, {4,1,5}, {4,1,5},
204         {4,1,5}, {4,1,5}, {4,1,5}, {4,1,5},
205         {3,1,5}, {3,1,5}, {3,1,5}, {3,1,5},
206         {3,1,5}, {3,1,5}, {3,1,5}, {3,1,5}
207     };
208
209     /* Table B-15, DCT coefficients table one,
210      * codes 000001xx ... 11111111
211      */
212 static dct_lookup_t pl_DCT_tab0a[252] =
213     {
214         {65,0,6}, {65,0,6}, {65,0,6}, {65,0,6}, /* Escape */
215         {7,1,7}, {7,1,7}, {8,1,7}, {8,1,7},
216         {6,1,7}, {6,1,7}, {2,2,7}, {2,2,7},
217         {0,7,6}, {0,7,6}, {0,7,6}, {0,7,6},
218         {0,6,6}, {0,6,6}, {0,6,6}, {0,6,6},
219         {4,1,6}, {4,1,6}, {4,1,6}, {4,1,6},
220         {5,1,6}, {5,1,6}, {5,1,6}, {5,1,6},
221         {1,5,8}, {11,1,8}, {0,11,8}, {0,10,8},
222         {13,1,8}, {12,1,8}, {3,2,8}, {1,4,8},
223         {2,1,5}, {2,1,5}, {2,1,5}, {2,1,5},
224         {2,1,5}, {2,1,5}, {2,1,5}, {2,1,5},
225         {1,2,5}, {1,2,5}, {1,2,5}, {1,2,5},
226         {1,2,5}, {1,2,5}, {1,2,5}, {1,2,5},
227         {3,1,5}, {3,1,5}, {3,1,5}, {3,1,5},
228         {3,1,5}, {3,1,5}, {3,1,5}, {3,1,5},
229         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
230         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
231         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
232         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
233         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
234         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
235         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
236         {1,1,3}, {1,1,3}, {1,1,3}, {1,1,3},
237         {64,0,4}, {64,0,4}, {64,0,4}, {64,0,4}, /* EOB */
238         {64,0,4}, {64,0,4}, {64,0,4}, {64,0,4},
239         {64,0,4}, {64,0,4}, {64,0,4}, {64,0,4},
240         {64,0,4}, {64,0,4}, {64,0,4}, {64,0,4},
241         {0,3,4}, {0,3,4}, {0,3,4}, {0,3,4},
242         {0,3,4}, {0,3,4}, {0,3,4}, {0,3,4},
243         {0,3,4}, {0,3,4}, {0,3,4}, {0,3,4},
244         {0,3,4}, {0,3,4}, {0,3,4}, {0,3,4},
245         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
246         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
247         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
248         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
249         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
250         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
251         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
252         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
253         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
254         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
255         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
256         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
257         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
258         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
259         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
260         {0,1,2}, {0,1,2}, {0,1,2}, {0,1,2},
261         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
262         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
263         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
264         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
265         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
266         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
267         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
268         {0,2,3}, {0,2,3}, {0,2,3}, {0,2,3},
269         {0,4,5}, {0,4,5}, {0,4,5}, {0,4,5},
270         {0,4,5}, {0,4,5}, {0,4,5}, {0,4,5},
271         {0,5,5}, {0,5,5}, {0,5,5}, {0,5,5},
272         {0,5,5}, {0,5,5}, {0,5,5}, {0,5,5},
273         {9,1,7}, {9,1,7}, {1,3,7}, {1,3,7},
274         {10,1,7}, {10,1,7}, {0,8,7}, {0,8,7},
275         {0,9,7}, {0,9,7}, {0,12,8}, {0,13,8},
276         {2,3,8}, {4,2,8}, {0,14,8}, {0,15,8}
277     };
278
279     /* Table B-14, DCT coefficients table zero,
280      * codes 0000001000 ... 0000001111
281      */
282 static dct_lookup_t pl_DCT_tab1[8] =
283     {
284         {16,1,10}, {5,2,10}, {0,7,10}, {2,3,10},
285         {1,4,10}, {15,1,10}, {14,1,10}, {4,2,10}
286     };
287
288     /* Table B-15, DCT coefficients table one,
289      * codes 000000100x ... 000000111x
290      */
291 static dct_lookup_t pl_DCT_tab1a[8] =
292     {
293         {5,2,9}, {5,2,9}, {14,1,9}, {14,1,9},
294         {2,4,10}, {16,1,10}, {15,1,9}, {15,1,9}
295     };
296
297     /* Table B-14/15, DCT coefficients table zero / one,
298      * codes 000000010000 ... 000000011111
299      */
300 static dct_lookup_t pl_DCT_tab2[16] =
301     {
302         {0,11,12}, {8,2,12}, {4,3,12}, {0,10,12},
303         {2,4,12}, {7,2,12}, {21,1,12}, {20,1,12},
304         {0,9,12}, {19,1,12}, {18,1,12}, {1,5,12},
305         {3,3,12}, {0,8,12}, {6,2,12}, {17,1,12}
306     };
307
308     /* Table B-14/15, DCT coefficients table zero / one,
309      * codes 0000000010000 ... 0000000011111
310      */
311 static dct_lookup_t pl_DCT_tab3[16] =
312     {
313         {10,2,13}, {9,2,13}, {5,3,13}, {3,4,13},
314         {2,5,13}, {1,7,13}, {1,6,13}, {0,15,13},
315         {0,14,13}, {0,13,13}, {0,12,13}, {26,1,13},
316         {25,1,13}, {24,1,13}, {23,1,13}, {22,1,13}
317     };
318
319     /* Table B-14/15, DCT coefficients table zero / one,
320      * codes 00000000010000 ... 00000000011111
321      */
322 static dct_lookup_t pl_DCT_tab4[16] =
323     {
324         {0,31,14}, {0,30,14}, {0,29,14}, {0,28,14},
325         {0,27,14}, {0,26,14}, {0,25,14}, {0,24,14},
326         {0,23,14}, {0,22,14}, {0,21,14}, {0,20,14},
327         {0,19,14}, {0,18,14}, {0,17,14}, {0,16,14}
328     };
329
330     /* Table B-14/15, DCT coefficients table zero / one,
331      *   codes 000000000010000 ... 000000000011111
332      */
333 static dct_lookup_t pl_DCT_tab5[16] =
334     {
335     {0,40,15}, {0,39,15}, {0,38,15}, {0,37,15},
336     {0,36,15}, {0,35,15}, {0,34,15}, {0,33,15},
337     {0,32,15}, {1,14,15}, {1,13,15}, {1,12,15},
338     {1,11,15}, {1,10,15}, {1,9,15}, {1,8,15}
339     };
340
341     /* Table B-14/15, DCT coefficients table zero / one,
342      * codes 0000000000010000 ... 0000000000011111
343      */
344 static dct_lookup_t pl_DCT_tab6[16] =
345     {
346         {1,18,16}, {1,17,16}, {1,16,16}, {1,15,16},
347         {6,3,16}, {16,2,16}, {15,2,16}, {14,2,16},
348         {13,2,16}, {12,2,16}, {11,2,16}, {31,1,16},
349         {30,1,16}, {29,1,16}, {28,1,16}, {27,1,16}
350     };
351 /*
352  * Initialization of lookup tables
353  */
354
355 /*****************************************************************************
356  * vpar_InitCrop : Initialize the crop table for saturation
357  *                 (ISO/IEC 13818-2 section 7.4.3)
358  *****************************************************************************/
359 #if defined(MPEG2_COMPLIANT) && !defined(VDEC_DFT)
360 void vpar_InitCrop( vpar_thread_t * p_vpar )
361 {
362     int i_dummy;
363
364     p_vpar->pi_crop = p_vpar->pi_crop_buf + 4096;
365
366     for( i_dummy = -4096; i_dummy < -2048; i_dummy++ )
367     {
368         p_vpar->pi_crop[i_dummy] = -2048;
369     }
370     for( ; i_dummy < 2047; i_dummy++ )
371     {
372         p_vpar->pi_crop[i_dummy] = i_dummy;
373     }
374     for( ; i_dummy < 4095; i_dummy++ )
375     {
376         p_vpar->pi_crop[i_dummy] = 2047;
377     }
378 }
379 #endif
380
381 /*****************************************************************************
382  * InitMbAddrInc : Initialize the lookup table for mb_addr_inc
383  *****************************************************************************/
384
385 /* Function for filling up the lookup table for mb_addr_inc */
386 static void __inline__ FillMbAddrIncTable( vpar_thread_t * p_vpar,
387                                     int i_start, int i_end, int i_step, 
388                                     int * pi_value, int i_length )
389 {
390     int i_pos, i_offset;
391     for( i_pos = i_start ; i_pos < i_end ; i_pos += i_step )
392     {
393         for( i_offset = 0 ; i_offset < i_step ; i_offset ++ )
394         {
395             p_vpar->pl_mb_addr_inc[i_pos + i_offset].i_value = * pi_value;
396             p_vpar->pl_mb_addr_inc[i_pos + i_offset].i_length = i_length;
397         }
398         (*pi_value)--;
399     }
400 }
401     
402 /* Function that initialize the table using the last one */
403 void vpar_InitMbAddrInc( vpar_thread_t * p_vpar )
404 {
405     int i_dummy;
406     int i_value;
407     
408     for( i_dummy = 0 ; i_dummy < 8 ; i_dummy++ )
409     {
410         p_vpar->pl_mb_addr_inc[i_dummy].i_value = MB_ERROR;
411         p_vpar->pl_mb_addr_inc[i_dummy].i_length = 0;
412     }
413
414     p_vpar->pl_mb_addr_inc[8].i_value = MB_ADDRINC_ESCAPE;
415     p_vpar->pl_mb_addr_inc[8].i_length = 11;
416
417     for( i_dummy = 9 ; i_dummy < 15 ; i_dummy ++ ) 
418     {
419         p_vpar->pl_mb_addr_inc[i_dummy].i_value =  MB_ERROR;
420         p_vpar->pl_mb_addr_inc[i_dummy].i_length = 0;
421     }
422
423     p_vpar->pl_mb_addr_inc[15].i_value = MB_ADDRINC_STUFFING;
424     p_vpar->pl_mb_addr_inc[15].i_length = 11;
425
426     for( i_dummy = 16; i_dummy < 24; i_dummy++ ) 
427     {
428         p_vpar->pl_mb_addr_inc[i_dummy].i_value =  MB_ERROR;
429         p_vpar->pl_mb_addr_inc[i_dummy].i_length = 0;
430     }
431     
432     i_value = 33;
433     
434     FillMbAddrIncTable( p_vpar, 24, 36, 1, &i_value, 11 );
435     FillMbAddrIncTable( p_vpar, 36, 48, 2, &i_value, 10 );
436     FillMbAddrIncTable( p_vpar, 48, 96, 8, &i_value, 8 );
437     FillMbAddrIncTable( p_vpar, 96, 128, 16, &i_value, 7 );
438     FillMbAddrIncTable( p_vpar, 128, 256, 64, &i_value, 5 );
439     FillMbAddrIncTable( p_vpar, 256, 512, 128, &i_value, 4 );
440     FillMbAddrIncTable( p_vpar, 512, 1024, 256, &i_value, 3 );
441     FillMbAddrIncTable( p_vpar, 1024, 2048, 1024, &i_value, 1 );
442 }
443
444 /*****************************************************************************
445  * Init*MBType : Initialize lookup table for the Macroblock type
446  *****************************************************************************/
447
448 /* Fonction for filling up the tables */
449 static void __inline__ FillMBType( vpar_thread_t * p_vpar,
450                                    int           i_mb_type,
451                                    int           i_start,
452                                    int           i_end,
453                                    int           i_value,
454                                    int           i_length )
455 {
456     int i_dummy;
457     
458     for( i_dummy = i_start ; i_dummy < i_end ; i_dummy++ )
459     {
460         p_vpar->ppl_mb_type[i_mb_type][i_dummy].i_value = i_value;
461         p_vpar->ppl_mb_type[i_mb_type][i_dummy].i_length = i_length;
462     }
463 }
464
465 /* Fonction that fills the table for P MB_Type */
466 void vpar_InitPMBType( vpar_thread_t * p_vpar )
467 {
468     FillMBType( p_vpar, 0, 32, 64, MB_MOTION_FORWARD|MB_PATTERN, 1 );
469     FillMBType( p_vpar, 0, 16, 32, MB_PATTERN, 2 );
470     FillMBType( p_vpar, 0, 8, 16, MB_MOTION_FORWARD, 3 );
471     FillMBType( p_vpar, 0, 6, 8, MB_INTRA, 5 );
472     FillMBType( p_vpar, 0, 4, 6, MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN, 5 );
473     FillMBType( p_vpar, 0, 2, 4, MB_QUANT|MB_PATTERN, 5 );
474     p_vpar->ppl_mb_type[0][1].i_value = MB_QUANT|MB_INTRA;
475     p_vpar->ppl_mb_type[0][1].i_length = 6;
476     p_vpar->ppl_mb_type[0][0].i_value = MB_ERROR;
477     p_vpar->ppl_mb_type[0][0].i_length = 0;
478 }
479
480 /* Fonction that fills the table for B MB_Type */
481 void vpar_InitBMBType( vpar_thread_t * p_vpar )
482 {
483     FillMBType( p_vpar, 1, 48, 64, MB_MOTION_FORWARD
484                                   |MB_MOTION_BACKWARD|MB_PATTERN, 2 );
485     FillMBType( p_vpar, 1, 32, 48, MB_MOTION_FORWARD|MB_MOTION_BACKWARD, 2 );
486     FillMBType( p_vpar, 1, 24, 32, MB_MOTION_BACKWARD|MB_PATTERN, 3 );
487     FillMBType( p_vpar, 1, 16, 24, MB_MOTION_BACKWARD, 3 );
488     FillMBType( p_vpar, 1, 12, 16, MB_MOTION_FORWARD|MB_PATTERN, 4 );
489     FillMBType( p_vpar, 1, 8, 12, MB_MOTION_FORWARD, 4 );
490     FillMBType( p_vpar, 1, 6, 8, MB_INTRA, 5 );
491     FillMBType( p_vpar, 1, 4, 6, MB_QUANT|MB_MOTION_FORWARD
492                                 |MB_MOTION_BACKWARD|MB_PATTERN, 5 );
493     p_vpar->ppl_mb_type[1][3].i_value = MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN;
494     p_vpar->ppl_mb_type[1][3].i_length = 6;
495     p_vpar->ppl_mb_type[1][2].i_value = MB_QUANT|MB_MOTION_BACKWARD|MB_PATTERN;
496     p_vpar->ppl_mb_type[1][2].i_length = 6;
497     p_vpar->ppl_mb_type[1][1].i_value = MB_QUANT|MB_INTRA;
498     p_vpar->ppl_mb_type[1][1].i_length = 6;
499     p_vpar->ppl_mb_type[1][0].i_value =MB_ERROR;
500     p_vpar->ppl_mb_type[1][0].i_length = 0;
501 }
502
503 /*****************************************************************************
504  * InitCodedPattern : Initialize the lookup table for decoding 
505  *                    coded block pattern
506  *****************************************************************************/
507 void vpar_InitCodedPattern( vpar_thread_t * p_vpar )
508 {
509     p_vpar->pl_coded_pattern = (lookup_t*) pl_coded_pattern_init_table;
510 }
511
512 /*****************************************************************************
513  * InitDCT : Initialize tables giving the length of the dct coefficient
514  *           from the vlc code
515  *****************************************************************************/
516
517 /* First fonction for filling the table */
518 static void __inline__ FillDCTTable( dct_lookup_t * p_tab_dest, dct_lookup_t * p_tab_src,
519                                      int i_step, int i_nb_elem, int i_offset )
520 {
521     int i_dummy, i_dummy2;
522
523     for( i_dummy=0 ; i_dummy < i_nb_elem ; i_dummy++ )
524     {
525         for( i_dummy2=0 ; i_dummy2 < i_step ; i_dummy2++ )
526         {
527             p_tab_dest[(i_dummy+i_offset)*i_step+i_dummy2] = p_tab_src[i_dummy];
528         }
529     }
530 }
531
532
533 /* Fonction that actually fills the table or create the pointers */
534 void vpar_InitDCTTables( vpar_thread_t * p_vpar )
535 {
536     /* Tables are cut in two parts to reduce memory occupation */    
537     p_vpar->pppl_dct_dc_size[0][0] = pl_dct_dc_lum_init_table_1;
538     p_vpar->pppl_dct_dc_size[0][1] = pl_dct_dc_lum_init_table_2;
539     p_vpar->pppl_dct_dc_size[1][0] = pl_dct_dc_chrom_init_table_1;
540     p_vpar->pppl_dct_dc_size[1][1] = pl_dct_dc_chrom_init_table_2;
541
542     memset( ppl_dct_coef[0], MB_ERROR, 16 );
543     memset( ppl_dct_coef[1], MB_ERROR, 16 );
544     
545     /* For table B14 & B15, we have a pointer to tables */
546     /* We fill the table thanks to the fonction defined above */
547     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab0, 256, 60,  4 );
548     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab1,  64,  8,  8 );
549     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab2,  16, 16, 16 );
550     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab3,   8, 16, 16 );
551     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab4,   4, 16, 16 );
552     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab5,   2, 16, 16 );
553     FillDCTTable( ppl_dct_coef[0], pl_DCT_tab6,   1, 16, 16 );
554
555     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab0a, 256, 60, 4 );
556     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab1a,  64,  8,  8 );
557     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab2,   16, 16, 16 );
558     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab3,    8, 16, 16 );
559     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab4,    4, 16, 16 );
560     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab5,    2, 16, 16 );
561     FillDCTTable( ppl_dct_coef[1], pl_DCT_tab6,    1, 16, 16 );
562 }
563
564 /*
565  * Macroblock parsing functions
566  */
567
568 /*****************************************************************************
569  * InitMacroblock : Initialize macroblock values
570  *****************************************************************************/
571 static __inline__ void InitMacroblock( vpar_thread_t * p_vpar,
572                                        macroblock_t * p_mb )
573 {
574     p_mb->p_picture = p_vpar->picture.p_picture;
575     p_mb->i_structure = p_vpar->picture.i_structure;
576     p_mb->i_current_structure = p_vpar->picture.i_current_structure;
577     p_mb->b_top_field_first = p_vpar->picture.b_top_field_first;
578     p_mb->i_l_x = p_vpar->mb.i_l_x;
579     p_mb->i_motion_l_y = p_mb->i_l_y = p_vpar->mb.i_l_y;
580     p_mb->i_c_x = p_vpar->mb.i_c_x;
581     p_mb->i_motion_c_y = p_mb->i_c_y = p_vpar->mb.i_c_y;
582     p_mb->i_chroma_nb_blocks = p_vpar->sequence.i_chroma_nb_blocks;
583     p_mb->b_P_coding_type = ( p_vpar->picture.i_coding_type == P_CODING_TYPE );
584
585     if( (p_vpar->picture.i_coding_type == P_CODING_TYPE) ||
586         (p_vpar->picture.i_coding_type == B_CODING_TYPE) )
587         p_mb->p_forward = p_vpar->sequence.p_forward;
588     else
589         p_mb->p_forward = NULL;
590     if( p_vpar->picture.i_coding_type == B_CODING_TYPE )
591         p_mb->p_backward = p_vpar->sequence.p_backward;
592     else
593         p_mb->p_backward = NULL;
594
595     p_mb->i_addb_l_stride = (p_mb->i_l_stride = p_vpar->picture.i_l_stride) - 8;
596     p_mb->i_addb_c_stride = (p_mb->i_c_stride = p_vpar->picture.i_c_stride) - 8;
597
598     /* Update macroblock real position. */
599     p_vpar->mb.i_l_x += 16;
600     p_vpar->mb.i_l_y += (p_vpar->mb.i_l_x / p_vpar->sequence.i_width)
601                         * (2 - p_vpar->picture.b_frame_structure) * 16;
602     p_vpar->mb.i_l_x %= p_vpar->sequence.i_width;
603
604     p_vpar->mb.i_c_x += p_vpar->sequence.i_chroma_mb_width;
605     p_vpar->mb.i_c_y += (p_vpar->mb.i_c_x / p_vpar->sequence.i_chroma_width)
606                         * (2 - p_vpar->picture.b_frame_structure)
607                         * p_vpar->sequence.i_chroma_mb_height;
608     p_vpar->mb.i_c_x %= p_vpar->sequence.i_chroma_width;
609     if( (p_mb->b_motion_field = p_vpar->picture.b_motion_field) )
610     {
611         p_mb->i_motion_l_y--;
612         p_mb->i_motion_c_y--;
613     }
614 }
615
616 /*****************************************************************************
617  * MacroblockAddressIncrement : Get the macroblock_address_increment field
618  *****************************************************************************/
619 static __inline__ int MacroblockAddressIncrement( vpar_thread_t * p_vpar )
620 {
621     int i_addr_inc = 0;
622     /* Index in the lookup table mb_addr_inc */
623     int    i_index = ShowBits( &p_vpar->bit_stream, 11 );
624         
625     /* Test the presence of the escape character */
626     while( i_index == 8 )
627     {
628         RemoveBits( &p_vpar->bit_stream, 11 );
629         i_addr_inc += 33;
630         i_index = ShowBits( &p_vpar->bit_stream, 11 );
631     }
632      
633     /* Affect the value from the lookup table */
634     i_addr_inc += p_vpar->pl_mb_addr_inc[i_index].i_value;
635     
636     /* Dump the good number of bits */
637     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_mb_addr_inc[i_index].i_length );
638     
639     return i_addr_inc;
640 }
641
642 /*****************************************************************************
643  * MacroblockModes : Get the macroblock_modes structure
644  *****************************************************************************/
645 static __inline__ void MacroblockModes( vpar_thread_t * p_vpar,
646                                         macroblock_t * p_mb )
647 {
648     static f_motion_t   pppf_motion[4][2][4] =
649       {
650         { {NULL, NULL, NULL, NULL},
651           {NULL, NULL, NULL, NULL}
652         },
653         { {NULL, vdec_MotionFieldField420, vdec_MotionField16x8420, vdec_MotionFieldDMV},
654           {NULL, vdec_MotionFrameField420, vdec_MotionFrameFrame420, vdec_MotionFrameDMV}
655         },
656         { {NULL, vdec_MotionFieldField422, vdec_MotionField16x8422, vdec_MotionFieldDMV},
657           {NULL, vdec_MotionFrameField422, vdec_MotionFrameFrame422, vdec_MotionFrameDMV}
658         },
659         { {NULL, vdec_MotionFieldField444, vdec_MotionField16x8444, vdec_MotionFieldDMV},
660           {NULL, vdec_MotionFrameField444, vdec_MotionFrameFrame444, vdec_MotionFrameDMV}
661         }
662       };
663     static int          ppi_mv_count[2][4] = { {0, 1, 2, 1}, {0, 2, 1, 1} };
664     static int          ppi_mv_format[2][4] = { {0, 1, 1, 1}, {0, 1, 2, 1} };
665
666     /* Get macroblock_type. */
667     p_vpar->mb.i_mb_type = (p_vpar->picture.pf_macroblock_type)( p_vpar );
668     p_mb->i_mb_type = p_vpar->mb.i_mb_type;
669     
670     /* SCALABILITY : warning, we don't know if spatial_temporal_weight_code
671      * has to be dropped, take care if you use scalable streams. */
672     /* RemoveBits( &p_vpar->bit_stream, 2 ); */
673     
674     if( !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD | MB_MOTION_BACKWARD)) )
675     {
676         /* If mb_type has neither MOTION_FORWARD nor MOTION_BACKWARD, this
677          * is useless, but also harmless. */
678         p_vpar->mb.i_motion_type = MOTION_FRAME;
679     }
680     else
681     {
682         if( p_vpar->picture.i_structure == FRAME_STRUCTURE
683             && p_vpar->picture.b_frame_pred_frame_dct )
684         {
685             p_vpar->mb.i_motion_type = MOTION_FRAME;
686         }
687         else
688         {
689             p_vpar->mb.i_motion_type = GetBits( &p_vpar->bit_stream, 2 );
690         }
691     }
692    
693     if( p_mb->b_P_coding_type && !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD|MB_INTRA)) )
694     {
695         /* Special No-MC macroblock in P pictures (7.6.3.5). */
696         memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
697         memset( p_mb->pppi_motion_vectors, 0, 8*sizeof(int) );
698         p_vpar->mb.i_motion_type = MOTION_FRAME;
699         p_mb->ppi_field_select[0][0] = ( p_vpar->picture.i_current_structure == BOTTOM_FIELD );
700     }
701
702      if( p_vpar->mb.i_mb_type & MB_INTRA )
703     {
704         /* For the intra macroblocks, we use an empty motion
705          * compensation function */
706         p_mb->pf_motion = vdec_MotionDummy;
707     }
708     else
709     {
710         p_mb->pf_motion = pppf_motion[p_vpar->sequence.i_chroma_format]
711                                      [p_vpar->picture.b_frame_structure]
712                                      [p_vpar->mb.i_motion_type];
713     }
714
715     p_vpar->mb.i_mv_count = ppi_mv_count[p_vpar->picture.b_frame_structure]
716                                         [p_vpar->mb.i_motion_type];
717     p_vpar->mb.i_mv_format = ppi_mv_format[p_vpar->picture.b_frame_structure]
718                                           [p_vpar->mb.i_motion_type];
719     
720
721     p_vpar->mb.b_dct_type = 0;
722     if( (p_vpar->picture.i_structure == FRAME_STRUCTURE) &&
723         (!p_vpar->picture.b_frame_pred_frame_dct) &&
724         (p_vpar->mb.i_mb_type & (MB_PATTERN|MB_INTRA)) )
725     {
726         if( (p_vpar->mb.b_dct_type = GetBits( &p_vpar->bit_stream, 1 )) )
727         {
728             /* The DCT is coded on fields. Jump one line between each
729              * sample. */
730             p_mb->i_addb_l_stride <<= 1;
731             p_mb->i_addb_l_stride += 8;
732             /* With CHROMA_420, the DCT is necessarily frame-coded. */
733             if( p_vpar->sequence.i_chroma_format != CHROMA_420 )
734             {
735                 p_mb->i_addb_c_stride <<= 1;
736                 p_mb->i_addb_c_stride += 8;
737             }
738         }
739     }
740     p_vpar->mb.b_dmv = p_vpar->mb.i_motion_type == MOTION_DMV;
741 }
742      
743 /*****************************************************************************
744  * vpar_ParseMacroblock : Parse the next macroblock
745  *****************************************************************************/
746 void vpar_ParseMacroblock( vpar_thread_t * p_vpar, int * pi_mb_address,
747                            int i_mb_previous, int i_mb_base )
748 {
749     static f_decode_block_t pppf_decode_block[2][2] =
750                 { {vpar_DecodeMPEG1Non, vpar_DecodeMPEG1Intra},
751                   {vpar_DecodeMPEG2Non, vpar_DecodeMPEG2Intra} };
752     static int      pi_x[12] = {0,8,0,8,0,0,0,0,8,8,8,8};
753     static int      pi_y[2][12] = { {0,0,8,8,0,0,8,8,0,0,8,8},
754                                     {0,0,1,1,0,0,1,1,0,0,1,1} };
755
756     int             i_mb, i_b, i_mask;
757     macroblock_t *  p_mb;
758     yuv_data_t *    p_data1;
759     yuv_data_t *    p_data2;
760
761     /************* DEBUG *************/
762     int i_inc;
763     static int i_count;
764 i_count++;
765
766     i_inc = MacroblockAddressIncrement( p_vpar );
767     *pi_mb_address += i_inc;
768     //*pi_mb_address += MacroblockAddressIncrement( p_vpar );
769
770     for( i_mb = i_mb_previous + 1; i_mb < *pi_mb_address; i_mb++ )
771     {
772         /* Skipped macroblock (ISO/IEC 13818-2 7.6.6). */
773         static int          pi_dc_dct_reinit[4] = {128,256,512,1024};
774         static f_motion_t   pf_motion_skipped[4][4] =
775           {
776             {NULL, NULL, NULL, NULL},
777             {NULL, vdec_MotionFieldField420, vdec_MotionFieldField420, vdec_MotionFrameFrame420},
778             {NULL, vdec_MotionFieldField422, vdec_MotionFieldField422, vdec_MotionFrameFrame422},
779             {NULL, vdec_MotionFieldField444, vdec_MotionFieldField444, vdec_MotionFrameFrame444},
780           };
781
782         /* Reset DC predictors (7.2.1). */
783         p_vpar->slice.pi_dc_dct_pred[0] = p_vpar->slice.pi_dc_dct_pred[1]
784             = p_vpar->slice.pi_dc_dct_pred[2]
785             = pi_dc_dct_reinit[p_vpar->picture.i_intra_dc_precision];
786
787         if( p_vpar->picture.i_coding_type == P_CODING_TYPE )
788         {
789             /* Reset motion vector predictors (ISO/IEC 13818-2 7.6.3.4). */
790             memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
791         }
792
793         if( (p_mb = p_vpar->picture.pp_mb[i_mb_base + i_mb] =
794              vpar_NewMacroblock( &p_vpar->vfifo )) == NULL )
795         {
796             p_vpar->picture.b_error = 1;
797             intf_ErrMsg("vpar error: macroblock list is empty !\n");
798             return;
799         }
800
801         InitMacroblock( p_vpar, p_mb );
802        
803         /* Motion type is picture structure. */
804         p_mb->pf_motion = pf_motion_skipped[p_vpar->sequence.i_chroma_format]
805                                            [p_vpar->picture.i_structure];
806         p_mb->i_mb_type = MB_MOTION_FORWARD;
807         p_mb->i_coded_block_pattern = 0;
808         memset( p_mb->pppi_motion_vectors, 0, 8*sizeof(int) );
809
810         /* Set the field we use for motion compensation */
811         p_mb->ppi_field_select[0][0] = p_mb->ppi_field_select[0][1]
812                                      = ( p_vpar->picture.i_current_structure == BOTTOM_FIELD );
813     }
814
815     /* Get a macroblock structure. */
816     if( (p_mb = p_vpar->picture.pp_mb[i_mb_base + *pi_mb_address] =
817          vpar_NewMacroblock( &p_vpar->vfifo )) == NULL )
818     {
819         p_vpar->picture.b_error = 1;
820         intf_ErrMsg("vpar error: macroblock list is empty !\n");
821         return;
822     }
823
824     InitMacroblock( p_vpar, p_mb );
825
826     /* Parse off macroblock_modes structure. */
827     MacroblockModes( p_vpar, p_mb );
828
829     if( p_vpar->mb.i_mb_type & MB_QUANT )
830     {
831         LoadQuantizerScale( p_vpar );
832     }
833
834     if( p_vpar->mb.i_mb_type & MB_MOTION_FORWARD )
835     {
836 //fprintf( stderr, "motion !\n" );
837         (*p_vpar->sequence.pf_decode_mv)( p_vpar, p_mb, 0 );
838     }
839
840     if( p_vpar->mb.i_mb_type & MB_MOTION_BACKWARD )
841     {
842 //fprintf( stderr, "motion2 !\n" );    
843         (*p_vpar->sequence.pf_decode_mv)( p_vpar, p_mb, 1 );
844     }
845
846     if( p_vpar->picture.b_concealment_mv && (p_vpar->mb.i_mb_type & MB_INTRA) )
847     {
848         RemoveBits( &p_vpar->bit_stream, 1 );
849     }
850 if( 0 )        
851     //i_count == 1231 &&
852     // i_count != *pi_mb_address)
853     //p_vpar->picture.i_coding_type == P_CODING_TYPE )
854 {
855     fprintf( stderr, "i_count = %d (%d)\n", i_count, p_vpar->mb.i_mb_type );
856      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
857      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
858      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
859      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
860      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
861      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
862      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
863      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
864      exit(0);
865 }
866
867     if( p_vpar->mb.i_mb_type & MB_PATTERN )
868     {
869         p_mb->i_coded_block_pattern = p_vpar->mb.i_coded_block_pattern = (*p_vpar->sequence.pf_decode_pattern)( p_vpar );
870 //fprintf( stderr, "pattern : %d\n", p_vpar->mb.i_coded_block_pattern );
871     }
872     else
873     {
874         int     pi_coded_block_pattern[2] = {0,
875                     (1 << (4+p_vpar->sequence.i_chroma_nb_blocks)) - 1};
876         p_mb->i_coded_block_pattern = p_vpar->mb.i_coded_block_pattern = pi_coded_block_pattern
877                                     [p_vpar->mb.i_mb_type & MB_INTRA];
878     }
879             
880     /*
881      * Effectively decode blocks.
882      */
883
884     i_mask = 1 << (3 + p_vpar->sequence.i_chroma_nb_blocks);
885
886     /* luminance */
887     p_data1 = p_mb->p_picture->p_y
888               + p_mb->i_l_x + p_mb->i_l_y*(p_vpar->sequence.i_width);
889
890     for( i_b = 0 ; i_b < 4 ; i_b++, i_mask >>= 1 )
891     {
892         if( p_vpar->mb.i_coded_block_pattern & i_mask )
893         {
894             memset( p_mb->ppi_blocks[i_b], 0, 64*sizeof(dctelem_t) );
895             (*pppf_decode_block[p_vpar->sequence.b_mpeg2]
896                                [p_vpar->mb.i_mb_type & MB_INTRA])
897                 ( p_vpar, p_mb, i_b );
898      
899             /* Calculate block coordinates. */
900             p_mb->p_data[i_b] = p_data1
901                                 + pi_y[p_vpar->mb.b_dct_type][i_b]
902                                 * p_vpar->sequence.i_width
903                                 + pi_x[i_b];
904         }
905     }
906
907     /* chrominance */
908     p_data1 = p_mb->p_picture->p_u
909               + p_mb->i_c_x
910               + p_mb->i_c_y
911                 * (p_vpar->sequence.i_chroma_width);
912     p_data2 = p_mb->p_picture->p_v
913                + p_mb->i_c_x
914                + p_mb->i_c_y
915                 * (p_vpar->sequence.i_chroma_width);
916     
917     for( i_b = 4; i_b < 4 + p_vpar->sequence.i_chroma_nb_blocks;
918          i_b++, i_mask >>= 1 )
919     {
920         yuv_data_t *    pp_data[2] = {p_data1, p_data2};
921
922         if( p_vpar->mb.i_coded_block_pattern & i_mask )
923         {
924             memset( p_mb->ppi_blocks[i_b], 0, 64*sizeof(dctelem_t) );
925             (*pppf_decode_block[p_vpar->sequence.b_mpeg2]
926                                [p_vpar->mb.i_mb_type & MB_INTRA])
927                 ( p_vpar, p_mb, i_b );
928
929             /* Calculate block coordinates. */
930             p_mb->p_data[i_b] = pp_data[i_b & 1]
931                                  + pi_y[p_vpar->mb.b_dct_type][i_b]
932                                    * p_vpar->sequence.i_chroma_width
933                                  + pi_x[i_b];
934         }
935     }
936
937     if( !( p_vpar->mb.i_mb_type & MB_INTRA ) )
938     {
939         static int          pi_dc_dct_reinit[4] = {128,256,512,1024};
940
941         /* Reset DC predictors (7.2.1). */
942         p_vpar->slice.pi_dc_dct_pred[0] = p_vpar->slice.pi_dc_dct_pred[1]
943             = p_vpar->slice.pi_dc_dct_pred[2]
944             = pi_dc_dct_reinit[p_vpar->picture.i_intra_dc_precision];
945     }
946     else if( !p_vpar->picture.b_concealment_mv )
947     {
948         /* Reset MV predictors. */
949         memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
950     }
951
952     if( p_mb->b_P_coding_type && !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD|MB_INTRA)) )
953     {
954         p_mb->i_mb_type |= MB_MOTION_FORWARD;
955     }
956 /*
957 if(  p_vpar->picture.i_coding_type != I_CODING_TYPE )//!(p_mb->b_P_coding_type & MB_INTRA) )
958 {
959     p_mb->i_mb_type |= MB_MOTION_FORWARD;
960 }
961 */    
962  if( 0 )        
963     //i_count == 249)
964     // i_count != *pi_mb_address)
965     //b_stop )
966 {
967     fprintf( stderr, "i_count = %d (%d)\n", i_count, i_inc );
968      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
969      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
970      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
971      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
972      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
973      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
974      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
975      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
976      exit(0);
977 }
978 }
979
980 /*****************************************************************************
981  * vpar_IMBType : macroblock_type in I pictures
982  *****************************************************************************/
983 int vpar_IMBType( vpar_thread_t * p_vpar )
984 {
985     /* Take two bits for testing */
986     int                 i_type = ShowBits( &p_vpar->bit_stream, 2 );
987     
988     /* Lookup table for macroblock_type */
989     static lookup_t     pl_mb_Itype[4] = { {MB_ERROR, 0},
990                                            {MB_QUANT|MB_INTRA, 2},
991                                            {MB_INTRA, 1},
992                                            {MB_INTRA, 1} };
993     /* Dump the good number of bits */
994     RemoveBits( &p_vpar->bit_stream, pl_mb_Itype[i_type].i_length );
995     return pl_mb_Itype[i_type].i_value;
996 }
997
998 /*****************************************************************************
999  * vpar_PMBType : macroblock_type in P pictures
1000  *****************************************************************************/
1001 int vpar_PMBType( vpar_thread_t * p_vpar )
1002 {
1003     /* Testing on 6 bits */
1004     int                i_type = ShowBits( &p_vpar->bit_stream, 6 );
1005     
1006 #if 0   
1007 /* Table B-3, macroblock_type in P-pictures, codes 001..1xx */
1008 static lookup_t PMBtab0[8] = {
1009   {-1,0},
1010   {MB_MOTION_FORWARD,3},
1011   {MB_PATTERN,2}, {MB_PATTERN,2},
1012   {MB_MOTION_FORWARD|MB_PATTERN,1}, 
1013   {MB_MOTION_FORWARD|MB_PATTERN,1},
1014   {MB_MOTION_FORWARD|MB_PATTERN,1}, 
1015   {MB_MOTION_FORWARD|MB_PATTERN,1}
1016 };
1017
1018 /* Table B-3, macroblock_type in P-pictures, codes 000001..00011x */
1019 static lookup_t PMBtab1[8] = {
1020   {-1,0},
1021   {MB_QUANT|MB_INTRA,6},
1022   {MB_QUANT|MB_PATTERN,5}, {MB_QUANT|MB_PATTERN,5},
1023   {MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN,5}, {MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN,5},
1024   {MB_INTRA,5}, {MB_INTRA,5}
1025 };
1026
1027
1028   if(i_type >= 8)      
1029   {
1030     i_type >>= 3;
1031     RemoveBits( &p_vpar->bit_stream,PMBtab0[i_type].i_length );
1032     return PMBtab0[i_type].i_value;
1033   }
1034
1035   if (i_type==0)
1036   {
1037       printf("Invalid P macroblock_type code\n");
1038     return -1;
1039   }
1040     RemoveBits( &p_vpar->bit_stream,PMBtab1[i_type].i_length );
1041  return PMBtab1[i_type].i_value;
1042 #endif
1043     /* Dump the good number of bits */
1044     RemoveBits( &p_vpar->bit_stream, p_vpar->ppl_mb_type[0][i_type].i_length );
1045     /* return the value from the lookup table for P type */
1046     return p_vpar->ppl_mb_type[0][i_type].i_value;
1047 }
1048
1049 /*****************************************************************************
1050  * vpar_BMBType : macroblock_type in B pictures
1051  *****************************************************************************/
1052 int vpar_BMBType( vpar_thread_t * p_vpar )
1053 {
1054      /* Testing on 6 bits */
1055     int                i_type = ShowBits( &p_vpar->bit_stream, 6 );
1056     
1057     /* Dump the good number of bits */
1058     RemoveBits( &p_vpar->bit_stream, p_vpar->ppl_mb_type[1][i_type].i_length );
1059     
1060     /* return the value from the lookup table for B type */
1061     return p_vpar->ppl_mb_type[1][i_type].i_value;
1062 }
1063
1064 /*****************************************************************************
1065  * vpar_DMBType : macroblock_type in D pictures
1066  *****************************************************************************/
1067 int vpar_DMBType( vpar_thread_t * p_vpar )
1068 {
1069     /* Taking 1 bit */
1070     int               i_type = GetBits( &p_vpar->bit_stream, 1 );
1071     
1072     /* Lookup table */
1073     static int        pi_mb_Dtype[2] = { MB_ERROR, 1 };
1074     
1075     return pi_mb_Dtype[i_type];
1076 }
1077
1078 /*****************************************************************************
1079  * vpar_CodedPattern420 : coded_block_pattern with 420 chroma
1080  *****************************************************************************/
1081 int vpar_CodedPattern420( vpar_thread_t * p_vpar )
1082 {
1083     /* Take the max 9 bits length vlc code for testing */
1084     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1085     
1086     /* Trash the good number of bits read in  the lookup table */
1087     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1088     
1089     /* return the value from the vlc table */
1090     return p_vpar->pl_coded_pattern[i_vlc].i_value;
1091 }
1092
1093 /*****************************************************************************
1094  * vpar_CodedPattern422 : coded_block_pattern with 422 chroma
1095  *****************************************************************************/
1096 int vpar_CodedPattern422( vpar_thread_t * p_vpar )
1097 {
1098     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1099     
1100     /* Supplementary 2 bits long code for 422 format */
1101     int      i_coded_block_pattern_1;
1102     
1103     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1104     i_coded_block_pattern_1 = GetBits( &p_vpar->bit_stream, 2 );
1105     
1106     /* the code is just to be added to the value found in the table */
1107     return p_vpar->pl_coded_pattern[i_vlc].i_value |
1108            (i_coded_block_pattern_1 << 6);
1109 }
1110
1111 /*****************************************************************************
1112  * vpar_CodedPattern444 : coded_block_pattern with 444 chroma
1113  *****************************************************************************/
1114 int vpar_CodedPattern444( vpar_thread_t * p_vpar )
1115 {
1116     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1117     int      i_coded_block_pattern_2;
1118     
1119     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1120     i_coded_block_pattern_2 = GetBits( &p_vpar->bit_stream, 6 );
1121     
1122     return p_vpar->pl_coded_pattern[i_vlc].i_value |
1123            ( i_coded_block_pattern_2 << 6 );
1124 }
1125
1126 /*****************************************************************************
1127  * vpar_DecodeMPEG1Non : decode MPEG-1 non-intra blocks
1128  *****************************************************************************/
1129 static void vpar_DecodeMPEG1Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1130 {
1131
1132     if( p_vpar->picture.i_coding_type == D_CODING_TYPE )
1133     {
1134         /* Remove end_of_macroblock (always 1, prevents startcode emulation)
1135          * ISO/IEC 11172-2 section 2.4.2.7 and 2.4.3.6 */
1136         RemoveBits( &p_vpar->bit_stream, 1 );
1137     }
1138 }
1139
1140 /*****************************************************************************
1141  * vpar_DecodeMPEG1Intra : decode MPEG-1 intra blocks
1142  *****************************************************************************/
1143 static void vpar_DecodeMPEG1Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1144 {
1145
1146     if( p_vpar->picture.i_coding_type == D_CODING_TYPE )
1147     {
1148         /* Remove end_of_macroblock (always 1, prevents startcode emulation)
1149          * ISO/IEC 11172-2 section 2.4.2.7 and 2.4.3.6 */
1150         RemoveBits( &p_vpar->bit_stream, 1 );
1151     }
1152 }
1153
1154 /*****************************************************************************
1155  * vpar_DecodeMPEG2Non : decode MPEG-2 non-intra blocks
1156  *****************************************************************************/
1157 static void vpar_DecodeMPEG2Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1158 {
1159     int         i_parse;
1160     int         i_nc;
1161     int         i_cc;
1162     int         i_coef;
1163     int         i_type;
1164     int         i_code;
1165     int         i_length;
1166     int         i_pos;
1167     int         i_run;
1168     int         i_level;
1169     int         i_quant_type;
1170     boolean_t   b_sign;
1171     int *       ppi_quant[2];
1172     
1173     /* Lookup Table for the chromatic component */
1174     static int pi_cc_index[12] = { 0, 0, 0, 0, 1, 2, 1, 2, 1, 2 };
1175
1176     i_cc = pi_cc_index[i_b];
1177
1178     /* Determine whether it is luminance or not (chrominance) */
1179     i_type = ( i_cc + 1 ) >> 1;
1180     i_quant_type = (!i_type) || (p_vpar->sequence.i_chroma_format == CHROMA_420);
1181     
1182     /* Give a pointer to the quantization matrices for intra blocks */
1183     ppi_quant[1] = p_vpar->sequence.nonintra_quant.pi_matrix;
1184     ppi_quant[0] = p_vpar->sequence.chroma_nonintra_quant.pi_matrix;
1185
1186     /* Decoding of the AC coefficients */
1187     
1188     i_nc = 0;
1189     i_coef = 0;
1190     for( i_parse = 0; ; i_parse++ )
1191     {
1192         i_code = ShowBits( &p_vpar->bit_stream, 16 );
1193         if( i_code >= 16384 )
1194         {
1195             if( i_parse == 0 )
1196             {
1197                 i_run =     pl_DCT_tab_dc[(i_code>>12)-4].i_run;
1198                 i_level =   pl_DCT_tab_dc[(i_code>>12)-4].i_level;
1199                 i_length =  pl_DCT_tab_dc[(i_code>>12)-4].i_length;
1200             }
1201             else
1202             {
1203                 i_run =     pl_DCT_tab_ac[(i_code>>12)-4].i_run;
1204                 i_level =   pl_DCT_tab_ac[(i_code>>12)-4].i_level;
1205                 i_length =  pl_DCT_tab_ac[(i_code>>12)-4].i_length;
1206              }
1207         }
1208         else if( i_code >= 1024 )
1209         {
1210             i_run =     pl_DCT_tab0[(i_code>>8)-4].i_run;
1211             i_length =  pl_DCT_tab0[(i_code>>8)-4].i_length;
1212             i_level =   pl_DCT_tab0[(i_code>>8)-4].i_level;            
1213         }
1214         else
1215         {
1216             i_run =     ppl_dct_coef[0][i_code].i_run;
1217             i_length =  ppl_dct_coef[0][i_code].i_length;
1218             i_level =   ppl_dct_coef[0][i_code].i_level;
1219         }
1220
1221         
1222         RemoveBits( &p_vpar->bit_stream, i_length );
1223
1224         switch( i_run )
1225         {
1226             case DCT_ESCAPE:
1227                 i_run = GetBits( &p_vpar->bit_stream, 6 );
1228                 i_level = GetBits( &p_vpar->bit_stream, 12 );
1229                 i_level = (b_sign = ( i_level > 2047 )) ? 4096 - i_level
1230                                                         : i_level;
1231                 break;
1232             case DCT_EOB:
1233                 if( i_nc <= 1 )
1234                 {
1235                     p_mb->pf_idct[i_b] = vdec_SparseIDCT;
1236                     p_mb->pi_sparse_pos[i_b] = i_coef;
1237                 }
1238                 else
1239                 {
1240                     p_mb->pf_idct[i_b] = vdec_IDCT;
1241                 }
1242                 return;
1243
1244                 break;
1245             default:
1246                 b_sign = GetBits( &p_vpar->bit_stream, 1 );
1247         }
1248         i_coef = i_parse;
1249         i_parse += i_run;
1250         i_nc ++;
1251
1252 if( i_parse >= 64 )
1253 {
1254     break;
1255 }
1256         
1257         i_pos = pi_scan[p_vpar->picture.b_alternate_scan][i_parse];
1258         i_level = ( ((i_level << 1) + 1) * p_vpar->slice.i_quantizer_scale 
1259                     * ppi_quant[i_quant_type][i_pos] ) >> 5;
1260         p_mb->ppi_blocks[i_b][i_pos] = b_sign ? -i_level : i_level;
1261     }
1262 fprintf( stderr, "Non intra MPEG2 end (%d)\n", i_b );
1263 //p_vpar->picture.b_error = 1;
1264 }
1265
1266 /*****************************************************************************
1267  * vpar_DecodeMPEG2Intra : decode MPEG-2 intra blocks
1268  *****************************************************************************/
1269 static void vpar_DecodeMPEG2Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1270 {
1271     int         i_parse;
1272     int         i_nc;
1273     int         i_cc;
1274     int         i_coef;
1275     int         i_type, i_quant_type;
1276     int         i_code;
1277     int         i_length;
1278     int         i_pos;
1279     int         i_dct_dc_size;
1280     int         i_dct_dc_diff;
1281     int         i_run;
1282     int         i_level;
1283     boolean_t   b_vlc_intra;
1284     boolean_t   b_sign;
1285     int *       ppi_quant[2];
1286     
1287     /* Lookup Table for the chromatic component */
1288     static int pi_cc_index[12] = { 0, 0, 0, 0, 1, 2, 1, 2, 1, 2 };
1289     i_cc = pi_cc_index[i_b];
1290
1291     /* Determine whether it is luminance or not (chrominance) */
1292     i_type = ( i_cc + 1 ) >> 1;
1293     i_quant_type = (!i_type) | (p_vpar->sequence.i_chroma_format == CHROMA_420);
1294
1295     /* Give a pointer to the quantization matrices for intra blocks */
1296     ppi_quant[1] = p_vpar->sequence.intra_quant.pi_matrix;
1297     ppi_quant[0] = p_vpar->sequence.chroma_intra_quant.pi_matrix;
1298
1299 #if 0    
1300     /* Decoding of the DC intra coefficient */
1301     /* The nb of bits to parse depends on i_type */
1302     i_code = ShowBits( &p_vpar->bit_stream, 9 + i_type );
1303     
1304     /* To reduce memory occupation, there are two lookup tables
1305      * See InitDCT above */
1306     i_code5 = i_code >> (4+i_type);
1307     
1308     /* Shall we lookup in the first or in the second table ? */
1309     i_select = ( i_code5 == 31 );
1310     /* Offset value for looking in the second table */
1311     i_offset = 0x1f0 + ( i_type * 0x1f0 );
1312     i_pos = ( i_code5 * ( ! i_select ) ) + ( ( i_code - i_offset ) * i_select );
1313     i_dct_dc_size = p_vpar->pppl_dct_dc_size[i_type][i_select][i_pos].i_value;
1314 #endif
1315     
1316     if( !i_type/*i_b < 4*/ )
1317     {
1318         /* decode length */
1319         i_code = ShowBits(&p_vpar->bit_stream, 5);
1320         if (i_code<31)
1321         {
1322             i_dct_dc_size = pl_dct_dc_lum_init_table_1[i_code].i_value;
1323             i_length = pl_dct_dc_lum_init_table_1[i_code].i_length;
1324             RemoveBits( &p_vpar->bit_stream, i_length);
1325         }
1326         else
1327         {
1328             i_code = ShowBits(&p_vpar->bit_stream, 9) - 0x1f0;
1329             i_dct_dc_size = pl_dct_dc_lum_init_table_2[i_code].i_value;
1330             i_length = pl_dct_dc_lum_init_table_2[i_code].i_length;
1331             RemoveBits( &p_vpar->bit_stream, i_length);
1332         }
1333     }
1334     else
1335     {
1336         /* decode length */
1337         i_code = ShowBits(&p_vpar->bit_stream, 5);
1338
1339         if (i_code<31)
1340         {
1341             i_dct_dc_size = pl_dct_dc_chrom_init_table_1[i_code].i_value;
1342             i_length = pl_dct_dc_chrom_init_table_1[i_code].i_length;
1343             RemoveBits(&p_vpar->bit_stream, i_length);
1344         }
1345         else
1346         {
1347             i_code = ShowBits(&p_vpar->bit_stream, 10) - 0x3e0;
1348             i_dct_dc_size = pl_dct_dc_chrom_init_table_2[i_code].i_value;
1349             i_length = pl_dct_dc_chrom_init_table_2[i_code].i_length;
1350             RemoveBits( &p_vpar->bit_stream, i_length);
1351         }
1352     }
1353     if (i_dct_dc_size==0)
1354         i_dct_dc_diff = 0;
1355     else
1356     {
1357         i_dct_dc_diff = GetBits( &p_vpar->bit_stream, i_dct_dc_size);
1358         if ((i_dct_dc_diff & (1<<(i_dct_dc_size-1)))==0)
1359             i_dct_dc_diff-= (1<<i_dct_dc_size) - 1;
1360     }
1361
1362     /* Dump the variable length code */
1363     //RemoveBits( &p_vpar->bit_stream, 
1364     //          p_vpar->pppl_dct_dc_size[i_type][i_select][i_pos].i_length );
1365     
1366     /* Read the actual code with the good length */
1367     p_vpar->slice.pi_dc_dct_pred[i_cc] += i_dct_dc_diff;
1368
1369     p_mb->ppi_blocks[i_b][0] = ( p_vpar->slice.pi_dc_dct_pred[i_cc] <<
1370                                ( 3 - p_vpar->picture.i_intra_dc_precision ) );
1371     i_nc = ( p_vpar->slice.pi_dc_dct_pred[i_cc] != 0 );
1372
1373 //fprintf( stderr, "coucou\n" );
1374     /* Decoding of the AC coefficients */
1375     
1376     i_coef = 0;
1377     b_vlc_intra = p_vpar->picture.b_intra_vlc_format;
1378     for( i_parse = 1; /*i_parse < 64*/; i_parse++ )
1379     {
1380         i_code = ShowBits( &p_vpar->bit_stream, 16 );
1381         if( i_code >= 16384 )
1382         {
1383             if( b_vlc_intra )
1384             {
1385                 i_run =     pl_DCT_tab0a[(i_code>>8)-4].i_run;
1386                 i_level =   pl_DCT_tab0a[(i_code>>8)-4].i_level;
1387                 i_length =  pl_DCT_tab0a[(i_code>>8)-4].i_length;
1388 //fprintf( stderr, "**********> %d, %d, %d *******\n", i_run, i_level, (i_code>>8)-4 );
1389             }
1390             else
1391             {
1392                 i_run =     pl_DCT_tab_ac[(i_code>>12)-4].i_run;
1393                 i_level =   pl_DCT_tab_ac[(i_code>>12)-4].i_level;
1394                 i_length =  pl_DCT_tab_ac[(i_code>>12)-4].i_length;
1395              }
1396         }
1397         else
1398         {
1399             i_run =     ppl_dct_coef[b_vlc_intra][i_code].i_run;
1400             i_length =  ppl_dct_coef[b_vlc_intra][i_code].i_length;
1401             i_level =   ppl_dct_coef[b_vlc_intra][i_code].i_level;
1402         }
1403
1404 #if 0
1405         {
1406             int code = i_code;
1407             int intra_vlc_format = b_vlc_intra;
1408             dct_lookup_t tab;
1409             
1410     if (code>=16384 && !intra_vlc_format)
1411       tab = pl_DCT_tab_ac[(code>>12)-4];
1412     else if (code>=1024)
1413     {
1414       if (intra_vlc_format)
1415         tab = pl_DCT_tab0a[(code>>8)-4];
1416       else
1417         tab = pl_DCT_tab0[(code>>8)-4];
1418     }
1419     else if (code>=512)
1420     {
1421       if (intra_vlc_format)
1422         tab = pl_DCT_tab1a[(code>>6)-8];
1423       else
1424         tab = pl_DCT_tab1[(code>>6)-8];
1425     }
1426     else if (code>=256)
1427       tab = pl_DCT_tab2[(code>>4)-16];
1428     else if (code>=128)
1429       tab = pl_DCT_tab3[(code>>3)-16];
1430     else if (code>=64)
1431       tab = pl_DCT_tab4[(code>>2)-16];
1432     else if (code>=32)
1433       tab = pl_DCT_tab5[(code>>1)-16];
1434     else if (code>=16)
1435       tab = pl_DCT_tab6[code-16];
1436     else
1437     {
1438        fprintf( stderr, "invalid Huffman code in Decode_MPEG2_Intra_Block()\n");
1439     }
1440
1441     if( (i_run != tab.i_run) || (i_length != tab.i_length) || (i_level != tab.i_level) )
1442     {
1443         fprintf( stderr, "ET M....... !!!\n" );
1444         exit(0);
1445     }
1446         }
1447 #endif
1448
1449
1450
1451         
1452         RemoveBits( &p_vpar->bit_stream, i_length );
1453
1454         switch( i_run )
1455         {
1456             case DCT_ESCAPE:
1457                 i_run = GetBits( &p_vpar->bit_stream, 6 );
1458                 i_level = GetBits( &p_vpar->bit_stream, 12 );
1459                 /*p_mb->ppi_blocks[i_b][i_parse] = ( b_sign = ( i_level > 2047 ) ) 
1460                                                           ? ( -4096 + i_level )
1461                                                           : i_level;*/
1462                 i_level = (b_sign = ( i_level > 2047 )) ? 4096 - i_level
1463                                                         : i_level;
1464                 break;
1465             case DCT_EOB:
1466                 if( i_nc <= 1 )
1467                 {
1468                     p_mb->pf_idct[i_b] = vdec_SparseIDCT;
1469                     p_mb->pi_sparse_pos[i_b] = i_coef;
1470                 }
1471                 else
1472                 {
1473                     p_mb->pf_idct[i_b] = vdec_IDCT;
1474                 }
1475                 return;
1476
1477                 break;
1478             default:
1479                 b_sign = GetBits( &p_vpar->bit_stream, 1 );
1480                 //p_mb->ppi_blocks[i_b][i_parse] = b_sign ? -i_level : i_level;
1481         }
1482 // fprintf( stderr, "i_code : %d (%d), run : %d, %d, %d (%4x) ", i_code ,  b_vlc_intra,
1483 //                  i_run, i_level, i_parse, ShowBits( &p_vpar->bit_stream, 16 ) );
1484
1485 //fprintf( stderr, "- %4x\n",ShowBits( &p_vpar->bit_stream, 16 ) ); 
1486 if( i_parse >= 64 )
1487 {
1488     fprintf( stderr, "Beuhh dans l'intra decode (%d)\n", i_b );
1489     break;
1490 }
1491         i_coef = i_parse;
1492         i_parse += i_run;
1493         i_nc ++;
1494  
1495         i_pos = pi_scan[p_vpar->picture.b_alternate_scan][i_parse];
1496         i_level = ( i_level *
1497                     p_vpar->slice.i_quantizer_scale *
1498                     ppi_quant[i_quant_type][i_pos] ) >> 4;
1499         p_mb->ppi_blocks[i_b][i_pos] = b_sign ? -i_level : i_level;
1500     }
1501     
1502 fprintf( stderr, "MPEG2 end (%d)\n", i_b );
1503 //p_vpar->b_error = 1;
1504 }