flac.c
上传用户:wstnjxml
上传日期:2014-04-03
资源大小:7248k
文件大小:24k
源码类别:

Windows CE

开发平台:

C/C++

  1. /*
  2.  * FLAC (Free Lossless Audio Codec) decoder
  3.  * Copyright (c) 2003 Alex Beregszaszi
  4.  *
  5.  * This library is free software; you can redistribute it and/or
  6.  * modify it under the terms of the GNU Lesser General Public
  7.  * License as published by the Free Software Foundation; either
  8.  * version 2 of the License, or (at your option) any later version.
  9.  *
  10.  * This library is distributed in the hope that it will be useful,
  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13.  * Lesser General Public License for more details.
  14.  *
  15.  * You should have received a copy of the GNU Lesser General Public
  16.  * License along with this library; if not, write to the Free Software
  17.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18.  */
  19. /**
  20.  * @file flac.c
  21.  * FLAC (Free Lossless Audio Codec) decoder
  22.  * @author Alex Beregszaszi
  23.  *
  24.  * For more information on the FLAC format, visit:
  25.  *  http://flac.sourceforge.net/
  26.  *
  27.  * This decoder can be used in 1 of 2 ways: Either raw FLAC data can be fed
  28.  * through, starting from the initial 'fLaC' signature; or by passing the
  29.  * 34-byte streaminfo structure through avctx->extradata[_size] followed
  30.  * by data starting with the 0xFFF8 marker.
  31.  */
  32.  
  33. #include <limits.h>
  34.  
  35. #include "avcodec.h"
  36. #include "bitstream.h"
  37. #include "golomb.h"
  38. #undef NDEBUG
  39. #include <assert.h>
  40. #define MAX_CHANNELS 8
  41. #define MAX_BLOCKSIZE 65535
  42. #define FLAC_STREAMINFO_SIZE 34
  43. enum decorrelation_type {
  44.     INDEPENDENT,
  45.     LEFT_SIDE,
  46.     RIGHT_SIDE,
  47.     MID_SIDE,
  48. };
  49. typedef struct FLACContext {
  50.     AVCodecContext *avctx;
  51.     GetBitContext gb;
  52.     int min_blocksize, max_blocksize;
  53.     int min_framesize, max_framesize;
  54.     int samplerate, channels;
  55.     int blocksize/*, last_blocksize*/;
  56.     int bps, curr_bps;
  57.     enum decorrelation_type decorrelation;
  58.     int32_t *decoded[MAX_CHANNELS];
  59.     uint8_t *bitstream;
  60.     int bitstream_size;
  61.     int bitstream_index;
  62.     int allocated_bitstream_size;
  63. } FLACContext;
  64. #define METADATA_TYPE_STREAMINFO 0
  65. static int sample_rate_table[] =
  66. { 0, 0, 0, 0,
  67.   8000, 16000, 22050, 24000, 32000, 44100, 48000, 96000,
  68.   0, 0, 0, 0 }; 
  69. static int sample_size_table[] = 
  70. { 0, 8, 12, 0, 16, 20, 24, 0 };
  71. static int blocksize_table[] = {
  72.      0,    192, 576<<0, 576<<1, 576<<2, 576<<3,      0,      0, 
  73. 256<<0, 256<<1, 256<<2, 256<<3, 256<<4, 256<<5, 256<<6, 256<<7 
  74. };
  75. static const uint8_t table_crc8[256] = {
  76.     0x00, 0x07, 0x0e, 0x09, 0x1c, 0x1b, 0x12, 0x15,
  77.     0x38, 0x3f, 0x36, 0x31, 0x24, 0x23, 0x2a, 0x2d,
  78.     0x70, 0x77, 0x7e, 0x79, 0x6c, 0x6b, 0x62, 0x65,
  79.     0x48, 0x4f, 0x46, 0x41, 0x54, 0x53, 0x5a, 0x5d,
  80.     0xe0, 0xe7, 0xee, 0xe9, 0xfc, 0xfb, 0xf2, 0xf5,
  81.     0xd8, 0xdf, 0xd6, 0xd1, 0xc4, 0xc3, 0xca, 0xcd,
  82.     0x90, 0x97, 0x9e, 0x99, 0x8c, 0x8b, 0x82, 0x85,
  83.     0xa8, 0xaf, 0xa6, 0xa1, 0xb4, 0xb3, 0xba, 0xbd,
  84.     0xc7, 0xc0, 0xc9, 0xce, 0xdb, 0xdc, 0xd5, 0xd2,
  85.     0xff, 0xf8, 0xf1, 0xf6, 0xe3, 0xe4, 0xed, 0xea,
  86.     0xb7, 0xb0, 0xb9, 0xbe, 0xab, 0xac, 0xa5, 0xa2,
  87.     0x8f, 0x88, 0x81, 0x86, 0x93, 0x94, 0x9d, 0x9a,
  88.     0x27, 0x20, 0x29, 0x2e, 0x3b, 0x3c, 0x35, 0x32,
  89.     0x1f, 0x18, 0x11, 0x16, 0x03, 0x04, 0x0d, 0x0a,
  90.     0x57, 0x50, 0x59, 0x5e, 0x4b, 0x4c, 0x45, 0x42,
  91.     0x6f, 0x68, 0x61, 0x66, 0x73, 0x74, 0x7d, 0x7a,
  92.     0x89, 0x8e, 0x87, 0x80, 0x95, 0x92, 0x9b, 0x9c,
  93.     0xb1, 0xb6, 0xbf, 0xb8, 0xad, 0xaa, 0xa3, 0xa4,
  94.     0xf9, 0xfe, 0xf7, 0xf0, 0xe5, 0xe2, 0xeb, 0xec,
  95.     0xc1, 0xc6, 0xcf, 0xc8, 0xdd, 0xda, 0xd3, 0xd4,
  96.     0x69, 0x6e, 0x67, 0x60, 0x75, 0x72, 0x7b, 0x7c,
  97.     0x51, 0x56, 0x5f, 0x58, 0x4d, 0x4a, 0x43, 0x44,
  98.     0x19, 0x1e, 0x17, 0x10, 0x05, 0x02, 0x0b, 0x0c,
  99.     0x21, 0x26, 0x2f, 0x28, 0x3d, 0x3a, 0x33, 0x34,
  100.     0x4e, 0x49, 0x40, 0x47, 0x52, 0x55, 0x5c, 0x5b,
  101.     0x76, 0x71, 0x78, 0x7f, 0x6a, 0x6d, 0x64, 0x63,
  102.     0x3e, 0x39, 0x30, 0x37, 0x22, 0x25, 0x2c, 0x2b,
  103.     0x06, 0x01, 0x08, 0x0f, 0x1a, 0x1d, 0x14, 0x13,
  104.     0xae, 0xa9, 0xa0, 0xa7, 0xb2, 0xb5, 0xbc, 0xbb,
  105.     0x96, 0x91, 0x98, 0x9f, 0x8a, 0x8d, 0x84, 0x83,
  106.     0xde, 0xd9, 0xd0, 0xd7, 0xc2, 0xc5, 0xcc, 0xcb,
  107.     0xe6, 0xe1, 0xe8, 0xef, 0xfa, 0xfd, 0xf4, 0xf3
  108. };
  109. static int64_t get_utf8(GetBitContext *gb)
  110. {
  111.     uint64_t val;
  112.     int ones=0, bytes;
  113.     
  114.     while(get_bits1(gb))
  115.         ones++;
  116.     if     (ones==0) bytes=0;
  117.     else if(ones==1) return -1;
  118.     else             bytes= ones - 1;
  119.     
  120.     val= get_bits(gb, 7-ones);
  121.     while(bytes--){
  122.         const int tmp = get_bits(gb, 8);
  123.         
  124.         if((tmp>>6) != 2)
  125.             return -1;
  126.         val<<=6;
  127.         val|= tmp&0x3F;
  128.     }
  129.     return val;
  130. }
  131. #if 0
  132. static int skip_utf8(GetBitContext *gb)
  133. {
  134.     int ones=0, bytes;
  135.     
  136.     while(get_bits1(gb))
  137.         ones++;
  138.     if     (ones==0) bytes=0;
  139.     else if(ones==1) return -1;
  140.     else             bytes= ones - 1;
  141.     
  142.     skip_bits(gb, 7-ones);
  143.     while(bytes--){
  144.         const int tmp = get_bits(gb, 8);
  145.         
  146.         if((tmp>>6) != 2)
  147.             return -1;
  148.     }
  149.     return 0;
  150. }
  151. #endif
  152. static int get_crc8(const uint8_t *buf, int count){
  153.     int crc=0;
  154.     int i;
  155.     
  156.     for(i=0; i<count; i++){
  157.         crc = table_crc8[crc ^ buf[i]];
  158.     }
  159.     return crc;
  160. }
  161. static void metadata_streaminfo(FLACContext *s);
  162. static void dump_headers(FLACContext *s);
  163. static int flac_decode_init(AVCodecContext * avctx)
  164. {
  165.     FLACContext *s = avctx->priv_data;
  166.     s->avctx = avctx;
  167.     /* initialize based on the demuxer-supplied streamdata header */
  168.     if (avctx->extradata_size == FLAC_STREAMINFO_SIZE) {
  169.         init_get_bits(&s->gb, avctx->extradata, avctx->extradata_size*8);
  170.         metadata_streaminfo(s);
  171.         dump_headers(s);
  172.     }
  173.     return 0;
  174. }
  175. static void dump_headers(FLACContext *s)
  176. {
  177.     av_log(s->avctx, AV_LOG_DEBUG, "  Blocksize: %d .. %d (%d)n", s->min_blocksize, s->max_blocksize, s->blocksize);
  178.     av_log(s->avctx, AV_LOG_DEBUG, "  Framesize: %d .. %dn", s->min_framesize, s->max_framesize);
  179.     av_log(s->avctx, AV_LOG_DEBUG, "  Samplerate: %dn", s->samplerate);
  180.     av_log(s->avctx, AV_LOG_DEBUG, "  Channels: %dn", s->channels);
  181.     av_log(s->avctx, AV_LOG_DEBUG, "  Bits: %dn", s->bps);
  182. }
  183. static void allocate_buffers(FLACContext *s){
  184.     int i;
  185.     assert(s->max_blocksize);
  186.     if(s->max_framesize == 0 && s->max_blocksize){
  187.         s->max_framesize= (s->channels * s->bps * s->max_blocksize + 7)/ 8; //FIXME header overhead
  188.     }
  189.     for (i = 0; i < s->channels; i++)
  190.     {
  191.         s->decoded[i] = av_realloc(s->decoded[i], sizeof(int32_t)*s->max_blocksize);
  192.     }
  193.     s->bitstream= av_fast_realloc(s->bitstream, &s->allocated_bitstream_size, s->max_framesize);
  194. }
  195. static void metadata_streaminfo(FLACContext *s)
  196. {
  197.     /* mandatory streaminfo */
  198.     s->min_blocksize = get_bits(&s->gb, 16);
  199.     s->max_blocksize = get_bits(&s->gb, 16);
  200.     s->min_framesize = get_bits_long(&s->gb, 24);
  201.     s->max_framesize = get_bits_long(&s->gb, 24);
  202.     
  203.     s->samplerate = get_bits_long(&s->gb, 20);
  204.     s->channels = get_bits(&s->gb, 3) + 1;
  205.     s->bps = get_bits(&s->gb, 5) + 1;
  206.     
  207.     s->avctx->channels = s->channels;
  208.     s->avctx->sample_rate = s->samplerate;
  209.     skip_bits(&s->gb, 36); /* total num of samples */
  210.     
  211.     skip_bits(&s->gb, 64); /* md5 sum */
  212.     skip_bits(&s->gb, 64); /* md5 sum */
  213.     
  214.     allocate_buffers(s);
  215. }
  216. static int decode_residuals(FLACContext *s, int channel, int pred_order)
  217. {
  218.     int i, tmp, partition, method_type, rice_order;
  219.     int sample = 0, samples;
  220.     method_type = get_bits(&s->gb, 2);
  221.     if (method_type != 0){
  222.         av_log(s->avctx, AV_LOG_DEBUG, "illegal residual coding method %dn", method_type);
  223.         return -1;
  224.     }
  225.     
  226.     rice_order = get_bits(&s->gb, 4);
  227.     samples= s->blocksize >> rice_order;
  228.     sample= 
  229.     i= pred_order;
  230.     for (partition = 0; partition < (1 << rice_order); partition++)
  231.     {
  232.         tmp = get_bits(&s->gb, 4);
  233.         if (tmp == 15)
  234.         {
  235.             av_log(s->avctx, AV_LOG_DEBUG, "fixed len partitionn");
  236.             tmp = get_bits(&s->gb, 5);
  237.             for (; i < samples; i++, sample++)
  238.                 s->decoded[channel][sample] = get_sbits(&s->gb, tmp);
  239.         }
  240.         else
  241.         {
  242. //            av_log(s->avctx, AV_LOG_DEBUG, "rice coded partition k=%dn", tmp);
  243.             for (; i < samples; i++, sample++){
  244.                 s->decoded[channel][sample] = get_sr_golomb_flac(&s->gb, tmp, INT_MAX, 0);
  245.             }
  246.         }
  247.         i= 0;
  248.     }
  249. //    av_log(s->avctx, AV_LOG_DEBUG, "partitions: %d, samples: %dn", 1 << rice_order, sample);
  250.     return 0;
  251. }    
  252. static int decode_subframe_fixed(FLACContext *s, int channel, int pred_order)
  253. {
  254.     int i;
  255.         
  256. //    av_log(s->avctx, AV_LOG_DEBUG, "  SUBFRAME FIXEDn");
  257.         
  258.     /* warm up samples */
  259. //    av_log(s->avctx, AV_LOG_DEBUG, "   warm up samples: %dn", pred_order);
  260.         
  261.     for (i = 0; i < pred_order; i++)
  262.     {
  263.         s->decoded[channel][i] = get_sbits(&s->gb, s->curr_bps);
  264. //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %dn", i, s->decoded[channel][i]);
  265.     }
  266.     
  267.     if (decode_residuals(s, channel, pred_order) < 0)
  268.         return -1;
  269.     switch(pred_order)
  270.     {
  271.         case 0:
  272.             break;
  273.         case 1:
  274.             for (i = pred_order; i < s->blocksize; i++)
  275.                 s->decoded[channel][i] +=   s->decoded[channel][i-1];
  276.             break;
  277.         case 2:
  278.             for (i = pred_order; i < s->blocksize; i++)
  279.                 s->decoded[channel][i] += 2*s->decoded[channel][i-1]
  280.                                           - s->decoded[channel][i-2];
  281.             break;
  282.         case 3:
  283.             for (i = pred_order; i < s->blocksize; i++)
  284.                 s->decoded[channel][i] += 3*s->decoded[channel][i-1] 
  285.                                         - 3*s->decoded[channel][i-2]
  286.                                         +   s->decoded[channel][i-3];
  287.             break;
  288.         case 4:
  289.             for (i = pred_order; i < s->blocksize; i++)
  290.                 s->decoded[channel][i] += 4*s->decoded[channel][i-1] 
  291.                                         - 6*s->decoded[channel][i-2]
  292.                                         + 4*s->decoded[channel][i-3]
  293.                                         -   s->decoded[channel][i-4];
  294.             break;
  295.         default:
  296.             av_log(s->avctx, AV_LOG_ERROR, "illegal pred order %dn", pred_order);
  297.             return -1;
  298.     }
  299.     return 0;
  300. }
  301. static int decode_subframe_lpc(FLACContext *s, int channel, int pred_order)
  302. {
  303.     int sum, i, j;
  304.     int coeff_prec, qlevel;
  305.     int coeffs[pred_order];
  306.         
  307. //    av_log(s->avctx, AV_LOG_DEBUG, "  SUBFRAME LPCn");
  308.         
  309.     /* warm up samples */
  310. //    av_log(s->avctx, AV_LOG_DEBUG, "   warm up samples: %dn", pred_order);
  311.         
  312.     for (i = 0; i < pred_order; i++)
  313.     {
  314.         s->decoded[channel][i] = get_sbits(&s->gb, s->curr_bps);
  315. //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %dn", i, s->decoded[channel][i]);
  316.     }
  317.     
  318.     coeff_prec = get_bits(&s->gb, 4) + 1;
  319.     if (coeff_prec == 16)
  320.     {
  321.         av_log(s->avctx, AV_LOG_DEBUG, "invalid coeff precisionn");
  322.         return -1;
  323.     }
  324. //    av_log(s->avctx, AV_LOG_DEBUG, "   qlp coeff prec: %dn", coeff_prec);
  325.     qlevel = get_sbits(&s->gb, 5);
  326. //    av_log(s->avctx, AV_LOG_DEBUG, "   quant level: %dn", qlevel);
  327.     if(qlevel < 0){
  328.         av_log(s->avctx, AV_LOG_DEBUG, "qlevel %d not supported, maybe buggy streamn", qlevel);
  329.         return -1;
  330.     }
  331.     for (i = 0; i < pred_order; i++)
  332.     {
  333.         coeffs[i] = get_sbits(&s->gb, coeff_prec);
  334. //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %dn", i, coeffs[i]);
  335.     }
  336.     
  337.     if (decode_residuals(s, channel, pred_order) < 0)
  338.         return -1;
  339.     for (i = pred_order; i < s->blocksize; i++)
  340.     {
  341.         sum = 0;
  342.         for (j = 0; j < pred_order; j++)
  343.             sum += coeffs[j] * s->decoded[channel][i-j-1];
  344.         s->decoded[channel][i] += sum >> qlevel;
  345.     }
  346.     
  347.     return 0;
  348. }
  349. static inline int decode_subframe(FLACContext *s, int channel)
  350. {
  351.     int type, wasted = 0;
  352.     int i, tmp;
  353.     
  354.     s->curr_bps = s->bps;
  355.     if(channel == 0){
  356.         if(s->decorrelation == RIGHT_SIDE)
  357.             s->curr_bps++;
  358.     }else{
  359.         if(s->decorrelation == LEFT_SIDE || s->decorrelation == MID_SIDE)
  360.             s->curr_bps++;
  361.     }
  362.     if (get_bits1(&s->gb))
  363.     {
  364.         av_log(s->avctx, AV_LOG_ERROR, "invalid subframe paddingn");
  365.         return -1;
  366.     }
  367.     type = get_bits(&s->gb, 6);
  368. //    wasted = get_bits1(&s->gb);
  369.     
  370. //    if (wasted)
  371. //    {
  372. //        while (!get_bits1(&s->gb))
  373. //            wasted++;
  374. //        if (wasted)
  375. //            wasted++;
  376. //        s->curr_bps -= wasted;
  377. //    }
  378. #if 0
  379.     wasted= 16 - av_log2(show_bits(&s->gb, 17));
  380.     skip_bits(&s->gb, wasted+1);
  381.     s->curr_bps -= wasted;
  382. #else
  383.     if (get_bits1(&s->gb))
  384.     {
  385.         wasted = 1;
  386.         while (!get_bits1(&s->gb))
  387.             wasted++;
  388.         s->curr_bps -= wasted;
  389.         av_log(s->avctx, AV_LOG_DEBUG, "%d wasted bitsn", wasted);
  390.     }
  391. #endif
  392. //FIXME use av_log2 for types
  393.     if (type == 0)
  394.     {
  395.         av_log(s->avctx, AV_LOG_DEBUG, "coding type: constantn");
  396.         tmp = get_sbits(&s->gb, s->curr_bps);
  397.         for (i = 0; i < s->blocksize; i++)
  398.             s->decoded[channel][i] = tmp;
  399.     }
  400.     else if (type == 1)
  401.     {
  402.         av_log(s->avctx, AV_LOG_DEBUG, "coding type: verbatimn");
  403.         for (i = 0; i < s->blocksize; i++)
  404.             s->decoded[channel][i] = get_sbits(&s->gb, s->curr_bps);
  405.     }
  406.     else if ((type >= 8) && (type <= 12))
  407.     {
  408. //        av_log(s->avctx, AV_LOG_DEBUG, "coding type: fixedn");
  409.         if (decode_subframe_fixed(s, channel, type & ~0x8) < 0)
  410.             return -1;
  411.     }
  412.     else if (type >= 32)
  413.     {
  414. //        av_log(s->avctx, AV_LOG_DEBUG, "coding type: lpcn");
  415.         if (decode_subframe_lpc(s, channel, (type & ~0x20)+1) < 0)
  416.             return -1;
  417.     }
  418.     else
  419.     {
  420.         av_log(s->avctx, AV_LOG_ERROR, "invalid coding typen");
  421.         return -1;
  422.     }
  423.         
  424.     if (wasted)
  425.     {
  426.         int i;
  427.         for (i = 0; i < s->blocksize; i++)
  428.             s->decoded[channel][i] <<= wasted;
  429.     }
  430.     return 0;
  431. }
  432. static int decode_frame(FLACContext *s)
  433. {
  434.     int blocksize_code, sample_rate_code, sample_size_code, assignment, i, crc8;
  435.     int decorrelation, bps, blocksize, samplerate;
  436.     
  437.     blocksize_code = get_bits(&s->gb, 4);
  438.     sample_rate_code = get_bits(&s->gb, 4);
  439.     
  440.     assignment = get_bits(&s->gb, 4); /* channel assignment */
  441.     if (assignment < 8 && s->channels == assignment+1)
  442.         decorrelation = INDEPENDENT;
  443.     else if (assignment >=8 && assignment < 11 && s->channels == 2)
  444.         decorrelation = LEFT_SIDE + assignment - 8;
  445.     else
  446.     {
  447.         av_log(s->avctx, AV_LOG_ERROR, "unsupported channel assignment %d (channels=%d)n", assignment, s->channels);
  448.         return -1;
  449.     }
  450.         
  451.     sample_size_code = get_bits(&s->gb, 3);
  452.     if(sample_size_code == 0)
  453.         bps= s->bps;
  454.     else if((sample_size_code != 3) && (sample_size_code != 7))
  455.         bps = sample_size_table[sample_size_code];
  456.     else 
  457.     {
  458.         av_log(s->avctx, AV_LOG_ERROR, "invalid sample size code (%d)n", sample_size_code);
  459.         return -1;
  460.     }
  461.     if (get_bits1(&s->gb))
  462.     {
  463.         av_log(s->avctx, AV_LOG_ERROR, "broken stream, invalid paddingn");
  464.         return -1;
  465.     }
  466.     
  467.     if(get_utf8(&s->gb) < 0){
  468.         av_log(s->avctx, AV_LOG_ERROR, "utf8 fsckedn");
  469.         return -1;
  470.     }
  471. #if 0    
  472.     if (/*((blocksize_code == 6) || (blocksize_code == 7)) &&*/
  473.         (s->min_blocksize != s->max_blocksize)){
  474.     }else{
  475.     }
  476. #endif
  477.     
  478.     if (blocksize_code == 0)
  479.         blocksize = s->min_blocksize;
  480.     else if (blocksize_code == 6)
  481.         blocksize = get_bits(&s->gb, 8)+1;
  482.     else if (blocksize_code == 7)
  483.         blocksize = get_bits(&s->gb, 16)+1;
  484.     else 
  485.         blocksize = blocksize_table[blocksize_code];
  486.     if(blocksize > s->max_blocksize){
  487.         av_log(s->avctx, AV_LOG_ERROR, "blocksize %d > %dn", blocksize, s->max_blocksize);
  488.         return -1;
  489.     }
  490.     if (sample_rate_code == 0){
  491.         samplerate= s->samplerate;
  492.     }else if ((sample_rate_code > 3) && (sample_rate_code < 12))
  493.         samplerate = sample_rate_table[sample_rate_code];
  494.     else if (sample_rate_code == 12)
  495.         samplerate = get_bits(&s->gb, 8) * 1000;
  496.     else if (sample_rate_code == 13)
  497.         samplerate = get_bits(&s->gb, 16);
  498.     else if (sample_rate_code == 14)
  499.         samplerate = get_bits(&s->gb, 16) * 10;
  500.     else{
  501.         av_log(s->avctx, AV_LOG_ERROR, "illegal sample rate code %dn", sample_rate_code);
  502.         return -1;
  503.     }
  504.     skip_bits(&s->gb, 8);
  505.     crc8= get_crc8(s->gb.buffer, get_bits_count(&s->gb)/8);
  506.     if(crc8){
  507.         av_log(s->avctx, AV_LOG_ERROR, "header crc mismatch crc=%2Xn", crc8);
  508.         return -1;
  509.     }
  510.     
  511.     s->blocksize    = blocksize;
  512.     s->samplerate   = samplerate;
  513.     s->bps          = bps;
  514.     s->decorrelation= decorrelation;
  515. //    dump_headers(s);
  516.     /* subframes */
  517.     for (i = 0; i < s->channels; i++)
  518.     {
  519. //        av_log(s->avctx, AV_LOG_DEBUG, "decoded: %x residual: %xn", s->decoded[i], s->residual[i]);
  520.         if (decode_subframe(s, i) < 0)
  521.             return -1;
  522.     }
  523.     
  524.     align_get_bits(&s->gb);
  525.     /* frame footer */
  526.     skip_bits(&s->gb, 16); /* data crc */
  527.     return 0;
  528. }
  529. static int flac_decode_frame(AVCodecContext *avctx,
  530.                             void *data, int *data_size,
  531.                             uint8_t *buf, int buf_size)
  532. {
  533.     FLACContext *s = avctx->priv_data;
  534.     int metadata_last, metadata_type, metadata_size;
  535.     int tmp = 0, i, j = 0, input_buf_size = 0;
  536.     int16_t *samples = data;
  537.     if(s->max_framesize == 0){
  538.         s->max_framesize= 65536; // should hopefully be enough for the first header
  539.         s->bitstream= av_fast_realloc(s->bitstream, &s->allocated_bitstream_size, s->max_framesize);
  540.     }
  541.     if(1 && s->max_framesize){//FIXME truncated
  542.             buf_size= FFMAX(FFMIN(buf_size, s->max_framesize - s->bitstream_size), 0);
  543.             input_buf_size= buf_size;
  544.             if(s->bitstream_index + s->bitstream_size + buf_size > s->allocated_bitstream_size){
  545. //                printf("memmoven");
  546.                 memmove(s->bitstream, &s->bitstream[s->bitstream_index], s->bitstream_size);
  547.                 s->bitstream_index=0;
  548.             }
  549.             memcpy(&s->bitstream[s->bitstream_index + s->bitstream_size], buf, buf_size);
  550.             buf= &s->bitstream[s->bitstream_index];
  551.             buf_size += s->bitstream_size;
  552.             s->bitstream_size= buf_size;
  553.             
  554.             if(buf_size < s->max_framesize){
  555. //                printf("wanna more data ...n");
  556.                 return input_buf_size;
  557.             }
  558.     }
  559.     init_get_bits(&s->gb, buf, buf_size*8);
  560.     
  561.     /* fLaC signature (be) */
  562.     if (show_bits_long(&s->gb, 32) == bswap_32(ff_get_fourcc("fLaC")))
  563.     {
  564.         skip_bits(&s->gb, 32);
  565.         av_log(s->avctx, AV_LOG_DEBUG, "STREAM HEADERn");
  566.         do {
  567.             metadata_last = get_bits(&s->gb, 1);
  568.             metadata_type = get_bits(&s->gb, 7);
  569.             metadata_size = get_bits_long(&s->gb, 24);
  570.             
  571.             av_log(s->avctx, AV_LOG_DEBUG, " metadata block: flag = %d, type = %d, size = %dn",
  572.                 metadata_last, metadata_type,
  573.                 metadata_size);
  574.             if(metadata_size){
  575.                 switch(metadata_type)
  576.                 {
  577.                 case METADATA_TYPE_STREAMINFO:{
  578.                     metadata_streaminfo(s);
  579.                     /* Buffer might have been reallocated, reinit bitreader */
  580.                     if(buf != &s->bitstream[s->bitstream_index])
  581.                     {
  582.                         int bits_count = get_bits_count(&s->gb);
  583.                         buf= &s->bitstream[s->bitstream_index];
  584.                         init_get_bits(&s->gb, buf, buf_size*8);
  585.                         skip_bits(&s->gb, bits_count);
  586.                     }
  587.  
  588.                     dump_headers(s);
  589.                     break;}
  590.                 default:
  591.                     for(i=0; i<metadata_size; i++)
  592.                         skip_bits(&s->gb, 8);
  593.                 }
  594.             }
  595.         } while(!metadata_last);
  596.     }
  597.     else
  598.     {
  599.         
  600.         tmp = show_bits(&s->gb, 16);
  601.         if(tmp != 0xFFF8){
  602.             av_log(s->avctx, AV_LOG_ERROR, "FRAME HEADER not heren");
  603.             while(get_bits_count(&s->gb)/8+2 < buf_size && show_bits(&s->gb, 16) != 0xFFF8)
  604.                 skip_bits(&s->gb, 8);
  605.             goto end; // we may not have enough bits left to decode a frame, so try next time
  606.         }
  607.         skip_bits(&s->gb, 16);
  608.         if (decode_frame(s) < 0){
  609.             av_log(s->avctx, AV_LOG_ERROR, "decode_frame() failedn");
  610.             s->bitstream_size=0;
  611.             s->bitstream_index=0;
  612.             return -1;
  613.         }
  614.     }
  615.     
  616. #if 0
  617.     /* fix the channel order here */
  618.     if (s->order == MID_SIDE)
  619.     {
  620.         short *left = samples;
  621.         short *right = samples + s->blocksize;
  622.         for (i = 0; i < s->blocksize; i += 2)
  623.         {
  624.             uint32_t x = s->decoded[0][i];
  625.             uint32_t y = s->decoded[0][i+1];
  626.             right[i] = x - (y / 2);
  627.             left[i] = right[i] + y;
  628.         }
  629.         *data_size = 2 * s->blocksize;
  630.     }
  631.     else
  632.     {
  633.     for (i = 0; i < s->channels; i++)
  634.     {
  635.         switch(s->order)
  636.         {
  637.             case INDEPENDENT:
  638.                 for (j = 0; j < s->blocksize; j++)
  639.                     samples[(s->blocksize*i)+j] = s->decoded[i][j];
  640.                 break;
  641.             case LEFT_SIDE:
  642.             case RIGHT_SIDE:
  643.                 if (i == 0)
  644.                     for (j = 0; j < s->blocksize; j++)
  645.                         samples[(s->blocksize*i)+j] = s->decoded[0][j];
  646.                 else
  647.                     for (j = 0; j < s->blocksize; j++)
  648.                         samples[(s->blocksize*i)+j] = s->decoded[0][j] - s->decoded[i][j];
  649.                 break;
  650. //            case MID_SIDE:
  651. //                av_log(s->avctx, AV_LOG_DEBUG, "mid-side unsupportedn");
  652.         }
  653.         *data_size += s->blocksize;
  654.     }
  655.     }
  656. #else
  657.     switch(s->decorrelation)
  658.     {
  659.         case INDEPENDENT:
  660.             for (j = 0; j < s->blocksize; j++)
  661.             {
  662.                 for (i = 0; i < s->channels; i++)
  663.                     *(samples++) = s->decoded[i][j];
  664.             }
  665.             break;
  666.         case LEFT_SIDE:
  667.             assert(s->channels == 2);
  668.             for (i = 0; i < s->blocksize; i++)
  669.             {
  670.                 *(samples++) = s->decoded[0][i];
  671.                 *(samples++) = s->decoded[0][i] - s->decoded[1][i];
  672.             }
  673.             break;
  674.         case RIGHT_SIDE:
  675.             assert(s->channels == 2);
  676.             for (i = 0; i < s->blocksize; i++)
  677.             {
  678.                 *(samples++) = s->decoded[0][i] + s->decoded[1][i];
  679.                 *(samples++) = s->decoded[1][i];
  680.             }
  681.             break;
  682.         case MID_SIDE:
  683.             assert(s->channels == 2);
  684.             for (i = 0; i < s->blocksize; i++)
  685.             {
  686.                 int mid, side;
  687.                 mid = s->decoded[0][i];
  688.                 side = s->decoded[1][i];
  689. #if 1 //needs to be checked but IMHO it should be binary identical
  690.                 mid -= side>>1;
  691.                 *(samples++) = mid + side;
  692.                 *(samples++) = mid;
  693. #else
  694.                 
  695.                 mid <<= 1;
  696.                 if (side & 1)
  697.                     mid++;
  698.                 *(samples++) = (mid + side) >> 1;
  699.                 *(samples++) = (mid - side) >> 1;
  700. #endif
  701.             }
  702.             break;
  703.     }
  704. #endif
  705.     *data_size = (int8_t *)samples - (int8_t *)data;
  706. //    av_log(s->avctx, AV_LOG_DEBUG, "data size: %dn", *data_size);
  707. //    s->last_blocksize = s->blocksize;
  708. end:
  709.     i= (get_bits_count(&s->gb)+7)/8;;
  710.     if(i > buf_size){
  711.         av_log(s->avctx, AV_LOG_ERROR, "overread: %dn", i - buf_size);
  712.         s->bitstream_size=0;
  713.         s->bitstream_index=0;
  714.         return -1;
  715.     }
  716.     if(s->bitstream_size){
  717.         s->bitstream_index += i;
  718.         s->bitstream_size  -= i;
  719.         return input_buf_size;
  720.     }else 
  721.         return i;
  722. }
  723. static int flac_decode_close(AVCodecContext *avctx)
  724. {
  725.     FLACContext *s = avctx->priv_data;
  726.     int i;
  727.     
  728.     for (i = 0; i < s->channels; i++)
  729.     {
  730.         av_freep(&s->decoded[i]);
  731.     }
  732.     av_freep(&s->bitstream);
  733.     
  734.     return 0;
  735. }
  736. static void flac_flush(AVCodecContext *avctx){
  737.     FLACContext *s = avctx->priv_data;
  738.     s->bitstream_size=
  739.     s->bitstream_index= 0;
  740. }
  741. AVCodec flac_decoder = {
  742.     "flac",
  743.     CODEC_TYPE_AUDIO,
  744.     CODEC_ID_FLAC,
  745.     sizeof(FLACContext),
  746.     flac_decode_init,
  747.     NULL,
  748.     flac_decode_close,
  749.     flac_decode_frame,
  750.     .flush= flac_flush,    
  751. };