]> git.sesse.net Git - vlc/blobdiff - modules/demux/ps.h
Fix very unlikely race condition
[vlc] / modules / demux / ps.h
index 4671d5e8d4cf94506ceae5c519043678ddf75bec..856b365d3b7c96a767f70d9c1eeb45d154e85756 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)
-#define PS_ID_TO_TK( id ) ((id) <= 0xff ? (id) - 0xc0 : ((id)&0xff) + (256 - 0xc0))
+#define PS_ID_TO_TK( id ) ((id) <= 0xff ? (id) - 0xc0 : \
+                                          ((id)&0xff) + (256 - 0xc0))
+
+typedef struct ps_psm_t ps_psm_t;
+static inline int ps_id_to_type( ps_psm_t *, int );
+static inline uint8_t *ps_id_to_lang( 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;
 
 /* Init a set of track */
@@ -40,15 +49,19 @@ 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 );
     }
 }
 
 /* From id fill i_skip and es_format_t */
-static inline int ps_track_fill( ps_track_t *tk, int i_id )
+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 )
@@ -87,24 +100,52 @@ static inline int ps_track_fill( ps_track_t *tk, int i_id )
     }
     else
     {
-        if( ( i_id&0xf0 ) == 0xe0 )
+        int i_type = ps_id_to_type( p_psm , i_id );
+
+        es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
+
+        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') );
+        }
+        else if( (i_id&0xf0) == 0xe0 && i_type == 0x02 )
         {
             es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
         }
-        else if( ( i_id&0xe0 ) == 0xc0 )
+        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') );
         }
-        else
+
+        if( tk->fmt.i_cat == UNKNOWN_ES && ( i_id&0xf0 ) == 0xe0 )
         {
-            es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
-            return VLC_EGENERIC;
+            es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
+        }
+        else if( tk->fmt.i_cat == UNKNOWN_ES && ( i_id&0xe0 ) == 0xc0 )
+        {
+            es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','g','a') );
         }
+        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;
 }
 
@@ -183,29 +224,33 @@ static inline int ps_pkt_parse_pack( block_t *p_pkt, int64_t *pi_scr,
 }
 
 /* Parse a SYSTEM PES */
-static inline int ps_pkt_parse_system( block_t *p_pkt,
+static inline int ps_pkt_parse_system( block_t *p_pkt, ps_psm_t *p_psm,
                                        ps_track_t tk[PS_TK_COUNT] )
 {
     uint8_t *p = &p_pkt->p_buffer[6 + 3 + 1 + 1 + 1];
 
+    /* System header is not useable if it references private streams (0xBD)
+     * or 'all audio streams' (0xB8) or 'all video streams' (0xB9) */
     while( p < &p_pkt->p_buffer[p_pkt->i_buffer] )
     {
-        /* msg_Dbg( p_demux, "   SYSTEM_START_CODE: id=0x%x", p[0] ); */
-        if( p[0] != 0xbd )
+        int i_id = p[0];
+
+        /* fprintf( stderr, "   SYSTEM_START_CODEEE: id=0x%x\n", p[0] ); */
+        if( p[0] >= 0xBC || p[0] == 0xB8 || p[0] == 0xB9 ) p += 2;
+        p++;
+
+        if( i_id >= 0xc0 )
         {
-            int i_id = p[0];
             int i_tk = PS_ID_TO_TK( i_id );
 
             if( !tk[i_tk].b_seen )
             {
-                if( !ps_track_fill( &tk[i_tk], i_id ) )
+                if( !ps_track_fill( &tk[i_tk], p_psm, i_id ) )
                 {
                     tk[i_tk].b_seen = VLC_TRUE;
                 }
             }
-            p += 2;
         }
-        p++;
     }
     return VLC_SUCCESS;
 }
@@ -316,3 +361,164 @@ static inline int ps_pkt_parse_pes( block_t *p_pes, int i_skip_extra )
 
     return VLC_SUCCESS;
 }
+
+/* Program stream map handling */
+typedef struct ps_es_t
+{
+    int i_type;
+    int i_id;
+
+    int i_descriptor;
+    uint8_t *p_descriptor;
+
+    /* Language is iso639-2T */
+    uint8_t lang[3];
+
+} ps_es_t;
+
+struct ps_psm_t
+{
+    int i_version;
+
+    int     i_es;
+    ps_es_t **es;
+};
+
+static inline int ps_id_to_type( 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;     
+    }
+    return 0;
+}
+
+static inline uint8_t *ps_id_to_lang( 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;
+}
+
+static inline void ps_psm_init( ps_psm_t *p_psm )
+{
+    p_psm->i_version = 0xFFFF;
+    p_psm->i_es = 0;
+    p_psm->es = 0;
+}
+
+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] );
+    }
+    if( 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,
+                               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, i;
+
+    if( !p_psm || p_buffer[3] != 0xbc ) return VLC_EGENERIC;
+
+    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);
+    i_version = (p_buffer[6] && 0xf8);
+
+    if( p_psm->i_version == i_version ) return VLC_EGENERIC;
+
+    ps_psm_destroy( p_psm );
+
+    i_info_length = (uint16_t)(p_buffer[8] << 8) + p_buffer[9];
+    if( i_info_length + 10 > i_length ) return VLC_EGENERIC;
+
+    /* Elementary stream map */
+    i_esm_length = (uint16_t)(p_buffer[ 10 + i_info_length ] << 8) +
+        p_buffer[ 11 + i_info_length];
+    i_es_base = 12 + i_info_length;
+
+    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 ];
+        i_info_length = (uint16_t)(p_buffer[ i_es_base + 2 ] << 8) +
+            p_buffer[ i_es_base + 3 ];
+
+        if( i_es_base + 4 + i_info_length > i_length ) break;
+
+        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[p_psm->i_es] = malloc( sizeof(ps_es_t) );
+        *p_psm->es[p_psm->i_es++] = es;
+        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;
+}