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