yading@10: /*
yading@10:  * huffyuv decoder
yading@10:  *
yading@10:  * Copyright (c) 2002-2003 Michael Niedermayer <michaelni@gmx.at>
yading@10:  *
yading@10:  * see http://www.pcisys.net/~melanson/codecs/huffyuv.txt for a description of
yading@10:  * the algorithm used
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public
yading@10:  * License as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@10:  * Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public
yading@10:  * License along with FFmpeg; if not, write to the Free Software
yading@10:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: /**
yading@10:  * @file
yading@10:  * huffyuv decoder
yading@10:  */
yading@10: 
yading@10: #include "avcodec.h"
yading@10: #include "get_bits.h"
yading@10: #include "huffyuv.h"
yading@10: #include "thread.h"
yading@10: 
yading@10: #define classic_shift_luma_table_size 42
yading@10: static const unsigned char classic_shift_luma[classic_shift_luma_table_size + FF_INPUT_BUFFER_PADDING_SIZE] = {
yading@10:   34,36,35,69,135,232,9,16,10,24,11,23,12,16,13,10,14,8,15,8,
yading@10:   16,8,17,20,16,10,207,206,205,236,11,8,10,21,9,23,8,8,199,70,
yading@10:   69,68, 0,
yading@10:   0,0,0,0,0,0,0,0,
yading@10: };
yading@10: 
yading@10: #define classic_shift_chroma_table_size 59
yading@10: static const unsigned char classic_shift_chroma[classic_shift_chroma_table_size + FF_INPUT_BUFFER_PADDING_SIZE] = {
yading@10:   66,36,37,38,39,40,41,75,76,77,110,239,144,81,82,83,84,85,118,183,
yading@10:   56,57,88,89,56,89,154,57,58,57,26,141,57,56,58,57,58,57,184,119,
yading@10:   214,245,116,83,82,49,80,79,78,77,44,75,41,40,39,38,37,36,34, 0,
yading@10:   0,0,0,0,0,0,0,0,
yading@10: };
yading@10: 
yading@10: static const unsigned char classic_add_luma[256] = {
yading@10:     3,  9,  5, 12, 10, 35, 32, 29, 27, 50, 48, 45, 44, 41, 39, 37,
yading@10:    73, 70, 68, 65, 64, 61, 58, 56, 53, 50, 49, 46, 44, 41, 38, 36,
yading@10:    68, 65, 63, 61, 58, 55, 53, 51, 48, 46, 45, 43, 41, 39, 38, 36,
yading@10:    35, 33, 32, 30, 29, 27, 26, 25, 48, 47, 46, 44, 43, 41, 40, 39,
yading@10:    37, 36, 35, 34, 32, 31, 30, 28, 27, 26, 24, 23, 22, 20, 19, 37,
yading@10:    35, 34, 33, 31, 30, 29, 27, 26, 24, 23, 21, 20, 18, 17, 15, 29,
yading@10:    27, 26, 24, 22, 21, 19, 17, 16, 14, 26, 25, 23, 21, 19, 18, 16,
yading@10:    15, 27, 25, 23, 21, 19, 17, 16, 14, 26, 25, 23, 21, 18, 17, 14,
yading@10:    12, 17, 19, 13,  4,  9,  2, 11,  1,  7,  8,  0, 16,  3, 14,  6,
yading@10:    12, 10,  5, 15, 18, 11, 10, 13, 15, 16, 19, 20, 22, 24, 27, 15,
yading@10:    18, 20, 22, 24, 26, 14, 17, 20, 22, 24, 27, 15, 18, 20, 23, 25,
yading@10:    28, 16, 19, 22, 25, 28, 32, 36, 21, 25, 29, 33, 38, 42, 45, 49,
yading@10:    28, 31, 34, 37, 40, 42, 44, 47, 49, 50, 52, 54, 56, 57, 59, 60,
yading@10:    62, 64, 66, 67, 69, 35, 37, 39, 40, 42, 43, 45, 47, 48, 51, 52,
yading@10:    54, 55, 57, 59, 60, 62, 63, 66, 67, 69, 71, 72, 38, 40, 42, 43,
yading@10:    46, 47, 49, 51, 26, 28, 30, 31, 33, 34, 18, 19, 11, 13,  7,  8,
yading@10: };
yading@10: 
yading@10: static const unsigned char classic_add_chroma[256] = {
yading@10:     3,  1,  2,  2,  2,  2,  3,  3,  7,  5,  7,  5,  8,  6, 11,  9,
yading@10:     7, 13, 11, 10,  9,  8,  7,  5,  9,  7,  6,  4,  7,  5,  8,  7,
yading@10:    11,  8, 13, 11, 19, 15, 22, 23, 20, 33, 32, 28, 27, 29, 51, 77,
yading@10:    43, 45, 76, 81, 46, 82, 75, 55, 56,144, 58, 80, 60, 74,147, 63,
yading@10:   143, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
yading@10:    80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 27, 30, 21, 22,
yading@10:    17, 14,  5,  6,100, 54, 47, 50, 51, 53,106,107,108,109,110,111,
yading@10:   112,113,114,115,  4,117,118, 92, 94,121,122,  3,124,103,  2,  1,
yading@10:     0,129,130,131,120,119,126,125,136,137,138,139,140,141,142,134,
yading@10:   135,132,133,104, 64,101, 62, 57,102, 95, 93, 59, 61, 28, 97, 96,
yading@10:    52, 49, 48, 29, 32, 25, 24, 46, 23, 98, 45, 44, 43, 20, 42, 41,
yading@10:    19, 18, 99, 40, 15, 39, 38, 16, 13, 12, 11, 37, 10,  9,  8, 36,
yading@10:     7,128,127,105,123,116, 35, 34, 33,145, 31, 79, 42,146, 78, 26,
yading@10:    83, 48, 49, 50, 44, 47, 26, 31, 30, 18, 17, 19, 21, 24, 25, 13,
yading@10:    14, 16, 17, 18, 20, 21, 12, 14, 15,  9, 10,  6,  9,  6,  5,  8,
yading@10:     6, 12,  8, 10,  7,  9,  6,  4,  6,  2,  2,  3,  3,  3,  3,  2,
yading@10: };
yading@10: 
yading@10: static int read_len_table(uint8_t *dst, GetBitContext *gb)
yading@10: {
yading@10:     int i, val, repeat;
yading@10: 
yading@10:     for (i = 0; i < 256;) {
yading@10:         repeat = get_bits(gb, 3);
yading@10:         val    = get_bits(gb, 5);
yading@10:         if (repeat == 0)
yading@10:             repeat = get_bits(gb, 8);
yading@10:         if (i + repeat > 256 || get_bits_left(gb) < 0) {
yading@10:             av_log(NULL, AV_LOG_ERROR, "Error reading huffman table\n");
yading@10:             return -1;
yading@10:         }
yading@10:         while (repeat--)
yading@10:             dst[i++] = val;
yading@10:     }
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int generate_joint_tables(HYuvContext *s)
yading@10: {
yading@10:     uint16_t symbols[1 << VLC_BITS];
yading@10:     uint16_t bits[1 << VLC_BITS];
yading@10:     uint8_t len[1 << VLC_BITS];
yading@10:     int ret;
yading@10: 
yading@10:     if (s->bitstream_bpp < 24) {
yading@10:         int p, i, y, u;
yading@10:         for (p = 0; p < 3; p++) {
yading@10:             for (i = y = 0; y < 256; y++) {
yading@10:                 int len0 = s->len[0][y];
yading@10:                 int limit = VLC_BITS - len0;
yading@10:                 if(limit <= 0 || !len0)
yading@10:                     continue;
yading@10:                 for (u = 0; u < 256; u++) {
yading@10:                     int len1 = s->len[p][u];
yading@10:                     if (len1 > limit || !len1)
yading@10:                         continue;
yading@10:                     av_assert0(i < (1 << VLC_BITS));
yading@10:                     len[i] = len0 + len1;
yading@10:                     bits[i] = (s->bits[0][y] << len1) + s->bits[p][u];
yading@10:                     symbols[i] = (y << 8) + u;
yading@10:                     if(symbols[i] != 0xffff) // reserved to mean "invalid"
yading@10:                         i++;
yading@10:                 }
yading@10:             }
yading@10:             ff_free_vlc(&s->vlc[3 + p]);
yading@10:             if ((ret = ff_init_vlc_sparse(&s->vlc[3 + p], VLC_BITS, i, len, 1, 1,
yading@10:                                           bits, 2, 2, symbols, 2, 2, 0)) < 0)
yading@10:                 return ret;
yading@10:         }
yading@10:     } else {
yading@10:         uint8_t (*map)[4] = (uint8_t(*)[4])s->pix_bgr_map;
yading@10:         int i, b, g, r, code;
yading@10:         int p0 = s->decorrelate;
yading@10:         int p1 = !s->decorrelate;
yading@10:         // restrict the range to +/-16 because that's pretty much guaranteed to
yading@10:         // cover all the combinations that fit in 11 bits total, and it doesn't
yading@10:         // matter if we miss a few rare codes.
yading@10:         for (i = 0, g = -16; g < 16; g++) {
yading@10:             int len0 = s->len[p0][g & 255];
yading@10:             int limit0 = VLC_BITS - len0;
yading@10:             if (limit0 < 2 || !len0)
yading@10:                 continue;
yading@10:             for (b = -16; b < 16; b++) {
yading@10:                 int len1 = s->len[p1][b & 255];
yading@10:                 int limit1 = limit0 - len1;
yading@10:                 if (limit1 < 1 || !len1)
yading@10:                     continue;
yading@10:                 code = (s->bits[p0][g & 255] << len1) + s->bits[p1][b & 255];
yading@10:                 for (r = -16; r < 16; r++) {
yading@10:                     int len2 = s->len[2][r & 255];
yading@10:                     if (len2 > limit1 || !len2)
yading@10:                         continue;
yading@10:                     av_assert0(i < (1 << VLC_BITS));
yading@10:                     len[i] = len0 + len1 + len2;
yading@10:                     bits[i] = (code << len2) + s->bits[2][r & 255];
yading@10:                     if (s->decorrelate) {
yading@10:                         map[i][G] = g;
yading@10:                         map[i][B] = g + b;
yading@10:                         map[i][R] = g + r;
yading@10:                     } else {
yading@10:                         map[i][B] = g;
yading@10:                         map[i][G] = b;
yading@10:                         map[i][R] = r;
yading@10:                     }
yading@10:                     i++;
yading@10:                 }
yading@10:             }
yading@10:         }
yading@10:         ff_free_vlc(&s->vlc[3]);
yading@10:         if ((ret = init_vlc(&s->vlc[3], VLC_BITS, i, len, 1, 1, bits, 2, 2, 0)) < 0)
yading@10:             return ret;
yading@10:     }
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int read_huffman_tables(HYuvContext *s, const uint8_t *src, int length)
yading@10: {
yading@10:     GetBitContext gb;
yading@10:     int i;
yading@10:     int ret;
yading@10: 
yading@10:     init_get_bits(&gb, src, length * 8);
yading@10: 
yading@10:     for (i = 0; i < 3; i++) {
yading@10:         if (read_len_table(s->len[i], &gb) < 0)
yading@10:             return -1;
yading@10:         if (ff_huffyuv_generate_bits_table(s->bits[i], s->len[i]) < 0) {
yading@10:             return -1;
yading@10:         }
yading@10:         ff_free_vlc(&s->vlc[i]);
yading@10:         if ((ret = init_vlc(&s->vlc[i], VLC_BITS, 256, s->len[i], 1, 1,
yading@10:                            s->bits[i], 4, 4, 0)) < 0)
yading@10:             return ret;
yading@10:     }
yading@10: 
yading@10:     if ((ret = generate_joint_tables(s)) < 0)
yading@10:         return ret;
yading@10: 
yading@10:     return (get_bits_count(&gb) + 7) / 8;
yading@10: }
yading@10: 
yading@10: static int read_old_huffman_tables(HYuvContext *s)
yading@10: {
yading@10:     GetBitContext gb;
yading@10:     int i;
yading@10:     int ret;
yading@10: 
yading@10:     init_get_bits(&gb, classic_shift_luma,
yading@10:                   classic_shift_luma_table_size * 8);
yading@10:     if (read_len_table(s->len[0], &gb) < 0)
yading@10:         return -1;
yading@10: 
yading@10:     init_get_bits(&gb, classic_shift_chroma,
yading@10:                   classic_shift_chroma_table_size * 8);
yading@10:     if (read_len_table(s->len[1], &gb) < 0)
yading@10:         return -1;
yading@10: 
yading@10:     for(i=0; i<256; i++) s->bits[0][i] = classic_add_luma  [i];
yading@10:     for(i=0; i<256; i++) s->bits[1][i] = classic_add_chroma[i];
yading@10: 
yading@10:     if (s->bitstream_bpp >= 24) {
yading@10:         memcpy(s->bits[1], s->bits[0], 256 * sizeof(uint32_t));
yading@10:         memcpy(s->len[1] , s->len [0], 256 * sizeof(uint8_t));
yading@10:     }
yading@10:     memcpy(s->bits[2], s->bits[1], 256 * sizeof(uint32_t));
yading@10:     memcpy(s->len[2] , s->len [1], 256 * sizeof(uint8_t));
yading@10: 
yading@10:     for (i = 0; i < 3; i++) {
yading@10:         ff_free_vlc(&s->vlc[i]);
yading@10:         if ((ret = init_vlc(&s->vlc[i], VLC_BITS, 256, s->len[i], 1, 1,
yading@10:                             s->bits[i], 4, 4, 0)) < 0)
yading@10:             return ret;
yading@10:     }
yading@10: 
yading@10:     if ((ret = generate_joint_tables(s)) < 0)
yading@10:         return ret;
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static av_cold int decode_init(AVCodecContext *avctx)
yading@10: {
yading@10:     HYuvContext *s = avctx->priv_data;
yading@10: 
yading@10:     ff_huffyuv_common_init(avctx);
yading@10:     memset(s->vlc, 0, 3 * sizeof(VLC));
yading@10: 
yading@10:     avcodec_get_frame_defaults(&s->picture);
yading@10:     s->interlaced = s->height > 288;
yading@10: 
yading@10:     s->bgr32 = 1;
yading@10: 
yading@10:     if (avctx->extradata_size) {
yading@10:         if ((avctx->bits_per_coded_sample & 7) &&
yading@10:             avctx->bits_per_coded_sample != 12)
yading@10:             s->version = 1; // do such files exist at all?
yading@10:         else
yading@10:             s->version = 2;
yading@10:     } else
yading@10:         s->version = 0;
yading@10: 
yading@10:     if (s->version == 2) {
yading@10:         int method, interlace;
yading@10: 
yading@10:         if (avctx->extradata_size < 4)
yading@10:             return -1;
yading@10: 
yading@10:         method = ((uint8_t*)avctx->extradata)[0];
yading@10:         s->decorrelate = method & 64 ? 1 : 0;
yading@10:         s->predictor = method & 63;
yading@10:         s->bitstream_bpp = ((uint8_t*)avctx->extradata)[1];
yading@10:         if (s->bitstream_bpp == 0)
yading@10:             s->bitstream_bpp = avctx->bits_per_coded_sample & ~7;
yading@10:         interlace = (((uint8_t*)avctx->extradata)[2] & 0x30) >> 4;
yading@10:         s->interlaced = (interlace == 1) ? 1 : (interlace == 2) ? 0 : s->interlaced;
yading@10:         s->context = ((uint8_t*)avctx->extradata)[2] & 0x40 ? 1 : 0;
yading@10: 
yading@10:         if ( read_huffman_tables(s, ((uint8_t*)avctx->extradata) + 4,
yading@10:                                  avctx->extradata_size - 4) < 0)
yading@10:             return AVERROR_INVALIDDATA;
yading@10:     }else{
yading@10:         switch (avctx->bits_per_coded_sample & 7) {
yading@10:         case 1:
yading@10:             s->predictor = LEFT;
yading@10:             s->decorrelate = 0;
yading@10:             break;
yading@10:         case 2:
yading@10:             s->predictor = LEFT;
yading@10:             s->decorrelate = 1;
yading@10:             break;
yading@10:         case 3:
yading@10:             s->predictor = PLANE;
yading@10:             s->decorrelate = avctx->bits_per_coded_sample >= 24;
yading@10:             break;
yading@10:         case 4:
yading@10:             s->predictor = MEDIAN;
yading@10:             s->decorrelate = 0;
yading@10:             break;
yading@10:         default:
yading@10:             s->predictor = LEFT; //OLD
yading@10:             s->decorrelate = 0;
yading@10:             break;
yading@10:         }
yading@10:         s->bitstream_bpp = avctx->bits_per_coded_sample & ~7;
yading@10:         s->context = 0;
yading@10: 
yading@10:         if (read_old_huffman_tables(s) < 0)
yading@10:             return AVERROR_INVALIDDATA;
yading@10:     }
yading@10: 
yading@10:     switch (s->bitstream_bpp) {
yading@10:     case 12:
yading@10:         avctx->pix_fmt = AV_PIX_FMT_YUV420P;
yading@10:         break;
yading@10:     case 16:
yading@10:         if (s->yuy2) {
yading@10:             avctx->pix_fmt = AV_PIX_FMT_YUYV422;
yading@10:         } else {
yading@10:             avctx->pix_fmt = AV_PIX_FMT_YUV422P;
yading@10:         }
yading@10:         break;
yading@10:     case 24:
yading@10:     case 32:
yading@10:         if (s->bgr32) {
yading@10:             avctx->pix_fmt = AV_PIX_FMT_RGB32;
yading@10:         } else {
yading@10:             avctx->pix_fmt = AV_PIX_FMT_BGR24;
yading@10:         }
yading@10:         break;
yading@10:     default:
yading@10:         return AVERROR_INVALIDDATA;
yading@10:     }
yading@10: 
yading@10:     if ((avctx->pix_fmt == AV_PIX_FMT_YUV422P || avctx->pix_fmt == AV_PIX_FMT_YUV420P) && avctx->width & 1) {
yading@10:         av_log(avctx, AV_LOG_ERROR, "width must be even for this colorspace\n");
yading@10:         return AVERROR_INVALIDDATA;
yading@10:     }
yading@10:     if (s->predictor == MEDIAN && avctx->pix_fmt == AV_PIX_FMT_YUV422P && avctx->width%4) {
yading@10:         av_log(avctx, AV_LOG_ERROR, "width must be a multiple of 4 this colorspace and predictor\n");
yading@10:         return AVERROR_INVALIDDATA;
yading@10:     }
yading@10:     if (ff_huffyuv_alloc_temp(s)) {
yading@10:         ff_huffyuv_common_end(s);
yading@10:         return AVERROR(ENOMEM);
yading@10:     }
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static av_cold int decode_init_thread_copy(AVCodecContext *avctx)
yading@10: {
yading@10:     HYuvContext *s = avctx->priv_data;
yading@10:     int i;
yading@10: 
yading@10:     if (ff_huffyuv_alloc_temp(s)) {
yading@10:         ff_huffyuv_common_end(s);
yading@10:         return AVERROR(ENOMEM);
yading@10:     }
yading@10: 
yading@10:     for (i = 0; i < 6; i++)
yading@10:         s->vlc[i].table = NULL;
yading@10: 
yading@10:     if (s->version == 2) {
yading@10:         if (read_huffman_tables(s, ((uint8_t*)avctx->extradata) + 4,
yading@10:                                 avctx->extradata_size) < 0)
yading@10:             return AVERROR_INVALIDDATA;
yading@10:     } else {
yading@10:         if (read_old_huffman_tables(s) < 0)
yading@10:             return AVERROR_INVALIDDATA;
yading@10:     }
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: /* TODO instead of restarting the read when the code isn't in the first level
yading@10:  * of the joint table, jump into the 2nd level of the individual table. */
yading@10: #define READ_2PIX(dst0, dst1, plane1){\
yading@10:     uint16_t code = get_vlc2(&s->gb, s->vlc[3+plane1].table, VLC_BITS, 1);\
yading@10:     if(code != 0xffff){\
yading@10:         dst0 = code>>8;\
yading@10:         dst1 = code;\
yading@10:     }else{\
yading@10:         dst0 = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3);\
yading@10:         dst1 = get_vlc2(&s->gb, s->vlc[plane1].table, VLC_BITS, 3);\
yading@10:     }\
yading@10: }
yading@10: 
yading@10: static void decode_422_bitstream(HYuvContext *s, int count)
yading@10: {
yading@10:     int i;
yading@10: 
yading@10:     count /= 2;
yading@10: 
yading@10:     if (count >= (get_bits_left(&s->gb)) / (31 * 4)) {
yading@10:         for (i = 0; i < count && get_bits_left(&s->gb) > 0; i++) {
yading@10:             READ_2PIX(s->temp[0][2 * i    ], s->temp[1][i], 1);
yading@10:             READ_2PIX(s->temp[0][2 * i + 1], s->temp[2][i], 2);
yading@10:         }
yading@10:     } else {
yading@10:         for (i = 0; i < count; i++) {
yading@10:             READ_2PIX(s->temp[0][2 * i    ], s->temp[1][i], 1);
yading@10:             READ_2PIX(s->temp[0][2 * i + 1], s->temp[2][i], 2);
yading@10:         }
yading@10:     }
yading@10: }
yading@10: 
yading@10: static void decode_gray_bitstream(HYuvContext *s, int count)
yading@10: {
yading@10:     int i;
yading@10: 
yading@10:     count/=2;
yading@10: 
yading@10:     if (count >= (get_bits_left(&s->gb)) / (31 * 2)) {
yading@10:         for (i = 0; i < count && get_bits_left(&s->gb) > 0; i++) {
yading@10:             READ_2PIX(s->temp[0][2 * i], s->temp[0][2 * i + 1], 0);
yading@10:         }
yading@10:     } else {
yading@10:         for(i=0; i<count; i++){
yading@10:             READ_2PIX(s->temp[0][2 * i], s->temp[0][2 * i + 1], 0);
yading@10:         }
yading@10:     }
yading@10: }
yading@10: 
yading@10: static av_always_inline void decode_bgr_1(HYuvContext *s, int count,
yading@10:                                           int decorrelate, int alpha)
yading@10: {
yading@10:     int i;
yading@10:     for (i = 0; i < count; i++) {
yading@10:         int code = get_vlc2(&s->gb, s->vlc[3].table, VLC_BITS, 1);
yading@10:         if (code != -1) {
yading@10:             *(uint32_t*)&s->temp[0][4 * i] = s->pix_bgr_map[code];
yading@10:         } else if(decorrelate) {
yading@10:             s->temp[0][4 * i + G] = get_vlc2(&s->gb, s->vlc[1].table, VLC_BITS, 3);
yading@10:             s->temp[0][4 * i + B] = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3) +
yading@10:                                     s->temp[0][4 * i + G];
yading@10:             s->temp[0][4 * i + R] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3) +
yading@10:                                     s->temp[0][4 * i + G];
yading@10:         } else {
yading@10:             s->temp[0][4 * i + B] = get_vlc2(&s->gb, s->vlc[0].table, VLC_BITS, 3);
yading@10:             s->temp[0][4 * i + G] = get_vlc2(&s->gb, s->vlc[1].table, VLC_BITS, 3);
yading@10:             s->temp[0][4 * i + R] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3);
yading@10:         }
yading@10:         if (alpha)
yading@10:             s->temp[0][4 * i + A] = get_vlc2(&s->gb, s->vlc[2].table, VLC_BITS, 3);
yading@10:     }
yading@10: }
yading@10: 
yading@10: static void decode_bgr_bitstream(HYuvContext *s, int count)
yading@10: {
yading@10:     if (s->decorrelate) {
yading@10:         if (s->bitstream_bpp==24)
yading@10:             decode_bgr_1(s, count, 1, 0);
yading@10:         else
yading@10:             decode_bgr_1(s, count, 1, 1);
yading@10:     } else {
yading@10:         if (s->bitstream_bpp==24)
yading@10:             decode_bgr_1(s, count, 0, 0);
yading@10:         else
yading@10:             decode_bgr_1(s, count, 0, 1);
yading@10:     }
yading@10: }
yading@10: 
yading@10: static void draw_slice(HYuvContext *s, AVFrame *frame, int y)
yading@10: {
yading@10:     int h, cy, i;
yading@10:     int offset[AV_NUM_DATA_POINTERS];
yading@10: 
yading@10:     if (s->avctx->draw_horiz_band==NULL)
yading@10:         return;
yading@10: 
yading@10:     h = y - s->last_slice_end;
yading@10:     y -= h;
yading@10: 
yading@10:     if (s->bitstream_bpp == 12) {
yading@10:         cy = y>>1;
yading@10:     } else {
yading@10:         cy = y;
yading@10:     }
yading@10: 
yading@10:     offset[0] = frame->linesize[0] * y;
yading@10:     offset[1] = frame->linesize[1] * cy;
yading@10:     offset[2] = frame->linesize[2] * cy;
yading@10:     for (i = 3; i < AV_NUM_DATA_POINTERS; i++)
yading@10:         offset[i] = 0;
yading@10:     emms_c();
yading@10: 
yading@10:     s->avctx->draw_horiz_band(s->avctx, frame, offset, y, 3, h);
yading@10: 
yading@10:     s->last_slice_end = y + h;
yading@10: }
yading@10: 
yading@10: static int decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
yading@10:                         AVPacket *avpkt)
yading@10: {
yading@10:     const uint8_t *buf = avpkt->data;
yading@10:     int buf_size = avpkt->size;
yading@10:     HYuvContext *s = avctx->priv_data;
yading@10:     const int width = s->width;
yading@10:     const int width2 = s->width>>1;
yading@10:     const int height = s->height;
yading@10:     int fake_ystride, fake_ustride, fake_vstride;
yading@10:     ThreadFrame frame = { .f = data };
yading@10:     AVFrame * const p = data;
yading@10:     int table_size = 0, ret;
yading@10: 
yading@10:     av_fast_padded_malloc(&s->bitstream_buffer,
yading@10:                    &s->bitstream_buffer_size,
yading@10:                    buf_size);
yading@10:     if (!s->bitstream_buffer)
yading@10:         return AVERROR(ENOMEM);
yading@10: 
yading@10:     s->dsp.bswap_buf((uint32_t*)s->bitstream_buffer,
yading@10:                      (const uint32_t*)buf, buf_size / 4);
yading@10: 
yading@10:     if ((ret = ff_thread_get_buffer(avctx, &frame, 0)) < 0)
yading@10:         return ret;
yading@10: 
yading@10:     if (s->context) {
yading@10:         table_size = read_huffman_tables(s, s->bitstream_buffer, buf_size);
yading@10:         if (table_size < 0)
yading@10:             return AVERROR_INVALIDDATA;
yading@10:     }
yading@10: 
yading@10:     if ((unsigned)(buf_size-table_size) >= INT_MAX / 8)
yading@10:         return AVERROR_INVALIDDATA;
yading@10: 
yading@10:     init_get_bits(&s->gb, s->bitstream_buffer+table_size,
yading@10:                   (buf_size-table_size) * 8);
yading@10: 
yading@10:     fake_ystride = s->interlaced ? p->linesize[0] * 2  : p->linesize[0];
yading@10:     fake_ustride = s->interlaced ? p->linesize[1] * 2  : p->linesize[1];
yading@10:     fake_vstride = s->interlaced ? p->linesize[2] * 2  : p->linesize[2];
yading@10: 
yading@10:     s->last_slice_end = 0;
yading@10: 
yading@10:     if (s->bitstream_bpp < 24) {
yading@10:         int y, cy;
yading@10:         int lefty, leftu, leftv;
yading@10:         int lefttopy, lefttopu, lefttopv;
yading@10: 
yading@10:         if (s->yuy2) {
yading@10:             p->data[0][3] = get_bits(&s->gb, 8);
yading@10:             p->data[0][2] = get_bits(&s->gb, 8);
yading@10:             p->data[0][1] = get_bits(&s->gb, 8);
yading@10:             p->data[0][0] = get_bits(&s->gb, 8);
yading@10: 
yading@10:             av_log(avctx, AV_LOG_ERROR,
yading@10:                    "YUY2 output is not implemented yet\n");
yading@10:             return AVERROR_PATCHWELCOME;
yading@10:         } else {
yading@10: 
yading@10:             leftv = p->data[2][0] = get_bits(&s->gb, 8);
yading@10:             lefty = p->data[0][1] = get_bits(&s->gb, 8);
yading@10:             leftu = p->data[1][0] = get_bits(&s->gb, 8);
yading@10:                     p->data[0][0] = get_bits(&s->gb, 8);
yading@10: 
yading@10:             switch (s->predictor) {
yading@10:             case LEFT:
yading@10:             case PLANE:
yading@10:                 decode_422_bitstream(s, width-2);
yading@10:                 lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + 2, s->temp[0], width-2, lefty);
yading@10:                 if (!(s->flags&CODEC_FLAG_GRAY)) {
yading@10:                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + 1, s->temp[1], width2 - 1, leftu);
yading@10:                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + 1, s->temp[2], width2 - 1, leftv);
yading@10:                 }
yading@10: 
yading@10:                 for (cy = y = 1; y < s->height; y++, cy++) {
yading@10:                     uint8_t *ydst, *udst, *vdst;
yading@10: 
yading@10:                     if (s->bitstream_bpp == 12) {
yading@10:                         decode_gray_bitstream(s, width);
yading@10: 
yading@10:                         ydst = p->data[0] + p->linesize[0] * y;
yading@10: 
yading@10:                         lefty = s->dsp.add_hfyu_left_prediction(ydst, s->temp[0], width, lefty);
yading@10:                         if (s->predictor == PLANE) {
yading@10:                             if (y > s->interlaced)
yading@10:                                 s->dsp.add_bytes(ydst, ydst - fake_ystride, width);
yading@10:                         }
yading@10:                         y++;
yading@10:                         if (y >= s->height) break;
yading@10:                     }
yading@10: 
yading@10:                     draw_slice(s, p, y);
yading@10: 
yading@10:                     ydst = p->data[0] + p->linesize[0]*y;
yading@10:                     udst = p->data[1] + p->linesize[1]*cy;
yading@10:                     vdst = p->data[2] + p->linesize[2]*cy;
yading@10: 
yading@10:                     decode_422_bitstream(s, width);
yading@10:                     lefty = s->dsp.add_hfyu_left_prediction(ydst, s->temp[0], width, lefty);
yading@10:                     if (!(s->flags & CODEC_FLAG_GRAY)) {
yading@10:                         leftu= s->dsp.add_hfyu_left_prediction(udst, s->temp[1], width2, leftu);
yading@10:                         leftv= s->dsp.add_hfyu_left_prediction(vdst, s->temp[2], width2, leftv);
yading@10:                     }
yading@10:                     if (s->predictor == PLANE) {
yading@10:                         if (cy > s->interlaced) {
yading@10:                             s->dsp.add_bytes(ydst, ydst - fake_ystride, width);
yading@10:                             if (!(s->flags & CODEC_FLAG_GRAY)) {
yading@10:                                 s->dsp.add_bytes(udst, udst - fake_ustride, width2);
yading@10:                                 s->dsp.add_bytes(vdst, vdst - fake_vstride, width2);
yading@10:                             }
yading@10:                         }
yading@10:                     }
yading@10:                 }
yading@10:                 draw_slice(s, p, height);
yading@10: 
yading@10:                 break;
yading@10:             case MEDIAN:
yading@10:                 /* first line except first 2 pixels is left predicted */
yading@10:                 decode_422_bitstream(s, width - 2);
yading@10:                 lefty= s->dsp.add_hfyu_left_prediction(p->data[0] + 2, s->temp[0], width - 2, lefty);
yading@10:                 if (!(s->flags & CODEC_FLAG_GRAY)) {
yading@10:                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + 1, s->temp[1], width2 - 1, leftu);
yading@10:                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + 1, s->temp[2], width2 - 1, leftv);
yading@10:                 }
yading@10: 
yading@10:                 cy = y = 1;
yading@10: 
yading@10:                 /* second line is left predicted for interlaced case */
yading@10:                 if (s->interlaced) {
yading@10:                     decode_422_bitstream(s, width);
yading@10:                     lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + p->linesize[0], s->temp[0], width, lefty);
yading@10:                     if (!(s->flags & CODEC_FLAG_GRAY)) {
yading@10:                         leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + p->linesize[2], s->temp[1], width2, leftu);
yading@10:                         leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + p->linesize[1], s->temp[2], width2, leftv);
yading@10:                     }
yading@10:                     y++; cy++;
yading@10:                 }
yading@10: 
yading@10:                 /* next 4 pixels are left predicted too */
yading@10:                 decode_422_bitstream(s, 4);
yading@10:                 lefty = s->dsp.add_hfyu_left_prediction(p->data[0] + fake_ystride, s->temp[0], 4, lefty);
yading@10:                 if (!(s->flags&CODEC_FLAG_GRAY)) {
yading@10:                     leftu = s->dsp.add_hfyu_left_prediction(p->data[1] + fake_ustride, s->temp[1], 2, leftu);
yading@10:                     leftv = s->dsp.add_hfyu_left_prediction(p->data[2] + fake_vstride, s->temp[2], 2, leftv);
yading@10:                 }
yading@10: 
yading@10:                 /* next line except the first 4 pixels is median predicted */
yading@10:                 lefttopy = p->data[0][3];
yading@10:                 decode_422_bitstream(s, width - 4);
yading@10:                 s->dsp.add_hfyu_median_prediction(p->data[0] + fake_ystride+4, p->data[0]+4, s->temp[0], width-4, &lefty, &lefttopy);
yading@10:                 if (!(s->flags&CODEC_FLAG_GRAY)) {
yading@10:                     lefttopu = p->data[1][1];
yading@10:                     lefttopv = p->data[2][1];
yading@10:                     s->dsp.add_hfyu_median_prediction(p->data[1] + fake_ustride+2, p->data[1] + 2, s->temp[1], width2 - 2, &leftu, &lefttopu);
yading@10:                     s->dsp.add_hfyu_median_prediction(p->data[2] + fake_vstride+2, p->data[2] + 2, s->temp[2], width2 - 2, &leftv, &lefttopv);
yading@10:                 }
yading@10:                 y++; cy++;
yading@10: 
yading@10:                 for (; y<height; y++, cy++) {
yading@10:                     uint8_t *ydst, *udst, *vdst;
yading@10: 
yading@10:                     if (s->bitstream_bpp == 12) {
yading@10:                         while (2 * cy > y) {
yading@10:                             decode_gray_bitstream(s, width);
yading@10:                             ydst = p->data[0] + p->linesize[0] * y;
yading@10:                             s->dsp.add_hfyu_median_prediction(ydst, ydst - fake_ystride, s->temp[0], width, &lefty, &lefttopy);
yading@10:                             y++;
yading@10:                         }
yading@10:                         if (y >= height) break;
yading@10:                     }
yading@10:                     draw_slice(s, p, y);
yading@10: 
yading@10:                     decode_422_bitstream(s, width);
yading@10: 
yading@10:                     ydst = p->data[0] + p->linesize[0] * y;
yading@10:                     udst = p->data[1] + p->linesize[1] * cy;
yading@10:                     vdst = p->data[2] + p->linesize[2] * cy;
yading@10: 
yading@10:                     s->dsp.add_hfyu_median_prediction(ydst, ydst - fake_ystride, s->temp[0], width, &lefty, &lefttopy);
yading@10:                     if (!(s->flags & CODEC_FLAG_GRAY)) {
yading@10:                         s->dsp.add_hfyu_median_prediction(udst, udst - fake_ustride, s->temp[1], width2, &leftu, &lefttopu);
yading@10:                         s->dsp.add_hfyu_median_prediction(vdst, vdst - fake_vstride, s->temp[2], width2, &leftv, &lefttopv);
yading@10:                     }
yading@10:                 }
yading@10: 
yading@10:                 draw_slice(s, p, height);
yading@10:                 break;
yading@10:             }
yading@10:         }
yading@10:     } else {
yading@10:         int y;
yading@10:         int leftr, leftg, leftb, lefta;
yading@10:         const int last_line = (height - 1) * p->linesize[0];
yading@10: 
yading@10:         if (s->bitstream_bpp == 32) {
yading@10:             lefta = p->data[0][last_line+A] = get_bits(&s->gb, 8);
yading@10:             leftr = p->data[0][last_line+R] = get_bits(&s->gb, 8);
yading@10:             leftg = p->data[0][last_line+G] = get_bits(&s->gb, 8);
yading@10:             leftb = p->data[0][last_line+B] = get_bits(&s->gb, 8);
yading@10:         } else {
yading@10:             leftr = p->data[0][last_line+R] = get_bits(&s->gb, 8);
yading@10:             leftg = p->data[0][last_line+G] = get_bits(&s->gb, 8);
yading@10:             leftb = p->data[0][last_line+B] = get_bits(&s->gb, 8);
yading@10:             lefta = p->data[0][last_line+A] = 255;
yading@10:             skip_bits(&s->gb, 8);
yading@10:         }
yading@10: 
yading@10:         if (s->bgr32) {
yading@10:             switch (s->predictor) {
yading@10:             case LEFT:
yading@10:             case PLANE:
yading@10:                 decode_bgr_bitstream(s, width - 1);
yading@10:                 s->dsp.add_hfyu_left_prediction_bgr32(p->data[0] + last_line+4, s->temp[0], width - 1, &leftr, &leftg, &leftb, &lefta);
yading@10: 
yading@10:                 for (y = s->height - 2; y >= 0; y--) { //Yes it is stored upside down.
yading@10:                     decode_bgr_bitstream(s, width);
yading@10: 
yading@10:                     s->dsp.add_hfyu_left_prediction_bgr32(p->data[0] + p->linesize[0]*y, s->temp[0], width, &leftr, &leftg, &leftb, &lefta);
yading@10:                     if (s->predictor == PLANE) {
yading@10:                         if (s->bitstream_bpp != 32) lefta = 0;
yading@10:                         if ((y & s->interlaced) == 0 &&
yading@10:                             y < s->height - 1 - s->interlaced) {
yading@10:                             s->dsp.add_bytes(p->data[0] + p->linesize[0] * y,
yading@10:                                              p->data[0] + p->linesize[0] * y +
yading@10:                                              fake_ystride, fake_ystride);
yading@10:                         }
yading@10:                     }
yading@10:                 }
yading@10:                 // just 1 large slice as this is not possible in reverse order
yading@10:                 draw_slice(s, p, height);
yading@10:                 break;
yading@10:             default:
yading@10:                 av_log(avctx, AV_LOG_ERROR,
yading@10:                        "prediction type not supported!\n");
yading@10:             }
yading@10:         }else{
yading@10:             av_log(avctx, AV_LOG_ERROR,
yading@10:                    "BGR24 output is not implemented yet\n");
yading@10:             return AVERROR_PATCHWELCOME;
yading@10:         }
yading@10:     }
yading@10:     emms_c();
yading@10: 
yading@10:     *got_frame = 1;
yading@10: 
yading@10:     return (get_bits_count(&s->gb) + 31) / 32 * 4 + table_size;
yading@10: }
yading@10: 
yading@10: static av_cold int decode_end(AVCodecContext *avctx)
yading@10: {
yading@10:     HYuvContext *s = avctx->priv_data;
yading@10:     int i;
yading@10: 
yading@10:     ff_huffyuv_common_end(s);
yading@10:     av_freep(&s->bitstream_buffer);
yading@10: 
yading@10:     for (i = 0; i < 6; i++) {
yading@10:         ff_free_vlc(&s->vlc[i]);
yading@10:     }
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: #if CONFIG_HUFFYUV_DECODER
yading@10: AVCodec ff_huffyuv_decoder = {
yading@10:     .name             = "huffyuv",
yading@10:     .type             = AVMEDIA_TYPE_VIDEO,
yading@10:     .id               = AV_CODEC_ID_HUFFYUV,
yading@10:     .priv_data_size   = sizeof(HYuvContext),
yading@10:     .init             = decode_init,
yading@10:     .close            = decode_end,
yading@10:     .decode           = decode_frame,
yading@10:     .capabilities     = CODEC_CAP_DR1 | CODEC_CAP_DRAW_HORIZ_BAND |
yading@10:                         CODEC_CAP_FRAME_THREADS,
yading@10:     .init_thread_copy = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy),
yading@10:     .long_name        = NULL_IF_CONFIG_SMALL("Huffyuv / HuffYUV"),
yading@10: };
yading@10: #endif
yading@10: 
yading@10: #if CONFIG_FFVHUFF_DECODER
yading@10: AVCodec ff_ffvhuff_decoder = {
yading@10:     .name             = "ffvhuff",
yading@10:     .type             = AVMEDIA_TYPE_VIDEO,
yading@10:     .id               = AV_CODEC_ID_FFVHUFF,
yading@10:     .priv_data_size   = sizeof(HYuvContext),
yading@10:     .init             = decode_init,
yading@10:     .close            = decode_end,
yading@10:     .decode           = decode_frame,
yading@10:     .capabilities     = CODEC_CAP_DR1 | CODEC_CAP_DRAW_HORIZ_BAND |
yading@10:                         CODEC_CAP_FRAME_THREADS,
yading@10:     .init_thread_copy = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy),
yading@10:     .long_name        = NULL_IF_CONFIG_SMALL("Huffyuv FFmpeg variant"),
yading@10: };
yading@10: #endif