git.sesse.net Git - vlc/blob - modules/demux/mp4/libmp4.c

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