git.sesse.net Git - vlc/blob - modules/services_discovery/sap.c

   1 /*****************************************************************************
   2  * sap.c :  SAP interface module
   3  *****************************************************************************
   4  * Copyright (C) 2004-2005 the VideoLAN team
   5  * $Id$
   6  *
   7  * Authors: Clément Stenac <zorglub@videolan.org>
   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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23
  24 /*****************************************************************************
  25  * Includes
  26  *****************************************************************************/
  27 #include <stdlib.h>                                      /* malloc(), free() */
  28
  29 #include <vlc/vlc.h>
  30 #include <vlc/input.h>
  31 #include <vlc/intf.h>
  32
  33 #include <network.h>
  34 #include <charset.h>
  35
  36 #include <ctype.h>
  37 #include <errno.h>
  38
  39 #ifdef HAVE_UNISTD_H
  40 #    include <unistd.h>
  41 #endif
  42 #ifdef HAVE_SYS_TIME_H
  43 #    include <sys/time.h>
  44 #endif
  45
  46 #ifdef HAVE_ZLIB_H
  47 #   include <zlib.h>
  48 #endif
  49
  50 /************************************************************************
  51  * Macros and definitions
  52  ************************************************************************/
  53
  54 #define MAX_LINE_LENGTH 256
  55
  56 /* SAP is always on that port */
  57 #define SAP_PORT 9875
  58 /* Global-scope SAP address */
  59 #define SAP_V4_GLOBAL_ADDRESS   "224.2.127.254"
  60 /* Organization-local SAP address */
  61 #define SAP_V4_ORG_ADDRESS      "239.195.255.255"
  62 /* Local (smallest non-link-local scope) SAP address */
  63 #define SAP_V4_LOCAL_ADDRESS    "239.255.255.255"
  64 /* Link-local SAP address */
  65 #define SAP_V4_LINK_ADDRESS     "224.0.0.255"
  66 #define ADD_SESSION 1
  67
  68 #define SAP_V6_1 "FF0"
  69 /* Scope is inserted between them */
  70 #define SAP_V6_2 "::2:7FFE"
  71 /* See RFC3513 for list of valid scopes */
  72 /* FIXME: find a way to listen to link-local scope */
  73 static const char ipv6_scopes[] = "1456789ABCDE";
  74
  75
  76 /*****************************************************************************
  77  * Module descriptor
  78  *****************************************************************************/
  79 #define SAP_IPV4_TEXT N_( "IPv4-SAP listening" )
  80 #define SAP_IPV4_LONGTEXT N_( \
  81       "Set this if you want the SAP module to listen to IPv4 announcements " \
  82       "on the standard address." )
  83 #define SAP_IPV6_TEXT N_( "IPv6-SAP listening" )
  84 #define SAP_IPV6_LONGTEXT N_( \
  85       "Set this if you want the SAP module to listen to IPv6 announcements " \
  86       "on the standard address." )
  87 #define SAP_SCOPE_TEXT N_( "IPv6 SAP scope" )
  88 #define SAP_SCOPE_LONGTEXT N_( \
  89        "Sets the scope for IPv6 announcements (default is 8)." )
  90 #define SAP_TIMEOUT_TEXT N_( "SAP timeout (seconds)" )
  91 #define SAP_TIMEOUT_LONGTEXT N_( \
  92        "Sets the time before SAP items get deleted if no new announcement " \
  93        "is received." )
  94 #define SAP_PARSE_TEXT N_( "Try to parse the SAP" )
  95 #define SAP_PARSE_LONGTEXT N_( \
  96        "When SAP can it will try to parse the SAP. If you don't select " \
  97        "this, all announcements will be parsed by the livedotcom module." )
  98 #define SAP_STRICT_TEXT N_( "SAP Strict mode" )
  99 #define SAP_STRICT_LONGTEXT N_( \
 100        "When this is set, the SAP parser will discard some non-compliant " \
 101        "announcements." )
 102 #define SAP_CACHE_TEXT N_("Use SAP cache")
 103 #define SAP_CACHE_LONGTEXT N_( \
 104        "If this option is selected, a SAP caching mechanism will be used. " \
 105        "This will result in lower SAP startup time, but you could end up " \
 106         "with items corresponding to legacy streams." )
 107 #define SAP_TIMESHIFT_TEXT N_("Allow timeshifting")
 108 #define SAP_TIMESHIFT_LONGTEXT N_( \
 109         "Enable timeshifting automatically for streams " \
 110         "discovered through SAP announcements." )
 111
 112 /* Callbacks */
 113     static int  Open ( vlc_object_t * );
 114     static void Close( vlc_object_t * );
 115     static int  OpenDemux ( vlc_object_t * );
 116     static void CloseDemux ( vlc_object_t * );
 117
 118 vlc_module_begin();
 119     set_shortname( _("SAP"));
 120     set_description( _("SAP Announcements") );
 121     set_category( CAT_PLAYLIST );
 122     set_subcategory( SUBCAT_PLAYLIST_SD );
 123
 124     add_bool( "sap-ipv4", 1 , NULL,
 125                SAP_IPV4_TEXT,SAP_IPV4_LONGTEXT, VLC_TRUE );
 126     add_bool( "sap-ipv6", 1 , NULL,
 127               SAP_IPV6_TEXT, SAP_IPV6_LONGTEXT, VLC_TRUE );
 128     add_integer( "sap-timeout", 1800, NULL,
 129                  SAP_TIMEOUT_TEXT, SAP_TIMEOUT_LONGTEXT, VLC_TRUE );
 130     add_bool( "sap-parse", 1 , NULL,
 131                SAP_PARSE_TEXT,SAP_PARSE_LONGTEXT, VLC_TRUE );
 132     add_bool( "sap-strict", 0 , NULL,
 133                SAP_STRICT_TEXT,SAP_STRICT_LONGTEXT, VLC_TRUE );
 134     add_bool( "sap-cache", 0 , NULL,
 135                SAP_CACHE_TEXT,SAP_CACHE_LONGTEXT, VLC_TRUE );
 136     add_bool( "sap-timeshift", 0 , NULL,
 137               SAP_TIMESHIFT_TEXT,SAP_TIMESHIFT_LONGTEXT, VLC_TRUE );
 138     add_suppressed_string( "sap-addr" );
 139
 140     set_capability( "services_discovery", 0 );
 141     set_callbacks( Open, Close );
 142
 143     add_submodule();
 144         set_description( _("SDP file parser for UDP") );
 145         add_shortcut( "sdp" );
 146         set_capability( "demux2", 51 );
 147         set_callbacks( OpenDemux, CloseDemux );
 148 vlc_module_end();
 149
 150
 151 /*****************************************************************************
 152  * Local structures
 153  *****************************************************************************/
 154
 155 typedef struct sdp_t sdp_t;
 156 typedef struct attribute_t attribute_t;
 157 typedef struct sap_announce_t sap_announce_t;
 158
 159 /* The structure that contains sdp information */
 160 struct  sdp_t
 161 {
 162     char *psz_sdp;
 163
 164     /* s= field */
 165     char *psz_sessionname;
 166
 167     /* Raw m= and c= fields */
 168     char *psz_connection;
 169     char *psz_media;
 170
 171     /* o field */
 172     char *psz_username;
 173     char *psz_network_type;
 174     char *psz_address_type;
 175     char *psz_address;
 176     int64_t i_session_id;
 177
 178     /* "computed" URI */
 179     char *psz_uri;
 180
 181     int           i_in; /* IP version */
 182
 183     int           i_media;
 184     int           i_media_type;
 185
 186     int           i_attributes;
 187     attribute_t  **pp_attributes;
 188 };
 189
 190 struct attribute_t
 191 {
 192     char *psz_field;
 193     char *psz_value;
 194 };
 195
 196 struct sap_announce_t
 197 {
 198     mtime_t i_last;
 199
 200     uint16_t    i_hash;
 201     uint32_t    i_source[4];
 202
 203     /* SAP annnounces must only contain one SDP */
 204     sdp_t       *p_sdp;
 205
 206     int i_item_id;
 207 //    playlist_item_t *p_item;
 208 };
 209
 210 struct services_discovery_sys_t
 211 {
 212     /* Socket descriptors */
 213     int i_fd;
 214     int *pi_fd;
 215
 216     /* playlist node */
 217     playlist_item_t *p_node;
 218     playlist_t *p_playlist;
 219
 220     /* Table of announces */
 221     int i_announces;
 222     struct sap_announce_t **pp_announces;
 223
 224     /* Modes */
 225     vlc_bool_t  b_strict;
 226     vlc_bool_t  b_parse;
 227     vlc_bool_t  b_timeshift;
 228
 229     int i_timeout;
 230 };
 231
 232 struct demux_sys_t
 233 {
 234     sdp_t *p_sdp;
 235 };
 236
 237 /*****************************************************************************
 238  * Local prototypes
 239  *****************************************************************************/
 240
 241
 242 /* Main functions */
 243     static int Demux( demux_t *p_demux );
 244     static int Control( demux_t *, int, va_list );
 245     static void Run    ( services_discovery_t *p_sd );
 246
 247 /* Main parsing functions */
 248     static int ParseConnection( vlc_object_t *p_obj, sdp_t *p_sdp );
 249     static int ParseSAP( services_discovery_t *p_sd, uint8_t *p_buffer, int i_read );
 250     static sdp_t *  ParseSDP( vlc_object_t *p_sd, char* psz_sdp );
 251     static sap_announce_t *CreateAnnounce( services_discovery_t *, uint16_t, sdp_t * );
 252     static int RemoveAnnounce( services_discovery_t *p_sd, sap_announce_t *p_announce );
 253
 254 /* Cache */
 255     static void CacheLoad( services_discovery_t *p_sd );
 256     static void CacheSave( services_discovery_t *p_sd );
 257 /* Helper functions */
 258     static char *GetAttribute( sdp_t *p_sdp, const char *psz_search );
 259     static vlc_bool_t IsSameSession( sdp_t *p_sdp1, sdp_t *p_sdp2 );
 260     static int InitSocket( services_discovery_t *p_sd, char *psz_address, int i_port );
 261 #ifdef HAVE_ZLIB_H
 262     static int Decompress( unsigned char *psz_src, unsigned char **_dst, int i_len );
 263 #endif
 264     static void FreeSDP( sdp_t *p_sdp );
 265
 266
 267 #define FREE( p ) \
 268     if( p ) { free( p ); (p) = NULL; }
 269 /*****************************************************************************
 270  * Open: initialize and create stuff
 271  *****************************************************************************/
 272 static int Open( vlc_object_t *p_this )
 273 {
 274     services_discovery_t *p_sd = ( services_discovery_t* )p_this;
 275     services_discovery_sys_t *p_sys  = (services_discovery_sys_t *)
 276                                 malloc( sizeof( services_discovery_sys_t ) );
 277
 278     playlist_view_t     *p_view;
 279     vlc_value_t         val;
 280
 281     p_sys->i_timeout = var_CreateGetInteger( p_sd, "sap-timeout" );
 282
 283     p_sd->pf_run = Run;
 284     p_sd->p_sys  = p_sys;
 285
 286     p_sys->pi_fd = NULL;
 287     p_sys->i_fd = 0;
 288
 289     p_sys->b_strict = var_CreateGetInteger( p_sd, "sap-strict");
 290     p_sys->b_parse = var_CreateGetInteger( p_sd, "sap-parse" );
 291
 292     if( var_CreateGetInteger( p_sd, "sap-cache" ) )
 293     {
 294         CacheLoad( p_sd );
 295     }
 296
 297     /* Cache sap_timeshift value */
 298     p_sys->b_timeshift = var_CreateGetInteger( p_sd, "sap-timeshift" )
 299             ? VLC_TRUE : VLC_FALSE;
 300
 301     /* Create our playlist node */
 302     p_sys->p_playlist = (playlist_t *)vlc_object_find( p_sd,
 303                                                        VLC_OBJECT_PLAYLIST,
 304                                                        FIND_ANYWHERE );
 305     if( !p_sys->p_playlist )
 306     {
 307         msg_Warn( p_sd, "unable to find playlist, cancelling SAP listening");
 308         return VLC_EGENERIC;
 309     }
 310
 311     p_view = playlist_ViewFind( p_sys->p_playlist, VIEW_CATEGORY );
 312     p_sys->p_node = playlist_NodeCreate( p_sys->p_playlist, VIEW_CATEGORY,
 313                                          _("Session Announcements (SAP)"), p_view->p_root );
 314     p_sys->p_node->i_flags |= PLAYLIST_RO_FLAG;
 315     p_sys->p_node->i_flags &= ~PLAYLIST_SKIP_FLAG;
 316     val.b_bool = VLC_TRUE;
 317     var_Set( p_sys->p_playlist, "intf-change", val );
 318
 319     p_sys->i_announces = 0;
 320     p_sys->pp_announces = NULL;
 321
 322     return VLC_SUCCESS;
 323 }
 324
 325 /*****************************************************************************
 326  * OpenDemux: initialize and create stuff
 327  *****************************************************************************/
 328 static int OpenDemux( vlc_object_t *p_this )
 329 {
 330     demux_t *p_demux = (demux_t *)p_this;
 331     uint8_t *p_peek;
 332     int i_max_sdp = 1024;
 333     int i_sdp = 0;
 334     char *psz_sdp = NULL;
 335     sdp_t *p_sdp = NULL;
 336
 337     if( !var_CreateGetInteger( p_demux, "sap-parse" ) )
 338     {
 339         /* We want livedotcom module to parse this SDP file */
 340         return VLC_EGENERIC;
 341     }
 342
 343     /* Probe for SDP */
 344     if( p_demux->s )
 345     {
 346         if( stream_Peek( p_demux->s, &p_peek, 7 ) < 7 ) return VLC_EGENERIC;
 347
 348         if( strncmp( (char*)p_peek, "v=0\r\n", 5 ) &&
 349             strncmp( (char*)p_peek, "v=0\n", 4 ) &&
 350             ( p_peek[0] < 'a' || p_peek[0] > 'z' || p_peek[1] != '=' ) )
 351         {
 352             return VLC_EGENERIC;
 353         }
 354     }
 355
 356     psz_sdp = (char *)malloc( i_max_sdp );
 357     if( !psz_sdp ) return VLC_EGENERIC;
 358
 359     /* Gather the complete sdp file */
 360     for( ;; )
 361     {
 362         int i_read = stream_Read( p_demux->s,
 363                                   &psz_sdp[i_sdp], i_max_sdp - i_sdp - 1 );
 364
 365         if( i_read < 0 )
 366         {
 367             msg_Err( p_demux, "failed to read SDP" );
 368             goto error;
 369         }
 370
 371         i_sdp += i_read;
 372
 373         if( i_read < i_max_sdp - i_sdp - 1 )
 374         {
 375             psz_sdp[i_sdp] = '\0';
 376             break;
 377         }
 378
 379         i_max_sdp += 1000;
 380         psz_sdp = (char *)realloc( psz_sdp, i_max_sdp );
 381     }
 382
 383     p_sdp = ParseSDP( VLC_OBJECT(p_demux), psz_sdp );
 384
 385     if( !p_sdp )
 386     {
 387         msg_Warn( p_demux, "invalid SDP");
 388         goto error;
 389     }
 390
 391     if( p_sdp->i_media > 1 )
 392     {
 393         goto error;
 394     }
 395
 396     if( ParseConnection( VLC_OBJECT( p_demux ), p_sdp ) )
 397     {
 398         p_sdp->psz_uri = NULL;
 399     }
 400     if( p_sdp->i_media_type != 33 && p_sdp->i_media_type != 32 &&
 401         p_sdp->i_media_type != 14 )
 402         goto error;
 403
 404     if( p_sdp->psz_uri == NULL ) goto error;
 405
 406     p_demux->p_sys = (demux_sys_t *)malloc( sizeof(demux_sys_t) );
 407     p_demux->p_sys->p_sdp = p_sdp;
 408     p_demux->pf_control = Control;
 409     p_demux->pf_demux = Demux;
 410
 411     free( psz_sdp );
 412     return VLC_SUCCESS;
 413
 414 error:
 415     free( psz_sdp );
 416     if( p_sdp ) FreeSDP( p_sdp );
 417     stream_Seek( p_demux->s, 0 );
 418     return VLC_EGENERIC;
 419 }
 420
 421 /*****************************************************************************
 422  * Close:
 423  *****************************************************************************/
 424 static void Close( vlc_object_t *p_this )
 425 {
 426     services_discovery_t *p_sd = ( services_discovery_t* )p_this;
 427     services_discovery_sys_t    *p_sys  = p_sd->p_sys;
 428
 429     int i;
 430
 431     for( i = p_sys->i_fd-1 ; i >= 0 ; i-- )
 432     {
 433         net_Close( p_sys->pi_fd[i] );
 434     }
 435     FREE( p_sys->pi_fd );
 436
 437     if( config_GetInt( p_sd, "sap-cache" ) )
 438     {
 439         CacheSave( p_sd );
 440     }
 441
 442     for( i = p_sys->i_announces  - 1;  i>= 0; i-- )
 443     {
 444         RemoveAnnounce( p_sd, p_sys->pp_announces[i] );
 445     }
 446     FREE( p_sys->pp_announces );
 447
 448     if( p_sys->p_playlist )
 449     {
 450         playlist_NodeDelete( p_sys->p_playlist, p_sys->p_node, VLC_TRUE,
 451                              VLC_TRUE );
 452         vlc_object_release( p_sys->p_playlist );
 453     }
 454
 455     free( p_sys );
 456 }
 457
 458 /*****************************************************************************
 459  * CloseDemux: Close the demuxer
 460  *****************************************************************************/
 461 static void CloseDemux( vlc_object_t *p_this )
 462 {
 463
 464 }
 465
 466 /*****************************************************************************
 467  * Run: main SAP thread
 468  *****************************************************************************
 469  * Listens to SAP packets, and sends them to packet_handle
 470  *****************************************************************************/
 471 #define MAX_SAP_BUFFER 5000
 472
 473 static void Run( services_discovery_t *p_sd )
 474 {
 475     char *psz_addr;
 476     int i;
 477
 478     /* Braindead Winsock DNS resolver will get stuck over 2 seconds per failed
 479      * DNS queries, even if the DNS server returns an error with milliseconds.
 480      * You don't want to know why the bug (as of XP SP2) wasn't fixed since
 481      * Winsock 1.1 from Windows 95, if not Windows 3.1.
 482      * Anyway, to avoid a 30 seconds delay for failed IPv6 socket creation,
 483      * we have to open sockets in Run() rather than Open(). */
 484     if( var_CreateGetInteger( p_sd, "sap-ipv4" ) )
 485     {
 486         InitSocket( p_sd, SAP_V4_GLOBAL_ADDRESS, SAP_PORT );
 487         InitSocket( p_sd, SAP_V4_ORG_ADDRESS, SAP_PORT );
 488         InitSocket( p_sd, SAP_V4_LOCAL_ADDRESS, SAP_PORT );
 489         InitSocket( p_sd, SAP_V4_LINK_ADDRESS, SAP_PORT );
 490     }
 491     if( var_CreateGetInteger( p_sd, "sap-ipv6" ) )
 492     {
 493         char psz_address[] = SAP_V6_1"0"SAP_V6_2;
 494         const char *c_scope;
 495
 496         for( c_scope = ipv6_scopes; *c_scope; c_scope++ )
 497         {
 498             psz_address[sizeof(SAP_V6_1) - 1] = *c_scope;
 499             InitSocket( p_sd, psz_address, SAP_PORT );
 500         }
 501     }
 502
 503     if( p_sd->p_sys->i_fd == 0 )
 504     {
 505         msg_Err( p_sd, "unable to listen on any address" );
 506         return;
 507     }
 508
 509     /* read SAP packets */
 510     while( !p_sd->b_die )
 511     {
 512         int i_read;
 513         uint8_t p_buffer[MAX_SAP_BUFFER+1];
 514
 515         i_read = net_Select( p_sd, p_sd->p_sys->pi_fd, NULL,
 516                              p_sd->p_sys->i_fd, p_buffer,
 517                              MAX_SAP_BUFFER, 500000 );
 518
 519         /* Check for items that need deletion */
 520         for( i = 0; i < p_sd->p_sys->i_announces; i++ )
 521         {
 522             mtime_t i_timeout = ( mtime_t ) 1000000 * p_sd->p_sys->i_timeout;
 523
 524             if( mdate() - p_sd->p_sys->pp_announces[i]->i_last > i_timeout )
 525             {
 526                 struct sap_announce_t *p_announce;
 527                 p_announce = p_sd->p_sys->pp_announces[i];
 528
 529                 /* Remove the playlist item */
 530                 playlist_LockDelete( p_sd->p_sys->p_playlist,
 531                                      p_announce->i_item_id );
 532
 533                 /* Remove the sap_announce from the array */
 534                 REMOVE_ELEM( p_sd->p_sys->pp_announces,
 535                            p_sd->p_sys->i_announces, i );
 536
 537                 free( p_announce );
 538             }
 539         }
 540
 541         /* Minimum length is > 6 */
 542         if( i_read <= 6 )
 543         {
 544             if( i_read < 0 )
 545             {
 546                 msg_Warn( p_sd, "socket read error" );
 547             }
 548             continue;
 549         }
 550
 551         p_buffer[i_read] = '\0';
 552
 553         /* Parse the packet */
 554         ParseSAP( p_sd, p_buffer, i_read );
 555     }
 556 }
 557
 558 /**********************************************************************
 559  * Demux: reads and demuxes data packets
 560  * Return -1 if error, 0 if EOF, 1 else
 561  **********************************************************************/
 562 static int Demux( demux_t *p_demux )
 563 {
 564     sdp_t *p_sdp = p_demux->p_sys->p_sdp;
 565     playlist_t *p_playlist;
 566
 567     p_playlist = (playlist_t *)vlc_object_find( p_demux, VLC_OBJECT_PLAYLIST,
 568                                                FIND_ANYWHERE );
 569
 570     p_playlist->status.p_item->i_flags |= PLAYLIST_DEL_FLAG;
 571
 572     playlist_Add( p_playlist, p_sdp->psz_uri, p_sdp->psz_sessionname,
 573                  PLAYLIST_APPEND, PLAYLIST_END );
 574
 575     vlc_object_release( p_playlist );
 576     if( p_sdp ) FreeSDP( p_sdp );
 577
 578     return VLC_SUCCESS;
 579 }
 580
 581 static int Control( demux_t *p_demux, int i_query, va_list args )
 582 {
 583     return VLC_EGENERIC;
 584 }
 585
 586 /**************************************************************
 587  * Local functions
 588  **************************************************************/
 589
 590 /* i_read is at least > 6 */
 591 static int ParseSAP( services_discovery_t *p_sd, uint8_t *p_buffer, int i_read )
 592 {
 593     int                 i_version, i_address_type, i_hash, i;
 594     char                *psz_sdp, *psz_foo, *psz_initial_sdp;
 595     sdp_t               *p_sdp;
 596     vlc_bool_t          b_compressed;
 597     vlc_bool_t          b_need_delete = VLC_FALSE;
 598
 599     /* First, check the sap announce is correct */
 600     i_version = p_buffer[0] >> 5;
 601     if( i_version != 1 )
 602     {
 603        msg_Dbg( p_sd, "strange sap version %d found", i_version );
 604     }
 605
 606     i_address_type = p_buffer[0] & 0x10;
 607
 608     if( (p_buffer[0] & 0x08) != 0 )
 609     {
 610         msg_Dbg( p_sd, "reserved bit incorrectly set" );
 611         return VLC_EGENERIC;
 612     }
 613
 614     if( (p_buffer[0] & 0x04) != 0 )
 615     {
 616         msg_Dbg( p_sd, "session deletion packet" );
 617         b_need_delete = VLC_TRUE;
 618     }
 619
 620     if( p_buffer[0] & 0x02  )
 621     {
 622         msg_Dbg( p_sd, "encrypted packet, unsupported" );
 623         return VLC_EGENERIC;
 624     }
 625
 626     b_compressed = p_buffer[0] & 0x01;
 627
 628     i_hash = ( p_buffer[2] << 8 ) + p_buffer[3];
 629
 630     if( p_sd->p_sys->b_strict && i_hash == 0 )
 631     {
 632         msg_Dbg( p_sd, "strict mode, discarding announce with null id hash");
 633         return VLC_EGENERIC;
 634     }
 635
 636     psz_sdp  = (char *)p_buffer + 4;
 637     psz_initial_sdp = psz_sdp;
 638
 639     if( i_address_type == 0 ) /* ipv4 source address */
 640     {
 641         psz_sdp += 4;
 642         if( i_read <= 9 )
 643         {
 644             msg_Warn( p_sd, "too short SAP packet" );
 645             return VLC_EGENERIC;
 646         }
 647     }
 648     else /* ipv6 source address */
 649     {
 650         psz_sdp += 16;
 651         if( i_read <= 21 )
 652         {
 653             msg_Warn( p_sd, "too short SAP packet" );
 654             return VLC_EGENERIC;
 655         }
 656     }
 657
 658     if( b_compressed )
 659     {
 660 #ifdef HAVE_ZLIB_H
 661         uint8_t *p_decompressed_buffer = NULL;
 662         int      i_decompressed_size;
 663
 664         i_decompressed_size = Decompress( (uint8_t *)psz_sdp,
 665                    &p_decompressed_buffer, i_read - ( psz_sdp - (char *)p_buffer ) );
 666         if( i_decompressed_size > 0 && i_decompressed_size < MAX_SAP_BUFFER )
 667         {
 668             memcpy( psz_sdp, p_decompressed_buffer, i_decompressed_size );
 669             psz_sdp[i_decompressed_size] = '\0';
 670             free( p_decompressed_buffer );
 671         }
 672 #else
 673         msg_Warn( p_sd, "ignoring compressed sap packet" );
 674         return VLC_EGENERIC;
 675 #endif
 676     }
 677
 678     /* Add the size of authentification info */
 679     if( i_read < p_buffer[1] + (psz_sdp - psz_initial_sdp ) )
 680     {
 681         msg_Warn( p_sd, "too short SAP packet\n");
 682         return VLC_EGENERIC;
 683     }
 684     psz_sdp += p_buffer[1];
 685     psz_foo = psz_sdp;
 686
 687     /* Skip payload type */
 688     /* Handle announces without \0 between SAP and SDP */
 689     while( *psz_sdp != '\0' && ( psz_sdp[0] != 'v' && psz_sdp[1] != '=' ) )
 690     {
 691         if( psz_sdp - psz_initial_sdp >= i_read - 5 )
 692         {
 693             msg_Warn( p_sd, "empty SDP ?");
 694         }
 695         psz_sdp++;
 696     }
 697
 698     if( *psz_sdp == '\0' )
 699     {
 700         psz_sdp++;
 701     }
 702     if( ( psz_sdp != psz_foo ) && strcasecmp( psz_foo, "application/sdp" ) )
 703     {
 704         msg_Dbg( p_sd, "unhandled content type: %s", psz_foo );
 705     }
 706     if( ( psz_sdp - (char *)p_buffer ) >= i_read )
 707     {
 708         msg_Warn( p_sd, "package without content" );
 709         return VLC_EGENERIC;
 710     }
 711
 712     /* Parse SDP info */
 713     p_sdp = ParseSDP( VLC_OBJECT(p_sd), psz_sdp );
 714
 715     if( p_sdp == NULL )
 716     {
 717         return VLC_EGENERIC;
 718     }
 719
 720     /* Decide whether we should add a playlist item for this SDP */
 721     /* Parse connection information (c= & m= ) */
 722     if( ParseConnection( VLC_OBJECT(p_sd), p_sdp ) )
 723     {
 724         p_sdp->psz_uri = NULL;
 725     }
 726
 727     /* Multi-media or no-parse -> pass to LIVE.COM */
 728     if( p_sdp->i_media > 1 || ( p_sdp->i_media_type != 14 &&
 729                                 p_sdp->i_media_type != 32 &&
 730                                 p_sdp->i_media_type != 33) ||
 731         p_sd->p_sys->b_parse == VLC_FALSE )
 732     {
 733         if( p_sdp->psz_uri ) free( p_sdp->psz_uri );
 734         asprintf( &p_sdp->psz_uri, "sdp://%s", p_sdp->psz_sdp );
 735     }
 736
 737     if( p_sdp->psz_uri == NULL ) return VLC_EGENERIC;
 738
 739     for( i = 0 ; i< p_sd->p_sys->i_announces ; i++ )
 740     {
 741         /* FIXME: slow */
 742         /* FIXME: we create a new announce each time the sdp changes */
 743         if( IsSameSession( p_sd->p_sys->pp_announces[i]->p_sdp, p_sdp ) )
 744         {
 745             if( b_need_delete )
 746             {
 747                 RemoveAnnounce( p_sd, p_sd->p_sys->pp_announces[i]);
 748                 return VLC_SUCCESS;
 749             }
 750             else
 751             {
 752                 p_sd->p_sys->pp_announces[i]->i_last = mdate();
 753                 FreeSDP( p_sdp );
 754                 return VLC_SUCCESS;
 755             }
 756         }
 757     }
 758     /* Add item */
 759     if( p_sdp->i_media > 1 )
 760     {
 761         msg_Dbg( p_sd, "passing to liveMedia" );
 762     }
 763
 764     CreateAnnounce( p_sd, i_hash, p_sdp );
 765
 766     return VLC_SUCCESS;
 767 }
 768
 769 sap_announce_t *CreateAnnounce( services_discovery_t *p_sd, uint16_t i_hash,
 770                                 sdp_t *p_sdp )
 771 {
 772     playlist_item_t     *p_item, *p_child;
 773     char *psz_value;
 774     sap_announce_t *p_sap = (sap_announce_t *)malloc(
 775                                         sizeof(sap_announce_t ) );
 776     services_discovery_sys_t *p_sys;
 777     if( p_sap == NULL )
 778         return NULL;
 779
 780     p_sys = p_sd->p_sys;
 781
 782     EnsureUTF8( p_sdp->psz_sessionname );
 783     p_sap->i_last = mdate();
 784     p_sap->i_hash = i_hash;
 785     p_sap->p_sdp = p_sdp;
 786     p_sap->i_item_id = -1;
 787
 788     /* Create the actual playlist item here */
 789     p_item = playlist_ItemNew( p_sd, p_sap->p_sdp->psz_uri, p_sdp->psz_sessionname );
 790
 791     if( !p_item )
 792     {
 793         free( p_sap );
 794         return NULL;
 795     }
 796
 797     if( p_sys->b_timeshift )
 798         playlist_ItemAddOption( p_item, ":access-filter=timeshift" );
 799
 800     psz_value = GetAttribute( p_sap->p_sdp, "tool" );
 801     if( psz_value != NULL )
 802     {
 803         vlc_input_item_AddInfo( &p_item->input, _("Session"),
 804                                 _("Tool"), psz_value );
 805     }
 806     if( strcmp( p_sdp->psz_username, "-" ) )
 807     {
 808         vlc_input_item_AddInfo( &p_item->input, _("Session"),
 809                                 _("User"), p_sdp->psz_username );
 810     }
 811
 812     psz_value = GetAttribute( p_sap->p_sdp, "x-plgroup" );
 813
 814     if( psz_value == NULL )
 815     {
 816         psz_value = GetAttribute( p_sap->p_sdp, "plgroup" );
 817     }
 818
 819     /* Find or Create the group playlist non-playable item */
 820     if( psz_value != NULL )
 821     {
 822         EnsureUTF8( psz_value );
 823
 824         p_child = playlist_ChildSearchName( p_sys->p_node, psz_value );
 825
 826         if( p_child == NULL )
 827         {
 828             p_child = playlist_NodeCreate( p_sys->p_playlist,
 829                                            VIEW_CATEGORY, psz_value,
 830                                            p_sys->p_node );
 831             p_child->i_flags &= ~PLAYLIST_SKIP_FLAG;
 832         }
 833     }
 834     else
 835     {
 836         p_child = p_sys->p_node;
 837     }
 838
 839     p_item->i_flags &= ~PLAYLIST_SKIP_FLAG;
 840     p_item->i_flags &= ~PLAYLIST_SAVE_FLAG;
 841
 842     playlist_NodeAddItem( p_sys->p_playlist, p_item, VIEW_CATEGORY, p_child,
 843                           PLAYLIST_APPEND, PLAYLIST_END );
 844
 845     p_sap->i_item_id = p_item->input.i_id;
 846
 847     TAB_APPEND( p_sys->i_announces, p_sys->pp_announces, p_sap );
 848
 849     return p_sap;
 850 }
 851
 852 static char *GetAttribute( sdp_t *p_sdp, const char *psz_search )
 853 {
 854     int i;
 855
 856     for( i = 0 ; i< p_sdp->i_attributes; i++ )
 857     {
 858         if( !strncmp( p_sdp->pp_attributes[i]->psz_field, psz_search,
 859                       strlen( p_sdp->pp_attributes[i]->psz_field ) ) )
 860         {
 861             return p_sdp->pp_attributes[i]->psz_value;
 862         }
 863     }
 864     return NULL;
 865 }
 866
 867
 868 /* Fill p_sdp->psz_uri */
 869 static int ParseConnection( vlc_object_t *p_obj, sdp_t *p_sdp )
 870 {
 871     char *psz_eof;
 872     char *psz_parse;
 873     char *psz_uri = NULL;
 874     char *psz_proto = NULL;
 875     char psz_source[256];
 876     int i_port = 0;
 877
 878     /* Parse c= field */
 879     if( p_sdp->psz_connection )
 880     {
 881         psz_parse = p_sdp->psz_connection;
 882
 883         psz_eof = strchr( psz_parse, ' ' );
 884
 885         if( psz_eof )
 886         {
 887             *psz_eof = '\0';
 888             psz_parse = psz_eof + 1;
 889         }
 890         else
 891         {
 892             msg_Warn( p_obj, "unable to parse c field (1)");
 893             return VLC_EGENERIC;
 894         }
 895
 896         psz_eof = strchr( psz_parse, ' ' );
 897
 898         if( psz_eof )
 899         {
 900             *psz_eof = '\0';
 901             if( !strncmp( psz_parse, "IP4", 3 ) )
 902             {
 903                 p_sdp->i_in = 4;
 904             }
 905             else if( !strncmp( psz_parse, "IP6", 3 ) )
 906             {
 907                 p_sdp->i_in = 6;
 908             }
 909             else
 910             {
 911                 p_sdp->i_in = 0;
 912             }
 913             psz_parse = psz_eof + 1;
 914         }
 915         else
 916         {
 917             msg_Warn( p_obj, "unable to parse c field (2)");
 918             return VLC_EGENERIC;
 919         }
 920
 921         psz_eof = strchr( psz_parse, '/' );
 922
 923         if( psz_eof )
 924         {
 925             *psz_eof = '\0';
 926         }
 927         else
 928         {
 929             msg_Dbg( p_obj, "incorrect c field, %s", p_sdp->psz_connection );
 930         }
 931         if( p_sdp->i_in == 6 && ( isxdigit( *psz_parse ) || *psz_parse == ':' ) )
 932         {
 933             asprintf( &psz_uri, "[%s]", psz_parse );
 934         }
 935         else psz_uri = strdup( psz_parse );
 936
 937     }
 938
 939     /* Parse m= field */
 940     if( p_sdp->psz_media )
 941     {
 942         psz_parse = p_sdp->psz_media;
 943
 944         psz_eof = strchr( psz_parse, ' ' );
 945
 946         if( psz_eof )
 947         {
 948             *psz_eof = '\0';
 949
 950             if( strncmp( psz_parse, "audio", 5 )  &&
 951                 strncmp( psz_parse, "video", 5 ) )
 952             {
 953                 msg_Warn( p_obj, "unhandled media type -%s-", psz_parse );
 954                 FREE( psz_uri );
 955                 return VLC_EGENERIC;
 956             }
 957
 958             psz_parse = psz_eof + 1;
 959         }
 960         else
 961         {
 962             msg_Warn( p_obj, "unable to parse m field (1)");
 963             FREE( psz_uri );
 964             return VLC_EGENERIC;
 965         }
 966
 967         psz_eof = strchr( psz_parse, ' ' );
 968
 969         if( psz_eof )
 970         {
 971             *psz_eof = '\0';
 972
 973             /* FIXME : multiple port ! */
 974             i_port = atoi( psz_parse );
 975
 976             if( i_port <= 0 || i_port >= 65536 )
 977             {
 978                 msg_Warn( p_obj, "invalid transport port %i", i_port );
 979             }
 980
 981             psz_parse = psz_eof + 1;
 982         }
 983         else
 984         {
 985             msg_Warn( p_obj, "unable to parse m field (2)");
 986             FREE( psz_uri );
 987             return VLC_EGENERIC;
 988         }
 989
 990         psz_eof = strchr( psz_parse, ' ' );
 991
 992         if( psz_eof )
 993         {
 994             *psz_eof = '\0';
 995             psz_proto = strdup( psz_parse );
 996
 997             psz_parse = psz_eof + 1;
 998             p_sdp->i_media_type = atoi( psz_parse );
 999
1000         }
1001         else
1002         {
1003             msg_Dbg( p_obj, "incorrect m field, %s", p_sdp->psz_media );
1004             p_sdp->i_media_type = 33;
1005             psz_proto = strdup( psz_parse );
1006         }
1007     }
1008
1009     if( psz_proto && !strncmp( psz_proto, "RTP/AVP", 7 ) )
1010     {
1011         free( psz_proto );
1012         psz_proto = strdup( "rtp" );
1013     }
1014     if( psz_proto && !strncasecmp( psz_proto, "UDP", 3 ) )
1015     {
1016         free( psz_proto );
1017         psz_proto = strdup( "udp" );
1018     }
1019
1020     /* FIXME: HTTP support */
1021
1022     if( i_port == 0 )
1023     {
1024         i_port = 1234;
1025     }
1026
1027     /* handle SSM case */
1028     psz_parse = GetAttribute( p_sdp, "source-filter" );
1029     psz_source[0] = '\0';
1030
1031     if( psz_parse ) sscanf( psz_parse, " incl IN IP%*s %*s %255s ", psz_source);
1032
1033     asprintf( &p_sdp->psz_uri, "%s://%s@%s:%i", psz_proto, psz_source,
1034               psz_uri, i_port );
1035
1036     FREE( psz_uri );
1037     FREE( psz_proto );
1038     return VLC_SUCCESS;
1039 }
1040
1041 /***********************************************************************
1042  * ParseSDP : SDP parsing
1043  * *********************************************************************
1044  * Validate SDP and parse all fields
1045  ***********************************************************************/
1046 static sdp_t *  ParseSDP( vlc_object_t *p_obj, char* psz_sdp )
1047 {
1048     sdp_t *p_sdp;
1049     vlc_bool_t b_invalid = VLC_FALSE;
1050     vlc_bool_t b_end = VLC_FALSE;
1051     if( psz_sdp == NULL )
1052     {
1053         return NULL;
1054     }
1055
1056     if( psz_sdp[0] != 'v' || psz_sdp[1] != '=' )
1057     {
1058         msg_Warn( p_obj, "bad packet" );
1059         return NULL;
1060     }
1061
1062     p_sdp = (sdp_t *)malloc( sizeof( sdp_t ) );
1063     if( p_sdp == NULL )
1064         return NULL;
1065
1066     p_sdp->psz_sdp = strdup( psz_sdp );
1067     if( p_sdp->psz_sdp == NULL )
1068     {
1069         free( p_sdp );
1070         return NULL;
1071     }
1072
1073     p_sdp->psz_sessionname = NULL;
1074     p_sdp->psz_media       = NULL;
1075     p_sdp->psz_connection  = NULL;
1076     p_sdp->psz_uri         = NULL;
1077     p_sdp->psz_address     = NULL;
1078     p_sdp->psz_address_type= NULL;
1079
1080     p_sdp->i_media         = 0;
1081     p_sdp->i_attributes    = 0;
1082     p_sdp->pp_attributes   = NULL;
1083
1084     while( *psz_sdp != '\0' && b_end == VLC_FALSE  )
1085     {
1086         char *psz_eol;
1087         char *psz_eof;
1088         char *psz_parse;
1089         char *psz_sess_id;
1090
1091         while( *psz_sdp == '\r' || *psz_sdp == '\n' ||
1092                *psz_sdp == ' ' || *psz_sdp == '\t' )
1093         {
1094             psz_sdp++;
1095         }
1096
1097         if( ( psz_eol = strchr( psz_sdp, '\n' ) ) == NULL )
1098         {
1099             psz_eol = psz_sdp + strlen( psz_sdp );
1100             b_end = VLC_TRUE;
1101         }
1102         if( psz_eol > psz_sdp && *( psz_eol - 1 ) == '\r' )
1103         {
1104             psz_eol--;
1105         }
1106
1107         if( psz_eol <= psz_sdp )
1108         {
1109             break;
1110         }
1111         *psz_eol++ = '\0';
1112
1113         /* no space allowed between fields */
1114         if( psz_sdp[1] != '=' )
1115         {
1116             msg_Warn( p_obj, "invalid packet" ) ;
1117             FreeSDP( p_sdp );
1118             return NULL;
1119         }
1120
1121         /* Now parse each line */
1122         switch( psz_sdp[0] )
1123         {
1124             case( 'v' ):
1125                 break;
1126             case( 's' ):
1127                 p_sdp->psz_sessionname = strdup( &psz_sdp[2] );
1128                 break;
1129             case ( 'o' ):
1130             {
1131                 int i_field = 0;
1132                 /* o field is <username> <session id> <version>
1133                  *  <network type> <address type> <address> */
1134
1135 #define GET_FIELD( store ) \
1136                 psz_eof = strchr( psz_parse, ' ' ); \
1137                 if( psz_eof ) \
1138                 { \
1139                     *psz_eof=0; store = strdup( psz_parse ); \
1140                 } \
1141                 else \
1142                 { \
1143                     if( i_field != 5 ) \
1144                     { \
1145                         b_invalid = VLC_TRUE; break; \
1146                     } \
1147                     else \
1148                     { \
1149                         store = strdup( psz_parse ); \
1150                     } \
1151                 }; \
1152                 psz_parse = psz_eof + 1; i_field++;
1153
1154
1155                 psz_parse = &psz_sdp[2];
1156                 GET_FIELD( p_sdp->psz_username );
1157                 GET_FIELD( psz_sess_id );
1158
1159                 p_sdp->i_session_id = atoll( psz_sess_id );
1160
1161                 FREE( psz_sess_id );
1162
1163                 GET_FIELD( psz_sess_id );
1164                 FREE( psz_sess_id );
1165
1166                 GET_FIELD( p_sdp->psz_network_type );
1167                 GET_FIELD( p_sdp->psz_address_type );
1168                 GET_FIELD( p_sdp->psz_address );
1169
1170                 break;
1171             }
1172             case( 'i' ):
1173             case( 'u' ):
1174             case( 'e' ):
1175             case( 'p' ):
1176             case( 't' ):
1177             case( 'r' ):
1178                 break;
1179             case( 'a' ): /* attribute */
1180             {
1181                 char *psz_eon = strchr( &psz_sdp[2], ':' );
1182                 attribute_t *p_attr = malloc( sizeof( attribute_t ) );
1183
1184                 /* Attribute with value */
1185                 if( psz_eon )
1186                 {
1187                     *psz_eon++ = '\0';
1188
1189                     p_attr->psz_field = strdup( &psz_sdp[2] );
1190                     p_attr->psz_value = strdup( psz_eon );
1191                 }
1192                 else /* Attribute without value */
1193                 {
1194                     p_attr->psz_field = strdup( &psz_sdp[2] );
1195                     p_attr->psz_value = NULL;
1196                 }
1197
1198                 TAB_APPEND( p_sdp->i_attributes, p_sdp->pp_attributes, p_attr );
1199                 break;
1200             }
1201
1202             case( 'm' ): /* Media announcement */
1203             {
1204                 /* If we have several medias, we pass the announcement to
1205                  * LIVE.COM, so just count them */
1206                 p_sdp->i_media++;
1207                 if( p_sdp->i_media == 1 )
1208                 {
1209                     p_sdp->psz_media = strdup( &psz_sdp[2] );
1210                 }
1211                 break;
1212             }
1213
1214             case( 'c' ):
1215             {
1216                 if( p_sdp->i_media > 1 )
1217                     break;
1218
1219                 p_sdp->psz_connection = strdup( &psz_sdp[2] );
1220                 break;
1221             }
1222
1223             default:
1224                break;
1225         }
1226
1227         if( b_invalid )
1228         {
1229             FreeSDP( p_sdp );
1230             return NULL;
1231         }
1232
1233         psz_sdp = psz_eol;
1234     }
1235
1236     return p_sdp;
1237 }
1238
1239 static int InitSocket( services_discovery_t *p_sd, char *psz_address,
1240                        int i_port )
1241 {
1242     int i_fd = net_OpenUDP( p_sd, psz_address, i_port, NULL, 0 );
1243
1244     if( i_fd != -1 )
1245     {
1246         net_StopSend( i_fd );
1247         INSERT_ELEM(  p_sd->p_sys->pi_fd, p_sd->p_sys->i_fd,
1248                       p_sd->p_sys->i_fd, i_fd );
1249         return VLC_SUCCESS;
1250     }
1251
1252     return VLC_EGENERIC;
1253 }
1254
1255 #ifdef HAVE_ZLIB_H
1256 static int Decompress( unsigned char *psz_src, unsigned char **_dst, int i_len )
1257 {
1258     int i_result, i_dstsize, n;
1259     unsigned char *psz_dst;
1260     z_stream d_stream;
1261
1262     d_stream.zalloc = (alloc_func)0;
1263     d_stream.zfree = (free_func)0;
1264     d_stream.opaque = (voidpf)0;
1265
1266     i_result = inflateInit(&d_stream);
1267     if( i_result != Z_OK )
1268     {
1269         printf( "inflateInit() failed. Result: %d\n", i_result );
1270         return( -1 );
1271     }
1272 #if 0
1273     p_playlist->pp_items[p_playlist->i_index]->b_autodeletion = VLC_TRUE;
1274     i_position = p_playlist->i_index;
1275
1276     /* Gather the complete sdp file */
1277     for( ;; )
1278     {
1279         int i_read = stream_Read( p_demux->s, &p_sdp[i_sdp], i_sdp_max - i_sdp - 1 );
1280 #endif
1281     d_stream.next_in = (Bytef *)psz_src;
1282     d_stream.avail_in = i_len;
1283     n = 0;
1284
1285     psz_dst = NULL;
1286
1287     do
1288     {
1289         n++;
1290         psz_dst = (unsigned char *)realloc( psz_dst, n * 1000 );
1291         d_stream.next_out = (Bytef *)&psz_dst[(n - 1) * 1000];
1292         d_stream.avail_out = 1000;
1293
1294         i_result = inflate(&d_stream, Z_NO_FLUSH);
1295         if( ( i_result != Z_OK ) && ( i_result != Z_STREAM_END ) )
1296         {
1297             printf( "Zlib decompression failed. Result: %d\n", i_result );
1298             return( -1 );
1299         }
1300     }
1301     while( ( d_stream.avail_out == 0 ) && ( d_stream.avail_in != 0 ) &&
1302            ( i_result != Z_STREAM_END ) );
1303
1304     i_dstsize = d_stream.total_out;
1305     inflateEnd( &d_stream );
1306
1307     *_dst = (unsigned char *)realloc( psz_dst, i_dstsize );
1308
1309     return i_dstsize;
1310 }
1311 #endif
1312
1313
1314 static void FreeSDP( sdp_t *p_sdp )
1315 {
1316     int i;
1317     FREE( p_sdp->psz_sdp );
1318     FREE( p_sdp->psz_sessionname );
1319     FREE( p_sdp->psz_connection );
1320     FREE( p_sdp->psz_media );
1321     FREE( p_sdp->psz_uri );
1322     FREE( p_sdp->psz_username );
1323     FREE( p_sdp->psz_network_type );
1324
1325     FREE( p_sdp->psz_address );
1326     FREE( p_sdp->psz_address_type );
1327
1328     for( i= p_sdp->i_attributes - 1; i >= 0 ; i-- )
1329     {
1330         struct attribute_t *p_attr = p_sdp->pp_attributes[i];
1331         FREE( p_sdp->pp_attributes[i]->psz_field );
1332         FREE( p_sdp->pp_attributes[i]->psz_value );
1333         REMOVE_ELEM( p_sdp->pp_attributes, p_sdp->i_attributes, i);
1334         FREE( p_attr );
1335     }
1336     free( p_sdp );
1337 }
1338
1339 static int RemoveAnnounce( services_discovery_t *p_sd,
1340                            sap_announce_t *p_announce )
1341 {
1342     int i;
1343
1344     if( p_announce->p_sdp ) FreeSDP( p_announce->p_sdp );
1345
1346     if( p_announce->i_item_id > -1 )
1347     {
1348         playlist_LockDelete( p_sd->p_sys->p_playlist, p_announce->i_item_id );
1349     }
1350
1351     for( i = 0; i< p_sd->p_sys->i_announces; i++)
1352     {
1353         if( p_sd->p_sys->pp_announces[i] == p_announce )
1354         {
1355             REMOVE_ELEM( p_sd->p_sys->pp_announces, p_sd->p_sys->i_announces,
1356                          i);
1357             break;
1358         }
1359     }
1360
1361     free( p_announce );
1362
1363     return VLC_SUCCESS;
1364 }
1365
1366 static vlc_bool_t IsSameSession( sdp_t *p_sdp1, sdp_t *p_sdp2 )
1367 {
1368     /* A session is identified by
1369      * username, session_id, network type, address type and address */
1370     if( p_sdp1->psz_username && p_sdp2->psz_username &&
1371         p_sdp1->psz_network_type && p_sdp2->psz_network_type &&
1372         p_sdp1->psz_address_type && p_sdp2->psz_address_type &&
1373         p_sdp1->psz_address &&  p_sdp2->psz_address )
1374     {
1375         if(!strcmp( p_sdp1->psz_username , p_sdp2->psz_username ) &&
1376            !strcmp( p_sdp1->psz_network_type , p_sdp2->psz_network_type ) &&
1377            !strcmp( p_sdp1->psz_address_type , p_sdp2->psz_address_type ) &&
1378            !strcmp( p_sdp1->psz_address , p_sdp2->psz_address ) &&
1379            p_sdp1->i_session_id == p_sdp2->i_session_id )
1380         {
1381             return VLC_TRUE;
1382         }
1383         else
1384         {
1385             return VLC_FALSE;
1386         }
1387     }
1388     else
1389     {
1390         return VLC_FALSE;
1391     }
1392 }
1393
1394
1395 static void CacheLoad( services_discovery_t *p_sd )
1396 {
1397     msg_Warn( p_sd, "cache not implemented") ;
1398 }
1399
1400 static void CacheSave( services_discovery_t *p_sd )
1401 {
1402     msg_Warn( p_sd, "cache not implemented") ;
1403 }