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 + 1];
 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     if( p_sdp == NULL )
1082         return NULL;
1083
1084     p_sdp->psz_sdp = strdup( psz_sdp );
1085     if( p_sdp->psz_sdp == NULL )
1086     {
1087         free( p_sdp );
1088         return NULL;
1089     }
1090
1091     p_sdp->psz_sessionname = NULL;
1092     p_sdp->psz_media       = NULL;
1093     p_sdp->psz_connection  = NULL;
1094     p_sdp->psz_uri         = NULL;
1095     p_sdp->psz_address     = NULL;
1096     p_sdp->psz_address_type= NULL;
1097
1098     p_sdp->i_media         = 0;
1099     p_sdp->i_attributes    = 0;
1100     p_sdp->pp_attributes   = NULL;
1101
1102     while( *psz_sdp != '\0' && b_end == VLC_FALSE  )
1103     {
1104         char *psz_eol;
1105         char *psz_eof;
1106         char *psz_parse;
1107         char *psz_sess_id;
1108
1109         while( *psz_sdp == '\r' || *psz_sdp == '\n' ||
1110                *psz_sdp == ' ' || *psz_sdp == '\t' )
1111         {
1112             psz_sdp++;
1113         }
1114
1115         if( ( psz_eol = strchr( psz_sdp, '\n' ) ) == NULL )
1116         {
1117             psz_eol = psz_sdp + strlen( psz_sdp );
1118             b_end = VLC_TRUE;
1119         }
1120         if( psz_eol > psz_sdp && *( psz_eol - 1 ) == '\r' )
1121         {
1122             psz_eol--;
1123         }
1124
1125         if( psz_eol <= psz_sdp )
1126         {
1127             break;
1128         }
1129         *psz_eol++ = '\0';
1130
1131         /* no space allowed between fields */
1132         if( psz_sdp[1] != '=' )
1133         {
1134             msg_Warn( p_obj, "invalid packet" ) ;
1135             FreeSDP( p_sdp );
1136             return NULL;
1137         }
1138
1139         /* Now parse each line */
1140         switch( psz_sdp[0] )
1141         {
1142             case( 'v' ):
1143                 break;
1144             case( 's' ):
1145                 p_sdp->psz_sessionname = strdup( &psz_sdp[2] );
1146                 break;
1147             case ( 'o' ):
1148             {
1149                 int i_field = 0;
1150                 /* o field is <username> <session id> <version>
1151                  *  <network type> <address type> <address> */
1152
1153 #define GET_FIELD( store ) \
1154                 psz_eof = strchr( psz_parse, ' ' ); \
1155                 if( psz_eof ) \
1156                 { \
1157                     *psz_eof=0; store = strdup( psz_parse ); \
1158                 } \
1159                 else \
1160                 { \
1161                     if( i_field != 5 ) \
1162                     { \
1163                         b_invalid = VLC_TRUE; break; \
1164                     } \
1165                     else \
1166                     { \
1167                         store = strdup( psz_parse ); \
1168                     } \
1169                 }; \
1170                 psz_parse = psz_eof + 1; i_field++;
1171
1172
1173                 psz_parse = &psz_sdp[2];
1174                 GET_FIELD( p_sdp->psz_username );
1175                 GET_FIELD( psz_sess_id );
1176
1177                 p_sdp->i_session_id = atoll( psz_sess_id );
1178
1179                 FREE( psz_sess_id );
1180
1181                 GET_FIELD( psz_sess_id );
1182                 FREE( psz_sess_id );
1183
1184                 GET_FIELD( p_sdp->psz_network_type );
1185                 GET_FIELD( p_sdp->psz_address_type );
1186                 GET_FIELD( p_sdp->psz_address );
1187
1188                 break;
1189             }
1190             case( 'i' ):
1191             case( 'u' ):
1192             case( 'e' ):
1193             case( 'p' ):
1194             case( 't' ):
1195             case( 'r' ):
1196                 break;
1197             case( 'a' ): /* attribute */
1198             {
1199                 char *psz_eon = strchr( &psz_sdp[2], ':' );
1200                 attribute_t *p_attr = malloc( sizeof( attribute_t ) );
1201
1202                 /* Attribute with value */
1203                 if( psz_eon )
1204                 {
1205                     *psz_eon++ = '\0';
1206
1207                     p_attr->psz_field = strdup( &psz_sdp[2] );
1208                     p_attr->psz_value = strdup( psz_eon );
1209                 }
1210                 else /* Attribute without value */
1211                 {
1212                     p_attr->psz_field = strdup( &psz_sdp[2] );
1213                     p_attr->psz_value = NULL;
1214                 }
1215
1216                 TAB_APPEND( p_sdp->i_attributes, p_sdp->pp_attributes, p_attr );
1217                 break;
1218             }
1219
1220             case( 'm' ): /* Media announcement */
1221             {
1222                 /* If we have several medias, we pass the announcement to
1223                  * LIVE.COM, so just count them */
1224                 p_sdp->i_media++;
1225                 if( p_sdp->i_media == 1 )
1226                 {
1227                     p_sdp->psz_media = strdup( &psz_sdp[2] );
1228                 }
1229                 break;
1230             }
1231
1232             case( 'c' ):
1233             {
1234                 if( p_sdp->i_media > 1 )
1235                     break;
1236
1237                 p_sdp->psz_connection = strdup( &psz_sdp[2] );
1238                 break;
1239             }
1240
1241             default:
1242                break;
1243         }
1244
1245         if( b_invalid )
1246         {
1247             FreeSDP( p_sdp );
1248             return NULL;
1249         }
1250
1251         psz_sdp = psz_eol;
1252     }
1253
1254     return p_sdp;
1255 }
1256
1257
1258 static char *convert_from_utf8( struct services_discovery_t *p_sd,
1259                                 char *psz_unicode )
1260 {
1261     char *psz_local, *psz_in, *psz_out;
1262     size_t ret, i_in, i_out;
1263     vlc_bool_t b_warn = VLC_FALSE;
1264
1265     if( psz_unicode == NULL )
1266         return NULL;
1267
1268     psz_in = psz_unicode;
1269     i_in = strlen( psz_unicode );
1270
1271 #ifndef MB_CUR_MAX
1272     i_out = 6 * i_in;
1273 #else
1274     i_out = MB_CUR_MAX * i_in;
1275 #endif
1276     psz_local = malloc( i_out + 1 );
1277     if( psz_local == NULL )
1278         return NULL;
1279     psz_out = psz_local;
1280
1281     do
1282     {
1283         ret = vlc_iconv( p_sd->p_sys->iconvHandle,
1284                          &psz_in, &i_in, &psz_out, &i_out);
1285         if( i_in )
1286         {
1287             *psz_in = '?';
1288             b_warn = VLC_TRUE;
1289         }
1290         else
1291         if( ret == (size_t)(-1) )
1292         {
1293             msg_Err( p_sd, "character conversion failure : %s",
1294                      strerror( errno ) );
1295             free( psz_local );
1296             return NULL;
1297         }
1298     }
1299     while( i_in );
1300
1301     if( b_warn )
1302         msg_Warn( p_sd, "in \"%s\" : %s", psz_unicode,
1303                   strerror( errno ) );
1304
1305     *psz_out = '\0';
1306     return psz_local;
1307 }
1308
1309
1310 /***********************************************************************
1311  * ismult: returns true if we have a multicast address
1312  ***********************************************************************/
1313 static vlc_bool_t ismult( char *psz_uri )
1314 {
1315     char *psz_end;
1316     int  i_value;
1317
1318     /* IPv6 */
1319     if( psz_uri[0] == '[')
1320     {
1321       if( strncasecmp( &psz_uri[1], "FF0" , 3) ||
1322           ( !isalnum( psz_uri[1]) && strncasecmp( &psz_uri[2], "FF0" , 3) ) )
1323             return( VLC_TRUE );
1324         else
1325             return( VLC_FALSE );
1326     }
1327
1328     i_value = strtol( psz_uri, &psz_end, 0 );
1329
1330     if( *psz_end != '.' ) { return( VLC_FALSE ); }
1331
1332     return ( ( i_value < 224 ) || ( i_value >= 240 ) ) ? VLC_FALSE : VLC_TRUE;
1333 }
1334
1335 static int InitSocket( services_discovery_t *p_sd, char *psz_address,
1336                        int i_port )
1337 {
1338     int i_fd = net_OpenUDP( p_sd, psz_address, i_port, "", 0 );
1339
1340     if( i_fd != -1 )
1341     {
1342         INSERT_ELEM(  p_sd->p_sys->pi_fd, p_sd->p_sys->i_fd,
1343                       p_sd->p_sys->i_fd, i_fd );
1344         return VLC_SUCCESS;
1345     }
1346
1347     return VLC_EGENERIC;
1348 }
1349
1350 #ifdef HAVE_ZLIB_H
1351 static int Decompress( unsigned char *psz_src, unsigned char **_dst, int i_len )
1352 {
1353     int i_result, i_dstsize, n;
1354     unsigned char *psz_dst;
1355     z_stream d_stream;
1356
1357     d_stream.zalloc = (alloc_func)0;
1358     d_stream.zfree = (free_func)0;
1359     d_stream.opaque = (voidpf)0;
1360
1361     i_result = inflateInit(&d_stream);
1362     if( i_result != Z_OK )
1363     {
1364         printf( "inflateInit() failed. Result: %d\n", i_result );
1365         return( -1 );
1366     }
1367 #if 0
1368     p_playlist->pp_items[p_playlist->i_index]->b_autodeletion = VLC_TRUE;
1369     i_position = p_playlist->i_index;
1370
1371     /* Gather the complete sdp file */
1372     for( ;; )
1373     {
1374         int i_read = stream_Read( p_demux->s, &p_sdp[i_sdp], i_sdp_max - i_sdp - 1 );
1375 #endif
1376     d_stream.next_in = (Bytef *)psz_src;
1377     d_stream.avail_in = i_len;
1378     n = 0;
1379
1380     psz_dst = NULL;
1381
1382     do
1383     {
1384         n++;
1385         psz_dst = (unsigned char *)realloc( psz_dst, n * 1000 );
1386         d_stream.next_out = (Bytef *)&psz_dst[(n - 1) * 1000];
1387         d_stream.avail_out = 1000;
1388
1389         i_result = inflate(&d_stream, Z_NO_FLUSH);
1390         if( ( i_result != Z_OK ) && ( i_result != Z_STREAM_END ) )
1391         {
1392             printf( "Zlib decompression failed. Result: %d\n", i_result );
1393             return( -1 );
1394         }
1395     }
1396     while( ( d_stream.avail_out == 0 ) && ( d_stream.avail_in != 0 ) &&
1397            ( i_result != Z_STREAM_END ) );
1398
1399     i_dstsize = d_stream.total_out;
1400     inflateEnd( &d_stream );
1401
1402     *_dst = (unsigned char *)realloc( psz_dst, i_dstsize );
1403
1404     return i_dstsize;
1405 }
1406 #endif
1407
1408
1409 static void FreeSDP( sdp_t *p_sdp )
1410 {
1411     int i;
1412     FREE( p_sdp->psz_sdp );
1413     FREE( p_sdp->psz_sessionname );
1414     FREE( p_sdp->psz_connection );
1415     FREE( p_sdp->psz_media );
1416     FREE( p_sdp->psz_uri );
1417     FREE( p_sdp->psz_username );
1418     FREE( p_sdp->psz_network_type );
1419
1420     FREE( p_sdp->psz_address );
1421     FREE( p_sdp->psz_address_type );
1422
1423     for( i= p_sdp->i_attributes - 1; i >= 0 ; i-- )
1424     {
1425         struct attribute_t *p_attr = p_sdp->pp_attributes[i];
1426         FREE( p_sdp->pp_attributes[i]->psz_field );
1427         FREE( p_sdp->pp_attributes[i]->psz_value );
1428         REMOVE_ELEM( p_sdp->pp_attributes, p_sdp->i_attributes, i);
1429         FREE( p_attr );
1430     }
1431     free( p_sdp );
1432 }
1433
1434 static int RemoveAnnounce( services_discovery_t *p_sd,
1435                            sap_announce_t *p_announce )
1436 {
1437     int i;
1438
1439     if( p_announce->p_sdp ) FreeSDP( p_announce->p_sdp );
1440
1441     if( p_announce->i_item_id > -1 )
1442     {
1443         playlist_LockDelete( p_sd->p_sys->p_playlist, p_announce->i_item_id );
1444     }
1445
1446     for( i = 0; i< p_sd->p_sys->i_announces; i++)
1447     {
1448         if( p_sd->p_sys->pp_announces[i] == p_announce )
1449         {
1450             REMOVE_ELEM( p_sd->p_sys->pp_announces, p_sd->p_sys->i_announces,
1451                          i);
1452             break;
1453         }
1454     }
1455
1456     free( p_announce );
1457
1458     return VLC_SUCCESS;
1459 }
1460
1461 static vlc_bool_t IsSameSession( sdp_t *p_sdp1, sdp_t *p_sdp2 )
1462 {
1463     /* A session is identified by
1464      * username, session_id, network type, address type and address */
1465     if( p_sdp1->psz_username && p_sdp2->psz_username &&
1466         p_sdp1->psz_network_type && p_sdp2->psz_network_type &&
1467         p_sdp1->psz_address_type && p_sdp2->psz_address_type &&
1468         p_sdp1->psz_address &&  p_sdp2->psz_address )
1469     {
1470         if(!strcmp( p_sdp1->psz_username , p_sdp2->psz_username ) &&
1471            !strcmp( p_sdp1->psz_network_type , p_sdp2->psz_network_type ) &&
1472            !strcmp( p_sdp1->psz_address_type , p_sdp2->psz_address_type ) &&
1473            !strcmp( p_sdp1->psz_address , p_sdp2->psz_address ) &&
1474            p_sdp1->i_session_id == p_sdp2->i_session_id )
1475         {
1476             return VLC_TRUE;
1477         }
1478         else
1479         {
1480             return VLC_FALSE;
1481         }
1482     }
1483     else
1484     {
1485         return VLC_FALSE;
1486     }
1487 }
1488
1489
1490 static void CacheLoad( services_discovery_t *p_sd )
1491 {
1492     msg_Warn( p_sd, "Cache not implemented") ;
1493 }
1494
1495 static void CacheSave( services_discovery_t *p_sd )
1496 {
1497     msg_Warn( p_sd, "Cache not implemented") ;
1498 }