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