Fixed wrong type used in mp4 parsing.
[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_elst_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, p_box->data.p_elst->i_entry_count );
1723 #endif
1724     MP4_READBOX_EXIT( 1 );
1725 }
1726
1727 static void MP4_FreeBox_elst( MP4_Box_t *p_box )
1728 {
1729     FREENULL( p_box->data.p_elst->i_segment_duration );
1730     FREENULL( p_box->data.p_elst->i_media_time );
1731     FREENULL( p_box->data.p_elst->i_media_rate_integer );
1732     FREENULL( p_box->data.p_elst->i_media_rate_fraction );
1733 }
1734
1735 static int MP4_ReadBox_cprt( stream_t *p_stream, MP4_Box_t *p_box )
1736 {
1737     unsigned int i_language;
1738     unsigned int i;
1739
1740     MP4_READBOX_ENTER( MP4_Box_data_cprt_t );
1741
1742     MP4_GETVERSIONFLAGS( p_box->data.p_cprt );
1743
1744     i_language = GetWBE( p_peek );
1745     for( i = 0; i < 3; i++ )
1746     {
1747         p_box->data.p_cprt->i_language[i] =
1748             ( ( i_language >> ( (2-i)*5 ) )&0x1f ) + 0x60;
1749     }
1750     p_peek += 2; i_read -= 2;
1751     MP4_GETSTRINGZ( p_box->data.p_cprt->psz_notice );
1752
1753 #ifdef MP4_VERBOSE
1754     msg_Dbg( p_stream, "read box: \"cprt\" language %c%c%c notice %s",
1755                       p_box->data.p_cprt->i_language[0],
1756                       p_box->data.p_cprt->i_language[1],
1757                       p_box->data.p_cprt->i_language[2],
1758                       p_box->data.p_cprt->psz_notice );
1759
1760 #endif
1761     MP4_READBOX_EXIT( 1 );
1762 }
1763
1764 static void MP4_FreeBox_cprt( MP4_Box_t *p_box )
1765 {
1766     FREENULL( p_box->data.p_cprt->psz_notice );
1767 }
1768
1769
1770 static int MP4_ReadBox_dcom( stream_t *p_stream, MP4_Box_t *p_box )
1771 {
1772     MP4_READBOX_ENTER( MP4_Box_data_dcom_t );
1773
1774     MP4_GETFOURCC( p_box->data.p_dcom->i_algorithm );
1775 #ifdef MP4_VERBOSE
1776     msg_Dbg( p_stream,
1777              "read box: \"dcom\" compression algorithm : %4.4s",
1778                       (char*)&p_box->data.p_dcom->i_algorithm );
1779 #endif
1780     MP4_READBOX_EXIT( 1 );
1781 }
1782
1783 static int MP4_ReadBox_cmvd( stream_t *p_stream, MP4_Box_t *p_box )
1784 {
1785     MP4_READBOX_ENTER( MP4_Box_data_cmvd_t );
1786
1787     MP4_GET4BYTES( p_box->data.p_cmvd->i_uncompressed_size );
1788
1789     p_box->data.p_cmvd->i_compressed_size = i_read;
1790
1791     if( !( p_box->data.p_cmvd->p_data = malloc( i_read ) ) )
1792     {
1793         msg_Dbg( p_stream, "read box: \"cmvd\" not enough memory to load data" );
1794         return( 1 );
1795     }
1796
1797     /* now copy compressed data */
1798     memcpy( p_box->data.p_cmvd->p_data,
1799             p_peek,
1800             i_read);
1801
1802     p_box->data.p_cmvd->b_compressed = 1;
1803
1804 #ifdef MP4_VERBOSE
1805     msg_Dbg( p_stream, "read box: \"cmvd\" compressed data size %d",
1806                       p_box->data.p_cmvd->i_compressed_size );
1807 #endif
1808
1809     MP4_READBOX_EXIT( 1 );
1810 }
1811 static void MP4_FreeBox_cmvd( MP4_Box_t *p_box )
1812 {
1813     FREENULL( p_box->data.p_cmvd->p_data );
1814 }
1815
1816
1817 static int MP4_ReadBox_cmov( stream_t *p_stream, MP4_Box_t *p_box )
1818 {
1819     MP4_Box_t *p_dcom;
1820     MP4_Box_t *p_cmvd;
1821
1822 #ifdef HAVE_ZLIB_H
1823     stream_t *p_stream_memory;
1824     z_stream z_data;
1825     uint8_t *p_data;
1826     int i_result;
1827 #endif
1828
1829     if( !( p_box->data.p_cmov = malloc( sizeof( MP4_Box_data_cmov_t ) ) ) )
1830     {
1831         msg_Err( p_stream, "out of memory" );
1832         return 0;
1833     }
1834     memset( p_box->data.p_cmov, 0, sizeof( MP4_Box_data_cmov_t ) );
1835
1836     if( !p_box->p_father ||
1837         ( p_box->p_father->i_type != FOURCC_moov &&
1838           p_box->p_father->i_type != FOURCC_foov ) )
1839     {
1840         msg_Warn( p_stream, "Read box: \"cmov\" box alone" );
1841         return 1;
1842     }
1843
1844     if( !MP4_ReadBoxContainer( p_stream, p_box ) )
1845     {
1846         return 0;
1847     }
1848
1849     if( ( p_dcom = MP4_BoxGet( p_box, "dcom" ) ) == NULL ||
1850         ( p_cmvd = MP4_BoxGet( p_box, "cmvd" ) ) == NULL ||
1851         p_cmvd->data.p_cmvd->p_data == NULL )
1852     {
1853         msg_Warn( p_stream, "read box: \"cmov\" incomplete" );
1854         return 1;
1855     }
1856
1857     if( p_dcom->data.p_dcom->i_algorithm != FOURCC_zlib )
1858     {
1859         msg_Dbg( p_stream, "read box: \"cmov\" compression algorithm : %4.4s "
1860                  "not supported", (char*)&p_dcom->data.p_dcom->i_algorithm );
1861         return 1;
1862     }
1863
1864 #ifndef HAVE_ZLIB_H
1865     msg_Dbg( p_stream, "read box: \"cmov\" zlib unsupported" );
1866     return 1;
1867
1868 #else
1869     /* decompress data */
1870     /* allocate a new buffer */
1871     if( !( p_data = malloc( p_cmvd->data.p_cmvd->i_uncompressed_size ) ) )
1872     {
1873         msg_Err( p_stream, "read box: \"cmov\" not enough memory to "
1874                  "uncompress data" );
1875         return 1;
1876     }
1877     /* init default structures */
1878     z_data.next_in   = p_cmvd->data.p_cmvd->p_data;
1879     z_data.avail_in  = p_cmvd->data.p_cmvd->i_compressed_size;
1880     z_data.next_out  = p_data;
1881     z_data.avail_out = p_cmvd->data.p_cmvd->i_uncompressed_size;
1882     z_data.zalloc    = (alloc_func)Z_NULL;
1883     z_data.zfree     = (free_func)Z_NULL;
1884     z_data.opaque    = (voidpf)Z_NULL;
1885
1886     /* init zlib */
1887     if( inflateInit( &z_data ) != Z_OK )
1888     {
1889         msg_Err( p_stream, "read box: \"cmov\" error while uncompressing" );
1890         free( p_data );
1891         return 1;
1892     }
1893
1894     /* uncompress */
1895     i_result = inflate( &z_data, Z_NO_FLUSH );
1896     if( i_result != Z_OK && i_result != Z_STREAM_END )
1897     {
1898         msg_Err( p_stream, "read box: \"cmov\" error while uncompressing" );
1899         free( p_data );
1900         return 1;
1901     }
1902
1903     if( p_cmvd->data.p_cmvd->i_uncompressed_size != z_data.total_out )
1904     {
1905         msg_Warn( p_stream, "read box: \"cmov\" uncompressing data size "
1906                   "mismatch" );
1907     }
1908     p_cmvd->data.p_cmvd->i_uncompressed_size = z_data.total_out;
1909
1910     /* close zlib */
1911     if( inflateEnd( &z_data ) != Z_OK )
1912     {
1913         msg_Warn( p_stream, "read box: \"cmov\" error while uncompressing "
1914                   "data (ignored)" );
1915     }
1916
1917     free( p_cmvd->data.p_cmvd->p_data );
1918     p_cmvd->data.p_cmvd->p_data = p_data;
1919     p_cmvd->data.p_cmvd->b_compressed = 0;
1920
1921     msg_Dbg( p_stream, "read box: \"cmov\" box succesfully uncompressed" );
1922
1923     /* now create a memory stream */
1924     p_stream_memory =
1925         stream_MemoryNew( VLC_OBJECT(p_stream), p_cmvd->data.p_cmvd->p_data,
1926                           p_cmvd->data.p_cmvd->i_uncompressed_size, VLC_TRUE );
1927
1928     /* and read uncompressd moov */
1929     p_box->data.p_cmov->p_moov = MP4_ReadBox( p_stream_memory, NULL );
1930
1931     stream_Delete( p_stream_memory );
1932
1933 #ifdef MP4_VERBOSE
1934     msg_Dbg( p_stream, "read box: \"cmov\" compressed movie header completed");
1935 #endif
1936
1937     return p_box->data.p_cmov->p_moov ? 1 : 0;
1938 #endif /* HAVE_ZLIB_H */
1939 }
1940
1941 static int MP4_ReadBox_rdrf( stream_t *p_stream, MP4_Box_t *p_box )
1942 {
1943     uint32_t i_len;
1944     MP4_READBOX_ENTER( MP4_Box_data_rdrf_t );
1945
1946     MP4_GETVERSIONFLAGS( p_box->data.p_rdrf );
1947     MP4_GETFOURCC( p_box->data.p_rdrf->i_ref_type );
1948     MP4_GET4BYTES( i_len );
1949     if( i_len > 0 )
1950     {
1951         uint32_t i;
1952         p_box->data.p_rdrf->psz_ref = malloc( i_len  + 1);
1953         for( i = 0; i < i_len; i++ )
1954         {
1955             MP4_GET1BYTE( p_box->data.p_rdrf->psz_ref[i] );
1956         }
1957         p_box->data.p_rdrf->psz_ref[i_len] = '\0';
1958     }
1959     else
1960     {
1961         p_box->data.p_rdrf->psz_ref = NULL;
1962     }
1963
1964 #ifdef MP4_VERBOSE
1965     msg_Dbg( p_stream,
1966              "read box: \"rdrf\" type:%4.4s ref %s",
1967              (char*)&p_box->data.p_rdrf->i_ref_type,
1968              p_box->data.p_rdrf->psz_ref );
1969
1970 #endif
1971     MP4_READBOX_EXIT( 1 );
1972 }
1973
1974 static void MP4_FreeBox_rdrf( MP4_Box_t *p_box )
1975 {
1976     FREENULL( p_box->data.p_rdrf->psz_ref )
1977 }
1978
1979
1980 static int MP4_ReadBox_rmdr( stream_t *p_stream, MP4_Box_t *p_box )
1981 {
1982     MP4_READBOX_ENTER( MP4_Box_data_rmdr_t );
1983
1984     MP4_GETVERSIONFLAGS( p_box->data.p_rmdr );
1985
1986     MP4_GET4BYTES( p_box->data.p_rmdr->i_rate );
1987
1988 #ifdef MP4_VERBOSE
1989     msg_Dbg( p_stream,
1990              "read box: \"rmdr\" rate:%d",
1991              p_box->data.p_rmdr->i_rate );
1992 #endif
1993     MP4_READBOX_EXIT( 1 );
1994 }
1995
1996 static int MP4_ReadBox_rmqu( stream_t *p_stream, MP4_Box_t *p_box )
1997 {
1998     MP4_READBOX_ENTER( MP4_Box_data_rmqu_t );
1999
2000     MP4_GET4BYTES( p_box->data.p_rmqu->i_quality );
2001
2002 #ifdef MP4_VERBOSE
2003     msg_Dbg( p_stream,
2004              "read box: \"rmqu\" quality:%d",
2005              p_box->data.p_rmqu->i_quality );
2006 #endif
2007     MP4_READBOX_EXIT( 1 );
2008 }
2009
2010 static int MP4_ReadBox_rmvc( stream_t *p_stream, MP4_Box_t *p_box )
2011 {
2012     MP4_READBOX_ENTER( MP4_Box_data_rmvc_t );
2013     MP4_GETVERSIONFLAGS( p_box->data.p_rmvc );
2014
2015     MP4_GETFOURCC( p_box->data.p_rmvc->i_gestaltType );
2016     MP4_GET4BYTES( p_box->data.p_rmvc->i_val1 );
2017     MP4_GET4BYTES( p_box->data.p_rmvc->i_val2 );
2018     MP4_GET2BYTES( p_box->data.p_rmvc->i_checkType );
2019
2020 #ifdef MP4_VERBOSE
2021     msg_Dbg( p_stream,
2022              "read box: \"rmvc\" gestaltType:%4.4s val1:0x%x val2:0x%x checkType:0x%x",
2023              (char*)&p_box->data.p_rmvc->i_gestaltType,
2024              p_box->data.p_rmvc->i_val1,p_box->data.p_rmvc->i_val2,
2025              p_box->data.p_rmvc->i_checkType );
2026 #endif
2027
2028     MP4_READBOX_EXIT( 1 );
2029 }
2030
2031 static int MP4_ReadBox_drms( stream_t *p_stream, MP4_Box_t *p_box )
2032 {
2033     MP4_Box_t *p_drms_box = p_box;
2034
2035     MP4_READBOX_ENTER( uint8_t );
2036
2037     do
2038     {
2039         p_drms_box = p_drms_box->p_father;
2040     } while( p_drms_box && p_drms_box->i_type != FOURCC_drms );
2041
2042     if( p_drms_box && p_drms_box->data.p_sample_soun->p_drms )
2043     {
2044         int i_ret;
2045         if( config_GetInt( p_stream, "france" ) )
2046         {
2047             i_ret = -7;
2048         }
2049         else
2050         {
2051             i_ret= drms_init( p_drms_box->data.p_sample_soun->p_drms,
2052                                p_box->i_type, p_peek, i_read );
2053         }
2054         if( i_ret )
2055         {
2056             const char *psz_error;
2057
2058             switch( i_ret )
2059             {
2060                 case -1: psz_error = "unimplemented"; break;
2061                 case -2: psz_error = "invalid argument"; break;
2062                 case -3: psz_error = "could not get system key"; break;
2063                 case -4: psz_error = "could not get SCI data"; break;
2064                 case -5: psz_error = "no user key found in SCI data"; break;
2065                 case -6: psz_error = "invalid user key"; break;
2066                 case -7: psz_error = "you live in France"; break;
2067                 default: psz_error = "unknown error"; break;
2068             }
2069
2070             msg_Err( p_stream, "drms_init(%4.4s) failed (%s)",
2071                      (char *)&p_box->i_type, psz_error );
2072
2073             drms_free( p_drms_box->data.p_sample_soun->p_drms );
2074             p_drms_box->data.p_sample_soun->p_drms = NULL;
2075         }
2076     }
2077
2078     MP4_READBOX_EXIT( 1 );
2079 }
2080
2081 static int MP4_ReadBox_0xa9xxx( stream_t *p_stream, MP4_Box_t *p_box )
2082 {
2083     uint16_t i_length, i_dummy;
2084
2085     MP4_READBOX_ENTER( MP4_Box_data_0xa9xxx_t );
2086
2087     p_box->data.p_0xa9xxx->psz_text = NULL;
2088
2089     MP4_GET2BYTES( i_length );
2090     MP4_GET2BYTES( i_dummy );
2091
2092     if( i_length > 0 )
2093     {
2094         if( i_length > i_read ) i_length = i_read;
2095
2096         p_box->data.p_0xa9xxx->psz_text = malloc( i_length + 1 );
2097
2098         memcpy( p_box->data.p_0xa9xxx->psz_text,
2099                 p_peek, i_length );
2100         p_box->data.p_0xa9xxx->psz_text[i_length] = '\0';
2101
2102 #ifdef MP4_VERBOSE
2103         msg_Dbg( p_stream,
2104                  "read box: \"%4.4s\" text=`%s'",
2105                  (char*)&p_box->i_type,
2106                  p_box->data.p_0xa9xxx->psz_text );
2107 #endif
2108     }
2109
2110     MP4_READBOX_EXIT( 1 );
2111 }
2112 static void MP4_FreeBox_0xa9xxx( MP4_Box_t *p_box )
2113 {
2114     FREENULL( p_box->data.p_0xa9xxx->psz_text );
2115 }
2116
2117 /* For generic */
2118 static int MP4_ReadBox_default( stream_t *p_stream, MP4_Box_t *p_box )
2119 {
2120     if( !p_box->p_father )
2121     {
2122         goto unknown;
2123     }
2124     if( p_box->p_father->i_type == FOURCC_stsd )
2125     {
2126         MP4_Box_t *p_mdia = MP4_BoxGet( p_box, "../../../.." );
2127         MP4_Box_t *p_hdlr;
2128
2129         if( p_mdia == NULL || p_mdia->i_type != FOURCC_mdia ||
2130             (p_hdlr = MP4_BoxGet( p_mdia, "hdlr" )) == NULL )
2131         {
2132             goto unknown;
2133         }
2134         switch( p_hdlr->data.p_hdlr->i_handler_type )
2135         {
2136             case FOURCC_soun:
2137                 return MP4_ReadBox_sample_soun( p_stream, p_box );
2138             case FOURCC_vide:
2139                 return MP4_ReadBox_sample_vide( p_stream, p_box );
2140             case FOURCC_text:
2141                 return MP4_ReadBox_sample_text( p_stream, p_box );
2142             case FOURCC_tx3g:
2143                 return MP4_ReadBox_sample_tx3g( p_stream, p_box );
2144             default:
2145                 msg_Warn( p_stream,
2146                           "unknown handler type in stsd (uncompletetly loaded)" );
2147                 return 1;
2148         }
2149     }
2150
2151 unknown:
2152     msg_Warn( p_stream,
2153               "unknown box type %4.4s (uncompletetly loaded)",
2154               (char*)&p_box->i_type );
2155
2156     return 1;
2157 }
2158
2159 /**** ------------------------------------------------------------------- ****/
2160 /****                   "Higher level" Functions                          ****/
2161 /**** ------------------------------------------------------------------- ****/
2162
2163 static struct
2164 {
2165     uint32_t i_type;
2166     int  (*MP4_ReadBox_function )( stream_t *p_stream, MP4_Box_t *p_box );
2167     void (*MP4_FreeBox_function )( MP4_Box_t *p_box );
2168 } MP4_Box_Function [] =
2169 {
2170     /* Containers */
2171     { FOURCC_moov,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2172     { FOURCC_trak,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2173     { FOURCC_mdia,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2174     { FOURCC_moof,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2175     { FOURCC_minf,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2176     { FOURCC_stbl,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2177     { FOURCC_dinf,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2178     { FOURCC_edts,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2179     { FOURCC_udta,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2180     { FOURCC_nmhd,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2181     { FOURCC_hnti,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2182     { FOURCC_rmra,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2183     { FOURCC_rmda,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2184     { FOURCC_tref,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2185     { FOURCC_gmhd,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2186     { FOURCC_wave,  MP4_ReadBoxContainer,   MP4_FreeBox_Common },
2187
2188     /* specific box */
2189     { FOURCC_ftyp,  MP4_ReadBox_ftyp,       MP4_FreeBox_ftyp },
2190     { FOURCC_cmov,  MP4_ReadBox_cmov,       MP4_FreeBox_Common },
2191     { FOURCC_mvhd,  MP4_ReadBox_mvhd,       MP4_FreeBox_Common },
2192     { FOURCC_tkhd,  MP4_ReadBox_tkhd,       MP4_FreeBox_Common },
2193     { FOURCC_mdhd,  MP4_ReadBox_mdhd,       MP4_FreeBox_Common },
2194     { FOURCC_hdlr,  MP4_ReadBox_hdlr,       MP4_FreeBox_hdlr },
2195     { FOURCC_vmhd,  MP4_ReadBox_vmhd,       MP4_FreeBox_Common },
2196     { FOURCC_smhd,  MP4_ReadBox_smhd,       MP4_FreeBox_Common },
2197     { FOURCC_hmhd,  MP4_ReadBox_hmhd,       MP4_FreeBox_Common },
2198     { FOURCC_url,   MP4_ReadBox_url,        MP4_FreeBox_url },
2199     { FOURCC_urn,   MP4_ReadBox_urn,        MP4_FreeBox_urn },
2200     { FOURCC_dref,  MP4_ReadBox_dref,       MP4_FreeBox_Common },
2201     { FOURCC_stts,  MP4_ReadBox_stts,       MP4_FreeBox_stts },
2202     { FOURCC_ctts,  MP4_ReadBox_ctts,       MP4_FreeBox_ctts },
2203     { FOURCC_stsd,  MP4_ReadBox_stsd,       MP4_FreeBox_Common },
2204     { FOURCC_stsz,  MP4_ReadBox_stsz,       MP4_FreeBox_stsz },
2205     { FOURCC_stsc,  MP4_ReadBox_stsc,       MP4_FreeBox_stsc },
2206     { FOURCC_stco,  MP4_ReadBox_stco_co64,  MP4_FreeBox_stco_co64 },
2207     { FOURCC_co64,  MP4_ReadBox_stco_co64,  MP4_FreeBox_stco_co64 },
2208     { FOURCC_stss,  MP4_ReadBox_stss,       MP4_FreeBox_stss },
2209     { FOURCC_stsh,  MP4_ReadBox_stsh,       MP4_FreeBox_stsh },
2210     { FOURCC_stdp,  MP4_ReadBox_stdp,       MP4_FreeBox_stdp },
2211     { FOURCC_padb,  MP4_ReadBox_padb,       MP4_FreeBox_padb },
2212     { FOURCC_elst,  MP4_ReadBox_elst,       MP4_FreeBox_elst },
2213     { FOURCC_cprt,  MP4_ReadBox_cprt,       MP4_FreeBox_cprt },
2214     { FOURCC_esds,  MP4_ReadBox_esds,       MP4_FreeBox_esds },
2215     { FOURCC_dcom,  MP4_ReadBox_dcom,       MP4_FreeBox_Common },
2216     { FOURCC_cmvd,  MP4_ReadBox_cmvd,       MP4_FreeBox_cmvd },
2217     { FOURCC_avcC,  MP4_ReadBox_avcC,       MP4_FreeBox_avcC },
2218
2219     /* Nothing to do with this box */
2220     { FOURCC_mdat,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2221     { FOURCC_skip,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2222     { FOURCC_free,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2223     { FOURCC_wide,  MP4_ReadBoxSkip,        MP4_FreeBox_Common },
2224
2225     /* for codecs */
2226     { FOURCC_soun,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2227     { FOURCC_ms02,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2228     { FOURCC_ms11,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2229     { FOURCC_ms55,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2230     { FOURCC__mp3,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2231     { FOURCC_mp4a,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2232     { FOURCC_twos,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2233     { FOURCC_sowt,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2234     { FOURCC_QDMC,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2235     { FOURCC_QDM2,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2236     { FOURCC_ima4,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2237     { FOURCC_IMA4,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2238     { FOURCC_dvi,   MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2239     { FOURCC_alaw,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2240     { FOURCC_ulaw,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2241     { FOURCC_raw,   MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2242     { FOURCC_MAC3,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2243     { FOURCC_MAC6,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2244     { FOURCC_Qclp,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2245     { FOURCC_samr,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2246     { FOURCC_sawb,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2247     { FOURCC_OggS,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2248     { FOURCC_alac,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2249
2250     { FOURCC_vide,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2251     { FOURCC_mp4v,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2252     { FOURCC_SVQ1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2253     { FOURCC_SVQ3,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2254     { FOURCC_ZyGo,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2255     { FOURCC_DIVX,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2256     { FOURCC_XVID,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2257     { FOURCC_h263,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2258     { FOURCC_s263,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2259     { FOURCC_cvid,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2260     { FOURCC_3IV1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2261     { FOURCC_3iv1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2262     { FOURCC_3IV2,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2263     { FOURCC_3iv2,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2264     { FOURCC_3IVD,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2265     { FOURCC_3ivd,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2266     { FOURCC_3VID,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2267     { FOURCC_3vid,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2268     { FOURCC_mjpa,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2269     { FOURCC_mjpb,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2270     { FOURCC_qdrw,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2271     { FOURCC_mp2v,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2272     { FOURCC_hdv2,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2273
2274     { FOURCC_mjqt,  MP4_ReadBox_default,        NULL }, /* found in mjpa/b */
2275     { FOURCC_mjht,  MP4_ReadBox_default,        NULL },
2276
2277     { FOURCC_dvc,   MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2278     { FOURCC_dvp,   MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2279     { FOURCC_VP31,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2280     { FOURCC_vp31,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2281     { FOURCC_h264,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2282
2283     { FOURCC_jpeg,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2284     { FOURCC_avc1,  MP4_ReadBox_sample_vide,    MP4_FreeBox_sample_vide },
2285
2286     { FOURCC_mp4s,  MP4_ReadBox_sample_mp4s,    MP4_FreeBox_Common },
2287
2288     /* XXX there is 2 box where we could find this entry stbl and tref*/
2289     { FOURCC_hint,  MP4_ReadBox_default,        MP4_FreeBox_Common },
2290
2291     /* found in tref box */
2292     { FOURCC_dpnd,  MP4_ReadBox_default,   NULL },
2293     { FOURCC_ipir,  MP4_ReadBox_default,   NULL },
2294     { FOURCC_mpod,  MP4_ReadBox_default,   NULL },
2295
2296     /* found in hnti */
2297     { FOURCC_rtp,   MP4_ReadBox_default,   NULL },
2298
2299     /* found in rmra */
2300     { FOURCC_rdrf,  MP4_ReadBox_rdrf,           MP4_FreeBox_rdrf   },
2301     { FOURCC_rmdr,  MP4_ReadBox_rmdr,           MP4_FreeBox_Common },
2302     { FOURCC_rmqu,  MP4_ReadBox_rmqu,           MP4_FreeBox_Common },
2303     { FOURCC_rmvc,  MP4_ReadBox_rmvc,           MP4_FreeBox_Common },
2304
2305     { FOURCC_drms,  MP4_ReadBox_sample_soun,    MP4_FreeBox_sample_soun },
2306     { FOURCC_sinf,  MP4_ReadBoxContainer,       MP4_FreeBox_Common },
2307     { FOURCC_schi,  MP4_ReadBoxContainer,       MP4_FreeBox_Common },
2308     { FOURCC_user,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2309     { FOURCC_key,   MP4_ReadBox_drms,           MP4_FreeBox_Common },
2310     { FOURCC_iviv,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2311     { FOURCC_name,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2312     { FOURCC_priv,  MP4_ReadBox_drms,           MP4_FreeBox_Common },
2313
2314     /* found in udta */
2315     { FOURCC_0xa9nam,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2316     { FOURCC_0xa9aut,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2317     { FOURCC_0xa9cpy,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2318     { FOURCC_0xa9swr,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2319     { FOURCC_0xa9inf,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2320     { FOURCC_0xa9ART,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2321     { FOURCC_0xa9dir,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2322     { FOURCC_0xa9cmt,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2323     { FOURCC_0xa9req,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2324     { FOURCC_0xa9day,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2325     { FOURCC_0xa9des,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2326     { FOURCC_0xa9fmt,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2327     { FOURCC_0xa9prd,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2328     { FOURCC_0xa9prf,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2329     { FOURCC_0xa9src,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2330     { FOURCC_0xa9alb,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2331     { FOURCC_0xa9dis,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2332     { FOURCC_0xa9enc,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2333     { FOURCC_0xa9gen,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2334     { FOURCC_0xa9trk,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2335     { FOURCC_0xa9dsa,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2336     { FOURCC_0xa9hst,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2337     { FOURCC_0xa9url,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2338     { FOURCC_0xa9ope,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2339     { FOURCC_0xa9com,MP4_ReadBox_0xa9xxx,       MP4_FreeBox_0xa9xxx },
2340
2341     /* Last entry */
2342     { 0,             MP4_ReadBox_default,       NULL }
2343 };
2344
2345
2346
2347 /*****************************************************************************
2348  * MP4_ReadBox : parse the actual box and the children
2349  *  XXX : Do not go to the next box
2350  *****************************************************************************/
2351 static MP4_Box_t *MP4_ReadBox( stream_t *p_stream, MP4_Box_t *p_father )
2352 {
2353     MP4_Box_t    *p_box = malloc( sizeof( MP4_Box_t ) );
2354     unsigned int i_index;
2355
2356     if( !MP4_ReadBoxCommon( p_stream, p_box ) )
2357     {
2358         msg_Warn( p_stream, "cannot read one box" );
2359         free( p_box );
2360         return NULL;
2361     }
2362     if( !p_box->i_size )
2363     {
2364         msg_Dbg( p_stream, "found an empty box (null size)" );
2365         free( p_box );
2366         return NULL;
2367     }
2368     p_box->p_father = p_father;
2369
2370     /* Now search function to call */
2371     for( i_index = 0; ; i_index++ )
2372     {
2373         if( ( MP4_Box_Function[i_index].i_type == p_box->i_type )||
2374             ( MP4_Box_Function[i_index].i_type == 0 ) )
2375         {
2376             break;
2377         }
2378     }
2379
2380     if( !(MP4_Box_Function[i_index].MP4_ReadBox_function)( p_stream, p_box ) )
2381     {
2382         free( p_box );
2383         return NULL;
2384     }
2385
2386     return p_box;
2387 }
2388
2389 /*****************************************************************************
2390  * MP4_FreeBox : free memory after read with MP4_ReadBox and all
2391  * the children
2392  *****************************************************************************/
2393 void MP4_BoxFree( stream_t *s, MP4_Box_t *p_box )
2394 {
2395     unsigned int i_index;
2396     MP4_Box_t    *p_child;
2397
2398     if( !p_box )
2399     {
2400         return; /* hehe */
2401     }
2402
2403     for( p_child = p_box->p_first; p_child != NULL; )
2404     {
2405         MP4_Box_t *p_next;
2406
2407         p_next = p_child->p_next;
2408         MP4_BoxFree( s, p_child );
2409         p_child = p_next;
2410     }
2411
2412     /* Now search function to call */
2413     if( p_box->data.p_data )
2414     {
2415         for( i_index = 0; ; i_index++ )
2416         {
2417             if( ( MP4_Box_Function[i_index].i_type == p_box->i_type )||
2418                 ( MP4_Box_Function[i_index].i_type == 0 ) )
2419             {
2420                 break;
2421             }
2422         }
2423         if( MP4_Box_Function[i_index].MP4_FreeBox_function == NULL )
2424         {
2425             /* Should not happen */
2426             msg_Warn( s,
2427                       "cannot free box %4.4s, type unknown",
2428                       (char*)&p_box->i_type );
2429         }
2430         else
2431         {
2432             MP4_Box_Function[i_index].MP4_FreeBox_function( p_box );
2433         }
2434
2435         free( p_box->data.p_data );
2436     }
2437
2438     free( p_box );
2439 }
2440
2441 /*****************************************************************************
2442  * MP4_BoxGetRoot : Parse the entire file, and create all boxes in memory
2443  *****************************************************************************
2444  *  The first box is a virtual box "root" and is the father for all first
2445  *  level boxes for the file, a sort of virtual contener
2446  *****************************************************************************/
2447 MP4_Box_t *MP4_BoxGetRoot( stream_t *s )
2448 {
2449     MP4_Box_t *p_root;
2450     stream_t *p_stream;
2451     int i_result;
2452
2453     p_root = malloc( sizeof( MP4_Box_t ) );
2454     p_root->i_pos = 0;
2455     p_root->i_type = VLC_FOURCC( 'r', 'o', 'o', 't' );
2456     p_root->i_shortsize = 1;
2457     p_root->i_size = stream_Size( s );
2458     CreateUUID( &p_root->i_uuid, p_root->i_type );
2459
2460     p_root->data.p_data = NULL;
2461     p_root->p_father = NULL;
2462     p_root->p_first  = NULL;
2463     p_root->p_last  = NULL;
2464     p_root->p_next   = NULL;
2465
2466     p_stream = s;
2467
2468     i_result = MP4_ReadBoxContainerRaw( p_stream, p_root );
2469
2470     if( i_result )
2471     {
2472         MP4_Box_t *p_child;
2473         MP4_Box_t *p_moov;
2474         MP4_Box_t *p_cmov;
2475
2476         /* check if there is a cmov, if so replace
2477           compressed moov by  uncompressed one */
2478         if( ( ( p_moov = MP4_BoxGet( p_root, "moov" ) ) &&
2479               ( p_cmov = MP4_BoxGet( p_root, "moov/cmov" ) ) ) ||
2480             ( ( p_moov = MP4_BoxGet( p_root, "foov" ) ) &&
2481               ( p_cmov = MP4_BoxGet( p_root, "foov/cmov" ) ) ) )
2482         {
2483             /* rename the compressed moov as a box to skip */
2484             p_moov->i_type = FOURCC_skip;
2485
2486             /* get uncompressed p_moov */
2487             p_moov = p_cmov->data.p_cmov->p_moov;
2488             p_cmov->data.p_cmov->p_moov = NULL;
2489
2490             /* make p_root father of this new moov */
2491             p_moov->p_father = p_root;
2492
2493             /* insert this new moov box as first child of p_root */
2494             p_moov->p_next = p_child = p_root->p_first;
2495             p_root->p_first = p_moov;
2496         }
2497     }
2498
2499     return p_root;
2500 }
2501
2502
2503 static void __MP4_BoxDumpStructure( stream_t *s,
2504                                     MP4_Box_t *p_box, unsigned int i_level )
2505 {
2506     MP4_Box_t *p_child;
2507
2508     if( !i_level )
2509     {
2510         msg_Dbg( s, "dumping root Box \"%4.4s\"",
2511                           (char*)&p_box->i_type );
2512     }
2513     else
2514     {
2515         char str[512];
2516         unsigned int i;
2517         memset( str, (uint8_t)' ', 512 );
2518         for( i = 0; i < i_level; i++ )
2519         {
2520             str[i*5] = '|';
2521         }
2522         sprintf( str + i_level * 5, "+ %4.4s size %d",
2523                       (char*)&p_box->i_type,
2524                       (uint32_t)p_box->i_size );
2525
2526         msg_Dbg( s, "%s", str );
2527     }
2528     p_child = p_box->p_first;
2529     while( p_child )
2530     {
2531         __MP4_BoxDumpStructure( s, p_child, i_level + 1 );
2532         p_child = p_child->p_next;
2533     }
2534 }
2535
2536 void MP4_BoxDumpStructure( stream_t *s, MP4_Box_t *p_box )
2537 {
2538     __MP4_BoxDumpStructure( s, p_box, 0 );
2539 }
2540
2541
2542
2543 /*****************************************************************************
2544  *****************************************************************************
2545  **
2546  **  High level methods to acces an MP4 file
2547  **
2548  *****************************************************************************
2549  *****************************************************************************/
2550 static void __get_token( char **ppsz_path, char **ppsz_token, int *pi_number )
2551 {
2552     size_t i_len ;
2553     if( !*ppsz_path[0] )
2554     {
2555         *ppsz_token = NULL;
2556         *pi_number = 0;
2557         return;
2558     }
2559     i_len = 0;
2560     while(  (*ppsz_path)[i_len] &&
2561             (*ppsz_path)[i_len] != '/' && (*ppsz_path)[i_len] != '[' )
2562     {
2563         i_len++;
2564     }
2565     if( !i_len && **ppsz_path == '/' )
2566     {
2567         i_len = 1;
2568     }
2569     *ppsz_token = malloc( i_len + 1 );
2570
2571     memcpy( *ppsz_token, *ppsz_path, i_len );
2572
2573     (*ppsz_token)[i_len] = '\0';
2574
2575     *ppsz_path += i_len;
2576
2577     if( **ppsz_path == '[' )
2578     {
2579         (*ppsz_path)++;
2580         *pi_number = strtol( *ppsz_path, NULL, 10 );
2581         while( **ppsz_path && **ppsz_path != ']' )
2582         {
2583             (*ppsz_path)++;
2584         }
2585         if( **ppsz_path == ']' )
2586         {
2587             (*ppsz_path)++;
2588         }
2589     }
2590     else
2591     {
2592         *pi_number = 0;
2593     }
2594     while( **ppsz_path == '/' )
2595     {
2596         (*ppsz_path)++;
2597     }
2598 }
2599
2600 static void __MP4_BoxGet( MP4_Box_t **pp_result,
2601                           MP4_Box_t *p_box, const char *psz_fmt, va_list args)
2602 {
2603     char *psz_dup;
2604     char    *psz_path;
2605
2606     if( !p_box )
2607     {
2608         *pp_result = NULL;
2609         return;
2610     }
2611
2612     vasprintf( &psz_path, psz_fmt, args );
2613
2614     if( !psz_path || !psz_path[0] )
2615     {
2616         FREENULL( psz_path );
2617         *pp_result = NULL;
2618         return;
2619     }
2620
2621 //    fprintf( stderr, "path:'%s'\n", psz_path );
2622     psz_dup = psz_path; /* keep this pointer, as it need to be unallocated */
2623     for( ; ; )
2624     {
2625         char *psz_token;
2626         int i_number;
2627
2628         __get_token( &psz_path, &psz_token, &i_number );
2629 //        fprintf( stderr, "path:'%s', token:'%s' n:%d\n",
2630 //                 psz_path,psz_token,i_number );
2631         if( !psz_token )
2632         {
2633             FREENULL( psz_token );
2634             free( psz_dup );
2635             *pp_result = p_box;
2636             return;
2637         }
2638         else
2639         if( !strcmp( psz_token, "/" ) )
2640         {
2641             /* Find root box */
2642             while( p_box && p_box->i_type != VLC_FOURCC( 'r', 'o', 'o', 't' ) )
2643             {
2644                 p_box = p_box->p_father;
2645             }
2646             if( !p_box )
2647             {
2648                 free( psz_token );
2649                 free( psz_dup );
2650                 *pp_result = NULL;
2651                 return;
2652             }
2653         }
2654         else
2655         if( !strcmp( psz_token, "." ) )
2656         {
2657             /* Do nothing */
2658         }
2659         else
2660         if( !strcmp( psz_token, ".." ) )
2661         {
2662             p_box = p_box->p_father;
2663             if( !p_box )
2664             {
2665                 free( psz_token );
2666                 free( psz_dup );
2667                 *pp_result = NULL;
2668                 return;
2669             }
2670         }
2671         else
2672         if( strlen( psz_token ) == 4 )
2673         {
2674             uint32_t i_fourcc;
2675             i_fourcc = VLC_FOURCC( psz_token[0], psz_token[1],
2676                                    psz_token[2], psz_token[3] );
2677             p_box = p_box->p_first;
2678             for( ; ; )
2679             {
2680                 if( !p_box )
2681                 {
2682                     free( psz_token );
2683                     free( psz_dup );
2684                     *pp_result = NULL;
2685                     return;
2686                 }
2687                 if( p_box->i_type == i_fourcc )
2688                 {
2689                     if( !i_number )
2690                     {
2691                         break;
2692                     }
2693                     i_number--;
2694                 }
2695                 p_box = p_box->p_next;
2696             }
2697         }
2698         else
2699         if( strlen( psz_token ) == 0 )
2700         {
2701             p_box = p_box->p_first;
2702             for( ; ; )
2703             {
2704                 if( !p_box )
2705                 {
2706                     free( psz_token );
2707                     free( psz_dup );
2708                     *pp_result = NULL;
2709                     return;
2710                 }
2711                 if( !i_number )
2712                 {
2713                     break;
2714                 }
2715                 i_number--;
2716                 p_box = p_box->p_next;
2717             }
2718         }
2719         else
2720         {
2721 //            fprintf( stderr, "Argg malformed token \"%s\"",psz_token );
2722             FREENULL( psz_token );
2723             free( psz_dup );
2724             *pp_result = NULL;
2725             return;
2726         }
2727
2728         free( psz_token );
2729     }
2730 }
2731
2732 /*****************************************************************************
2733  * MP4_BoxGet: find a box given a path relative to p_box
2734  *****************************************************************************
2735  * Path Format: . .. / as usual
2736  *              [number] to specifie box number ex: trak[12]
2737  *
2738  * ex: /moov/trak[12]
2739  *     ../mdia
2740  *****************************************************************************/
2741 MP4_Box_t *MP4_BoxGet( MP4_Box_t *p_box, const char *psz_fmt, ... )
2742 {
2743     va_list args;
2744     MP4_Box_t *p_result;
2745
2746     va_start( args, psz_fmt );
2747     __MP4_BoxGet( &p_result, p_box, psz_fmt, args );
2748     va_end( args );
2749
2750     return( p_result );
2751 }
2752
2753 /*****************************************************************************
2754  * MP4_BoxCount: count box given a path relative to p_box
2755  *****************************************************************************
2756  * Path Format: . .. / as usual
2757  *              [number] to specifie box number ex: trak[12]
2758  *
2759  * ex: /moov/trak[12]
2760  *     ../mdia
2761  *****************************************************************************/
2762 int MP4_BoxCount( MP4_Box_t *p_box, const char *psz_fmt, ... )
2763 {
2764     va_list args;
2765     int     i_count;
2766     MP4_Box_t *p_result, *p_next;
2767
2768     va_start( args, psz_fmt );
2769     __MP4_BoxGet( &p_result, p_box, psz_fmt, args );
2770     va_end( args );
2771     if( !p_result )
2772     {
2773         return( 0 );
2774     }
2775
2776     i_count = 1;
2777     for( p_next = p_result->p_next; p_next != NULL; p_next = p_next->p_next)
2778     {
2779         if( p_next->i_type == p_result->i_type)
2780         {
2781             i_count++;
2782         }
2783     }
2784     return( i_count );
2785 }