added a stream_UrlNew to open a general purpos stream_t from a url.
[vlc.git] / modules / demux / mp4 / libmp4.c
1 /*****************************************************************************
2  * libmp4.c : LibMP4 library for mp4 module for vlc
3  *****************************************************************************
4  * Copyright (C) 2001-2004 VideoLAN
5  * $Id$
6  *
7  * Author: Laurent Aimar <fenrir@via.ecp.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23 #include <stdlib.h>                                      /* malloc(), free() */
24
25 #include <vlc/vlc.h>
26 #include <vlc/input.h>
27
28 #ifdef HAVE_ZLIB_H
29 #   include <zlib.h>                                  /* for compressed moov */
30 #endif
31
32 #include "libmp4.h"
33 #include "drms.h"
34
35 /*****************************************************************************
36  * Here are defined some macro to make life simpler but before using it
37  *  *look* at the code.
38  *
39  *****************************************************************************/
40 #define MP4_BOX_HEADERSIZE( p_box ) \
41   ( 8 + ( p_box->i_shortsize == 1 ? 8 : 0 ) \
42       + ( p_box->i_type == FOURCC_uuid ? 16 : 0 ) )
43
44 #define MP4_GET1BYTE( dst ) \
45     dst = *p_peek; p_peek++; i_read--
46
47 #define MP4_GET2BYTES( dst ) \
48     dst = GetWBE( p_peek ); p_peek += 2; i_read -= 2
49
50 #define MP4_GET3BYTES( dst ) \
51     dst = Get24bBE( p_peek ); p_peek += 3; i_read -= 3
52
53 #define MP4_GET4BYTES( dst ) \
54     dst = GetDWBE( p_peek ); p_peek += 4; i_read -= 4
55
56 #define MP4_GETFOURCC( dst ) \
57     dst = VLC_FOURCC( p_peek[0], p_peek[1], p_peek[2], p_peek[3] ); \
58     p_peek += 4; i_read -= 4
59
60 #define MP4_GET8BYTES( dst ) \
61     dst = GetQWBE( p_peek ); p_peek += 8; i_read -= 8
62
63 #define MP4_GETVERSIONFLAGS( p_void ) \
64     MP4_GET1BYTE( p_void->i_version ); \
65     MP4_GET3BYTES( p_void->i_flags )
66
67 #define MP4_GETSTRINGZ( p_str ) \
68     if( ( i_read > 0 )&&(p_peek[0] ) ) \
69     { \
70         p_str = calloc( sizeof( char ), __MIN( strlen( p_peek ), i_read )+1);\
71         memcpy( p_str, p_peek, __MIN( strlen( p_peek ), i_read ) ); \
72         p_str[__MIN( strlen( p_peek ), i_read )] = 0; \
73         p_peek += strlen( p_str ) + 1; \
74         i_read -= strlen( p_str ) + 1; \
75     } \
76     else \
77     { \
78         p_str = NULL; \
79     }
80
81
82 #define MP4_READBOX_ENTER( MP4_Box_data_TYPE_t ) \
83     int64_t  i_read = p_box->i_size; \
84     uint8_t *p_peek, *p_buff; \
85     i_read = p_box->i_size; \
86     if( !( p_peek = p_buff = malloc( i_read ) ) ) \
87     { \
88         return( 0 ); \
89     } \
90     if( stream_Read( p_stream, p_peek, i_read ) < i_read )\
91     { \
92         free( p_buff ); \
93         return( 0 ); \
94     } \
95     p_peek += MP4_BOX_HEADERSIZE( p_box ); \
96     i_read -= MP4_BOX_HEADERSIZE( p_box ); \
97     if( !( p_box->data.p_data = malloc( sizeof( MP4_Box_data_TYPE_t ) ) ) ) \
98     { \
99       free( p_buff ); \
100       return( 0 ); \
101     }
102
103 #define MP4_READBOX_EXIT( i_code ) \
104     free( p_buff ); \
105     if( i_read < 0 ) \
106     { \
107         msg_Warn( p_stream, "Not enough data" ); \
108     } \
109     return( i_code )
110
111 #define FREE( p ) \
112     if( p ) {free( p ); p = NULL; }
113
114
115
116 /* Some assumptions:
117         * The input method HAVE to be seekable
118
119 */
120
121 static uint32_t Get24bBE( uint8_t *p )
122 {
123     return( ( p[0] <<16 ) + ( p[1] <<8 ) + p[2] );
124 }
125
126 static void GetUUID( UUID_t *p_uuid, uint8_t *p_buff )
127 {
128     memcpy( p_uuid, p_buff, 16 );
129 }
130
131 static void CreateUUID( UUID_t *p_uuid, uint32_t i_fourcc )
132 {
133     /* made by 0xXXXXXXXX-0011-0010-8000-00aa00389b71
134             where XXXXXXXX is the fourcc */
135     /* FIXME implement this */
136 }
137
138 /* some functions for mp4 encoding of variables */
139
140 static void MP4_ConvertDate2Str( char *psz, uint64_t i_date )
141 {
142     int i_day;
143     int i_hour;
144     int i_min;
145     int i_sec;
146
147     /* date begin at 1 jan 1904 */
148     i_date += ((I64C(1904) * 365) + 17) * 24 * 60 * 60;
149
150     i_day = i_date / ( 60*60*24);
151     i_hour = ( i_date /( 60*60 ) ) % 60;
152     i_min  = ( i_date / 60 ) % 60;
153     i_sec =  i_date % 60;
154     sprintf( psz, "%dd-%2.2dh:%2.2dm:%2.2ds", i_day, i_hour, i_min, i_sec );
155 }
156
157 /*****************************************************************************
158  * Some prototypes.
159  *****************************************************************************/
160 static MP4_Box_t *MP4_ReadBox( stream_t *p_stream, MP4_Box_t *p_father );
161
162
163 /*****************************************************************************
164  * MP4_ReadBoxCommon : Load only common parameters for all boxes
165  *****************************************************************************
166  * p_box need to be an already allocated MP4_Box_t, and all data
167  *  will only be peek not read
168  *
169  * RETURN : 0 if it fail, 1 otherwise
170  *****************************************************************************/
171 int MP4_ReadBoxCommon( stream_t *p_stream, MP4_Box_t *p_box )
172 {
173     int      i_read;
174     uint8_t  *p_peek;
175
176     if( ( ( i_read = stream_Peek( p_stream, &p_peek, 32 ) ) < 8 ) )
177     {
178         return 0;
179     }
180     p_box->i_pos = stream_Tell( p_stream );
181
182     p_box->data.p_data = NULL;
183     p_box->p_father = NULL;
184     p_box->p_first  = NULL;
185     p_box->p_last  = NULL;
186     p_box->p_next   = NULL;
187
188     MP4_GET4BYTES( p_box->i_shortsize );
189     MP4_GETFOURCC( p_box->i_type );
190
191     /* Now special case */
192
193     if( p_box->i_shortsize == 1 )
194     {
195         /* get the true size on 64 bits */
196         MP4_GET8BYTES( p_box->i_size );
197     }
198     else
199     {
200         p_box->i_size = p_box->i_shortsize;
201         /* XXX size of 0 means that the box extends to end of file */
202     }
203
204     if( p_box->i_type == FOURCC_uuid )
205     {
206         /* get extented type on 16 bytes */
207         GetUUID( &p_box->i_uuid, p_peek );
208         p_peek += 16; i_read -= 16;
209     }
210     else
211     {
212         CreateUUID( &p_box->i_uuid, p_box->i_type );
213     }
214 #ifdef MP4_VERBOSE
215     if( p_box->i_size )
216     {
217         msg_Dbg( p_stream, "found Box: %4.4s size "I64Fd,
218                  (char*)&p_box->i_type, p_box->i_size );
219     }
220 #endif
221
222     return 1;
223 }
224
225 /*****************************************************************************
226  * MP4_NextBox : Go to the next box
227  *****************************************************************************
228  * if p_box == NULL, go to the next box in witch we are( at the begining ).
229  *****************************************************************************/
230 static int MP4_NextBox( stream_t *p_stream, MP4_Box_t *p_box )
231 {
232     MP4_Box_t box;
233
234     if( !p_box )
235     {
236         MP4_ReadBoxCommon( p_stream, &box );
237         p_box = &box;
238     }
239
240     if( !p_box->i_size )
241     {
242         return 2; /* Box with infinite size */
243     }
244
245     if( p_box->p_father )
246     {
247         /* check if it's within p-father */
248         if( p_box->i_size + p_box->i_pos >=
249             p_box->p_father->i_size + p_box->p_father->i_pos )
250         {
251             return 0; /* out of bound */
252         }
253     }
254     if( stream_Seek( p_stream, p_box->i_size + p_box->i_pos ) )
255     {
256         return 0;
257     }
258
259     return 1;
260 }
261
262 /*****************************************************************************
263  * For all known box a loader is given,
264  *  XXX: all common struct have to be already read by MP4_ReadBoxCommon
265  *       after called one of theses functions, file position is unknown
266  *       you need to call MP4_GotoBox to go where you want
267  *****************************************************************************/
268 static int MP4_ReadBoxContainerRaw( stream_t *p_stream, MP4_Box_t *p_container )
269 {
270     MP4_Box_t *p_box;
271
272     if( stream_Tell( p_stream ) + 8 >
273         (off_t)(p_container->i_pos + p_container->i_size) )
274     {
275         /* there is no box to load */
276         return 0;
277     }
278
279     do
280     {
281         if( ( p_box = MP4_ReadBox( p_stream, p_container ) ) == NULL ) break;
282
283         /* chain this box with the father and the other at same level */
284         if( !p_container->p_first ) p_container->p_first = p_box;
285         else p_container->p_last->p_next = p_box;
286         p_container->p_last = p_box;
287
288     } while( MP4_NextBox( p_stream, p_box ) == 1 );
289
290     return 1;
291 }
292
293 static int MP4_ReadBoxContainer( stream_t *p_stream, MP4_Box_t *p_container )
294 {
295     if( p_container->i_size <= (size_t)MP4_BOX_HEADERSIZE(p_container ) + 8 )
296     {
297         /* container is empty, 8 stand for the first header in this box */
298         return 1;
299     }
300
301     /* enter box */
302     stream_Seek( p_stream, p_container->i_pos +
303                  MP4_BOX_HEADERSIZE( p_container ) );
304
305     return MP4_ReadBoxContainerRaw( p_stream, p_container );
306 }
307
308 static void MP4_FreeBox_Common( MP4_Box_t *p_box )
309 {
310     /* Up to now do nothing */
311 }
312
313 static int MP4_ReadBoxSkip( stream_t *p_stream, MP4_Box_t *p_box )
314 {
315     /* XXX sometime moov is hiden in a free box */
316     if( p_box->p_father &&
317         p_box->p_father->i_type == VLC_FOURCC( 'r', 'o', 'o', 't' ) &&
318         p_box->i_type == FOURCC_free )
319     {
320         uint8_t *p_peek;
321         int     i_read;
322         vlc_fourcc_t i_fcc;
323
324         i_read  = stream_Peek( p_stream, &p_peek, 44 );
325
326         p_peek += MP4_BOX_HEADERSIZE( p_box ) + 4;
327         i_read -= MP4_BOX_HEADERSIZE( p_box ) + 4;
328
329         if( i_read >= 8 )
330         {
331             i_fcc = VLC_FOURCC( p_peek[0], p_peek[1], p_peek[2], p_peek[3] );
332
333             if( i_fcc == FOURCC_cmov || i_fcc == FOURCC_mvhd )
334             {
335                 msg_Warn( p_stream, "detected moov hidden in a free box ..." );
336
337                 p_box->i_type = FOURCC_foov;
338                 return MP4_ReadBoxContainer( p_stream, p_box );
339             }
340         }
341     }
342
343     /* Nothing to do */
344 #ifdef MP4_VERBOSE
345     msg_Dbg( p_stream, "skip box: \"%4.4s\"", (char*)&p_box->i_type );
346 #endif
347     return 1;
348 }
349
350 static int MP4_ReadBox_ftyp( stream_t *p_stream, MP4_Box_t *p_box )
351 {
352     MP4_READBOX_ENTER( MP4_Box_data_ftyp_t );
353
354     MP4_GETFOURCC( p_box->data.p_ftyp->i_major_brand );
355     MP4_GET4BYTES( p_box->data.p_ftyp->i_minor_version );
356
357     if( ( p_box->data.p_ftyp->i_compatible_brands_count = i_read / 4 ) )
358     {
359         unsigned int i;
360         p_box->data.p_ftyp->i_compatible_brands =
361             calloc( p_box->data.p_ftyp->i_compatible_brands_count, sizeof(uint32_t));
362
363         for( i =0; i < p_box->data.p_ftyp->i_compatible_brands_count; i++ )
364         {
365             MP4_GETFOURCC( p_box->data.p_ftyp->i_compatible_brands[i] );
366         }
367     }
368     else
369     {
370         p_box->data.p_ftyp->i_compatible_brands = NULL;
371     }
372
373     MP4_READBOX_EXIT( 1 );
374 }
375
376 static void MP4_FreeBox_ftyp( MP4_Box_t *p_box )
377 {
378     FREE( p_box->data.p_ftyp->i_compatible_brands );
379 }
380
381
382 static int MP4_ReadBox_mvhd(  stream_t *p_stream, MP4_Box_t *p_box )
383 {
384     unsigned int i;
385 #ifdef MP4_VERBOSE
386     char s_creation_time[128];
387     char s_modification_time[128];
388     char s_duration[128];
389 #endif
390     MP4_READBOX_ENTER( MP4_Box_data_mvhd_t );
391
392     MP4_GETVERSIONFLAGS( p_box->data.p_mvhd );
393
394     if( p_box->data.p_mvhd->i_version )
395     {
396         MP4_GET8BYTES( p_box->data.p_mvhd->i_creation_time );
397         MP4_GET8BYTES( p_box->data.p_mvhd->i_modification_time );
398         MP4_GET4BYTES( p_box->data.p_mvhd->i_timescale );
399         MP4_GET8BYTES( p_box->data.p_mvhd->i_duration );
400     }
401     else
402     {
403         MP4_GET4BYTES( p_box->data.p_mvhd->i_creation_time );
404         MP4_GET4BYTES( p_box->data.p_mvhd->i_modification_time );
405         MP4_GET4BYTES( p_box->data.p_mvhd->i_timescale );
406         MP4_GET4BYTES( p_box->data.p_mvhd->i_duration );
407     }
408     MP4_GET4BYTES( p_box->data.p_mvhd->i_rate );
409     MP4_GET2BYTES( p_box->data.p_mvhd->i_volume );
410     MP4_GET2BYTES( p_box->data.p_mvhd->i_reserved1 );
411
412
413     for( i = 0; i < 2; i++ )
414     {
415         MP4_GET4BYTES( p_box->data.p_mvhd->i_reserved2[i] );
416     }
417     for( i = 0; i < 9; i++ )
418     {
419         MP4_GET4BYTES( p_box->data.p_mvhd->i_matrix[i] );
420     }
421     for( i = 0; i < 6; i++ )
422     {
423         MP4_GET4BYTES( p_box->data.p_mvhd->i_predefined[i] );
424     }
425
426     MP4_GET4BYTES( p_box->data.p_mvhd->i_next_track_id );
427
428
429 #ifdef MP4_VERBOSE
430     MP4_ConvertDate2Str( s_creation_time, p_box->data.p_mvhd->i_creation_time );
431     MP4_ConvertDate2Str( s_modification_time,
432                          p_box->data.p_mvhd->i_modification_time );
433     if( p_box->data.p_mvhd->i_rate )
434     {
435         MP4_ConvertDate2Str( s_duration,
436                  p_box->data.p_mvhd->i_duration / p_box->data.p_mvhd->i_rate );
437     }
438     else
439     {
440         s_duration[0] = 0;
441     }
442     msg_Dbg( p_stream, "read box: \"mvhd\" creation %s modification %s time scale %d duration %s rate %f volume %f next track id %d",
443                   s_creation_time,
444                   s_modification_time,
445                   (uint32_t)p_box->data.p_mvhd->i_timescale,
446                   s_duration,
447                   (float)p_box->data.p_mvhd->i_rate / (1<<16 ),
448                   (float)p_box->data.p_mvhd->i_volume / 256 ,
449                   (uint32_t)p_box->data.p_mvhd->i_next_track_id );
450 #endif
451     MP4_READBOX_EXIT( 1 );
452 }
453
454 static int MP4_ReadBox_tkhd(  stream_t *p_stream, MP4_Box_t *p_box )
455 {
456     unsigned int i;
457 #ifdef MP4_VERBOSE
458     char s_creation_time[128];
459     char s_modification_time[128];
460     char s_duration[128];
461 #endif
462     MP4_READBOX_ENTER( MP4_Box_data_tkhd_t );
463
464     MP4_GETVERSIONFLAGS( p_box->data.p_tkhd );
465
466     if( p_box->data.p_tkhd->i_version )
467     {
468         MP4_GET8BYTES( p_box->data.p_tkhd->i_creation_time );
469         MP4_GET8BYTES( p_box->data.p_tkhd->i_modification_time );
470         MP4_GET4BYTES( p_box->data.p_tkhd->i_track_ID );
471         MP4_GET4BYTES( p_box->data.p_tkhd->i_reserved );
472         MP4_GET8BYTES( p_box->data.p_tkhd->i_duration );
473     }
474     else
475     {
476         MP4_GET4BYTES( p_box->data.p_tkhd->i_creation_time );
477         MP4_GET4BYTES( p_box->data.p_tkhd->i_modification_time );
478         MP4_GET4BYTES( p_box->data.p_tkhd->i_track_ID );
479         MP4_GET4BYTES( p_box->data.p_tkhd->i_reserved );
480         MP4_GET4BYTES( p_box->data.p_tkhd->i_duration );
481     }
482
483     for( i = 0; i < 2; i++ )
484     {
485         MP4_GET4BYTES( p_box->data.p_tkhd->i_reserved2[i] );
486     }
487     MP4_GET2BYTES( p_box->data.p_tkhd->i_layer );
488     MP4_GET2BYTES( p_box->data.p_tkhd->i_predefined );
489     MP4_GET2BYTES( p_box->data.p_tkhd->i_volume );
490     MP4_GET2BYTES( p_box->data.p_tkhd->i_reserved3 );
491
492     for( i = 0; i < 9; i++ )
493     {
494         MP4_GET4BYTES( p_box->data.p_tkhd->i_matrix[i] );
495     }
496     MP4_GET4BYTES( p_box->data.p_tkhd->i_width );
497     MP4_GET4BYTES( p_box->data.p_tkhd->i_height );
498
499 #ifdef MP4_VERBOSE
500     MP4_ConvertDate2Str( s_creation_time, p_box->data.p_mvhd->i_creation_time );
501     MP4_ConvertDate2Str( s_modification_time, p_box->data.p_mvhd->i_modification_time );
502     MP4_ConvertDate2Str( s_duration, p_box->data.p_mvhd->i_duration );
503
504     msg_Dbg( p_stream, "read box: \"tkhd\" creation %s modification %s duration %s track ID %d layer %d volume %f width %f height %f",
505                   s_creation_time,
506                   s_modification_time,
507                   s_duration,
508                   p_box->data.p_tkhd->i_track_ID,
509                   p_box->data.p_tkhd->i_layer,
510                   (float)p_box->data.p_tkhd->i_volume / 256 ,
511                   (float)p_box->data.p_tkhd->i_width / 65536,
512                   (float)p_box->data.p_tkhd->i_height / 65536 );
513 #endif
514     MP4_READBOX_EXIT( 1 );
515 }
516
517
518 static int MP4_ReadBox_mdhd( stream_t *p_stream, MP4_Box_t *p_box )
519 {
520     unsigned int i;
521     uint16_t i_language;
522 #ifdef MP4_VERBOSE
523     char s_creation_time[128];
524     char s_modification_time[128];
525     char s_duration[128];
526 #endif
527     MP4_READBOX_ENTER( MP4_Box_data_mdhd_t );
528
529     MP4_GETVERSIONFLAGS( p_box->data.p_mdhd );
530
531     if( p_box->data.p_mdhd->i_version )
532     {
533         MP4_GET8BYTES( p_box->data.p_mdhd->i_creation_time );
534         MP4_GET8BYTES( p_box->data.p_mdhd->i_modification_time );
535         MP4_GET4BYTES( p_box->data.p_mdhd->i_timescale );
536         MP4_GET8BYTES( p_box->data.p_mdhd->i_duration );
537     }
538     else
539     {
540         MP4_GET4BYTES( p_box->data.p_mdhd->i_creation_time );
541         MP4_GET4BYTES( p_box->data.p_mdhd->i_modification_time );
542         MP4_GET4BYTES( p_box->data.p_mdhd->i_timescale );
543         MP4_GET4BYTES( p_box->data.p_mdhd->i_duration );
544     }
545     i_language = GetWBE( p_peek );
546     for( i = 0; i < 3; i++ )
547     {
548         p_box->data.p_mdhd->i_language[i] =
549                     ( ( i_language >> ( (2-i)*5 ) )&0x1f ) + 0x60;
550     }
551
552     MP4_GET2BYTES( p_box->data.p_mdhd->i_predefined );
553
554 #ifdef MP4_VERBOSE
555     MP4_ConvertDate2Str( s_creation_time, p_box->data.p_mdhd->i_creation_time );
556     MP4_ConvertDate2Str( s_modification_time, p_box->data.p_mdhd->i_modification_time );
557     MP4_ConvertDate2Str( s_duration, p_box->data.p_mdhd->i_duration );
558     msg_Dbg( p_stream, "read box: \"mdhd\" creation %s modification %s time scale %d duration %s language %c%c%c",
559                   s_creation_time,
560                   s_modification_time,
561                   (uint32_t)p_box->data.p_mdhd->i_timescale,
562                   s_duration,
563                   p_box->data.p_mdhd->i_language[0],
564                   p_box->data.p_mdhd->i_language[1],
565                   p_box->data.p_mdhd->i_language[2] );
566 #endif
567     MP4_READBOX_EXIT( 1 );
568 }
569
570
571 static int MP4_ReadBox_hdlr( stream_t *p_stream, MP4_Box_t *p_box )
572 {
573     int32_t i_reserved;
574
575     MP4_READBOX_ENTER( MP4_Box_data_hdlr_t );
576
577     MP4_GETVERSIONFLAGS( p_box->data.p_hdlr );
578
579     MP4_GETFOURCC( p_box->data.p_hdlr->i_predefined );
580     MP4_GETFOURCC( p_box->data.p_hdlr->i_handler_type );
581
582     MP4_GET4BYTES( i_reserved );
583     MP4_GET4BYTES( i_reserved );
584     MP4_GET4BYTES( i_reserved );
585
586     p_box->data.p_hdlr->psz_name = calloc( sizeof( char ), i_read + 1 );
587
588     /* Yes, I love .mp4 :( */
589     if( p_box->data.p_hdlr->i_predefined == VLC_FOURCC( 'm', 'h', 'l', 'r' ) )
590     {
591         uint8_t i_len;
592         int i_copy;
593
594         MP4_GET1BYTE( i_len );
595         i_copy = __MIN( i_read, i_len );
596
597         memcpy( p_box->data.p_hdlr->psz_name, p_peek, i_copy );
598         p_box->data.p_hdlr->psz_name[i_copy] = '\0';
599     }
600     else
601     {
602         memcpy( p_box->data.p_hdlr->psz_name, p_peek, i_read );
603         p_box->data.p_hdlr->psz_name[i_read] = '\0';
604     }
605
606
607 #ifdef MP4_VERBOSE
608     msg_Dbg( p_stream, "read box: \"hdlr\" hanler type %4.4s name %s",
609                        (char*)&p_box->data.p_hdlr->i_handler_type,
610                        p_box->data.p_hdlr->psz_name );
611
612 #endif
613     MP4_READBOX_EXIT( 1 );
614 }
615
616 static void MP4_FreeBox_hdlr( MP4_Box_t *p_box )
617 {
618     FREE( p_box->data.p_hdlr->psz_name );
619 }
620
621 static int MP4_ReadBox_vmhd( stream_t *p_stream, MP4_Box_t *p_box )
622 {
623     unsigned int i;
624
625     MP4_READBOX_ENTER( MP4_Box_data_vmhd_t );
626
627     MP4_GETVERSIONFLAGS( p_box->data.p_vmhd );
628
629     MP4_GET2BYTES( p_box->data.p_vmhd->i_graphics_mode );
630     for( i = 0; i < 3; i++ )
631     {
632         MP4_GET2BYTES( p_box->data.p_vmhd->i_opcolor[i] );
633     }
634
635 #ifdef MP4_VERBOSE
636     msg_Dbg( p_stream, "read box: \"vmhd\" graphics-mode %d opcolor (%d, %d, %d)",
637                       p_box->data.p_vmhd->i_graphics_mode,
638                       p_box->data.p_vmhd->i_opcolor[0],
639                       p_box->data.p_vmhd->i_opcolor[1],
640                       p_box->data.p_vmhd->i_opcolor[2] );
641 #endif
642     MP4_READBOX_EXIT( 1 );
643 }
644
645 static int MP4_ReadBox_smhd( stream_t *p_stream, MP4_Box_t *p_box )
646 {
647     MP4_READBOX_ENTER( MP4_Box_data_smhd_t );
648
649     MP4_GETVERSIONFLAGS( p_box->data.p_smhd );
650
651
652
653     MP4_GET2BYTES( p_box->data.p_smhd->i_balance );
654
655     MP4_GET2BYTES( p_box->data.p_smhd->i_reserved );
656
657 #ifdef MP4_VERBOSE
658     msg_Dbg( p_stream, "read box: \"smhd\" balance %f",
659                       (float)p_box->data.p_smhd->i_balance / 256 );
660 #endif
661     MP4_READBOX_EXIT( 1 );
662 }
663
664
665 static int MP4_ReadBox_hmhd( stream_t *p_stream, MP4_Box_t *p_box )
666 {
667     MP4_READBOX_ENTER( MP4_Box_data_hmhd_t );
668
669     MP4_GETVERSIONFLAGS( p_box->data.p_hmhd );
670
671     MP4_GET2BYTES( p_box->data.p_hmhd->i_max_PDU_size );
672     MP4_GET2BYTES( p_box->data.p_hmhd->i_avg_PDU_size );
673
674     MP4_GET4BYTES( p_box->data.p_hmhd->i_max_bitrate );
675     MP4_GET4BYTES( p_box->data.p_hmhd->i_avg_bitrate );
676
677     MP4_GET4BYTES( p_box->data.p_hmhd->i_reserved );
678
679 #ifdef MP4_VERBOSE
680     msg_Dbg( p_stream, "read box: \"hmhd\" maxPDU-size %d avgPDU-size %d max-bitrate %d avg-bitrate %d",
681                       p_box->data.p_hmhd->i_max_PDU_size,
682                       p_box->data.p_hmhd->i_avg_PDU_size,
683                       p_box->data.p_hmhd->i_max_bitrate,
684                       p_box->data.p_hmhd->i_avg_bitrate );
685 #endif
686     MP4_READBOX_EXIT( 1 );
687 }
688
689 static int MP4_ReadBox_url( stream_t *p_stream, MP4_Box_t *p_box )
690 {
691     MP4_READBOX_ENTER( MP4_Box_data_url_t );
692
693     MP4_GETVERSIONFLAGS( p_box->data.p_url );
694     MP4_GETSTRINGZ( p_box->data.p_url->psz_location );
695
696 #ifdef MP4_VERBOSE
697     msg_Dbg( p_stream, "read box: \"url\" url: %s",
698                        p_box->data.p_url->psz_location );
699
700 #endif
701     MP4_READBOX_EXIT( 1 );
702 }
703
704
705 static void MP4_FreeBox_url( MP4_Box_t *p_box )
706 {
707     FREE( p_box->data.p_url->psz_location )
708 }
709
710 static int MP4_ReadBox_urn( stream_t *p_stream, MP4_Box_t *p_box )
711 {
712     MP4_READBOX_ENTER( MP4_Box_data_urn_t );
713
714     MP4_GETVERSIONFLAGS( p_box->data.p_urn );
715
716     MP4_GETSTRINGZ( p_box->data.p_urn->psz_name );
717     MP4_GETSTRINGZ( p_box->data.p_urn->psz_location );
718
719 #ifdef MP4_VERBOSE
720     msg_Dbg( p_stream, "read box: \"urn\" name %s location %s",
721                       p_box->data.p_urn->psz_name,
722                       p_box->data.p_urn->psz_location );
723 #endif
724     MP4_READBOX_EXIT( 1 );
725 }
726 static void MP4_FreeBox_urn( MP4_Box_t *p_box )
727 {
728     FREE( p_box->data.p_urn->psz_name );
729     FREE( p_box->data.p_urn->psz_location );
730 }
731
732
733 static int MP4_ReadBox_dref( stream_t *p_stream, MP4_Box_t *p_box )
734 {
735     MP4_READBOX_ENTER( MP4_Box_data_dref_t );
736
737     MP4_GETVERSIONFLAGS( p_box->data.p_dref );
738
739     MP4_GET4BYTES( p_box->data.p_dref->i_entry_count );
740
741     stream_Seek( p_stream, p_box->i_pos + MP4_BOX_HEADERSIZE( p_box ) + 8 );
742     MP4_ReadBoxContainerRaw( p_stream, p_box );
743
744 #ifdef MP4_VERBOSE
745     msg_Dbg( p_stream, "read box: \"dref\" entry-count %d",
746                       p_box->data.p_dref->i_entry_count );
747
748 #endif
749     MP4_READBOX_EXIT( 1 );
750 }
751
752
753 static int MP4_ReadBox_stts( stream_t *p_stream, MP4_Box_t *p_box )
754 {
755     unsigned int i;
756     MP4_READBOX_ENTER( MP4_Box_data_stts_t );
757
758     MP4_GETVERSIONFLAGS( p_box->data.p_stts );
759     MP4_GET4BYTES( p_box->data.p_stts->i_entry_count );
760
761     p_box->data.p_stts->i_sample_count =
762         calloc( sizeof( uint32_t ), p_box->data.p_stts->i_entry_count );
763     p_box->data.p_stts->i_sample_delta =
764         calloc( sizeof( uint32_t ), p_box->data.p_stts->i_entry_count );
765
766     for( i = 0; (i < p_box->data.p_stts->i_entry_count )&&( i_read >=8 ); i++ )
767     {
768         MP4_GET4BYTES( p_box->data.p_stts->i_sample_count[i] );
769         MP4_GET4BYTES( p_box->data.p_stts->i_sample_delta[i] );
770     }
771
772 #ifdef MP4_VERBOSE
773     msg_Dbg( p_stream, "read box: \"stts\" entry-count %d",
774                       p_box->data.p_stts->i_entry_count );
775
776 #endif
777     MP4_READBOX_EXIT( 1 );
778 }
779
780 static void MP4_FreeBox_stts( MP4_Box_t *p_box )
781 {
782     FREE( p_box->data.p_stts->i_sample_count );
783     FREE( p_box->data.p_stts->i_sample_delta );
784 }
785
786 static int MP4_ReadBox_ctts( stream_t *p_stream, MP4_Box_t *p_box )
787 {
788     unsigned int i;
789     MP4_READBOX_ENTER( MP4_Box_data_ctts_t );
790
791     MP4_GETVERSIONFLAGS( p_box->data.p_ctts );
792
793     MP4_GET4BYTES( p_box->data.p_ctts->i_entry_count );
794
795     p_box->data.p_ctts->i_sample_count =
796         calloc( sizeof( uint32_t ), p_box->data.p_ctts->i_entry_count );
797     p_box->data.p_ctts->i_sample_offset =
798         calloc( sizeof( uint32_t ), p_box->data.p_ctts->i_entry_count );
799
800     for( i = 0; (i < p_box->data.p_ctts->i_entry_count )&&( i_read >=8 ); i++ )
801     {
802         MP4_GET4BYTES( p_box->data.p_ctts->i_sample_count[i] );
803         MP4_GET4BYTES( p_box->data.p_ctts->i_sample_offset[i] );
804     }
805
806 #ifdef MP4_VERBOSE
807     msg_Dbg( p_stream, "read box: \"ctts\" entry-count %d",
808                       p_box->data.p_ctts->i_entry_count );
809
810 #endif
811     MP4_READBOX_EXIT( 1 );
812 }
813
814 static void MP4_FreeBox_ctts( MP4_Box_t *p_box )
815 {
816     FREE( p_box->data.p_ctts->i_sample_count );
817     FREE( p_box->data.p_ctts->i_sample_offset );
818 }
819
820 static int MP4_ReadLengthDescriptor( uint8_t **pp_peek, int64_t  *i_read )
821 {
822     unsigned int i_b;
823     unsigned int i_len = 0;
824     do
825     {
826         i_b = **pp_peek;
827
828         (*pp_peek)++;
829         (*i_read)--;
830         i_len = ( i_len << 7 ) + ( i_b&0x7f );
831     } while( i_b&0x80 );
832     return( i_len );
833 }
834
835 static int MP4_ReadBox_esds( stream_t *p_stream, MP4_Box_t *p_box )
836 {
837 #define es_descriptor p_box->data.p_esds->es_descriptor
838     unsigned int i_len;
839     unsigned int i_flags;
840     unsigned int i_type;
841
842     MP4_READBOX_ENTER( MP4_Box_data_esds_t );
843
844     MP4_GETVERSIONFLAGS( p_box->data.p_esds );
845
846
847     MP4_GET1BYTE( i_type );
848     if( i_type == 0x03 ) /* MP4ESDescrTag */
849     {
850         i_len = MP4_ReadLengthDescriptor( &p_peek, &i_read );
851
852 #ifdef MP4_VERBOSE
853         msg_Dbg( p_stream, "found esds MPEG4ESDescr (%dBytes)",
854                  i_len );
855 #endif
856
857         MP4_GET2BYTES( es_descriptor.i_ES_ID );
858         MP4_GET1BYTE( i_flags );
859         es_descriptor.b_stream_dependence = ( (i_flags&0x80) != 0);
860         es_descriptor.b_url = ( (i_flags&0x40) != 0);
861         es_descriptor.b_OCRstream = ( (i_flags&0x20) != 0);
862
863         es_descriptor.i_stream_priority = i_flags&0x1f;
864         if( es_descriptor.b_stream_dependence )
865         {
866             MP4_GET2BYTES( es_descriptor.i_depend_on_ES_ID );
867         }
868         if( es_descriptor.b_url )
869         {
870             unsigned int i_len;
871
872             MP4_GET1BYTE( i_len );
873             es_descriptor.psz_URL = calloc( sizeof(char), i_len + 1 );
874             memcpy( es_descriptor.psz_URL, p_peek, i_len );
875             es_descriptor.psz_URL[i_len] = 0;
876             p_peek += i_len;
877             i_read -= i_len;
878         }
879         else
880         {
881             es_descriptor.psz_URL = NULL;
882         }
883         if( es_descriptor.b_OCRstream )
884         {
885             MP4_GET2BYTES( es_descriptor.i_OCR_ES_ID );
886         }
887         MP4_GET1BYTE( i_type ); /* get next type */
888     }
889
890     if( i_type != 0x04)/* MP4DecConfigDescrTag */
891     {
892          es_descriptor.p_decConfigDescr = NULL;
893          MP4_READBOX_EXIT( 1 ); /* rest isn't interesting up to now */
894     }
895
896     i_len = MP4_ReadLengthDescriptor( &p_peek, &i_read );
897
898 #ifdef MP4_VERBOSE
899         msg_Dbg( p_stream, "found esds MP4DecConfigDescr (%dBytes)",
900                  i_len );
901 #endif
902
903     es_descriptor.p_decConfigDescr =
904             malloc( sizeof( MP4_descriptor_decoder_config_t ));
905
906     MP4_GET1BYTE( es_descriptor.p_decConfigDescr->i_objectTypeIndication );
907     MP4_GET1BYTE( i_flags );
908     es_descriptor.p_decConfigDescr->i_streamType = i_flags >> 2;
909     es_descriptor.p_decConfigDescr->b_upStream = ( i_flags >> 1 )&0x01;
910     MP4_GET3BYTES( es_descriptor.p_decConfigDescr->i_buffer_sizeDB );
911     MP4_GET4BYTES( es_descriptor.p_decConfigDescr->i_max_bitrate );
912     MP4_GET4BYTES( es_descriptor.p_decConfigDescr->i_avg_bitrate );
913     MP4_GET1BYTE( i_type );
914     if( i_type !=  0x05 )/* MP4DecSpecificDescrTag */
915     {
916         es_descriptor.p_decConfigDescr->i_decoder_specific_info_len = 0;
917         es_descriptor.p_decConfigDescr->p_decoder_specific_info  = NULL;
918         MP4_READBOX_EXIT( 1 );
919     }
920
921     i_len = MP4_ReadLengthDescriptor( &p_peek, &i_read );
922
923 #ifdef MP4_VERBOSE
924         msg_Dbg( p_stream, "found esds MP4DecSpecificDescr (%dBytes)",
925                  i_len );
926 #endif
927
928     es_descriptor.p_decConfigDescr->i_decoder_specific_info_len = i_len;
929     es_descriptor.p_decConfigDescr->p_decoder_specific_info = malloc( i_len );
930     memcpy( es_descriptor.p_decConfigDescr->p_decoder_specific_info,
931             p_peek, i_len );
932
933     MP4_READBOX_EXIT( 1 );
934
935 #undef es_descriptor
936 }
937
938 static void MP4_FreeBox_esds( MP4_Box_t *p_box )
939 {
940     FREE( p_box->data.p_esds->es_descriptor.psz_URL );
941     if( p_box->data.p_esds->es_descriptor.p_decConfigDescr )
942     {
943         FREE( p_box->data.p_esds->es_descriptor.p_decConfigDescr->p_decoder_specific_info );
944     }
945     FREE( p_box->data.p_esds->es_descriptor.p_decConfigDescr );
946 }
947
948 static int MP4_ReadBox_avcC( stream_t *p_stream, MP4_Box_t *p_box )
949 {
950     MP4_Box_data_avcC_t *p_avcC;
951     int i;
952
953     MP4_READBOX_ENTER( MP4_Box_data_avcC_t );
954     p_avcC = p_box->data.p_avcC;
955
956     p_avcC->i_avcC = i_read;
957     p_avcC->p_avcC = malloc( p_avcC->i_avcC );
958     memcpy( p_avcC->p_avcC, p_peek, i_read );
959
960     MP4_GET1BYTE( p_avcC->i_version );
961     MP4_GET1BYTE( p_avcC->i_profile );
962     MP4_GET1BYTE( p_avcC->i_profile_compatibility );
963     MP4_GET1BYTE( p_avcC->i_level );
964     MP4_GET1BYTE( p_avcC->i_reserved1 );
965     p_avcC->i_length_size = (p_avcC->i_reserved1&0x03) + 1;
966     p_avcC->i_reserved1 >>= 2;
967
968     MP4_GET1BYTE( p_avcC->i_reserved2 );
969     p_avcC->i_sps = p_avcC->i_reserved2&0x1f;
970     p_avcC->i_reserved2 >>= 5;
971
972     if( p_avcC->i_sps > 0 )
973     {
974         p_avcC->i_sps_length = malloc( p_avcC->i_sps * sizeof( uint16_t ) );
975         p_avcC->sps = malloc( p_avcC->i_sps * sizeof( uint8_t* ) );
976
977         for( i = 0; i < p_avcC->i_sps; i++ )
978         {
979             MP4_GET2BYTES( p_avcC->i_sps_length[i] );
980             p_avcC->sps[i] = malloc( p_avcC->i_sps_length[i] );
981             memcpy( p_avcC->sps[i], p_peek, p_avcC->i_sps_length[i] );
982
983             p_peek += p_avcC->i_sps_length[i];
984             i_read -= p_avcC->i_sps_length[i];
985         }
986     }
987
988     MP4_GET1BYTE( p_avcC->i_pps );
989     if( p_avcC->i_pps > 0 )
990     {
991         p_avcC->i_pps_length = malloc( p_avcC->i_pps * sizeof( uint16_t ) );
992         p_avcC->pps = malloc( p_avcC->i_pps * sizeof( uint8_t* ) );
993
994         for( i = 0; i < p_avcC->i_pps; i++ )
995         {
996             MP4_GET2BYTES( p_avcC->i_pps_length[i] );
997             p_avcC->pps[i] = malloc( p_avcC->i_pps_length[i] );
998             memcpy( p_avcC->pps[i], p_peek, p_avcC->i_pps_length[i] );
999
1000             p_peek += p_avcC->i_pps_length[i];
1001             i_read -= p_avcC->i_pps_length[i];
1002         }
1003     }
1004 #ifdef MP4_VERBOSE
1005     msg_Dbg( p_stream,
1006              "read box: \"avcC\" version=%d profile=0x%x level=0x%x lengh size=%d sps=%d pps=%d",
1007              p_avcC->i_version, p_avcC->i_profile, p_avcC->i_level,
1008              p_avcC->i_length_size,
1009              p_avcC->i_sps, p_avcC->i_pps );
1010     for( i = 0; i < p_avcC->i_sps; i++ )
1011     {
1012         msg_Dbg( p_stream, "         - sps[%d] length=%d",
1013                  i, p_avcC->i_sps_length[i] );
1014     }
1015     for( i = 0; i < p_avcC->i_pps; i++ )
1016     {
1017         msg_Dbg( p_stream, "         - pps[%d] length=%d",
1018                  i, p_avcC->i_pps_length[i] );
1019     }
1020
1021 #endif
1022     MP4_READBOX_EXIT( 1 );
1023 }
1024
1025 static void MP4_FreeBox_avcC( MP4_Box_t *p_box )
1026 {
1027     MP4_Box_data_avcC_t *p_avcC = p_box->data.p_avcC;
1028     int i;
1029
1030     for( i = 0; i < p_avcC->i_sps; i++ )
1031     {
1032         FREE( p_avcC->sps[i] );
1033     }
1034     for( i = 0; i < p_avcC->i_pps; i++ )
1035     {
1036         FREE( p_avcC->pps[i] );
1037     }
1038     if( p_avcC->i_sps > 0 ) FREE( p_avcC->sps );
1039     if( p_avcC->i_pps > 0 ) FREE( p_avcC->pps );
1040 }
1041
1042 static int MP4_ReadBox_sample_soun( stream_t *p_stream, MP4_Box_t *p_box )
1043 {
1044     unsigned int i;
1045
1046     MP4_READBOX_ENTER( MP4_Box_data_sample_soun_t );
1047     p_box->data.p_sample_soun->p_qt_description = NULL;
1048
1049     /* Sanity check needed because the "wave" box does also contain an
1050      * "mp4a" box that we don't understand. */
1051     if( i_read < 28 )
1052     {
1053         i_read -= 30;
1054         MP4_READBOX_EXIT( 1 );
1055     }
1056
1057     for( i = 0; i < 6 ; i++ )
1058     {
1059         MP4_GET1BYTE( p_box->data.p_sample_soun->i_reserved1[i] );
1060     }
1061
1062     MP4_GET2BYTES( p_box->data.p_sample_soun->i_data_reference_index );
1063
1064     /*
1065      * XXX hack -> produce a copy of the nearly complete chunk
1066      */
1067     if( i_read > 0 )
1068     {
1069         p_box->data.p_sample_soun->i_qt_description = i_read;
1070         p_box->data.p_sample_soun->p_qt_description = malloc( i_read );
1071         memcpy( p_box->data.p_sample_soun->p_qt_description, p_peek, i_read );
1072     }
1073     else
1074     {
1075         p_box->data.p_sample_soun->i_qt_description = 0;
1076         p_box->data.p_sample_soun->p_qt_description = NULL;
1077     }
1078
1079     MP4_GET2BYTES( p_box->data.p_sample_soun->i_qt_version );
1080     MP4_GET2BYTES( p_box->data.p_sample_soun->i_qt_revision_level );
1081     MP4_GET4BYTES( p_box->data.p_sample_soun->i_qt_vendor );
1082
1083     MP4_GET2BYTES( p_box->data.p_sample_soun->i_channelcount );
1084     MP4_GET2BYTES( p_box->data.p_sample_soun->i_samplesize );
1085     MP4_GET2BYTES( p_box->data.p_sample_soun->i_predefined );
1086     MP4_GET2BYTES( p_box->data.p_sample_soun->i_reserved3 );
1087     MP4_GET2BYTES( p_box->data.p_sample_soun->i_sampleratehi );
1088     MP4_GET2BYTES( p_box->data.p_sample_soun->i_sampleratelo );
1089
1090     if( p_box->data.p_sample_soun->i_qt_version == 1 &&
1091         i_read >= 16 )
1092     {
1093         /* qt3+ */
1094         MP4_GET4BYTES( p_box->data.p_sample_soun->i_sample_per_packet );
1095         MP4_GET4BYTES( p_box->data.p_sample_soun->i_bytes_per_packet );
1096         MP4_GET4BYTES( p_box->data.p_sample_soun->i_bytes_per_frame );
1097         MP4_GET4BYTES( p_box->data.p_sample_soun->i_bytes_per_sample );
1098
1099 #ifdef MP4_VERBOSE
1100         msg_Dbg( p_stream,
1101                  "read box: \"soun\" qt3+ sample/packet=%d bytes/packet=%d "
1102                  "bytes/frame=%d bytes/sample=%d",
1103                  p_box->data.p_sample_soun->i_sample_per_packet,
1104                  p_box->data.p_sample_soun->i_bytes_per_packet,
1105                  p_box->data.p_sample_soun->i_bytes_per_frame,
1106                  p_box->data.p_sample_soun->i_bytes_per_sample );
1107 #endif
1108         stream_Seek( p_stream, p_box->i_pos +
1109                         MP4_BOX_HEADERSIZE( p_box ) + 44 );
1110     }
1111     else
1112     {
1113         p_box->data.p_sample_soun->i_sample_per_packet = 0;
1114         p_box->data.p_sample_soun->i_bytes_per_packet = 0;
1115         p_box->data.p_sample_soun->i_bytes_per_frame = 0;
1116         p_box->data.p_sample_soun->i_bytes_per_sample = 0;
1117
1118         msg_Dbg( p_stream, "read box: \"soun\" mp4 or qt1/2 (rest="I64Fd")",
1119                  i_read );
1120         stream_Seek( p_stream, p_box->i_pos +
1121                         MP4_BOX_HEADERSIZE( p_box ) + 28 );
1122     }
1123
1124     if( p_box->i_type == FOURCC_drms )
1125     {
1126         p_box->data.p_sample_soun->p_drms =
1127             drms_alloc( p_stream->p_vlc->psz_homedir );
1128
1129         if( p_box->data.p_sample_soun->p_drms == NULL )
1130         {
1131             msg_Err( p_stream, "drms_alloc() failed" );
1132         }
1133     }
1134
1135     if( p_box->i_type == FOURCC_samr || p_box->i_type == FOURCC_sawb )
1136     {
1137         /* Ignore channelcount for AMR (3gpp AMRSpecificBox) */
1138         p_box->data.p_sample_soun->i_channelcount = 1;
1139     }
1140
1141     if( p_box->i_type == FOURCC_alac )
1142     {
1143         if( p_box->data.p_sample_soun->p_qt_description )
1144             free( p_box->data.p_sample_soun->p_qt_description );
1145
1146         p_box->data.p_sample_soun->p_qt_description = malloc( i_read );
1147         p_box->data.p_sample_soun->i_qt_description = i_read;
1148         memcpy( p_box->data.p_sample_soun->p_qt_description, p_peek, i_read );
1149     }
1150     else
1151     {
1152         MP4_ReadBoxContainerRaw( p_stream, p_box ); /* esds */
1153     }
1154
1155 #ifdef MP4_VERBOSE
1156     msg_Dbg( p_stream, "read box: \"soun\" in stsd channel %d "
1157              "sample size %d sample rate %f",
1158              p_box->data.p_sample_soun->i_channelcount,
1159              p_box->data.p_sample_soun->i_samplesize,
1160              (float)p_box->data.p_sample_soun->i_sampleratehi +
1161              (float)p_box->data.p_sample_soun->i_sampleratelo / 65536 );
1162
1163 #endif
1164     MP4_READBOX_EXIT( 1 );
1165 }
1166
1167
1168 static void MP4_FreeBox_sample_soun( MP4_Box_t *p_box )
1169 {
1170     FREE( p_box->data.p_sample_soun->p_qt_description );
1171
1172     if( p_box->i_type == FOURCC_drms )
1173     {
1174         if( p_box->data.p_sample_soun->p_drms )
1175         {
1176             drms_free( p_box->data.p_sample_soun->p_drms );
1177         }
1178     }
1179 }
1180
1181
1182 int MP4_ReadBox_sample_vide( stream_t *p_stream, MP4_Box_t *p_box )
1183 {
1184     unsigned int i;
1185
1186     MP4_READBOX_ENTER( MP4_Box_data_sample_vide_t );
1187
1188     for( i = 0; i < 6 ; i++ )
1189     {
1190         MP4_GET1BYTE( p_box->data.p_sample_vide->i_reserved1[i] );
1191     }
1192
1193     MP4_GET2BYTES( p_box->data.p_sample_vide->i_data_reference_index );
1194
1195     /*
1196      * XXX hack -> produce a copy of the nearly complete chunk
1197      */
1198     if( i_read > 0 )
1199     {
1200         p_box->data.p_sample_vide->i_qt_image_description = i_read;
1201         p_box->data.p_sample_vide->p_qt_image_description = malloc( i_read );
1202         memcpy( p_box->data.p_sample_vide->p_qt_image_description,
1203                 p_peek, i_read );
1204     }
1205     else
1206     {
1207         p_box->data.p_sample_vide->i_qt_image_description = 0;
1208         p_box->data.p_sample_vide->p_qt_image_description = NULL;
1209     }
1210
1211     MP4_GET2BYTES( p_box->data.p_sample_vide->i_qt_version );
1212     MP4_GET2BYTES( p_box->data.p_sample_vide->i_qt_revision_level );
1213     MP4_GET4BYTES( p_box->data.p_sample_vide->i_qt_vendor );
1214
1215     MP4_GET4BYTES( p_box->data.p_sample_vide->i_qt_temporal_quality );
1216     MP4_GET4BYTES( p_box->data.p_sample_vide->i_qt_spatial_quality );
1217
1218     MP4_GET2BYTES( p_box->data.p_sample_vide->i_width );
1219     MP4_GET2BYTES( p_box->data.p_sample_vide->i_height );
1220
1221     MP4_GET4BYTES( p_box->data.p_sample_vide->i_horizresolution );
1222     MP4_GET4BYTES( p_box->data.p_sample_vide->i_vertresolution );
1223
1224     MP4_GET4BYTES( p_box->data.p_sample_vide->i_qt_data_size );
1225     MP4_GET2BYTES( p_box->data.p_sample_vide->i_qt_frame_count );
1226
1227     memcpy( &p_box->data.p_sample_vide->i_compressorname, p_peek, 32 );
1228     p_peek += 32; i_read -= 32;
1229
1230     MP4_GET2BYTES( p_box->data.p_sample_vide->i_depth );
1231     MP4_GET2BYTES( p_box->data.p_sample_vide->i_qt_color_table );
1232
1233     stream_Seek( p_stream, p_box->i_pos + MP4_BOX_HEADERSIZE( p_box ) + 78);
1234     MP4_ReadBoxContainerRaw( p_stream, p_box );
1235
1236 #ifdef MP4_VERBOSE
1237     msg_Dbg( p_stream, "read box: \"vide\" in stsd %dx%d depth %d",
1238                       p_box->data.p_sample_vide->i_width,
1239                       p_box->data.p_sample_vide->i_height,
1240                       p_box->data.p_sample_vide->i_depth );
1241
1242 #endif
1243     MP4_READBOX_EXIT( 1 );
1244 }
1245
1246
1247 void MP4_FreeBox_sample_vide( MP4_Box_t *p_box )
1248 {
1249     FREE( p_box->data.p_sample_vide->p_qt_image_description );
1250 }
1251
1252 static int MP4_ReadBox_sample_mp4s( stream_t *p_stream, MP4_Box_t *p_box )
1253 {
1254     stream_Seek( p_stream, p_box->i_pos + MP4_BOX_HEADERSIZE( p_box ) + 8 );
1255     MP4_ReadBoxContainerRaw( p_stream, p_box );
1256     return 1;
1257 }
1258
1259 static int MP4_ReadBox_sample_text( stream_t *p_stream, MP4_Box_t *p_box )
1260 {
1261     unsigned int i;
1262
1263     MP4_READBOX_ENTER( MP4_Box_data_sample_text_t );
1264
1265     for( i = 0; i < 6 ; i++ )
1266     {
1267         MP4_GET1BYTE( p_box->data.p_sample_text->i_reserved1[i] );
1268     }
1269     MP4_GET2BYTES( p_box->data.p_sample_text->i_data_reference_index );
1270
1271     MP4_GET4BYTES( p_box->data.p_sample_text->i_display_flags );
1272     MP4_GET4BYTES( p_box->data.p_sample_text->i_justification );
1273
1274     MP4_GET2BYTES( p_box->data.p_sample_text->i_background_color[0] );
1275     MP4_GET2BYTES( p_box->data.p_sample_text->i_background_color[1] );
1276     MP4_GET2BYTES( p_box->data.p_sample_text->i_background_color[2] );
1277
1278     MP4_GET8BYTES( p_box->data.p_sample_text->i_text_box );
1279     MP4_GET8BYTES( p_box->data.p_sample_text->i_reserved2 );
1280
1281     MP4_GET2BYTES( p_box->data.p_sample_text->i_font_number );
1282     MP4_GET2BYTES( p_box->data.p_sample_text->i_font_face );
1283
1284     MP4_GET2BYTES( p_box->data.p_sample_text->i_reserved3 );
1285
1286     MP4_GET2BYTES( p_box->data.p_sample_text->i_foreground_color[0] );
1287     MP4_GET2BYTES( p_box->data.p_sample_text->i_foreground_color[1] );
1288     MP4_GET2BYTES( p_box->data.p_sample_text->i_foreground_color[2] );
1289
1290     MP4_GET1BYTE( i );
1291     p_box->data.p_sample_text->psz_text_name = malloc( i + 1 );
1292     memcpy( p_box->data.p_sample_text->psz_text_name, p_peek, i );
1293     p_box->data.p_sample_text->psz_text_name[i] = '\0';
1294
1295 #ifdef MP4_VERBOSE
1296     msg_Dbg( p_stream, "read box: \"text\" in stsd text name=%s",
1297              p_box->data.p_sample_text->psz_text_name );
1298 #endif
1299     MP4_READBOX_EXIT( 1 );
1300 }
1301
1302 #if 0
1303 /* We can't easily call it, and anyway ~ 20 bytes lost isn't a real problem */
1304 static void MP4_FreeBox_sample_text( MP4_Box_t *p_box )
1305 {
1306     FREE( p_box->data.p_sample_text->psz_text_name );
1307 }
1308 #endif
1309
1310
1311 static int MP4_ReadBox_stsd( stream_t *p_stream, MP4_Box_t *p_box )
1312 {
1313
1314     MP4_READBOX_ENTER( MP4_Box_data_stsd_t );
1315
1316     MP4_GETVERSIONFLAGS( p_box->data.p_stsd );
1317
1318     MP4_GET4BYTES( p_box->data.p_stsd->i_entry_count );
1319
1320     stream_Seek( p_stream, p_box->i_pos + MP4_BOX_HEADERSIZE( p_box ) + 8 );
1321
1322     MP4_ReadBoxContainerRaw( p_stream, p_box );
1323
1324 #ifdef MP4_VERBOSE
1325     msg_Dbg( p_stream, "read box: \"stsd\" entry-count %d",
1326                       p_box->data.p_stsd->i_entry_count );
1327
1328 #endif
1329     MP4_READBOX_EXIT( 1 );
1330 }
1331
1332
1333 static int MP4_ReadBox_stsz( stream_t *p_stream, MP4_Box_t *p_box )
1334 {
1335     unsigned int i;
1336
1337     MP4_READBOX_ENTER( MP4_Box_data_stsz_t );
1338
1339     MP4_GETVERSIONFLAGS( p_box->data.p_stsz );
1340
1341     MP4_GET4BYTES( p_box->data.p_stsz->i_sample_size );
1342
1343     MP4_GET4BYTES( p_box->data.p_stsz->i_sample_count );
1344
1345     p_box->data.p_stsz->i_entry_size =
1346         calloc( sizeof( uint32_t ), p_box->data.p_stsz->i_sample_count );
1347
1348     if( !p_box->data.p_stsz->i_sample_size )
1349     {
1350         for( i=0; (i<p_box->data.p_stsz->i_sample_count)&&(i_read >= 4 ); i++ )
1351         {
1352             MP4_GET4BYTES( p_box->data.p_stsz->i_entry_size[i] );
1353         }
1354     }
1355
1356 #ifdef MP4_VERBOSE
1357     msg_Dbg( p_stream, "read box: \"stsz\" sample-size %d sample-count %d",
1358                       p_box->data.p_stsz->i_sample_size,
1359                       p_box->data.p_stsz->i_sample_count );
1360
1361 #endif
1362     MP4_READBOX_EXIT( 1 );
1363 }
1364
1365 static void MP4_FreeBox_stsz( MP4_Box_t *p_box )
1366 {
1367     FREE( p_box->data.p_stsz->i_entry_size );
1368 }
1369
1370 static int MP4_ReadBox_stsc( stream_t *p_stream, MP4_Box_t *p_box )
1371 {
1372     unsigned int i;
1373
1374     MP4_READBOX_ENTER( MP4_Box_data_stsc_t );
1375
1376     MP4_GETVERSIONFLAGS( p_box->data.p_stsc );
1377
1378     MP4_GET4BYTES( p_box->data.p_stsc->i_entry_count );
1379
1380     p_box->data.p_stsc->i_first_chunk =
1381         calloc( sizeof( uint32_t ), p_box->data.p_stsc->i_entry_count );
1382     p_box->data.p_stsc->i_samples_per_chunk =
1383         calloc( sizeof( uint32_t ), p_box->data.p_stsc->i_entry_count );
1384     p_box->data.p_stsc->i_sample_description_index =
1385         calloc( sizeof( uint32_t ), p_box->data.p_stsc->i_entry_count );
1386
1387     for( i = 0; (i < p_box->data.p_stsc->i_entry_count )&&( i_read >= 12 );i++ )
1388     {
1389         MP4_GET4BYTES( p_box->data.p_stsc->i_first_chunk[i] );
1390         MP4_GET4BYTES( p_box->data.p_stsc->i_samples_per_chunk[i] );
1391         MP4_GET4BYTES( p_box->data.p_stsc->i_sample_description_index[i] );
1392     }
1393
1394 #ifdef MP4_VERBOSE
1395     msg_Dbg( p_stream, "read box: \"stsc\" entry-count %d",
1396                       p_box->data.p_stsc->i_entry_count );
1397
1398 #endif
1399     MP4_READBOX_EXIT( 1 );
1400 }
1401
1402 static void MP4_FreeBox_stsc( MP4_Box_t *p_box )
1403 {
1404     FREE( p_box->data.p_stsc->i_first_chunk );
1405     FREE( p_box->data.p_stsc->i_samples_per_chunk );
1406     FREE( p_box->data.p_stsc->i_sample_description_index );
1407 }
1408
1409 static int MP4_ReadBox_stco_co64( stream_t *p_stream, MP4_Box_t *p_box )
1410 {
1411     unsigned int i;
1412
1413     MP4_READBOX_ENTER( MP4_Box_data_co64_t );
1414
1415     MP4_GETVERSIONFLAGS( p_box->data.p_co64 );
1416
1417     MP4_GET4BYTES( p_box->data.p_co64->i_entry_count );
1418
1419     p_box->data.p_co64->i_chunk_offset =
1420         calloc( sizeof( uint64_t ), p_box->data.p_co64->i_entry_count );
1421
1422     for( i = 0; i < p_box->data.p_co64->i_entry_count; i++ )
1423     {
1424         if( p_box->i_type == FOURCC_stco )
1425         {
1426             if( i_read < 4 )
1427             {
1428                 break;
1429             }
1430             MP4_GET4BYTES( p_box->data.p_co64->i_chunk_offset[i] );
1431         }
1432         else
1433         {
1434             if( i_read < 8 )
1435             {
1436                 break;
1437             }
1438             MP4_GET8BYTES( p_box->data.p_co64->i_chunk_offset[i] );
1439         }
1440     }
1441
1442 #ifdef MP4_VERBOSE
1443     msg_Dbg( p_stream, "read box: \"co64\" entry-count %d",
1444                       p_box->data.p_co64->i_entry_count );
1445
1446 #endif
1447     MP4_READBOX_EXIT( 1 );
1448 }
1449
1450 static void MP4_FreeBox_stco_co64( MP4_Box_t *p_box )
1451 {
1452     FREE( p_box->data.p_co64->i_chunk_offset );
1453 }
1454
1455 static int MP4_ReadBox_stss( stream_t *p_stream, MP4_Box_t *p_box )
1456 {
1457     unsigned int i;
1458
1459     MP4_READBOX_ENTER( MP4_Box_data_stss_t );
1460
1461     MP4_GETVERSIONFLAGS( p_box->data.p_stss );
1462
1463     MP4_GET4BYTES( p_box->data.p_stss->i_entry_count );
1464
1465     p_box->data.p_stss->i_sample_number =
1466         calloc( sizeof( uint32_t ), p_box->data.p_stss->i_entry_count );
1467
1468     for( i = 0; (i < p_box->data.p_stss->i_entry_count )&&( i_read >= 4 ); i++ )
1469     {
1470
1471         MP4_GET4BYTES( p_box->data.p_stss->i_sample_number[i] );
1472         /* XXX in libmp4 sample begin at 0 */
1473         p_box->data.p_stss->i_sample_number[i]--;
1474     }
1475
1476 #ifdef MP4_VERBOSE
1477     msg_Dbg( p_stream, "read box: \"stss\" entry-count %d",
1478                       p_box->data.p_stss->i_entry_count );
1479
1480 #endif
1481     MP4_READBOX_EXIT( 1 );
1482 }
1483
1484 static void MP4_FreeBox_stss( MP4_Box_t *p_box )
1485 {
1486     FREE( p_box->data.p_stss->i_sample_number )
1487 }
1488
1489 static int MP4_ReadBox_stsh( stream_t *p_stream, MP4_Box_t *p_box )
1490 {
1491     unsigned int i;
1492
1493     MP4_READBOX_ENTER( MP4_Box_data_stsh_t );
1494
1495     MP4_GETVERSIONFLAGS( p_box->data.p_stsh );
1496
1497
1498     MP4_GET4BYTES( p_box->data.p_stsh->i_entry_count );
1499
1500     p_box->data.p_stsh->i_shadowed_sample_number =
1501         calloc( sizeof( uint32_t ), p_box->data.p_stsh->i_entry_count );
1502
1503     p_box->data.p_stsh->i_sync_sample_number =
1504         calloc( sizeof( uint32_t ), p_box->data.p_stsh->i_entry_count );
1505
1506
1507     for( i = 0; (i < p_box->data.p_stss->i_entry_count )&&( i_read >= 8 ); i++ )
1508     {
1509
1510         MP4_GET4BYTES( p_box->data.p_stsh->i_shadowed_sample_number[i] );
1511         MP4_GET4BYTES( p_box->data.p_stsh->i_sync_sample_number[i] );
1512     }
1513
1514 #ifdef MP4_VERBOSE
1515     msg_Dbg( p_stream, "read box: \"stsh\" entry-count %d",
1516                       p_box->data.p_stsh->i_entry_count );
1517 #endif
1518     MP4_READBOX_EXIT( 1 );
1519 }
1520
1521 static void MP4_FreeBox_stsh( MP4_Box_t *p_box )
1522 {
1523     FREE( p_box->data.p_stsh->i_shadowed_sample_number )
1524     FREE( p_box->data.p_stsh->i_sync_sample_number )
1525 }
1526
1527
1528 static int MP4_ReadBox_stdp( stream_t *p_stream, MP4_Box_t *p_box )
1529 {
1530     unsigned int i;
1531
1532     MP4_READBOX_ENTER( MP4_Box_data_stdp_t );
1533
1534     MP4_GETVERSIONFLAGS( p_box->data.p_stdp );
1535
1536     p_box->data.p_stdp->i_priority =
1537         calloc( sizeof( uint16_t ), i_read / 2 );
1538
1539     for( i = 0; i < i_read / 2 ; i++ )
1540     {
1541
1542         MP4_GET2BYTES( p_box->data.p_stdp->i_priority[i] );
1543     }
1544
1545 #ifdef MP4_VERBOSE
1546     msg_Dbg( p_stream, "read box: \"stdp\" entry-count "I64Fd,
1547                       i_read / 2 );
1548
1549 #endif
1550     MP4_READBOX_EXIT( 1 );
1551 }
1552
1553 static void MP4_FreeBox_stdp( MP4_Box_t *p_box )
1554 {
1555     FREE( p_box->data.p_stdp->i_priority )
1556 }
1557
1558 static int MP4_ReadBox_padb( stream_t *p_stream, MP4_Box_t *p_box )
1559 {
1560     unsigned int i;
1561
1562     MP4_READBOX_ENTER( MP4_Box_data_padb_t );
1563
1564     MP4_GETVERSIONFLAGS( p_box->data.p_padb );
1565
1566
1567     MP4_GET4BYTES( p_box->data.p_padb->i_sample_count );
1568
1569     p_box->data.p_padb->i_reserved1 =
1570         calloc( sizeof( uint16_t ), ( p_box->data.p_padb->i_sample_count + 1 ) / 2 );
1571     p_box->data.p_padb->i_pad2 =
1572         calloc( sizeof( uint16_t ), ( p_box->data.p_padb->i_sample_count + 1 ) / 2 );
1573     p_box->data.p_padb->i_reserved2 =
1574         calloc( sizeof( uint16_t ), ( p_box->data.p_padb->i_sample_count + 1 ) / 2 );
1575     p_box->data.p_padb->i_pad1 =
1576         calloc( sizeof( uint16_t ), ( p_box->data.p_padb->i_sample_count + 1 ) / 2 );
1577
1578
1579     for( i = 0; i < i_read / 2 ; i++ )
1580     {
1581         p_box->data.p_padb->i_reserved1[i] = ( (*p_peek) >> 7 )&0x01;
1582         p_box->data.p_padb->i_pad2[i] = ( (*p_peek) >> 4 )&0x07;
1583         p_box->data.p_padb->i_reserved1[i] = ( (*p_peek) >> 3 )&0x01;
1584         p_box->data.p_padb->i_pad1[i] = ( (*p_peek) )&0x07;
1585
1586         p_peek += 1; i_read -= 1;
1587     }
1588
1589 #ifdef MP4_VERBOSE
1590     msg_Dbg( p_stream, "read box: \"stdp\" entry-count "I64Fd,
1591                       i_read / 2 );
1592
1593 #endif
1594     MP4_READBOX_EXIT( 1 );
1595 }
1596
1597 static void MP4_FreeBox_padb( MP4_Box_t *p_box )
1598 {
1599     FREE( p_box->data.p_padb->i_reserved1 );
1600     FREE( p_box->data.p_padb->i_pad2 );
1601     FREE( p_box->data.p_padb->i_reserved2 );
1602     FREE( p_box->data.p_padb->i_pad1 );
1603 }
1604
1605 static int MP4_ReadBox_elst( stream_t *p_stream, MP4_Box_t *p_box )
1606 {
1607     unsigned int i;
1608
1609     MP4_READBOX_ENTER( MP4_Box_data_padb_t );
1610
1611     MP4_GETVERSIONFLAGS( p_box->data.p_elst );
1612
1613
1614     MP4_GET4BYTES( p_box->data.p_elst->i_entry_count );
1615
1616     p_box->data.p_elst->i_segment_duration =
1617         calloc( sizeof( uint64_t ), p_box->data.p_elst->i_entry_count );
1618     p_box->data.p_elst->i_media_time =
1619         calloc( sizeof( int64_t ),  p_box->data.p_elst->i_entry_count );
1620     p_box->data.p_elst->i_media_rate_integer =
1621         calloc( sizeof( uint16_t ), p_box->data.p_elst->i_entry_count );
1622     p_box->data.p_elst->i_media_rate_fraction=
1623         calloc( sizeof( uint16_t ), p_box->data.p_elst->i_entry_count );
1624
1625
1626     for( i = 0; i < p_box->data.p_elst->i_entry_count; i++ )
1627     {
1628         if( p_box->data.p_elst->i_version == 1 )
1629         {
1630
1631             MP4_GET8BYTES( p_box->data.p_elst->i_segment_duration[i] );
1632
1633             MP4_GET8BYTES( p_box->data.p_elst->i_media_time[i] );
1634         }
1635         else
1636         {
1637
1638             MP4_GET4BYTES( p_box->data.p_elst->i_segment_duration[i] );
1639
1640             MP4_GET4BYTES( p_box->data.p_elst->i_media_time[i] );
1641             p_box->data.p_elst->i_media_time[i] = (int32_t)p_box->data.p_elst->i_media_time[i];
1642         }
1643
1644         MP4_GET2BYTES( p_box->data.p_elst->i_media_rate_integer[i] );
1645         MP4_GET2BYTES( p_box->data.p_elst->i_media_rate_fraction[i] );
1646     }
1647
1648 #ifdef MP4_VERBOSE
1649     msg_Dbg( p_stream, "read box: \"elst\" entry-count "I64Fd,
1650                       i_read / 2 );
1651
1652 #endif
1653     MP4_READBOX_EXIT( 1 );
1654 }
1655
1656 static void MP4_FreeBox_elst( MP4_Box_t *p_box )
1657 {
1658     FREE( p_box->data.p_elst->i_segment_duration );
1659     FREE( p_box->data.p_elst->i_media_time );
1660     FREE( p_box->data.p_elst->i_media_rate_integer );
1661     FREE( p_box->data.p_elst->i_media_rate_fraction );
1662 }
1663
1664 static int MP4_ReadBox_cprt( stream_t *p_stream, MP4_Box_t *p_box )
1665 {
1666     unsigned int i_language;
1667     unsigned int i;
1668
1669     MP4_READBOX_ENTER( MP4_Box_data_cprt_t );
1670
1671     MP4_GETVERSIONFLAGS( p_box->data.p_cprt );
1672
1673     i_language = GetWBE( p_peek );
1674     for( i = 0; i < 3; i++ )
1675     {
1676         p_box->data.p_cprt->i_language[i] =
1677             ( ( i_language >> ( (2-i)*5 ) )&0x1f ) + 0x60;
1678     }
1679     p_peek += 2; i_read -= 2;
1680     MP4_GETSTRINGZ( p_box->data.p_cprt->psz_notice );
1681
1682 #ifdef MP4_VERBOSE
1683     msg_Dbg( p_stream, "read box: \"cprt\" language %c%c%c notice %s",
1684                       p_box->data.p_cprt->i_language[0],
1685                       p_box->data.p_cprt->i_language[1],
1686                       p_box->data.p_cprt->i_language[2],
1687                       p_box->data.p_cprt->psz_notice );
1688
1689 #endif
1690     MP4_READBOX_EXIT( 1 );
1691 }
1692
1693 static void MP4_FreeBox_cprt( MP4_Box_t *p_box )
1694 {
1695     FREE( p_box->data.p_cprt->psz_notice );
1696 }
1697
1698
1699 static int MP4_ReadBox_dcom( stream_t *p_stream, MP4_Box_t *p_box )
1700 {
1701     MP4_READBOX_ENTER( MP4_Box_data_dcom_t );
1702
1703     MP4_GETFOURCC( p_box->data.p_dcom->i_algorithm );
1704 #ifdef MP4_VERBOSE
1705     msg_Dbg( p_stream,
1706              "read box: \"dcom\" compression algorithm : %4.4s",
1707                       (char*)&p_box->data.p_dcom->i_algorithm );
1708 #endif
1709     MP4_READBOX_EXIT( 1 );
1710 }
1711
1712 static int MP4_ReadBox_cmvd( stream_t *p_stream, MP4_Box_t *p_box )
1713 {
1714     MP4_READBOX_ENTER( MP4_Box_data_cmvd_t );
1715
1716     MP4_GET4BYTES( p_box->data.p_cmvd->i_uncompressed_size );
1717
1718     p_box->data.p_cmvd->i_compressed_size = i_read;
1719
1720     if( !( p_box->data.p_cmvd->p_data = malloc( i_read ) ) )
1721     {
1722         msg_Dbg( p_stream, "read box: \"cmvd\" not enough memory to load data" );
1723         return( 1 );
1724     }
1725
1726     /* now copy compressed data */
1727     memcpy( p_box->data.p_cmvd->p_data,
1728             p_peek,
1729             i_read);
1730
1731     p_box->data.p_cmvd->b_compressed = 1;
1732
1733 #ifdef MP4_VERBOSE
1734     msg_Dbg( p_stream, "read box: \"cmvd\" compressed data size %d",
1735                       p_box->data.p_cmvd->i_compressed_size );
1736 #endif
1737
1738     MP4_READBOX_EXIT( 1 );
1739 }
1740 static void MP4_FreeBox_cmvd( MP4_Box_t *p_box )
1741 {
1742     FREE( p_box->data.p_cmvd->p_data );
1743 }
1744
1745
1746 static int MP4_ReadBox_cmov( stream_t *p_stream, MP4_Box_t *p_box )
1747 {
1748     MP4_Box_t *p_dcom;
1749     MP4_Box_t *p_cmvd;
1750
1751 #ifdef HAVE_ZLIB_H
1752     stream_t *p_stream_memory;
1753     z_stream z_data;
1754     uint8_t *p_data;
1755     int i_result;
1756 #endif
1757
1758     if( !( p_box->data.p_cmov = malloc( sizeof( MP4_Box_data_cmov_t ) ) ) )
1759     {
1760         msg_Err( p_stream, "out of memory" );
1761         return 0;
1762     }
1763     memset( p_box->data.p_cmov, 0, sizeof( MP4_Box_data_cmov_t ) );
1764
1765     if( !p_box->p_father ||
1766         ( p_box->p_father->i_type != FOURCC_moov &&
1767           p_box->p_father->i_type != FOURCC_foov ) )
1768     {
1769         msg_Warn( p_stream, "Read box: \"cmov\" box alone" );
1770         return 1;
1771     }
1772
1773     if( !MP4_ReadBoxContainer( p_stream, p_box ) )
1774     {
1775         return 0;
1776     }
1777
1778     if( ( p_dcom = MP4_BoxGet( p_box, "dcom" ) ) == NULL ||
1779         ( p_cmvd = MP4_BoxGet( p_box, "cmvd" ) ) == NULL ||
1780         p_cmvd->data.p_cmvd->p_data == NULL )
1781     {
1782         msg_Warn( p_stream, "read box: \"cmov\" incomplete" );
1783         return 1;
1784     }
1785
1786     if( p_dcom->data.p_dcom->i_algorithm != FOURCC_zlib )
1787     {
1788         msg_Dbg( p_stream, "read box: \"cmov\" compression algorithm : %4.4s "
1789                  "not supported", (char*)&p_dcom->data.p_dcom->i_algorithm );
1790         return 1;
1791     }
1792
1793 #ifndef HAVE_ZLIB_H
1794     msg_Dbg( p_stream, "read box: \"cmov\" zlib unsupported" );
1795     return 1;
1796
1797 #else
1798     /* decompress data */
1799     /* allocate a new buffer */
1800     if( !( p_data = malloc( p_cmvd->data.p_cmvd->i_uncompressed_size ) ) )
1801     {
1802         msg_Err( p_stream, "read box: \"cmov\" not enough memory to "
1803                  "uncompress data" );
1804         return 1;
1805     }
1806     /* init default structures */
1807     z_data.next_in   = p_cmvd->data.p_cmvd->p_data;
1808     z_data.avail_in  = p_cmvd->data.p_cmvd->i_compressed_size;
1809     z_data.next_out  = p_data;
1810     z_data.avail_out = p_cmvd->data.p_cmvd->i_uncompressed_size;
1811     z_data.zalloc    = (alloc_func)Z_NULL;
1812     z_data.zfree     = (free_func)Z_NULL;
1813     z_data.opaque    = (voidpf)Z_NULL;
1814
1815     /* init zlib */
1816     if( inflateInit( &z_data ) != Z_OK )
1817     {
1818         msg_Err( p_stream, "read box: \"cmov\" error while uncompressing" );
1819         free( p_data );
1820         return 1;
1821     }
1822
1823     /* uncompress */
1824     i_result = inflate( &z_data, Z_NO_FLUSH );
1825     if( i_result != Z_OK && i_result != Z_STREAM_END )
1826     {
1827         msg_Err( p_stream, "read box: \"cmov\" error while uncompressing" );
1828         free( p_data );
1829         return 1;
1830     }
1831
1832     if( p_cmvd->data.p_cmvd->i_uncompressed_size != z_data.total_out )
1833     {
1834         msg_Warn( p_stream, "read box: \"cmov\" uncompressing data size "
1835                   "mismatch" );
1836     }
1837     p_cmvd->data.p_cmvd->i_uncompressed_size = z_data.total_out;
1838
1839     /* close zlib */
1840     if( inflateEnd( &z_data ) != Z_OK )
1841     {
1842         msg_Warn( p_stream, "read box: \"cmov\" error while uncompressing "
1843                   "data (ignored)" );
1844     }
1845
1846     free( p_cmvd->data.p_cmvd->p_data );
1847     p_cmvd->data.p_cmvd->p_data = p_data;
1848     p_cmvd->data.p_cmvd->b_compressed = 0;
1849
1850     msg_Dbg( p_stream, "read box: \"cmov\" box succesfully uncompressed" );
1851
1852     /* now create a memory stream */
1853     p_stream_memory =
1854         stream_MemoryNew( VLC_OBJECT(p_stream), p_cmvd->data.p_cmvd->p_data,
1855                           p_cmvd->data.p_cmvd->i_uncompressed_size, VLC_TRUE );
1856
1857     /* and read uncompressd moov */
1858     p_box->data.p_cmov->p_moov = MP4_ReadBox( p_stream_memory, NULL );
1859
1860     stream_Delete( p_stream_memory );
1861
1862 #ifdef MP4_VERBOSE
1863     msg_Dbg( p_stream, "read box: \"cmov\" compressed movie header completed");
1864 #endif
1865
1866     return p_box->data.p_cmov->p_moov ? 1 : 0;
1867 #endif /* HAVE_ZLIB_H */
1868 }
1869
1870 static int MP4_ReadBox_rdrf( stream_t *p_stream, MP4_Box_t *p_box )
1871 {
1872     uint32_t i_len;
1873     MP4_READBOX_ENTER( MP4_Box_data_rdrf_t );
1874
1875     MP4_GETVERSIONFLAGS( p_box->data.p_rdrf );
1876     MP4_GETFOURCC( p_box->data.p_rdrf->i_ref_type );
1877     MP4_GET4BYTES( i_len );
1878     if( i_len > 0 )
1879     {
1880         uint32_t i;
1881         p_box->data.p_rdrf->psz_ref = malloc( i_len  + 1);
1882         for( i = 0; i < i_len; i++ )
1883         {
1884             MP4_GET1BYTE( p_box->data.p_rdrf->psz_ref[i] );
1885         }
1886         p_box->data.p_rdrf->psz_ref[i_len] = '\0';
1887     }
1888     else
1889     {
1890         p_box->data.p_rdrf->psz_ref = NULL;
1891     }
1892
1893 #ifdef MP4_VERBOSE
1894     msg_Dbg( p_stream,
1895              "read box: \"rdrf\" type:%4.4s ref %s",
1896              (char*)&p_box->data.p_rdrf->i_ref_type,
1897              p_box->data.p_rdrf->psz_ref );
1898
1899 #endif
1900     MP4_READBOX_EXIT( 1 );
1901 }
1902
1903 static void MP4_FreeBox_rdrf( MP4_Box_t *p_box )
1904 {
1905     FREE( p_box->data.p_rdrf->psz_ref )
1906 }
1907
1908
1909 static int MP4_ReadBox_rmdr( stream_t *p_stream, MP4_Box_t *p_box )
1910 {
1911     MP4_READBOX_ENTER( MP4_Box_data_rmdr_t );
1912
1913     MP4_GETVERSIONFLAGS( p_box->data.p_rmdr );
1914
1915     MP4_GET4BYTES( p_box->data.p_rmdr->i_rate );
1916
1917 #ifdef MP4_VERBOSE
1918     msg_Dbg( p_stream,
1919              "read box: \"rmdr\" rate:%d",
1920              p_box->data.p_rmdr->i_rate );
1921 #endif
1922     MP4_READBOX_EXIT( 1 );
1923 }
1924
1925 static int MP4_ReadBox_rmqu( stream_t *p_stream, MP4_Box_t *p_box )
1926 {
1927     MP4_READBOX_ENTER( MP4_Box_data_rmqu_t );
1928
1929     MP4_GET4BYTES( p_box->data.p_rmqu->i_quality );
1930
1931 #ifdef MP4_VERBOSE
1932     msg_Dbg( p_stream,
1933              "read box: \"rmqu\" quality:%d",
1934              p_box->data.p_rmqu->i_quality );
1935 #endif
1936     MP4_READBOX_EXIT( 1 );
1937 }
1938
1939 static int MP4_ReadBox_rmvc( stream_t *p_stream, MP4_Box_t *p_box )
1940 {
1941     MP4_READBOX_ENTER( MP4_Box_data_rmvc_t );
1942     MP4_GETVERSIONFLAGS( p_box->data.p_rmvc );
1943
1944     MP4_GETFOURCC( p_box->data.p_rmvc->i_gestaltType );
1945     MP4_GET4BYTES( p_box->data.p_rmvc->i_val1 );
1946     MP4_GET4BYTES( p_box->data.p_rmvc->i_val2 );
1947     MP4_GET2BYTES( p_box->data.p_rmvc->i_checkType );
1948
1949 #ifdef MP4_VERBOSE
1950     msg_Dbg( p_stream,
1951              "read box: \"rmvc\" gestaltType:%4.4s val1:0x%x val2:0x%x checkType:0x%x",
1952              (char*)&p_box->data.p_rmvc->i_gestaltType,
1953              p_box->data.p_rmvc->i_val1,p_box->data.p_rmvc->i_val2,
1954              p_box->data.p_rmvc->i_checkType );
1955 #endif
1956
1957     MP4_READBOX_EXIT( 1 );
1958 }
1959
1960 static int MP4_ReadBox_drms( stream_t *p_stream, MP4_Box_t *p_box )
1961 {
1962     MP4_Box_t *p_drms_box = p_box;
1963
1964     MP4_READBOX_ENTER( uint8_t );
1965
1966     do
1967     {
1968         p_drms_box = p_drms_box->p_father;
1969     } while( p_drms_box && p_drms_box->i_type != FOURCC_drms );
1970
1971     if( p_drms_box && p_drms_box->data.p_sample_soun->p_drms )
1972     {
1973         if( drms_init( p_drms_box->data.p_sample_soun->p_drms,
1974                        p_box->i_type, p_peek, i_read ) )
1975         {
1976             msg_Err( p_stream, "drms_init( %4.4s ) failed",
1977                      (char *)&p_box->i_type );
1978
1979             drms_free( p_drms_box->data.p_sample_soun->p_drms );
1980             p_drms_box->data.p_sample_soun->p_drms = NULL;
1981         }
1982     }
1983
1984     MP4_READBOX_EXIT( 1 );
1985 }
1986
1987 static int MP4_ReadBox_0xa9xxx( stream_t *p_stream, MP4_Box_t *p_box )
1988 {
1989     int16_t i_length, i_dummy;
1990
1991     MP4_READBOX_ENTER( MP4_Box_data_0xa9xxx_t );
1992
1993     p_box->data.p_0xa9xxx->psz_text = NULL;
1994
1995     MP4_GET2BYTES( i_length );
1996     MP4_GET2BYTES( i_dummy );
1997
1998     if( i_length > 0 )
1999     {
2000         if( i_length > i_read ) i_length = i_read;
2001
2002         p_box->data.p_0xa9xxx->psz_text = malloc( i_length + 1 );
2003
2004         memcpy( p_box->data.p_0xa9xxx->psz_text,
2005                 p_peek, i_length );
2006         p_box->data.p_0xa9xxx->psz_text[i_length] = '\0';
2007
2008 #ifdef MP4_VERBOSE
2009         msg_Dbg( p_stream,
2010                  "read box: \"%4.4s\" text=`%s'",
2011                  (char*)&p_box->i_type,
2012                  p_box->data.p_0xa9xxx->psz_text );
2013 #endif
2014     }
2015
2016     MP4_READBOX_EXIT( 1 );
2017 }
2018 static void MP4_FreeBox_0xa9xxx( MP4_Box_t *p_box )
2019 {
2020     FREE( p_box->data.p_0xa9xxx->psz_text );
2021 }
2022
2023 /* For generic */
2024 static int MP4_ReadBox_default( stream_t *p_stream, MP4_Box_t *p_box )
2025 {
2026     if( !p_box->p_father )
2027     {
2028         goto unknown;
2029     }
2030     if( p_box->p_father->i_type == FOURCC_stsd )
2031     {
2032         MP4_Box_t *p_mdia = MP4_BoxGet( p_box, "../../../.." );
2033         MP4_Box_t *p_hdlr;
2034
2035         if( p_mdia == NULL || p_mdia->i_type != FOURCC_mdia ||
2036             (p_hdlr = MP4_BoxGet( p_mdia, "hdlr" )) == NULL )
2037         {
2038             goto unknown;
2039         }
2040         switch( p_hdlr->data.p_hdlr->i_handler_type )
2041         {
2042             case FOURCC_soun:
2043                 return MP4_ReadBox_sample_soun( p_stream, p_box );
2044             case FOURCC_vide:
2045                 return MP4_ReadBox_sample_vide( p_stream, p_box );
2046             case FOURCC_text:
2047                 return MP4_ReadBox_sample_text( p_stream, p_box );
2048             default:
2049                 msg_Warn( p_stream,
2050                           "unknown handler type in stsd (uncompletetly loaded)" );
2051                 return 1;
2052         }
2053     }
2054
2055 unknown:
2056     msg_Warn( p_stream,
2057               "unknown box type %4.4s (uncompletetly loaded)",
2058               (char*)&p_box->i_type );
2059
2060     return 1;
2061 }
2062
2063 /**** ------------------------------------------------------------------- ****/
2064 /****                   "Higher level" Functions                          ****/
2065 /**** ------------------------------------------------------------------- ****/
2066
2067 static struct
2068 {
2069     uint32_t i_type;
2070     int  (*MP4_ReadBox_function )( stream_t *p_stream, MP4_Box_t *p_box );
2071     void (*MP4_FreeBox_function )( MP4_Box_t *p_box );
2072 } MP4_Box_Function [] =
2073 {
2074     /* Containers */
2075     { FOURCC_moov,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2076     { FOURCC_trak,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2077     { FOURCC_mdia,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2078     { FOURCC_moof,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2079     { FOURCC_minf,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2080     { FOURCC_stbl,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2081     { FOURCC_dinf,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2082     { FOURCC_edts,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2083     { FOURCC_udta,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2084     { FOURCC_nmhd,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2085     { FOURCC_hnti,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2086     { FOURCC_rmra,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2087     { FOURCC_rmda,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2088     { FOURCC_tref,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2089     { FOURCC_gmhd,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2090     { FOURCC_wave,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2091
2092     /* specific box */
2093     { FOURCC_ftyp,  MP4_ReadBox_ftyp,       MP4_FreeBox_ftyp },
2094     { FOURCC_cmov,  MP4_ReadBox_cmov,       MP4_FreeBox_Common },
2095     { FOURCC_mvhd,  MP4_ReadBox_mvhd,       MP4_FreeBox_Common },
2096     { FOURCC_tkhd,  MP4_ReadBox_tkhd,       MP4_FreeBox_Common },
2097     { FOURCC_mdhd,  MP4_ReadBox_mdhd,       MP4_FreeBox_Common },
2098     { FOURCC_hdlr,  MP4_ReadBox_hdlr,       MP4_FreeBox_hdlr },
2099     { FOURCC_vmhd,  MP4_ReadBox_vmhd,       MP4_FreeBox_Common },
2100     { FOURCC_smhd,  MP4_ReadBox_smhd,       MP4_FreeBox_Common },
2101     { FOURCC_hmhd,  MP4_ReadBox_hmhd,       MP4_FreeBox_Common },
2102     { FOURCC_url,   MP4_ReadBox_url,        MP4_FreeBox_url },
2103     { FOURCC_urn,   MP4_ReadBox_urn,        MP4_FreeBox_urn },
2104     { FOURCC_dref,  MP4_ReadBox_dref,       MP4_FreeBox_Common },
2105     { FOURCC_stts,  MP4_ReadBox_stts,       MP4_FreeBox_stts },
2106     { FOURCC_ctts,  MP4_ReadBox_ctts,       MP4_FreeBox_ctts },
2107     { FOURCC_stsd,  MP4_ReadBox_stsd,       MP4_FreeBox_Common },
2108     { FOURCC_stsz,  MP4_ReadBox_stsz,       MP4_FreeBox_stsz },
2109     { FOURCC_stsc,  MP4_ReadBox_stsc,       MP4_FreeBox_stsc },
2110     { FOURCC_stco,  MP4_ReadBox_stco_co64,  MP4_FreeBox_stco_co64 },
2111     { FOURCC_co64,  MP4_ReadBox_stco_co64,  MP4_FreeBox_stco_co64 },
2112     { FOURCC_stss,  MP4_ReadBox_stss,       MP4_FreeBox_stss },
2113     { FOURCC_stsh,  MP4_ReadBox_stsh,       MP4_FreeBox_stsh },
2114     { FOURCC_stdp,  MP4_ReadBox_stdp,       MP4_FreeBox_stdp },
2115     { FOURCC_padb,  MP4_ReadBox_padb,       MP4_FreeBox_padb },
2116     { FOURCC_elst,  MP4_ReadBox_elst,       MP4_FreeBox_elst },
2117     { FOURCC_cprt,  MP4_ReadBox_cprt,       MP4_FreeBox_cprt },
2118     { FOURCC_esds,  MP4_ReadBox_esds,       MP4_FreeBox_esds },
2119     { FOURCC_dcom,  MP4_ReadBox_dcom,       MP4_FreeBox_Common },
2120     { FOURCC_cmvd,  MP4_ReadBox_cmvd,       MP4_FreeBox_cmvd },
2121     { FOURCC_avcC,  MP4_ReadBox_avcC,       MP4_FreeBox_avcC },
2122
2123     /* Nothing to do with this box */
2124     { FOURCC_mdat,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2125     { FOURCC_skip,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2126     { FOURCC_free,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2127     { FOURCC_wide,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2128
2129     /* for codecs */
2130     { FOURCC_soun,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2131     { FOURCC_ms02,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2132     { FOURCC_ms11,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2133     { FOURCC_ms55,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2134     { FOURCC__mp3,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2135     { FOURCC_mp4a,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2136     { FOURCC_twos,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2137     { FOURCC_sowt,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2138     { FOURCC_QDMC,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2139     { FOURCC_QDM2,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2140     { FOURCC_ima4,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2141     { FOURCC_IMA4,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2142     { FOURCC_dvi,   MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2143     { FOURCC_alaw,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2144     { FOURCC_ulaw,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2145     { FOURCC_raw,   MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2146     { FOURCC_MAC3,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2147     { FOURCC_MAC6,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2148     { FOURCC_Qclp,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2149     { FOURCC_samr,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2150     { FOURCC_sawb,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2151     { FOURCC_OggS,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2152     { FOURCC_alac,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2153
2154     { FOURCC_vide,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2155     { FOURCC_mp4v,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2156     { FOURCC_SVQ1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2157     { FOURCC_SVQ3,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2158     { FOURCC_ZyGo,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2159     { FOURCC_DIVX,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2160     { FOURCC_XVID,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2161     { FOURCC_h263,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2162     { FOURCC_s263,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2163     { FOURCC_cvid,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2164     { FOURCC_3IV1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2165     { FOURCC_3iv1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2166     { FOURCC_3IV2,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2167     { FOURCC_3iv2,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2168     { FOURCC_3IVD,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2169     { FOURCC_3ivd,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2170     { FOURCC_3VID,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2171     { FOURCC_3vid,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2172     { FOURCC_mjpa,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2173     { FOURCC_mjpb,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2174
2175     { FOURCC_mjqt,  MP4_ReadBox_default,        NULL }, /* found in mjpa/b */
2176     { FOURCC_mjht,  MP4_ReadBox_default,        NULL },
2177
2178     { FOURCC_dvc,   MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2179     { FOURCC_dvp,   MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2180     { FOURCC_VP31,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2181     { FOURCC_vp31,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2182     { FOURCC_h264,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2183
2184     { FOURCC_jpeg,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2185     { FOURCC_avc1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2186
2187     { FOURCC_mp4s,  MP4_ReadBox_sample_mp4s,    MP4_FreeBox_Common },
2188
2189     /* XXX there is 2 box where we could find this entry stbl and tref*/
2190     { FOURCC_hint,  MP4_ReadBox_default,        MP4_FreeBox_Common },
2191
2192     /* found in tref box */
2193     { FOURCC_dpnd,  MP4_ReadBox_default,   NULL },
2194     { FOURCC_ipir,  MP4_ReadBox_default,   NULL },
2195     { FOURCC_mpod,  MP4_ReadBox_default,   NULL },
2196
2197     /* found in hnti */
2198     { FOURCC_rtp,   MP4_ReadBox_default,   NULL },
2199
2200     /* found in rmra */
2201     { FOURCC_rdrf,  MP4_ReadBox_rdrf,           MP4_FreeBox_rdrf   },
2202     { FOURCC_rmdr,  MP4_ReadBox_rmdr,           MP4_FreeBox_Common },
2203     { FOURCC_rmqu,  MP4_ReadBox_rmqu,           MP4_FreeBox_Common },
2204     { FOURCC_rmvc,  MP4_ReadBox_rmvc,           MP4_FreeBox_Common },
2205
2206     { FOURCC_drms,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2207     { FOURCC_sinf,  MP4_ReadBoxContainer,       MP4_FreeBox_Common },
2208     { FOURCC_schi,  MP4_ReadBoxContainer,       MP4_FreeBox_Common },
2209     { FOURCC_user,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2210     { FOURCC_key,   MP4_ReadBox_drms,           MP4_FreeBox_Common },
2211     { FOURCC_iviv,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2212     { FOURCC_name,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2213     { FOURCC_priv,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2214
2215     /* found in udta */
2216     { FOURCC_0xa9nam,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2217     { FOURCC_0xa9aut,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2218     { FOURCC_0xa9cpy,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2219     { FOURCC_0xa9swr,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2220     { FOURCC_0xa9inf,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2221     { FOURCC_0xa9ART,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2222     { FOURCC_0xa9dir,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2223     { FOURCC_0xa9cmt,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2224     { FOURCC_0xa9req,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2225     { FOURCC_0xa9day,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2226     { FOURCC_0xa9des,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2227     { FOURCC_0xa9fmt,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2228     { FOURCC_0xa9prd,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2229     { FOURCC_0xa9prf,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2230     { FOURCC_0xa9src,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2231     { FOURCC_0xa9alb,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2232     { FOURCC_0xa9dis,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2233     { FOURCC_0xa9enc,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2234     { FOURCC_0xa9gen,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2235     { FOURCC_0xa9trk,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2236     { FOURCC_0xa9dsa,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2237     { FOURCC_0xa9hst,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2238     { FOURCC_0xa9url,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2239     { FOURCC_0xa9ope,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2240     { FOURCC_0xa9com,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2241
2242     /* Last entry */
2243     { 0,             MP4_ReadBox_default,       NULL }
2244 };
2245
2246
2247
2248 /*****************************************************************************
2249  * MP4_ReadBox : parse the actual box and the children
2250  *  XXX : Do not go to the next box
2251  *****************************************************************************/
2252 static MP4_Box_t *MP4_ReadBox( stream_t *p_stream, MP4_Box_t *p_father )
2253 {
2254     MP4_Box_t    *p_box = malloc( sizeof( MP4_Box_t ) );
2255     unsigned int i_index;
2256
2257     if( !MP4_ReadBoxCommon( p_stream, p_box ) )
2258     {
2259         msg_Warn( p_stream, "cannot read one box" );
2260         free( p_box );
2261         return NULL;
2262     }
2263     if( !p_box->i_size )
2264     {
2265         msg_Dbg( p_stream, "found an empty box (null size)" );
2266         free( p_box );
2267         return NULL;
2268     }
2269     p_box->p_father = p_father;
2270
2271     /* Now search function to call */
2272     for( i_index = 0; ; i_index++ )
2273     {
2274         if( ( MP4_Box_Function[i_index].i_type == p_box->i_type )||
2275             ( MP4_Box_Function[i_index].i_type == 0 ) )
2276         {
2277             break;
2278         }
2279     }
2280
2281     if( !(MP4_Box_Function[i_index].MP4_ReadBox_function)( p_stream, p_box ) )
2282     {
2283         free( p_box );
2284         return NULL;
2285     }
2286
2287     return p_box;
2288 }
2289
2290 /*****************************************************************************
2291  * MP4_FreeBox : free memory after read with MP4_ReadBox and all
2292  * the children
2293  *****************************************************************************/
2294 void MP4_BoxFree( stream_t *s, MP4_Box_t *p_box )
2295 {
2296     unsigned int i_index;
2297     MP4_Box_t    *p_child;
2298
2299     if( !p_box )
2300     {
2301         return; /* hehe */
2302     }
2303
2304     for( p_child = p_box->p_first; p_child != NULL; )
2305     {
2306         MP4_Box_t *p_next;
2307
2308         p_next = p_child->p_next;
2309         MP4_BoxFree( s, p_child );
2310         p_child = p_next;
2311     }
2312
2313     /* Now search function to call */
2314     if( p_box->data.p_data )
2315     {
2316         for( i_index = 0; ; i_index++ )
2317         {
2318             if( ( MP4_Box_Function[i_index].i_type == p_box->i_type )||
2319                 ( MP4_Box_Function[i_index].i_type == 0 ) )
2320             {
2321                 break;
2322             }
2323         }
2324         if( MP4_Box_Function[i_index].MP4_FreeBox_function == NULL )
2325         {
2326             /* Should not happen */
2327             msg_Warn( s,
2328                       "cannot free box %4.4s, type unknown",
2329                       (char*)&p_box->i_type );
2330         }
2331         else
2332         {
2333             MP4_Box_Function[i_index].MP4_FreeBox_function( p_box );
2334         }
2335
2336         free( p_box->data.p_data );
2337     }
2338
2339     free( p_box );
2340 }
2341
2342 /*****************************************************************************
2343  * MP4_BoxGetRoot : Parse the entire file, and create all boxes in memory
2344  *****************************************************************************
2345  *  The first box is a virtual box "root" and is the father for all first
2346  *  level boxes for the file, a sort of virtual contener
2347  *****************************************************************************/
2348 MP4_Box_t *MP4_BoxGetRoot( stream_t *s )
2349 {
2350     MP4_Box_t *p_root;
2351     stream_t *p_stream;
2352     int i_result;
2353
2354     p_root = malloc( sizeof( MP4_Box_t ) );
2355     p_root->i_pos = 0;
2356     p_root->i_type = VLC_FOURCC( 'r', 'o', 'o', 't' );
2357     p_root->i_shortsize = 1;
2358     p_root->i_size = stream_Size( s );
2359     CreateUUID( &p_root->i_uuid, p_root->i_type );
2360
2361     p_root->data.p_data = NULL;
2362     p_root->p_father = NULL;
2363     p_root->p_first  = NULL;
2364     p_root->p_last  = NULL;
2365     p_root->p_next   = NULL;
2366
2367     p_stream = s;
2368
2369     i_result = MP4_ReadBoxContainerRaw( p_stream, p_root );
2370
2371     if( i_result )
2372     {
2373         MP4_Box_t *p_child;
2374         MP4_Box_t *p_moov;
2375         MP4_Box_t *p_cmov;
2376
2377         /* check if there is a cmov, if so replace
2378           compressed moov by  uncompressed one */
2379         if( ( ( p_moov = MP4_BoxGet( p_root, "moov" ) ) &&
2380               ( p_cmov = MP4_BoxGet( p_root, "moov/cmov" ) ) ) ||
2381             ( ( p_moov = MP4_BoxGet( p_root, "foov" ) ) &&
2382               ( p_cmov = MP4_BoxGet( p_root, "foov/cmov" ) ) ) )
2383         {
2384             /* rename the compressed moov as a box to skip */
2385             p_moov->i_type = FOURCC_skip;
2386
2387             /* get uncompressed p_moov */
2388             p_moov = p_cmov->data.p_cmov->p_moov;
2389             p_cmov->data.p_cmov->p_moov = NULL;
2390
2391             /* make p_root father of this new moov */
2392             p_moov->p_father = p_root;
2393
2394             /* insert this new moov box as first child of p_root */
2395             p_moov->p_next = p_child = p_root->p_first;
2396             p_root->p_first = p_moov;
2397         }
2398     }
2399
2400     return p_root;
2401 }
2402
2403
2404 static void __MP4_BoxDumpStructure( stream_t *s,
2405                                     MP4_Box_t *p_box, unsigned int i_level )
2406 {
2407     MP4_Box_t *p_child;
2408
2409     if( !i_level )
2410     {
2411         msg_Dbg( s, "dumping root Box \"%4.4s\"",
2412                           (char*)&p_box->i_type );
2413     }
2414     else
2415     {
2416         char str[512];
2417         unsigned int i;
2418         memset( str, (uint8_t)' ', 512 );
2419         for( i = 0; i < i_level; i++ )
2420         {
2421             str[i*5] = '|';
2422         }
2423         sprintf( str + i_level * 5, "+ %4.4s size %d",
2424                       (char*)&p_box->i_type,
2425                       (uint32_t)p_box->i_size );
2426
2427         msg_Dbg( s, "%s", str );
2428     }
2429     p_child = p_box->p_first;
2430     while( p_child )
2431     {
2432         __MP4_BoxDumpStructure( s, p_child, i_level + 1 );
2433         p_child = p_child->p_next;
2434     }
2435 }
2436
2437 void MP4_BoxDumpStructure( stream_t *s, MP4_Box_t *p_box )
2438 {
2439     __MP4_BoxDumpStructure( s, p_box, 0 );
2440 }
2441
2442
2443
2444 /*****************************************************************************
2445  *****************************************************************************
2446  **
2447  **  High level methods to acces an MP4 file
2448  **
2449  *****************************************************************************
2450  *****************************************************************************/
2451 static void __get_token( char **ppsz_path, char **ppsz_token, int *pi_number )
2452 {
2453     size_t i_len ;
2454     if( !*ppsz_path[0] )
2455     {
2456         *ppsz_token = NULL;
2457         *pi_number = 0;
2458         return;
2459     }
2460     i_len = 0;
2461     while(  (*ppsz_path)[i_len] &&
2462             (*ppsz_path)[i_len] != '/' && (*ppsz_path)[i_len] != '[' )
2463     {
2464         i_len++;
2465     }
2466     if( !i_len && **ppsz_path == '/' )
2467     {
2468         i_len = 1;
2469     }
2470     *ppsz_token = malloc( i_len + 1 );
2471
2472     memcpy( *ppsz_token, *ppsz_path, i_len );
2473
2474     (*ppsz_token)[i_len] = '\0';
2475
2476     *ppsz_path += i_len;
2477
2478     if( **ppsz_path == '[' )
2479     {
2480         (*ppsz_path)++;
2481         *pi_number = strtol( *ppsz_path, NULL, 10 );
2482         while( **ppsz_path && **ppsz_path != ']' )
2483         {
2484             (*ppsz_path)++;
2485         }
2486         if( **ppsz_path == ']' )
2487         {
2488             (*ppsz_path)++;
2489         }
2490     }
2491     else
2492     {
2493         *pi_number = 0;
2494     }
2495     while( **ppsz_path == '/' )
2496     {
2497         (*ppsz_path)++;
2498     }
2499 }
2500
2501 static void __MP4_BoxGet( MP4_Box_t **pp_result,
2502                           MP4_Box_t *p_box, char *psz_fmt, va_list args)
2503 {
2504     char    *psz_path;
2505
2506     if( !p_box )
2507     {
2508         *pp_result = NULL;
2509         return;
2510     }
2511
2512     vasprintf( &psz_path, psz_fmt, args );
2513
2514     if( !psz_path || !psz_path[0] )
2515     {
2516         FREE( psz_path );
2517         *pp_result = NULL;
2518         return;
2519     }
2520
2521 //    fprintf( stderr, "path:'%s'\n", psz_path );
2522     psz_fmt = psz_path; /* keep this pointer, as it need to be unallocated */
2523     for( ; ; )
2524     {
2525         char *psz_token;
2526         int i_number;
2527
2528         __get_token( &psz_path, &psz_token, &i_number );
2529 //        fprintf( stderr, "path:'%s', token:'%s' n:%d\n",
2530 //                 psz_path,psz_token,i_number );
2531         if( !psz_token )
2532         {
2533             FREE( psz_token );
2534             free( psz_fmt );
2535             *pp_result = p_box;
2536             return;
2537         }
2538         else
2539         if( !strcmp( psz_token, "/" ) )
2540         {
2541             /* Find root box */
2542             while( p_box && p_box->i_type != VLC_FOURCC( 'r', 'o', 'o', 't' ) )
2543             {
2544                 p_box = p_box->p_father;
2545             }
2546             if( !p_box )
2547             {
2548                 free( psz_token );
2549                 free( psz_fmt );
2550                 *pp_result = NULL;
2551                 return;
2552             }
2553         }
2554         else
2555         if( !strcmp( psz_token, "." ) )
2556         {
2557             /* Do nothing */
2558         }
2559         else
2560         if( !strcmp( psz_token, ".." ) )
2561         {
2562             p_box = p_box->p_father;
2563             if( !p_box )
2564             {
2565                 free( psz_token );
2566                 free( psz_fmt );
2567                 *pp_result = NULL;
2568                 return;
2569             }
2570         }
2571         else
2572         if( strlen( psz_token ) == 4 )
2573         {
2574             uint32_t i_fourcc;
2575             i_fourcc = VLC_FOURCC( psz_token[0], psz_token[1],
2576                                    psz_token[2], psz_token[3] );
2577             p_box = p_box->p_first;
2578             for( ; ; )
2579             {
2580                 if( !p_box )
2581                 {
2582                     free( psz_token );
2583                     free( psz_fmt );
2584                     *pp_result = NULL;
2585                     return;
2586                 }
2587                 if( p_box->i_type == i_fourcc )
2588                 {
2589                     if( !i_number )
2590                     {
2591                         break;
2592                     }
2593                     i_number--;
2594                 }
2595                 p_box = p_box->p_next;
2596             }
2597         }
2598         else
2599         if( strlen( psz_token ) == 0 )
2600         {
2601             p_box = p_box->p_first;
2602             for( ; ; )
2603             {
2604                 if( !p_box )
2605                 {
2606                     free( psz_token );
2607                     free( psz_fmt );
2608                     *pp_result = NULL;
2609                     return;
2610                 }
2611                 if( !i_number )
2612                 {
2613                     break;
2614                 }
2615                 i_number--;
2616                 p_box = p_box->p_next;
2617             }
2618         }
2619         else
2620         {
2621 //            fprintf( stderr, "Argg malformed token \"%s\"",psz_token );
2622             FREE( psz_token );
2623             free( psz_fmt );
2624             *pp_result = NULL;
2625             return;
2626         }
2627
2628         free( psz_token );
2629     }
2630 }
2631
2632 /*****************************************************************************
2633  * MP4_BoxGet: find a box given a path relative to p_box
2634  *****************************************************************************
2635  * Path Format: . .. / as usual
2636  *              [number] to specifie box number ex: trak[12]
2637  *
2638  * ex: /moov/trak[12]
2639  *     ../mdia
2640  *****************************************************************************/
2641 MP4_Box_t *MP4_BoxGet( MP4_Box_t *p_box, char *psz_fmt, ... )
2642 {
2643     va_list args;
2644     MP4_Box_t *p_result;
2645
2646     va_start( args, psz_fmt );
2647     __MP4_BoxGet( &p_result, p_box, psz_fmt, args );
2648     va_end( args );
2649
2650     return( p_result );
2651 }
2652
2653 /*****************************************************************************
2654  * MP4_BoxCount: count box given a path relative to p_box
2655  *****************************************************************************
2656  * Path Format: . .. / as usual
2657  *              [number] to specifie box number ex: trak[12]
2658  *
2659  * ex: /moov/trak[12]
2660  *     ../mdia
2661  *****************************************************************************/
2662 int MP4_BoxCount( MP4_Box_t *p_box, char *psz_fmt, ... )
2663 {
2664     va_list args;
2665     int     i_count;
2666     MP4_Box_t *p_result, *p_next;
2667
2668     va_start( args, psz_fmt );
2669     __MP4_BoxGet( &p_result, p_box, psz_fmt, args );
2670     va_end( args );
2671     if( !p_result )
2672     {
2673         return( 0 );
2674     }
2675
2676     i_count = 1;
2677     for( p_next = p_result->p_next; p_next != NULL; p_next = p_next->p_next)
2678     {
2679         if( p_next->i_type == p_result->i_type)
2680         {
2681             i_count++;
2682         }
2683     }
2684     return( i_count );
2685 }