]> git.sesse.net Git - vlc/blobdiff - modules/demux/ps.h
Remove useless test before a free (again).
[vlc] / modules / demux / ps.h
index 771be59cb373b0a9f426b1921ec9d46a6403b681..accca9e35fbc1e2177e39adc2f8c986f8c02df1b 100644 (file)
@@ -1,7 +1,7 @@
 /*****************************************************************************
  * ps.h: Program Stream demuxer helper
  *****************************************************************************
- * Copyright (C) 2004 VideoLAN
+ * Copyright (C) 2004 the VideoLAN team
  * $Id$
  *
  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
  *
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  *****************************************************************************/
 
-#define PS_TK_COUNT (512 - 0xc0)
+#include <vlc_demux.h>
+
+/* 256-0xC0 for normal stream, 256 for 0xbd stream, 256 for 0xfd stream */
+#define PS_TK_COUNT (768 - 0xc0)
 #define PS_ID_TO_TK( id ) ((id) <= 0xff ? (id) - 0xc0 : \
-                                          ((id)&0xff) + (256 - 0xc0))
+            ((id)&0xff) + (((id)&0xff00) == 0xbd00 ? 256-0xC0 : 512-0xc0) )
 
 typedef struct ps_psm_t ps_psm_t;
-static inline int ps_id_to_type( ps_psm_t *, int );
+static inline int ps_id_to_type( const ps_psm_t *, int );
+static inline const uint8_t *ps_id_to_lang( const ps_psm_t *, int );
 
 typedef struct
 {
     vlc_bool_t  b_seen;
     int         i_skip;
+    int         i_id;
     es_out_id_t *es;
     es_format_t fmt;
+    mtime_t     i_first_pts;
+    mtime_t     i_last_pts;
 
 } ps_track_t;
 
@@ -45,7 +52,10 @@ static inline void ps_track_init( ps_track_t tk[PS_TK_COUNT] )
     {
         tk[i].b_seen = VLC_FALSE;
         tk[i].i_skip = 0;
+        tk[i].i_id   = 0;
         tk[i].es     = NULL;
+        tk[i].i_first_pts = -1;
+        tk[i].i_last_pts = -1;
         es_format_Init( &tk[i].fmt, UNKNOWN_ES, 0 );
     }
 }
@@ -54,18 +64,25 @@ static inline void ps_track_init( ps_track_t tk[PS_TK_COUNT] )
 static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
 {
     tk->i_skip = 0;
+    tk->i_id = i_id;
     if( ( i_id&0xff00 ) == 0xbd00 )
     {
-        if( ( i_id&0xf8 ) == 0x88 )
+        if( ( i_id&0xf8 ) == 0x88 || (i_id&0xf8) == 0x98 )
         {
             es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('d','t','s',' ') );
             tk->i_skip = 4;
         }
-        else if( ( i_id&0xf0 ) == 0x80 )
+        else if( ( i_id&0xf0 ) == 0x80
+               ||  (i_id&0xf0) == 0xc0 ) /* AC-3, Can also be used for DD+/E-AC-3 */
         {
             es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('a','5','2',' ') );
             tk->i_skip = 4;
         }
+        else if( (i_id&0xf0) == 0xb0 )
+        {
+            es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','l','p',' ') );
+            /* FIXME / untested ... no known decoder (at least not in VLC/ffmpeg) */
+        }
         else if( ( i_id&0xe0 ) == 0x20 )
         {
             es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('s','p','u',' ') );
@@ -84,6 +101,23 @@ static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
         {
             es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('c','v','d',' ') );
         }
+        else if( ( i_id&0xff ) == 0x10 )
+        {
+            es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('t','e','l','x') );
+        }
+        else
+        {
+            es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
+            return VLC_EGENERIC;
+        }
+    }
+    else if( (i_id&0xff00) == 0xfd00 )
+    {
+        uint8_t i_sub_id = i_id & 0xff;
+        if( i_sub_id >= 0x55 && i_sub_id <= 0x5f )
+        {
+            es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('W','V','C','1') );
+        }
         else
         {
             es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
@@ -96,7 +130,11 @@ static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
 
         es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
 
-        if( (i_id&0xf0) == 0xe0 && i_type == 0x10 )
+        if( (i_id&0xf0) == 0xe0 && i_type == 0x1b )
+        {
+            es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('h','2','6','4') );
+        }
+        else if( (i_id&0xf0) == 0xe0 && i_type == 0x10 )
         {
             es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','4','v') );
         }
@@ -104,6 +142,10 @@ static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
         {
             es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
         }
+        else if( ( i_id&0xe0 ) == 0xc0 && i_type == 0x0f )
+        {
+            es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','4','a') );
+        }
         else if( ( i_id&0xe0 ) == 0xc0 && i_type == 0x03 )
         {
             es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','g','a') );
@@ -117,12 +159,19 @@ static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
         {
             es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','g','a') );
         }
-        else return VLC_EGENERIC;
+        else if( tk->fmt.i_cat == UNKNOWN_ES ) return VLC_EGENERIC;
     }
 
     /* PES packets usually contain truncated frames */
     tk->fmt.b_packetized = VLC_FALSE;
 
+    if( ps_id_to_lang( p_psm, i_id ) )
+    {
+        tk->fmt.psz_language = malloc( 4 );
+        memcpy( tk->fmt.psz_language, ps_id_to_lang( p_psm , i_id ), 3 );
+        tk->fmt.psz_language[3] = 0;
+    }
+
     return VLC_SUCCESS;
 }
 
@@ -133,15 +182,71 @@ static inline int ps_pkt_id( block_t *p_pkt )
         p_pkt->i_buffer >= 9 &&
         p_pkt->i_buffer >= 9 + p_pkt->p_buffer[8] )
     {
+        /* VOB extension */
         return 0xbd00 | p_pkt->p_buffer[9+p_pkt->p_buffer[8]];
     }
+    else if( p_pkt->p_buffer[3] == 0xfd &&
+             p_pkt->i_buffer >= 9 &&
+             (p_pkt->p_buffer[6]&0xC0) == 0x80 &&   /* mpeg2 */
+             (p_pkt->p_buffer[7]&0x01) == 0x01 )    /* extension_flag */
+    {
+        /* ISO 13818 amendment 2 and SMPTE RP 227 */
+        const uint8_t i_flags = p_pkt->p_buffer[7];
+        int i_skip = 9;
+
+
+        /* Find PES extension */
+        if( (i_flags & 0x80 ) )
+        {
+            i_skip += 5;        /* pts */
+            if( (i_flags & 0x40) )
+                i_skip += 5;    /* dts */
+        }
+        if( (i_flags & 0x20 ) )
+            i_skip += 6;
+        if( (i_flags & 0x10 ) )
+            i_skip += 3;
+        if( (i_flags & 0x08 ) )
+            i_skip += 1;
+        if( (i_flags & 0x04 ) )
+            i_skip += 1;
+        if( (i_flags & 0x02 ) )
+            i_skip += 2;
+
+        if( i_skip < p_pkt->i_buffer && (p_pkt->p_buffer[i_skip]&0x01) )
+        {
+            const uint8_t i_flags2 = p_pkt->p_buffer[i_skip];
+
+            /* Find PES extension 2 */
+            i_skip += 1;
+            if( i_flags2 & 0x80 )
+                i_skip += 16;
+            if( (i_flags2 & 0x40) && i_skip < p_pkt->i_buffer )
+                i_skip += 1 + p_pkt->p_buffer[i_skip];
+            if( i_flags2 & 0x20 )
+                i_skip += 2;
+            if( i_flags2 & 0x10 )
+                i_skip += 2;
+
+            if( i_skip + 1 < p_pkt->i_buffer )
+            {
+                const int i_extension_field_length = p_pkt->p_buffer[i_skip]&0x7f;
+                if( i_extension_field_length >=1 )
+                {
+                    int i_stream_id_extension_flag = (p_pkt->p_buffer[i_skip+1] >> 7)&0x1;
+                    if( i_stream_id_extension_flag == 0 )
+                        return 0xfd00 | (p_pkt->p_buffer[i_skip+1]&0x7f);
+                }
+            }
+        }
+    }
     return p_pkt->p_buffer[3];
 }
 
 /* return the size of the next packet
  * XXX you need to give him at least 14 bytes (and it need to start as a
  * valid packet) */
-static inline int ps_pkt_size( uint8_t *p, int i_peek )
+static inline int ps_pkt_size( const uint8_t *p, int i_peek )
 {
     if( p[3] == 0xb9 && i_peek >= 4 )
     {
@@ -340,7 +445,7 @@ static inline int ps_pkt_parse_pes( block_t *p_pes, int i_skip_extra )
 }
 
 /* Program stream map handling */
-typedef struct p_es_t
+typedef struct ps_es_t
 {
     int i_type;
     int i_id;
@@ -348,7 +453,8 @@ typedef struct p_es_t
     int i_descriptor;
     uint8_t *p_descriptor;
 
-    struct ps_es_t *p_next;
+    /* Language is iso639-2T */
+    uint8_t lang[3];
 
 } ps_es_t;
 
@@ -360,12 +466,22 @@ struct ps_psm_t
     ps_es_t **es;
 };
 
-static inline int ps_id_to_type( ps_psm_t *p_psm, int i_id )
+static inline int ps_id_to_type( const ps_psm_t *p_psm, int i_id )
 {
     int i;
     for( i = 0; p_psm && i < p_psm->i_es; i++ )
     {
-        if( p_psm->es[i]->i_id == i_id ) return p_psm->es[i]->i_type;     
+        if( p_psm->es[i]->i_id == i_id ) return p_psm->es[i]->i_type;
+    }
+    return 0;
+}
+
+static inline const uint8_t *ps_id_to_lang( const ps_psm_t *p_psm, int i_id )
+{
+    int i;
+    for( i = 0; p_psm && i < p_psm->i_es; i++ )
+    {
+        if( p_psm->es[i]->i_id == i_id ) return p_psm->es[i]->lang;
     }
     return 0;
 }
@@ -381,25 +497,25 @@ static inline void ps_psm_destroy( ps_psm_t *p_psm )
 {
     while( p_psm->i_es-- )
     {
-        if( p_psm->es[p_psm->i_es]->i_descriptor )
-            free( p_psm->es[p_psm->i_es]->p_descriptor );
+        free( p_psm->es[p_psm->i_es]->p_descriptor );
         free( p_psm->es[p_psm->i_es] );
     }
-    if( p_psm->es ) free( p_psm->es );
+    free( p_psm->es );
 
     p_psm->es = 0;
     p_psm->i_es = 0;
 }
 
-static inline int ps_psm_fill( ps_psm_t *p_psm, block_t *p_pkt )
+static inline int ps_psm_fill( ps_psm_t *p_psm, block_t *p_pkt,
+                               ps_track_t tk[PS_TK_COUNT], es_out_t *out )
 {
     int i_buffer = p_pkt->i_buffer;
     uint8_t *p_buffer = p_pkt->p_buffer;
-    int i_length, i_version, i_info_length, i_esm_length, i_es_base;
+    int i_length, i_version, i_info_length, i_esm_length, i_es_base, i;
 
     if( !p_psm || p_buffer[3] != 0xbc ) return VLC_EGENERIC;
 
-    i_length = (uint16_t)(p_buffer[4] << 8) + p_buffer[5];
+    i_length = (uint16_t)(p_buffer[4] << 8) + p_buffer[5] + 6;
     if( i_length > i_buffer ) return VLC_EGENERIC;
 
     //i_current_next_indicator = (p_buffer[6] && 0x01);
@@ -420,6 +536,7 @@ static inline int ps_psm_fill( ps_psm_t *p_psm, block_t *p_pkt )
     while( i_es_base + 4 < i_length )
     {
         ps_es_t es;
+        es.lang[0] = es.lang[1] = es.lang[2] = 0;
 
         es.i_type = p_buffer[ i_es_base  ];
         es.i_id = p_buffer[ i_es_base + 1 ];
@@ -428,22 +545,66 @@ static inline int ps_psm_fill( ps_psm_t *p_psm, block_t *p_pkt )
 
         if( i_es_base + 4 + i_info_length > i_length ) break;
 
+        /* TODO Add support for VC-1 stream:
+         *      stream_type=0xea, stream_id=0xfd AND registration
+         *      descriptor 0x5 with format_identifier == 0x56432D31 (VC-1)
+         *      (I need a sample that use PSM with VC-1) */
+
         es.p_descriptor = 0;
         es.i_descriptor = i_info_length;
         if( i_info_length > 0 )
         {
+            int i = 0;
+
             es.p_descriptor = malloc( i_info_length );
             memcpy( es.p_descriptor, p_buffer + i_es_base + 4, i_info_length);
+
+            while( i <= es.i_descriptor - 2 )
+            {
+                /* Look for the ISO639 language descriptor */
+                if( es.p_descriptor[i] != 0x0a )
+                {
+                    i += es.p_descriptor[i+1] + 2;
+                    continue;
+                }
+
+                if( i <= es.i_descriptor - 6 )
+                {
+                    es.lang[0] = es.p_descriptor[i+2];
+                    es.lang[1] = es.p_descriptor[i+3];
+                    es.lang[2] = es.p_descriptor[i+4];
+                }
+                break;
+            }
         }
 
-        p_psm->es = realloc( &p_psm->es, sizeof(ps_es_t) * (p_psm->i_es+1) );
+        p_psm->es = realloc( p_psm->es, sizeof(ps_es_t *) * (p_psm->i_es+1) );
+        p_psm->es[p_psm->i_es] = malloc( sizeof(ps_es_t) );
         *p_psm->es[p_psm->i_es++] = es;
-        i_es_base += 4 + i_info_length; 
+        i_es_base += 4 + i_info_length;
     }
 
     /* TODO: CRC */
 
     p_psm->i_version = i_version;
 
+    /* Check/Modify our existing tracks */
+    for( i = 0; i < PS_TK_COUNT; i++ )
+    {
+        ps_track_t tk_tmp;
+
+        if( !tk[i].b_seen || !tk[i].es ) continue;
+
+        if( ps_track_fill( &tk_tmp, p_psm, tk[i].i_id ) != VLC_SUCCESS )
+            continue;
+
+        if( tk_tmp.fmt.i_codec == tk[i].fmt.i_codec ) continue;
+
+        es_out_Del( out, tk[i].es );
+        tk[i] = tk_tmp;
+        tk[i].b_seen = VLC_TRUE;
+        tk[i].es = es_out_Add( out, &tk[i].fmt );
+    }
+
     return VLC_SUCCESS;
 }