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