falkTX
/
FFmpeg
mirror of https://github.com/falkTX/FFmpeg.git
1
0
Fork 0
Code Issues 0 Releases 338 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
47320 Commits
32 Branches
940MB
Tree: 2c69fcc2ff
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '2c69fcc2ff'
${ noResults }
FFmpeg/libavcodec/smacker.c

798 lines
24KB
Raw Blame History 

  1. /*

  2.  * Smacker decoder

  3.  * Copyright (c) 2006 Konstantin Shishkov

  4.  *

  5.  * This file is part of FFmpeg.

  6.  *

  7.  * FFmpeg is free software; you can redistribute it and/or

  8.  * modify it under the terms of the GNU Lesser General Public

  9.  * License as published by the Free Software Foundation; either

  10.  * version 2.1 of the License, or (at your option) any later version.

  11.  *

  12.  * FFmpeg is distributed in the hope that it will be useful,

  13.  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  14.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

  15.  * Lesser General Public License for more details.

  16.  *

  17.  * You should have received a copy of the GNU Lesser General Public

  18.  * License along with FFmpeg; if not, write to the Free Software

  19.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

  20.  */

  21. 

  22. /**

  23.  * @file

  24.  * Smacker decoder

  25.  */

  26. 

  27. /*

  28.  * Based on http://wiki.multimedia.cx/index.php?title=Smacker

  29.  */

  30. 

  31. #include <stdio.h>

  32. #include <stdlib.h>

  33. 

  34. #include "libavutil/channel_layout.h"

  35. #include "avcodec.h"

  36. #include "mathops.h"

  37. 

  38. #define BITSTREAM_READER_LE

  39. #include "get_bits.h"

  40. #include "bytestream.h"

  41. 

  42. #define SMKTREE_BITS 9

  43. #define SMK_NODE 0x80000000

  44. 

  45. /*

  46.  * Decoder context

  47.  */

  48. typedef struct SmackVContext {

  49.     AVCodecContext *avctx;

  50.     AVFrame pic;

  51. 

  52.     int *mmap_tbl, *mclr_tbl, *full_tbl, *type_tbl;

  53.     int mmap_last[3], mclr_last[3], full_last[3], type_last[3];

  54. } SmackVContext;

  55. 

  56. /**

  57.  * Context used for code reconstructing

  58.  */

  59. typedef struct HuffContext {

  60.     int length;

  61.     int maxlength;

  62.     int current;

  63.     uint32_t *bits;

  64.     int *lengths;

  65.     int *values;

  66. } HuffContext;

  67. 

  68. /* common parameters used for decode_bigtree */

  69. typedef struct DBCtx {

  70.     VLC *v1, *v2;

  71.     int *recode1, *recode2;

  72.     int escapes[3];

  73.     int *last;

  74.     int lcur;

  75. } DBCtx;

  76. 

  77. /* possible runs of blocks */

  78. static const int block_runs[64] = {

  79.       1,    2,    3,    4,    5,    6,    7,    8,

  80.       9,   10,   11,   12,   13,   14,   15,   16,

  81.      17,   18,   19,   20,   21,   22,   23,   24,

  82.      25,   26,   27,   28,   29,   30,   31,   32,

  83.      33,   34,   35,   36,   37,   38,   39,   40,

  84.      41,   42,   43,   44,   45,   46,   47,   48,

  85.      49,   50,   51,   52,   53,   54,   55,   56,

  86.      57,   58,   59,  128,  256,  512, 1024, 2048 };

  87. 

  88. enum SmkBlockTypes {

  89.     SMK_BLK_MONO = 0,

  90.     SMK_BLK_FULL = 1,

  91.     SMK_BLK_SKIP = 2,

  92.     SMK_BLK_FILL = 3 };

  93. 

  94. /**

  95.  * Decode local frame tree

  96.  */

  97. static int smacker_decode_tree(GetBitContext *gb, HuffContext *hc, uint32_t prefix, int length)

  98. {

  99.     if(length > 32 || length > 3*SMKTREE_BITS) {

  100.         av_log(NULL, AV_LOG_ERROR, "length too long\n");

  101.         return AVERROR_INVALIDDATA;

  102.     }

  103.     if(!get_bits1(gb)){ //Leaf

  104.         if(hc->current >= 256){

  105.             av_log(NULL, AV_LOG_ERROR, "Tree size exceeded!\n");

  106.             return AVERROR_INVALIDDATA;

  107.         }

  108.         if(length){

  109.             hc->bits[hc->current] = prefix;

  110.             hc->lengths[hc->current] = length;

  111.         } else {

  112.             hc->bits[hc->current] = 0;

  113.             hc->lengths[hc->current] = 0;

  114.         }

  115.         hc->values[hc->current] = get_bits(gb, 8);

  116.         hc->current++;

  117.         if(hc->maxlength < length)

  118.             hc->maxlength = length;

  119.         return 0;

  120.     } else { //Node

  121.         int r;

  122.         length++;

  123.         r = smacker_decode_tree(gb, hc, prefix, length);

  124.         if(r)

  125.             return r;

  126.         return smacker_decode_tree(gb, hc, prefix | (1 << (length - 1)), length);

  127.     }

  128. }

  129. 

  130. /**

  131.  * Decode header tree

  132.  */

  133. static int smacker_decode_bigtree(GetBitContext *gb, HuffContext *hc, DBCtx *ctx)

  134. {

  135.     if (hc->current + 1 >= hc->length) {

  136.         av_log(NULL, AV_LOG_ERROR, "Tree size exceeded!\n");

  137.         return AVERROR_INVALIDDATA;

  138.     }

  139.     if(!get_bits1(gb)){ //Leaf

  140.         int val, i1, i2;

  141.         i1 = ctx->v1->table ? get_vlc2(gb, ctx->v1->table, SMKTREE_BITS, 3) : 0;

  142.         i2 = ctx->v2->table ? get_vlc2(gb, ctx->v2->table, SMKTREE_BITS, 3) : 0;

  143.         if (i1 < 0 || i2 < 0)

  144.             return AVERROR_INVALIDDATA;

  145.         val = ctx->recode1[i1] | (ctx->recode2[i2] << 8);

  146.         if(val == ctx->escapes[0]) {

  147.             ctx->last[0] = hc->current;

  148.             val = 0;

  149.         } else if(val == ctx->escapes[1]) {

  150.             ctx->last[1] = hc->current;

  151.             val = 0;

  152.         } else if(val == ctx->escapes[2]) {

  153.             ctx->last[2] = hc->current;

  154.             val = 0;

  155.         }

  156. 

  157.         hc->values[hc->current++] = val;

  158.         return 1;

  159.     } else { //Node

  160.         int r = 0, r_new, t;

  161. 

  162.         t = hc->current++;

  163.         r = smacker_decode_bigtree(gb, hc, ctx);

  164.         if(r < 0)

  165.             return r;

  166.         hc->values[t] = SMK_NODE | r;

  167.         r++;

  168.         r_new = smacker_decode_bigtree(gb, hc, ctx);

  169.         if (r_new < 0)

  170.             return r_new;

  171.         return r + r_new;

  172.     }

  173. }

  174. 

  175. /**

  176.  * Store large tree as FFmpeg's vlc codes

  177.  */

  178. static int smacker_decode_header_tree(SmackVContext *smk, GetBitContext *gb, int **recodes, int *last, int size)

  179. {

  180.     int res;

  181.     HuffContext huff;

  182.     HuffContext tmp1, tmp2;

  183.     VLC vlc[2] = { { 0 } };

  184.     int escapes[3];

  185.     DBCtx ctx;

  186.     int err = 0;

  187. 

  188.     if(size >= UINT_MAX>>4){ // (((size + 3) >> 2) + 3) << 2 must not overflow

  189.         av_log(smk->avctx, AV_LOG_ERROR, "size too large\n");

  190.         return AVERROR_INVALIDDATA;

  191.     }

  192. 

  193.     tmp1.length = 256;

  194.     tmp1.maxlength = 0;

  195.     tmp1.current = 0;

  196.     tmp1.bits = av_mallocz(256 * 4);

  197.     tmp1.lengths = av_mallocz(256 * sizeof(int));

  198.     tmp1.values = av_mallocz(256 * sizeof(int));

  199. 

  200.     tmp2.length = 256;

  201.     tmp2.maxlength = 0;

  202.     tmp2.current = 0;

  203.     tmp2.bits = av_mallocz(256 * 4);

  204.     tmp2.lengths = av_mallocz(256 * sizeof(int));

  205.     tmp2.values = av_mallocz(256 * sizeof(int));

  206. 

  207.     if(get_bits1(gb)) {

  208.         res = smacker_decode_tree(gb, &tmp1, 0, 0);

  209.         if (res < 0)

  210.             return res;

  211.         skip_bits1(gb);

  212.         if(tmp1.current > 1) {

  213.             res = init_vlc(&vlc[0], SMKTREE_BITS, tmp1.length,

  214.                         tmp1.lengths, sizeof(int), sizeof(int),

  215.                         tmp1.bits, sizeof(uint32_t), sizeof(uint32_t), INIT_VLC_LE);

  216.             if(res < 0) {

  217.                 av_log(smk->avctx, AV_LOG_ERROR, "Cannot build VLC table\n");

  218.                 return AVERROR_INVALIDDATA;

  219.             }

  220.         }

  221.     }

  222.     if (!vlc[0].table) {

  223.         av_log(smk->avctx, AV_LOG_ERROR, "Skipping low bytes tree\n");

  224.     }

  225.     if(get_bits1(gb)){

  226.         res = smacker_decode_tree(gb, &tmp2, 0, 0);

  227.         if (res < 0)

  228.             return res;

  229.         skip_bits1(gb);

  230.         if(tmp2.current > 1) {

  231.             res = init_vlc(&vlc[1], SMKTREE_BITS, tmp2.length,

  232.                         tmp2.lengths, sizeof(int), sizeof(int),

  233.                         tmp2.bits, sizeof(uint32_t), sizeof(uint32_t), INIT_VLC_LE);

  234.             if(res < 0) {

  235.                 av_log(smk->avctx, AV_LOG_ERROR, "Cannot build VLC table\n");

  236.                 return AVERROR_INVALIDDATA;

  237.             }

  238.         }

  239.     }

  240.     if (!vlc[1].table) {

  241.         av_log(smk->avctx, AV_LOG_ERROR, "Skipping high bytes tree\n");

  242.     }

  243. 

  244.     escapes[0]  = get_bits(gb, 16);

  245.     escapes[1]  = get_bits(gb, 16);

  246.     escapes[2]  = get_bits(gb, 16);

  247. 

  248.     last[0] = last[1] = last[2] = -1;

  249. 

  250.     ctx.escapes[0] = escapes[0];

  251.     ctx.escapes[1] = escapes[1];

  252.     ctx.escapes[2] = escapes[2];

  253.     ctx.v1 = &vlc[0];

  254.     ctx.v2 = &vlc[1];

  255.     ctx.recode1 = tmp1.values;

  256.     ctx.recode2 = tmp2.values;

  257.     ctx.last = last;

  258. 

  259.     huff.length = ((size + 3) >> 2) + 3;

  260.     huff.maxlength = 0;

  261.     huff.current = 0;

  262.     huff.values = av_mallocz(huff.length * sizeof(int));

  263. 

  264.     if (smacker_decode_bigtree(gb, &huff, &ctx) < 0)

  265.         err = -1;

  266.     skip_bits1(gb);

  267.     if(ctx.last[0] == -1) ctx.last[0] = huff.current++;

  268.     if(ctx.last[1] == -1) ctx.last[1] = huff.current++;

  269.     if(ctx.last[2] == -1) ctx.last[2] = huff.current++;

  270.     if(huff.current > huff.length){

  271.         ctx.last[0] = ctx.last[1] = ctx.last[2] = 1;

  272.         av_log(smk->avctx, AV_LOG_ERROR, "bigtree damaged\n");

  273.         return AVERROR_INVALIDDATA;

  274.     }

  275. 

  276.     *recodes = huff.values;

  277. 

  278.     if(vlc[0].table)

  279.         ff_free_vlc(&vlc[0]);

  280.     if(vlc[1].table)

  281.         ff_free_vlc(&vlc[1]);

  282.     av_free(tmp1.bits);

  283.     av_free(tmp1.lengths);

  284.     av_free(tmp1.values);

  285.     av_free(tmp2.bits);

  286.     av_free(tmp2.lengths);

  287.     av_free(tmp2.values);

  288. 

  289.     return err;

  290. }

  291. 

  292. static int decode_header_trees(SmackVContext *smk) {

  293.     GetBitContext gb;

  294.     int mmap_size, mclr_size, full_size, type_size;

  295. 

  296.     mmap_size = AV_RL32(smk->avctx->extradata);

  297.     mclr_size = AV_RL32(smk->avctx->extradata + 4);

  298.     full_size = AV_RL32(smk->avctx->extradata + 8);

  299.     type_size = AV_RL32(smk->avctx->extradata + 12);

  300. 

  301.     init_get_bits(&gb, smk->avctx->extradata + 16, (smk->avctx->extradata_size - 16) * 8);

  302. 

  303.     if(!get_bits1(&gb)) {

  304.         av_log(smk->avctx, AV_LOG_INFO, "Skipping MMAP tree\n");

  305.         smk->mmap_tbl = av_malloc(sizeof(int) * 2);

  306.         smk->mmap_tbl[0] = 0;

  307.         smk->mmap_last[0] = smk->mmap_last[1] = smk->mmap_last[2] = 1;

  308.     } else {

  309.         if (smacker_decode_header_tree(smk, &gb, &smk->mmap_tbl, smk->mmap_last, mmap_size))

  310.             return AVERROR_INVALIDDATA;

  311.     }

  312.     if(!get_bits1(&gb)) {

  313.         av_log(smk->avctx, AV_LOG_INFO, "Skipping MCLR tree\n");

  314.         smk->mclr_tbl = av_malloc(sizeof(int) * 2);

  315.         smk->mclr_tbl[0] = 0;

  316.         smk->mclr_last[0] = smk->mclr_last[1] = smk->mclr_last[2] = 1;

  317.     } else {

  318.         if (smacker_decode_header_tree(smk, &gb, &smk->mclr_tbl, smk->mclr_last, mclr_size))

  319.             return AVERROR_INVALIDDATA;

  320.     }

  321.     if(!get_bits1(&gb)) {

  322.         av_log(smk->avctx, AV_LOG_INFO, "Skipping FULL tree\n");

  323.         smk->full_tbl = av_malloc(sizeof(int) * 2);

  324.         smk->full_tbl[0] = 0;

  325.         smk->full_last[0] = smk->full_last[1] = smk->full_last[2] = 1;

  326.     } else {

  327.         if (smacker_decode_header_tree(smk, &gb, &smk->full_tbl, smk->full_last, full_size))

  328.             return AVERROR_INVALIDDATA;

  329.     }

  330.     if(!get_bits1(&gb)) {

  331.         av_log(smk->avctx, AV_LOG_INFO, "Skipping TYPE tree\n");

  332.         smk->type_tbl = av_malloc(sizeof(int) * 2);

  333.         smk->type_tbl[0] = 0;

  334.         smk->type_last[0] = smk->type_last[1] = smk->type_last[2] = 1;

  335.     } else {

  336.         if (smacker_decode_header_tree(smk, &gb, &smk->type_tbl, smk->type_last, type_size))

  337.             return AVERROR_INVALIDDATA;

  338.     }

  339. 

  340.     return 0;

  341. }

  342. 

  343. static av_always_inline void last_reset(int *recode, int *last) {

  344.     recode[last[0]] = recode[last[1]] = recode[last[2]] = 0;

  345. }

  346. 

  347. /* get code and update history */

  348. static av_always_inline int smk_get_code(GetBitContext *gb, int *recode, int *last) {

  349.     register int *table = recode;

  350.     int v;

  351. 

  352.     while(*table & SMK_NODE) {

  353.         if(get_bits1(gb))

  354.             table += (*table) & (~SMK_NODE);

  355.         table++;

  356.     }

  357.     v = *table;

  358. 

  359.     if(v != recode[last[0]]) {

  360.         recode[last[2]] = recode[last[1]];

  361.         recode[last[1]] = recode[last[0]];

  362.         recode[last[0]] = v;

  363.     }

  364.     return v;

  365. }

  366. 

  367. static int decode_frame(AVCodecContext *avctx, void *data, int *data_size, AVPacket *avpkt)

  368. {

  369.     SmackVContext * const smk = avctx->priv_data;

  370.     uint8_t *out;

  371.     uint32_t *pal;

  372.     GetByteContext gb2;

  373.     GetBitContext gb;

  374.     int blocks, blk, bw, bh;

  375.     int i, ret;

  376.     int stride;

  377.     int flags;

  378. 

  379.     if (avpkt->size <= 769)

  380.         return AVERROR_INVALIDDATA;

  381. 

  382.     smk->pic.reference = 3;

  383.     smk->pic.buffer_hints = FF_BUFFER_HINTS_VALID | FF_BUFFER_HINTS_PRESERVE | FF_BUFFER_HINTS_REUSABLE;

  384.     if((ret = avctx->reget_buffer(avctx, &smk->pic)) < 0){

  385.         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");

  386.         return ret;

  387.     }

  388. 

  389.     /* make the palette available on the way out */

  390.     pal = (uint32_t*)smk->pic.data[1];

  391.     bytestream2_init(&gb2, avpkt->data, avpkt->size);

  392.     flags = bytestream2_get_byteu(&gb2);

  393.     smk->pic.palette_has_changed = flags & 1;

  394.     smk->pic.key_frame = !!(flags & 2);

  395.     if(smk->pic.key_frame)

  396.         smk->pic.pict_type = AV_PICTURE_TYPE_I;

  397.     else

  398.         smk->pic.pict_type = AV_PICTURE_TYPE_P;

  399. 

  400.     for(i = 0; i < 256; i++)

  401.         *pal++ = 0xFFU << 24 | bytestream2_get_be24u(&gb2);

  402. 

  403.     last_reset(smk->mmap_tbl, smk->mmap_last);

  404.     last_reset(smk->mclr_tbl, smk->mclr_last);

  405.     last_reset(smk->full_tbl, smk->full_last);

  406.     last_reset(smk->type_tbl, smk->type_last);

  407.     init_get_bits(&gb, avpkt->data + 769, (avpkt->size - 769) * 8);

  408. 

  409.     blk = 0;

  410.     bw = avctx->width >> 2;

  411.     bh = avctx->height >> 2;

  412.     blocks = bw * bh;

  413.     out = smk->pic.data[0];

  414.     stride = smk->pic.linesize[0];

  415.     while(blk < blocks) {

  416.         int type, run, mode;

  417.         uint16_t pix;

  418. 

  419.         type = smk_get_code(&gb, smk->type_tbl, smk->type_last);

  420.         run = block_runs[(type >> 2) & 0x3F];

  421.         switch(type & 3){

  422.         case SMK_BLK_MONO:

  423.             while(run-- && blk < blocks){

  424.                 int clr, map;

  425.                 int hi, lo;

  426.                 clr = smk_get_code(&gb, smk->mclr_tbl, smk->mclr_last);

  427.                 map = smk_get_code(&gb, smk->mmap_tbl, smk->mmap_last);

  428.                 out = smk->pic.data[0] + (blk / bw) * (stride * 4) + (blk % bw) * 4;

  429.                 hi = clr >> 8;

  430.                 lo = clr & 0xFF;

  431.                 for(i = 0; i < 4; i++) {

  432.                     if(map & 1) out[0] = hi; else out[0] = lo;

  433.                     if(map & 2) out[1] = hi; else out[1] = lo;

  434.                     if(map & 4) out[2] = hi; else out[2] = lo;

  435.                     if(map & 8) out[3] = hi; else out[3] = lo;

  436.                     map >>= 4;

  437.                     out += stride;

  438.                 }

  439.                 blk++;

  440.             }

  441.             break;

  442.         case SMK_BLK_FULL:

  443.             mode = 0;

  444.             if(avctx->codec_tag == MKTAG('S', 'M', 'K', '4')) { // In case of Smacker v4 we have three modes

  445.                 if(get_bits1(&gb)) mode = 1;

  446.                 else if(get_bits1(&gb)) mode = 2;

  447.             }

  448.             while(run-- && blk < blocks){

  449.                 out = smk->pic.data[0] + (blk / bw) * (stride * 4) + (blk % bw) * 4;

  450.                 switch(mode){

  451.                 case 0:

  452.                     for(i = 0; i < 4; i++) {

  453.                         pix = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  454.                         AV_WL16(out+2,pix);

  455.                         pix = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  456.                         AV_WL16(out,pix);

  457.                         out += stride;

  458.                     }

  459.                     break;

  460.                 case 1:

  461.                     pix = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  462.                     out[0] = out[1] = pix & 0xFF;

  463.                     out[2] = out[3] = pix >> 8;

  464.                     out += stride;

  465.                     out[0] = out[1] = pix & 0xFF;

  466.                     out[2] = out[3] = pix >> 8;

  467.                     out += stride;

  468.                     pix = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  469.                     out[0] = out[1] = pix & 0xFF;

  470.                     out[2] = out[3] = pix >> 8;

  471.                     out += stride;

  472.                     out[0] = out[1] = pix & 0xFF;

  473.                     out[2] = out[3] = pix >> 8;

  474.                     out += stride;

  475.                     break;

  476.                 case 2:

  477.                     for(i = 0; i < 2; i++) {

  478.                         uint16_t pix1, pix2;

  479.                         pix2 = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  480.                         pix1 = smk_get_code(&gb, smk->full_tbl, smk->full_last);

  481.                         AV_WL16(out,pix1);

  482.                         AV_WL16(out+2,pix2);

  483.                         out += stride;

  484.                         AV_WL16(out,pix1);

  485.                         AV_WL16(out+2,pix2);

  486.                         out += stride;

  487.                     }

  488.                     break;

  489.                 }

  490.                 blk++;

  491.             }

  492.             break;

  493.         case SMK_BLK_SKIP:

  494.             while(run-- && blk < blocks)

  495.                 blk++;

  496.             break;

  497.         case SMK_BLK_FILL:

  498.             mode = type >> 8;

  499.             while(run-- && blk < blocks){

  500.                 uint32_t col;

  501.                 out = smk->pic.data[0] + (blk / bw) * (stride * 4) + (blk % bw) * 4;

  502.                 col = mode * 0x01010101;

  503.                 for(i = 0; i < 4; i++) {

  504.                     *((uint32_t*)out) = col;

  505.                     out += stride;

  506.                 }

  507.                 blk++;

  508.             }

  509.             break;

  510.         }

  511. 

  512.     }

  513. 

  514.     *data_size = sizeof(AVFrame);

  515.     *(AVFrame*)data = smk->pic;

  516. 

  517.     /* always report that the buffer was completely consumed */

  518.     return avpkt->size;

  519. }

  520. 

  521. 

  522. 

  523. /*

  524.  *

  525.  * Init smacker decoder

  526.  *

  527.  */

  528. static av_cold int decode_init(AVCodecContext *avctx)

  529. {

  530.     SmackVContext * const c = avctx->priv_data;

  531. 

  532.     c->avctx = avctx;

  533. 

  534.     avctx->pix_fmt = AV_PIX_FMT_PAL8;

  535. 

  536.     avcodec_get_frame_defaults(&c->pic);

  537. 

  538.     /* decode huffman trees from extradata */

  539.     if(avctx->extradata_size < 16){

  540.         av_log(avctx, AV_LOG_ERROR, "Extradata missing!\n");

  541.         return AVERROR(EINVAL);

  542.     }

  543. 

  544.     if (decode_header_trees(c))

  545.         return AVERROR_INVALIDDATA;

  546. 

  547.     return 0;

  548. }

  549. 

  550. 

  551. 

  552. /*

  553.  *

  554.  * Uninit smacker decoder

  555.  *

  556.  */

  557. static av_cold int decode_end(AVCodecContext *avctx)

  558. {

  559.     SmackVContext * const smk = avctx->priv_data;

  560. 

  561.     av_freep(&smk->mmap_tbl);

  562.     av_freep(&smk->mclr_tbl);

  563.     av_freep(&smk->full_tbl);

  564.     av_freep(&smk->type_tbl);

  565. 

  566.     if (smk->pic.data[0])

  567.         avctx->release_buffer(avctx, &smk->pic);

  568. 

  569.     return 0;

  570. }

  571. 

  572. 

  573. typedef struct SmackerAudioContext {

  574.     AVFrame frame;

  575. } SmackerAudioContext;

  576. 

  577. static av_cold int smka_decode_init(AVCodecContext *avctx)

  578. {

  579.     SmackerAudioContext *s = avctx->priv_data;

  580. 

  581.     if (avctx->channels < 1 || avctx->channels > 2) {

  582.         av_log(avctx, AV_LOG_ERROR, "invalid number of channels\n");

  583.         return AVERROR(EINVAL);

  584.     }

  585.     avctx->channel_layout = (avctx->channels==2) ? AV_CH_LAYOUT_STEREO : AV_CH_LAYOUT_MONO;

  586.     avctx->sample_fmt = avctx->bits_per_coded_sample == 8 ? AV_SAMPLE_FMT_U8 : AV_SAMPLE_FMT_S16;

  587. 

  588.     avcodec_get_frame_defaults(&s->frame);

  589.     avctx->coded_frame = &s->frame;

  590. 

  591.     return 0;

  592. }

  593. 

  594. /**

  595.  * Decode Smacker audio data

  596.  */

  597. static int smka_decode_frame(AVCodecContext *avctx, void *data,

  598.                              int *got_frame_ptr, AVPacket *avpkt)

  599. {

  600.     SmackerAudioContext *s = avctx->priv_data;

  601.     const uint8_t *buf = avpkt->data;

  602.     int buf_size = avpkt->size;

  603.     GetBitContext gb;

  604.     HuffContext h[4] = { { 0 } };

  605.     VLC vlc[4]       = { { 0 } };

  606.     int16_t *samples;

  607.     uint8_t *samples8;

  608.     int val;

  609.     int i, res, ret;

  610.     int unp_size;

  611.     int bits, stereo;

  612.     int pred[2] = {0, 0};

  613. 

  614.     if (buf_size <= 4) {

  615.         av_log(avctx, AV_LOG_ERROR, "packet is too small\n");

  616.         return AVERROR(EINVAL);

  617.     }

  618. 

  619.     unp_size = AV_RL32(buf);

  620. 

  621.     if (unp_size > (1U<<24)) {

  622.         av_log(avctx, AV_LOG_ERROR, "packet is too big\n");

  623.         return AVERROR_INVALIDDATA;

  624.     }

  625. 

  626.     init_get_bits(&gb, buf + 4, (buf_size - 4) * 8);

  627. 

  628.     if(!get_bits1(&gb)){

  629.         av_log(avctx, AV_LOG_INFO, "Sound: no data\n");

  630.         *got_frame_ptr = 0;

  631.         return 1;

  632.     }

  633.     stereo = get_bits1(&gb);

  634.     bits = get_bits1(&gb);

  635.     if (stereo ^ (avctx->channels != 1)) {

  636.         av_log(avctx, AV_LOG_ERROR, "channels mismatch\n");

  637.         return AVERROR(EINVAL);

  638.     }

  639.     if (bits && avctx->sample_fmt == AV_SAMPLE_FMT_U8) {

  640.         av_log(avctx, AV_LOG_ERROR, "sample format mismatch\n");

  641.         return AVERROR(EINVAL);

  642.     }

  643. 

  644.     /* get output buffer */

  645.     s->frame.nb_samples = unp_size / (avctx->channels * (bits + 1));

  646.     if ((ret = avctx->get_buffer(avctx, &s->frame)) < 0) {

  647.         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");

  648.         return ret;

  649.     }

  650.     samples  = (int16_t *)s->frame.data[0];

  651.     samples8 =            s->frame.data[0];

  652. 

  653.     // Initialize

  654.     for(i = 0; i < (1 << (bits + stereo)); i++) {

  655.         h[i].length = 256;

  656.         h[i].maxlength = 0;

  657.         h[i].current = 0;

  658.         h[i].bits = av_mallocz(256 * 4);

  659.         h[i].lengths = av_mallocz(256 * sizeof(int));

  660.         h[i].values = av_mallocz(256 * sizeof(int));

  661.         skip_bits1(&gb);

  662.         res = smacker_decode_tree(&gb, &h[i], 0, 0);

  663.         if (res < 0)

  664.             return res;

  665.         skip_bits1(&gb);

  666.         if(h[i].current > 1) {

  667.             res = init_vlc(&vlc[i], SMKTREE_BITS, h[i].length,

  668.                     h[i].lengths, sizeof(int), sizeof(int),

  669.                     h[i].bits, sizeof(uint32_t), sizeof(uint32_t), INIT_VLC_LE);

  670.             if(res < 0) {

  671.                 av_log(avctx, AV_LOG_ERROR, "Cannot build VLC table\n");

  672.                 return AVERROR_INVALIDDATA;

  673.             }

  674.         }

  675.     }

  676.     if(bits) { //decode 16-bit data

  677.         for(i = stereo; i >= 0; i--)

  678.             pred[i] = sign_extend(av_bswap16(get_bits(&gb, 16)), 16);

  679.         for(i = 0; i <= stereo; i++)

  680.             *samples++ = pred[i];

  681.         for(; i < unp_size / 2; i++) {

  682.             if(get_bits_left(&gb)<0)

  683.                 return AVERROR_INVALIDDATA;

  684.             if(i & stereo) {

  685.                 if(vlc[2].table)

  686.                     res = get_vlc2(&gb, vlc[2].table, SMKTREE_BITS, 3);

  687.                 else

  688.                     res = 0;

  689.                 if (res < 0) {

  690.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  691.                     return AVERROR_INVALIDDATA;

  692.                 }

  693.                 val  = h[2].values[res];

  694.                 if(vlc[3].table)

  695.                     res = get_vlc2(&gb, vlc[3].table, SMKTREE_BITS, 3);

  696.                 else

  697.                     res = 0;

  698.                 if (res < 0) {

  699.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  700.                     return AVERROR_INVALIDDATA;

  701.                 }

  702.                 val |= h[3].values[res] << 8;

  703.                 pred[1] += sign_extend(val, 16);

  704.                 *samples++ = av_clip_int16(pred[1]);

  705.             } else {

  706.                 if(vlc[0].table)

  707.                     res = get_vlc2(&gb, vlc[0].table, SMKTREE_BITS, 3);

  708.                 else

  709.                     res = 0;

  710.                 if (res < 0) {

  711.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  712.                     return AVERROR_INVALIDDATA;

  713.                 }

  714.                 val  = h[0].values[res];

  715.                 if(vlc[1].table)

  716.                     res = get_vlc2(&gb, vlc[1].table, SMKTREE_BITS, 3);

  717.                 else

  718.                     res = 0;

  719.                 if (res < 0) {

  720.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  721.                     return AVERROR_INVALIDDATA;

  722.                 }

  723.                 val |= h[1].values[res] << 8;

  724.                 pred[0] += sign_extend(val, 16);

  725.                 *samples++ = av_clip_int16(pred[0]);

  726.             }

  727.         }

  728.     } else { //8-bit data

  729.         for(i = stereo; i >= 0; i--)

  730.             pred[i] = get_bits(&gb, 8);

  731.         for(i = 0; i <= stereo; i++)

  732.             *samples8++ = pred[i];

  733.         for(; i < unp_size; i++) {

  734.             if(get_bits_left(&gb)<0)

  735.                 return AVERROR_INVALIDDATA;

  736.             if(i & stereo){

  737.                 if(vlc[1].table)

  738.                     res = get_vlc2(&gb, vlc[1].table, SMKTREE_BITS, 3);

  739.                 else

  740.                     res = 0;

  741.                 if (res < 0) {

  742.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  743.                     return AVERROR_INVALIDDATA;

  744.                 }

  745.                 pred[1] += sign_extend(h[1].values[res], 8);

  746.                 *samples8++ = av_clip_uint8(pred[1]);

  747.             } else {

  748.                 if(vlc[0].table)

  749.                     res = get_vlc2(&gb, vlc[0].table, SMKTREE_BITS, 3);

  750.                 else

  751.                     res = 0;

  752.                 if (res < 0) {

  753.                     av_log(avctx, AV_LOG_ERROR, "invalid vlc\n");

  754.                     return AVERROR_INVALIDDATA;

  755.                 }

  756.                 pred[0] += sign_extend(h[0].values[res], 8);

  757.                 *samples8++ = av_clip_uint8(pred[0]);

  758.             }

  759.         }

  760.     }

  761. 

  762.     for(i = 0; i < 4; i++) {

  763.         if(vlc[i].table)

  764.             ff_free_vlc(&vlc[i]);

  765.         av_free(h[i].bits);

  766.         av_free(h[i].lengths);

  767.         av_free(h[i].values);

  768.     }

  769. 

  770.     *got_frame_ptr   = 1;

  771.     *(AVFrame *)data = s->frame;

  772. 

  773.     return buf_size;

  774. }

  775. 

  776. AVCodec ff_smacker_decoder = {

  777.     .name           = "smackvid",

  778.     .type           = AVMEDIA_TYPE_VIDEO,

  779.     .id             = AV_CODEC_ID_SMACKVIDEO,

  780.     .priv_data_size = sizeof(SmackVContext),

  781.     .init           = decode_init,

  782.     .close          = decode_end,

  783.     .decode         = decode_frame,

  784.     .capabilities   = CODEC_CAP_DR1,

  785.     .long_name      = NULL_IF_CONFIG_SMALL("Smacker video"),

  786. };

  787. 

  788. AVCodec ff_smackaud_decoder = {

  789.     .name           = "smackaud",

  790.     .type           = AVMEDIA_TYPE_AUDIO,

  791.     .id             = AV_CODEC_ID_SMACKAUDIO,

  792.     .priv_data_size = sizeof(SmackerAudioContext),

  793.     .init           = smka_decode_init,

  794.     .decode         = smka_decode_frame,

  795.     .capabilities   = CODEC_CAP_DR1,

  796.     .long_name      = NULL_IF_CONFIG_SMALL("Smacker audio"),

  797. };