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 /****************************************************************************
50 * Split : split a string into two parts: the one which is before the delim
51 * and the one which is after.
52 * NULL is returned if delim is not found
53 ****************************************************************************/
55 static char * split( char *p_in, char *p_out1, char *p_out2, char delim)
57 unsigned int i_count=0; /*pos in input string*/
58 unsigned int i_pos1=0; /*pos in out2 string */
59 unsigned int i_pos2=0;
60 char *p_cur; /*store the pos of the first delim found */
62 /*skip spaces at the beginning*/
63 while(p_in[i_count] == ' ' && i_count < strlen(p_in))
67 if(i_count == strlen(p_in))
71 while(p_in[i_count] != delim && i_count < strlen(p_in))
73 p_out1[i_pos1] = p_in[i_count];
77 /* Mark the end of out1 */
80 if(i_count == strlen(p_in))
83 /*store pos of the first delim*/
84 p_cur = &p_in[i_count];
88 /*skip all delim and all spaces*/
89 while((p_in[i_count] == ' ' || p_in[i_count] == delim) && i_count < strlen(p_in))
94 if(i_count == strlen(p_in))
97 /*Store the second string*/
98 while(i_count < strlen(p_in))
100 p_out2[i_pos2] = p_in[i_count];
109 /*****************************************************************************
110 * sout_SAPNew: Creates a SAP Session
111 *****************************************************************************/
112 sap_session_t * sout_SAPNew ( sout_instance_t *p_sout ,
113 char * psz_url_arg , char *psz_port_arg ,
114 char * psz_name_arg, int ip_version,
115 char * psz_v6_scope )
117 sap_session_t *p_new; /* The SAP structure */
118 module_t *p_network; /* Network module */
119 network_socket_t socket_desc; /* Socket descriptor */
120 char psz_network[6]; /* IPv4 or IPv6 */
121 char *sap_ipv6_addr=NULL; /* IPv6 built address */
123 /* Allocate the SAP structure */
124 p_new = (sap_session_t *)malloc( sizeof ( sap_session_t ) ) ;
127 msg_Err( p_sout, "No memory left" );
131 /* Fill the information in the structure */
132 split(psz_url_arg,p_new->psz_url,p_new->psz_port,':');
133 // sprintf ( p_new->psz_url , "%s" , psz_url_arg );
134 sprintf ( p_new->psz_name , "%s" , psz_name_arg );
136 /* Port is not implemented in sout */
137 //sprintf ( p_new->psz_port, "%s" , psz_port_arg );
139 p_new->i_ip_version = ip_version;
141 /* Only "6" triggers IPv6. IPv4 is default */
142 if( ip_version != 6 )
144 msg_Dbg( p_sout , "Creating IPv4 SAP socket" );
146 /* Fill the socket descriptor */
147 socket_desc.i_type = NETWORK_UDP;
148 socket_desc.psz_bind_addr = "";
149 socket_desc.i_bind_port = 0;
150 socket_desc.psz_server_addr = SAP_IPV4_ADDR;
151 socket_desc.i_server_port = SAP_PORT;
152 socket_desc.i_handle = 0;
154 /* Call the network module */
155 sprintf ( psz_network, "ipv4" );
156 p_sout->p_private=(void*) &socket_desc;
157 if( !( p_network = module_Need( p_sout, "network", psz_network ) ) )
159 msg_Warn( p_sout, "failed to open a connection (udp)" );
162 module_Unneed( p_sout, p_network );
164 p_new->socket = socket_desc.i_handle;
165 if(p_new->socket <= 0 )
167 msg_Warn( p_sout, "Unable to initialize SAP" );
173 msg_Dbg(p_sout , "Creating IPv6 SAP socket with scope %s"
176 /* Initialize and build the IPv6 address to broadcast to */
177 sap_ipv6_addr = (char *)malloc(28*sizeof(char));
178 if ( !sap_ipv6_addr )
180 msg_Err( p_sout, "No memory left" );
183 sprintf(sap_ipv6_addr,"%s%c%s",
188 /* Fill the socket descriptor */
189 socket_desc.i_type = NETWORK_UDP;
190 socket_desc.psz_bind_addr = "";
191 socket_desc.i_bind_port = 0;
192 socket_desc.psz_server_addr = sap_ipv6_addr;
193 socket_desc.i_server_port = SAP_PORT;
194 socket_desc.i_handle = 0;
196 sprintf ( psz_network, "ipv6" );
198 /* Call the network module */
199 p_sout->p_private=(void*) &socket_desc;
200 if( !( p_network = module_Need( p_sout, "network", psz_network ) ) )
202 msg_Warn( p_sout, "failed to open a connection (udp)" );
205 module_Unneed( p_sout, p_network );
207 p_new->socket = socket_desc.i_handle;
209 if(p_new->socket <= 0 )
211 msg_Warn( p_sout, "Unable to initialize SAP" );
215 /* Free what we allocated */
216 if( sap_ipv6_addr ) free(sap_ipv6_addr);
219 msg_Dbg (p_sout,"SAP initialization complete");
224 /*****************************************************************************
225 * sout_SAPDelete: Deletes a SAP Session
226 *****************************************************************************/
227 void sout_SAPDelete( sout_instance_t *p_sout , sap_session_t * p_this )
229 if( close(p_this->socket) )
231 msg_Err ( p_sout, "Unable to close SAP socket");
234 if( p_this ) free( p_this );
237 /*****************************************************************************
238 * sout_SAPSend: Sends a SAP packet
239 *****************************************************************************/
240 void sout_SAPSend( sout_instance_t *p_sout, sap_session_t * p_this)
242 char *sap_head; /* SAP header */
243 char sap_msg[1000]; /* SDP content */
244 char *sap_send; /* What we send */
245 char *payload_type="application/sdp";
246 int i_send_result=0; /* Result of send */
248 int i_header_size; /* SAP header size */
249 int i_msg_size; /* SDP content size */
250 int i_size; /* Total size */
252 /* We send a packet every 24 calls to the function */
253 if( p_this->sendnow == 24 )
255 i_header_size = 9 + strlen( payload_type );
256 sap_head = ( char * )malloc( i_header_size * sizeof( char ) );
260 msg_Warn( p_sout , "No memory left");
264 /* Create the SAP headers */
265 sap_head[0]=0x20; /* Means IPv4, not encrypted, not compressed */
266 sap_head[1]=0x00; /* No authentification */
267 sap_head[2]=0x42; /* Version */
268 sap_head[3]=0x12; /* Version */
270 sap_head[4]=0x01; /* Source IP FIXME: we should get the real address */
271 sap_head[5]=0x02; /* idem */
272 sap_head[6]=0x03; /* idem */
273 sap_head[7]=0x04; /* idem */
275 strncpy( sap_head+8 , payload_type , 15 );
276 sap_head[ i_header_size-1 ] = '\0';
278 /* Create the SDP content */
279 /* Do not add spaces at beginning of the lines ! */
280 sprintf( sap_msg, "v=0\n"
281 "o=VideoLAN 3247692199 3247895918 IN IP4 VideoLAN\n"
285 "m=audio %s udp 14\n"
288 p_this->psz_name , p_this->psz_port , p_this->psz_url );
290 fprintf(stderr,"Sending : <%s>\n",sap_msg);
291 i_msg_size = strlen( sap_msg );
292 i_size = i_msg_size + i_header_size;
294 /* Create the message */
295 sap_send = ( char* )malloc( i_size*sizeof(char) );
298 msg_Err( p_sout , "No memory left") ;
302 for( i = 0 ; i < i_header_size ; i++ )
304 sap_send[i] = sap_head[i];
307 for( ; i < i_size ; i++ )
309 sap_send[i] = sap_msg[i-i_header_size];
312 if( i_size < 1024 ) /* We mustn't send packets larger than 1024B */
314 if( p_this->i_ip_version == 6)
316 i_send_result = send( p_this->socket, sap_send, i_size, 0 );
320 i_send_result = send( p_this->socket, sap_send, i_size, 0 );
324 if( i_send_result == -1 )
326 msg_Warn(p_sout, "SAP send failed on socket %i", p_this->socket );
332 /* Free what we allocated */
333 if(sap_send) free(sap_send);
334 if(sap_head) free(sap_head);