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