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