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

   1 /*
   2  * FLAC parser
   3  * Copyright (c) 2010 Michael Chinen
   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  * FLAC parser
  25  *
  26  * The FLAC parser buffers input until FLAC_MIN_HEADERS has been found.
  27  * Each time it finds and verifies a CRC-8 header it sees which of the
  28  * FLAC_MAX_SEQUENTIAL_HEADERS that came before it have a valid CRC-16 footer
  29  * that ends at the newly found header.
  30  * Headers are scored by FLAC_HEADER_BASE_SCORE plus the max of its crc-verified
  31  * children, penalized by changes in sample rate, frame number, etc.
  32  * The parser returns the frame with the highest score.
  33  **/
  34
  35 #include "libavutil/attributes.h"
  36 #include "libavutil/crc.h"
  37 #include "libavutil/fifo.h"
  38 #include "bytestream.h"
  39 #include "parser.h"
  40 #include "flac.h"
  41
  42 /** maximum number of adjacent headers that compare CRCs against each other   */
  43 #define FLAC_MAX_SEQUENTIAL_HEADERS 4
  44 /** minimum number of headers buffered and checked before returning frames    */
  45 #define FLAC_MIN_HEADERS 10
  46 /** estimate for average size of a FLAC frame                                 */
  47 #define FLAC_AVG_FRAME_SIZE 8192
  48
  49 /** scoring settings for score_header */
  50 #define FLAC_HEADER_BASE_SCORE        10
  51 #define FLAC_HEADER_CHANGED_PENALTY   7
  52 #define FLAC_HEADER_CRC_FAIL_PENALTY  50
  53 #define FLAC_HEADER_NOT_PENALIZED_YET 100000
  54 #define FLAC_HEADER_NOT_SCORED_YET    -100000
  55
  56 /** largest possible size of flac header */
  57 #define MAX_FRAME_HEADER_SIZE 16
  58
  59 typedef struct FLACHeaderMarker {
  60     int offset;       /**< byte offset from start of FLACParseContext->buffer */
  61     int link_penalty[FLAC_MAX_SEQUENTIAL_HEADERS]; /**< array of local scores
  62                            between this header and the one at a distance equal
  63                            array position                                     */
  64     int max_score;    /**< maximum score found after checking each child that
  65                            has a valid CRC                                    */
  66     FLACFrameInfo fi; /**< decoded frame header info                          */
  67     struct FLACHeaderMarker *next;       /**< next CRC-8 verified header that
  68                                               immediately follows this one in
  69                                               the bytestream                  */
  70     struct FLACHeaderMarker *best_child; /**< following frame header with
  71                                               which this frame has the best
  72                                               score with                      */
  73 } FLACHeaderMarker;
  74
  75 typedef struct FLACParseContext {
  76     AVCodecParserContext *pc;      /**< parent context                        */
  77     AVCodecContext *avctx;         /**< codec context pointer for logging     */
  78     FLACHeaderMarker *headers;     /**< linked-list that starts at the first
  79                                         CRC-8 verified header within buffer   */
  80     FLACHeaderMarker *best_header; /**< highest scoring header within buffer  */
  81     int nb_headers_found;          /**< number of headers found in the last
  82                                         flac_parse() call                     */
  83     int nb_headers_buffered;       /**< number of headers that are buffered   */
  84     int best_header_valid;         /**< flag set when the parser returns junk;
  85                                         if set return best_header next time   */
  86     AVFifoBuffer *fifo_buf;        /**< buffer to store all data until headers
  87                                         can be verified                       */
  88     int end_padded;                /**< specifies if fifo_buf's end is padded */
  89     uint8_t *wrap_buf;             /**< general fifo read buffer when wrapped */
  90     int wrap_buf_allocated_size;   /**< actual allocated size of the buffer   */
  91     FLACFrameInfo last_fi;         /**< last decoded frame header info        */
  92     int last_fi_valid;             /**< set if last_fi is valid               */
  93 } FLACParseContext;
  94
  95 static int frame_header_is_valid(AVCodecContext *avctx, const uint8_t *buf,
  96                                  FLACFrameInfo *fi)
  97 {
  98     GetBitContext gb;
  99     init_get_bits(&gb, buf, MAX_FRAME_HEADER_SIZE * 8);
 100     return !ff_flac_decode_frame_header(avctx, &gb, fi, 127);
 101 }
 102
 103 /**
 104  * Non-destructive fast fifo pointer fetching
 105  * Returns a pointer from the specified offset.
 106  * If possible the pointer points within the fifo buffer.
 107  * Otherwise (if it would cause a wrap around,) a pointer to a user-specified
 108  * buffer is used.
 109  * The pointer can be NULL.  In any case it will be reallocated to hold the size.
 110  * If the returned pointer will be used after subsequent calls to flac_fifo_read_wrap
 111  * then the subsequent calls should pass in a different wrap_buf so as to not
 112  * overwrite the contents of the previous wrap_buf.
 113  * This function is based on av_fifo_generic_read, which is why there is a comment
 114  * about a memory barrier for SMP.
 115  */
 116 static uint8_t *flac_fifo_read_wrap(FLACParseContext *fpc, int offset, int len,
 117                                     uint8_t **wrap_buf, int *allocated_size)
 118 {
 119     AVFifoBuffer *f   = fpc->fifo_buf;
 120     uint8_t *start    = f->rptr + offset;
 121     uint8_t *tmp_buf;
 122
 123     if (start >= f->end)
 124         start -= f->end - f->buffer;
 125     if (f->end - start >= len)
 126         return start;
 127
 128     tmp_buf = av_fast_realloc(*wrap_buf, allocated_size, len);
 129
 130     if (!tmp_buf) {
 131         av_log(fpc->avctx, AV_LOG_ERROR,
 132                "couldn't reallocate wrap buffer of size %d", len);
 133         return NULL;
 134     }
 135     *wrap_buf = tmp_buf;
 136     do {
 137         int seg_len = FFMIN(f->end - start, len);
 138         memcpy(tmp_buf, start, seg_len);
 139         tmp_buf = (uint8_t*)tmp_buf + seg_len;
 140 // memory barrier needed for SMP here in theory
 141
 142         start += seg_len - (f->end - f->buffer);
 143         len -= seg_len;
 144     } while (len > 0);
 145
 146     return *wrap_buf;
 147 }
 148
 149 /**
 150  * Return a pointer in the fifo buffer where the offset starts at until
 151  * the wrap point or end of request.
 152  * len will contain the valid length of the returned buffer.
 153  * A second call to flac_fifo_read (with new offset and len) should be called
 154  * to get the post-wrap buf if the returned len is less than the requested.
 155  **/
 156 static uint8_t *flac_fifo_read(FLACParseContext *fpc, int offset, int *len)
 157 {
 158     AVFifoBuffer *f   = fpc->fifo_buf;
 159     uint8_t *start    = f->rptr + offset;
 160
 161     if (start >= f->end)
 162         start -= f->end - f->buffer;
 163     *len = FFMIN(*len, f->end - start);
 164     return start;
 165 }
 166
 167 static int find_headers_search_validate(FLACParseContext *fpc, int offset)
 168 {
 169     FLACFrameInfo fi;
 170     uint8_t *header_buf;
 171     int size = 0;
 172     header_buf = flac_fifo_read_wrap(fpc, offset,
 173                                      MAX_FRAME_HEADER_SIZE,
 174                                      &fpc->wrap_buf,
 175                                      &fpc->wrap_buf_allocated_size);
 176     if (frame_header_is_valid(fpc->avctx, header_buf, &fi)) {
 177         FLACHeaderMarker **end_handle = &fpc->headers;
 178         int i;
 179
 180         size = 0;
 181         while (*end_handle) {
 182             end_handle = &(*end_handle)->next;
 183             size++;
 184         }
 185
 186         *end_handle = av_mallocz(sizeof(**end_handle));
 187         if (!*end_handle) {
 188             av_log(fpc->avctx, AV_LOG_ERROR,
 189                    "couldn't allocate FLACHeaderMarker\n");
 190             return AVERROR(ENOMEM);
 191         }
 192         (*end_handle)->fi     = fi;
 193         (*end_handle)->offset = offset;
 194
 195         for (i = 0; i < FLAC_MAX_SEQUENTIAL_HEADERS; i++)
 196             (*end_handle)->link_penalty[i] = FLAC_HEADER_NOT_PENALIZED_YET;
 197
 198         fpc->nb_headers_found++;
 199         size++;
 200     }
 201     return size;
 202 }
 203
 204 static int find_headers_search(FLACParseContext *fpc, uint8_t *buf,
 205                                int buf_size, int search_start)
 206 {
 207     int size = 0, mod_offset = (buf_size - 1) % 4, i, j;
 208     uint32_t x;
 209
 210     for (i = 0; i < mod_offset; i++) {
 211         if ((AV_RB16(buf + i) & 0xFFFE) == 0xFFF8) {
 212             int ret = find_headers_search_validate(fpc, search_start + i);
 213             size = FFMAX(size, ret);
 214         }
 215     }
 216
 217     for (; i < buf_size - 1; i += 4) {
 218         x = AV_RN32(buf + i);
 219         if (((x & ~(x + 0x01010101)) & 0x80808080)) {
 220             for (j = 0; j < 4; j++) {
 221                 if ((AV_RB16(buf + i + j) & 0xFFFE) == 0xFFF8) {
 222                     int ret = find_headers_search_validate(fpc, search_start + i + j);
 223                     size = FFMAX(size, ret);
 224                 }
 225             }
 226         }
 227     }
 228     return size;
 229 }
 230
 231 static int find_new_headers(FLACParseContext *fpc, int search_start)
 232 {
 233     FLACHeaderMarker *end;
 234     int search_end, size = 0, read_len, temp;
 235     uint8_t *buf;
 236     fpc->nb_headers_found = 0;
 237
 238     /* Search for a new header of at most 16 bytes. */
 239     search_end = av_fifo_size(fpc->fifo_buf) - (MAX_FRAME_HEADER_SIZE - 1);
 240     read_len   = search_end - search_start + 1;
 241     buf        = flac_fifo_read(fpc, search_start, &read_len);
 242     size       = find_headers_search(fpc, buf, read_len, search_start);
 243     search_start += read_len - 1;
 244
 245     /* If fifo end was hit do the wrap around. */
 246     if (search_start != search_end) {
 247         uint8_t wrap[2];
 248
 249         wrap[0]  = buf[read_len - 1];
 250         /* search_start + 1 is the post-wrap offset in the fifo. */
 251         read_len = search_end - (search_start + 1) + 1;
 252
 253         buf      = flac_fifo_read(fpc, search_start + 1, &read_len);
 254         wrap[1]  = buf[0];
 255
 256         if ((AV_RB16(wrap) & 0xFFFE) == 0xFFF8) {
 257             temp = find_headers_search_validate(fpc, search_start);
 258             size = FFMAX(size, temp);
 259         }
 260         search_start++;
 261
 262         /* Continue to do the last half of the wrap. */
 263         temp     = find_headers_search(fpc, buf, read_len, search_start);
 264         size     = FFMAX(size, temp);
 265         search_start += read_len - 1;
 266     }
 267
 268     /* Return the size even if no new headers were found. */
 269     if (!size && fpc->headers)
 270         for (end = fpc->headers; end; end = end->next)
 271             size++;
 272     return size;
 273 }
 274
 275 static int check_header_fi_mismatch(FLACParseContext  *fpc,
 276                                     FLACFrameInfo     *header_fi,
 277                                     FLACFrameInfo     *child_fi,
 278                                     int                log_level_offset)
 279 {
 280     int deduction = 0;
 281     if (child_fi->samplerate != header_fi->samplerate) {
 282         deduction += FLAC_HEADER_CHANGED_PENALTY;
 283         av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 284                "sample rate change detected in adjacent frames\n");
 285     }
 286     if (child_fi->bps != header_fi->bps) {
 287         deduction += FLAC_HEADER_CHANGED_PENALTY;
 288         av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 289                "bits per sample change detected in adjacent frames\n");
 290     }
 291     if (child_fi->is_var_size != header_fi->is_var_size) {
 292         /* Changing blocking strategy not allowed per the spec */
 293         deduction += FLAC_HEADER_BASE_SCORE;
 294         av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 295                "blocking strategy change detected in adjacent frames\n");
 296     }
 297     if (child_fi->channels != header_fi->channels) {
 298         deduction += FLAC_HEADER_CHANGED_PENALTY;
 299         av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 300                "number of channels change detected in adjacent frames\n");
 301     }
 302     return deduction;
 303 }
 304
 305 static int check_header_mismatch(FLACParseContext  *fpc,
 306                                  FLACHeaderMarker  *header,
 307                                  FLACHeaderMarker  *child,
 308                                  int                log_level_offset)
 309 {
 310     FLACFrameInfo  *header_fi = &header->fi, *child_fi = &child->fi;
 311     int deduction, deduction_expected = 0, i;
 312     deduction = check_header_fi_mismatch(fpc, header_fi, child_fi,
 313                                          log_level_offset);
 314     /* Check sample and frame numbers. */
 315     if ((child_fi->frame_or_sample_num - header_fi->frame_or_sample_num
 316          != header_fi->blocksize) &&
 317         (child_fi->frame_or_sample_num
 318          != header_fi->frame_or_sample_num + 1)) {
 319         FLACHeaderMarker *curr;
 320         int64_t expected_frame_num, expected_sample_num;
 321         /* If there are frames in the middle we expect this deduction,
 322            as they are probably valid and this one follows it */
 323
 324         expected_frame_num = expected_sample_num = header_fi->frame_or_sample_num;
 325         curr = header;
 326         while (curr != child) {
 327             /* Ignore frames that failed all crc checks */
 328             for (i = 0; i < FLAC_MAX_SEQUENTIAL_HEADERS; i++) {
 329                 if (curr->link_penalty[i] < FLAC_HEADER_CRC_FAIL_PENALTY) {
 330                     expected_frame_num++;
 331                     expected_sample_num += curr->fi.blocksize;
 332                     break;
 333                 }
 334             }
 335             curr = curr->next;
 336         }
 337
 338         if (expected_frame_num  == child_fi->frame_or_sample_num ||
 339             expected_sample_num == child_fi->frame_or_sample_num)
 340             deduction_expected = deduction ? 0 : 1;
 341
 342         deduction += FLAC_HEADER_CHANGED_PENALTY;
 343         av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 344                    "sample/frame number mismatch in adjacent frames\n");
 345     }
 346
 347     /* If we have suspicious headers, check the CRC between them */
 348     if (deduction && !deduction_expected) {
 349         FLACHeaderMarker *curr;
 350         int read_len;
 351         uint8_t *buf;
 352         uint32_t crc = 1;
 353         int inverted_test = 0;
 354
 355         /* Since CRC is expensive only do it if we haven't yet.
 356            This assumes a CRC penalty is greater than all other check penalties */
 357         curr = header->next;
 358         for (i = 0; i < FLAC_MAX_SEQUENTIAL_HEADERS && curr != child; i++)
 359             curr = curr->next;
 360
 361         if (header->link_penalty[i] < FLAC_HEADER_CRC_FAIL_PENALTY ||
 362             header->link_penalty[i] == FLAC_HEADER_NOT_PENALIZED_YET) {
 363             FLACHeaderMarker *start, *end;
 364
 365             /* Although overlapping chains are scored, the crc should never
 366                have to be computed twice for a single byte. */
 367             start = header;
 368             end   = child;
 369             if (i > 0 &&
 370                 header->link_penalty[i - 1] >= FLAC_HEADER_CRC_FAIL_PENALTY) {
 371                 while (start->next != child)
 372                     start = start->next;
 373                 inverted_test = 1;
 374             } else if (i > 0 &&
 375                        header->next->link_penalty[i-1] >=
 376                        FLAC_HEADER_CRC_FAIL_PENALTY ) {
 377                 end = header->next;
 378                 inverted_test = 1;
 379             }
 380
 381             read_len = end->offset - start->offset;
 382             buf      = flac_fifo_read(fpc, start->offset, &read_len);
 383             crc      = av_crc(av_crc_get_table(AV_CRC_16_ANSI), 0, buf, read_len);
 384             read_len = (end->offset - start->offset) - read_len;
 385
 386             if (read_len) {
 387                 buf = flac_fifo_read(fpc, end->offset - read_len, &read_len);
 388                 crc = av_crc(av_crc_get_table(AV_CRC_16_ANSI), crc, buf, read_len);
 389             }
 390         }
 391
 392         if (!crc ^ !inverted_test) {
 393             deduction += FLAC_HEADER_CRC_FAIL_PENALTY;
 394             av_log(fpc->avctx, AV_LOG_WARNING + log_level_offset,
 395                    "crc check failed from offset %i (frame %"PRId64") to %i (frame %"PRId64")\n",
 396                    header->offset, header_fi->frame_or_sample_num,
 397                    child->offset, child_fi->frame_or_sample_num);
 398         }
 399     }
 400     return deduction;
 401 }
 402
 403 /**
 404  * Score a header.
 405  *
 406  * Give FLAC_HEADER_BASE_SCORE points to a frame for existing.
 407  * If it has children, (subsequent frames of which the preceding CRC footer
 408  * validates against this one,) then take the maximum score of the children,
 409  * with a penalty of FLAC_HEADER_CHANGED_PENALTY applied for each change to
 410  * bps, sample rate, channels, but not decorrelation mode, or blocksize,
 411  * because it can change often.
 412  **/
 413 static int score_header(FLACParseContext *fpc, FLACHeaderMarker *header)
 414 {
 415     FLACHeaderMarker *child;
 416     int dist = 0;
 417     int child_score;
 418     int base_score = FLAC_HEADER_BASE_SCORE;
 419     if (header->max_score != FLAC_HEADER_NOT_SCORED_YET)
 420         return header->max_score;
 421
 422     /* Modify the base score with changes from the last output header */
 423     if (fpc->last_fi_valid) {
 424         /* Silence the log since this will be repeated if selected */
 425         base_score -= check_header_fi_mismatch(fpc, &fpc->last_fi, &header->fi,
 426                                                AV_LOG_DEBUG);
 427     }
 428
 429     header->max_score = base_score;
 430
 431     /* Check and compute the children's scores. */
 432     child = header->next;
 433     for (dist = 0; dist < FLAC_MAX_SEQUENTIAL_HEADERS && child; dist++) {
 434         /* Look at the child's frame header info and penalize suspicious
 435            changes between the headers. */
 436         if (header->link_penalty[dist] == FLAC_HEADER_NOT_PENALIZED_YET) {
 437             header->link_penalty[dist] = check_header_mismatch(fpc, header,
 438                                                                child, AV_LOG_DEBUG);
 439         }
 440         child_score = score_header(fpc, child) - header->link_penalty[dist];
 441
 442         if (FLAC_HEADER_BASE_SCORE + child_score > header->max_score) {
 443             /* Keep the child because the frame scoring is dynamic. */
 444             header->best_child = child;
 445             header->max_score  = base_score + child_score;
 446         }
 447         child = child->next;
 448     }
 449
 450     return header->max_score;
 451 }
 452
 453 static void score_sequences(FLACParseContext *fpc)
 454 {
 455     FLACHeaderMarker *curr;
 456     int best_score = 0;//FLAC_HEADER_NOT_SCORED_YET;
 457     /* First pass to clear all old scores. */
 458     for (curr = fpc->headers; curr; curr = curr->next)
 459         curr->max_score = FLAC_HEADER_NOT_SCORED_YET;
 460
 461     /* Do a second pass to score them all. */
 462     for (curr = fpc->headers; curr; curr = curr->next) {
 463         if (score_header(fpc, curr) > best_score) {
 464             fpc->best_header = curr;
 465             best_score       = curr->max_score;
 466         }
 467     }
 468 }
 469
 470 static int get_best_header(FLACParseContext *fpc, const uint8_t **poutbuf,
 471                            int *poutbuf_size)
 472 {
 473     FLACHeaderMarker *header = fpc->best_header;
 474     FLACHeaderMarker *child  = header->best_child;
 475     if (!child) {
 476         *poutbuf_size = av_fifo_size(fpc->fifo_buf) - header->offset;
 477     } else {
 478         *poutbuf_size = child->offset - header->offset;
 479
 480         /* If the child has suspicious changes, log them */
 481         check_header_mismatch(fpc, header, child, 0);
 482     }
 483
 484     if (header->fi.channels != fpc->avctx->channels ||
 485         !fpc->avctx->channel_layout) {
 486         fpc->avctx->channels = header->fi.channels;
 487         ff_flac_set_channel_layout(fpc->avctx);
 488     }
 489     fpc->avctx->sample_rate = header->fi.samplerate;
 490     fpc->pc->duration       = header->fi.blocksize;
 491     *poutbuf = flac_fifo_read_wrap(fpc, header->offset, *poutbuf_size,
 492                                         &fpc->wrap_buf,
 493                                         &fpc->wrap_buf_allocated_size);
 494
 495
 496     if (fpc->pc->flags & PARSER_FLAG_USE_CODEC_TS) {
 497         if (header->fi.is_var_size)
 498           fpc->pc->pts = header->fi.frame_or_sample_num;
 499         else if (header->best_child)
 500           fpc->pc->pts = header->fi.frame_or_sample_num * header->fi.blocksize;
 501     }
 502
 503     fpc->best_header_valid = 0;
 504     fpc->last_fi_valid = 1;
 505     fpc->last_fi = header->fi;
 506
 507     /* Return the negative overread index so the client can compute pos.
 508        This should be the amount overread to the beginning of the child */
 509     if (child)
 510         return child->offset - av_fifo_size(fpc->fifo_buf);
 511     return 0;
 512 }
 513
 514 static int flac_parse(AVCodecParserContext *s, AVCodecContext *avctx,
 515                       const uint8_t **poutbuf, int *poutbuf_size,
 516                       const uint8_t *buf, int buf_size)
 517 {
 518     FLACParseContext *fpc = s->priv_data;
 519     FLACHeaderMarker *curr;
 520     int nb_headers;
 521     const uint8_t *read_end   = buf;
 522     const uint8_t *read_start = buf;
 523
 524     if (s->flags & PARSER_FLAG_COMPLETE_FRAMES) {
 525         FLACFrameInfo fi;
 526         if (frame_header_is_valid(avctx, buf, &fi)) {
 527             s->duration = fi.blocksize;
 528             if (!avctx->sample_rate)
 529                 avctx->sample_rate = fi.samplerate;
 530             if (fpc->pc->flags & PARSER_FLAG_USE_CODEC_TS) {
 531                 fpc->pc->pts = fi.frame_or_sample_num;
 532                 if (!fi.is_var_size)
 533                   fpc->pc->pts *= fi.blocksize;
 534             }
 535         }
 536         *poutbuf      = buf;
 537         *poutbuf_size = buf_size;
 538         return buf_size;
 539     }
 540
 541     fpc->avctx = avctx;
 542     if (fpc->best_header_valid)
 543         return get_best_header(fpc, poutbuf, poutbuf_size);
 544
 545     /* If a best_header was found last call remove it with the buffer data. */
 546     if (fpc->best_header && fpc->best_header->best_child) {
 547         FLACHeaderMarker *temp;
 548         FLACHeaderMarker *best_child = fpc->best_header->best_child;
 549
 550         /* Remove headers in list until the end of the best_header. */
 551         for (curr = fpc->headers; curr != best_child; curr = temp) {
 552             if (curr != fpc->best_header) {
 553                 av_log(avctx, AV_LOG_DEBUG,
 554                        "dropping low score %i frame header from offset %i to %i\n",
 555                        curr->max_score, curr->offset, curr->next->offset);
 556             }
 557             temp = curr->next;
 558             av_free(curr);
 559             fpc->nb_headers_buffered--;
 560         }
 561         /* Release returned data from ring buffer. */
 562         av_fifo_drain(fpc->fifo_buf, best_child->offset);
 563
 564         /* Fix the offset for the headers remaining to match the new buffer. */
 565         for (curr = best_child->next; curr; curr = curr->next)
 566             curr->offset -= best_child->offset;
 567
 568         best_child->offset = 0;
 569         fpc->headers       = best_child;
 570         if (fpc->nb_headers_buffered >= FLAC_MIN_HEADERS) {
 571             fpc->best_header = best_child;
 572             return get_best_header(fpc, poutbuf, poutbuf_size);
 573         }
 574         fpc->best_header   = NULL;
 575     } else if (fpc->best_header) {
 576         /* No end frame no need to delete the buffer; probably eof */
 577         FLACHeaderMarker *temp;
 578
 579         for (curr = fpc->headers; curr != fpc->best_header; curr = temp) {
 580             temp = curr->next;
 581             av_free(curr);
 582             fpc->nb_headers_buffered--;
 583         }
 584         fpc->headers = fpc->best_header->next;
 585         av_freep(&fpc->best_header);
 586         fpc->nb_headers_buffered--;
 587     }
 588
 589     /* Find and score new headers.                                     */
 590     /* buf_size is zero when flushing, so check for this since we do   */
 591     /* not want to try to read more input once we have found the end.  */
 592     /* Also note that buf can't be NULL.                               */
 593     while ((buf_size && read_end < buf + buf_size &&
 594             fpc->nb_headers_buffered < FLAC_MIN_HEADERS)
 595            || (!buf_size && !fpc->end_padded)) {
 596         int start_offset;
 597
 598         /* Pad the end once if EOF, to check the final region for headers. */
 599         if (!buf_size) {
 600             fpc->end_padded = 1;
 601             read_end = read_start + MAX_FRAME_HEADER_SIZE;
 602         } else {
 603             /* The maximum read size is the upper-bound of what the parser
 604                needs to have the required number of frames buffered */
 605             int nb_desired = FLAC_MIN_HEADERS - fpc->nb_headers_buffered + 1;
 606             read_end       = read_end + FFMIN(buf + buf_size - read_end,
 607                                               nb_desired * FLAC_AVG_FRAME_SIZE);
 608         }
 609
 610         if (!av_fifo_space(fpc->fifo_buf) &&
 611             av_fifo_size(fpc->fifo_buf) / FLAC_AVG_FRAME_SIZE >
 612             fpc->nb_headers_buffered * 20) {
 613             /* There is less than one valid flac header buffered for 20 headers
 614              * buffered. Therefore the fifo is most likely filled with invalid
 615              * data and the input is not a flac file. */
 616             goto handle_error;
 617         }
 618
 619         /* Fill the buffer. */
 620         if (   av_fifo_space(fpc->fifo_buf) < read_end - read_start
 621             && av_fifo_realloc2(fpc->fifo_buf, (read_end - read_start) + 2*av_fifo_size(fpc->fifo_buf)) < 0) {
 622             av_log(avctx, AV_LOG_ERROR,
 623                    "couldn't reallocate buffer of size %"PTRDIFF_SPECIFIER"\n",
 624                    (read_end - read_start) + av_fifo_size(fpc->fifo_buf));
 625             goto handle_error;
 626         }
 627
 628         if (buf_size) {
 629             av_fifo_generic_write(fpc->fifo_buf, (void*) read_start,
 630                                   read_end - read_start, NULL);
 631         } else {
 632             int8_t pad[MAX_FRAME_HEADER_SIZE] = { 0 };
 633             av_fifo_generic_write(fpc->fifo_buf, pad, sizeof(pad), NULL);
 634         }
 635
 636         /* Tag headers and update sequences. */
 637         start_offset = av_fifo_size(fpc->fifo_buf) -
 638                        ((read_end - read_start) + (MAX_FRAME_HEADER_SIZE - 1));
 639         start_offset = FFMAX(0, start_offset);
 640         nb_headers   = find_new_headers(fpc, start_offset);
 641
 642         if (nb_headers < 0) {
 643             av_log(avctx, AV_LOG_ERROR,
 644                    "find_new_headers couldn't allocate FLAC header\n");
 645             goto handle_error;
 646         }
 647
 648         fpc->nb_headers_buffered = nb_headers;
 649         /* Wait till FLAC_MIN_HEADERS to output a valid frame. */
 650         if (!fpc->end_padded && fpc->nb_headers_buffered < FLAC_MIN_HEADERS) {
 651             if (read_end < buf + buf_size) {
 652                 read_start = read_end;
 653                 continue;
 654             } else {
 655                 goto handle_error;
 656             }
 657         }
 658
 659         /* If headers found, update the scores since we have longer chains. */
 660         if (fpc->end_padded || fpc->nb_headers_found)
 661             score_sequences(fpc);
 662
 663         /* restore the state pre-padding */
 664         if (fpc->end_padded) {
 665             int warp = fpc->fifo_buf->wptr - fpc->fifo_buf->buffer < MAX_FRAME_HEADER_SIZE;
 666             /* HACK: drain the tail of the fifo */
 667             fpc->fifo_buf->wptr -= MAX_FRAME_HEADER_SIZE;
 668             fpc->fifo_buf->wndx -= MAX_FRAME_HEADER_SIZE;
 669             if (warp) {
 670                 fpc->fifo_buf->wptr += fpc->fifo_buf->end -
 671                     fpc->fifo_buf->buffer;
 672             }
 673             read_start = read_end = NULL;
 674         }
 675     }
 676
 677     for (curr = fpc->headers; curr; curr = curr->next) {
 678         if (!fpc->best_header || curr->max_score > fpc->best_header->max_score) {
 679             fpc->best_header = curr;
 680         }
 681     }
 682
 683     if (fpc->best_header && fpc->best_header->max_score <= 0) {
 684         // Only accept a bad header if there is no other option to continue
 685         if (!buf_size || read_end != buf || fpc->nb_headers_buffered < FLAC_MIN_HEADERS)
 686             fpc->best_header = NULL;
 687     }
 688
 689     if (fpc->best_header) {
 690         fpc->best_header_valid = 1;
 691         if (fpc->best_header->offset > 0) {
 692             /* Output a junk frame. */
 693             av_log(avctx, AV_LOG_DEBUG, "Junk frame till offset %i\n",
 694                    fpc->best_header->offset);
 695
 696             /* Set duration to 0. It is unknown or invalid in a junk frame. */
 697             s->duration   = 0;
 698             *poutbuf_size = fpc->best_header->offset;
 699             *poutbuf      = flac_fifo_read_wrap(fpc, 0, *poutbuf_size,
 700                                                 &fpc->wrap_buf,
 701                                                 &fpc->wrap_buf_allocated_size);
 702             return buf_size ? (read_end - buf) : (fpc->best_header->offset -
 703                                                   av_fifo_size(fpc->fifo_buf));
 704         }
 705         if (!buf_size)
 706             return get_best_header(fpc, poutbuf, poutbuf_size);
 707     }
 708
 709 handle_error:
 710     *poutbuf      = NULL;
 711     *poutbuf_size = 0;
 712     return buf_size ? read_end - buf : 0;
 713 }
 714
 715 static av_cold int flac_parse_init(AVCodecParserContext *c)
 716 {
 717     FLACParseContext *fpc = c->priv_data;
 718     fpc->pc = c;
 719     /* There will generally be FLAC_MIN_HEADERS buffered in the fifo before
 720        it drains.  This is allocated early to avoid slow reallocation. */
 721     fpc->fifo_buf = av_fifo_alloc_array(FLAC_MIN_HEADERS + 3, FLAC_AVG_FRAME_SIZE);
 722     if (!fpc->fifo_buf) {
 723         av_log(fpc->avctx, AV_LOG_ERROR,
 724                 "couldn't allocate fifo_buf\n");
 725         return AVERROR(ENOMEM);
 726     }
 727     return 0;
 728 }
 729
 730 static void flac_parse_close(AVCodecParserContext *c)
 731 {
 732     FLACParseContext *fpc = c->priv_data;
 733     FLACHeaderMarker *curr = fpc->headers, *temp;
 734
 735     while (curr) {
 736         temp = curr->next;
 737         av_free(curr);
 738         curr = temp;
 739     }
 740     fpc->headers = NULL;
 741     av_fifo_freep(&fpc->fifo_buf);
 742     av_freep(&fpc->wrap_buf);
 743 }
 744
 745 const AVCodecParser ff_flac_parser = {
 746     .codec_ids      = { AV_CODEC_ID_FLAC },
 747     .priv_data_size = sizeof(FLACParseContext),
 748     .parser_init    = flac_parse_init,
 749     .parser_parse   = flac_parse,
 750     .parser_close   = flac_parse_close,
 751 };