git.sesse.net Git - ffmpeg/blob - libavcodec/huffyuvdec.c

   1 /*
   2  * huffyuv decoder
   3  *
   4  * Copyright (c) 2002-2003 Michael Niedermayer <michaelni@gmx.at>
   5  *
   6  * see http://www.pcisys.net/~melanson/codecs/huffyuv.txt for a description of
   7  * the algorithm used
   8  *
   9  * This file is part of FFmpeg.
  10  *
  11  * FFmpeg is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU Lesser General Public
  13  * License as published by the Free Software Foundation; either
  14  * version 2.1 of the License, or (at your option) any later version.
  15  *
  16  * FFmpeg is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19  * Lesser General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU Lesser General Public
  22  * License along with FFmpeg; if not, write to the Free Software
  23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  24  */
  25
  26 /**
  27  * @file
  28  * huffyuv decoder
  29  */
  30
  31 #include "avcodec.h"
  32 #include "get_bits.h"
  33 #include "huffyuv.h"
  34 #include "thread.h"
  35 #include "libavutil/pixdesc.h"
  36
  37 #define classic_shift_luma_table_size 42
  38 static const unsigned char classic_shift_luma[classic_shift_luma_table_size + FF_INPUT_BUFFER_PADDING_SIZE] = {
  39   34,36,35,69,135,232,9,16,10,24,11,23,12,16,13,10,14,8,15,8,
  40   16,8,17,20,16,10,207,206,205,236,11,8,10,21,9,23,8,8,199,70,
  41   69,68, 0,
  42   0,0,0,0,0,0,0,0,
  43 };
  44
  45 #define classic_shift_chroma_table_size 59
  46 static const unsigned char classic_shift_chroma[classic_shift_chroma_table_size + FF_INPUT_BUFFER_PADDING_SIZE] = {
  47   66,36,37,38,39,40,41,75,76,77,110,239,144,81,82,83,84,85,118,183,
  48   56,57,88,89,56,89,154,57,58,57,26,141,57,56,58,57,58,57,184,119,
  49   214,245,116,83,82,49,80,79,78,77,44,75,41,40,39,38,37,36,34, 0,
  50   0,0,0,0,0,0,0,0,
  51 };
  52
  53 static const unsigned char classic_add_luma[256] = {
  54     3,  9,  5, 12, 10, 35, 32, 29, 27, 50, 48, 45, 44, 41, 39, 37,
  55    73, 70, 68, 65, 64, 61, 58, 56, 53, 50, 49, 46, 44, 41, 38, 36,
  56    68, 65, 63, 61, 58, 55, 53, 51, 48, 46, 45, 43, 41, 39, 38, 36,
  57    35, 33, 32, 30, 29, 27, 26, 25, 48, 47, 46, 44, 43, 41, 40, 39,
  58    37, 36, 35, 34, 32, 31, 30, 28, 27, 26, 24, 23, 22, 20, 19, 37,
  59    35, 34, 33, 31, 30, 29, 27, 26, 24, 23, 21, 20, 18, 17, 15, 29,
  60    27, 26, 24, 22, 21, 19, 17, 16, 14, 26, 25, 23, 21, 19, 18, 16,
  61    15, 27, 25, 23, 21, 19, 17, 16, 14, 26, 25, 23, 21, 18, 17, 14,
  62    12, 17, 19, 13,  4,  9,  2, 11,  1,  7,  8,  0, 16,  3, 14,  6,
  63    12, 10,  5, 15, 18, 11, 10, 13, 15, 16, 19, 20, 22, 24, 27, 15,
  64    18, 20, 22, 24, 26, 14, 17, 20, 22, 24, 27, 15, 18, 20, 23, 25,
  65    28, 16, 19, 22, 25, 28, 32, 36, 21, 25, 29, 33, 38, 42, 45, 49,
  66    28, 31, 34, 37, 40, 42, 44, 47, 49, 50, 52, 54, 56, 57, 59, 60,
  67    62, 64, 66, 67, 69, 35, 37, 39, 40, 42, 43, 45, 47, 48, 51, 52,
  68    54, 55, 57, 59, 60, 62, 63, 66, 67, 69, 71, 72, 38, 40, 42, 43,
  69    46, 47, 49, 51, 26, 28, 30, 31, 33, 34, 18, 19, 11, 13,  7,  8,
  70 };
  71
  72 static const unsigned char classic_add_chroma[256] = {
  73     3,  1,  2,  2,  2,  2,  3,  3,  7,  5,  7,  5,  8,  6, 11,  9,
  74     7, 13, 11, 10,  9,  8,  7,  5,  9,  7,  6,  4,  7,  5,  8,  7,
  75    11,  8, 13, 11, 19, 15, 22, 23, 20, 33, 32, 28, 27, 29, 51, 77,
  76    43, 45, 76, 81, 46, 82, 75, 55, 56,144, 58, 80, 60, 74,147, 63,
  77   143, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
  78    80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 27, 30, 21, 22,
  79    17, 14,  5,  6,100, 54, 47, 50, 51, 53,106,107,108,109,110,111,
  80   112,113,114,115,  4,117,118, 92, 94,121,122,  3,124,103,  2,  1,
  81     0,129,130,131,120,119,126,125,136,137,138,139,140,141,142,134,
  82   135,132,133,104, 64,101, 62, 57,102, 95, 93, 59, 61, 28, 97, 96,
  83    52, 49, 48, 29, 32, 25, 24, 46, 23, 98, 45, 44, 43, 20, 42, 41,
  84    19, 18, 99, 40, 15, 39, 38, 16, 13, 12, 11, 37, 10,  9,  8, 36,
  85     7,128,127,105,123,116, 35, 34, 33,145, 31, 79, 42,146, 78, 26,
  86    83, 48, 49, 50, 44, 47, 26, 31, 30, 18, 17, 19, 21, 24, 25, 13,
  87    14, 16, 17, 18, 20, 21, 12, 14, 15,  9, 10,  6,  9,  6,  5,  8,
  88     6, 12,  8, 10,  7,  9,  6,  4,  6,  2,  2,  3,  3,  3,  3,  2,
  89 };
  90
  91 static int read_len_table(uint8_t *dst, GetBitContext *gb)
  92 {
  93     int i, val, repeat;
  94
  95     for (i = 0; i < 256;) {
  96         repeat = get_bits(gb, 3);
  97         val    = get_bits(gb, 5);
  98         if (repeat == 0)
  99             repeat = get_bits(gb, 8);
 100         if (i + repeat > 256 || get_bits_left(gb) < 0) {
 101             av_log(NULL, AV_LOG_ERROR, "Error reading huffman table\n");
 102             return -1;
 103         }
 104         while (repeat--)
 105             dst[i++] = val;
 106     }
 107     return 0;
 108 }
 109
 110 static int generate_joint_tables(HYuvContext *s)
 111 {
 112     uint16_t symbols[1 << VLC_BITS];
 113     uint16_t bits[1 << VLC_BITS];
 114     uint8_t len[1 << VLC_BITS];
 115     int ret;
 116
 117     if (s->bitstream_bpp < 24 || s->version > 2) {
 118         int p, i, y, u;
 119         for (p = 0; p < 4; p++) {
 120             int p0 = s->version > 2 ? p : 0;
 121             for (i = y = 0; y < 256; y++) {
 122                 int len0 = s->len[p0][y];
 123                 int limit = VLC_BITS - len0;
 124                 if(limit <= 0 || !len0)
 125                     continue;
 126                 for (u = 0; u < 256; u++) {
 127                     int len1 = s->len[p][u];
 128                     if (len1 > limit || !len1)
 129                         continue;
 130                     av_assert0(i < (1 << VLC_BITS));
 131                     len[i] = len0 + len1;
 132                     bits[i] = (s->bits[p0][y] << len1) + s->bits[p][u];
 133                     symbols[i] = (y << 8) + u;
 134                     if(symbols[i] != 0xffff) // reserved to mean "invalid"
 135                         i++;
 136                 }
 137             }
 138             ff_free_vlc(&s->vlc[4 + p]);
 139             if ((ret = ff_init_vlc_sparse(&s->vlc[4 + p], VLC_BITS, i, len, 1, 1,
 140                                           bits, 2, 2, symbols, 2, 2, 0)) < 0)
 141                 return ret;
 142         }
 143     } else {
 144         uint8_t (*map)[4] = (uint8_t(*)[4])s->pix_bgr_map;
 145         int i, b, g, r, code;
 146         int p0 = s->decorrelate;
 147         int p1 = !s->decorrelate;
 148         // restrict the range to +/-16 because that's pretty much guaranteed to
 149         // cover all the combinations that fit in 11 bits total, and it doesn't
 150         // matter if we miss a few rare codes.
 151         for (i = 0, g = -16; g < 16; g++) {
 152             int len0 = s->len[p0][g & 255];
 153             int limit0 = VLC_BITS - len0;
 154             if (limit0 < 2 || !len0)
 155                 continue;
 156             for (b = -16; b < 16; b++) {
 157                 int len1 = s->len[p1][b & 255];
 158                 int limit1 = limit0 - len1;
 159                 if (limit1 < 1 || !len1)
 160                     continue;
 161                 code = (s->bits[p0][g & 255] << len1) + s->bits[p1][b & 255];
 162                 for (r = -16; r < 16; r++) {
 163                     int len2 = s->len[2][r & 255];
 164                     if (len2 > limit1 || !len2)
 165                         continue;
 166                     av_assert0(i < (1 << VLC_BITS));
 167                     len[i] = len0 + len1 + len2;
 168                     bits[i] = (code << len2) + s->bits[2][r & 255];
 169                     if (s->decorrelate) {
 170                         map[i][G] = g;
 171                         map[i][B] = g + b;
 172                         map[i][R] = g + r;
 173                     } else {
 174                         map[i][B] = g;
 175                         map[i][G] = b;
 176                         map[i][R] = r;
 177                     }
 178                     i++;
 179                 }
 180             }
 181         }
 182         ff_free_vlc(&s->vlc[4]);
 183         if ((ret = init_vlc(&s->vlc[4], VLC_BITS, i, len, 1, 1, bits, 2, 2, 0)) < 0)
 184             return ret;
 185     }
 186     return 0;
 187 }
 188
 189 static int read_huffman_tables(HYuvContext *s, const uint8_t *src, int length)
 190 {
 191     GetBitContext gb;
 192     int i;
 193     int ret;
 194     int count = 3;
 195
 196     init_get_bits(&gb, src, length * 8);
 197
 198     if (s->version > 2)
 199         count = 1 + s->alpha + 2*s->chroma;
 200
 201     for (i = 0; i < count; i++) {
 202         if (read_len_table(s->len[i], &gb) < 0)
 203             return -1;
 204         if (ff_huffyuv_generate_bits_table(s->bits[i], s->len[i]) < 0) {
 205             return -1;
 206         }
 207         ff_free_vlc(&s->vlc[i]);
 208         if ((ret = init_vlc(&s->vlc[i], VLC_BITS, 256, s->len[i], 1, 1,
 209                            s->bits[i], 4, 4, 0)) < 0)
 210             return ret;
 211     }
 212
 213     if ((ret = generate_joint_tables(s)) < 0)
 214         return ret;
 215
 216     return (get_bits_count(&gb) + 7) / 8;
 217 }
 218
 219 static int read_old_huffman_tables(HYuvContext *s)
 220 {
 221     GetBitContext gb;
 222     int i;
 223     int ret;
 224
 225     init_get_bits(&gb, classic_shift_luma,
 226                   classic_shift_luma_table_size * 8);
 227     if (read_len_table(s->len[0], &gb) < 0)
 228         return -1;
 229
 230     init_get_bits(&gb, classic_shift_chroma,
 231                   classic_shift_chroma_table_size * 8);
 232     if (read_len_table(s->len[1], &gb) < 0)
 233         return -1;
 234
 235     for(i=0; i<256; i++) s->bits[0][i] = classic_add_luma  [i];
 236     for(i=0; i<256; i++) s->bits[1][i] = classic_add_chroma[i];
 237
 238     if (s->bitstream_bpp >= 24) {
 239         memcpy(s->bits[1], s->bits[0], 256 * sizeof(uint32_t));
 240         memcpy(s->len[1] , s->len [0], 256 * sizeof(uint8_t));
 241     }
 242     memcpy(s->bits[2], s->bits[1], 256 * sizeof(uint32_t));
 243     memcpy(s->len[2] , s->len [1], 256 * sizeof(uint8_t));
 244
 245     for (i = 0; i < 4; i++) {
 246         ff_free_vlc(&s->vlc[i]);
 247         if ((ret = init_vlc(&s->vlc[i], VLC_BITS, 256, s->len[i], 1, 1,
 248                             s->bits[i], 4, 4, 0)) < 0)
 249             return ret;
 250     }
 251
 252     if ((ret = generate_joint_tables(s)) < 0)
 253         return ret;
 254
 255     return 0;
 256 }
 257
 258 static av_cold int decode_init(AVCodecContext *avctx)
 259 {
 260     HYuvContext *s = avctx->priv_data;
 261
 262     ff_huffyuv_common_init(avctx);
 263     memset(s->vlc, 0, 4 * sizeof(VLC));
 264
 265     s->interlaced = s->height > 288;
 266
 267     s->bgr32 = 1;
 268
 269     if (avctx->extradata_size) {
 270         if ((avctx->bits_per_coded_sample & 7) &&
 271             avctx->bits_per_coded_sample != 12)
 272             s->version = 1; // do such files exist at all?
 273         else if (avctx->extradata_size > 3 && avctx->extradata[3] == 0)
 274             s->version = 2;
 275         else
 276             s->version = 3;
 277     } else
 278         s->version = 0;
 279
 280     s->bps = 8;
 281     s->chroma = 1;
 282     if (s->version >= 2) {
 283         int method, interlace;
 284
 285         if (avctx->extradata_size < 4)
 286             return -1;
 287
 288         method = ((uint8_t*)avctx->extradata)[0];
 289         s->decorrelate = method & 64 ? 1 : 0;
 290         s->predictor = method & 63;
 291         if (s->version == 2) {
 292             s->bitstream_bpp = ((uint8_t*)avctx->extradata)[1];
 293             if (s->bitstream_bpp == 0)
 294                 s->bitstream_bpp = avctx->bits_per_coded_sample & ~7;
 295         } else {
 296             s->bps = (avctx->extradata[1] >> 4) + 1;
 297             s->chroma_h_shift = avctx->extradata[1] & 3;
 298             s->chroma_v_shift = (avctx->extradata[1] >> 2) & 3;
 299             s->yuv   = !!(((uint8_t*)avctx->extradata)[2] & 1);
 300             s->chroma= !!(((uint8_t*)avctx->extradata)[2] & 3);
 301             s->alpha = !!(((uint8_t*)avctx->extradata)[2] & 4);
 302         }
 303         interlace = (((uint8_t*)avctx->extradata)[2] & 0x30) >> 4;
 304         s->interlaced = (interlace == 1) ? 1 : (interlace == 2) ? 0 : s->interlaced;
 305         s->context = ((uint8_t*)avctx->extradata)[2] & 0x40 ? 1 : 0;
 306
 307         if ( read_huffman_tables(s, ((uint8_t*)avctx->extradata) + 4,
 308                                  avctx->extradata_size - 4) < 0)
 309             return AVERROR_INVALIDDATA;
 310     }else{
 311         switch (avctx->bits_per_coded_sample & 7) {
 312         case 1:
 313             s->predictor = LEFT;
 314             s->decorrelate = 0;
 315             break;
 316         case 2:
 317             s->predictor = LEFT;
 318             s->decorrelate = 1;
 319             break;
 320         case 3:
 321             s->predictor = PLANE;
 322             s->decorrelate = avctx->bits_per_coded_sample >= 24;
 323             break;
 324         case 4:
 325             s->predictor = MEDIAN;
 326             s->decorrelate = 0;
 327             break;
 328         default:
 329             s->predictor = LEFT; //OLD
 330             s->decorrelate = 0;
 331             break;
 332         }
 333         s->bitstream_bpp = avctx->bits_per_coded_sample & ~7;
 334         s->context = 0;
 335
 336         if (read_old_huffman_tables(s) < 0)
 337             return AVERROR_INVALIDDATA;
 338     }
 339
 340     if (s->version <= 2) {
 341         switch (s->bitstream_bpp) {
 342         case 12:
 343             avctx->pix_fmt = AV_PIX_FMT_YUV420P;
 344             s->yuv = 1;
 345             break;
 346         case 16:
 347             if (s->yuy2) {
 348                 avctx->pix_fmt = AV_PIX_FMT_YUYV422;
 349             } else {
 350                 avctx->pix_fmt = AV_PIX_FMT_YUV422P;
 351             }
 352             s->yuv = 1;
 353             break;
 354         case 24:
 355         case 32:
 356             if (s->bgr32) {
 357                 avctx->pix_fmt = AV_PIX_FMT_RGB32;
 358                 s->alpha = 1;
 359             } else {
 360                 avctx->pix_fmt = AV_PIX_FMT_BGR24;
 361             }
 362             break;
 363         default:
 364             return AVERROR_INVALIDDATA;
 365         }
 366         av_pix_fmt_get_chroma_sub_sample(avctx->pix_fmt,
 367                                          &s->chroma_h_shift,
 368                                          &s->chroma_v_shift);
 369     } else {
 370         switch ( (s->chroma<<10) | (s->yuv<<9) | (s->alpha<<8) | ((s->bps-1)<<4) | s->chroma_h_shift | (s->chroma_v_shift<<2)) {
 371         case 0x070:
 372             avctx->pix_fmt = AV_PIX_FMT_GRAY8;
 373             break;
 374         case 0x170:
 375             avctx->pix_fmt = AV_PIX_FMT_GRAY8A;
 376             break;
 377         case 0x470:
 378             avctx->pix_fmt = AV_PIX_FMT_GBRP;
 379             break;
 380         case 0x570:
 381             avctx->pix_fmt = AV_PIX_FMT_GBRAP;
 382             break;
 383         case 0x670:
 384             avctx->pix_fmt = AV_PIX_FMT_YUV444P;
 385             break;
 386         case 0x671:
 387             avctx->pix_fmt = AV_PIX_FMT_YUV422P;
 388             break;
 389         case 0x672:
 390             avctx->pix_fmt = AV_PIX_FMT_YUV411P;
 391             break;
 392         case 0x674:
 393             avctx->pix_fmt = AV_PIX_FMT_YUV440P;
 394             break;
 395         case 0x675:
 396             avctx->pix_fmt = AV_PIX_FMT_YUV420P;
 397             break;
 398         case 0x67A:
 399             avctx->pix_fmt = AV_PIX_FMT_YUV410P;
 400             break;
 401         case 0x770:
 402             avctx->pix_fmt = AV_PIX_FMT_YUVA444P;
 403             break;
 404         case 0x771:
 405             avctx->pix_fmt = AV_PIX_FMT_YUVA422P;
 406             break;
 407         case 0x775:
 408             avctx->pix_fmt = AV_PIX_FMT_YUVA420P;
 409             break;
 410         }
 411     }
 412
 413
 414     if ((avctx->pix_fmt == AV_PIX_FMT_YUV422P || avctx->pix_fmt == AV_PIX_FMT_YUV420P) && avctx->width & 1) {
 415         av_log(avctx, AV_LOG_ERROR, "width must be even for this colorspace\n");
 416         return AVERROR_INVALIDDATA;
 417     }
 418     if (s->predictor == MEDIAN && avctx->pix_fmt == AV_PIX_FMT_YUV422P && avctx->width%4) {
 419         av_log(avctx, AV_LOG_ERROR, "width must be a multiple of 4 this colorspace and predictor\n");
 420         return AVERROR_INVALIDDATA;
 421     }
 422     if (ff_huffyuv_alloc_temp(s)) {
 423         ff_huffyuv_common_end(s);
 424         return AVERROR(ENOMEM);
 425     }
 426
 427     return 0;
 428 }
 429
 430 static av_cold int decode_init_thread_copy(AVCodecContext *avctx)
 431 {
 432     HYuvContext *s = avctx->priv_data;
 433     int i;
 434
 435     if (ff_huffyuv_alloc_temp(s)) {
 436         ff_huffyuv_common_end(s);
 437         return AVERROR(ENOMEM);
 438     }
 439
 440     for (i = 0; i < 8; i++)
 441         s->vlc[i].table = NULL;
 442
 443     if (s->version >= 2) {
 444         if (read_huffman_tables(s, ((uint8_t*)avctx->extradata) + 4,
 445                                 avctx->extradata_size) < 0)
 446             return AVERROR_INVALIDDATA;
 447     } else {
 448         if (read_old_huffman_tables(s) < 0)
 449             return AVERROR_INVALIDDATA;
 450     }
 451
 452     return 0;
 453 }
 454
 455 /* TODO instead of restarting the read when the code isn't in the first level
 456  * of the joint table, jump into the 2nd level of the individual table. */
 457 #define READ_2PIX(dst0, dst1, plane1){\
 458     uint16_t code = get_vlc2(&s->gb, s->vlc[4+plane1].table, VLC_BITS, 1);\
 459     if(code != 0xffff){\
 460         dst0 = code>>8;\
 461         dst1 = code;\
 462     }else{\
 463         dst0 = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3);\
 464         dst1 = get_vlc2(&s->gb, s->vlc[plane1].table, VLC_BITS, 3);\
 465     }\
 466 }
 467
 468 static void decode_422_bitstream(HYuvContext *s, int count)
 469 {
 470     int i;
 471
 472     count /= 2;
 473
 474     if (count >= (get_bits_left(&s->gb)) / (31 * 4)) {
 475         for (i = 0; i < count && get_bits_left(&s->gb) > 0; i++) {
 476             READ_2PIX(s->temp[0][2 * i    ], s->temp[1][i], 1);
 477             READ_2PIX(s->temp[0][2 * i + 1], s->temp[2][i], 2);
 478         }
 479         for (; i < count; i++)
 480             s->temp[0][2 * i    ] = s->temp[1][i] =
 481             s->temp[0][2 * i + 1] = s->temp[2][i] = 128;
 482     } else {
 483         for (i = 0; i < count; i++) {
 484             READ_2PIX(s->temp[0][2 * i    ], s->temp[1][i], 1);
 485             READ_2PIX(s->temp[0][2 * i + 1], s->temp[2][i], 2);
 486         }
 487     }
 488 }
 489
 490 #define READ_2PIX_PLANE(dst0, dst1, plane){\
 491     uint16_t code = get_vlc2(&s->gb, s->vlc[4+plane].table, VLC_BITS, 1);\
 492     if(code != 0xffff){\
 493         dst0 = code>>8;\
 494         dst1 = code;\
 495     }else{\
 496         dst0 = get_vlc2(&s->gb, s->vlc[plane].table, VLC_BITS, 3);\
 497         dst1 = get_vlc2(&s->gb, s->vlc[plane].table, VLC_BITS, 3);\
 498     }\
 499 }
 500 static void decode_plane_bitstream(HYuvContext *s, int count, int plane)
 501 {
 502     int i;
 503
 504     count/=2;
 505
 506     if (count >= (get_bits_left(&s->gb)) / (31 * 2)) {
 507         for (i = 0; i < count && get_bits_left(&s->gb) > 0; i++) {
 508             READ_2PIX_PLANE(s->temp[0][2 * i], s->temp[0][2 * i + 1], plane);
 509         }
 510     } else {
 511         for(i=0; i<count; i++){
 512             READ_2PIX_PLANE(s->temp[0][2 * i], s->temp[0][2 * i + 1], plane);
 513         }
 514     }
 515 }
 516
 517 static void decode_gray_bitstream(HYuvContext *s, int count)
 518 {
 519     int i;
 520
 521     count/=2;
 522
 523     if (count >= (get_bits_left(&s->gb)) / (31 * 2)) {
 524         for (i = 0; i < count && get_bits_left(&s->gb) > 0; i++) {
 525             READ_2PIX(s->temp[0][2 * i], s->temp[0][2 * i + 1], 0);
 526         }
 527     } else {
 528         for(i=0; i<count; i++){
 529             READ_2PIX(s->temp[0][2 * i], s->temp[0][2 * i + 1], 0);
 530         }
 531     }
 532 }
 533
 534 static av_always_inline void decode_bgr_1(HYuvContext *s, int count,
 535                                           int decorrelate, int alpha)
 536 {
 537     int i;
 538     for (i = 0; i < count; i++) {
 539         int code = get_vlc2(&s->gb, s->vlc[4].table, VLC_BITS, 1);
 540         if (code != -1) {
 541             *(uint32_t*)&s->temp[0][4 * i] = s->pix_bgr_map[code];
 542         } else if(decorrelate) {
 543             s->temp[0][4 * i + G] = get_vlc2(&s->gb, s->vlc[1].table, VLC_BITS, 3);
 544             s->temp[0][4 * i + B] = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3) +
 545                                     s->temp[0][4 * i + G];
 546             s->temp[0][4 * i + R] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3) +
 547                                     s->temp[0][4 * i + G];
 548         } else {
 549             s->temp[0][4 * i + B] = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3);
 550             s->temp[0][4 * i + G] = get_vlc2(&s->gb, s->vlc[1].table, VLC_BITS, 3);
 551             s->temp[0][4 * i + R] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3);
 552         }
 553         if (alpha)
 554             s->temp[0][4 * i + A] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3);
 555     }
 556 }
 557
 558 static void decode_bgr_bitstream(HYuvContext *s, int count)
 559 {
 560     if (s->decorrelate) {
 561         if (s->bitstream_bpp==24)
 562             decode_bgr_1(s, count, 1, 0);
 563         else
 564             decode_bgr_1(s, count, 1, 1);
 565     } else {
 566         if (s->bitstream_bpp==24)
 567             decode_bgr_1(s, count, 0, 0);
 568         else
 569             decode_bgr_1(s, count, 0, 1);
 570     }
 571 }
 572
 573 static void draw_slice(HYuvContext *s, AVFrame *frame, int y)
 574 {
 575     int h, cy, i;
 576     int offset[AV_NUM_DATA_POINTERS];
 577
 578     if (s->avctx->draw_horiz_band==NULL)
 579         return;
 580
 581     h = y - s->last_slice_end;
 582     y -= h;
 583
 584     if (s->bitstream_bpp == 12) {
 585         cy = y>>1;
 586     } else {
 587         cy = y;
 588     }
 589
 590     offset[0] = frame->linesize[0] * y;
 591     offset[1] = frame->linesize[1] * cy;
 592     offset[2] = frame->linesize[2] * cy;
 593     for (i = 3; i < AV_NUM_DATA_POINTERS; i++)
 594         offset[i] = 0;
 595     emms_c();
 596
 597     s->avctx->draw_horiz_band(s->avctx, frame, offset, y, 3, h);
 598
 599     s->last_slice_end = y + h;
 600 }
 601
 602 static int decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
 603                         AVPacket *avpkt)
 604 {
 605     const uint8_t *buf = avpkt->data;
 606     int buf_size = avpkt->size;
 607     HYuvContext *s = avctx->priv_data;
 608     const int width = s->width;
 609     const int width2 = s->width>>1;
 610     const int height = s->height;
 611     int fake_ystride, fake_ustride, fake_vstride;
 612     ThreadFrame frame = { .f = data };
 613     AVFrame * const p = data;
 614     int table_size = 0, ret;
 615
 616     av_fast_padded_malloc(&s->bitstream_buffer,
 617                    &s->bitstream_buffer_size,
 618                    buf_size);
 619     if (!s->bitstream_buffer)
 620         return AVERROR(ENOMEM);
 621
 622     s->dsp.bswap_buf((uint32_t*)s->bitstream_buffer,
 623                      (const uint32_t*)buf, buf_size / 4);
 624
 625     if ((ret = ff_thread_get_buffer(avctx, &frame, 0)) < 0)
 626         return ret;
 627
 628     if (s->context) {
 629         table_size = read_huffman_tables(s, s->bitstream_buffer, buf_size);
 630         if (table_size < 0)
 631             return AVERROR_INVALIDDATA;
 632     }
 633
 634     if ((unsigned)(buf_size-table_size) >= INT_MAX / 8)
 635         return AVERROR_INVALIDDATA;
 636
 637     init_get_bits(&s->gb, s->bitstream_buffer+table_size,
 638                   (buf_size-table_size) * 8);
 639
 640     fake_ystride = s->interlaced ? p->linesize[0] * 2  : p->linesize[0];
 641     fake_ustride = s->interlaced ? p->linesize[1] * 2  : p->linesize[1];
 642     fake_vstride = s->interlaced ? p->linesize[2] * 2  : p->linesize[2];
 643
 644     s->last_slice_end = 0;
 645
 646     if (s->version > 2) {
 647         int plane;
 648         for(plane = 0; plane < 1 + 2*s->chroma + s->alpha; plane++) {
 649             int left, lefttop, y;
 650             int w = width;
 651             int h = height;
 652             int fake_stride = fake_ystride;
 653
 654             if (s->chroma && (plane == 1 || plane == 2)) {
 655                 w >>= s->chroma_h_shift;
 656                 h >>= s->chroma_v_shift;
 657                 fake_stride = plane == 1 ? fake_ustride : fake_vstride;
 658             }
 659
 660             switch (s->predictor) {
 661             case LEFT:
 662             case PLANE:
 663                 decode_plane_bitstream(s, w, plane);
 664                 left = s->dsp.add_hfyu_left_prediction(p->data[plane], s->temp[0], w, 0);
 665
 666                 for (y = 1; y < h; y++) {
 667                     uint8_t *dst = p->data[plane] + p->linesize[plane]*y;
 668
 669                     decode_plane_bitstream(s, w, plane);
 670                     left = s->dsp.add_hfyu_left_prediction(dst, s->temp[0], w, left);
 671                     if (s->predictor == PLANE) {
 672                         if (y > s->interlaced) {
 673                             s->dsp.add_bytes(dst, dst - fake_stride, w);
 674                         }
 675                     }
 676                 }
 677
 678                 break;
 679             case MEDIAN:
 680                 decode_plane_bitstream(s, w, plane);
 681                 left= s->dsp.add_hfyu_left_prediction(p->data[plane], s->temp[0], w, 0);
 682
 683                 y = 1;
 684
 685                 /* second line is left predicted for interlaced case */
 686                 if (s->interlaced) {
 687                     decode_plane_bitstream(s, w, plane);
 688                     left = s->dsp.add_hfyu_left_prediction(p->data[plane] + p->linesize[plane], s->temp[0], w, left);
 689                     y++;
 690                 }
 691
 692                 lefttop = p->data[plane][0];
 693                 decode_plane_bitstream(s, w, plane);
 694                 s->dsp.add_hfyu_median_prediction(p->data[plane] + fake_stride, p->data[plane], s->temp[0], w, &left, &lefttop);
 695                 y++;
 696
 697                 for (; y<h; y++) {
 698                     uint8_t *dst;
 699
 700                     decode_plane_bitstream(s, w, plane);
 701
 702                     dst = p->data[plane] + p->linesize[plane] * y;
 703
 704                     s->dsp.add_hfyu_median_prediction(dst, dst - fake_stride, s->temp[0], w, &left, &lefttop);
 705                 }
 706
 707                 break;
 708             }
 709         }
 710         draw_slice(s, p, height);
 711     } else if (s->bitstream_bpp < 24) {
 712         int y, cy;
 713         int lefty, leftu, leftv;
 714         int lefttopy, lefttopu, lefttopv;
 715
 716         if (s->yuy2) {
 717             p->data[0][3] = get_bits(&s->gb, 8);
 718             p->data[0][2] = get_bits(&s->gb, 8);
 719             p->data[0][1] = get_bits(&s->gb, 8);
 720             p->data[0][0] = get_bits(&s->gb, 8);
 721
 722             av_log(avctx, AV_LOG_ERROR,
 723                    "YUY2 output is not implemented yet\n");
 724             return AVERROR_PATCHWELCOME;
 725         } else {
 726
 727             leftv = p->data[2][0] = get_bits(&s->gb, 8);
 728             lefty = p->data[0][1] = get_bits(&s->gb, 8);
 729             leftu = p->data[1][0] = get_bits(&s->gb, 8);
 730                     p->data[0][0] = get_bits(&s->gb, 8);
 731
 732             switch (s->predictor) {
 733             case LEFT:
 734             case PLANE:
 735                 decode_422_bitstream(s, width-2);
 736                 lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + 2, s->temp[0], width-2, lefty);
 737                 if (!(s->flags&CODEC_FLAG_GRAY)) {
 738                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + 1, s->temp[1], width2 - 1, leftu);
 739                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + 1, s->temp[2], width2 - 1, leftv);
 740                 }
 741
 742                 for (cy = y = 1; y < s->height; y++, cy++) {
 743                     uint8_t *ydst, *udst, *vdst;
 744
 745                     if (s->bitstream_bpp == 12) {
 746                         decode_gray_bitstream(s, width);
 747
 748                         ydst = p->data[0] + p->linesize[0] * y;
 749
 750                         lefty = s->dsp.add_hfyu_left_prediction(ydst, s->temp[0], width, lefty);
 751                         if (s->predictor == PLANE) {
 752                             if (y > s->interlaced)
 753                                 s->dsp.add_bytes(ydst, ydst - fake_ystride, width);
 754                         }
 755                         y++;
 756                         if (y >= s->height) break;
 757                     }
 758
 759                     draw_slice(s, p, y);
 760
 761                     ydst = p->data[0] + p->linesize[0]*y;
 762                     udst = p->data[1] + p->linesize[1]*cy;
 763                     vdst = p->data[2] + p->linesize[2]*cy;
 764
 765                     decode_422_bitstream(s, width);
 766                     lefty = s->dsp.add_hfyu_left_prediction(ydst, s->temp[0], width, lefty);
 767                     if (!(s->flags & CODEC_FLAG_GRAY)) {
 768                         leftu= s->dsp.add_hfyu_left_prediction(udst, s->temp[1], width2, leftu);
 769                         leftv= s->dsp.add_hfyu_left_prediction(vdst, s->temp[2], width2, leftv);
 770                     }
 771                     if (s->predictor == PLANE) {
 772                         if (cy > s->interlaced) {
 773                             s->dsp.add_bytes(ydst, ydst - fake_ystride, width);
 774                             if (!(s->flags & CODEC_FLAG_GRAY)) {
 775                                 s->dsp.add_bytes(udst, udst - fake_ustride, width2);
 776                                 s->dsp.add_bytes(vdst, vdst - fake_vstride, width2);
 777                             }
 778                         }
 779                     }
 780                 }
 781                 draw_slice(s, p, height);
 782
 783                 break;
 784             case MEDIAN:
 785                 /* first line except first 2 pixels is left predicted */
 786                 decode_422_bitstream(s, width - 2);
 787                 lefty= s->dsp.add_hfyu_left_prediction(p->data[0] + 2, s->temp[0], width - 2, lefty);
 788                 if (!(s->flags & CODEC_FLAG_GRAY)) {
 789                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + 1, s->temp[1], width2 - 1, leftu);
 790                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + 1, s->temp[2], width2 - 1, leftv);
 791                 }
 792
 793                 cy = y = 1;
 794
 795                 /* second line is left predicted for interlaced case */
 796                 if (s->interlaced) {
 797                     decode_422_bitstream(s, width);
 798                     lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + p->linesize[0], s->temp[0], width, lefty);
 799                     if (!(s->flags & CODEC_FLAG_GRAY)) {
 800                         leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + p->linesize[2], s->temp[1], width2, leftu);
 801                         leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + p->linesize[1], s->temp[2], width2, leftv);
 802                     }
 803                     y++; cy++;
 804                 }
 805
 806                 /* next 4 pixels are left predicted too */
 807                 decode_422_bitstream(s, 4);
 808                 lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + fake_ystride, s->temp[0], 4, lefty);
 809                 if (!(s->flags&CODEC_FLAG_GRAY)) {
 810                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + fake_ustride, s->temp[1], 2, leftu);
 811                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + fake_vstride, s->temp[2], 2, leftv);
 812                 }
 813
 814                 /* next line except the first 4 pixels is median predicted */
 815                 lefttopy = p->data[0][3];
 816                 decode_422_bitstream(s, width - 4);
 817                 s->dsp.add_hfyu_median_prediction(p->data[0] + fake_ystride+4, p->data[0]+4, s->temp[0], width-4, &lefty, &lefttopy);
 818                 if (!(s->flags&CODEC_FLAG_GRAY)) {
 819                     lefttopu = p->data[1][1];
 820                     lefttopv = p->data[2][1];
 821                     s->dsp.add_hfyu_median_prediction(p->data[1] + fake_ustride+2, p->data[1] + 2, s->temp[1], width2 - 2, &leftu, &lefttopu);
 822                     s->dsp.add_hfyu_median_prediction(p->data[2] + fake_vstride+2, p->data[2] + 2, s->temp[2], width2 - 2, &leftv, &lefttopv);
 823                 }
 824                 y++; cy++;
 825
 826                 for (; y<height; y++, cy++) {
 827                     uint8_t *ydst, *udst, *vdst;
 828
 829                     if (s->bitstream_bpp == 12) {
 830                         while (2 * cy > y) {
 831                             decode_gray_bitstream(s, width);
 832                             ydst = p->data[0] + p->linesize[0] * y;
 833                             s->dsp.add_hfyu_median_prediction(ydst, ydst - fake_ystride, s->temp[0], width, &lefty, &lefttopy);
 834                             y++;
 835                         }
 836                         if (y >= height) break;
 837                     }
 838                     draw_slice(s, p, y);
 839
 840                     decode_422_bitstream(s, width);
 841
 842                     ydst = p->data[0] + p->linesize[0] * y;
 843                     udst = p->data[1] + p->linesize[1] * cy;
 844                     vdst = p->data[2] + p->linesize[2] * cy;
 845
 846                     s->dsp.add_hfyu_median_prediction(ydst, ydst - fake_ystride, s->temp[0], width, &lefty, &lefttopy);
 847                     if (!(s->flags & CODEC_FLAG_GRAY)) {
 848                         s->dsp.add_hfyu_median_prediction(udst, udst - fake_ustride, s->temp[1], width2, &leftu, &lefttopu);
 849                         s->dsp.add_hfyu_median_prediction(vdst, vdst - fake_vstride, s->temp[2], width2, &leftv, &lefttopv);
 850                     }
 851                 }
 852
 853                 draw_slice(s, p, height);
 854                 break;
 855             }
 856         }
 857     } else {
 858         int y;
 859         int leftr, leftg, leftb, lefta;
 860         const int last_line = (height - 1) * p->linesize[0];
 861
 862         if (s->bitstream_bpp == 32) {
 863             lefta = p->data[0][last_line+A] = get_bits(&s->gb, 8);
 864             leftr = p->data[0][last_line+R] = get_bits(&s->gb, 8);
 865             leftg = p->data[0][last_line+G] = get_bits(&s->gb, 8);
 866             leftb = p->data[0][last_line+B] = get_bits(&s->gb, 8);
 867         } else {
 868             leftr = p->data[0][last_line+R] = get_bits(&s->gb, 8);
 869             leftg = p->data[0][last_line+G] = get_bits(&s->gb, 8);
 870             leftb = p->data[0][last_line+B] = get_bits(&s->gb, 8);
 871             lefta = p->data[0][last_line+A] = 255;
 872             skip_bits(&s->gb, 8);
 873         }
 874
 875         if (s->bgr32) {
 876             switch (s->predictor) {
 877             case LEFT:
 878             case PLANE:
 879                 decode_bgr_bitstream(s, width - 1);
 880                 s->dsp.add_hfyu_left_prediction_bgr32(p->data[0] + last_line+4, s->temp[0], width - 1, &leftr, &leftg, &leftb, &lefta);
 881
 882                 for (y = s->height - 2; y >= 0; y--) { //Yes it is stored upside down.
 883                     decode_bgr_bitstream(s, width);
 884
 885                     s->dsp.add_hfyu_left_prediction_bgr32(p->data[0] + p->linesize[0]*y, s->temp[0], width, &leftr, &leftg, &leftb, &lefta);
 886                     if (s->predictor == PLANE) {
 887                         if (s->bitstream_bpp != 32) lefta = 0;
 888                         if ((y & s->interlaced) == 0 &&
 889                             y < s->height - 1 - s->interlaced) {
 890                             s->dsp.add_bytes(p->data[0] + p->linesize[0] * y,
 891                                              p->data[0] + p->linesize[0] * y +
 892                                              fake_ystride, fake_ystride);
 893                         }
 894                     }
 895                 }
 896                 // just 1 large slice as this is not possible in reverse order
 897                 draw_slice(s, p, height);
 898                 break;
 899             default:
 900                 av_log(avctx, AV_LOG_ERROR,
 901                        "prediction type not supported!\n");
 902             }
 903         }else{
 904             av_log(avctx, AV_LOG_ERROR,
 905                    "BGR24 output is not implemented yet\n");
 906             return AVERROR_PATCHWELCOME;
 907         }
 908     }
 909     emms_c();
 910
 911     *got_frame = 1;
 912
 913     return (get_bits_count(&s->gb) + 31) / 32 * 4 + table_size;
 914 }
 915
 916 static av_cold int decode_end(AVCodecContext *avctx)
 917 {
 918     HYuvContext *s = avctx->priv_data;
 919     int i;
 920
 921     ff_huffyuv_common_end(s);
 922     av_freep(&s->bitstream_buffer);
 923
 924     for (i = 0; i < 8; i++) {
 925         ff_free_vlc(&s->vlc[i]);
 926     }
 927
 928     return 0;
 929 }
 930
 931 #if CONFIG_HUFFYUV_DECODER
 932 AVCodec ff_huffyuv_decoder = {
 933     .name             = "huffyuv",
 934     .long_name        = NULL_IF_CONFIG_SMALL("Huffyuv / HuffYUV"),
 935     .type             = AVMEDIA_TYPE_VIDEO,
 936     .id               = AV_CODEC_ID_HUFFYUV,
 937     .priv_data_size   = sizeof(HYuvContext),
 938     .init             = decode_init,
 939     .close            = decode_end,
 940     .decode           = decode_frame,
 941     .capabilities     = CODEC_CAP_DR1 | CODEC_CAP_DRAW_HORIZ_BAND |
 942                         CODEC_CAP_FRAME_THREADS,
 943     .init_thread_copy = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy),
 944 };
 945 #endif
 946
 947 #if CONFIG_FFVHUFF_DECODER
 948 AVCodec ff_ffvhuff_decoder = {
 949     .name             = "ffvhuff",
 950     .long_name        = NULL_IF_CONFIG_SMALL("Huffyuv FFmpeg variant"),
 951     .type             = AVMEDIA_TYPE_VIDEO,
 952     .id               = AV_CODEC_ID_FFVHUFF,
 953     .priv_data_size   = sizeof(HYuvContext),
 954     .init             = decode_init,
 955     .close            = decode_end,
 956     .decode           = decode_frame,
 957     .capabilities     = CODEC_CAP_DR1 | CODEC_CAP_DRAW_HORIZ_BAND |
 958                         CODEC_CAP_FRAME_THREADS,
 959     .init_thread_copy = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy),
 960 };
 961 #endif