libavformat/avidec.c

   1 /*
   2  * AVI demuxer
   3  * Copyright (c) 2001 Fabrice Bellard
   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 //#define DEBUG
  23 //#define DEBUG_SEEK
  24
  25 #include <strings.h>
  26 #include "libavutil/intreadwrite.h"
  27 #include "libavutil/bswap.h"
  28 #include "avformat.h"
  29 #include "avi.h"
  30 #include "dv.h"
  31 #include "riff.h"
  32
  33 #undef NDEBUG
  34 #include <assert.h>
  35
  36 typedef struct AVIStream {
  37     int64_t frame_offset; /* current frame (video) or byte (audio) counter
  38                          (used to compute the pts) */
  39     int remaining;
  40     int packet_size;
  41
  42     int scale;
  43     int rate;
  44     int sample_size; /* size of one sample (or packet) (in the rate/scale sense) in bytes */
  45
  46     int64_t cum_len; /* temporary storage (used during seek) */
  47
  48     int prefix;                       ///< normally 'd'<<8 + 'c' or 'w'<<8 + 'b'
  49     int prefix_count;
  50     uint32_t pal[256];
  51     int has_pal;
  52     int dshow_block_align;            ///< block align variable used to emulate bugs in the MS dshow demuxer
  53
  54     AVFormatContext *sub_ctx;
  55     AVPacket sub_pkt;
  56     uint8_t *sub_buffer;
  57 } AVIStream;
  58
  59 typedef struct {
  60     int64_t  riff_end;
  61     int64_t  movi_end;
  62     int64_t  fsize;
  63     int64_t movi_list;
  64     int64_t last_pkt_pos;
  65     int index_loaded;
  66     int is_odml;
  67     int non_interleaved;
  68     int stream_index;
  69     DVDemuxContext* dv_demux;
  70     int odml_depth;
  71 #define MAX_ODML_DEPTH 1000
  72 } AVIContext;
  73
  74 static const char avi_headers[][8] = {
  75     { 'R', 'I', 'F', 'F',    'A', 'V', 'I', ' ' },
  76     { 'R', 'I', 'F', 'F',    'A', 'V', 'I', 'X' },
  77     { 'R', 'I', 'F', 'F',    'A', 'V', 'I', 0x19},
  78     { 'O', 'N', '2', ' ',    'O', 'N', '2', 'f' },
  79     { 'R', 'I', 'F', 'F',    'A', 'M', 'V', ' ' },
  80     { 0 }
  81 };
  82
  83 static int avi_load_index(AVFormatContext *s);
  84 static int guess_ni_flag(AVFormatContext *s);
  85
  86 #define print_tag(str, tag, size)                       \
  87     av_dlog(NULL, "%s: tag=%c%c%c%c size=0x%x\n",       \
  88            str, tag & 0xff,                             \
  89            (tag >> 8) & 0xff,                           \
  90            (tag >> 16) & 0xff,                          \
  91            (tag >> 24) & 0xff,                          \
  92            size)
  93
  94 static inline int get_duration(AVIStream *ast, int len){
  95     if(ast->sample_size){
  96         return len;
  97     }else if (ast->dshow_block_align){
  98         return (len + ast->dshow_block_align - 1)/ast->dshow_block_align;
  99     }else
 100         return 1;
 101 }
 102
 103 static int get_riff(AVFormatContext *s, AVIOContext *pb)
 104 {
 105     AVIContext *avi = s->priv_data;
 106     char header[8];
 107     int i;
 108
 109     /* check RIFF header */
 110     avio_read(pb, header, 4);
 111     avi->riff_end = avio_rl32(pb);  /* RIFF chunk size */
 112     avi->riff_end += avio_tell(pb); /* RIFF chunk end */
 113     avio_read(pb, header+4, 4);
 114
 115     for(i=0; avi_headers[i][0]; i++)
 116         if(!memcmp(header, avi_headers[i], 8))
 117             break;
 118     if(!avi_headers[i][0])
 119         return -1;
 120
 121     if(header[7] == 0x19)
 122         av_log(s, AV_LOG_INFO, "This file has been generated by a totally broken muxer.\n");
 123
 124     return 0;
 125 }
 126
 127 static int read_braindead_odml_indx(AVFormatContext *s, int frame_num){
 128     AVIContext *avi = s->priv_data;
 129     AVIOContext *pb = s->pb;
 130     int longs_pre_entry= avio_rl16(pb);
 131     int index_sub_type = avio_r8(pb);
 132     int index_type     = avio_r8(pb);
 133     int entries_in_use = avio_rl32(pb);
 134     int chunk_id       = avio_rl32(pb);
 135     int64_t base       = avio_rl64(pb);
 136     int stream_id= 10*((chunk_id&0xFF) - '0') + (((chunk_id>>8)&0xFF) - '0');
 137     AVStream *st;
 138     AVIStream *ast;
 139     int i;
 140     int64_t last_pos= -1;
 141     int64_t filesize= avio_size(s->pb);
 142
 143 #ifdef DEBUG_SEEK
 144     av_log(s, AV_LOG_ERROR, "longs_pre_entry:%d index_type:%d entries_in_use:%d chunk_id:%X base:%16"PRIX64"\n",
 145         longs_pre_entry,index_type, entries_in_use, chunk_id, base);
 146 #endif
 147
 148     if(stream_id >= s->nb_streams || stream_id < 0)
 149         return -1;
 150     st= s->streams[stream_id];
 151     ast = st->priv_data;
 152
 153     if(index_sub_type)
 154         return -1;
 155
 156     avio_rl32(pb);
 157
 158     if(index_type && longs_pre_entry != 2)
 159         return -1;
 160     if(index_type>1)
 161         return -1;
 162
 163     if(filesize > 0 && base >= filesize){
 164         av_log(s, AV_LOG_ERROR, "ODML index invalid\n");
 165         if(base>>32 == (base & 0xFFFFFFFF) && (base & 0xFFFFFFFF) < filesize && filesize <= 0xFFFFFFFF)
 166             base &= 0xFFFFFFFF;
 167         else
 168             return -1;
 169     }
 170
 171     for(i=0; i<entries_in_use; i++){
 172         if(index_type){
 173             int64_t pos= avio_rl32(pb) + base - 8;
 174             int len    = avio_rl32(pb);
 175             int key= len >= 0;
 176             len &= 0x7FFFFFFF;
 177
 178 #ifdef DEBUG_SEEK
 179             av_log(s, AV_LOG_ERROR, "pos:%"PRId64", len:%X\n", pos, len);
 180 #endif
 181             if(url_feof(pb))
 182                 return -1;
 183
 184             if(last_pos == pos || pos == base - 8)
 185                 avi->non_interleaved= 1;
 186             if(last_pos != pos && (len || !ast->sample_size))
 187                 av_add_index_entry(st, pos, ast->cum_len, len, 0, key ? AVINDEX_KEYFRAME : 0);
 188
 189             ast->cum_len += get_duration(ast, len);
 190             last_pos= pos;
 191         }else{
 192             int64_t offset, pos;
 193             int duration;
 194             offset = avio_rl64(pb);
 195             avio_rl32(pb);       /* size */
 196             duration = avio_rl32(pb);
 197
 198             if(url_feof(pb))
 199                 return -1;
 200
 201             pos = avio_tell(pb);
 202
 203             if(avi->odml_depth > MAX_ODML_DEPTH){
 204                 av_log(s, AV_LOG_ERROR, "Too deeply nested ODML indexes\n");
 205                 return -1;
 206             }
 207
 208             avio_seek(pb, offset+8, SEEK_SET);
 209             avi->odml_depth++;
 210             read_braindead_odml_indx(s, frame_num);
 211             avi->odml_depth--;
 212             frame_num += duration;
 213
 214             avio_seek(pb, pos, SEEK_SET);
 215         }
 216     }
 217     avi->index_loaded=1;
 218     return 0;
 219 }
 220
 221 static void clean_index(AVFormatContext *s){
 222     int i;
 223     int64_t j;
 224
 225     for(i=0; i<s->nb_streams; i++){
 226         AVStream *st = s->streams[i];
 227         AVIStream *ast = st->priv_data;
 228         int n= st->nb_index_entries;
 229         int max= ast->sample_size;
 230         int64_t pos, size, ts;
 231
 232         if(n != 1 || ast->sample_size==0)
 233             continue;
 234
 235         while(max < 1024) max+=max;
 236
 237         pos= st->index_entries[0].pos;
 238         size= st->index_entries[0].size;
 239         ts= st->index_entries[0].timestamp;
 240
 241         for(j=0; j<size; j+=max){
 242             av_add_index_entry(st, pos+j, ts+j, FFMIN(max, size-j), 0, AVINDEX_KEYFRAME);
 243         }
 244     }
 245 }
 246
 247 static int avi_read_tag(AVFormatContext *s, AVStream *st, uint32_t tag, uint32_t size)
 248 {
 249     AVIOContext *pb = s->pb;
 250     char key[5] = {0}, *value;
 251
 252     size += (size & 1);
 253
 254     if (size == UINT_MAX)
 255         return -1;
 256     value = av_malloc(size+1);
 257     if (!value)
 258         return -1;
 259     avio_read(pb, value, size);
 260     value[size]=0;
 261
 262     AV_WL32(key, tag);
 263
 264     return av_metadata_set2(st ? &st->metadata : &s->metadata, key, value,
 265                             AV_METADATA_DONT_STRDUP_VAL);
 266 }
 267
 268 static void avi_read_info(AVFormatContext *s, uint64_t end)
 269 {
 270     while (avio_tell(s->pb) < end) {
 271         uint32_t tag  = avio_rl32(s->pb);
 272         uint32_t size = avio_rl32(s->pb);
 273         avi_read_tag(s, NULL, tag, size);
 274     }
 275 }
 276
 277 static const char months[12][4] = { "Jan", "Feb", "Mar", "Apr", "May", "Jun",
 278                                     "Jul", "Aug", "Sep", "Oct", "Nov", "Dec" };
 279
 280 static void avi_metadata_creation_time(AVMetadata **metadata, char *date)
 281 {
 282     char month[4], time[9], buffer[64];
 283     int i, day, year;
 284     /* parse standard AVI date format (ie. "Mon Mar 10 15:04:43 2003") */
 285     if (sscanf(date, "%*3s%*[ ]%3s%*[ ]%2d%*[ ]%8s%*[ ]%4d",
 286                month, &day, time, &year) == 4) {
 287         for (i=0; i<12; i++)
 288             if (!strcasecmp(month, months[i])) {
 289                 snprintf(buffer, sizeof(buffer), "%.4d-%.2d-%.2d %s",
 290                          year, i+1, day, time);
 291                 av_metadata_set2(metadata, "creation_time", buffer, 0);
 292             }
 293     } else if (date[4] == '/' && date[7] == '/') {
 294         date[4] = date[7] = '-';
 295         av_metadata_set2(metadata, "creation_time", date, 0);
 296     }
 297 }
 298
 299 static void avi_read_nikon(AVFormatContext *s, uint64_t end)
 300 {
 301     while (avio_tell(s->pb) < end) {
 302         uint32_t tag  = avio_rl32(s->pb);
 303         uint32_t size = avio_rl32(s->pb);
 304         switch (tag) {
 305         case MKTAG('n', 'c', 't', 'g'): {  /* Nikon Tags */
 306             uint64_t tag_end = avio_tell(s->pb) + size;
 307             while (avio_tell(s->pb) < tag_end) {
 308                 uint16_t tag  = avio_rl16(s->pb);
 309                 uint16_t size = avio_rl16(s->pb);
 310                 const char *name = NULL;
 311                 char buffer[64] = {0};
 312                 size -= avio_read(s->pb, buffer,
 313                                    FFMIN(size, sizeof(buffer)-1));
 314                 switch (tag) {
 315                 case 0x03:  name = "maker";  break;
 316                 case 0x04:  name = "model";  break;
 317                 case 0x13:  name = "creation_time";
 318                     if (buffer[4] == ':' && buffer[7] == ':')
 319                         buffer[4] = buffer[7] = '-';
 320                     break;
 321                 }
 322                 if (name)
 323                     av_metadata_set2(&s->metadata, name, buffer, 0);
 324                 avio_seek(s->pb, size, SEEK_CUR);
 325             }
 326             break;
 327         }
 328         default:
 329             avio_seek(s->pb, size, SEEK_CUR);
 330             break;
 331         }
 332     }
 333 }
 334
 335 static int avi_read_header(AVFormatContext *s, AVFormatParameters *ap)
 336 {
 337     AVIContext *avi = s->priv_data;
 338     AVIOContext *pb = s->pb;
 339     unsigned int tag, tag1, handler;
 340     int codec_type, stream_index, frame_period, bit_rate;
 341     unsigned int size;
 342     int i;
 343     AVStream *st;
 344     AVIStream *ast = NULL;
 345     int avih_width=0, avih_height=0;
 346     int amv_file_format=0;
 347     uint64_t list_end = 0;
 348
 349     avi->stream_index= -1;
 350
 351     if (get_riff(s, pb) < 0)
 352         return -1;
 353
 354     avi->fsize = avio_size(pb);
 355     if(avi->fsize<=0)
 356         avi->fsize= avi->riff_end == 8 ? INT64_MAX : avi->riff_end;
 357
 358     /* first list tag */
 359     stream_index = -1;
 360     codec_type = -1;
 361     frame_period = 0;
 362     for(;;) {
 363         if (url_feof(pb))
 364             goto fail;
 365         tag = avio_rl32(pb);
 366         size = avio_rl32(pb);
 367
 368         print_tag("tag", tag, size);
 369
 370         switch(tag) {
 371         case MKTAG('L', 'I', 'S', 'T'):
 372             list_end = avio_tell(pb) + size;
 373             /* Ignored, except at start of video packets. */
 374             tag1 = avio_rl32(pb);
 375
 376             print_tag("list", tag1, 0);
 377
 378             if (tag1 == MKTAG('m', 'o', 'v', 'i')) {
 379                 avi->movi_list = avio_tell(pb) - 4;
 380                 if(size) avi->movi_end = avi->movi_list + size + (size & 1);
 381                 else     avi->movi_end = avio_size(pb);
 382                 av_dlog(NULL, "movi end=%"PRIx64"\n", avi->movi_end);
 383                 goto end_of_header;
 384             }
 385             else if (tag1 == MKTAG('I', 'N', 'F', 'O'))
 386                 avi_read_info(s, list_end);
 387             else if (tag1 == MKTAG('n', 'c', 'd', 't'))
 388                 avi_read_nikon(s, list_end);
 389
 390             break;
 391         case MKTAG('I', 'D', 'I', 'T'): {
 392             unsigned char date[64] = {0};
 393             size += (size & 1);
 394             size -= avio_read(pb, date, FFMIN(size, sizeof(date)-1));
 395             avio_seek(pb, size, SEEK_CUR);
 396             avi_metadata_creation_time(&s->metadata, date);
 397             break;
 398         }
 399         case MKTAG('d', 'm', 'l', 'h'):
 400             avi->is_odml = 1;
 401             avio_seek(pb, size + (size & 1), SEEK_CUR);
 402             break;
 403         case MKTAG('a', 'm', 'v', 'h'):
 404             amv_file_format=1;
 405         case MKTAG('a', 'v', 'i', 'h'):
 406             /* AVI header */
 407             /* using frame_period is bad idea */
 408             frame_period = avio_rl32(pb);
 409             bit_rate = avio_rl32(pb) * 8;
 410             avio_rl32(pb);
 411             avi->non_interleaved |= avio_rl32(pb) & AVIF_MUSTUSEINDEX;
 412
 413             avio_seek(pb, 2 * 4, SEEK_CUR);
 414             avio_rl32(pb);
 415             avio_rl32(pb);
 416             avih_width=avio_rl32(pb);
 417             avih_height=avio_rl32(pb);
 418
 419             avio_seek(pb, size - 10 * 4, SEEK_CUR);
 420             break;
 421         case MKTAG('s', 't', 'r', 'h'):
 422             /* stream header */
 423
 424             tag1 = avio_rl32(pb);
 425             handler = avio_rl32(pb); /* codec tag */
 426
 427             if(tag1 == MKTAG('p', 'a', 'd', 's')){
 428                 avio_seek(pb, size - 8, SEEK_CUR);
 429                 break;
 430             }else{
 431                 stream_index++;
 432                 st = av_new_stream(s, stream_index);
 433                 if (!st)
 434                     goto fail;
 435
 436                 ast = av_mallocz(sizeof(AVIStream));
 437                 if (!ast)
 438                     goto fail;
 439                 st->priv_data = ast;
 440             }
 441             if(amv_file_format)
 442                 tag1 = stream_index ? MKTAG('a','u','d','s') : MKTAG('v','i','d','s');
 443
 444             print_tag("strh", tag1, -1);
 445
 446             if(tag1 == MKTAG('i', 'a', 'v', 's') || tag1 == MKTAG('i', 'v', 'a', 's')){
 447                 int64_t dv_dur;
 448
 449                 /*
 450                  * After some consideration -- I don't think we
 451                  * have to support anything but DV in type1 AVIs.
 452                  */
 453                 if (s->nb_streams != 1)
 454                     goto fail;
 455
 456                 if (handler != MKTAG('d', 'v', 's', 'd') &&
 457                     handler != MKTAG('d', 'v', 'h', 'd') &&
 458                     handler != MKTAG('d', 'v', 's', 'l'))
 459                    goto fail;
 460
 461                 ast = s->streams[0]->priv_data;
 462                 av_freep(&s->streams[0]->codec->extradata);
 463                 av_freep(&s->streams[0]->codec);
 464                 av_freep(&s->streams[0]);
 465                 s->nb_streams = 0;
 466                 if (CONFIG_DV_DEMUXER) {
 467                     avi->dv_demux = dv_init_demux(s);
 468                     if (!avi->dv_demux)
 469                         goto fail;
 470                 }
 471                 s->streams[0]->priv_data = ast;
 472                 avio_seek(pb, 3 * 4, SEEK_CUR);
 473                 ast->scale = avio_rl32(pb);
 474                 ast->rate = avio_rl32(pb);
 475                 avio_seek(pb, 4, SEEK_CUR);  /* start time */
 476
 477                 dv_dur = avio_rl32(pb);
 478                 if (ast->scale > 0 && ast->rate > 0 && dv_dur > 0) {
 479                     dv_dur *= AV_TIME_BASE;
 480                     s->duration = av_rescale(dv_dur, ast->scale, ast->rate);
 481                 }
 482                 /*
 483                  * else, leave duration alone; timing estimation in utils.c
 484                  *      will make a guess based on bitrate.
 485                  */
 486
 487                 stream_index = s->nb_streams - 1;
 488                 avio_seek(pb, size - 9*4, SEEK_CUR);
 489                 break;
 490             }
 491
 492             assert(stream_index < s->nb_streams);
 493             st->codec->stream_codec_tag= handler;
 494
 495             avio_rl32(pb); /* flags */
 496             avio_rl16(pb); /* priority */
 497             avio_rl16(pb); /* language */
 498             avio_rl32(pb); /* initial frame */
 499             ast->scale = avio_rl32(pb);
 500             ast->rate = avio_rl32(pb);
 501             if(!(ast->scale && ast->rate)){
 502                 av_log(s, AV_LOG_WARNING, "scale/rate is %u/%u which is invalid. (This file has been generated by broken software.)\n", ast->scale, ast->rate);
 503                 if(frame_period){
 504                     ast->rate = 1000000;
 505                     ast->scale = frame_period;
 506                 }else{
 507                     ast->rate = 25;
 508                     ast->scale = 1;
 509                 }
 510             }
 511             av_set_pts_info(st, 64, ast->scale, ast->rate);
 512
 513             ast->cum_len=avio_rl32(pb); /* start */
 514             st->nb_frames = avio_rl32(pb);
 515
 516             st->start_time = 0;
 517             avio_rl32(pb); /* buffer size */
 518             avio_rl32(pb); /* quality */
 519             ast->sample_size = avio_rl32(pb); /* sample ssize */
 520             ast->cum_len *= FFMAX(1, ast->sample_size);
 521 //            av_log(s, AV_LOG_DEBUG, "%d %d %d %d\n", ast->rate, ast->scale, ast->start, ast->sample_size);
 522
 523             switch(tag1) {
 524             case MKTAG('v', 'i', 'd', 's'):
 525                 codec_type = AVMEDIA_TYPE_VIDEO;
 526
 527                 ast->sample_size = 0;
 528                 break;
 529             case MKTAG('a', 'u', 'd', 's'):
 530                 codec_type = AVMEDIA_TYPE_AUDIO;
 531                 break;
 532             case MKTAG('t', 'x', 't', 's'):
 533                 codec_type = AVMEDIA_TYPE_SUBTITLE;
 534                 break;
 535             case MKTAG('d', 'a', 't', 's'):
 536                 codec_type = AVMEDIA_TYPE_DATA;
 537                 break;
 538             default:
 539                 av_log(s, AV_LOG_ERROR, "unknown stream type %X\n", tag1);
 540                 goto fail;
 541             }
 542             if(ast->sample_size == 0)
 543                 st->duration = st->nb_frames;
 544             ast->frame_offset= ast->cum_len;
 545             avio_seek(pb, size - 12 * 4, SEEK_CUR);
 546             break;
 547         case MKTAG('s', 't', 'r', 'f'):
 548             /* stream header */
 549             if (stream_index >= (unsigned)s->nb_streams || avi->dv_demux) {
 550                 avio_seek(pb, size, SEEK_CUR);
 551             } else {
 552                 uint64_t cur_pos = avio_tell(pb);
 553                 if (cur_pos < list_end)
 554                     size = FFMIN(size, list_end - cur_pos);
 555                 st = s->streams[stream_index];
 556                 switch(codec_type) {
 557                 case AVMEDIA_TYPE_VIDEO:
 558                     if(amv_file_format){
 559                         st->codec->width=avih_width;
 560                         st->codec->height=avih_height;
 561                         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
 562                         st->codec->codec_id = CODEC_ID_AMV;
 563                         avio_seek(pb, size, SEEK_CUR);
 564                         break;
 565                     }
 566                     tag1 = ff_get_bmp_header(pb, st);
 567
 568                     if (tag1 == MKTAG('D', 'X', 'S', 'B') || tag1 == MKTAG('D','X','S','A')) {
 569                         st->codec->codec_type = AVMEDIA_TYPE_SUBTITLE;
 570                         st->codec->codec_tag = tag1;
 571                         st->codec->codec_id = CODEC_ID_XSUB;
 572                         break;
 573                     }
 574
 575                     if(size > 10*4 && size<(1<<30)){
 576                         st->codec->extradata_size= size - 10*4;
 577                         st->codec->extradata= av_malloc(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
 578                         if (!st->codec->extradata) {
 579                             st->codec->extradata_size= 0;
 580                             return AVERROR(ENOMEM);
 581                         }
 582                         avio_read(pb, st->codec->extradata, st->codec->extradata_size);
 583                     }
 584
 585                     if(st->codec->extradata_size & 1) //FIXME check if the encoder really did this correctly
 586                         avio_r8(pb);
 587
 588                     /* Extract palette from extradata if bpp <= 8. */
 589                     /* This code assumes that extradata contains only palette. */
 590                     /* This is true for all paletted codecs implemented in FFmpeg. */
 591                     if (st->codec->extradata_size && (st->codec->bits_per_coded_sample <= 8)) {
 592                         st->codec->palctrl = av_mallocz(sizeof(AVPaletteControl));
 593 #if HAVE_BIGENDIAN
 594                         for (i = 0; i < FFMIN(st->codec->extradata_size, AVPALETTE_SIZE)/4; i++)
 595                             st->codec->palctrl->palette[i] = av_bswap32(((uint32_t*)st->codec->extradata)[i]);
 596 #else
 597                         memcpy(st->codec->palctrl->palette, st->codec->extradata,
 598                                FFMIN(st->codec->extradata_size, AVPALETTE_SIZE));
 599 #endif
 600                         st->codec->palctrl->palette_changed = 1;
 601                     }
 602
 603                     print_tag("video", tag1, 0);
 604
 605                     st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
 606                     st->codec->codec_tag = tag1;
 607                     st->codec->codec_id = ff_codec_get_id(ff_codec_bmp_tags, tag1);
 608                     st->need_parsing = AVSTREAM_PARSE_HEADERS; // This is needed to get the pict type which is necessary for generating correct pts.
 609                     // Support "Resolution 1:1" for Avid AVI Codec
 610                     if(tag1 == MKTAG('A', 'V', 'R', 'n') &&
 611                        st->codec->extradata_size >= 31 &&
 612                        !memcmp(&st->codec->extradata[28], "1:1", 3))
 613                         st->codec->codec_id = CODEC_ID_RAWVIDEO;
 614
 615                     if(st->codec->codec_tag==0 && st->codec->height > 0 && st->codec->extradata_size < 1U<<30){
 616                         st->codec->extradata_size+= 9;
 617                         st->codec->extradata= av_realloc(st->codec->extradata, st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
 618                         if(st->codec->extradata)
 619                             memcpy(st->codec->extradata + st->codec->extradata_size - 9, "BottomUp", 9);
 620                     }
 621                     st->codec->height= FFABS(st->codec->height);
 622
 623 //                    avio_seek(pb, size - 5 * 4, SEEK_CUR);
 624                     break;
 625                 case AVMEDIA_TYPE_AUDIO:
 626                     ff_get_wav_header(pb, st->codec, size);
 627                     ast->dshow_block_align= st->codec->block_align;
 628                     if(ast->sample_size && st->codec->block_align && ast->sample_size != st->codec->block_align){
 629                         av_log(s, AV_LOG_WARNING, "sample size (%d) != block align (%d)\n", ast->sample_size, st->codec->block_align);
 630                         ast->sample_size= st->codec->block_align;
 631                     }
 632                     if (size&1) /* 2-aligned (fix for Stargate SG-1 - 3x18 - Shades of Grey.avi) */
 633                         avio_seek(pb, 1, SEEK_CUR);
 634                     /* Force parsing as several audio frames can be in
 635                      * one packet and timestamps refer to packet start. */
 636                     st->need_parsing = AVSTREAM_PARSE_TIMESTAMPS;
 637                     /* ADTS header is in extradata, AAC without header must be
 638                      * stored as exact frames. Parser not needed and it will
 639                      * fail. */
 640                     if (st->codec->codec_id == CODEC_ID_AAC && st->codec->extradata_size)
 641                         st->need_parsing = AVSTREAM_PARSE_NONE;
 642                     /* AVI files with Xan DPCM audio (wrongly) declare PCM
 643                      * audio in the header but have Axan as stream_code_tag. */
 644                     if (st->codec->stream_codec_tag == AV_RL32("Axan")){
 645                         st->codec->codec_id  = CODEC_ID_XAN_DPCM;
 646                         st->codec->codec_tag = 0;
 647                     }
 648                     if (amv_file_format){
 649                         st->codec->codec_id  = CODEC_ID_ADPCM_IMA_AMV;
 650                         ast->dshow_block_align = 0;
 651                     }
 652                     break;
 653                 case AVMEDIA_TYPE_SUBTITLE:
 654                     st->codec->codec_type = AVMEDIA_TYPE_SUBTITLE;
 655                     st->codec->codec_id   = CODEC_ID_PROBE;
 656                     break;
 657                 default:
 658                     st->codec->codec_type = AVMEDIA_TYPE_DATA;
 659                     st->codec->codec_id= CODEC_ID_NONE;
 660                     st->codec->codec_tag= 0;
 661                     avio_seek(pb, size, SEEK_CUR);
 662                     break;
 663                 }
 664             }
 665             break;
 666         case MKTAG('i', 'n', 'd', 'x'):
 667             i= avio_tell(pb);
 668             if(!url_is_streamed(pb) && !(s->flags & AVFMT_FLAG_IGNIDX)){
 669                 read_braindead_odml_indx(s, 0);
 670             }
 671             avio_seek(pb, i+size, SEEK_SET);
 672             break;
 673         case MKTAG('v', 'p', 'r', 'p'):
 674             if(stream_index < (unsigned)s->nb_streams && size > 9*4){
 675                 AVRational active, active_aspect;
 676
 677                 st = s->streams[stream_index];
 678                 avio_rl32(pb);
 679                 avio_rl32(pb);
 680                 avio_rl32(pb);
 681                 avio_rl32(pb);
 682                 avio_rl32(pb);
 683
 684                 active_aspect.den= avio_rl16(pb);
 685                 active_aspect.num= avio_rl16(pb);
 686                 active.num       = avio_rl32(pb);
 687                 active.den       = avio_rl32(pb);
 688                 avio_rl32(pb); //nbFieldsPerFrame
 689
 690                 if(active_aspect.num && active_aspect.den && active.num && active.den){
 691                     st->sample_aspect_ratio= av_div_q(active_aspect, active);
 692 //av_log(s, AV_LOG_ERROR, "vprp %d/%d %d/%d\n", active_aspect.num, active_aspect.den, active.num, active.den);
 693                 }
 694                 size -= 9*4;
 695             }
 696             avio_seek(pb, size, SEEK_CUR);
 697             break;
 698         case MKTAG('s', 't', 'r', 'n'):
 699             if(s->nb_streams){
 700                 avi_read_tag(s, s->streams[s->nb_streams-1], tag, size);
 701                 break;
 702             }
 703         default:
 704             if(size > 1000000){
 705                 av_log(s, AV_LOG_ERROR, "Something went wrong during header parsing, "
 706                                         "I will ignore it and try to continue anyway.\n");
 707                 avi->movi_list = avio_tell(pb) - 4;
 708                 avi->movi_end  = avio_size(pb);
 709                 goto end_of_header;
 710             }
 711             /* skip tag */
 712             size += (size & 1);
 713             avio_seek(pb, size, SEEK_CUR);
 714             break;
 715         }
 716     }
 717  end_of_header:
 718     /* check stream number */
 719     if (stream_index != s->nb_streams - 1) {
 720     fail:
 721         return -1;
 722     }
 723
 724     if(!avi->index_loaded && !url_is_streamed(pb))
 725         avi_load_index(s);
 726     avi->index_loaded = 1;
 727     avi->non_interleaved |= guess_ni_flag(s);
 728     for(i=0; i<s->nb_streams; i++){
 729         AVStream *st = s->streams[i];
 730         if(st->nb_index_entries)
 731             break;
 732     }
 733     if(i==s->nb_streams && avi->non_interleaved) {
 734         av_log(s, AV_LOG_WARNING, "non-interleaved AVI without index, switching to interleaved\n");
 735         avi->non_interleaved=0;
 736     }
 737
 738     if(avi->non_interleaved) {
 739         av_log(s, AV_LOG_INFO, "non-interleaved AVI\n");
 740         clean_index(s);
 741     }
 742
 743     ff_metadata_conv_ctx(s, NULL, ff_avi_metadata_conv);
 744
 745     return 0;
 746 }
 747
 748 static int read_gab2_sub(AVStream *st, AVPacket *pkt) {
 749     if (!strcmp(pkt->data, "GAB2") && AV_RL16(pkt->data+5) == 2) {
 750         uint8_t desc[256];
 751         int score = AVPROBE_SCORE_MAX / 2, ret;
 752         AVIStream *ast = st->priv_data;
 753         AVInputFormat *sub_demuxer;
 754         AVRational time_base;
 755         AVIOContext *pb = avio_alloc_context( pkt->data + 7,
 756                                               pkt->size - 7,
 757                                               0, NULL, NULL, NULL, NULL);
 758         AVProbeData pd;
 759         unsigned int desc_len = avio_rl32(pb);
 760
 761         if (desc_len > pb->buf_end - pb->buf_ptr)
 762             goto error;
 763
 764         ret = avio_get_str16le(pb, desc_len, desc, sizeof(desc));
 765         avio_seek(pb, desc_len - ret, SEEK_CUR);
 766         if (*desc)
 767             av_metadata_set2(&st->metadata, "title", desc, 0);
 768
 769         avio_rl16(pb);   /* flags? */
 770         avio_rl32(pb);   /* data size */
 771
 772         pd = (AVProbeData) { .buf = pb->buf_ptr, .buf_size = pb->buf_end - pb->buf_ptr };
 773         if (!(sub_demuxer = av_probe_input_format2(&pd, 1, &score)))
 774             goto error;
 775
 776         if (!av_open_input_stream(&ast->sub_ctx, pb, "", sub_demuxer, NULL)) {
 777             av_read_packet(ast->sub_ctx, &ast->sub_pkt);
 778             *st->codec = *ast->sub_ctx->streams[0]->codec;
 779             ast->sub_ctx->streams[0]->codec->extradata = NULL;
 780             time_base = ast->sub_ctx->streams[0]->time_base;
 781             av_set_pts_info(st, 64, time_base.num, time_base.den);
 782         }
 783         ast->sub_buffer = pkt->data;
 784         memset(pkt, 0, sizeof(*pkt));
 785         return 1;
 786 error:
 787         av_freep(&pb);
 788     }
 789     return 0;
 790 }
 791
 792 static AVStream *get_subtitle_pkt(AVFormatContext *s, AVStream *next_st,
 793                                   AVPacket *pkt)
 794 {
 795     AVIStream *ast, *next_ast = next_st->priv_data;
 796     int64_t ts, next_ts, ts_min = INT64_MAX;
 797     AVStream *st, *sub_st = NULL;
 798     int i;
 799
 800     next_ts = av_rescale_q(next_ast->frame_offset, next_st->time_base,
 801                            AV_TIME_BASE_Q);
 802
 803     for (i=0; i<s->nb_streams; i++) {
 804         st  = s->streams[i];
 805         ast = st->priv_data;
 806         if (st->discard < AVDISCARD_ALL && ast && ast->sub_pkt.data) {
 807             ts = av_rescale_q(ast->sub_pkt.dts, st->time_base, AV_TIME_BASE_Q);
 808             if (ts <= next_ts && ts < ts_min) {
 809                 ts_min = ts;
 810                 sub_st = st;
 811             }
 812         }
 813     }
 814
 815     if (sub_st) {
 816         ast = sub_st->priv_data;
 817         *pkt = ast->sub_pkt;
 818         pkt->stream_index = sub_st->index;
 819         if (av_read_packet(ast->sub_ctx, &ast->sub_pkt) < 0)
 820             ast->sub_pkt.data = NULL;
 821     }
 822     return sub_st;
 823 }
 824
 825 static int get_stream_idx(int *d){
 826     if(    d[0] >= '0' && d[0] <= '9'
 827         && d[1] >= '0' && d[1] <= '9'){
 828         return (d[0] - '0') * 10 + (d[1] - '0');
 829     }else{
 830         return 100; //invalid stream ID
 831     }
 832 }
 833
 834 static int avi_read_packet(AVFormatContext *s, AVPacket *pkt)
 835 {
 836     AVIContext *avi = s->priv_data;
 837     AVIOContext *pb = s->pb;
 838     int n, d[8];
 839     unsigned int size;
 840     int64_t i, sync;
 841     void* dstr;
 842
 843     if (CONFIG_DV_DEMUXER && avi->dv_demux) {
 844         int size = dv_get_packet(avi->dv_demux, pkt);
 845         if (size >= 0)
 846             return size;
 847     }
 848
 849     if(avi->non_interleaved){
 850         int best_stream_index = 0;
 851         AVStream *best_st= NULL;
 852         AVIStream *best_ast;
 853         int64_t best_ts= INT64_MAX;
 854         int i;
 855
 856         for(i=0; i<s->nb_streams; i++){
 857             AVStream *st = s->streams[i];
 858             AVIStream *ast = st->priv_data;
 859             int64_t ts= ast->frame_offset;
 860             int64_t last_ts;
 861
 862             if(!st->nb_index_entries)
 863                 continue;
 864
 865             last_ts = st->index_entries[st->nb_index_entries - 1].timestamp;
 866             if(!ast->remaining && ts > last_ts)
 867                 continue;
 868
 869             ts = av_rescale_q(ts, st->time_base, (AVRational){FFMAX(1, ast->sample_size), AV_TIME_BASE});
 870
 871 //            av_log(s, AV_LOG_DEBUG, "%"PRId64" %d/%d %"PRId64"\n", ts, st->time_base.num, st->time_base.den, ast->frame_offset);
 872             if(ts < best_ts){
 873                 best_ts= ts;
 874                 best_st= st;
 875                 best_stream_index= i;
 876             }
 877         }
 878         if(!best_st)
 879             return -1;
 880
 881         best_ast = best_st->priv_data;
 882         best_ts = av_rescale_q(best_ts, (AVRational){FFMAX(1, best_ast->sample_size), AV_TIME_BASE}, best_st->time_base);
 883         if(best_ast->remaining)
 884             i= av_index_search_timestamp(best_st, best_ts, AVSEEK_FLAG_ANY | AVSEEK_FLAG_BACKWARD);
 885         else{
 886             i= av_index_search_timestamp(best_st, best_ts, AVSEEK_FLAG_ANY);
 887             if(i>=0)
 888                 best_ast->frame_offset= best_st->index_entries[i].timestamp;
 889         }
 890
 891 //        av_log(s, AV_LOG_DEBUG, "%d\n", i);
 892         if(i>=0){
 893             int64_t pos= best_st->index_entries[i].pos;
 894             pos += best_ast->packet_size - best_ast->remaining;
 895             avio_seek(s->pb, pos + 8, SEEK_SET);
 896 //        av_log(s, AV_LOG_DEBUG, "pos=%"PRId64"\n", pos);
 897
 898             assert(best_ast->remaining <= best_ast->packet_size);
 899
 900             avi->stream_index= best_stream_index;
 901             if(!best_ast->remaining)
 902                 best_ast->packet_size=
 903                 best_ast->remaining= best_st->index_entries[i].size;
 904         }
 905     }
 906
 907 resync:
 908     if(avi->stream_index >= 0){
 909         AVStream *st= s->streams[ avi->stream_index ];
 910         AVIStream *ast= st->priv_data;
 911         int size, err;
 912
 913         if(get_subtitle_pkt(s, st, pkt))
 914             return 0;
 915
 916         if(ast->sample_size <= 1) // minorityreport.AVI block_align=1024 sample_size=1 IMA-ADPCM
 917             size= INT_MAX;
 918         else if(ast->sample_size < 32)
 919             // arbitrary multiplier to avoid tiny packets for raw PCM data
 920             size= 1024*ast->sample_size;
 921         else
 922             size= ast->sample_size;
 923
 924         if(size > ast->remaining)
 925             size= ast->remaining;
 926         avi->last_pkt_pos= avio_tell(pb);
 927         err= av_get_packet(pb, pkt, size);
 928         if(err<0)
 929             return err;
 930
 931         if(ast->has_pal && pkt->data && pkt->size<(unsigned)INT_MAX/2){
 932             void *ptr= av_realloc(pkt->data, pkt->size + 4*256 + FF_INPUT_BUFFER_PADDING_SIZE);
 933             if(ptr){
 934             ast->has_pal=0;
 935             pkt->size += 4*256;
 936             pkt->data= ptr;
 937                 memcpy(pkt->data + pkt->size - 4*256, ast->pal, 4*256);
 938             }else
 939                 av_log(s, AV_LOG_ERROR, "Failed to append palette\n");
 940         }
 941
 942         if (CONFIG_DV_DEMUXER && avi->dv_demux) {
 943             dstr = pkt->destruct;
 944             size = dv_produce_packet(avi->dv_demux, pkt,
 945                                     pkt->data, pkt->size);
 946             pkt->destruct = dstr;
 947             pkt->flags |= AV_PKT_FLAG_KEY;
 948             if (size < 0)
 949                 av_free_packet(pkt);
 950         } else if (st->codec->codec_type == AVMEDIA_TYPE_SUBTITLE
 951                    && !st->codec->codec_tag && read_gab2_sub(st, pkt)) {
 952             ast->frame_offset++;
 953             avi->stream_index = -1;
 954             ast->remaining = 0;
 955             goto resync;
 956         } else {
 957             /* XXX: How to handle B-frames in AVI? */
 958             pkt->dts = ast->frame_offset;
 959 //                pkt->dts += ast->start;
 960             if(ast->sample_size)
 961                 pkt->dts /= ast->sample_size;
 962 //av_log(s, AV_LOG_DEBUG, "dts:%"PRId64" offset:%"PRId64" %d/%d smpl_siz:%d base:%d st:%d size:%d\n", pkt->dts, ast->frame_offset, ast->scale, ast->rate, ast->sample_size, AV_TIME_BASE, avi->stream_index, size);
 963             pkt->stream_index = avi->stream_index;
 964
 965             if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
 966                 AVIndexEntry *e;
 967                 int index;
 968                 assert(st->index_entries);
 969
 970                 index= av_index_search_timestamp(st, ast->frame_offset, 0);
 971                 e= &st->index_entries[index];
 972
 973                 if(index >= 0 && e->timestamp == ast->frame_offset){
 974                     if (e->flags & AVINDEX_KEYFRAME)
 975                         pkt->flags |= AV_PKT_FLAG_KEY;
 976                 }
 977             } else {
 978                 pkt->flags |= AV_PKT_FLAG_KEY;
 979             }
 980             ast->frame_offset += get_duration(ast, pkt->size);
 981         }
 982         ast->remaining -= size;
 983         if(!ast->remaining){
 984             avi->stream_index= -1;
 985             ast->packet_size= 0;
 986         }
 987
 988         return size;
 989     }
 990
 991     memset(d, -1, sizeof(int)*8);
 992     for(i=sync=avio_tell(pb); !url_feof(pb); i++) {
 993         int j;
 994
 995         for(j=0; j<7; j++)
 996             d[j]= d[j+1];
 997         d[7]= avio_r8(pb);
 998
 999         size= d[4] + (d[5]<<8) + (d[6]<<16) + (d[7]<<24);
1000
1001         n= get_stream_idx(d+2);
1002 //av_log(s, AV_LOG_DEBUG, "%X %X %X %X %X %X %X %X %"PRId64" %d %d\n", d[0], d[1], d[2], d[3], d[4], d[5], d[6], d[7], i, size, n);
1003         if(i + (uint64_t)size > avi->fsize || d[0]<0)
1004             continue;
1005
1006         //parse ix##
1007         if(  (d[0] == 'i' && d[1] == 'x' && n < s->nb_streams)
1008         //parse JUNK
1009            ||(d[0] == 'J' && d[1] == 'U' && d[2] == 'N' && d[3] == 'K')
1010            ||(d[0] == 'i' && d[1] == 'd' && d[2] == 'x' && d[3] == '1')){
1011             avio_seek(pb, size, SEEK_CUR);
1012 //av_log(s, AV_LOG_DEBUG, "SKIP\n");
1013             goto resync;
1014         }
1015
1016         //parse stray LIST
1017         if(d[0] == 'L' && d[1] == 'I' && d[2] == 'S' && d[3] == 'T'){
1018             avio_seek(pb, 4, SEEK_CUR);
1019             goto resync;
1020         }
1021
1022         n= get_stream_idx(d);
1023
1024         if(!((i-avi->last_pkt_pos)&1) && get_stream_idx(d+1) < s->nb_streams)
1025             continue;
1026
1027         //detect ##ix chunk and skip
1028         if(d[2] == 'i' && d[3] == 'x' && n < s->nb_streams){
1029             avio_seek(pb, size, SEEK_CUR);
1030             goto resync;
1031         }
1032
1033         //parse ##dc/##wb
1034         if(n < s->nb_streams){
1035             AVStream *st;
1036             AVIStream *ast;
1037             st = s->streams[n];
1038             ast = st->priv_data;
1039
1040             if(s->nb_streams>=2){
1041                 AVStream *st1  = s->streams[1];
1042                 AVIStream *ast1= st1->priv_data;
1043                 //workaround for broken small-file-bug402.avi
1044                 if(   d[2] == 'w' && d[3] == 'b'
1045                    && n==0
1046                    && st ->codec->codec_type == AVMEDIA_TYPE_VIDEO
1047                    && st1->codec->codec_type == AVMEDIA_TYPE_AUDIO
1048                    && ast->prefix == 'd'*256+'c'
1049                    && (d[2]*256+d[3] == ast1->prefix || !ast1->prefix_count)
1050                   ){
1051                     n=1;
1052                     st = st1;
1053                     ast = ast1;
1054                     av_log(s, AV_LOG_WARNING, "Invalid stream + prefix combination, assuming audio.\n");
1055                 }
1056             }
1057
1058
1059             if(   (st->discard >= AVDISCARD_DEFAULT && size==0)
1060                /*|| (st->discard >= AVDISCARD_NONKEY && !(pkt->flags & AV_PKT_FLAG_KEY))*/ //FIXME needs a little reordering
1061                || st->discard >= AVDISCARD_ALL){
1062                 ast->frame_offset += get_duration(ast, size);
1063                 avio_seek(pb, size, SEEK_CUR);
1064                 goto resync;
1065             }
1066
1067             if (d[2] == 'p' && d[3] == 'c' && size<=4*256+4) {
1068                 int k = avio_r8(pb);
1069                 int last = (k + avio_r8(pb) - 1) & 0xFF;
1070
1071                 avio_rl16(pb); //flags
1072
1073                 for (; k <= last; k++)
1074                     ast->pal[k] = avio_rb32(pb)>>8;// b + (g << 8) + (r << 16);
1075                 ast->has_pal= 1;
1076                 goto resync;
1077             } else if(   ((ast->prefix_count<5 || sync+9 > i) && d[2]<128 && d[3]<128) ||
1078                          d[2]*256+d[3] == ast->prefix /*||
1079                          (d[2] == 'd' && d[3] == 'c') ||
1080                          (d[2] == 'w' && d[3] == 'b')*/) {
1081
1082 //av_log(s, AV_LOG_DEBUG, "OK\n");
1083                 if(d[2]*256+d[3] == ast->prefix)
1084                     ast->prefix_count++;
1085                 else{
1086                     ast->prefix= d[2]*256+d[3];
1087                     ast->prefix_count= 0;
1088                 }
1089
1090                 avi->stream_index= n;
1091                 ast->packet_size= size + 8;
1092                 ast->remaining= size;
1093
1094                 if(size || !ast->sample_size){
1095                     uint64_t pos= avio_tell(pb) - 8;
1096                     if(!st->index_entries || !st->nb_index_entries || st->index_entries[st->nb_index_entries - 1].pos < pos){
1097                         av_add_index_entry(st, pos, ast->frame_offset, size, 0, AVINDEX_KEYFRAME);
1098                     }
1099                 }
1100                 goto resync;
1101             }
1102         }
1103     }
1104
1105     return AVERROR_EOF;
1106 }
1107
1108 /* XXX: We make the implicit supposition that the positions are sorted
1109    for each stream. */
1110 static int avi_read_idx1(AVFormatContext *s, int size)
1111 {
1112     AVIContext *avi = s->priv_data;
1113     AVIOContext *pb = s->pb;
1114     int nb_index_entries, i;
1115     AVStream *st;
1116     AVIStream *ast;
1117     unsigned int index, tag, flags, pos, len;
1118     unsigned last_pos= -1;
1119
1120     nb_index_entries = size / 16;
1121     if (nb_index_entries <= 0)
1122         return -1;
1123
1124     /* Read the entries and sort them in each stream component. */
1125     for(i = 0; i < nb_index_entries; i++) {
1126         tag = avio_rl32(pb);
1127         flags = avio_rl32(pb);
1128         pos = avio_rl32(pb);
1129         len = avio_rl32(pb);
1130 #if defined(DEBUG_SEEK)
1131         av_log(s, AV_LOG_DEBUG, "%d: tag=0x%x flags=0x%x pos=0x%x len=%d/",
1132                i, tag, flags, pos, len);
1133 #endif
1134         if(i==0 && pos > avi->movi_list)
1135             avi->movi_list= 0; //FIXME better check
1136         pos += avi->movi_list;
1137
1138         index = ((tag & 0xff) - '0') * 10;
1139         index += ((tag >> 8) & 0xff) - '0';
1140         if (index >= s->nb_streams)
1141             continue;
1142         st = s->streams[index];
1143         ast = st->priv_data;
1144
1145 #if defined(DEBUG_SEEK)
1146         av_log(s, AV_LOG_DEBUG, "%d cum_len=%"PRId64"\n", len, ast->cum_len);
1147 #endif
1148         if(url_feof(pb))
1149             return -1;
1150
1151         if(last_pos == pos)
1152             avi->non_interleaved= 1;
1153         else if(len || !ast->sample_size)
1154             av_add_index_entry(st, pos, ast->cum_len, len, 0, (flags&AVIIF_INDEX) ? AVINDEX_KEYFRAME : 0);
1155         ast->cum_len += get_duration(ast, len);
1156         last_pos= pos;
1157     }
1158     return 0;
1159 }
1160
1161 static int guess_ni_flag(AVFormatContext *s){
1162     int i;
1163     int64_t last_start=0;
1164     int64_t first_end= INT64_MAX;
1165     int64_t oldpos= avio_tell(s->pb);
1166
1167     for(i=0; i<s->nb_streams; i++){
1168         AVStream *st = s->streams[i];
1169         int n= st->nb_index_entries;
1170         unsigned int size;
1171
1172         if(n <= 0)
1173             continue;
1174
1175         if(n >= 2){
1176             int64_t pos= st->index_entries[0].pos;
1177             avio_seek(s->pb, pos + 4, SEEK_SET);
1178             size= avio_rl32(s->pb);
1179             if(pos + size > st->index_entries[1].pos)
1180                 last_start= INT64_MAX;
1181         }
1182
1183         if(st->index_entries[0].pos > last_start)
1184             last_start= st->index_entries[0].pos;
1185         if(st->index_entries[n-1].pos < first_end)
1186             first_end= st->index_entries[n-1].pos;
1187     }
1188     avio_seek(s->pb, oldpos, SEEK_SET);
1189     return last_start > first_end;
1190 }
1191
1192 static int avi_load_index(AVFormatContext *s)
1193 {
1194     AVIContext *avi = s->priv_data;
1195     AVIOContext *pb = s->pb;
1196     uint32_t tag, size;
1197     int64_t pos= avio_tell(pb);
1198     int ret = -1;
1199
1200     if (avio_seek(pb, avi->movi_end, SEEK_SET) < 0)
1201         goto the_end; // maybe truncated file
1202 #ifdef DEBUG_SEEK
1203     printf("movi_end=0x%"PRIx64"\n", avi->movi_end);
1204 #endif
1205     for(;;) {
1206         if (url_feof(pb))
1207             break;
1208         tag = avio_rl32(pb);
1209         size = avio_rl32(pb);
1210 #ifdef DEBUG_SEEK
1211         printf("tag=%c%c%c%c size=0x%x\n",
1212                tag & 0xff,
1213                (tag >> 8) & 0xff,
1214                (tag >> 16) & 0xff,
1215                (tag >> 24) & 0xff,
1216                size);
1217 #endif
1218         switch(tag) {
1219         case MKTAG('i', 'd', 'x', '1'):
1220             if (avi_read_idx1(s, size) < 0)
1221                 goto skip;
1222             ret = 0;
1223                 goto the_end;
1224             break;
1225         default:
1226         skip:
1227             size += (size & 1);
1228             if (avio_seek(pb, size, SEEK_CUR) < 0)
1229                 goto the_end; // something is wrong here
1230             break;
1231         }
1232     }
1233  the_end:
1234     avio_seek(pb, pos, SEEK_SET);
1235     return ret;
1236 }
1237
1238 static void seek_subtitle(AVStream *st, AVStream *st2, int64_t timestamp)
1239 {
1240     AVIStream *ast2 = st2->priv_data;
1241     int64_t ts2 = av_rescale_q(timestamp, st->time_base, st2->time_base);
1242     av_free_packet(&ast2->sub_pkt);
1243     if (avformat_seek_file(ast2->sub_ctx, 0, INT64_MIN, ts2, ts2, 0) >= 0 ||
1244         avformat_seek_file(ast2->sub_ctx, 0, ts2, ts2, INT64_MAX, 0) >= 0)
1245         av_read_packet(ast2->sub_ctx, &ast2->sub_pkt);
1246 }
1247
1248 static int avi_read_seek(AVFormatContext *s, int stream_index, int64_t timestamp, int flags)
1249 {
1250     AVIContext *avi = s->priv_data;
1251     AVStream *st;
1252     int i, index;
1253     int64_t pos;
1254     AVIStream *ast;
1255
1256     if (!avi->index_loaded) {
1257         /* we only load the index on demand */
1258         avi_load_index(s);
1259         avi->index_loaded = 1;
1260     }
1261     assert(stream_index>= 0);
1262
1263     st = s->streams[stream_index];
1264     ast= st->priv_data;
1265     index= av_index_search_timestamp(st, timestamp * FFMAX(ast->sample_size, 1), flags);
1266     if(index<0)
1267         return -1;
1268
1269     /* find the position */
1270     pos = st->index_entries[index].pos;
1271     timestamp = st->index_entries[index].timestamp / FFMAX(ast->sample_size, 1);
1272
1273 //    av_log(s, AV_LOG_DEBUG, "XX %"PRId64" %d %"PRId64"\n", timestamp, index, st->index_entries[index].timestamp);
1274
1275     if (CONFIG_DV_DEMUXER && avi->dv_demux) {
1276         /* One and only one real stream for DV in AVI, and it has video  */
1277         /* offsets. Calling with other stream indexes should have failed */
1278         /* the av_index_search_timestamp call above.                     */
1279         assert(stream_index == 0);
1280
1281         /* Feed the DV video stream version of the timestamp to the */
1282         /* DV demux so it can synthesize correct timestamps.        */
1283         dv_offset_reset(avi->dv_demux, timestamp);
1284
1285         avio_seek(s->pb, pos, SEEK_SET);
1286         avi->stream_index= -1;
1287         return 0;
1288     }
1289
1290     for(i = 0; i < s->nb_streams; i++) {
1291         AVStream *st2 = s->streams[i];
1292         AVIStream *ast2 = st2->priv_data;
1293
1294         ast2->packet_size=
1295         ast2->remaining= 0;
1296
1297         if (ast2->sub_ctx) {
1298             seek_subtitle(st, st2, timestamp);
1299             continue;
1300         }
1301
1302         if (st2->nb_index_entries <= 0)
1303             continue;
1304
1305 //        assert(st2->codec->block_align);
1306         assert((int64_t)st2->time_base.num*ast2->rate == (int64_t)st2->time_base.den*ast2->scale);
1307         index = av_index_search_timestamp(
1308                 st2,
1309                 av_rescale_q(timestamp, st->time_base, st2->time_base) * FFMAX(ast2->sample_size, 1),
1310                 flags | AVSEEK_FLAG_BACKWARD);
1311         if(index<0)
1312             index=0;
1313
1314         if(!avi->non_interleaved){
1315             while(index>0 && st2->index_entries[index].pos > pos)
1316                 index--;
1317             while(index+1 < st2->nb_index_entries && st2->index_entries[index].pos < pos)
1318                 index++;
1319         }
1320
1321 //        av_log(s, AV_LOG_DEBUG, "%"PRId64" %d %"PRId64"\n", timestamp, index, st2->index_entries[index].timestamp);
1322         /* extract the current frame number */
1323         ast2->frame_offset = st2->index_entries[index].timestamp;
1324     }
1325
1326     /* do the seek */
1327     avio_seek(s->pb, pos, SEEK_SET);
1328     avi->stream_index= -1;
1329     return 0;
1330 }
1331
1332 static int avi_read_close(AVFormatContext *s)
1333 {
1334     int i;
1335     AVIContext *avi = s->priv_data;
1336
1337     for(i=0;i<s->nb_streams;i++) {
1338         AVStream *st = s->streams[i];
1339         AVIStream *ast = st->priv_data;
1340         av_free(st->codec->palctrl);
1341         if (ast) {
1342             if (ast->sub_ctx) {
1343                 av_freep(&ast->sub_ctx->pb);
1344                 av_close_input_stream(ast->sub_ctx);
1345             }
1346             av_free(ast->sub_buffer);
1347             av_free_packet(&ast->sub_pkt);
1348         }
1349     }
1350
1351     av_free(avi->dv_demux);
1352
1353     return 0;
1354 }
1355
1356 static int avi_probe(AVProbeData *p)
1357 {
1358     int i;
1359
1360     /* check file header */
1361     for(i=0; avi_headers[i][0]; i++)
1362         if(!memcmp(p->buf  , avi_headers[i]  , 4) &&
1363            !memcmp(p->buf+8, avi_headers[i]+4, 4))
1364             return AVPROBE_SCORE_MAX;
1365
1366     return 0;
1367 }
1368
1369 AVInputFormat ff_avi_demuxer = {
1370     "avi",
1371     NULL_IF_CONFIG_SMALL("AVI format"),
1372     sizeof(AVIContext),
1373     avi_probe,
1374     avi_read_header,
1375     avi_read_packet,
1376     avi_read_close,
1377     avi_read_seek,
1378 };