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