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

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