]> git.sesse.net Git - vlc/blob - modules/services_discovery/sap.c
Make Zorglub less unhappy
[vlc] / modules / services_discovery / sap.c
1 /*****************************************************************************
2  * sap.c :  SAP interface module
3  *****************************************************************************
4  * Copyright (C) 2004-2005 the VideoLAN team
5  * $Id$
6  *
7  * Authors: ClĂ©ment Stenac <zorglub@videolan.org>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 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 SAP_V6_1 "FF0"
70 /* Scope is inserted between them */
71 #define SAP_V6_2 "::2:7FFE"
72 /* See RFC3513 for list of valid scopes */
73 static const char ipv6_scopes[] = "12456789ABCDE";
74
75
76 /*****************************************************************************
77  * Module descriptor
78  *****************************************************************************/
79 #define SAP_ADDR_TEXT N_( "SAP multicast address" )
80 #define SAP_ADDR_LONGTEXT N_( "Listen for SAP announces on another address" )
81 #define SAP_IPV4_TEXT N_( "IPv4-SAP listening" )
82 #define SAP_IPV4_LONGTEXT N_( \
83       "Set this if you want the SAP module to listen to IPv4 announces " \
84       "on the standard address." )
85 #define SAP_IPV6_TEXT N_( "IPv6-SAP listening" )
86 #define SAP_IPV6_LONGTEXT N_( \
87       "Set this if you want the SAP module to listen to IPv6 announces " \
88       "on the standard address." )
89 #define SAP_SCOPE_TEXT N_( "IPv6 SAP scope" )
90 #define SAP_SCOPE_LONGTEXT N_( \
91        "Sets the scope for IPv6 announces (default is 8)." )
92 #define SAP_TIMEOUT_TEXT N_( "SAP timeout (seconds)" )
93 #define SAP_TIMEOUT_LONGTEXT N_( \
94        "Sets the time before SAP items get deleted if no new announce " \
95        "is received." )
96 #define SAP_PARSE_TEXT N_( "Try to parse the SAP" )
97 #define SAP_PARSE_LONGTEXT N_( \
98        "When SAP can it will try to parse the SAP. If you don't select " \
99        "this, all announces will be parsed by the livedotcom module." )
100 #define SAP_STRICT_TEXT N_( "SAP Strict mode" )
101 #define SAP_STRICT_LONGTEXT N_( \
102        "When this is set, the SAP parser will discard some non-compliant " \
103        "announces." )
104 #define SAP_CACHE_TEXT N_("Use SAP cache")
105 #define SAP_CACHE_LONGTEXT N_( \
106        "If this option is selected, a SAP caching mechanism will be used. " \
107        "This will result in lower SAP startup time, but you could end up " \
108         "with items corresponding to legacy streams." )
109
110 /* Callbacks */
111     static int  Open ( vlc_object_t * );
112     static void Close( vlc_object_t * );
113     static int  OpenDemux ( vlc_object_t * );
114     static void CloseDemux ( vlc_object_t * );
115
116 vlc_module_begin();
117     set_shortname( _("SAP"));
118     set_description( _("SAP announces") );
119     set_category( CAT_PLAYLIST );
120     set_subcategory( SUBCAT_PLAYLIST_SD );
121
122     add_string( "sap-addr", NULL, NULL,
123                 SAP_ADDR_TEXT, SAP_ADDR_LONGTEXT, VLC_TRUE );
124     add_bool( "sap-ipv4", 1 , NULL,
125                SAP_IPV4_TEXT,SAP_IPV4_LONGTEXT, VLC_TRUE );
126     add_bool( "sap-ipv6", 1 , NULL,
127               SAP_IPV6_TEXT, SAP_IPV6_LONGTEXT, VLC_TRUE );
128     add_integer( "sap-timeout", 1800, NULL,
129                  SAP_TIMEOUT_TEXT, SAP_TIMEOUT_LONGTEXT, VLC_TRUE );
130     add_bool( "sap-parse", 1 , NULL,
131                SAP_PARSE_TEXT,SAP_PARSE_LONGTEXT, VLC_TRUE );
132     add_bool( "sap-strict", 0 , NULL,
133                SAP_STRICT_TEXT,SAP_STRICT_LONGTEXT, VLC_TRUE );
134     add_bool( "sap-cache", 0 , NULL,
135                SAP_CACHE_TEXT,SAP_CACHE_LONGTEXT, VLC_TRUE );
136
137     set_capability( "services_discovery", 0 );
138     set_callbacks( Open, Close );
139
140     add_submodule();
141         set_description( _("SDP file parser for UDP") );
142         add_shortcut( "sdp" );
143         set_capability( "demux2", 51 );
144         set_callbacks( OpenDemux, CloseDemux );
145 vlc_module_end();
146
147
148 /*****************************************************************************
149  * Local structures
150  *****************************************************************************/
151
152 typedef struct sdp_t sdp_t;
153 typedef struct attribute_t attribute_t;
154 typedef struct sap_announce_t sap_announce_t;
155
156 /* The structure that contains sdp information */
157 struct  sdp_t
158 {
159     char *psz_sdp;
160
161     /* s= field */
162     char *psz_sessionname;
163
164     /* Raw m= and c= fields */
165     char *psz_connection;
166     char *psz_media;
167
168     /* o field */
169     char *psz_username;
170     char *psz_network_type;
171     char *psz_address_type;
172     char *psz_address;
173     int64_t i_session_id;
174
175     /* "computed" URI */
176     char *psz_uri;
177
178     int         i_in; /* IP version */
179
180     int           i_media;
181     int           i_media_type;
182
183     int           i_attributes;
184     attribute_t  **pp_attributes;
185 };
186
187 struct attribute_t
188 {
189     char *psz_field;
190     char *psz_value;
191 };
192
193 struct sap_announce_t
194 {
195     mtime_t i_last;
196
197     uint16_t    i_hash;
198     uint32_t    i_source[4];
199
200     /* SAP annnounces must only contain one SDP */
201     sdp_t       *p_sdp;
202
203     int i_item_id;
204 //    playlist_item_t *p_item;
205 };
206
207 struct services_discovery_sys_t
208 {
209     /* Socket descriptors */
210     int i_fd;
211     int *pi_fd;
212
213     /* playlist node */
214     playlist_item_t *p_node;
215     playlist_t *p_playlist;
216
217     /* charset conversion */
218     vlc_iconv_t iconvHandle;
219
220     /* Table of announces */
221     int i_announces;
222     struct sap_announce_t **pp_announces;
223
224     /* Modes */
225     vlc_bool_t  b_strict;
226     vlc_bool_t  b_parse;
227
228     int i_timeout;
229 };
230
231 struct demux_sys_t
232 {
233     sdp_t *p_sdp;
234 };
235
236 /*****************************************************************************
237  * Local prototypes
238  *****************************************************************************/
239
240
241 /* Main functions */
242     static int Demux( demux_t *p_demux );
243     static int Control( demux_t *, int, va_list );
244     static void Run    ( services_discovery_t *p_sd );
245
246 /* Main parsing functions */
247     static int ParseConnection( vlc_object_t *p_obj, sdp_t *p_sdp );
248     static int ParseSAP( services_discovery_t *p_sd, uint8_t *p_buffer, int i_read );
249     static sdp_t *  ParseSDP( vlc_object_t *p_sd, char* psz_sdp );
250     static sap_announce_t *CreateAnnounce( services_discovery_t *, uint16_t, sdp_t * );
251     static int RemoveAnnounce( services_discovery_t *p_sd, sap_announce_t *p_announce );
252
253 /* Cache */
254     static void CacheLoad( services_discovery_t *p_sd );
255     static void CacheSave( services_discovery_t *p_sd );
256 /* Helper functions */
257     static char *GetAttribute( sdp_t *p_sdp, const char *psz_search );
258     static vlc_bool_t IsSameSession( sdp_t *p_sdp1, sdp_t *p_sdp2 );
259     static char *convert_from_utf8( struct services_discovery_t *p_sd,
260                                    char *psz_unicode );
261     static int InitSocket( services_discovery_t *p_sd, char *psz_address, int i_port );
262 #ifdef HAVE_ZLIB_H
263     static int Decompress( unsigned char *psz_src, unsigned char **_dst, int i_len );
264 #endif
265     static void FreeSDP( sdp_t *p_sdp );
266
267 /* Detect multicast addresses */
268 static vlc_bool_t ismult( char * );
269
270 #define FREE( p ) \
271     if( p ) { free( p ); (p) = NULL; }
272 /*****************************************************************************
273  * Open: initialize and create stuff
274  *****************************************************************************/
275 static int Open( vlc_object_t *p_this )
276 {
277     services_discovery_t *p_sd = ( services_discovery_t* )p_this;
278     services_discovery_sys_t *p_sys  = (services_discovery_sys_t *)
279                                 malloc( sizeof( services_discovery_sys_t ) );
280
281     playlist_view_t     *p_view;
282     char                *psz_addr, *psz_charset;
283     vlc_value_t         val;
284
285     p_sys->i_timeout = var_CreateGetInteger( p_sd, "sap-timeout" );
286
287     vlc_current_charset( &psz_charset );
288     p_sys->iconvHandle = vlc_iconv_open( psz_charset, "UTF-8" );
289     free( psz_charset );
290     if( p_sys->iconvHandle == (vlc_iconv_t)(-1) )
291     {
292         msg_Err( p_sd, "unable to perform characters conversion" );
293         return VLC_EGENERIC;
294     }
295
296     p_sd->pf_run = Run;
297     p_sd->p_sys  = p_sys;
298
299     p_sys->pi_fd = NULL;
300     p_sys->i_fd = 0;
301
302     p_sys->b_strict = var_CreateGetInteger( p_sd, "sap-strict");
303     p_sys->b_parse = var_CreateGetInteger( p_sd, "sap-parse" );
304
305     if( var_CreateGetInteger( p_sd, "sap-cache" ) )
306     {
307         CacheLoad( p_sd );
308     }
309
310     if( var_CreateGetInteger( p_sd, "sap-ipv4" ) )
311     {
312         InitSocket( p_sd, SAP_V4_GLOBAL_ADDRESS, SAP_PORT );
313         InitSocket( p_sd, SAP_V4_ORG_ADDRESS, SAP_PORT );
314         InitSocket( p_sd, SAP_V4_LOCAL_ADDRESS, SAP_PORT );
315         InitSocket( p_sd, SAP_V4_LINK_ADDRESS, SAP_PORT );
316     }
317     if( var_CreateGetInteger( p_sd, "sap-ipv6" ) )
318     {
319         char psz_address[] = SAP_V6_1"0"SAP_V6_2;
320         const char *c_scope;
321
322         for( c_scope = ipv6_scopes; *c_scope; c_scope++ )
323         {
324             psz_address[sizeof(SAP_V6_1) - 1] = *c_scope;
325             InitSocket( p_sd, psz_address, SAP_PORT );
326         }
327     }
328
329     psz_addr = var_CreateGetString( p_sd, "sap-addr" );
330     if( psz_addr && *psz_addr )
331     {
332         InitSocket( p_sd, psz_addr, SAP_PORT );
333     }
334
335     if( p_sys->i_fd == 0 )
336     {
337         msg_Err( p_sd, "unable to read on any address" );
338         return VLC_EGENERIC;
339     }
340
341     /* Create our playlist node */
342     p_sys->p_playlist = (playlist_t *)vlc_object_find( p_sd,
343                                                        VLC_OBJECT_PLAYLIST,
344                                                        FIND_ANYWHERE );
345     if( !p_sys->p_playlist )
346     {
347         msg_Warn( p_sd, "unable to find playlist, cancelling SAP listening");
348         return VLC_EGENERIC;
349     }
350
351     p_view = playlist_ViewFind( p_sys->p_playlist, VIEW_CATEGORY );
352     p_sys->p_node = playlist_NodeCreate( p_sys->p_playlist, VIEW_CATEGORY,
353                                          _("SAP"), p_view->p_root );
354     p_sys->p_node->i_flags |= PLAYLIST_RO_FLAG;
355     p_sys->p_node->i_flags =~ PLAYLIST_SKIP_FLAG;
356     val.b_bool = VLC_TRUE;
357     var_Set( p_sys->p_playlist, "intf-change", val );
358
359     p_sys->i_announces = 0;
360     p_sys->pp_announces = NULL;
361
362     return VLC_SUCCESS;
363 }
364
365 /*****************************************************************************
366  * OpenDemux: initialize and create stuff
367  *****************************************************************************/
368 static int OpenDemux( vlc_object_t *p_this )
369 {
370     demux_t *p_demux = (demux_t *)p_this;
371     uint8_t *p_peek;
372     int i_max_sdp = 1024;
373     int i_sdp = 0;
374     char *psz_sdp = NULL;
375     sdp_t *p_sdp = NULL;
376
377     /* Probe for SDP */
378     if( p_demux->s )
379     {
380         if( stream_Peek( p_demux->s, &p_peek, 7 ) < 7 ) return VLC_EGENERIC;
381
382         if( strncmp( (char*)p_peek, "v=0\r\n", 5 ) &&
383             strncmp( (char*)p_peek, "v=0\n", 4 ) &&
384             ( p_peek[0] < 'a' || p_peek[0] > 'z' || p_peek[1] != '=' ) )
385         {
386             return VLC_EGENERIC;
387         }
388     }
389
390     psz_sdp = (char *)malloc( i_max_sdp );
391     if( !psz_sdp ) return VLC_EGENERIC;
392
393     /* Gather the complete sdp file */
394     for( ;; )
395     {
396         int i_read = stream_Read( p_demux->s,
397                                   &psz_sdp[i_sdp], i_max_sdp - i_sdp - 1 );
398
399         if( i_read < 0 )
400         {
401             msg_Err( p_demux, "failed to read SDP" );
402             goto error;
403         }
404
405         i_sdp += i_read;
406
407         if( i_read < i_max_sdp - i_sdp - 1 )
408         {
409             psz_sdp[i_sdp] = '\0';
410             break;
411         }
412
413         i_max_sdp += 1000;
414         psz_sdp = (uint8_t*)realloc( psz_sdp, i_max_sdp );
415     }
416
417     p_sdp = ParseSDP( VLC_OBJECT(p_demux), psz_sdp );
418
419     if( !p_sdp )
420     {
421         msg_Warn( p_demux, "invalid SDP");
422         goto error;
423     }
424
425     if( p_sdp->i_media > 1 )
426     {
427         goto error;
428     }
429
430     if( ParseConnection( VLC_OBJECT( p_demux ), p_sdp ) )
431     {
432         p_sdp->psz_uri = NULL;
433     }
434     if( p_sdp->i_media_type != 33 && p_sdp->i_media_type != 32 &&
435         p_sdp->i_media_type != 14 )
436         goto error;
437
438     if( p_sdp->psz_uri == NULL ) goto error;
439
440     p_demux->p_sys = (demux_sys_t *)malloc( sizeof(demux_sys_t) );
441     p_demux->p_sys->p_sdp = p_sdp;
442     p_demux->pf_control = Control;
443     p_demux->pf_demux = Demux;
444
445     free( psz_sdp );
446     return VLC_SUCCESS;
447
448 error:
449     free( psz_sdp );
450     if( p_sdp ) FreeSDP( p_sdp );
451     stream_Seek( p_demux->s, 0 );
452     return VLC_EGENERIC;    
453 }
454
455 /*****************************************************************************
456  * Close:
457  *****************************************************************************/
458 static void Close( vlc_object_t *p_this )
459 {
460     services_discovery_t *p_sd = ( services_discovery_t* )p_this;
461     services_discovery_sys_t    *p_sys  = p_sd->p_sys;
462
463     int i;
464
465     for( i = p_sys->i_fd-1 ; i >= 0 ; i-- )
466     {
467         net_Close( p_sys->pi_fd[i] );
468     }
469     FREE( p_sys->pi_fd );
470
471     if( config_GetInt( p_sd, "sap-cache" ) )
472     {
473         CacheSave( p_sd );
474     }
475
476     for( i = p_sys->i_announces  - 1;  i>= 0; i-- )
477     {
478         RemoveAnnounce( p_sd, p_sys->pp_announces[i] );
479     }
480     FREE( p_sys->pp_announces );
481
482     if( p_sys->p_playlist )
483     {
484         playlist_NodeDelete( p_sys->p_playlist, p_sys->p_node, VLC_TRUE,
485                              VLC_TRUE );
486         vlc_object_release( p_sys->p_playlist );
487     }
488
489     vlc_iconv_close( p_sys->iconvHandle );
490
491     free( p_sys );
492 }
493
494 /*****************************************************************************
495  * CloseDemux: Close the demuxer
496  *****************************************************************************/
497 static void CloseDemux( vlc_object_t *p_this )
498 {
499
500 }
501
502 /*****************************************************************************
503  * Run: main SAP thread
504  *****************************************************************************
505  * Listens to SAP packets, and sends them to packet_handle
506  *****************************************************************************/
507 #define MAX_SAP_BUFFER 5000
508
509 static void Run( services_discovery_t *p_sd )
510 {
511     int i;
512
513     /* read SAP packets */
514     while( !p_sd->b_die )
515     {
516         int i_read;
517         uint8_t p_buffer[MAX_SAP_BUFFER+1];
518
519         i_read = net_Select( p_sd, p_sd->p_sys->pi_fd, NULL,
520                              p_sd->p_sys->i_fd, p_buffer,
521                              MAX_SAP_BUFFER, 500000 );
522
523         /* Check for items that need deletion */
524         for( i = 0; i < p_sd->p_sys->i_announces; i++ )
525         {
526             mtime_t i_timeout = ( mtime_t ) 1000000 * p_sd->p_sys->i_timeout;
527
528             if( mdate() - p_sd->p_sys->pp_announces[i]->i_last > i_timeout )
529             {
530                 struct sap_announce_t *p_announce;
531                 p_announce = p_sd->p_sys->pp_announces[i];
532
533                 /* Remove the playlist item */
534                 playlist_LockDelete( p_sd->p_sys->p_playlist,
535                                      p_announce->i_item_id );
536
537                 /* Remove the sap_announce from the array */
538                 REMOVE_ELEM( p_sd->p_sys->pp_announces,
539                            p_sd->p_sys->i_announces, i );
540
541                 free( p_announce );
542             }
543         }
544
545         /* Minimum length is > 6 */
546         if( i_read <= 6 )
547         {
548             if( i_read < 0 )
549             {
550                 msg_Warn( p_sd, "socket read error" );
551             }
552             continue;
553         }
554
555         p_buffer[i_read] = '\0';
556
557         /* Parse the packet */
558         ParseSAP( p_sd, p_buffer, i_read );
559     }
560 }
561
562 /**********************************************************************
563  * Demux: reads and demuxes data packets
564  * Return -1 if error, 0 if EOF, 1 else
565  **********************************************************************/
566 static int Demux( demux_t *p_demux )
567 {
568     sdp_t *p_sdp = p_demux->p_sys->p_sdp;
569     playlist_t *p_playlist;
570
571     p_playlist = (playlist_t *)vlc_object_find( p_demux, VLC_OBJECT_PLAYLIST,
572                                                FIND_ANYWHERE );
573
574     p_playlist->status.p_item->i_flags |= PLAYLIST_DEL_FLAG;
575
576     playlist_Add( p_playlist, p_sdp->psz_uri, p_sdp->psz_sessionname,
577                  PLAYLIST_APPEND, PLAYLIST_END );
578
579     vlc_object_release( p_playlist );
580     if( p_sdp ) FreeSDP( p_sdp );
581
582     return VLC_SUCCESS;
583 }
584
585 static int Control( demux_t *p_demux, int i_query, va_list args )
586 {
587     return VLC_EGENERIC;
588 }
589
590 /**************************************************************
591  * Local functions
592  **************************************************************/
593
594 /* i_read is at least > 6 */
595 static int ParseSAP( services_discovery_t *p_sd, uint8_t *p_buffer, int i_read )
596 {
597     int                 i_version, i_address_type, i_hash, i;
598     uint8_t             *psz_sdp;
599     uint8_t             *psz_initial_sdp;
600     sdp_t               *p_sdp;
601     vlc_bool_t          b_compressed;
602     vlc_bool_t          b_need_delete = VLC_FALSE;
603 #ifdef HAVE_ZLIB_H
604     int                 i_decompressed_size;
605     uint8_t             *p_decompressed_buffer;
606 #endif
607     uint8_t             *psz_foo;
608
609     /* First, check the sap announce is correct */
610     i_version = p_buffer[0] >> 5;
611     if( i_version != 1 )
612     {
613        msg_Dbg( p_sd, "strange sap version %d found", i_version );
614     }
615
616     i_address_type = p_buffer[0] & 0x10;
617
618     if( (p_buffer[0] & 0x08) != 0 )
619     {
620         msg_Dbg( p_sd, "reserved bit incorrectly set" );
621         return VLC_EGENERIC;
622     }
623
624     if( (p_buffer[0] & 0x04) != 0 )
625     {
626         msg_Dbg( p_sd, "session deletion packet" );
627         b_need_delete = VLC_TRUE;
628     }
629
630     if( p_buffer[0] & 0x02  )
631     {
632         msg_Dbg( p_sd, "encrypted packet, unsupported" );
633         return VLC_EGENERIC;
634     }
635
636     b_compressed = p_buffer[0] & 0x01;
637
638     i_hash = ( p_buffer[2] << 8 ) + p_buffer[3];
639
640     if( p_sd->p_sys->b_strict && i_hash == 0 )
641     {
642         msg_Dbg( p_sd, "strict mode, discarding announce with null id hash");
643         return VLC_EGENERIC;
644     }
645
646     psz_sdp  = &p_buffer[4];
647     psz_initial_sdp = psz_sdp;
648
649     if( i_address_type == 0 ) /* ipv4 source address */
650     {
651         psz_sdp += 4;
652         if( i_read <= 9 )
653         {
654             msg_Warn( p_sd, "too short SAP packet\n" );
655             return VLC_EGENERIC;
656         }
657     }
658     else /* ipv6 source address */
659     {
660         psz_sdp += 16;
661         if( i_read <= 21 )
662         {
663             msg_Warn( p_sd, "too short SAP packet\n" );
664             return VLC_EGENERIC;
665         }
666     }
667
668     if( b_compressed )
669     {
670 #ifdef HAVE_ZLIB_H
671         i_decompressed_size = Decompress( psz_sdp,
672                    &p_decompressed_buffer,i_read - ( psz_sdp - p_buffer ) );
673         if( i_decompressed_size > 0 && i_decompressed_size < MAX_SAP_BUFFER )
674         {
675             memcpy( psz_sdp, p_decompressed_buffer, i_decompressed_size );
676             psz_sdp[i_decompressed_size] = '\0';
677             free( p_decompressed_buffer );
678         }
679 #else
680         msg_Warn( p_sd, "Ignoring compressed sap packet" );
681         return VLC_EGENERIC;
682 #endif
683     }
684
685     /* Add the size of authentification info */
686     if( i_read < p_buffer[1] + (psz_sdp - psz_initial_sdp ) )
687     {
688         msg_Warn( p_sd, "too short SAP packet\n");
689         return VLC_EGENERIC;
690     }
691     psz_sdp += p_buffer[1];
692     psz_foo = psz_sdp;
693
694     /* Skip payload type */
695     /* Handle announces without \0 between SAP and SDP */
696     while( *psz_sdp != '\0' && ( psz_sdp[0] != 'v' && psz_sdp[1] != '=' ) )
697     {
698         if( psz_sdp - psz_initial_sdp >= i_read - 5 )
699         {
700             msg_Warn( p_sd, "empty SDP ?");
701         }
702         psz_sdp++;
703     }
704
705     if( *psz_sdp == '\0' )
706     {
707         psz_sdp++;
708     }
709     if( psz_sdp != psz_foo && strcasecmp( psz_foo, "application/sdp" ) )
710     {
711         msg_Dbg( p_sd, "unhandled content type: %s", psz_foo );        
712     }
713     if( psz_sdp -p_buffer >= i_read )
714     {
715         msg_Warn( p_sd, "package without content" );
716         return VLC_EGENERIC;
717     }
718
719     /* Parse SDP info */
720     p_sdp = ParseSDP( VLC_OBJECT(p_sd), psz_sdp );
721
722     if( p_sdp == NULL )
723     {
724         return VLC_EGENERIC;
725     }
726
727     /* Decide whether we should add a playlist item for this SDP */
728     /* Parse connection information (c= & m= ) */
729     if( ParseConnection( VLC_OBJECT(p_sd), p_sdp ) )
730     {
731         p_sdp->psz_uri = NULL;
732     }
733
734     /* Multi-media or no-parse -> pass to LIVE.COM */
735     if( p_sdp->i_media > 1 || ( p_sdp->i_media_type != 14 &&
736                                 p_sdp->i_media_type != 32 &&
737                                 p_sdp->i_media_type != 33) ||
738         p_sd->p_sys->b_parse == VLC_FALSE )
739     {
740         if( p_sdp->psz_uri ) free( p_sdp->psz_uri );
741         asprintf( &p_sdp->psz_uri, "sdp://%s", p_sdp->psz_sdp );
742     }
743
744     if( p_sdp->psz_uri == NULL ) return VLC_EGENERIC;
745
746     for( i = 0 ; i< p_sd->p_sys->i_announces ; i++ )
747     {
748         /* FIXME: slow */
749         /* FIXME: we create a new announce each time the sdp changes */
750         if( IsSameSession( p_sd->p_sys->pp_announces[i]->p_sdp, p_sdp ) )
751         {
752             if( b_need_delete )
753             {
754                 RemoveAnnounce( p_sd, p_sd->p_sys->pp_announces[i]);
755                 return VLC_SUCCESS;
756             }
757             else
758             {
759                 p_sd->p_sys->pp_announces[i]->i_last = mdate();
760                 FreeSDP( p_sdp );
761                 return VLC_SUCCESS;
762             }
763         }
764     }
765     /* Add item */
766     if( p_sdp->i_media > 1 )
767     {
768         msg_Dbg( p_sd, "passing to LIVE.COM" );
769     }
770
771     CreateAnnounce( p_sd, i_hash, p_sdp );
772
773     return VLC_SUCCESS;
774 }
775
776 sap_announce_t *CreateAnnounce( services_discovery_t *p_sd, uint16_t i_hash,
777                                 sdp_t *p_sdp )
778 {
779     playlist_item_t     *p_item, *p_child;
780     char                *psz_value;
781     sap_announce_t *p_sap = (sap_announce_t *)malloc(
782                                         sizeof(sap_announce_t ) );
783
784     psz_value = convert_from_utf8( p_sd, p_sdp->psz_sessionname );
785     if( p_sap == NULL || psz_value == NULL )
786     {
787         FREE( p_sap );
788         FREE( psz_value );
789         return NULL;
790     }
791     p_sap->i_last = mdate();
792     p_sap->i_hash = i_hash;
793     p_sap->p_sdp = p_sdp;
794     p_sap->i_item_id = -1;
795
796     /* Create the playlist item here */
797     p_item = playlist_ItemNew( p_sd, p_sap->p_sdp->psz_uri, psz_value );
798     free( psz_value );
799
800     if( !p_item )
801     {
802         free( p_sap );
803         return NULL;
804     }
805
806     psz_value = GetAttribute( p_sap->p_sdp, "tool" );
807     if( psz_value != NULL )
808     {
809         vlc_input_item_AddInfo( &p_item->input, _("Session"),
810                                 _("Tool"), psz_value );
811     }
812     if( strcmp( p_sdp->psz_username, "-" ) )
813     {
814         vlc_input_item_AddInfo( &p_item->input, _("Session"),
815                                 _("User"), p_sdp->psz_username );
816     }
817
818     psz_value = GetAttribute( p_sap->p_sdp, "x-plgroup" );
819
820     if( psz_value == NULL )
821     {
822         psz_value = GetAttribute( p_sap->p_sdp, "plgroup" );
823     }
824
825     if( psz_value != NULL )
826     {
827         char *psz_grp = convert_from_utf8( p_sd, psz_value );
828
829         if( psz_grp != NULL )
830         {
831             p_child = playlist_ChildSearchName( p_sd->p_sys->p_node,
832                                                 psz_grp );
833
834             if( p_child == NULL )
835             {
836                 p_child = playlist_NodeCreate( p_sd->p_sys->p_playlist,
837                                                VIEW_CATEGORY, psz_grp,
838                                                p_sd->p_sys->p_node );
839                 p_child->i_flags =~ PLAYLIST_SKIP_FLAG;
840             }
841             free( psz_grp );
842         }
843         else
844         {
845             msg_Err( p_sd, "out of memory");
846             free( p_sap );
847             return NULL;
848         }
849     }
850     else
851     {
852         p_child = p_sd->p_sys->p_node;
853     }
854
855     p_item->i_flags &= ~PLAYLIST_SKIP_FLAG;
856     p_item->i_flags &= ~PLAYLIST_SAVE_FLAG;
857
858     playlist_NodeAddItem( p_sd->p_sys->p_playlist, p_item, VIEW_CATEGORY,
859                               p_child, PLAYLIST_APPEND, PLAYLIST_END );
860
861     p_sap->i_item_id = p_item->input.i_id;
862
863     TAB_APPEND( p_sd->p_sys->i_announces,
864                 p_sd->p_sys->pp_announces, p_sap );
865
866     return p_sap;
867 }
868
869 static char *GetAttribute( sdp_t *p_sdp, const char *psz_search )
870 {
871     int i;
872
873     for( i = 0 ; i< p_sdp->i_attributes; i++ )
874     {
875         if( !strncmp( p_sdp->pp_attributes[i]->psz_field, psz_search,
876                       strlen( p_sdp->pp_attributes[i]->psz_field ) ) )
877         {
878             return p_sdp->pp_attributes[i]->psz_value;
879         }
880     }
881     return NULL;
882 }
883
884
885 /* Fill p_sdp->psz_uri */
886 static int ParseConnection( vlc_object_t *p_obj, sdp_t *p_sdp )
887 {
888     char *psz_eof;
889     char *psz_parse;
890     char *psz_uri = NULL;
891     char *psz_proto = NULL;
892     int i_port = 0;
893
894     /* Parse c= field */
895     if( p_sdp->psz_connection )
896     {
897         psz_parse = p_sdp->psz_connection;
898
899         psz_eof = strchr( psz_parse, ' ' );
900
901         if( psz_eof )
902         {
903             *psz_eof = '\0';
904             psz_parse = psz_eof + 1;
905         }
906         else
907         {
908             msg_Warn( p_obj, "unable to parse c field (1)");
909             return VLC_EGENERIC;
910         }
911
912         psz_eof = strchr( psz_parse, ' ' );
913
914         if( psz_eof )
915         {
916             *psz_eof = '\0';
917             if( !strncmp( psz_parse, "IP4", 3 ) )
918             {
919                 p_sdp->i_in = 4;
920             }
921             else if( !strncmp( psz_parse, "IP6", 3 ) )
922             {
923                 p_sdp->i_in = 6;
924             }
925             else
926             {
927                 p_sdp->i_in = 0;
928             }
929             psz_parse = psz_eof + 1;
930         }
931         else
932         {
933             msg_Warn( p_obj, "unable to parse c field (2)");
934             return VLC_EGENERIC;
935         }
936
937         psz_eof = strchr( psz_parse, '/' );
938
939         if( psz_eof )
940         {
941             *psz_eof = 0;
942         }
943         else
944         {
945             msg_Dbg( p_obj, "incorrect c field, %s", p_sdp->psz_connection );
946         }
947         psz_uri = strdup( psz_parse );
948
949     }
950
951     /* Parse m= field */
952     if( p_sdp->psz_media )
953     {
954         psz_parse = p_sdp->psz_media;
955
956         psz_eof = strchr( psz_parse, ' ' );
957
958         if( psz_eof )
959         {
960             *psz_eof = '\0';
961
962             if( strncmp( psz_parse, "audio", 5 )  &&
963                 strncmp( psz_parse, "video",5 ) )
964             {
965                 msg_Warn( p_obj, "unhandled media type -%s-", psz_parse );
966                 FREE( psz_uri );
967                 return VLC_EGENERIC;
968             }
969
970             psz_parse = psz_eof + 1;
971         }
972         else
973         {
974             msg_Warn( p_obj, "unable to parse m field (1)");
975             FREE( psz_uri );
976             return VLC_EGENERIC;
977         }
978
979         psz_eof = strchr( psz_parse, ' ' );
980
981         if( psz_eof )
982         {
983             *psz_eof = '\0';
984
985             /* FIXME : multiple port ! */
986             i_port = atoi( psz_parse );
987
988             if( i_port <= 0 || i_port >= 65536 )
989             {
990                 msg_Warn( p_obj, "invalid transport port %i", i_port );
991             }
992
993             psz_parse = psz_eof + 1;
994         }
995         else
996         {
997             msg_Warn( p_obj, "unable to parse m field (2)");
998             FREE( psz_uri );
999             return VLC_EGENERIC;
1000         }
1001
1002         psz_eof = strchr( psz_parse, ' ' );
1003
1004         if( psz_eof )
1005         {
1006             *psz_eof = '\0';
1007             psz_proto = strdup( psz_parse );
1008
1009             psz_parse = psz_eof + 1;
1010             p_sdp->i_media_type = atoi( psz_parse );
1011             
1012         }
1013         else
1014         {
1015             msg_Dbg( p_obj, "incorrect m field, %s", p_sdp->psz_media );
1016             p_sdp->i_media_type = 33;
1017             psz_proto = strdup( psz_parse );
1018         }
1019     }
1020
1021     if( psz_proto && !strncmp( psz_proto, "RTP/AVP", 7 ) )
1022     {
1023         free( psz_proto );
1024         psz_proto = strdup( "rtp" );
1025     }
1026     if( psz_proto && !strncasecmp( psz_proto, "UDP", 3 ) )
1027     {
1028         free( psz_proto );
1029         psz_proto = strdup( "udp" );
1030     }
1031
1032     /* FIXME: HTTP support */
1033
1034     if( i_port == 0 )
1035     {
1036         i_port = 1234;
1037     }
1038
1039     if( ismult( psz_uri ) )
1040     {
1041         asprintf( &p_sdp->psz_uri, "%s://@%s:%i", psz_proto, psz_uri, i_port );
1042     }
1043     else
1044     {
1045         asprintf( &p_sdp->psz_uri, "%s://%s:%i", psz_proto, psz_uri, i_port );
1046     }
1047     FREE( psz_uri );
1048     FREE( psz_proto );
1049     return VLC_SUCCESS;
1050 }
1051
1052 /***********************************************************************
1053  * ParseSDP : SDP parsing
1054  * *********************************************************************
1055  * Validate SDP and parse all fields
1056  ***********************************************************************/
1057 static sdp_t *  ParseSDP( vlc_object_t *p_obj, char* psz_sdp )
1058 {
1059     sdp_t *p_sdp;
1060     vlc_bool_t b_invalid = VLC_FALSE;
1061     vlc_bool_t b_end = VLC_FALSE;
1062     if( psz_sdp == NULL )
1063     {
1064         return NULL;
1065     }
1066
1067     if( psz_sdp[0] != 'v' || psz_sdp[1] != '=' )
1068     {
1069         msg_Warn( p_obj, "Bad packet" );
1070         return NULL;
1071     }
1072
1073     p_sdp = (sdp_t *)malloc( sizeof( sdp_t ) );
1074     if( p_sdp == NULL )
1075         return NULL;
1076
1077     p_sdp->psz_sdp = strdup( psz_sdp );
1078     if( p_sdp->psz_sdp == NULL )
1079     {
1080         free( p_sdp );
1081         return NULL;
1082     }
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             FreeSDP( p_sdp );
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         net_StopSend( i_fd );
1336         INSERT_ELEM(  p_sd->p_sys->pi_fd, p_sd->p_sys->i_fd,
1337                       p_sd->p_sys->i_fd, i_fd );
1338         return VLC_SUCCESS;
1339     }
1340
1341     return VLC_EGENERIC;
1342 }
1343
1344 #ifdef HAVE_ZLIB_H
1345 static int Decompress( unsigned char *psz_src, unsigned char **_dst, int i_len )
1346 {
1347     int i_result, i_dstsize, n;
1348     unsigned char *psz_dst;
1349     z_stream d_stream;
1350
1351     d_stream.zalloc = (alloc_func)0;
1352     d_stream.zfree = (free_func)0;
1353     d_stream.opaque = (voidpf)0;
1354
1355     i_result = inflateInit(&d_stream);
1356     if( i_result != Z_OK )
1357     {
1358         printf( "inflateInit() failed. Result: %d\n", i_result );
1359         return( -1 );
1360     }
1361 #if 0
1362     p_playlist->pp_items[p_playlist->i_index]->b_autodeletion = VLC_TRUE;
1363     i_position = p_playlist->i_index;
1364
1365     /* Gather the complete sdp file */
1366     for( ;; )
1367     {
1368         int i_read = stream_Read( p_demux->s, &p_sdp[i_sdp], i_sdp_max - i_sdp - 1 );
1369 #endif
1370     d_stream.next_in = (Bytef *)psz_src;
1371     d_stream.avail_in = i_len;
1372     n = 0;
1373
1374     psz_dst = NULL;
1375
1376     do
1377     {
1378         n++;
1379         psz_dst = (unsigned char *)realloc( psz_dst, n * 1000 );
1380         d_stream.next_out = (Bytef *)&psz_dst[(n - 1) * 1000];
1381         d_stream.avail_out = 1000;
1382
1383         i_result = inflate(&d_stream, Z_NO_FLUSH);
1384         if( ( i_result != Z_OK ) && ( i_result != Z_STREAM_END ) )
1385         {
1386             printf( "Zlib decompression failed. Result: %d\n", i_result );
1387             return( -1 );
1388         }
1389     }
1390     while( ( d_stream.avail_out == 0 ) && ( d_stream.avail_in != 0 ) &&
1391            ( i_result != Z_STREAM_END ) );
1392
1393     i_dstsize = d_stream.total_out;
1394     inflateEnd( &d_stream );
1395
1396     *_dst = (unsigned char *)realloc( psz_dst, i_dstsize );
1397
1398     return i_dstsize;
1399 }
1400 #endif
1401
1402
1403 static void FreeSDP( sdp_t *p_sdp )
1404 {
1405     int i;
1406     FREE( p_sdp->psz_sdp );
1407     FREE( p_sdp->psz_sessionname );
1408     FREE( p_sdp->psz_connection );
1409     FREE( p_sdp->psz_media );
1410     FREE( p_sdp->psz_uri );
1411     FREE( p_sdp->psz_username );
1412     FREE( p_sdp->psz_network_type );
1413
1414     FREE( p_sdp->psz_address );
1415     FREE( p_sdp->psz_address_type );
1416
1417     for( i= p_sdp->i_attributes - 1; i >= 0 ; i-- )
1418     {
1419         struct attribute_t *p_attr = p_sdp->pp_attributes[i];
1420         FREE( p_sdp->pp_attributes[i]->psz_field );
1421         FREE( p_sdp->pp_attributes[i]->psz_value );
1422         REMOVE_ELEM( p_sdp->pp_attributes, p_sdp->i_attributes, i);
1423         FREE( p_attr );
1424     }
1425     free( p_sdp );
1426 }
1427
1428 static int RemoveAnnounce( services_discovery_t *p_sd,
1429                            sap_announce_t *p_announce )
1430 {
1431     int i;
1432
1433     if( p_announce->p_sdp ) FreeSDP( p_announce->p_sdp );
1434
1435     if( p_announce->i_item_id > -1 )
1436     {
1437         playlist_LockDelete( p_sd->p_sys->p_playlist, p_announce->i_item_id );
1438     }
1439
1440     for( i = 0; i< p_sd->p_sys->i_announces; i++)
1441     {
1442         if( p_sd->p_sys->pp_announces[i] == p_announce )
1443         {
1444             REMOVE_ELEM( p_sd->p_sys->pp_announces, p_sd->p_sys->i_announces,
1445                          i);
1446             break;
1447         }
1448     }
1449
1450     free( p_announce );
1451
1452     return VLC_SUCCESS;
1453 }
1454
1455 static vlc_bool_t IsSameSession( sdp_t *p_sdp1, sdp_t *p_sdp2 )
1456 {
1457     /* A session is identified by
1458      * username, session_id, network type, address type and address */
1459     if( p_sdp1->psz_username && p_sdp2->psz_username &&
1460         p_sdp1->psz_network_type && p_sdp2->psz_network_type &&
1461         p_sdp1->psz_address_type && p_sdp2->psz_address_type &&
1462         p_sdp1->psz_address &&  p_sdp2->psz_address )
1463     {
1464         if(!strcmp( p_sdp1->psz_username , p_sdp2->psz_username ) &&
1465            !strcmp( p_sdp1->psz_network_type , p_sdp2->psz_network_type ) &&
1466            !strcmp( p_sdp1->psz_address_type , p_sdp2->psz_address_type ) &&
1467            !strcmp( p_sdp1->psz_address , p_sdp2->psz_address ) &&
1468            p_sdp1->i_session_id == p_sdp2->i_session_id )
1469         {
1470             return VLC_TRUE;
1471         }
1472         else
1473         {
1474             return VLC_FALSE;
1475         }
1476     }
1477     else
1478     {
1479         return VLC_FALSE;
1480     }
1481 }
1482
1483
1484 static void CacheLoad( services_discovery_t *p_sd )
1485 {
1486     msg_Warn( p_sd, "Cache not implemented") ;
1487 }
1488
1489 static void CacheSave( services_discovery_t *p_sd )
1490 {
1491     msg_Warn( p_sd, "Cache not implemented") ;
1492 }