libavcodec/bink.c
Go to the documentation of this file.
00001 /*
00002  * Bink video decoder
00003  * Copyright (c) 2009 Konstantin Shishkov
00004  * Copyright (C) 2011 Peter Ross <pross@xvid.org>
00005  *
00006  * This file is part of Libav.
00007  *
00008  * Libav is free software; you can redistribute it and/or
00009  * modify it under the terms of the GNU Lesser General Public
00010  * License as published by the Free Software Foundation; either
00011  * version 2.1 of the License, or (at your option) any later version.
00012  *
00013  * Libav is distributed in the hope that it will be useful,
00014  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00015  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00016  * Lesser General Public License for more details.
00017  *
00018  * You should have received a copy of the GNU Lesser General Public
00019  * License along with Libav; if not, write to the Free Software
00020  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
00021  */
00022 
00023 #include "libavutil/imgutils.h"
00024 #include "avcodec.h"
00025 #include "dsputil.h"
00026 #include "binkdata.h"
00027 #include "binkdsp.h"
00028 #include "mathops.h"
00029 
00030 #define BITSTREAM_READER_LE
00031 #include "get_bits.h"
00032 
00033 #define BINK_FLAG_ALPHA 0x00100000
00034 #define BINK_FLAG_GRAY  0x00020000
00035 
00036 static VLC bink_trees[16];
00037 
00041 enum OldSources {
00042     BINKB_SRC_BLOCK_TYPES = 0, 
00043     BINKB_SRC_COLORS,          
00044     BINKB_SRC_PATTERN,         
00045     BINKB_SRC_X_OFF,           
00046     BINKB_SRC_Y_OFF,           
00047     BINKB_SRC_INTRA_DC,        
00048     BINKB_SRC_INTER_DC,        
00049     BINKB_SRC_INTRA_Q,         
00050     BINKB_SRC_INTER_Q,         
00051     BINKB_SRC_INTER_COEFS,     
00052 
00053     BINKB_NB_SRC
00054 };
00055 
00056 static const int binkb_bundle_sizes[BINKB_NB_SRC] = {
00057     4, 8, 8, 5, 5, 11, 11, 4, 4, 7
00058 };
00059 
00060 static const int binkb_bundle_signed[BINKB_NB_SRC] = {
00061     0, 0, 0, 1, 1, 0, 1, 0, 0, 0
00062 };
00063 
00064 static int32_t binkb_intra_quant[16][64];
00065 static int32_t binkb_inter_quant[16][64];
00066 
00070 enum Sources {
00071     BINK_SRC_BLOCK_TYPES = 0, 
00072     BINK_SRC_SUB_BLOCK_TYPES, 
00073     BINK_SRC_COLORS,          
00074     BINK_SRC_PATTERN,         
00075     BINK_SRC_X_OFF,           
00076     BINK_SRC_Y_OFF,           
00077     BINK_SRC_INTRA_DC,        
00078     BINK_SRC_INTER_DC,        
00079     BINK_SRC_RUN,             
00080 
00081     BINK_NB_SRC
00082 };
00083 
00087 typedef struct Tree {
00088     int     vlc_num;  
00089     uint8_t syms[16]; 
00090 } Tree;
00091 
00092 #define GET_HUFF(gb, tree)  (tree).syms[get_vlc2(gb, bink_trees[(tree).vlc_num].table,\
00093                                                  bink_trees[(tree).vlc_num].bits, 1)]
00094 
00098 typedef struct Bundle {
00099     int     len;       
00100     Tree    tree;      
00101     uint8_t *data;     
00102     uint8_t *data_end; 
00103     uint8_t *cur_dec;  
00104     uint8_t *cur_ptr;  
00105 } Bundle;
00106 
00107 /*
00108  * Decoder context
00109  */
00110 typedef struct BinkContext {
00111     AVCodecContext *avctx;
00112     DSPContext     dsp;
00113     BinkDSPContext bdsp;
00114     AVFrame        pic, last;
00115     int            version;              
00116     int            has_alpha;
00117     int            swap_planes;
00118 
00119     Bundle         bundle[BINKB_NB_SRC]; 
00120     Tree           col_high[16];         
00121     int            col_lastval;          
00122 } BinkContext;
00123 
00127 enum BlockTypes {
00128     SKIP_BLOCK = 0, 
00129     SCALED_BLOCK,   
00130     MOTION_BLOCK,   
00131     RUN_BLOCK,      
00132     RESIDUE_BLOCK,  
00133     INTRA_BLOCK,    
00134     FILL_BLOCK,     
00135     INTER_BLOCK,    
00136     PATTERN_BLOCK,  
00137     RAW_BLOCK,      
00138 };
00139 
00147 static void init_lengths(BinkContext *c, int width, int bw)
00148 {
00149     c->bundle[BINK_SRC_BLOCK_TYPES].len = av_log2((width >> 3) + 511) + 1;
00150 
00151     c->bundle[BINK_SRC_SUB_BLOCK_TYPES].len = av_log2((width >> 4) + 511) + 1;
00152 
00153     c->bundle[BINK_SRC_COLORS].len = av_log2(bw*64 + 511) + 1;
00154 
00155     c->bundle[BINK_SRC_INTRA_DC].len =
00156     c->bundle[BINK_SRC_INTER_DC].len =
00157     c->bundle[BINK_SRC_X_OFF].len =
00158     c->bundle[BINK_SRC_Y_OFF].len = av_log2((width >> 3) + 511) + 1;
00159 
00160     c->bundle[BINK_SRC_PATTERN].len = av_log2((bw << 3) + 511) + 1;
00161 
00162     c->bundle[BINK_SRC_RUN].len = av_log2(bw*48 + 511) + 1;
00163 }
00164 
00170 static av_cold void init_bundles(BinkContext *c)
00171 {
00172     int bw, bh, blocks;
00173     int i;
00174 
00175     bw = (c->avctx->width  + 7) >> 3;
00176     bh = (c->avctx->height + 7) >> 3;
00177     blocks = bw * bh;
00178 
00179     for (i = 0; i < BINKB_NB_SRC; i++) {
00180         c->bundle[i].data = av_malloc(blocks * 64);
00181         c->bundle[i].data_end = c->bundle[i].data + blocks * 64;
00182     }
00183 }
00184 
00190 static av_cold void free_bundles(BinkContext *c)
00191 {
00192     int i;
00193     for (i = 0; i < BINKB_NB_SRC; i++)
00194         av_freep(&c->bundle[i].data);
00195 }
00196 
00205 static void merge(GetBitContext *gb, uint8_t *dst, uint8_t *src, int size)
00206 {
00207     uint8_t *src2 = src + size;
00208     int size2 = size;
00209 
00210     do {
00211         if (!get_bits1(gb)) {
00212             *dst++ = *src++;
00213             size--;
00214         } else {
00215             *dst++ = *src2++;
00216             size2--;
00217         }
00218     } while (size && size2);
00219 
00220     while (size--)
00221         *dst++ = *src++;
00222     while (size2--)
00223         *dst++ = *src2++;
00224 }
00225 
00232 static void read_tree(GetBitContext *gb, Tree *tree)
00233 {
00234     uint8_t tmp1[16], tmp2[16], *in = tmp1, *out = tmp2;
00235     int i, t, len;
00236 
00237     tree->vlc_num = get_bits(gb, 4);
00238     if (!tree->vlc_num) {
00239         for (i = 0; i < 16; i++)
00240             tree->syms[i] = i;
00241         return;
00242     }
00243     if (get_bits1(gb)) {
00244         len = get_bits(gb, 3);
00245         memset(tmp1, 0, sizeof(tmp1));
00246         for (i = 0; i <= len; i++) {
00247             tree->syms[i] = get_bits(gb, 4);
00248             tmp1[tree->syms[i]] = 1;
00249         }
00250         for (i = 0; i < 16 && len < 16 - 1; i++)
00251             if (!tmp1[i])
00252                 tree->syms[++len] = i;
00253     } else {
00254         len = get_bits(gb, 2);
00255         for (i = 0; i < 16; i++)
00256             in[i] = i;
00257         for (i = 0; i <= len; i++) {
00258             int size = 1 << i;
00259             for (t = 0; t < 16; t += size << 1)
00260                 merge(gb, out + t, in + t, size);
00261             FFSWAP(uint8_t*, in, out);
00262         }
00263         memcpy(tree->syms, in, 16);
00264     }
00265 }
00266 
00274 static void read_bundle(GetBitContext *gb, BinkContext *c, int bundle_num)
00275 {
00276     int i;
00277 
00278     if (bundle_num == BINK_SRC_COLORS) {
00279         for (i = 0; i < 16; i++)
00280             read_tree(gb, &c->col_high[i]);
00281         c->col_lastval = 0;
00282     }
00283     if (bundle_num != BINK_SRC_INTRA_DC && bundle_num != BINK_SRC_INTER_DC)
00284         read_tree(gb, &c->bundle[bundle_num].tree);
00285     c->bundle[bundle_num].cur_dec =
00286     c->bundle[bundle_num].cur_ptr = c->bundle[bundle_num].data;
00287 }
00288 
00296 #define CHECK_READ_VAL(gb, b, t) \
00297     if (!b->cur_dec || (b->cur_dec > b->cur_ptr)) \
00298         return 0; \
00299     t = get_bits(gb, b->len); \
00300     if (!t) { \
00301         b->cur_dec = NULL; \
00302         return 0; \
00303     } \
00304 
00305 static int read_runs(AVCodecContext *avctx, GetBitContext *gb, Bundle *b)
00306 {
00307     int t, v;
00308     const uint8_t *dec_end;
00309 
00310     CHECK_READ_VAL(gb, b, t);
00311     dec_end = b->cur_dec + t;
00312     if (dec_end > b->data_end) {
00313         av_log(avctx, AV_LOG_ERROR, "Run value went out of bounds\n");
00314         return -1;
00315     }
00316     if (get_bits1(gb)) {
00317         v = get_bits(gb, 4);
00318         memset(b->cur_dec, v, t);
00319         b->cur_dec += t;
00320     } else {
00321         while (b->cur_dec < dec_end)
00322             *b->cur_dec++ = GET_HUFF(gb, b->tree);
00323     }
00324     return 0;
00325 }
00326 
00327 static int read_motion_values(AVCodecContext *avctx, GetBitContext *gb, Bundle *b)
00328 {
00329     int t, sign, v;
00330     const uint8_t *dec_end;
00331 
00332     CHECK_READ_VAL(gb, b, t);
00333     dec_end = b->cur_dec + t;
00334     if (dec_end > b->data_end) {
00335         av_log(avctx, AV_LOG_ERROR, "Too many motion values\n");
00336         return -1;
00337     }
00338     if (get_bits1(gb)) {
00339         v = get_bits(gb, 4);
00340         if (v) {
00341             sign = -get_bits1(gb);
00342             v = (v ^ sign) - sign;
00343         }
00344         memset(b->cur_dec, v, t);
00345         b->cur_dec += t;
00346     } else {
00347         while (b->cur_dec < dec_end) {
00348             v = GET_HUFF(gb, b->tree);
00349             if (v) {
00350                 sign = -get_bits1(gb);
00351                 v = (v ^ sign) - sign;
00352             }
00353             *b->cur_dec++ = v;
00354         }
00355     }
00356     return 0;
00357 }
00358 
00359 static const uint8_t bink_rlelens[4] = { 4, 8, 12, 32 };
00360 
00361 static int read_block_types(AVCodecContext *avctx, GetBitContext *gb, Bundle *b)
00362 {
00363     int t, v;
00364     int last = 0;
00365     const uint8_t *dec_end;
00366 
00367     CHECK_READ_VAL(gb, b, t);
00368     dec_end = b->cur_dec + t;
00369     if (dec_end > b->data_end) {
00370         av_log(avctx, AV_LOG_ERROR, "Too many block type values\n");
00371         return -1;
00372     }
00373     if (get_bits1(gb)) {
00374         v = get_bits(gb, 4);
00375         memset(b->cur_dec, v, t);
00376         b->cur_dec += t;
00377     } else {
00378         while (b->cur_dec < dec_end) {
00379             v = GET_HUFF(gb, b->tree);
00380             if (v < 12) {
00381                 last = v;
00382                 *b->cur_dec++ = v;
00383             } else {
00384                 int run = bink_rlelens[v - 12];
00385 
00386                 if (dec_end - b->cur_dec < run)
00387                     return -1;
00388                 memset(b->cur_dec, last, run);
00389                 b->cur_dec += run;
00390             }
00391         }
00392     }
00393     return 0;
00394 }
00395 
00396 static int read_patterns(AVCodecContext *avctx, GetBitContext *gb, Bundle *b)
00397 {
00398     int t, v;
00399     const uint8_t *dec_end;
00400 
00401     CHECK_READ_VAL(gb, b, t);
00402     dec_end = b->cur_dec + t;
00403     if (dec_end > b->data_end) {
00404         av_log(avctx, AV_LOG_ERROR, "Too many pattern values\n");
00405         return -1;
00406     }
00407     while (b->cur_dec < dec_end) {
00408         v  = GET_HUFF(gb, b->tree);
00409         v |= GET_HUFF(gb, b->tree) << 4;
00410         *b->cur_dec++ = v;
00411     }
00412 
00413     return 0;
00414 }
00415 
00416 static int read_colors(GetBitContext *gb, Bundle *b, BinkContext *c)
00417 {
00418     int t, sign, v;
00419     const uint8_t *dec_end;
00420 
00421     CHECK_READ_VAL(gb, b, t);
00422     dec_end = b->cur_dec + t;
00423     if (dec_end > b->data_end) {
00424         av_log(c->avctx, AV_LOG_ERROR, "Too many color values\n");
00425         return -1;
00426     }
00427     if (get_bits1(gb)) {
00428         c->col_lastval = GET_HUFF(gb, c->col_high[c->col_lastval]);
00429         v = GET_HUFF(gb, b->tree);
00430         v = (c->col_lastval << 4) | v;
00431         if (c->version < 'i') {
00432             sign = ((int8_t) v) >> 7;
00433             v = ((v & 0x7F) ^ sign) - sign;
00434             v += 0x80;
00435         }
00436         memset(b->cur_dec, v, t);
00437         b->cur_dec += t;
00438     } else {
00439         while (b->cur_dec < dec_end) {
00440             c->col_lastval = GET_HUFF(gb, c->col_high[c->col_lastval]);
00441             v = GET_HUFF(gb, b->tree);
00442             v = (c->col_lastval << 4) | v;
00443             if (c->version < 'i') {
00444                 sign = ((int8_t) v) >> 7;
00445                 v = ((v & 0x7F) ^ sign) - sign;
00446                 v += 0x80;
00447             }
00448             *b->cur_dec++ = v;
00449         }
00450     }
00451     return 0;
00452 }
00453 
00455 #define DC_START_BITS 11
00456 
00457 static int read_dcs(AVCodecContext *avctx, GetBitContext *gb, Bundle *b,
00458                     int start_bits, int has_sign)
00459 {
00460     int i, j, len, len2, bsize, sign, v, v2;
00461     int16_t *dst     = (int16_t*)b->cur_dec;
00462     int16_t *dst_end = (int16_t*)b->data_end;
00463 
00464     CHECK_READ_VAL(gb, b, len);
00465     v = get_bits(gb, start_bits - has_sign);
00466     if (v && has_sign) {
00467         sign = -get_bits1(gb);
00468         v = (v ^ sign) - sign;
00469     }
00470     if (dst_end - dst < 1)
00471         return -1;
00472     *dst++ = v;
00473     len--;
00474     for (i = 0; i < len; i += 8) {
00475         len2 = FFMIN(len - i, 8);
00476         if (dst_end - dst < len2)
00477             return -1;
00478         bsize = get_bits(gb, 4);
00479         if (bsize) {
00480             for (j = 0; j < len2; j++) {
00481                 v2 = get_bits(gb, bsize);
00482                 if (v2) {
00483                     sign = -get_bits1(gb);
00484                     v2 = (v2 ^ sign) - sign;
00485                 }
00486                 v += v2;
00487                 *dst++ = v;
00488                 if (v < -32768 || v > 32767) {
00489                     av_log(avctx, AV_LOG_ERROR, "DC value went out of bounds: %d\n", v);
00490                     return -1;
00491                 }
00492             }
00493         } else {
00494             for (j = 0; j < len2; j++)
00495                 *dst++ = v;
00496         }
00497     }
00498 
00499     b->cur_dec = (uint8_t*)dst;
00500     return 0;
00501 }
00502 
00509 static inline int get_value(BinkContext *c, int bundle)
00510 {
00511     int ret;
00512 
00513     if (bundle < BINK_SRC_X_OFF || bundle == BINK_SRC_RUN)
00514         return *c->bundle[bundle].cur_ptr++;
00515     if (bundle == BINK_SRC_X_OFF || bundle == BINK_SRC_Y_OFF)
00516         return (int8_t)*c->bundle[bundle].cur_ptr++;
00517     ret = *(int16_t*)c->bundle[bundle].cur_ptr;
00518     c->bundle[bundle].cur_ptr += 2;
00519     return ret;
00520 }
00521 
00522 static void binkb_init_bundle(BinkContext *c, int bundle_num)
00523 {
00524     c->bundle[bundle_num].cur_dec =
00525     c->bundle[bundle_num].cur_ptr = c->bundle[bundle_num].data;
00526     c->bundle[bundle_num].len = 13;
00527 }
00528 
00529 static void binkb_init_bundles(BinkContext *c)
00530 {
00531     int i;
00532     for (i = 0; i < BINKB_NB_SRC; i++)
00533         binkb_init_bundle(c, i);
00534 }
00535 
00536 static int binkb_read_bundle(BinkContext *c, GetBitContext *gb, int bundle_num)
00537 {
00538     const int bits = binkb_bundle_sizes[bundle_num];
00539     const int mask = 1 << (bits - 1);
00540     const int issigned = binkb_bundle_signed[bundle_num];
00541     Bundle *b = &c->bundle[bundle_num];
00542     int i, len;
00543 
00544     CHECK_READ_VAL(gb, b, len);
00545     if (b->data_end - b->cur_dec < len * (1 + (bits > 8)))
00546         return -1;
00547     if (bits <= 8) {
00548         if (!issigned) {
00549             for (i = 0; i < len; i++)
00550                 *b->cur_dec++ = get_bits(gb, bits);
00551         } else {
00552             for (i = 0; i < len; i++)
00553                 *b->cur_dec++ = get_bits(gb, bits) - mask;
00554         }
00555     } else {
00556         int16_t *dst = (int16_t*)b->cur_dec;
00557 
00558         if (!issigned) {
00559             for (i = 0; i < len; i++)
00560                 *dst++ = get_bits(gb, bits);
00561         } else {
00562             for (i = 0; i < len; i++)
00563                 *dst++ = get_bits(gb, bits) - mask;
00564         }
00565         b->cur_dec = (uint8_t*)dst;
00566     }
00567     return 0;
00568 }
00569 
00570 static inline int binkb_get_value(BinkContext *c, int bundle_num)
00571 {
00572     int16_t ret;
00573     const int bits = binkb_bundle_sizes[bundle_num];
00574 
00575     if (bits <= 8) {
00576         int val = *c->bundle[bundle_num].cur_ptr++;
00577         return binkb_bundle_signed[bundle_num] ? (int8_t)val : val;
00578     }
00579     ret = *(int16_t*)c->bundle[bundle_num].cur_ptr;
00580     c->bundle[bundle_num].cur_ptr += 2;
00581     return ret;
00582 }
00583 
00593 static int read_dct_coeffs(GetBitContext *gb, int32_t block[64], const uint8_t *scan,
00594                            const int32_t quant_matrices[16][64], int q)
00595 {
00596     int coef_list[128];
00597     int mode_list[128];
00598     int i, t, bits, ccoef, mode, sign;
00599     int list_start = 64, list_end = 64, list_pos;
00600     int coef_count = 0;
00601     int coef_idx[64];
00602     int quant_idx;
00603     const int32_t *quant;
00604 
00605     coef_list[list_end] = 4;  mode_list[list_end++] = 0;
00606     coef_list[list_end] = 24; mode_list[list_end++] = 0;
00607     coef_list[list_end] = 44; mode_list[list_end++] = 0;
00608     coef_list[list_end] = 1;  mode_list[list_end++] = 3;
00609     coef_list[list_end] = 2;  mode_list[list_end++] = 3;
00610     coef_list[list_end] = 3;  mode_list[list_end++] = 3;
00611 
00612     for (bits = get_bits(gb, 4) - 1; bits >= 0; bits--) {
00613         list_pos = list_start;
00614         while (list_pos < list_end) {
00615             if (!(mode_list[list_pos] | coef_list[list_pos]) || !get_bits1(gb)) {
00616                 list_pos++;
00617                 continue;
00618             }
00619             ccoef = coef_list[list_pos];
00620             mode  = mode_list[list_pos];
00621             switch (mode) {
00622             case 0:
00623                 coef_list[list_pos] = ccoef + 4;
00624                 mode_list[list_pos] = 1;
00625             case 2:
00626                 if (mode == 2) {
00627                     coef_list[list_pos]   = 0;
00628                     mode_list[list_pos++] = 0;
00629                 }
00630                 for (i = 0; i < 4; i++, ccoef++) {
00631                     if (get_bits1(gb)) {
00632                         coef_list[--list_start] = ccoef;
00633                         mode_list[  list_start] = 3;
00634                     } else {
00635                         if (!bits) {
00636                             t = 1 - (get_bits1(gb) << 1);
00637                         } else {
00638                             t = get_bits(gb, bits) | 1 << bits;
00639                             sign = -get_bits1(gb);
00640                             t = (t ^ sign) - sign;
00641                         }
00642                         block[scan[ccoef]] = t;
00643                         coef_idx[coef_count++] = ccoef;
00644                     }
00645                 }
00646                 break;
00647             case 1:
00648                 mode_list[list_pos] = 2;
00649                 for (i = 0; i < 3; i++) {
00650                     ccoef += 4;
00651                     coef_list[list_end]   = ccoef;
00652                     mode_list[list_end++] = 2;
00653                 }
00654                 break;
00655             case 3:
00656                 if (!bits) {
00657                     t = 1 - (get_bits1(gb) << 1);
00658                 } else {
00659                     t = get_bits(gb, bits) | 1 << bits;
00660                     sign = -get_bits1(gb);
00661                     t = (t ^ sign) - sign;
00662                 }
00663                 block[scan[ccoef]] = t;
00664                 coef_idx[coef_count++] = ccoef;
00665                 coef_list[list_pos]   = 0;
00666                 mode_list[list_pos++] = 0;
00667                 break;
00668             }
00669         }
00670     }
00671 
00672     if (q == -1) {
00673         quant_idx = get_bits(gb, 4);
00674     } else {
00675         quant_idx = q;
00676     }
00677 
00678     if (quant_idx >= 16)
00679         return AVERROR_INVALIDDATA;
00680 
00681     quant = quant_matrices[quant_idx];
00682 
00683     block[0] = (block[0] * quant[0]) >> 11;
00684     for (i = 0; i < coef_count; i++) {
00685         int idx = coef_idx[i];
00686         block[scan[idx]] = (block[scan[idx]] * quant[idx]) >> 11;
00687     }
00688 
00689     return 0;
00690 }
00691 
00700 static int read_residue(GetBitContext *gb, DCTELEM block[64], int masks_count)
00701 {
00702     int coef_list[128];
00703     int mode_list[128];
00704     int i, sign, mask, ccoef, mode;
00705     int list_start = 64, list_end = 64, list_pos;
00706     int nz_coeff[64];
00707     int nz_coeff_count = 0;
00708 
00709     coef_list[list_end] =  4; mode_list[list_end++] = 0;
00710     coef_list[list_end] = 24; mode_list[list_end++] = 0;
00711     coef_list[list_end] = 44; mode_list[list_end++] = 0;
00712     coef_list[list_end] =  0; mode_list[list_end++] = 2;
00713 
00714     for (mask = 1 << get_bits(gb, 3); mask; mask >>= 1) {
00715         for (i = 0; i < nz_coeff_count; i++) {
00716             if (!get_bits1(gb))
00717                 continue;
00718             if (block[nz_coeff[i]] < 0)
00719                 block[nz_coeff[i]] -= mask;
00720             else
00721                 block[nz_coeff[i]] += mask;
00722             masks_count--;
00723             if (masks_count < 0)
00724                 return 0;
00725         }
00726         list_pos = list_start;
00727         while (list_pos < list_end) {
00728             if (!(coef_list[list_pos] | mode_list[list_pos]) || !get_bits1(gb)) {
00729                 list_pos++;
00730                 continue;
00731             }
00732             ccoef = coef_list[list_pos];
00733             mode  = mode_list[list_pos];
00734             switch (mode) {
00735             case 0:
00736                 coef_list[list_pos] = ccoef + 4;
00737                 mode_list[list_pos] = 1;
00738             case 2:
00739                 if (mode == 2) {
00740                     coef_list[list_pos]   = 0;
00741                     mode_list[list_pos++] = 0;
00742                 }
00743                 for (i = 0; i < 4; i++, ccoef++) {
00744                     if (get_bits1(gb)) {
00745                         coef_list[--list_start] = ccoef;
00746                         mode_list[  list_start] = 3;
00747                     } else {
00748                         nz_coeff[nz_coeff_count++] = bink_scan[ccoef];
00749                         sign = -get_bits1(gb);
00750                         block[bink_scan[ccoef]] = (mask ^ sign) - sign;
00751                         masks_count--;
00752                         if (masks_count < 0)
00753                             return 0;
00754                     }
00755                 }
00756                 break;
00757             case 1:
00758                 mode_list[list_pos] = 2;
00759                 for (i = 0; i < 3; i++) {
00760                     ccoef += 4;
00761                     coef_list[list_end]   = ccoef;
00762                     mode_list[list_end++] = 2;
00763                 }
00764                 break;
00765             case 3:
00766                 nz_coeff[nz_coeff_count++] = bink_scan[ccoef];
00767                 sign = -get_bits1(gb);
00768                 block[bink_scan[ccoef]] = (mask ^ sign) - sign;
00769                 coef_list[list_pos]   = 0;
00770                 mode_list[list_pos++] = 0;
00771                 masks_count--;
00772                 if (masks_count < 0)
00773                     return 0;
00774                 break;
00775             }
00776         }
00777     }
00778 
00779     return 0;
00780 }
00781 
00785 static inline void put_pixels8x8_overlapped(uint8_t *dst, uint8_t *src, int stride)
00786 {
00787     uint8_t tmp[64];
00788     int i;
00789     for (i = 0; i < 8; i++)
00790         memcpy(tmp + i*8, src + i*stride, 8);
00791     for (i = 0; i < 8; i++)
00792         memcpy(dst + i*stride, tmp + i*8, 8);
00793 }
00794 
00795 static int binkb_decode_plane(BinkContext *c, GetBitContext *gb, int plane_idx,
00796                               int is_key, int is_chroma)
00797 {
00798     int blk;
00799     int i, j, bx, by;
00800     uint8_t *dst, *ref, *ref_start, *ref_end;
00801     int v, col[2];
00802     const uint8_t *scan;
00803     int xoff, yoff;
00804     LOCAL_ALIGNED_16(DCTELEM, block, [64]);
00805     LOCAL_ALIGNED_16(int32_t, dctblock, [64]);
00806     int coordmap[64];
00807     int ybias = is_key ? -15 : 0;
00808     int qp;
00809 
00810     const int stride = c->pic.linesize[plane_idx];
00811     int bw = is_chroma ? (c->avctx->width  + 15) >> 4 : (c->avctx->width  + 7) >> 3;
00812     int bh = is_chroma ? (c->avctx->height + 15) >> 4 : (c->avctx->height + 7) >> 3;
00813 
00814     binkb_init_bundles(c);
00815     ref_start = c->pic.data[plane_idx];
00816     ref_end   = c->pic.data[plane_idx] + (bh * c->pic.linesize[plane_idx] + bw) * 8;
00817 
00818     for (i = 0; i < 64; i++)
00819         coordmap[i] = (i & 7) + (i >> 3) * stride;
00820 
00821     for (by = 0; by < bh; by++) {
00822         for (i = 0; i < BINKB_NB_SRC; i++) {
00823             if (binkb_read_bundle(c, gb, i) < 0)
00824                 return -1;
00825         }
00826 
00827         dst  = c->pic.data[plane_idx]  + 8*by*stride;
00828         for (bx = 0; bx < bw; bx++, dst += 8) {
00829             blk = binkb_get_value(c, BINKB_SRC_BLOCK_TYPES);
00830             switch (blk) {
00831             case 0:
00832                 break;
00833             case 1:
00834                 scan = bink_patterns[get_bits(gb, 4)];
00835                 i = 0;
00836                 do {
00837                     int mode, run;
00838 
00839                     mode = get_bits1(gb);
00840                     run = get_bits(gb, binkb_runbits[i]) + 1;
00841 
00842                     i += run;
00843                     if (i > 64) {
00844                         av_log(c->avctx, AV_LOG_ERROR, "Run went out of bounds\n");
00845                         return -1;
00846                     }
00847                     if (mode) {
00848                         v = binkb_get_value(c, BINKB_SRC_COLORS);
00849                         for (j = 0; j < run; j++)
00850                             dst[coordmap[*scan++]] = v;
00851                     } else {
00852                         for (j = 0; j < run; j++)
00853                             dst[coordmap[*scan++]] = binkb_get_value(c, BINKB_SRC_COLORS);
00854                     }
00855                 } while (i < 63);
00856                 if (i == 63)
00857                     dst[coordmap[*scan++]] = binkb_get_value(c, BINKB_SRC_COLORS);
00858                 break;
00859             case 2:
00860                 memset(dctblock, 0, sizeof(*dctblock) * 64);
00861                 dctblock[0] = binkb_get_value(c, BINKB_SRC_INTRA_DC);
00862                 qp = binkb_get_value(c, BINKB_SRC_INTRA_Q);
00863                 read_dct_coeffs(gb, dctblock, bink_scan, binkb_intra_quant, qp);
00864                 c->bdsp.idct_put(dst, stride, dctblock);
00865                 break;
00866             case 3:
00867                 xoff = binkb_get_value(c, BINKB_SRC_X_OFF);
00868                 yoff = binkb_get_value(c, BINKB_SRC_Y_OFF) + ybias;
00869                 ref = dst + xoff + yoff * stride;
00870                 if (ref < ref_start || ref + 8*stride > ref_end) {
00871                     av_log(c->avctx, AV_LOG_WARNING, "Reference block is out of bounds\n");
00872                 } else if (ref + 8*stride < dst || ref >= dst + 8*stride) {
00873                     c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
00874                 } else {
00875                     put_pixels8x8_overlapped(dst, ref, stride);
00876                 }
00877                 c->dsp.clear_block(block);
00878                 v = binkb_get_value(c, BINKB_SRC_INTER_COEFS);
00879                 read_residue(gb, block, v);
00880                 c->dsp.add_pixels8(dst, block, stride);
00881                 break;
00882             case 4:
00883                 xoff = binkb_get_value(c, BINKB_SRC_X_OFF);
00884                 yoff = binkb_get_value(c, BINKB_SRC_Y_OFF) + ybias;
00885                 ref = dst + xoff + yoff * stride;
00886                 if (ref < ref_start || ref + 8 * stride > ref_end) {
00887                     av_log(c->avctx, AV_LOG_WARNING, "Reference block is out of bounds\n");
00888                 } else if (ref + 8*stride < dst || ref >= dst + 8*stride) {
00889                     c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
00890                 } else {
00891                     put_pixels8x8_overlapped(dst, ref, stride);
00892                 }
00893                 memset(dctblock, 0, sizeof(*dctblock) * 64);
00894                 dctblock[0] = binkb_get_value(c, BINKB_SRC_INTER_DC);
00895                 qp = binkb_get_value(c, BINKB_SRC_INTER_Q);
00896                 read_dct_coeffs(gb, dctblock, bink_scan, binkb_inter_quant, qp);
00897                 c->bdsp.idct_add(dst, stride, dctblock);
00898                 break;
00899             case 5:
00900                 v = binkb_get_value(c, BINKB_SRC_COLORS);
00901                 c->dsp.fill_block_tab[1](dst, v, stride, 8);
00902                 break;
00903             case 6:
00904                 for (i = 0; i < 2; i++)
00905                     col[i] = binkb_get_value(c, BINKB_SRC_COLORS);
00906                 for (i = 0; i < 8; i++) {
00907                     v = binkb_get_value(c, BINKB_SRC_PATTERN);
00908                     for (j = 0; j < 8; j++, v >>= 1)
00909                         dst[i*stride + j] = col[v & 1];
00910                 }
00911                 break;
00912             case 7:
00913                 xoff = binkb_get_value(c, BINKB_SRC_X_OFF);
00914                 yoff = binkb_get_value(c, BINKB_SRC_Y_OFF) + ybias;
00915                 ref = dst + xoff + yoff * stride;
00916                 if (ref < ref_start || ref + 8 * stride > ref_end) {
00917                     av_log(c->avctx, AV_LOG_WARNING, "Reference block is out of bounds\n");
00918                 } else if (ref + 8*stride < dst || ref >= dst + 8*stride) {
00919                     c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
00920                 } else {
00921                     put_pixels8x8_overlapped(dst, ref, stride);
00922                 }
00923                 break;
00924             case 8:
00925                 for (i = 0; i < 8; i++)
00926                     memcpy(dst + i*stride, c->bundle[BINKB_SRC_COLORS].cur_ptr + i*8, 8);
00927                 c->bundle[BINKB_SRC_COLORS].cur_ptr += 64;
00928                 break;
00929             default:
00930                 av_log(c->avctx, AV_LOG_ERROR, "Unknown block type %d\n", blk);
00931                 return -1;
00932             }
00933         }
00934     }
00935     if (get_bits_count(gb) & 0x1F) //next plane data starts at 32-bit boundary
00936         skip_bits_long(gb, 32 - (get_bits_count(gb) & 0x1F));
00937 
00938     return 0;
00939 }
00940 
00941 static int bink_decode_plane(BinkContext *c, GetBitContext *gb, int plane_idx,
00942                              int is_chroma)
00943 {
00944     int blk;
00945     int i, j, bx, by;
00946     uint8_t *dst, *prev, *ref, *ref_start, *ref_end;
00947     int v, col[2];
00948     const uint8_t *scan;
00949     int xoff, yoff;
00950     LOCAL_ALIGNED_16(DCTELEM, block, [64]);
00951     LOCAL_ALIGNED_16(uint8_t, ublock, [64]);
00952     LOCAL_ALIGNED_16(int32_t, dctblock, [64]);
00953     int coordmap[64];
00954 
00955     const int stride = c->pic.linesize[plane_idx];
00956     int bw = is_chroma ? (c->avctx->width  + 15) >> 4 : (c->avctx->width  + 7) >> 3;
00957     int bh = is_chroma ? (c->avctx->height + 15) >> 4 : (c->avctx->height + 7) >> 3;
00958     int width = c->avctx->width >> is_chroma;
00959 
00960     init_lengths(c, FFMAX(width, 8), bw);
00961     for (i = 0; i < BINK_NB_SRC; i++)
00962         read_bundle(gb, c, i);
00963 
00964     ref_start = c->last.data[plane_idx] ? c->last.data[plane_idx]
00965                                         : c->pic.data[plane_idx];
00966     ref_end   = ref_start
00967                 + (bw - 1 + c->last.linesize[plane_idx] * (bh - 1)) * 8;
00968 
00969     for (i = 0; i < 64; i++)
00970         coordmap[i] = (i & 7) + (i >> 3) * stride;
00971 
00972     for (by = 0; by < bh; by++) {
00973         if (read_block_types(c->avctx, gb, &c->bundle[BINK_SRC_BLOCK_TYPES]) < 0)
00974             return -1;
00975         if (read_block_types(c->avctx, gb, &c->bundle[BINK_SRC_SUB_BLOCK_TYPES]) < 0)
00976             return -1;
00977         if (read_colors(gb, &c->bundle[BINK_SRC_COLORS], c) < 0)
00978             return -1;
00979         if (read_patterns(c->avctx, gb, &c->bundle[BINK_SRC_PATTERN]) < 0)
00980             return -1;
00981         if (read_motion_values(c->avctx, gb, &c->bundle[BINK_SRC_X_OFF]) < 0)
00982             return -1;
00983         if (read_motion_values(c->avctx, gb, &c->bundle[BINK_SRC_Y_OFF]) < 0)
00984             return -1;
00985         if (read_dcs(c->avctx, gb, &c->bundle[BINK_SRC_INTRA_DC], DC_START_BITS, 0) < 0)
00986             return -1;
00987         if (read_dcs(c->avctx, gb, &c->bundle[BINK_SRC_INTER_DC], DC_START_BITS, 1) < 0)
00988             return -1;
00989         if (read_runs(c->avctx, gb, &c->bundle[BINK_SRC_RUN]) < 0)
00990             return -1;
00991 
00992         if (by == bh)
00993             break;
00994         dst  = c->pic.data[plane_idx]  + 8*by*stride;
00995         prev = (c->last.data[plane_idx] ? c->last.data[plane_idx]
00996                                         : c->pic.data[plane_idx]) + 8*by*stride;
00997         for (bx = 0; bx < bw; bx++, dst += 8, prev += 8) {
00998             blk = get_value(c, BINK_SRC_BLOCK_TYPES);
00999             // 16x16 block type on odd line means part of the already decoded block, so skip it
01000             if ((by & 1) && blk == SCALED_BLOCK) {
01001                 bx++;
01002                 dst  += 8;
01003                 prev += 8;
01004                 continue;
01005             }
01006             switch (blk) {
01007             case SKIP_BLOCK:
01008                 c->dsp.put_pixels_tab[1][0](dst, prev, stride, 8);
01009                 break;
01010             case SCALED_BLOCK:
01011                 blk = get_value(c, BINK_SRC_SUB_BLOCK_TYPES);
01012                 switch (blk) {
01013                 case RUN_BLOCK:
01014                     scan = bink_patterns[get_bits(gb, 4)];
01015                     i = 0;
01016                     do {
01017                         int run = get_value(c, BINK_SRC_RUN) + 1;
01018 
01019                         i += run;
01020                         if (i > 64) {
01021                             av_log(c->avctx, AV_LOG_ERROR, "Run went out of bounds\n");
01022                             return -1;
01023                         }
01024                         if (get_bits1(gb)) {
01025                             v = get_value(c, BINK_SRC_COLORS);
01026                             for (j = 0; j < run; j++)
01027                                 ublock[*scan++] = v;
01028                         } else {
01029                             for (j = 0; j < run; j++)
01030                                 ublock[*scan++] = get_value(c, BINK_SRC_COLORS);
01031                         }
01032                     } while (i < 63);
01033                     if (i == 63)
01034                         ublock[*scan++] = get_value(c, BINK_SRC_COLORS);
01035                     break;
01036                 case INTRA_BLOCK:
01037                     memset(dctblock, 0, sizeof(*dctblock) * 64);
01038                     dctblock[0] = get_value(c, BINK_SRC_INTRA_DC);
01039                     read_dct_coeffs(gb, dctblock, bink_scan, bink_intra_quant, -1);
01040                     c->bdsp.idct_put(ublock, 8, dctblock);
01041                     break;
01042                 case FILL_BLOCK:
01043                     v = get_value(c, BINK_SRC_COLORS);
01044                     c->dsp.fill_block_tab[0](dst, v, stride, 16);
01045                     break;
01046                 case PATTERN_BLOCK:
01047                     for (i = 0; i < 2; i++)
01048                         col[i] = get_value(c, BINK_SRC_COLORS);
01049                     for (j = 0; j < 8; j++) {
01050                         v = get_value(c, BINK_SRC_PATTERN);
01051                         for (i = 0; i < 8; i++, v >>= 1)
01052                             ublock[i + j*8] = col[v & 1];
01053                     }
01054                     break;
01055                 case RAW_BLOCK:
01056                     for (j = 0; j < 8; j++)
01057                         for (i = 0; i < 8; i++)
01058                             ublock[i + j*8] = get_value(c, BINK_SRC_COLORS);
01059                     break;
01060                 default:
01061                     av_log(c->avctx, AV_LOG_ERROR, "Incorrect 16x16 block type %d\n", blk);
01062                     return -1;
01063                 }
01064                 if (blk != FILL_BLOCK)
01065                 c->bdsp.scale_block(ublock, dst, stride);
01066                 bx++;
01067                 dst  += 8;
01068                 prev += 8;
01069                 break;
01070             case MOTION_BLOCK:
01071                 xoff = get_value(c, BINK_SRC_X_OFF);
01072                 yoff = get_value(c, BINK_SRC_Y_OFF);
01073                 ref = prev + xoff + yoff * stride;
01074                 if (ref < ref_start || ref > ref_end) {
01075                     av_log(c->avctx, AV_LOG_ERROR, "Copy out of bounds @%d, %d\n",
01076                            bx*8 + xoff, by*8 + yoff);
01077                     return -1;
01078                 }
01079                 c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
01080                 break;
01081             case RUN_BLOCK:
01082                 scan = bink_patterns[get_bits(gb, 4)];
01083                 i = 0;
01084                 do {
01085                     int run = get_value(c, BINK_SRC_RUN) + 1;
01086 
01087                     i += run;
01088                     if (i > 64) {
01089                         av_log(c->avctx, AV_LOG_ERROR, "Run went out of bounds\n");
01090                         return -1;
01091                     }
01092                     if (get_bits1(gb)) {
01093                         v = get_value(c, BINK_SRC_COLORS);
01094                         for (j = 0; j < run; j++)
01095                             dst[coordmap[*scan++]] = v;
01096                     } else {
01097                         for (j = 0; j < run; j++)
01098                             dst[coordmap[*scan++]] = get_value(c, BINK_SRC_COLORS);
01099                     }
01100                 } while (i < 63);
01101                 if (i == 63)
01102                     dst[coordmap[*scan++]] = get_value(c, BINK_SRC_COLORS);
01103                 break;
01104             case RESIDUE_BLOCK:
01105                 xoff = get_value(c, BINK_SRC_X_OFF);
01106                 yoff = get_value(c, BINK_SRC_Y_OFF);
01107                 ref = prev + xoff + yoff * stride;
01108                 if (ref < ref_start || ref > ref_end) {
01109                     av_log(c->avctx, AV_LOG_ERROR, "Copy out of bounds @%d, %d\n",
01110                            bx*8 + xoff, by*8 + yoff);
01111                     return -1;
01112                 }
01113                 c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
01114                 c->dsp.clear_block(block);
01115                 v = get_bits(gb, 7);
01116                 read_residue(gb, block, v);
01117                 c->dsp.add_pixels8(dst, block, stride);
01118                 break;
01119             case INTRA_BLOCK:
01120                 memset(dctblock, 0, sizeof(*dctblock) * 64);
01121                 dctblock[0] = get_value(c, BINK_SRC_INTRA_DC);
01122                 read_dct_coeffs(gb, dctblock, bink_scan, bink_intra_quant, -1);
01123                 c->bdsp.idct_put(dst, stride, dctblock);
01124                 break;
01125             case FILL_BLOCK:
01126                 v = get_value(c, BINK_SRC_COLORS);
01127                 c->dsp.fill_block_tab[1](dst, v, stride, 8);
01128                 break;
01129             case INTER_BLOCK:
01130                 xoff = get_value(c, BINK_SRC_X_OFF);
01131                 yoff = get_value(c, BINK_SRC_Y_OFF);
01132                 ref = prev + xoff + yoff * stride;
01133                 c->dsp.put_pixels_tab[1][0](dst, ref, stride, 8);
01134                 memset(dctblock, 0, sizeof(*dctblock) * 64);
01135                 dctblock[0] = get_value(c, BINK_SRC_INTER_DC);
01136                 read_dct_coeffs(gb, dctblock, bink_scan, bink_inter_quant, -1);
01137                 c->bdsp.idct_add(dst, stride, dctblock);
01138                 break;
01139             case PATTERN_BLOCK:
01140                 for (i = 0; i < 2; i++)
01141                     col[i] = get_value(c, BINK_SRC_COLORS);
01142                 for (i = 0; i < 8; i++) {
01143                     v = get_value(c, BINK_SRC_PATTERN);
01144                     for (j = 0; j < 8; j++, v >>= 1)
01145                         dst[i*stride + j] = col[v & 1];
01146                 }
01147                 break;
01148             case RAW_BLOCK:
01149                 for (i = 0; i < 8; i++)
01150                     memcpy(dst + i*stride, c->bundle[BINK_SRC_COLORS].cur_ptr + i*8, 8);
01151                 c->bundle[BINK_SRC_COLORS].cur_ptr += 64;
01152                 break;
01153             default:
01154                 av_log(c->avctx, AV_LOG_ERROR, "Unknown block type %d\n", blk);
01155                 return -1;
01156             }
01157         }
01158     }
01159     if (get_bits_count(gb) & 0x1F) //next plane data starts at 32-bit boundary
01160         skip_bits_long(gb, 32 - (get_bits_count(gb) & 0x1F));
01161 
01162     return 0;
01163 }
01164 
01165 static int decode_frame(AVCodecContext *avctx, void *data, int *data_size, AVPacket *pkt)
01166 {
01167     BinkContext * const c = avctx->priv_data;
01168     GetBitContext gb;
01169     int plane, plane_idx;
01170     int bits_count = pkt->size << 3;
01171 
01172     if (c->version > 'b') {
01173         if(c->pic.data[0])
01174             avctx->release_buffer(avctx, &c->pic);
01175 
01176         if(avctx->get_buffer(avctx, &c->pic) < 0){
01177             av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
01178             return -1;
01179         }
01180     } else {
01181         if(avctx->reget_buffer(avctx, &c->pic) < 0){
01182             av_log(avctx, AV_LOG_ERROR, "reget_buffer() failed\n");
01183             return -1;
01184         }
01185     }
01186 
01187     init_get_bits(&gb, pkt->data, bits_count);
01188     if (c->has_alpha) {
01189         if (c->version >= 'i')
01190             skip_bits_long(&gb, 32);
01191         if (bink_decode_plane(c, &gb, 3, 0) < 0)
01192             return -1;
01193     }
01194     if (c->version >= 'i')
01195         skip_bits_long(&gb, 32);
01196 
01197     for (plane = 0; plane < 3; plane++) {
01198         plane_idx = (!plane || !c->swap_planes) ? plane : (plane ^ 3);
01199 
01200         if (c->version > 'b') {
01201             if (bink_decode_plane(c, &gb, plane_idx, !!plane) < 0)
01202                 return -1;
01203         } else {
01204             if (binkb_decode_plane(c, &gb, plane_idx, !pkt->pts, !!plane) < 0)
01205                 return -1;
01206         }
01207         if (get_bits_count(&gb) >= bits_count)
01208             break;
01209     }
01210     emms_c();
01211 
01212     *data_size = sizeof(AVFrame);
01213     *(AVFrame*)data = c->pic;
01214 
01215     if (c->version > 'b')
01216         FFSWAP(AVFrame, c->pic, c->last);
01217 
01218     /* always report that the buffer was completely consumed */
01219     return pkt->size;
01220 }
01221 
01225 static av_cold void binkb_calc_quant(void)
01226 {
01227     uint8_t inv_bink_scan[64];
01228     double s[64];
01229     int i, j;
01230 
01231     for (j = 0; j < 8; j++) {
01232         for (i = 0; i < 8; i++) {
01233             if (j && j != 4)
01234                if (i && i != 4)
01235                    s[j*8 + i] = cos(j * M_PI/16.0) * cos(i * M_PI/16.0) * 2.0;
01236                else
01237                    s[j*8 + i] = cos(j * M_PI/16.0) * sqrt(2.0);
01238             else
01239                if (i && i != 4)
01240                    s[j*8 + i] = cos(i * M_PI/16.0) * sqrt(2.0);
01241                else
01242                    s[j*8 + i] = 1.0;
01243         }
01244     }
01245 
01246     for (i = 0; i < 64; i++)
01247         inv_bink_scan[bink_scan[i]] = i;
01248 
01249     for (j = 0; j < 16; j++) {
01250         for (i = 0; i < 64; i++) {
01251             int k = inv_bink_scan[i];
01252             if (s[i] == 1.0) {
01253                 binkb_intra_quant[j][k] = (1L << 12) * binkb_intra_seed[i] *
01254                                           binkb_num[j]/binkb_den[j];
01255                 binkb_inter_quant[j][k] = (1L << 12) * binkb_inter_seed[i] *
01256                                           binkb_num[j]/binkb_den[j];
01257             } else {
01258                 binkb_intra_quant[j][k] = (1L << 12) * binkb_intra_seed[i] * s[i] *
01259                                           binkb_num[j]/(double)binkb_den[j];
01260                 binkb_inter_quant[j][k] = (1L << 12) * binkb_inter_seed[i] * s[i] *
01261                                           binkb_num[j]/(double)binkb_den[j];
01262             }
01263         }
01264     }
01265 }
01266 
01267 static av_cold int decode_init(AVCodecContext *avctx)
01268 {
01269     BinkContext * const c = avctx->priv_data;
01270     static VLC_TYPE table[16 * 128][2];
01271     static int binkb_initialised = 0;
01272     int i;
01273     int flags;
01274 
01275     c->version = avctx->codec_tag >> 24;
01276     if (avctx->extradata_size < 4) {
01277         av_log(avctx, AV_LOG_ERROR, "Extradata missing or too short\n");
01278         return -1;
01279     }
01280     flags = AV_RL32(avctx->extradata);
01281     c->has_alpha = flags & BINK_FLAG_ALPHA;
01282     c->swap_planes = c->version >= 'h';
01283     if (!bink_trees[15].table) {
01284         for (i = 0; i < 16; i++) {
01285             const int maxbits = bink_tree_lens[i][15];
01286             bink_trees[i].table = table + i*128;
01287             bink_trees[i].table_allocated = 1 << maxbits;
01288             init_vlc(&bink_trees[i], maxbits, 16,
01289                      bink_tree_lens[i], 1, 1,
01290                      bink_tree_bits[i], 1, 1, INIT_VLC_USE_NEW_STATIC | INIT_VLC_LE);
01291         }
01292     }
01293     c->avctx = avctx;
01294 
01295     c->pic.data[0] = NULL;
01296 
01297     if (av_image_check_size(avctx->width, avctx->height, 0, avctx) < 0) {
01298         return 1;
01299     }
01300 
01301     avctx->pix_fmt = c->has_alpha ? PIX_FMT_YUVA420P : PIX_FMT_YUV420P;
01302 
01303     avctx->idct_algo = FF_IDCT_BINK;
01304     dsputil_init(&c->dsp, avctx);
01305     ff_binkdsp_init(&c->bdsp);
01306 
01307     init_bundles(c);
01308 
01309     if (c->version == 'b') {
01310         if (!binkb_initialised) {
01311             binkb_calc_quant();
01312             binkb_initialised = 1;
01313         }
01314     }
01315 
01316     return 0;
01317 }
01318 
01319 static av_cold int decode_end(AVCodecContext *avctx)
01320 {
01321     BinkContext * const c = avctx->priv_data;
01322 
01323     if (c->pic.data[0])
01324         avctx->release_buffer(avctx, &c->pic);
01325     if (c->last.data[0])
01326         avctx->release_buffer(avctx, &c->last);
01327 
01328     free_bundles(c);
01329     return 0;
01330 }
01331 
01332 AVCodec ff_bink_decoder = {
01333     .name           = "binkvideo",
01334     .type           = AVMEDIA_TYPE_VIDEO,
01335     .id             = CODEC_ID_BINKVIDEO,
01336     .priv_data_size = sizeof(BinkContext),
01337     .init           = decode_init,
01338     .close          = decode_end,
01339     .decode         = decode_frame,
01340     .long_name = NULL_IF_CONFIG_SMALL("Bink video"),
01341 };