libavcodec/flac.c

   1 /*
   2  * FLAC (Free Lossless Audio Codec) decoder
   3  * Copyright (c) 2003 Alex Beregszaszi
   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 flac.c
  24  * FLAC (Free Lossless Audio Codec) decoder
  25  * @author Alex Beregszaszi
  26  *
  27  * For more information on the FLAC format, visit:
  28  *  http://flac.sourceforge.net/
  29  *
  30  * This decoder can be used in 1 of 2 ways: Either raw FLAC data can be fed
  31  * through, starting from the initial 'fLaC' signature; or by passing the
  32  * 34-byte streaminfo structure through avctx->extradata[_size] followed
  33  * by data starting with the 0xFFF8 marker.
  34  */
  35
  36 #include <limits.h>
  37
  38 #define ALT_BITSTREAM_READER
  39 #include "avcodec.h"
  40 #include "bitstream.h"
  41 #include "golomb.h"
  42 #include "crc.h"
  43 #include "flac.h"
  44
  45 #undef NDEBUG
  46 #include <assert.h>
  47
  48 #define MAX_CHANNELS 8
  49 #define MAX_BLOCKSIZE 65535
  50 #define FLAC_STREAMINFO_SIZE 34
  51
  52 enum decorrelation_type {
  53     INDEPENDENT,
  54     LEFT_SIDE,
  55     RIGHT_SIDE,
  56     MID_SIDE,
  57 };
  58
  59 typedef struct FLACContext {
  60     FLACSTREAMINFO
  61
  62     AVCodecContext *avctx;
  63     GetBitContext gb;
  64
  65     int blocksize/*, last_blocksize*/;
  66     int curr_bps;
  67     enum decorrelation_type decorrelation;
  68
  69     int32_t *decoded[MAX_CHANNELS];
  70     uint8_t *bitstream;
  71     int bitstream_size;
  72     int bitstream_index;
  73     unsigned int allocated_bitstream_size;
  74 } FLACContext;
  75
  76 #define METADATA_TYPE_STREAMINFO 0
  77
  78 static int sample_rate_table[] =
  79 { 0, 0, 0, 0,
  80   8000, 16000, 22050, 24000, 32000, 44100, 48000, 96000,
  81   0, 0, 0, 0 };
  82
  83 static int sample_size_table[] =
  84 { 0, 8, 12, 0, 16, 20, 24, 0 };
  85
  86 static int blocksize_table[] = {
  87      0,    192, 576<<0, 576<<1, 576<<2, 576<<3,      0,      0,
  88 256<<0, 256<<1, 256<<2, 256<<3, 256<<4, 256<<5, 256<<6, 256<<7
  89 };
  90
  91 static int64_t get_utf8(GetBitContext *gb){
  92     int64_t val;
  93     GET_UTF8(val, get_bits(gb, 8), return -1;)
  94     return val;
  95 }
  96
  97 static void allocate_buffers(FLACContext *s);
  98 static int metadata_parse(FLACContext *s);
  99
 100 static av_cold int flac_decode_init(AVCodecContext * avctx)
 101 {
 102     FLACContext *s = avctx->priv_data;
 103     s->avctx = avctx;
 104
 105     if (avctx->extradata_size > 4) {
 106         /* initialize based on the demuxer-supplied streamdata header */
 107         if (avctx->extradata_size == FLAC_STREAMINFO_SIZE) {
 108             ff_flac_parse_streaminfo(avctx, (FLACStreaminfo *)s, avctx->extradata);
 109             allocate_buffers(s);
 110         } else {
 111             init_get_bits(&s->gb, avctx->extradata, avctx->extradata_size*8);
 112             metadata_parse(s);
 113         }
 114     }
 115
 116     return 0;
 117 }
 118
 119 static void dump_headers(AVCodecContext *avctx, FLACStreaminfo *s)
 120 {
 121     av_log(avctx, AV_LOG_DEBUG, "  Blocksize: %d .. %d\n", s->min_blocksize, s->max_blocksize);
 122     av_log(avctx, AV_LOG_DEBUG, "  Max Framesize: %d\n", s->max_framesize);
 123     av_log(avctx, AV_LOG_DEBUG, "  Samplerate: %d\n", s->samplerate);
 124     av_log(avctx, AV_LOG_DEBUG, "  Channels: %d\n", s->channels);
 125     av_log(avctx, AV_LOG_DEBUG, "  Bits: %d\n", s->bps);
 126 }
 127
 128 static void allocate_buffers(FLACContext *s){
 129     int i;
 130
 131     assert(s->max_blocksize);
 132
 133     if(s->max_framesize == 0 && s->max_blocksize){
 134         s->max_framesize= (s->channels * s->bps * s->max_blocksize + 7)/ 8; //FIXME header overhead
 135     }
 136
 137     for (i = 0; i < s->channels; i++)
 138     {
 139         s->decoded[i] = av_realloc(s->decoded[i], sizeof(int32_t)*s->max_blocksize);
 140     }
 141
 142     s->bitstream= av_fast_realloc(s->bitstream, &s->allocated_bitstream_size, s->max_framesize);
 143 }
 144
 145 void ff_flac_parse_streaminfo(AVCodecContext *avctx, struct FLACStreaminfo *s,
 146                               const uint8_t *buffer)
 147 {
 148     GetBitContext gb;
 149     init_get_bits(&gb, buffer, FLAC_STREAMINFO_SIZE*8);
 150
 151     /* mandatory streaminfo */
 152     s->min_blocksize = get_bits(&gb, 16);
 153     s->max_blocksize = get_bits(&gb, 16);
 154
 155     skip_bits(&gb, 24); /* skip min frame size */
 156     s->max_framesize = get_bits_long(&gb, 24);
 157
 158     s->samplerate = get_bits_long(&gb, 20);
 159     s->channels = get_bits(&gb, 3) + 1;
 160     s->bps = get_bits(&gb, 5) + 1;
 161
 162     avctx->channels = s->channels;
 163     avctx->sample_rate = s->samplerate;
 164
 165     skip_bits(&gb, 36); /* total num of samples */
 166
 167     skip_bits(&gb, 64); /* md5 sum */
 168     skip_bits(&gb, 64); /* md5 sum */
 169
 170     dump_headers(avctx, s);
 171 }
 172
 173 /**
 174  * Parse a list of metadata blocks. This list of blocks must begin with
 175  * the fLaC marker.
 176  * @param s the flac decoding context containing the gb bit reader used to
 177  *          parse metadata
 178  * @return 1 if some metadata was read, 0 if no fLaC marker was found
 179  */
 180 static int metadata_parse(FLACContext *s)
 181 {
 182     int i, metadata_last, metadata_type, metadata_size, streaminfo_updated=0;
 183
 184     if (show_bits_long(&s->gb, 32) == MKBETAG('f','L','a','C')) {
 185         skip_bits(&s->gb, 32);
 186
 187         av_log(s->avctx, AV_LOG_DEBUG, "STREAM HEADER\n");
 188         do {
 189             metadata_last = get_bits1(&s->gb);
 190             metadata_type = get_bits(&s->gb, 7);
 191             metadata_size = get_bits_long(&s->gb, 24);
 192
 193             av_log(s->avctx, AV_LOG_DEBUG,
 194                    " metadata block: flag = %d, type = %d, size = %d\n",
 195                    metadata_last, metadata_type, metadata_size);
 196             if (metadata_size) {
 197                 switch (metadata_type) {
 198                 case METADATA_TYPE_STREAMINFO:
 199                     ff_flac_parse_streaminfo(s->avctx, (FLACStreaminfo *)s, s->gb.buffer+get_bits_count(&s->gb)/8);
 200                     streaminfo_updated = 1;
 201
 202                 default:
 203                     for (i=0; i<metadata_size; i++)
 204                         skip_bits(&s->gb, 8);
 205                 }
 206             }
 207         } while (!metadata_last);
 208
 209         if (streaminfo_updated)
 210             allocate_buffers(s);
 211         return 1;
 212     }
 213     return 0;
 214 }
 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
 221     method_type = get_bits(&s->gb, 2);
 222     if (method_type > 1){
 223         av_log(s->avctx, AV_LOG_DEBUG, "illegal residual coding method %d\n", method_type);
 224         return -1;
 225     }
 226
 227     rice_order = get_bits(&s->gb, 4);
 228
 229     samples= s->blocksize >> rice_order;
 230     if (pred_order > samples) {
 231         av_log(s->avctx, AV_LOG_ERROR, "invalid predictor order: %i > %i\n", pred_order, samples);
 232         return -1;
 233     }
 234
 235     sample=
 236     i= pred_order;
 237     for (partition = 0; partition < (1 << rice_order); partition++)
 238     {
 239         tmp = get_bits(&s->gb, method_type == 0 ? 4 : 5);
 240         if (tmp == (method_type == 0 ? 15 : 31))
 241         {
 242             av_log(s->avctx, AV_LOG_DEBUG, "fixed len partition\n");
 243             tmp = get_bits(&s->gb, 5);
 244             for (; i < samples; i++, sample++)
 245                 s->decoded[channel][sample] = get_sbits(&s->gb, tmp);
 246         }
 247         else
 248         {
 249 //            av_log(s->avctx, AV_LOG_DEBUG, "rice coded partition k=%d\n", tmp);
 250             for (; i < samples; i++, sample++){
 251                 s->decoded[channel][sample] = get_sr_golomb_flac(&s->gb, tmp, INT_MAX, 0);
 252             }
 253         }
 254         i= 0;
 255     }
 256
 257 //    av_log(s->avctx, AV_LOG_DEBUG, "partitions: %d, samples: %d\n", 1 << rice_order, sample);
 258
 259     return 0;
 260 }
 261
 262 static int decode_subframe_fixed(FLACContext *s, int channel, int pred_order)
 263 {
 264     const int blocksize = s->blocksize;
 265     int32_t *decoded = s->decoded[channel];
 266     int a, b, c, d, i;
 267
 268 //    av_log(s->avctx, AV_LOG_DEBUG, "  SUBFRAME FIXED\n");
 269
 270     /* warm up samples */
 271 //    av_log(s->avctx, AV_LOG_DEBUG, "   warm up samples: %d\n", pred_order);
 272
 273     for (i = 0; i < pred_order; i++)
 274     {
 275         decoded[i] = get_sbits(&s->gb, s->curr_bps);
 276 //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %d\n", i, s->decoded[channel][i]);
 277     }
 278
 279     if (decode_residuals(s, channel, pred_order) < 0)
 280         return -1;
 281
 282     a = decoded[pred_order-1];
 283     b = a - decoded[pred_order-2];
 284     c = b - decoded[pred_order-2] + decoded[pred_order-3];
 285     d = c - decoded[pred_order-2] + 2*decoded[pred_order-3] - decoded[pred_order-4];
 286
 287     switch(pred_order)
 288     {
 289         case 0:
 290             break;
 291         case 1:
 292             for (i = pred_order; i < blocksize; i++)
 293                 decoded[i] = a += decoded[i];
 294             break;
 295         case 2:
 296             for (i = pred_order; i < blocksize; i++)
 297                 decoded[i] = a += b += decoded[i];
 298             break;
 299         case 3:
 300             for (i = pred_order; i < blocksize; i++)
 301                 decoded[i] = a += b += c += decoded[i];
 302             break;
 303         case 4:
 304             for (i = pred_order; i < blocksize; i++)
 305                 decoded[i] = a += b += c += d += decoded[i];
 306             break;
 307         default:
 308             av_log(s->avctx, AV_LOG_ERROR, "illegal pred order %d\n", pred_order);
 309             return -1;
 310     }
 311
 312     return 0;
 313 }
 314
 315 static int decode_subframe_lpc(FLACContext *s, int channel, int pred_order)
 316 {
 317     int i, j;
 318     int coeff_prec, qlevel;
 319     int coeffs[pred_order];
 320     int32_t *decoded = s->decoded[channel];
 321
 322 //    av_log(s->avctx, AV_LOG_DEBUG, "  SUBFRAME LPC\n");
 323
 324     /* warm up samples */
 325 //    av_log(s->avctx, AV_LOG_DEBUG, "   warm up samples: %d\n", pred_order);
 326
 327     for (i = 0; i < pred_order; i++)
 328     {
 329         decoded[i] = get_sbits(&s->gb, s->curr_bps);
 330 //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %d\n", i, decoded[i]);
 331     }
 332
 333     coeff_prec = get_bits(&s->gb, 4) + 1;
 334     if (coeff_prec == 16)
 335     {
 336         av_log(s->avctx, AV_LOG_DEBUG, "invalid coeff precision\n");
 337         return -1;
 338     }
 339 //    av_log(s->avctx, AV_LOG_DEBUG, "   qlp coeff prec: %d\n", coeff_prec);
 340     qlevel = get_sbits(&s->gb, 5);
 341 //    av_log(s->avctx, AV_LOG_DEBUG, "   quant level: %d\n", qlevel);
 342     if(qlevel < 0){
 343         av_log(s->avctx, AV_LOG_DEBUG, "qlevel %d not supported, maybe buggy stream\n", qlevel);
 344         return -1;
 345     }
 346
 347     for (i = 0; i < pred_order; i++)
 348     {
 349         coeffs[i] = get_sbits(&s->gb, coeff_prec);
 350 //        av_log(s->avctx, AV_LOG_DEBUG, "    %d: %d\n", i, coeffs[i]);
 351     }
 352
 353     if (decode_residuals(s, channel, pred_order) < 0)
 354         return -1;
 355
 356     if (s->bps > 16) {
 357         int64_t sum;
 358         for (i = pred_order; i < s->blocksize; i++)
 359         {
 360             sum = 0;
 361             for (j = 0; j < pred_order; j++)
 362                 sum += (int64_t)coeffs[j] * decoded[i-j-1];
 363             decoded[i] += sum >> qlevel;
 364         }
 365     } else {
 366         for (i = pred_order; i < s->blocksize-1; i += 2)
 367         {
 368             int c;
 369             int d = decoded[i-pred_order];
 370             int s0 = 0, s1 = 0;
 371             for (j = pred_order-1; j > 0; j--)
 372             {
 373                 c = coeffs[j];
 374                 s0 += c*d;
 375                 d = decoded[i-j];
 376                 s1 += c*d;
 377             }
 378             c = coeffs[0];
 379             s0 += c*d;
 380             d = decoded[i] += s0 >> qlevel;
 381             s1 += c*d;
 382             decoded[i+1] += s1 >> qlevel;
 383         }
 384         if (i < s->blocksize)
 385         {
 386             int sum = 0;
 387             for (j = 0; j < pred_order; j++)
 388                 sum += coeffs[j] * decoded[i-j-1];
 389             decoded[i] += sum >> qlevel;
 390         }
 391     }
 392
 393     return 0;
 394 }
 395
 396 static inline int decode_subframe(FLACContext *s, int channel)
 397 {
 398     int type, wasted = 0;
 399     int i, tmp;
 400
 401     s->curr_bps = s->bps;
 402     if(channel == 0){
 403         if(s->decorrelation == RIGHT_SIDE)
 404             s->curr_bps++;
 405     }else{
 406         if(s->decorrelation == LEFT_SIDE || s->decorrelation == MID_SIDE)
 407             s->curr_bps++;
 408     }
 409
 410     if (get_bits1(&s->gb))
 411     {
 412         av_log(s->avctx, AV_LOG_ERROR, "invalid subframe padding\n");
 413         return -1;
 414     }
 415     type = get_bits(&s->gb, 6);
 416 //    wasted = get_bits1(&s->gb);
 417
 418 //    if (wasted)
 419 //    {
 420 //        while (!get_bits1(&s->gb))
 421 //            wasted++;
 422 //        if (wasted)
 423 //            wasted++;
 424 //        s->curr_bps -= wasted;
 425 //    }
 426 #if 0
 427     wasted= 16 - av_log2(show_bits(&s->gb, 17));
 428     skip_bits(&s->gb, wasted+1);
 429     s->curr_bps -= wasted;
 430 #else
 431     if (get_bits1(&s->gb))
 432     {
 433         wasted = 1;
 434         while (!get_bits1(&s->gb))
 435             wasted++;
 436         s->curr_bps -= wasted;
 437         av_log(s->avctx, AV_LOG_DEBUG, "%d wasted bits\n", wasted);
 438     }
 439 #endif
 440 //FIXME use av_log2 for types
 441     if (type == 0)
 442     {
 443         av_log(s->avctx, AV_LOG_DEBUG, "coding type: constant\n");
 444         tmp = get_sbits(&s->gb, s->curr_bps);
 445         for (i = 0; i < s->blocksize; i++)
 446             s->decoded[channel][i] = tmp;
 447     }
 448     else if (type == 1)
 449     {
 450         av_log(s->avctx, AV_LOG_DEBUG, "coding type: verbatim\n");
 451         for (i = 0; i < s->blocksize; i++)
 452             s->decoded[channel][i] = get_sbits(&s->gb, s->curr_bps);
 453     }
 454     else if ((type >= 8) && (type <= 12))
 455     {
 456 //        av_log(s->avctx, AV_LOG_DEBUG, "coding type: fixed\n");
 457         if (decode_subframe_fixed(s, channel, type & ~0x8) < 0)
 458             return -1;
 459     }
 460     else if (type >= 32)
 461     {
 462 //        av_log(s->avctx, AV_LOG_DEBUG, "coding type: lpc\n");
 463         if (decode_subframe_lpc(s, channel, (type & ~0x20)+1) < 0)
 464             return -1;
 465     }
 466     else
 467     {
 468         av_log(s->avctx, AV_LOG_ERROR, "invalid coding type\n");
 469         return -1;
 470     }
 471
 472     if (wasted)
 473     {
 474         int i;
 475         for (i = 0; i < s->blocksize; i++)
 476             s->decoded[channel][i] <<= wasted;
 477     }
 478
 479     return 0;
 480 }
 481
 482 static int decode_frame(FLACContext *s, int alloc_data_size)
 483 {
 484     int blocksize_code, sample_rate_code, sample_size_code, assignment, i, crc8;
 485     int decorrelation, bps, blocksize, samplerate;
 486
 487     blocksize_code = get_bits(&s->gb, 4);
 488
 489     sample_rate_code = get_bits(&s->gb, 4);
 490
 491     assignment = get_bits(&s->gb, 4); /* channel assignment */
 492     if (assignment < 8 && s->channels == assignment+1)
 493         decorrelation = INDEPENDENT;
 494     else if (assignment >=8 && assignment < 11 && s->channels == 2)
 495         decorrelation = LEFT_SIDE + assignment - 8;
 496     else
 497     {
 498         av_log(s->avctx, AV_LOG_ERROR, "unsupported channel assignment %d (channels=%d)\n", assignment, s->channels);
 499         return -1;
 500     }
 501
 502     sample_size_code = get_bits(&s->gb, 3);
 503     if(sample_size_code == 0)
 504         bps= s->bps;
 505     else if((sample_size_code != 3) && (sample_size_code != 7))
 506         bps = sample_size_table[sample_size_code];
 507     else
 508     {
 509         av_log(s->avctx, AV_LOG_ERROR, "invalid sample size code (%d)\n", sample_size_code);
 510         return -1;
 511     }
 512
 513     if (get_bits1(&s->gb))
 514     {
 515         av_log(s->avctx, AV_LOG_ERROR, "broken stream, invalid padding\n");
 516         return -1;
 517     }
 518
 519     if(get_utf8(&s->gb) < 0){
 520         av_log(s->avctx, AV_LOG_ERROR, "utf8 fscked\n");
 521         return -1;
 522     }
 523 #if 0
 524     if (/*((blocksize_code == 6) || (blocksize_code == 7)) &&*/
 525         (s->min_blocksize != s->max_blocksize)){
 526     }else{
 527     }
 528 #endif
 529
 530     if (blocksize_code == 0)
 531         blocksize = s->min_blocksize;
 532     else if (blocksize_code == 6)
 533         blocksize = get_bits(&s->gb, 8)+1;
 534     else if (blocksize_code == 7)
 535         blocksize = get_bits(&s->gb, 16)+1;
 536     else
 537         blocksize = blocksize_table[blocksize_code];
 538
 539     if(blocksize > s->max_blocksize){
 540         av_log(s->avctx, AV_LOG_ERROR, "blocksize %d > %d\n", blocksize, s->max_blocksize);
 541         return -1;
 542     }
 543
 544     if(blocksize * s->channels * sizeof(int16_t) > alloc_data_size)
 545         return -1;
 546
 547     if (sample_rate_code == 0){
 548         samplerate= s->samplerate;
 549     }else if ((sample_rate_code > 3) && (sample_rate_code < 12))
 550         samplerate = sample_rate_table[sample_rate_code];
 551     else if (sample_rate_code == 12)
 552         samplerate = get_bits(&s->gb, 8) * 1000;
 553     else if (sample_rate_code == 13)
 554         samplerate = get_bits(&s->gb, 16);
 555     else if (sample_rate_code == 14)
 556         samplerate = get_bits(&s->gb, 16) * 10;
 557     else{
 558         av_log(s->avctx, AV_LOG_ERROR, "illegal sample rate code %d\n", sample_rate_code);
 559         return -1;
 560     }
 561
 562     skip_bits(&s->gb, 8);
 563     crc8 = av_crc(av_crc_get_table(AV_CRC_8_ATM), 0,
 564                   s->gb.buffer, get_bits_count(&s->gb)/8);
 565     if(crc8){
 566         av_log(s->avctx, AV_LOG_ERROR, "header crc mismatch crc=%2X\n", crc8);
 567         return -1;
 568     }
 569
 570     s->blocksize    = blocksize;
 571     s->samplerate   = samplerate;
 572     s->bps          = bps;
 573     s->decorrelation= decorrelation;
 574
 575 //    dump_headers(s->avctx, (FLACStreaminfo *)s);
 576
 577     /* subframes */
 578     for (i = 0; i < s->channels; i++)
 579     {
 580 //        av_log(s->avctx, AV_LOG_DEBUG, "decoded: %x residual: %x\n", s->decoded[i], s->residual[i]);
 581         if (decode_subframe(s, i) < 0)
 582             return -1;
 583     }
 584
 585     align_get_bits(&s->gb);
 586
 587     /* frame footer */
 588     skip_bits(&s->gb, 16); /* data crc */
 589
 590     return 0;
 591 }
 592
 593 static int flac_decode_frame(AVCodecContext *avctx,
 594                             void *data, int *data_size,
 595                             const uint8_t *buf, int buf_size)
 596 {
 597     FLACContext *s = avctx->priv_data;
 598     int tmp = 0, i, j = 0, input_buf_size = 0;
 599     int16_t *samples = data;
 600     int alloc_data_size= *data_size;
 601
 602     *data_size=0;
 603
 604     if(s->max_framesize == 0){
 605         s->max_framesize= 65536; // should hopefully be enough for the first header
 606         s->bitstream= av_fast_realloc(s->bitstream, &s->allocated_bitstream_size, s->max_framesize);
 607     }
 608
 609     if(1 && s->max_framesize){//FIXME truncated
 610             buf_size= FFMAX(FFMIN(buf_size, s->max_framesize - s->bitstream_size), 0);
 611             input_buf_size= buf_size;
 612
 613             if(s->bitstream_index + s->bitstream_size + buf_size > s->allocated_bitstream_size){
 614 //                printf("memmove\n");
 615                 memmove(s->bitstream, &s->bitstream[s->bitstream_index], s->bitstream_size);
 616                 s->bitstream_index=0;
 617             }
 618             memcpy(&s->bitstream[s->bitstream_index + s->bitstream_size], buf, buf_size);
 619             buf= &s->bitstream[s->bitstream_index];
 620             buf_size += s->bitstream_size;
 621             s->bitstream_size= buf_size;
 622
 623             if(buf_size < s->max_framesize){
 624 //                printf("wanna more data ...\n");
 625                 return input_buf_size;
 626             }
 627     }
 628
 629     init_get_bits(&s->gb, buf, buf_size*8);
 630
 631     if (!metadata_parse(s))
 632     {
 633         tmp = show_bits(&s->gb, 16);
 634         if((tmp & 0xFFFE) != 0xFFF8){
 635             av_log(s->avctx, AV_LOG_ERROR, "FRAME HEADER not here\n");
 636             while(get_bits_count(&s->gb)/8+2 < buf_size && (show_bits(&s->gb, 16) & 0xFFFE) != 0xFFF8)
 637                 skip_bits(&s->gb, 8);
 638             goto end; // we may not have enough bits left to decode a frame, so try next time
 639         }
 640         skip_bits(&s->gb, 16);
 641         if (decode_frame(s, alloc_data_size) < 0){
 642             av_log(s->avctx, AV_LOG_ERROR, "decode_frame() failed\n");
 643             s->bitstream_size=0;
 644             s->bitstream_index=0;
 645             return -1;
 646         }
 647     }
 648
 649
 650 #if 0
 651     /* fix the channel order here */
 652     if (s->order == MID_SIDE)
 653     {
 654         short *left = samples;
 655         short *right = samples + s->blocksize;
 656         for (i = 0; i < s->blocksize; i += 2)
 657         {
 658             uint32_t x = s->decoded[0][i];
 659             uint32_t y = s->decoded[0][i+1];
 660
 661             right[i] = x - (y / 2);
 662             left[i] = right[i] + y;
 663         }
 664         *data_size = 2 * s->blocksize;
 665     }
 666     else
 667     {
 668     for (i = 0; i < s->channels; i++)
 669     {
 670         switch(s->order)
 671         {
 672             case INDEPENDENT:
 673                 for (j = 0; j < s->blocksize; j++)
 674                     samples[(s->blocksize*i)+j] = s->decoded[i][j];
 675                 break;
 676             case LEFT_SIDE:
 677             case RIGHT_SIDE:
 678                 if (i == 0)
 679                     for (j = 0; j < s->blocksize; j++)
 680                         samples[(s->blocksize*i)+j] = s->decoded[0][j];
 681                 else
 682                     for (j = 0; j < s->blocksize; j++)
 683                         samples[(s->blocksize*i)+j] = s->decoded[0][j] - s->decoded[i][j];
 684                 break;
 685 //            case MID_SIDE:
 686 //                av_log(s->avctx, AV_LOG_DEBUG, "mid-side unsupported\n");
 687         }
 688         *data_size += s->blocksize;
 689     }
 690     }
 691 #else
 692 #define DECORRELATE(left, right)\
 693             assert(s->channels == 2);\
 694             for (i = 0; i < s->blocksize; i++)\
 695             {\
 696                 int a= s->decoded[0][i];\
 697                 int b= s->decoded[1][i];\
 698                 *samples++ = ((left)  << (24 - s->bps)) >> 8;\
 699                 *samples++ = ((right) << (24 - s->bps)) >> 8;\
 700             }\
 701             break;
 702
 703     switch(s->decorrelation)
 704     {
 705         case INDEPENDENT:
 706             for (j = 0; j < s->blocksize; j++)
 707             {
 708                 for (i = 0; i < s->channels; i++)
 709                     *samples++ = (s->decoded[i][j] << (24 - s->bps)) >> 8;
 710             }
 711             break;
 712         case LEFT_SIDE:
 713             DECORRELATE(a,a-b)
 714         case RIGHT_SIDE:
 715             DECORRELATE(a+b,b)
 716         case MID_SIDE:
 717             DECORRELATE( (a-=b>>1) + b, a)
 718     }
 719 #endif
 720
 721     *data_size = (int8_t *)samples - (int8_t *)data;
 722 //    av_log(s->avctx, AV_LOG_DEBUG, "data size: %d\n", *data_size);
 723
 724 //    s->last_blocksize = s->blocksize;
 725 end:
 726     i= (get_bits_count(&s->gb)+7)/8;
 727     if(i > buf_size){
 728         av_log(s->avctx, AV_LOG_ERROR, "overread: %d\n", i - buf_size);
 729         s->bitstream_size=0;
 730         s->bitstream_index=0;
 731         return -1;
 732     }
 733
 734     if(s->bitstream_size){
 735         s->bitstream_index += i;
 736         s->bitstream_size  -= i;
 737         return input_buf_size;
 738     }else
 739         return i;
 740 }
 741
 742 static av_cold int flac_decode_close(AVCodecContext *avctx)
 743 {
 744     FLACContext *s = avctx->priv_data;
 745     int i;
 746
 747     for (i = 0; i < s->channels; i++)
 748     {
 749         av_freep(&s->decoded[i]);
 750     }
 751     av_freep(&s->bitstream);
 752
 753     return 0;
 754 }
 755
 756 static void flac_flush(AVCodecContext *avctx){
 757     FLACContext *s = avctx->priv_data;
 758
 759     s->bitstream_size=
 760     s->bitstream_index= 0;
 761 }
 762
 763 AVCodec flac_decoder = {
 764     "flac",
 765     CODEC_TYPE_AUDIO,
 766     CODEC_ID_FLAC,
 767     sizeof(FLACContext),
 768     flac_decode_init,
 769     NULL,
 770     flac_decode_close,
 771     flac_decode_frame,
 772     .flush= flac_flush,
 773     .long_name= "FLAC (Free Lossless Audio Codec)"
 774 };