git.sesse.net Git - vlc/blob - 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 "video_fifo.h"
  37 #include "vpar_synchro.h"
  38 #include "video_parser.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     static f_chroma_motion_t pf_chroma_motion[4] =
 575     { NULL, vdec_Motion420, vdec_Motion422, vdec_Motion444 };
 576
 577     p_mb->p_picture = p_vpar->picture.p_picture;
 578     p_mb->i_structure = p_vpar->picture.i_structure;
 579     p_mb->i_current_structure = p_vpar->picture.i_current_structure;
 580     p_mb->b_top_field_first = p_vpar->picture.b_top_field_first;
 581     p_mb->i_l_x = p_vpar->mb.i_l_x;
 582     p_mb->i_motion_l_y = p_mb->i_l_y = p_vpar->mb.i_l_y;
 583     p_mb->i_c_x = p_vpar->mb.i_c_x;
 584     p_mb->i_motion_c_y = p_mb->i_c_y = p_vpar->mb.i_c_y;
 585     p_mb->i_chroma_nb_blocks = p_vpar->sequence.i_chroma_nb_blocks;
 586     p_mb->pf_chroma_motion = pf_chroma_motion[p_vpar->sequence.i_chroma_format];
 587     p_mb->b_P_coding_type = ( p_vpar->picture.i_coding_type == P_CODING_TYPE );
 588
 589     if( (p_vpar->picture.i_coding_type == P_CODING_TYPE) ||
 590         (p_vpar->picture.i_coding_type == B_CODING_TYPE) )
 591         p_mb->p_forward = p_vpar->sequence.p_forward;
 592     else
 593         p_mb->p_forward = NULL;
 594     if( p_vpar->picture.i_coding_type == B_CODING_TYPE )
 595         p_mb->p_backward = p_vpar->sequence.p_backward;
 596     else
 597         p_mb->p_backward = NULL;
 598
 599     p_mb->i_addb_l_stride = (p_mb->i_l_stride = p_vpar->picture.i_l_stride) - 8;
 600     p_mb->i_addb_c_stride = (p_mb->i_c_stride = p_vpar->picture.i_c_stride) - 8;
 601
 602     /* Update macroblock real position. */
 603     p_vpar->mb.i_l_x += 16;
 604     p_vpar->mb.i_l_y += (p_vpar->mb.i_l_x / p_vpar->sequence.i_width)
 605                         * (2 - p_vpar->picture.b_frame_structure) * 16;
 606     p_vpar->mb.i_l_x %= p_vpar->sequence.i_width;
 607
 608     p_vpar->mb.i_c_x += p_vpar->sequence.i_chroma_mb_width;
 609     p_vpar->mb.i_c_y += (p_vpar->mb.i_c_x / p_vpar->sequence.i_chroma_width)
 610                         * (2 - p_vpar->picture.b_frame_structure)
 611                         * p_vpar->sequence.i_chroma_mb_height;
 612     p_vpar->mb.i_c_x %= p_vpar->sequence.i_chroma_width;
 613     if( (p_mb->b_motion_field = p_vpar->picture.b_motion_field) )
 614     {
 615         p_mb->i_motion_l_y--;
 616         p_mb->i_motion_c_y--;
 617     }
 618 }
 619
 620 /*****************************************************************************
 621  * MacroblockAddressIncrement : Get the macroblock_address_increment field
 622  *****************************************************************************/
 623 static __inline__ int MacroblockAddressIncrement( vpar_thread_t * p_vpar )
 624 {
 625     int i_addr_inc = 0;
 626     /* Index in the lookup table mb_addr_inc */
 627     int    i_index = ShowBits( &p_vpar->bit_stream, 11 );
 628
 629     /* Test the presence of the escape character */
 630     while( i_index == 8 )
 631     {
 632         RemoveBits( &p_vpar->bit_stream, 11 );
 633         i_addr_inc += 33;
 634         i_index = ShowBits( &p_vpar->bit_stream, 11 );
 635     }
 636
 637     /* Affect the value from the lookup table */
 638     i_addr_inc += p_vpar->pl_mb_addr_inc[i_index].i_value;
 639
 640     /* Dump the good number of bits */
 641     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_mb_addr_inc[i_index].i_length );
 642
 643     return i_addr_inc;
 644 }
 645
 646 /*****************************************************************************
 647  * MacroblockModes : Get the macroblock_modes structure
 648  *****************************************************************************/
 649 static __inline__ void MacroblockModes( vpar_thread_t * p_vpar,
 650                                         macroblock_t * p_mb )
 651 {
 652     static f_motion_t   pf_motion[2][4] =
 653         { {NULL, vdec_MotionFieldField, vdec_MotionField16x8, vdec_MotionFieldDMV},
 654           {NULL, vdec_MotionFrameField, vdec_MotionFrameFrame, vdec_MotionFrameDMV} };
 655     static int          ppi_mv_count[2][4] = { {0, 1, 2, 1}, {0, 2, 1, 1} };
 656     static int          ppi_mv_format[2][4] = { {0, 1, 1, 1}, {0, 1, 2, 1} };
 657
 658     /* Get macroblock_type. */
 659     p_vpar->mb.i_mb_type = (p_vpar->picture.pf_macroblock_type)( p_vpar );
 660     p_mb->i_mb_type = p_vpar->mb.i_mb_type;
 661
 662     /* SCALABILITY : warning, we don't know if spatial_temporal_weight_code
 663      * has to be dropped, take care if you use scalable streams. */
 664     /* RemoveBits( &p_vpar->bit_stream, 2 ); */
 665
 666     if( !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD | MB_MOTION_BACKWARD)) )
 667     {
 668         /* If mb_type has neither MOTION_FORWARD nor MOTION_BACKWARD, this
 669          * is useless, but also harmless. */
 670         p_vpar->mb.i_motion_type = MOTION_FRAME;
 671     }
 672     else
 673     {
 674         if( p_vpar->picture.i_structure == FRAME_STRUCTURE
 675             && p_vpar->picture.b_frame_pred_frame_dct )
 676         {
 677             p_vpar->mb.i_motion_type = MOTION_FRAME;
 678         }
 679         else
 680         {
 681             p_vpar->mb.i_motion_type = GetBits( &p_vpar->bit_stream, 2 );
 682         }
 683     }
 684
 685     if( p_mb->b_P_coding_type && !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD|MB_INTRA)) )
 686     {
 687         /* Special No-MC macroblock in P pictures (7.6.3.5). */
 688         memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
 689         memset( p_mb->pppi_motion_vectors, 0, 8*sizeof(int) );
 690         p_vpar->mb.i_motion_type = MOTION_FRAME;
 691         p_mb->ppi_field_select[0][0] = ( p_vpar->picture.i_current_structure == BOTTOM_FIELD );
 692     }
 693
 694      if( p_vpar->mb.i_mb_type & MB_INTRA )
 695     {
 696         /* For the intra macroblocks, we use an empty motion
 697          * compensation function */
 698         p_mb->pf_motion = vdec_MotionDummy;
 699     }
 700     else
 701     {
 702         p_mb->pf_motion = pf_motion[p_vpar->picture.b_frame_structure]
 703                                    [p_vpar->mb.i_motion_type];
 704     }
 705
 706     p_vpar->mb.i_mv_count = ppi_mv_count[p_vpar->picture.b_frame_structure]
 707                                         [p_vpar->mb.i_motion_type];
 708     p_vpar->mb.i_mv_format = ppi_mv_format[p_vpar->picture.b_frame_structure]
 709                                           [p_vpar->mb.i_motion_type];
 710
 711
 712     p_vpar->mb.b_dct_type = 0;
 713     if( (p_vpar->picture.i_structure == FRAME_STRUCTURE) &&
 714         (!p_vpar->picture.b_frame_pred_frame_dct) &&
 715         (p_vpar->mb.i_mb_type & (MB_PATTERN|MB_INTRA)) )
 716     {
 717         if( (p_vpar->mb.b_dct_type = GetBits( &p_vpar->bit_stream, 1 )) )
 718         {
 719             /* The DCT is coded on fields. Jump one line between each
 720              * sample. */
 721             p_mb->i_addb_l_stride <<= 1;
 722             p_mb->i_addb_l_stride += 8;
 723             /* With CHROMA_420, the DCT is necessarily frame-coded. */
 724             if( p_vpar->sequence.i_chroma_format != CHROMA_420 )
 725             {
 726                 p_mb->i_addb_c_stride <<= 1;
 727                 p_mb->i_addb_c_stride += 8;
 728             }
 729         }
 730     }
 731     p_vpar->mb.b_dmv = p_vpar->mb.i_motion_type == MOTION_DMV;
 732 }
 733
 734 /*****************************************************************************
 735  * vpar_ParseMacroblock : Parse the next macroblock
 736  *****************************************************************************/
 737 void vpar_ParseMacroblock( vpar_thread_t * p_vpar, int * pi_mb_address,
 738                            int i_mb_previous, int i_mb_base )
 739 {
 740     static f_addb_t ppf_addb_intra[2] = {vdec_AddBlock, vdec_CopyBlock};
 741     static f_decode_block_t pppf_decode_block[2][2] =
 742                 { {vpar_DecodeMPEG1Non, vpar_DecodeMPEG1Intra},
 743                   {vpar_DecodeMPEG2Non, vpar_DecodeMPEG2Intra} };
 744     static int      pi_x[12] = {0,8,0,8,0,0,0,0,8,8,8,8};
 745     static int      pi_y[2][12] = { {0,0,8,8,0,0,8,8,0,0,8,8},
 746                                     {0,0,1,1,0,0,1,1,0,0,1,1} };
 747
 748     int             i_mb, i_b, i_mask;
 749     macroblock_t *  p_mb;
 750     f_addb_t        pf_addb;
 751     yuv_data_t *    p_data1;
 752     yuv_data_t *    p_data2;
 753
 754     /************* DEBUG *************/
 755     int i_inc;
 756     static int i_count;
 757 i_count++;
 758
 759     i_inc = MacroblockAddressIncrement( p_vpar );
 760     *pi_mb_address += i_inc;
 761     //*pi_mb_address += MacroblockAddressIncrement( p_vpar );
 762
 763     for( i_mb = i_mb_previous + 1; i_mb < *pi_mb_address; i_mb++ )
 764     {
 765         /* Skipped macroblock (ISO/IEC 13818-2 7.6.6). */
 766         static int          pi_dc_dct_reinit[4] = {128,256,512,1024};
 767         static f_motion_t   pf_motion_skipped[4] = {NULL, vdec_MotionFieldField,
 768                                 vdec_MotionFieldField, vdec_MotionFrameFrame};
 769
 770         /* Reset DC predictors (7.2.1). */
 771         p_vpar->slice.pi_dc_dct_pred[0] = p_vpar->slice.pi_dc_dct_pred[1]
 772             = p_vpar->slice.pi_dc_dct_pred[2]
 773             = pi_dc_dct_reinit[p_vpar->picture.i_intra_dc_precision];
 774
 775         if( p_vpar->picture.i_coding_type == P_CODING_TYPE )
 776         {
 777             /* Reset motion vector predictors (ISO/IEC 13818-2 7.6.3.4). */
 778             memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
 779         }
 780
 781         if( (p_mb = p_vpar->picture.pp_mb[i_mb_base + i_mb] =
 782              vpar_NewMacroblock( &p_vpar->vfifo )) == NULL )
 783         {
 784             p_vpar->picture.b_error = 1;
 785             intf_ErrMsg("vpar error: macroblock list is empty !\n");
 786             return;
 787         }
 788
 789         InitMacroblock( p_vpar, p_mb );
 790
 791         /* No IDCT nor AddBlock. */
 792         for( i_b = 0; i_b < 12; i_b++ )
 793         {
 794             p_mb->pf_idct[i_b] = vdec_DummyIDCT;
 795             p_mb->pf_addb[i_b] = vdec_DummyBlock;
 796         }
 797
 798         /* Motion type is picture structure. */
 799         p_mb->pf_motion = pf_motion_skipped[p_vpar->picture.i_structure];
 800         p_mb->i_mb_type = MB_MOTION_FORWARD;
 801         memset( p_mb->pppi_motion_vectors, 0, 8*sizeof(int) );
 802
 803         /* Set the field we use for motion compensation */
 804         p_mb->ppi_field_select[0][0] = p_mb->ppi_field_select[0][1]
 805                                      = ( p_vpar->picture.i_current_structure == BOTTOM_FIELD );
 806     }
 807
 808     /* Get a macroblock structure. */
 809     if( (p_mb = p_vpar->picture.pp_mb[i_mb_base + *pi_mb_address] =
 810          vpar_NewMacroblock( &p_vpar->vfifo )) == NULL )
 811     {
 812         p_vpar->picture.b_error = 1;
 813         intf_ErrMsg("vpar error: macroblock list is empty !\n");
 814         return;
 815     }
 816
 817     InitMacroblock( p_vpar, p_mb );
 818
 819     /* Parse off macroblock_modes structure. */
 820     MacroblockModes( p_vpar, p_mb );
 821
 822     if( p_vpar->mb.i_mb_type & MB_QUANT )
 823     {
 824         LoadQuantizerScale( p_vpar );
 825     }
 826
 827     if( p_vpar->mb.i_mb_type & MB_MOTION_FORWARD )
 828     {
 829 //fprintf( stderr, "motion !\n" );
 830         (*p_vpar->sequence.pf_decode_mv)( p_vpar, p_mb, 0 );
 831     }
 832
 833     if( p_vpar->mb.i_mb_type & MB_MOTION_BACKWARD )
 834     {
 835 //fprintf( stderr, "motion2 !\n" );
 836         (*p_vpar->sequence.pf_decode_mv)( p_vpar, p_mb, 1 );
 837     }
 838
 839     if( p_vpar->picture.b_concealment_mv && (p_vpar->mb.i_mb_type & MB_INTRA) )
 840     {
 841         RemoveBits( &p_vpar->bit_stream, 1 );
 842     }
 843 if( 0 )
 844     //i_count == 1231 &&
 845     // i_count != *pi_mb_address)
 846     //p_vpar->picture.i_coding_type == P_CODING_TYPE )
 847 {
 848     fprintf( stderr, "i_count = %d (%d)\n", i_count, p_vpar->mb.i_mb_type );
 849      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 850      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
 851      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 852      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
 853      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 854      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
 855      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 856      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
 857      exit(0);
 858 }
 859
 860     if( p_vpar->mb.i_mb_type & MB_PATTERN )
 861     {
 862         p_vpar->mb.i_coded_block_pattern = (*p_vpar->sequence.pf_decode_pattern)( p_vpar );
 863 //fprintf( stderr, "pattern : %d\n", p_vpar->mb.i_coded_block_pattern );
 864     }
 865     else
 866     {
 867         int     pi_coded_block_pattern[2] = {0,
 868                     (1 << (4+p_vpar->sequence.i_chroma_nb_blocks)) - 1};
 869         p_vpar->mb.i_coded_block_pattern = pi_coded_block_pattern
 870                                     [p_vpar->mb.i_mb_type & MB_INTRA];
 871     }
 872     pf_addb = ppf_addb_intra[p_vpar->mb.i_mb_type & MB_INTRA];
 873
 874     /*
 875      * Effectively decode blocks.
 876      */
 877
 878     i_mask = 1 << (3 + p_vpar->sequence.i_chroma_nb_blocks);
 879
 880     /* luminance */
 881     p_data1 = p_mb->p_picture->p_y
 882               + p_mb->i_l_x + p_mb->i_l_y*(p_vpar->sequence.i_width);
 883
 884     for( i_b = 0 ; i_b < 4 ; i_b++, i_mask >>= 1 )
 885     {
 886         if( p_vpar->mb.i_coded_block_pattern & i_mask )
 887         {
 888             memset( p_mb->ppi_blocks[i_b], 0, 64*sizeof(dctelem_t) );
 889             (*pppf_decode_block[p_vpar->sequence.b_mpeg2]
 890                                [p_vpar->mb.i_mb_type & MB_INTRA])
 891                 ( p_vpar, p_mb, i_b );
 892
 893             /* decode_block has already set pf_idct and pi_sparse_pos. */
 894             p_mb->pf_addb[i_b] = pf_addb;
 895
 896             /* Calculate block coordinates. */
 897             p_mb->p_data[i_b] = p_data1
 898                                 + pi_y[p_vpar->mb.b_dct_type][i_b]
 899                                 * p_vpar->sequence.i_width
 900                                 + pi_x[i_b];
 901         }
 902         else
 903         {
 904             /* Block not coded, so no IDCT, nor AddBlock */
 905             p_mb->pf_addb[i_b] = vdec_DummyBlock;
 906             p_mb->pf_idct[i_b] = vdec_DummyIDCT;
 907         }
 908     }
 909
 910     /* chrominance */
 911     p_data1 = p_mb->p_picture->p_u
 912               + p_mb->i_c_x
 913               + p_mb->i_c_y
 914                 * (p_vpar->sequence.i_chroma_width);
 915     p_data2 = p_mb->p_picture->p_v
 916                + p_mb->i_c_x
 917                + p_mb->i_c_y
 918                 * (p_vpar->sequence.i_chroma_width);
 919
 920     for( i_b = 4; i_b < 4 + p_vpar->sequence.i_chroma_nb_blocks;
 921          i_b++, i_mask >>= 1 )
 922     {
 923         yuv_data_t *    pp_data[2] = {p_data1, p_data2};
 924
 925         if( p_vpar->mb.i_coded_block_pattern & i_mask )
 926         {
 927             memset( p_mb->ppi_blocks[i_b], 0, 64*sizeof(dctelem_t) );
 928             (*pppf_decode_block[p_vpar->sequence.b_mpeg2]
 929                                [p_vpar->mb.i_mb_type & MB_INTRA])
 930                 ( p_vpar, p_mb, i_b );
 931
 932             /* decode_block has already set pf_idct and pi_sparse_pos. */
 933             p_mb->pf_addb[i_b] = pf_addb;
 934
 935             /* Calculate block coordinates. */
 936             p_mb->p_data[i_b] = pp_data[i_b & 1]
 937                                  + pi_y[p_vpar->mb.b_dct_type][i_b]
 938                                    * p_vpar->sequence.i_chroma_width
 939                                  + pi_x[i_b];
 940         }
 941         else
 942         {
 943             /* Block not coded, so no IDCT, nor AddBlock */
 944             p_mb->pf_addb[i_b] = vdec_DummyBlock;
 945             p_mb->pf_idct[i_b] = vdec_DummyIDCT;
 946         }
 947     }
 948
 949     if( !( p_vpar->mb.i_mb_type & MB_INTRA ) )
 950     {
 951         static int          pi_dc_dct_reinit[4] = {128,256,512,1024};
 952
 953         /* Reset DC predictors (7.2.1). */
 954         p_vpar->slice.pi_dc_dct_pred[0] = p_vpar->slice.pi_dc_dct_pred[1]
 955             = p_vpar->slice.pi_dc_dct_pred[2]
 956             = pi_dc_dct_reinit[p_vpar->picture.i_intra_dc_precision];
 957     }
 958     else if( !p_vpar->picture.b_concealment_mv )
 959     {
 960         /* Reset MV predictors. */
 961         memset( p_vpar->slice.pppi_pmv, 0, 8*sizeof(int) );
 962     }
 963
 964     if( p_mb->b_P_coding_type && !(p_vpar->mb.i_mb_type & (MB_MOTION_FORWARD|MB_INTRA)) )
 965     {
 966         p_mb->i_mb_type |= MB_MOTION_FORWARD;
 967     }
 968 /*
 969 if(  p_vpar->picture.i_coding_type != I_CODING_TYPE )//!(p_mb->b_P_coding_type & MB_INTRA) )
 970 {
 971     p_mb->i_mb_type |= MB_MOTION_FORWARD;
 972 }
 973 */
 974  if( 0 )
 975     //i_count == 249)
 976     // i_count != *pi_mb_address)
 977     //b_stop )
 978 {
 979     fprintf( stderr, "i_count = %d (%d)\n", i_count, i_inc );
 980      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 981      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
 982      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 983      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
 984      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 985      fprintf( stderr, "%x ", GetBits( &p_vpar->bit_stream, 16 ) );
 986      fprintf( stderr, "%x", GetBits( &p_vpar->bit_stream, 16 ) );
 987      fprintf( stderr, "%x\n", GetBits( &p_vpar->bit_stream, 16 ) );
 988      exit(0);
 989 }
 990 }
 991
 992 /*****************************************************************************
 993  * vpar_IMBType : macroblock_type in I pictures
 994  *****************************************************************************/
 995 int vpar_IMBType( vpar_thread_t * p_vpar )
 996 {
 997     /* Take two bits for testing */
 998     int                 i_type = ShowBits( &p_vpar->bit_stream, 2 );
 999
1000     /* Lookup table for macroblock_type */
1001     static lookup_t     pl_mb_Itype[4] = { {MB_ERROR, 0},
1002                                            {MB_QUANT|MB_INTRA, 2},
1003                                            {MB_INTRA, 1},
1004                                            {MB_INTRA, 1} };
1005     /* Dump the good number of bits */
1006     RemoveBits( &p_vpar->bit_stream, pl_mb_Itype[i_type].i_length );
1007     return pl_mb_Itype[i_type].i_value;
1008 }
1009
1010 /*****************************************************************************
1011  * vpar_PMBType : macroblock_type in P pictures
1012  *****************************************************************************/
1013 int vpar_PMBType( vpar_thread_t * p_vpar )
1014 {
1015     /* Testing on 6 bits */
1016     int                i_type = ShowBits( &p_vpar->bit_stream, 6 );
1017
1018 #if 0
1019 /* Table B-3, macroblock_type in P-pictures, codes 001..1xx */
1020 static lookup_t PMBtab0[8] = {
1021   {-1,0},
1022   {MB_MOTION_FORWARD,3},
1023   {MB_PATTERN,2}, {MB_PATTERN,2},
1024   {MB_MOTION_FORWARD|MB_PATTERN,1},
1025   {MB_MOTION_FORWARD|MB_PATTERN,1},
1026   {MB_MOTION_FORWARD|MB_PATTERN,1},
1027   {MB_MOTION_FORWARD|MB_PATTERN,1}
1028 };
1029
1030 /* Table B-3, macroblock_type in P-pictures, codes 000001..00011x */
1031 static lookup_t PMBtab1[8] = {
1032   {-1,0},
1033   {MB_QUANT|MB_INTRA,6},
1034   {MB_QUANT|MB_PATTERN,5}, {MB_QUANT|MB_PATTERN,5},
1035   {MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN,5}, {MB_QUANT|MB_MOTION_FORWARD|MB_PATTERN,5},
1036   {MB_INTRA,5}, {MB_INTRA,5}
1037 };
1038
1039
1040   if(i_type >= 8)
1041   {
1042     i_type >>= 3;
1043     RemoveBits( &p_vpar->bit_stream,PMBtab0[i_type].i_length );
1044     return PMBtab0[i_type].i_value;
1045   }
1046
1047   if (i_type==0)
1048   {
1049       printf("Invalid P macroblock_type code\n");
1050     return -1;
1051   }
1052     RemoveBits( &p_vpar->bit_stream,PMBtab1[i_type].i_length );
1053  return PMBtab1[i_type].i_value;
1054 #endif
1055     /* Dump the good number of bits */
1056     RemoveBits( &p_vpar->bit_stream, p_vpar->ppl_mb_type[0][i_type].i_length );
1057     /* return the value from the lookup table for P type */
1058     return p_vpar->ppl_mb_type[0][i_type].i_value;
1059 }
1060
1061 /*****************************************************************************
1062  * vpar_BMBType : macroblock_type in B pictures
1063  *****************************************************************************/
1064 int vpar_BMBType( vpar_thread_t * p_vpar )
1065 {
1066      /* Testing on 6 bits */
1067     int                i_type = ShowBits( &p_vpar->bit_stream, 6 );
1068
1069     /* Dump the good number of bits */
1070     RemoveBits( &p_vpar->bit_stream, p_vpar->ppl_mb_type[1][i_type].i_length );
1071
1072     /* return the value from the lookup table for B type */
1073     return p_vpar->ppl_mb_type[1][i_type].i_value;
1074 }
1075
1076 /*****************************************************************************
1077  * vpar_DMBType : macroblock_type in D pictures
1078  *****************************************************************************/
1079 int vpar_DMBType( vpar_thread_t * p_vpar )
1080 {
1081     /* Taking 1 bit */
1082     int               i_type = GetBits( &p_vpar->bit_stream, 1 );
1083
1084     /* Lookup table */
1085     static int        pi_mb_Dtype[2] = { MB_ERROR, 1 };
1086
1087     return pi_mb_Dtype[i_type];
1088 }
1089
1090 /*****************************************************************************
1091  * vpar_CodedPattern420 : coded_block_pattern with 420 chroma
1092  *****************************************************************************/
1093 int vpar_CodedPattern420( vpar_thread_t * p_vpar )
1094 {
1095     /* Take the max 9 bits length vlc code for testing */
1096     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1097
1098     /* Trash the good number of bits read in  the lookup table */
1099     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1100
1101     /* return the value from the vlc table */
1102     return p_vpar->pl_coded_pattern[i_vlc].i_value;
1103 }
1104
1105 /*****************************************************************************
1106  * vpar_CodedPattern422 : coded_block_pattern with 422 chroma
1107  *****************************************************************************/
1108 int vpar_CodedPattern422( vpar_thread_t * p_vpar )
1109 {
1110     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1111
1112     /* Supplementary 2 bits long code for 422 format */
1113     int      i_coded_block_pattern_1;
1114
1115     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1116     i_coded_block_pattern_1 = GetBits( &p_vpar->bit_stream, 2 );
1117
1118     /* the code is just to be added to the value found in the table */
1119     return p_vpar->pl_coded_pattern[i_vlc].i_value |
1120            (i_coded_block_pattern_1 << 6);
1121 }
1122
1123 /*****************************************************************************
1124  * vpar_CodedPattern444 : coded_block_pattern with 444 chroma
1125  *****************************************************************************/
1126 int vpar_CodedPattern444( vpar_thread_t * p_vpar )
1127 {
1128     int      i_vlc = ShowBits( &p_vpar->bit_stream, 9 );
1129     int      i_coded_block_pattern_2;
1130
1131     RemoveBits( &p_vpar->bit_stream, p_vpar->pl_coded_pattern[i_vlc].i_length );
1132     i_coded_block_pattern_2 = GetBits( &p_vpar->bit_stream, 6 );
1133
1134     return p_vpar->pl_coded_pattern[i_vlc].i_value |
1135            ( i_coded_block_pattern_2 << 6 );
1136 }
1137
1138 /*****************************************************************************
1139  * vpar_DecodeMPEG1Non : decode MPEG-1 non-intra blocks
1140  *****************************************************************************/
1141 static void vpar_DecodeMPEG1Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1142 {
1143
1144     if( p_vpar->picture.i_coding_type == D_CODING_TYPE )
1145     {
1146         /* Remove end_of_macroblock (always 1, prevents startcode emulation)
1147          * ISO/IEC 11172-2 section 2.4.2.7 and 2.4.3.6 */
1148         RemoveBits( &p_vpar->bit_stream, 1 );
1149     }
1150 }
1151
1152 /*****************************************************************************
1153  * vpar_DecodeMPEG1Intra : decode MPEG-1 intra blocks
1154  *****************************************************************************/
1155 static void vpar_DecodeMPEG1Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1156 {
1157
1158     if( p_vpar->picture.i_coding_type == D_CODING_TYPE )
1159     {
1160         /* Remove end_of_macroblock (always 1, prevents startcode emulation)
1161          * ISO/IEC 11172-2 section 2.4.2.7 and 2.4.3.6 */
1162         RemoveBits( &p_vpar->bit_stream, 1 );
1163     }
1164 }
1165
1166 /*****************************************************************************
1167  * vpar_DecodeMPEG2Non : decode MPEG-2 non-intra blocks
1168  *****************************************************************************/
1169 static void vpar_DecodeMPEG2Non( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1170 {
1171     int         i_parse;
1172     int         i_nc;
1173     int         i_cc;
1174     int         i_coef;
1175     int         i_type;
1176     int         i_code;
1177     int         i_length;
1178     int         i_pos;
1179     int         i_run;
1180     int         i_level;
1181     int         i_quant_type;
1182     boolean_t   b_sign;
1183     int *       ppi_quant[2];
1184
1185     /* Lookup Table for the chromatic component */
1186     static int pi_cc_index[12] = { 0, 0, 0, 0, 1, 2, 1, 2, 1, 2 };
1187
1188     i_cc = pi_cc_index[i_b];
1189
1190     /* Determine whether it is luminance or not (chrominance) */
1191     i_type = ( i_cc + 1 ) >> 1;
1192     i_quant_type = (!i_type) || (p_vpar->sequence.i_chroma_format == CHROMA_420);
1193
1194     /* Give a pointer to the quantization matrices for intra blocks */
1195     ppi_quant[1] = p_vpar->sequence.nonintra_quant.pi_matrix;
1196     ppi_quant[0] = p_vpar->sequence.chroma_nonintra_quant.pi_matrix;
1197
1198     /* Decoding of the AC coefficients */
1199
1200     i_nc = 0;
1201     i_coef = 0;
1202     for( i_parse = 0; ; i_parse++ )
1203     {
1204         i_code = ShowBits( &p_vpar->bit_stream, 16 );
1205         if( i_code >= 16384 )
1206         {
1207             if( i_parse == 0 )
1208             {
1209                 i_run =     pl_DCT_tab_dc[(i_code>>12)-4].i_run;
1210                 i_level =   pl_DCT_tab_dc[(i_code>>12)-4].i_level;
1211                 i_length =  pl_DCT_tab_dc[(i_code>>12)-4].i_length;
1212             }
1213             else
1214             {
1215                 i_run =     pl_DCT_tab_ac[(i_code>>12)-4].i_run;
1216                 i_level =   pl_DCT_tab_ac[(i_code>>12)-4].i_level;
1217                 i_length =  pl_DCT_tab_ac[(i_code>>12)-4].i_length;
1218              }
1219         }
1220         else if( i_code >= 1024 )
1221         {
1222             i_run =     pl_DCT_tab0[(i_code>>8)-4].i_run;
1223             i_length =  pl_DCT_tab0[(i_code>>8)-4].i_length;
1224             i_level =   pl_DCT_tab0[(i_code>>8)-4].i_level;
1225         }
1226         else
1227         {
1228             i_run =     ppl_dct_coef[0][i_code].i_run;
1229             i_length =  ppl_dct_coef[0][i_code].i_length;
1230             i_level =   ppl_dct_coef[0][i_code].i_level;
1231         }
1232
1233
1234         RemoveBits( &p_vpar->bit_stream, i_length );
1235
1236         switch( i_run )
1237         {
1238             case DCT_ESCAPE:
1239                 i_run = GetBits( &p_vpar->bit_stream, 6 );
1240                 i_level = GetBits( &p_vpar->bit_stream, 12 );
1241                 i_level = (b_sign = ( i_level > 2047 )) ? 4096 - i_level
1242                                                         : i_level;
1243                 break;
1244             case DCT_EOB:
1245                 if( i_nc <= 1 )
1246                 {
1247                     p_mb->pf_idct[i_b] = vdec_SparseIDCT;
1248                     p_mb->pi_sparse_pos[i_b] = i_coef;
1249                 }
1250                 else
1251                 {
1252                     p_mb->pf_idct[i_b] = vdec_IDCT;
1253                 }
1254                 return;
1255
1256                 break;
1257             default:
1258                 b_sign = GetBits( &p_vpar->bit_stream, 1 );
1259         }
1260         i_coef = i_parse;
1261         i_parse += i_run;
1262         i_nc ++;
1263
1264 if( i_parse >= 64 )
1265 {
1266     break;
1267 }
1268
1269         i_pos = pi_scan[p_vpar->picture.b_alternate_scan][i_parse];
1270         i_level = ( ((i_level << 1) + 1) * p_vpar->slice.i_quantizer_scale
1271                     * ppi_quant[i_quant_type][i_pos] ) >> 5;
1272         p_mb->ppi_blocks[i_b][i_pos] = b_sign ? -i_level : i_level;
1273     }
1274 fprintf( stderr, "Non intra MPEG2 end (%d)\n", i_b );
1275 //p_vpar->picture.b_error = 1;
1276 }
1277
1278 /*****************************************************************************
1279  * vpar_DecodeMPEG2Intra : decode MPEG-2 intra blocks
1280  *****************************************************************************/
1281 static void vpar_DecodeMPEG2Intra( vpar_thread_t * p_vpar, macroblock_t * p_mb, int i_b )
1282 {
1283     int         i_parse;
1284     int         i_nc;
1285     int         i_cc;
1286     int         i_coef;
1287     int         i_type, i_quant_type;
1288     int         i_code;
1289     int         i_length;
1290     int         i_pos;
1291     int         i_dct_dc_size;
1292     int         i_dct_dc_diff;
1293     int         i_run;
1294     int         i_level;
1295     boolean_t   b_vlc_intra;
1296     boolean_t   b_sign;
1297     int *       ppi_quant[2];
1298
1299     /* Lookup Table for the chromatic component */
1300     static int pi_cc_index[12] = { 0, 0, 0, 0, 1, 2, 1, 2, 1, 2 };
1301     i_cc = pi_cc_index[i_b];
1302
1303     /* Determine whether it is luminance or not (chrominance) */
1304     i_type = ( i_cc + 1 ) >> 1;
1305     i_quant_type = (!i_type) | (p_vpar->sequence.i_chroma_format == CHROMA_420);
1306
1307     /* Give a pointer to the quantization matrices for intra blocks */
1308     ppi_quant[1] = p_vpar->sequence.intra_quant.pi_matrix;
1309     ppi_quant[0] = p_vpar->sequence.chroma_intra_quant.pi_matrix;
1310
1311 #if 0
1312     /* Decoding of the DC intra coefficient */
1313     /* The nb of bits to parse depends on i_type */
1314     i_code = ShowBits( &p_vpar->bit_stream, 9 + i_type );
1315
1316     /* To reduce memory occupation, there are two lookup tables
1317      * See InitDCT above */
1318     i_code5 = i_code >> (4+i_type);
1319
1320     /* Shall we lookup in the first or in the second table ? */
1321     i_select = ( i_code5 == 31 );
1322     /* Offset value for looking in the second table */
1323     i_offset = 0x1f0 + ( i_type * 0x1f0 );
1324     i_pos = ( i_code5 * ( ! i_select ) ) + ( ( i_code - i_offset ) * i_select );
1325     i_dct_dc_size = p_vpar->pppl_dct_dc_size[i_type][i_select][i_pos].i_value;
1326 #endif
1327
1328     if( !i_type/*i_b < 4*/ )
1329     {
1330         /* decode length */
1331         i_code = ShowBits(&p_vpar->bit_stream, 5);
1332         if (i_code<31)
1333         {
1334             i_dct_dc_size = pl_dct_dc_lum_init_table_1[i_code].i_value;
1335             i_length = pl_dct_dc_lum_init_table_1[i_code].i_length;
1336             RemoveBits( &p_vpar->bit_stream, i_length);
1337         }
1338         else
1339         {
1340             i_code = ShowBits(&p_vpar->bit_stream, 9) - 0x1f0;
1341             i_dct_dc_size = pl_dct_dc_lum_init_table_2[i_code].i_value;
1342             i_length = pl_dct_dc_lum_init_table_2[i_code].i_length;
1343             RemoveBits( &p_vpar->bit_stream, i_length);
1344         }
1345     }
1346     else
1347     {
1348         /* decode length */
1349         i_code = ShowBits(&p_vpar->bit_stream, 5);
1350
1351         if (i_code<31)
1352         {
1353             i_dct_dc_size = pl_dct_dc_chrom_init_table_1[i_code].i_value;
1354             i_length = pl_dct_dc_chrom_init_table_1[i_code].i_length;
1355             RemoveBits(&p_vpar->bit_stream, i_length);
1356         }
1357         else
1358         {
1359             i_code = ShowBits(&p_vpar->bit_stream, 10) - 0x3e0;
1360             i_dct_dc_size = pl_dct_dc_chrom_init_table_2[i_code].i_value;
1361             i_length = pl_dct_dc_chrom_init_table_2[i_code].i_length;
1362             RemoveBits( &p_vpar->bit_stream, i_length);
1363         }
1364     }
1365     if (i_dct_dc_size==0)
1366         i_dct_dc_diff = 0;
1367     else
1368     {
1369         i_dct_dc_diff = GetBits( &p_vpar->bit_stream, i_dct_dc_size);
1370         if ((i_dct_dc_diff & (1<<(i_dct_dc_size-1)))==0)
1371             i_dct_dc_diff-= (1<<i_dct_dc_size) - 1;
1372     }
1373
1374     /* Dump the variable length code */
1375     //RemoveBits( &p_vpar->bit_stream,
1376     //          p_vpar->pppl_dct_dc_size[i_type][i_select][i_pos].i_length );
1377
1378     /* Read the actual code with the good length */
1379     p_vpar->slice.pi_dc_dct_pred[i_cc] += i_dct_dc_diff;
1380
1381     p_mb->ppi_blocks[i_b][0] = ( p_vpar->slice.pi_dc_dct_pred[i_cc] <<
1382                                ( 3 - p_vpar->picture.i_intra_dc_precision ) );
1383     i_nc = ( p_vpar->slice.pi_dc_dct_pred[i_cc] != 0 );
1384
1385 //fprintf( stderr, "coucou\n" );
1386     /* Decoding of the AC coefficients */
1387
1388     i_coef = 0;
1389     b_vlc_intra = p_vpar->picture.b_intra_vlc_format;
1390     for( i_parse = 1; /*i_parse < 64*/; i_parse++ )
1391     {
1392         i_code = ShowBits( &p_vpar->bit_stream, 16 );
1393         if( i_code >= 16384 )
1394         {
1395             if( b_vlc_intra )
1396             {
1397                 i_run =     pl_DCT_tab0a[(i_code>>8)-4].i_run;
1398                 i_level =   pl_DCT_tab0a[(i_code>>8)-4].i_level;
1399                 i_length =  pl_DCT_tab0a[(i_code>>8)-4].i_length;
1400 //fprintf( stderr, "**********> %d, %d, %d *******\n", i_run, i_level, (i_code>>8)-4 );
1401             }
1402             else
1403             {
1404                 i_run =     pl_DCT_tab_ac[(i_code>>12)-4].i_run;
1405                 i_level =   pl_DCT_tab_ac[(i_code>>12)-4].i_level;
1406                 i_length =  pl_DCT_tab_ac[(i_code>>12)-4].i_length;
1407              }
1408         }
1409         else
1410         {
1411             i_run =     ppl_dct_coef[b_vlc_intra][i_code].i_run;
1412             i_length =  ppl_dct_coef[b_vlc_intra][i_code].i_length;
1413             i_level =   ppl_dct_coef[b_vlc_intra][i_code].i_level;
1414         }
1415
1416 #if 0
1417         {
1418             int code = i_code;
1419             int intra_vlc_format = b_vlc_intra;
1420             dct_lookup_t tab;
1421
1422     if (code>=16384 && !intra_vlc_format)
1423       tab = pl_DCT_tab_ac[(code>>12)-4];
1424     else if (code>=1024)
1425     {
1426       if (intra_vlc_format)
1427         tab = pl_DCT_tab0a[(code>>8)-4];
1428       else
1429         tab = pl_DCT_tab0[(code>>8)-4];
1430     }
1431     else if (code>=512)
1432     {
1433       if (intra_vlc_format)
1434         tab = pl_DCT_tab1a[(code>>6)-8];
1435       else
1436         tab = pl_DCT_tab1[(code>>6)-8];
1437     }
1438     else if (code>=256)
1439       tab = pl_DCT_tab2[(code>>4)-16];
1440     else if (code>=128)
1441       tab = pl_DCT_tab3[(code>>3)-16];
1442     else if (code>=64)
1443       tab = pl_DCT_tab4[(code>>2)-16];
1444     else if (code>=32)
1445       tab = pl_DCT_tab5[(code>>1)-16];
1446     else if (code>=16)
1447       tab = pl_DCT_tab6[code-16];
1448     else
1449     {
1450        fprintf( stderr, "invalid Huffman code in Decode_MPEG2_Intra_Block()\n");
1451     }
1452
1453     if( (i_run != tab.i_run) || (i_length != tab.i_length) || (i_level != tab.i_level) )
1454     {
1455         fprintf( stderr, "ET M....... !!!\n" );
1456         exit(0);
1457     }
1458         }
1459 #endif
1460
1461
1462
1463
1464         RemoveBits( &p_vpar->bit_stream, i_length );
1465
1466         switch( i_run )
1467         {
1468             case DCT_ESCAPE:
1469                 i_run = GetBits( &p_vpar->bit_stream, 6 );
1470                 i_level = GetBits( &p_vpar->bit_stream, 12 );
1471                 /*p_mb->ppi_blocks[i_b][i_parse] = ( b_sign = ( i_level > 2047 ) )
1472                                                           ? ( -4096 + i_level )
1473                                                           : i_level;*/
1474                 i_level = (b_sign = ( i_level > 2047 )) ? 4096 - i_level
1475                                                         : i_level;
1476                 break;
1477             case DCT_EOB:
1478                 if( i_nc <= 1 )
1479                 {
1480                     p_mb->pf_idct[i_b] = vdec_SparseIDCT;
1481                     p_mb->pi_sparse_pos[i_b] = i_coef;
1482                 }
1483                 else
1484                 {
1485                     p_mb->pf_idct[i_b] = vdec_IDCT;
1486                 }
1487                 return;
1488
1489                 break;
1490             default:
1491                 b_sign = GetBits( &p_vpar->bit_stream, 1 );
1492                 //p_mb->ppi_blocks[i_b][i_parse] = b_sign ? -i_level : i_level;
1493         }
1494 // fprintf( stderr, "i_code : %d (%d), run : %d, %d, %d (%4x) ", i_code ,  b_vlc_intra,
1495 //                  i_run, i_level, i_parse, ShowBits( &p_vpar->bit_stream, 16 ) );
1496
1497 //fprintf( stderr, "- %4x\n",ShowBits( &p_vpar->bit_stream, 16 ) );
1498 if( i_parse >= 64 )
1499 {
1500     fprintf( stderr, "Beuhh dans l'intra decode (%d)\n", i_b );
1501     break;
1502 }
1503         i_coef = i_parse;
1504         i_parse += i_run;
1505         i_nc ++;
1506
1507         i_pos = pi_scan[p_vpar->picture.b_alternate_scan][i_parse];
1508         i_level = ( i_level *
1509                     p_vpar->slice.i_quantizer_scale *
1510                     ppi_quant[i_quant_type][i_pos] ) >> 4;
1511         p_mb->ppi_blocks[i_b][i_pos] = b_sign ? -i_level : i_level;
1512     }
1513
1514 fprintf( stderr, "MPEG2 end (%d)\n", i_b );
1515 //p_vpar->b_error = 1;
1516 }