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