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