1 /*****************************************************************************
2 * announce.c : Session announcement
3 *****************************************************************************
4 * Copyright (C) 2002 VideoLAN
6 * Authors: Clément Stenac <zorglub@via.ecp.fr>
7 * Damien Lucas <nitrox@via.ecp.fr>
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.
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.
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 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
27 #include <stdlib.h> /* free() */
28 #include <stdio.h> /* sprintf() */
29 #include <string.h> /* strerror() */
43 #define SAP_IPV4_ADDR "224.2.127.254" /* Standard port and address for SAP */
46 #define SAP_IPV6_ADDR_1 "FF0"
47 #define SAP_IPV6_ADDR_2 "::2:7FFE"
49 #define DEFAULT_PORT "1234"
51 /****************************************************************************
52 * Split : split a string into two parts: the one which is before the delim
53 * and the one which is after.
54 * NULL is returned if delim is not found
55 ****************************************************************************/
57 static char * split( char *psz_in, char *psz_out1, char *psz_out2, char delim)
59 unsigned int i_count = 0; /*pos in input string*/
60 unsigned int i_pos1 = 0; /*pos in out2 string */
61 unsigned int i_pos2 = 0;
62 char *psz_cur; /*store the pos of the first delim found */
64 /*skip spaces at the beginning*/
65 while(psz_in[i_count] == ' ' && i_count < strlen(psz_in))
69 if(i_count == strlen(psz_in))
73 while(psz_in[i_count] != delim && i_count < strlen(psz_in))
75 psz_out1[i_pos1] = psz_in[i_count];
79 /* Mark the end of out1 */
82 if(i_count == strlen(psz_in))
85 /*store pos of the first delim*/
86 psz_cur = &psz_in[i_count];
90 /*skip all delim and all spaces*/
91 while( (psz_in[i_count] == ' ' ||
92 psz_in[i_count] == delim)
93 && i_count < strlen(psz_in))
98 if(i_count == strlen(psz_in))
101 /*Store the second string*/
102 while(i_count < strlen(psz_in))
104 psz_out2[i_pos2] = psz_in[i_count];
108 psz_out2[i_pos2] = 0;
113 /*****************************************************************************
114 * sout_SAPNew: Creates a SAP Session
115 *****************************************************************************/
116 sap_session_t * sout_SAPNew ( sout_instance_t *p_sout,
118 char * psz_name_arg, int ip_version,
119 char * psz_v6_scope )
121 sap_session_t *p_new; /* The SAP structure */
122 module_t *p_network; /* Network module */
123 network_socket_t socket_desc; /* Socket descriptor */
124 char psz_network[6]; /* IPv4 or IPv6 */
125 char *sap_ipv6_addr=NULL; /* IPv6 built address */
126 char *psz_eol; /* Used to parse IPv6 URIs */
127 int i_port; /* Port in numerical format */
129 /* Allocate the SAP structure */
130 p_new = (sap_session_t *) malloc( sizeof ( sap_session_t ) ) ;
133 msg_Err( p_sout, "out of memory" );
137 /* Fill the information in the structure */
138 if( strstr( psz_url_arg, "[" ) )
139 { /* We have an IPv6 address. Do not use ':' as the port separator */
140 psz_eol = strchr( psz_url_arg, ']' );
141 if( !psz_eol ) /* No matching ] ! Aborting */
143 msg_Warn( p_sout, "no matching ], unable to parse URI");
148 sprintf( p_new->psz_url, "%s", psz_url_arg );
149 sprintf( p_new->psz_port, "%s", DEFAULT_PORT );
154 sprintf( p_new->psz_url, "%s", psz_url_arg );
158 sprintf( p_new->psz_port, "%s", psz_eol );
164 split( psz_url_arg, p_new->psz_url, p_new->psz_port, ':' );
167 /* Check if we have a port */
168 if( !strlen( p_new->psz_port ) )
170 sprintf( p_new->psz_port, "%s", DEFAULT_PORT );
173 /* Make sure our port is valid and atoi it*/
174 i_port = atoi( p_new->psz_port );
178 sprintf( p_new->psz_port, "%s", DEFAULT_PORT );
182 sprintf( p_new->psz_port, "%i", i_port );
185 /* The name that we send */
186 sprintf( p_new->psz_name, "%s", psz_name_arg );
188 p_new->i_ip_version = ip_version;
190 /* Only "6" triggers IPv6. IPv4 is default */
191 if( ip_version != 6 )
193 msg_Dbg( p_sout, "creating IPv4 SAP socket" );
195 /* Fill the socket descriptor */
196 socket_desc.i_type = NETWORK_UDP;
197 socket_desc.psz_bind_addr = "";
198 socket_desc.i_bind_port = 0;
199 socket_desc.psz_server_addr = SAP_IPV4_ADDR;
200 socket_desc.i_server_port = SAP_PORT;
201 socket_desc.i_handle = 0;
203 /* Call the network module */
204 sprintf ( psz_network, "ipv4" );
205 p_sout->p_private = (void*) &socket_desc;
206 if( !( p_network = module_Need( p_sout, "network", psz_network ) ) )
208 msg_Warn( p_sout, "failed to open a connection (udp)" );
211 module_Unneed( p_sout, p_network );
213 p_new->i_socket = socket_desc.i_handle;
214 if( p_new->i_socket < 0 )
216 msg_Warn( p_sout, "unable to initialize SAP" );
222 msg_Dbg( p_sout, "creating IPv6 SAP socket with scope %s",
225 /* Initialize and build the IPv6 address to broadcast to */
226 sap_ipv6_addr = (char *) malloc( 28 * sizeof(char) );
227 if ( !sap_ipv6_addr )
229 msg_Err( p_sout, "out of memory" );
232 sprintf( sap_ipv6_addr, "%s%c%s",
233 SAP_IPV6_ADDR_1, psz_v6_scope[0], SAP_IPV6_ADDR_2 );
235 /* Fill the socket descriptor */
236 socket_desc.i_type = NETWORK_UDP;
237 socket_desc.psz_bind_addr = "";
238 socket_desc.i_bind_port = 0;
239 socket_desc.psz_server_addr = sap_ipv6_addr;
240 socket_desc.i_server_port = SAP_PORT;
241 socket_desc.i_handle = 0;
243 sprintf ( psz_network, "ipv6" );
245 /* Call the network module */
246 p_sout->p_private = (void *) &socket_desc;
247 if( !( p_network = module_Need( p_sout, "network", psz_network ) ) )
249 msg_Warn( p_sout, "failed to open a connection (udp)" );
252 module_Unneed( p_sout, p_network );
254 p_new->i_socket = socket_desc.i_handle;
255 if( p_new->i_socket <= 0 )
257 msg_Warn( p_sout, "unable to initialize SAP" );
261 /* Free what we allocated */
264 free( sap_ipv6_addr );
268 msg_Dbg( p_sout, "SAP initialization complete" );
273 /*****************************************************************************
274 * sout_SAPDelete: Deletes a SAP Session
275 *****************************************************************************/
276 void sout_SAPDelete( sout_instance_t *p_sout, sap_session_t * p_this )
278 if( close( p_this->i_socket ) )
280 msg_Err( p_sout, "unable to close SAP socket" );
286 /*****************************************************************************
287 * sout_SAPSend: Sends a SAP packet
288 *****************************************************************************/
289 void sout_SAPSend( sout_instance_t *p_sout, sap_session_t * p_this)
291 char psz_msg[1000]; /* SDP content */
292 char *psz_head; /* SAP header */
293 char *psz_send; /* What we send */
294 char *psz_type = "application/sdp";
295 int i_header_size; /* SAP header size */
296 int i_msg_size; /* SDP content size */
297 int i_size; /* Total size */
300 /* We send a packet every 24 calls to the function */
301 if( p_this->i_calls++ < 24 )
306 i_header_size = 8 + strlen( psz_type ) + 1;
307 psz_head = (char *) malloc( i_header_size * sizeof( char ) );
311 msg_Err( p_sout, "out of memory" );
315 /* Create the SAP headers */
316 psz_head[0] = 0x20; /* Means IPv4, not encrypted, not compressed */
317 psz_head[1] = 0x00; /* No authentification */
318 psz_head[2] = 0x42; /* Version */
319 psz_head[3] = 0x12; /* Version */
321 psz_head[4] = 0x01; /* Source IP FIXME: we should get the real address */
322 psz_head[5] = 0x02; /* idem */
323 psz_head[6] = 0x03; /* idem */
324 psz_head[7] = 0x04; /* idem */
326 strncpy( psz_head + 8, psz_type, 15 );
327 psz_head[ i_header_size-1 ] = '\0';
329 /* Create the SDP content */
330 /* Do not add spaces at beginning of the lines ! */
331 sprintf( psz_msg, "v=0\n"
332 "o=VideoLAN 3247692199 3247895918 IN IP4 VideoLAN\n"
336 "m=audio %s udp 14\n"
339 p_this->psz_name, p_this->psz_port, p_this->psz_url );
341 i_msg_size = strlen( psz_msg );
342 i_size = i_msg_size + i_header_size;
344 /* Create the message */
345 psz_send = (char *) malloc( i_size*sizeof(char) );
348 msg_Err( p_sout, "out of memory" );
352 memcpy( psz_send, psz_head, i_header_size );
353 memcpy( psz_send + i_header_size, psz_msg, i_msg_size );
355 if( i_size < 1024 ) /* We mustn't send packets larger than 1024B */
357 if( p_this->i_ip_version == 6 )
359 i_ret = send( p_this->i_socket, psz_send, i_size, 0 );
363 i_ret = send( p_this->i_socket, psz_send, i_size, 0 );
369 msg_Warn( p_sout, "SAP send failed on socket %i (%s)",
370 p_this->i_socket, strerror(errno) );
375 /* Free what we allocated */