2 * This file is part of MPlayer.
4 * MPlayer is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * MPlayer is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License along
15 * with MPlayer; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
28 #include "stream/stream.h"
32 #include "aviheader.h"
33 #include "libavutil/common.h"
35 static MainAVIHeader avih
;
37 void print_avih(MainAVIHeader
*h
, int verbose_level
);
38 void print_avih_flags(MainAVIHeader
*h
, int verbose_level
);
39 void print_strh(AVIStreamHeader
*h
, int verbose_level
);
40 void print_wave_header(WAVEFORMATEX
*h
, int verbose_level
);
41 void print_video_header(BITMAPINFOHEADER
*h
, int verbose_level
);
42 void print_index(AVIINDEXENTRY
*idx
,int idx_size
, int verbose_level
);
43 void print_avistdindex_chunk(avistdindex_chunk
*h
, int verbose_level
);
44 void print_avisuperindex_chunk(avisuperindex_chunk
*h
, int verbose_level
);
45 void print_vprp(VideoPropHeader
*vprp
, int verbose_level
);
47 static int odml_get_vstream_id(int id
, unsigned char res
[])
49 unsigned char *p
= (unsigned char *)&id
;
62 int avi_idx_cmp(const void *elem1
,const void *elem2
) {
63 register off_t a
= AVI_IDX_OFFSET((AVIINDEXENTRY
*)elem1
);
64 register off_t b
= AVI_IDX_OFFSET((AVIINDEXENTRY
*)elem2
);
65 return (a
> b
) - (b
> a
);
68 void read_avi_header(demuxer_t
*demuxer
,int index_mode
){
69 sh_audio_t
*sh_audio
=NULL
;
70 sh_video_t
*sh_video
=NULL
;
72 int idxfix_videostream
=0;
74 avi_priv_t
* priv
=demuxer
->priv
;
79 priv
->audio_streams
=0;
81 int id
=stream_read_dword_le(demuxer
->stream
);
82 unsigned chunksize
,size2
;
83 static int last_fccType
=0;
84 static int last_fccHandler
=0;
87 if(stream_eof(demuxer
->stream
)) break;
88 // Imply -forceidx if -saveidx is specified
92 if(id
==mmioFOURCC('L','I','S','T')){
93 unsigned len
=stream_read_dword_le(demuxer
->stream
); // list size
94 id
=stream_read_dword_le(demuxer
->stream
); // list type
95 mp_msg(MSGT_HEADER
,MSGL_DBG2
,"LIST %.4s len=%u\n",(char *) &id
,len
);
98 list_end
=stream_tell(demuxer
->stream
)+((len
+1)&(~1));
100 mp_msg(MSGT_HEADER
,MSGL_WARN
,MSGTR_MPDEMUX_AVIHDR_EmptyList
);
103 mp_msg(MSGT_HEADER
,MSGL_V
,"list_end=0x%X\n",(int)list_end
);
104 if(id
==listtypeAVIMOVIE
){
106 if(!demuxer
->movi_start
) demuxer
->movi_start
=stream_tell(demuxer
->stream
);
107 demuxer
->movi_end
=stream_tell(demuxer
->stream
)+len
;
108 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_FoundMovieAt
,(int)demuxer
->movi_start
,(int)demuxer
->movi_end
);
109 if(demuxer
->stream
->end_pos
>demuxer
->movi_end
) demuxer
->movi_end
=demuxer
->stream
->end_pos
;
110 if(index_mode
==-2 || index_mode
==2 || index_mode
==0)
111 break; // reading from non-seekable source (stdin) or forced index or no index forced
112 if(list_end
>0) stream_seek(demuxer
->stream
,list_end
); // skip movi
117 size2
=stream_read_dword_le(demuxer
->stream
);
118 mp_msg(MSGT_HEADER
,MSGL_DBG2
,"CHUNK %.4s len=%u\n",(char *) &id
,size2
);
119 chunksize
=(size2
+1)&(~1);
122 // Indicates where the subject of the file is archived
123 case mmioFOURCC('I','A','R','L'): hdr
="Archival Location";break;
124 // Lists the artist of the original subject of the file;
125 // for example, "Michaelangelo."
126 case mmioFOURCC('I','A','R','T'): hdr
="Artist";break;
127 // Lists the name of the person or organization that commissioned
128 // the subject of the file; for example "Pope Julian II."
129 case mmioFOURCC('I','C','M','S'): hdr
="Commissioned";break;
130 // Provides general comments about the file or the subject
131 // of the file. If the comment is several sentences long, end each
132 // sentence with a period. Do not include new-line characters.
133 case mmioFOURCC('I','C','M','T'): hdr
="Comments";break;
134 // Records the copyright information for the file; for example,
135 // "Copyright Encyclopedia International 1991." If there are multiple
136 // copyrights, separate them by semicolon followed by a space.
137 case mmioFOURCC('I','C','O','P'): hdr
="Copyright";break;
138 // Describes whether an image has been cropped and, if so, how it
139 // was cropped; for example, "lower-right corner."
140 case mmioFOURCC('I','C','R','D'): hdr
="Creation Date";break;
141 // Describes whether an image has been cropped and, if so, how it
142 // was cropped; for example, "lower-right corner."
143 case mmioFOURCC('I','C','R','P'): hdr
="Cropped";break;
144 // Specifies the size of the original subject of the file; for
145 // example, "8.5 in h, 11 in w."
146 case mmioFOURCC('I','D','I','M'): hdr
="Dimensions";break;
147 // Stores dots per inch setting of the digitizer used to
148 // produce the file, such as "300."
149 case mmioFOURCC('I','D','P','I'): hdr
="Dots Per Inch";break;
150 // Stores the of the engineer who worked on the file. If there are
151 // multiple engineers, separate the names by a semicolon and a blank;
152 // for example, "Smith, John; Adams, Joe."
153 case mmioFOURCC('I','E','N','G'): hdr
="Engineer";break;
154 // Describes the original work, such as "landscape,", "portrait,"
155 // "still liefe," etc.
156 case mmioFOURCC('I','G','N','R'): hdr
="Genre";break;
157 // Provides a list of keywords that refer to the file or subject of the
158 // file. Separate multiple keywords with a semicolon and a blank;
159 // for example, "Seattle, aerial view; scenery."
160 case mmioFOURCC('I','K','E','Y'): hdr
="Keywords";break;
161 // ILGT - Describes the changes in the lightness settings on the digitizer
162 // required to produce the file. Note that the format of this information
163 // depends on the hardware used.
164 case mmioFOURCC('I','L','G','T'): hdr
="Lightness";break;
165 // IMED - Decribes the original subject of the file, such as
166 // "computer image," "drawing," "lithograph," and so on.
167 case mmioFOURCC('I','M','E','D'): hdr
="Medium";break;
168 // INAM - Stores the title of the subject of the file, such as
169 // "Seattle from Above."
170 case mmioFOURCC('I','N','A','M'): hdr
="Title";break;
171 // IPLT - Specifies the number of colors requested when digitizing
172 // an image, such as "256."
173 case mmioFOURCC('I','P','L','T'): hdr
="Palette Setting";break;
174 // IPRD - Specifies the name of title the file was originally intended
175 // for, such as "Encyclopedia of Pacific Northwest Geography."
176 case mmioFOURCC('I','P','R','D'): hdr
="Product";break;
177 // ISBJ - Decsribes the contents of the file, such as
178 // "Aerial view of Seattle."
179 case mmioFOURCC('I','S','B','J'): hdr
="Subject";break;
180 // ISFT - Identifies the name of the software packages used to create the
181 // file, such as "Microsoft WaveEdit"
182 case mmioFOURCC('I','S','F','T'): hdr
="Software";break;
183 // ISHP - Identifies the change in sharpness for the digitizer
184 // required to produce the file (the format depends on the hardware used).
185 case mmioFOURCC('I','S','H','P'): hdr
="Sharpness";break;
186 // ISRC - Identifies the name of the person or organization who
187 // suplied the original subject of the file; for example, "Try Research."
188 case mmioFOURCC('I','S','R','C'): hdr
="Source";break;
189 // ISRF - Identifies the original form of the material that was digitized,
190 // such as "slide," "paper," "map," and so on. This is not necessarily
192 case mmioFOURCC('I','S','R','F'): hdr
="Source Form";break;
193 // ITCH - Identifies the technician who digitized the subject file;
194 // for example, "Smith, John."
195 case mmioFOURCC('I','T','C','H'): hdr
="Technician";break;
196 case mmioFOURCC('I','S','M','P'): hdr
="Time Code";break;
197 case mmioFOURCC('I','D','I','T'): hdr
="Digitization Time";break;
199 case ckidAVIMAINHDR
: // read 'avih'
200 stream_read(demuxer
->stream
,(char*) &avih
,FFMIN(size2
,sizeof(avih
)));
201 le2me_MainAVIHeader(&avih
); // swap to machine endian
202 chunksize
-=FFMIN(size2
,sizeof(avih
));
203 if( mp_msg_test(MSGT_HEADER
,MSGL_V
) ) print_avih(&avih
,MSGL_V
); // else print_avih_flags(&avih,MSGL_V);
205 case ckidSTREAMHEADER
: { // read 'strh'
207 stream_read(demuxer
->stream
,(char*) &h
,FFMIN(size2
,sizeof(h
)));
208 le2me_AVIStreamHeader(&h
); // swap to machine endian
209 chunksize
-=FFMIN(size2
,sizeof(h
));
211 if(h
.fccType
==streamtypeVIDEO
){
212 sh_video
=new_sh_video(demuxer
,stream_id
);
213 mp_msg(MSGT_DEMUX
, MSGL_INFO
, MSGTR_VideoID
, "aviheader", stream_id
);
214 memcpy(&sh_video
->video
,&h
,sizeof(h
));
215 sh_video
->stream_delay
= (float)sh_video
->video
.dwStart
* sh_video
->video
.dwScale
/sh_video
->video
.dwRate
;
217 if(h
.fccType
==streamtypeAUDIO
){
218 sh_audio
=new_sh_audio(demuxer
,stream_id
);
219 mp_msg(MSGT_DEMUX
, MSGL_INFO
, MSGTR_AudioID
, "aviheader", stream_id
);
220 memcpy(&sh_audio
->audio
,&h
,sizeof(h
));
221 sh_audio
->stream_delay
= (float)sh_audio
->audio
.dwStart
* sh_audio
->audio
.dwScale
/sh_audio
->audio
.dwRate
;
223 last_fccType
=h
.fccType
;
224 last_fccHandler
=h
.fccHandler
;
225 if( mp_msg_test(MSGT_HEADER
,MSGL_V
) ) print_strh(&h
,MSGL_V
);
227 case mmioFOURCC('i', 'n', 'd', 'x'): {
229 avisuperindex_chunk
*s
;
231 if(!index_mode
) break;
237 priv
->suidx
= realloc_struct(priv
->suidx
, priv
->suidx_size
, sizeof (avisuperindex_chunk
));
238 s
= &priv
->suidx
[priv
->suidx_size
-1];
241 memcpy(s
->fcc
, "indx", 4);
243 s
->wLongsPerEntry
= stream_read_word_le(demuxer
->stream
);
244 s
->bIndexSubType
= stream_read_char(demuxer
->stream
);
245 s
->bIndexType
= stream_read_char(demuxer
->stream
);
246 s
->nEntriesInUse
= stream_read_dword_le(demuxer
->stream
);
247 *(uint32_t *)s
->dwChunkId
= stream_read_dword_le(demuxer
->stream
);
248 stream_read(demuxer
->stream
, (char *)s
->dwReserved
, 3*4);
249 memset(s
->dwReserved
, 0, 3*4);
251 print_avisuperindex_chunk(s
,MSGL_V
);
253 // Check and fix this useless crap
254 if(s
->wLongsPerEntry
!= sizeof (avisuperindex_entry
)/4) {
255 mp_msg (MSGT_HEADER
, MSGL_WARN
, "Broken super index chunk size: %u\n",s
->wLongsPerEntry
);
256 s
->wLongsPerEntry
= sizeof(avisuperindex_entry
)/4;
258 if( ((chunksize
/4)/s
->wLongsPerEntry
) < s
->nEntriesInUse
){
259 mp_msg (MSGT_HEADER
, MSGL_WARN
, "Broken super index chunk\n");
260 s
->nEntriesInUse
= (chunksize
/4)/s
->wLongsPerEntry
;
263 s
->aIndex
= calloc(s
->nEntriesInUse
, sizeof (avisuperindex_entry
));
264 s
->stdidx
= calloc(s
->nEntriesInUse
, sizeof (avistdindex_chunk
));
266 // now the real index of indices
267 for (i
=0; i
<s
->nEntriesInUse
; i
++) {
269 s
->aIndex
[i
].qwOffset
= stream_read_qword_le(demuxer
->stream
);
270 s
->aIndex
[i
].dwSize
= stream_read_dword_le(demuxer
->stream
);
271 s
->aIndex
[i
].dwDuration
= stream_read_dword_le(demuxer
->stream
);
272 mp_msg (MSGT_HEADER
, MSGL_V
, "ODML (%.4s): [%d] 0x%016"PRIx64
" 0x%04x %u\n",
274 (uint64_t)s
->aIndex
[i
].qwOffset
, s
->aIndex
[i
].dwSize
, s
->aIndex
[i
].dwDuration
);
278 case ckidSTREAMFORMAT
: { // read 'strf'
279 if(last_fccType
==streamtypeVIDEO
){
280 sh_video
->bih
=calloc(FFMAX(chunksize
, sizeof(BITMAPINFOHEADER
)), 1);
281 // sh_video->bih=malloc(chunksize); memset(sh_video->bih,0,chunksize);
282 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_FoundBitmapInfoHeader
,chunksize
,sizeof(BITMAPINFOHEADER
));
283 stream_read(demuxer
->stream
,(char*) sh_video
->bih
,chunksize
);
284 le2me_BITMAPINFOHEADER(sh_video
->bih
); // swap to machine endian
285 if (sh_video
->bih
->biSize
> chunksize
&& sh_video
->bih
->biSize
> sizeof(BITMAPINFOHEADER
))
286 sh_video
->bih
->biSize
= chunksize
;
287 // fixup MS-RLE header (seems to be broken for <256 color files)
288 if(sh_video
->bih
->biCompression
<=1 && sh_video
->bih
->biSize
==40)
289 sh_video
->bih
->biSize
=chunksize
;
290 if( mp_msg_test(MSGT_HEADER
,MSGL_V
) ) print_video_header(sh_video
->bih
,MSGL_V
);
292 sh_video
->fps
=(float)sh_video
->video
.dwRate
/(float)sh_video
->video
.dwScale
;
293 sh_video
->frametime
=(float)sh_video
->video
.dwScale
/(float)sh_video
->video
.dwRate
;
294 sh_video
->format
= sh_video
->bih
->biCompression
;
295 // if(demuxer->video->id==-1) demuxer->video->id=stream_id;
297 idxfix_videostream
=stream_id
;
298 switch(sh_video
->bih
->biCompression
){
299 case mmioFOURCC('M', 'P', 'G', '4'):
300 case mmioFOURCC('m', 'p', 'g', '4'):
301 case mmioFOURCC('D', 'I', 'V', '1'):
302 idxfix_divx
=3; // set index recovery mpeg4 flavour: msmpeg4v1
303 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_RegeneratingKeyfTableForMPG4V1
);
305 case mmioFOURCC('D', 'I', 'V', '3'):
306 case mmioFOURCC('d', 'i', 'v', '3'):
307 case mmioFOURCC('D', 'I', 'V', '4'):
308 case mmioFOURCC('d', 'i', 'v', '4'):
309 case mmioFOURCC('D', 'I', 'V', '5'):
310 case mmioFOURCC('d', 'i', 'v', '5'):
311 case mmioFOURCC('D', 'I', 'V', '6'):
312 case mmioFOURCC('d', 'i', 'v', '6'):
313 case mmioFOURCC('M', 'P', '4', '3'):
314 case mmioFOURCC('m', 'p', '4', '3'):
315 case mmioFOURCC('M', 'P', '4', '2'):
316 case mmioFOURCC('m', 'p', '4', '2'):
317 case mmioFOURCC('D', 'I', 'V', '2'):
318 case mmioFOURCC('A', 'P', '4', '1'):
319 idxfix_divx
=1; // set index recovery mpeg4 flavour: msmpeg4v3
320 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_RegeneratingKeyfTableForDIVX3
);
322 case mmioFOURCC('D', 'I', 'V', 'X'):
323 case mmioFOURCC('d', 'i', 'v', 'x'):
324 case mmioFOURCC('D', 'X', '5', '0'):
325 case mmioFOURCC('X', 'V', 'I', 'D'):
326 case mmioFOURCC('x', 'v', 'i', 'd'):
327 case mmioFOURCC('F', 'M', 'P', '4'):
328 case mmioFOURCC('f', 'm', 'p', '4'):
329 idxfix_divx
=2; // set index recovery mpeg4 flavour: generic mpeg4
330 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_RegeneratingKeyfTableForMPEG4
);
334 if(last_fccType
==streamtypeAUDIO
){
335 unsigned wf_size
= chunksize
<sizeof(WAVEFORMATEX
)?sizeof(WAVEFORMATEX
):chunksize
;
336 sh_audio
->wf
=calloc(wf_size
,1);
337 // sh_audio->wf=malloc(chunksize); memset(sh_audio->wf,0,chunksize);
338 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_FoundWaveFmt
,chunksize
,sizeof(WAVEFORMATEX
));
339 stream_read(demuxer
->stream
,(char*) sh_audio
->wf
,chunksize
);
340 le2me_WAVEFORMATEX(sh_audio
->wf
);
341 if (sh_audio
->wf
->cbSize
!= 0 &&
342 wf_size
< sizeof(WAVEFORMATEX
)+sh_audio
->wf
->cbSize
) {
343 sh_audio
->wf
=realloc(sh_audio
->wf
, sizeof(WAVEFORMATEX
)+sh_audio
->wf
->cbSize
);
345 sh_audio
->format
=sh_audio
->wf
->wFormatTag
;
346 if (sh_audio
->format
== 1 &&
347 last_fccHandler
== mmioFOURCC('A', 'x', 'a', 'n'))
348 sh_audio
->format
= last_fccHandler
;
349 sh_audio
->i_bps
=sh_audio
->wf
->nAvgBytesPerSec
;
351 if( mp_msg_test(MSGT_HEADER
,MSGL_V
) ) print_wave_header(sh_audio
->wf
,MSGL_V
);
352 ++priv
->audio_streams
;
353 // if(demuxer->audio->id==-1) demuxer->audio->id=stream_id;
357 case mmioFOURCC('v', 'p', 'r', 'p'): {
358 VideoPropHeader
*vprp
= malloc(chunksize
);
360 stream_read(demuxer
->stream
, (void*)vprp
, chunksize
);
361 le2me_VideoPropHeader(vprp
);
362 chunksize
-= sizeof(*vprp
)-sizeof(vprp
->FieldInfo
);
363 chunksize
/= sizeof(VIDEO_FIELD_DESC
);
364 if (vprp
->nbFieldPerFrame
> chunksize
) {
365 vprp
->nbFieldPerFrame
= chunksize
;
368 for (i
=0; i
<vprp
->nbFieldPerFrame
; i
++) {
369 le2me_VIDEO_FIELD_DESC(&vprp
->FieldInfo
[i
]);
372 sh_video
->aspect
= GET_AVI_ASPECT(vprp
->dwFrameAspectRatio
);
374 if( mp_msg_test(MSGT_HEADER
,MSGL_V
) ) print_vprp(vprp
,MSGL_V
);
378 case mmioFOURCC('d', 'm', 'l', 'h'): {
379 // dmlh 00 00 00 04 frms
380 unsigned int total_frames
= stream_read_dword_le(demuxer
->stream
);
381 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_FoundAVIV2Header
, chunksize
, total_frames
);
382 stream_skip(demuxer
->stream
, chunksize
-4);
386 case ckidAVINEWINDEX
:
387 if(demuxer
->movi_end
>stream_tell(demuxer
->stream
))
388 demuxer
->movi_end
=stream_tell(demuxer
->stream
); // fixup movi-end
389 if(index_mode
&& !priv
->isodml
){
391 priv
->idx_size
=size2
>>4;
392 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_ReadingIndexBlockChunksForFrames
,
393 priv
->idx_size
,avih
.dwTotalFrames
, (int64_t)stream_tell(demuxer
->stream
));
394 priv
->idx
=malloc(priv
->idx_size
<<4);
395 // printf("\nindex to %p !!!!! (priv=%p)\n",priv->idx,priv);
396 stream_read(demuxer
->stream
,(char*)priv
->idx
,priv
->idx_size
<<4);
397 for (i
= 0; i
< priv
->idx_size
; i
++) { // swap index to machine endian
398 AVIINDEXENTRY
*entry
=(AVIINDEXENTRY
*)priv
->idx
+ i
;
399 le2me_AVIINDEXENTRY(entry
);
401 * We (ab)use the upper word for bits 32-47 of the offset, so
402 * we'll clear them here.
403 * FIXME: AFAIK no codec uses them, but if one does it will break
405 entry
->dwFlags
&=0xffff;
407 chunksize
-=priv
->idx_size
<<4;
408 if( mp_msg_test(MSGT_HEADER
,MSGL_DBG2
) ) print_index(priv
->idx
,priv
->idx_size
,MSGL_DBG2
);
412 case mmioFOURCC('R','I','F','F'): {
415 mp_msg(MSGT_HEADER
, MSGL_V
, MSGTR_MPDEMUX_AVIHDR_AdditionalRIFFHdr
);
416 stream_read(demuxer
->stream
, riff_type
, sizeof riff_type
);
417 if (strncmp(riff_type
, "AVIX", sizeof riff_type
))
418 mp_msg(MSGT_HEADER
, MSGL_WARN
, MSGTR_MPDEMUX_AVIHDR_WarnNotExtendedAVIHdr
);
421 * We got an extended AVI header, so we need to switch to
422 * ODML to get seeking to work, provided we got indx chunks
423 * in the header (suidx_size > 0).
425 if (priv
->suidx_size
> 0)
429 list_end
= 0; /* a new list will follow */
432 stream_skip(demuxer
->stream
, chunksize
);
437 mp_msg(MSGT_HEADER
,MSGL_V
,"hdr=%s size=%u\n",hdr
,size2
);
439 chunksize
=1; // empty
442 int len
=(size2
<250)?size2
:250;
443 stream_read(demuxer
->stream
,buf
,len
);
446 mp_msg(MSGT_HEADER
,MSGL_V
,"%-10s: %s\n",hdr
,buf
);
447 demux_info_add(demuxer
, hdr
, buf
);
450 mp_msg(MSGT_HEADER
,MSGL_DBG2
,"list_end=0x%"PRIX64
" pos=0x%"PRIX64
" chunksize=0x%"PRIX64
" next=0x%"PRIX64
"\n",
451 (int64_t)list_end
, (int64_t)stream_tell(demuxer
->stream
),
452 (int64_t)chunksize
, (int64_t)chunksize
+(int64_t)stream_tell(demuxer
->stream
));
454 chunksize
+stream_tell(demuxer
->stream
) == list_end
) list_end
=0;
455 if(list_end
>0 && chunksize
+stream_tell(demuxer
->stream
)>list_end
){
456 mp_msg(MSGT_HEADER
,MSGL_V
,MSGTR_MPDEMUX_AVIHDR_BrokenChunk
,chunksize
,(char *) &id
);
457 stream_seek(demuxer
->stream
,list_end
);
460 if(chunksize
>0) stream_skip(demuxer
->stream
,chunksize
); else
461 if((int)chunksize
<0) mp_msg(MSGT_HEADER
,MSGL_WARN
,"chunksize=%u (id=%.4s)\n",chunksize
,(char *) &id
);
465 if (priv
->suidx_size
> 0 && priv
->idx_size
== 0) {
467 * No NEWAVIINDEX, but we got an OpenDML index.
472 if (priv
->isodml
&& (index_mode
==-1 || index_mode
==0 || index_mode
==1)) {
475 avisuperindex_chunk
*cx
;
479 if (priv
->idx_size
) free(priv
->idx
);
481 priv
->idx_offset
= 0;
484 mp_msg(MSGT_HEADER
, MSGL_INFO
, MSGTR_MPDEMUX_AVIHDR_BuildingODMLidx
, priv
->suidx_size
);
486 // read the standard indices
487 for (cx
= &priv
->suidx
[0], i
=0; i
<priv
->suidx_size
; cx
++, i
++) {
488 stream_reset(demuxer
->stream
);
489 for (j
=0; j
<cx
->nEntriesInUse
; j
++) {
491 memset(&cx
->stdidx
[j
], 0, 32);
492 ret1
= stream_seek(demuxer
->stream
, (off_t
)cx
->aIndex
[j
].qwOffset
);
493 ret2
= stream_read(demuxer
->stream
, (char *)&cx
->stdidx
[j
], 32);
494 if (ret1
!= 1 || ret2
!= 32 || cx
->stdidx
[j
].nEntriesInUse
==0) {
495 // this is a broken file (probably incomplete) let the standard
496 // gen_index routine handle this
499 mp_msg(MSGT_HEADER
, MSGL_WARN
, MSGTR_MPDEMUX_AVIHDR_BrokenODMLfile
);
503 le2me_AVISTDIDXCHUNK(&cx
->stdidx
[j
]);
504 print_avistdindex_chunk(&cx
->stdidx
[j
],MSGL_V
);
505 priv
->idx_size
+= cx
->stdidx
[j
].nEntriesInUse
;
506 cx
->stdidx
[j
].aIndex
= malloc(cx
->stdidx
[j
].nEntriesInUse
*sizeof(avistdindex_entry
));
507 stream_read(demuxer
->stream
, (char *)cx
->stdidx
[j
].aIndex
,
508 cx
->stdidx
[j
].nEntriesInUse
*sizeof(avistdindex_entry
));
509 for (k
=0;k
<cx
->stdidx
[j
].nEntriesInUse
; k
++)
510 le2me_AVISTDIDXENTRY(&cx
->stdidx
[j
].aIndex
[k
]);
512 cx
->stdidx
[j
].dwReserved3
= 0;
518 * We convert the index by translating all entries into AVIINDEXENTRYs
519 * and sorting them by offset. The result should be the same index
520 * we would get with -forceidx.
523 idx
= priv
->idx
= malloc(priv
->idx_size
* sizeof (AVIINDEXENTRY
));
525 for (cx
= priv
->suidx
; cx
!= &priv
->suidx
[priv
->suidx_size
]; cx
++) {
526 avistdindex_chunk
*sic
;
527 for (sic
= cx
->stdidx
; sic
!= &cx
->stdidx
[cx
->nEntriesInUse
]; sic
++) {
528 avistdindex_entry
*sie
;
529 for (sie
= sic
->aIndex
; sie
!= &sic
->aIndex
[sic
->nEntriesInUse
]; sie
++) {
530 uint64_t off
= sic
->qwBaseOffset
+ sie
->dwOffset
- 8;
531 memcpy(&idx
->ckid
, sic
->dwChunkId
, 4);
532 idx
->dwChunkOffset
= off
;
533 idx
->dwFlags
= (off
>> 32) << 16;
534 idx
->dwChunkLength
= sie
->dwSize
& 0x7fffffff;
535 idx
->dwFlags
|= (sie
->dwSize
&0x80000000)?0x0:AVIIF_KEYFRAME
; // bit 31 denotes !keyframe
540 qsort(priv
->idx
, priv
->idx_size
, sizeof(AVIINDEXENTRY
), avi_idx_cmp
);
543 Hack to work around a "wrong" index in some divx odml files
544 (processor_burning.avi as an example)
545 They have ##dc on non keyframes but the ix00 tells us they are ##db.
546 Read the fcc of a non-keyframe vid frame and check it.
552 stream_reset (demuxer
->stream
);
554 // find out the video stream id. I have seen files with 01db.
555 for (idx
= &((AVIINDEXENTRY
*)priv
->idx
)[0], i
=0; i
<priv
->idx_size
; i
++, idx
++){
556 unsigned char res
[2];
557 if (odml_get_vstream_id(idx
->ckid
, res
)) {
558 db
= mmioFOURCC(res
[0], res
[1], 'd', 'b');
563 // find first non keyframe
564 for (idx
= &((AVIINDEXENTRY
*)priv
->idx
)[0], i
=0; i
<priv
->idx_size
; i
++, idx
++){
565 if (!(idx
->dwFlags
& AVIIF_KEYFRAME
) && idx
->ckid
== db
) break;
567 if (i
<priv
->idx_size
&& db
) {
568 stream_seek(demuxer
->stream
, AVI_IDX_OFFSET(idx
));
569 id
= stream_read_dword_le(demuxer
->stream
);
570 if (id
&& id
!= db
) // index fcc and real fcc differ? fix it.
571 for (idx
= &((AVIINDEXENTRY
*)priv
->idx
)[0], i
=0; i
<priv
->idx_size
; i
++, idx
++){
572 if (!(idx
->dwFlags
& AVIIF_KEYFRAME
) && idx
->ckid
== db
)
578 if ( mp_msg_test(MSGT_HEADER
,MSGL_DBG2
) ) print_index(priv
->idx
, priv
->idx_size
,MSGL_DBG2
);
580 demuxer
->movi_end
=demuxer
->stream
->end_pos
;
584 // free unneeded stuff
585 cx
= &priv
->suidx
[0];
587 for (j
=0;j
<cx
->nEntriesInUse
;j
++)
588 if (cx
->stdidx
[j
].nEntriesInUse
) free(cx
->stdidx
[j
].aIndex
);
591 } while (cx
++ != &priv
->suidx
[priv
->suidx_size
-1]);
596 /* Read a saved index file */
597 if (index_file_load
) {
602 if ((fp
= fopen(index_file_load
, "r")) == NULL
) {
603 mp_msg(MSGT_HEADER
,MSGL_ERR
, MSGTR_MPDEMUX_AVIHDR_CantReadIdxFile
, index_file_load
, strerror(errno
));
606 fread(&magic
, 6, 1, fp
);
607 if (strncmp(magic
, "MPIDX1", 6)) {
608 mp_msg(MSGT_HEADER
,MSGL_ERR
, MSGTR_MPDEMUX_AVIHDR_NotValidMPidxFile
, index_file_load
);
611 fread(&priv
->idx_size
, sizeof(priv
->idx_size
), 1, fp
);
612 priv
->idx
=malloc(priv
->idx_size
*sizeof(AVIINDEXENTRY
));
614 mp_msg(MSGT_HEADER
,MSGL_ERR
, MSGTR_MPDEMUX_AVIHDR_FailedMallocForIdxFile
, index_file_load
);
619 for (i
=0; i
<priv
->idx_size
;i
++) {
621 idx
=&((AVIINDEXENTRY
*)priv
->idx
)[i
];
622 fread(idx
, sizeof(AVIINDEXENTRY
), 1, fp
);
624 mp_msg(MSGT_HEADER
,MSGL_ERR
, MSGTR_MPDEMUX_AVIHDR_PrematureEOF
, index_file_load
);
631 mp_msg(MSGT_HEADER
,MSGL_INFO
, MSGTR_MPDEMUX_AVIHDR_IdxFileLoaded
, index_file_load
);
634 if(index_mode
>=2 || (priv
->idx_size
==0 && index_mode
==1)){
635 // build index for file:
636 stream_reset(demuxer
->stream
);
637 stream_seek(demuxer
->stream
,demuxer
->movi_start
);
649 demuxer
->filepos
=stream_tell(demuxer
->stream
);
650 if(demuxer
->filepos
>=demuxer
->movi_end
&& demuxer
->movi_start
<demuxer
->movi_end
) break;
651 id
=stream_read_dword_le(demuxer
->stream
);
652 len
=stream_read_dword_le(demuxer
->stream
);
653 if(id
==mmioFOURCC('L','I','S','T') || id
==mmioFOURCC('R', 'I', 'F', 'F')){
654 id
=stream_read_dword_le(demuxer
->stream
); // list or RIFF type
657 if(stream_eof(demuxer
->stream
)) break;
658 if(!id
|| avi_stream_id(id
)==100) goto skip_chunk
; // bad ID (or padding?)
660 if(priv
->idx_pos
>=priv
->idx_size
){
661 // priv->idx_size+=32;
662 priv
->idx_size
+=1024; // +16kB
663 priv
->idx
=realloc(priv
->idx
,priv
->idx_size
*sizeof(AVIINDEXENTRY
));
664 if(!priv
->idx
){priv
->idx_pos
=0; break;} // error!
666 idx
=&((AVIINDEXENTRY
*)priv
->idx
)[priv
->idx_pos
++];
668 idx
->dwFlags
=AVIIF_KEYFRAME
; // FIXME
669 idx
->dwFlags
|=(demuxer
->filepos
>>16)&0xffff0000U
;
670 idx
->dwChunkOffset
=(unsigned long)demuxer
->filepos
;
671 idx
->dwChunkLength
=len
;
673 c
=stream_read_dword(demuxer
->stream
);
675 if(!len
) idx
->dwFlags
&=~AVIIF_KEYFRAME
;
677 // Fix keyframes for DivX files:
679 if(avi_stream_id(id
)==idxfix_videostream
){
681 case 3: c
=stream_read_dword(demuxer
->stream
)<<5; //skip 32+5 bits for m$mpeg4v1
682 case 1: if(c
&0x40000000) idx
->dwFlags
&=~AVIIF_KEYFRAME
;break; // divx 3
683 case 2: if(c
==0x1B6) idx
->dwFlags
&=~AVIIF_KEYFRAME
;break; // divx 4
687 // update status line:
688 { static off_t lastpos
;
690 off_t len
=demuxer
->movi_end
-demuxer
->movi_start
;
692 pos
=100*(demuxer
->filepos
-demuxer
->movi_start
)/len
; // %
694 pos
=(demuxer
->filepos
-demuxer
->movi_start
)>>20; // MB
698 mp_msg(MSGT_HEADER
,MSGL_STATUS
,MSGTR_MPDEMUX_AVIHDR_GeneratingIdx
,
699 (unsigned long)pos
, len
?"%":"MB");
702 mp_dbg(MSGT_HEADER
,MSGL_DBG2
,"%08X %08X %.4s %08X %X\n",(unsigned int)demuxer
->filepos
,id
,(char *) &id
,(int)c
,(unsigned int) idx
->dwFlags
);
704 { unsigned char tmp
[64];
706 stream_read(demuxer
->stream
,tmp
,64);
708 for(i
=0;i
<64;i
++) printf(" %02X",tmp
[i
]);
713 skip
=(len
+1)&(~1UL); // total bytes in this chunk
714 stream_seek(demuxer
->stream
,8+demuxer
->filepos
+skip
);
716 priv
->idx_size
=priv
->idx_pos
;
717 mp_msg(MSGT_HEADER
,MSGL_INFO
,MSGTR_MPDEMUX_AVIHDR_IdxGeneratedForHowManyChunks
,priv
->idx_size
);
718 if( mp_msg_test(MSGT_HEADER
,MSGL_DBG2
) ) print_index(priv
->idx
,priv
->idx_size
,MSGL_DBG2
);
720 /* Write generated index to a file */
721 if (index_file_save
) {
725 if ((fp
=fopen(index_file_save
, "w")) == NULL
) {
726 mp_msg(MSGT_HEADER
,MSGL_ERR
, MSGTR_MPDEMUX_AVIHDR_Failed2WriteIdxFile
, index_file_save
, strerror(errno
));
729 fwrite("MPIDX1", 6, 1, fp
);
730 fwrite(&priv
->idx_size
, sizeof(priv
->idx_size
), 1, fp
);
731 for (i
=0; i
<priv
->idx_size
; i
++) {
732 AVIINDEXENTRY
*idx
= &((AVIINDEXENTRY
*)priv
->idx
)[i
];
733 fwrite(idx
, sizeof(AVIINDEXENTRY
), 1, fp
);
736 mp_msg(MSGT_HEADER
,MSGL_INFO
, MSGTR_MPDEMUX_AVIHDR_IdxFileSaved
, index_file_save
);