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