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