1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 2004-2005 the VideoLAN team
5 * Copyright (C) 2005-2006 Rémi Denis-Courmont
8 * Authors: Laurent Aimar <fenrir@videolan.org>
9 * Rémi Denis-Courmont <rem # videolan.org>
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
24 *****************************************************************************/
26 /*****************************************************************************
28 *****************************************************************************/
37 #ifdef HAVE_SYS_TIME_H
38 # include <sys/time.h>
45 #if defined (WIN32) || defined (UNDER_CE)
47 # define EINPROGRESS WSAEWOULDBLOCK
49 # define EINTR WSAEINTR
51 # define ETIMEDOUT WSAETIMEDOUT
54 static int SocksNegociate( vlc_object_t *, int fd, int i_socks_version,
55 char *psz_socks_user, char *psz_socks_passwd );
56 static int SocksHandshakeTCP( vlc_object_t *,
57 int fd, int i_socks_version,
58 char *psz_socks_user, char *psz_socks_passwd,
59 const char *psz_host, int i_port );
60 extern int net_Socket( vlc_object_t *p_this, int i_family, int i_socktype,
62 extern int rootwrap_bind (int family, int socktype, int protocol,
63 const struct sockaddr *addr, size_t alen);
65 /*****************************************************************************
67 *****************************************************************************
68 * Open a TCP connection and return a handle
69 *****************************************************************************/
70 int __net_ConnectTCP( vlc_object_t *p_this, const char *psz_host, int i_port )
72 struct addrinfo hints, *res, *ptr;
73 const char *psz_realhost;
75 int i_realport, i_val, i_handle = -1, i_saved_errno = 0;
76 unsigned u_errstep = 0;
79 i_port = 80; /* historical VLC thing */
81 memset( &hints, 0, sizeof( hints ) );
82 hints.ai_socktype = SOCK_STREAM;
84 psz_socks = var_CreateGetString( p_this, "socks" );
85 if( *psz_socks && *psz_socks != ':' )
87 char *psz = strchr( psz_socks, ':' );
92 psz_realhost = psz_socks;
93 i_realport = ( psz != NULL ) ? atoi( psz ) : 1080;
95 msg_Dbg( p_this, "net: connecting to %s port %d for %s port %d",
96 psz_realhost, i_realport, psz_host, i_port );
100 psz_realhost = psz_host;
103 msg_Dbg( p_this, "net: connecting to %s port %d", psz_realhost,
107 i_val = vlc_getaddrinfo( p_this, psz_realhost, i_realport, &hints, &res );
110 msg_Err( p_this, "cannot resolve %s port %d : %s", psz_realhost,
111 i_realport, vlc_gai_strerror( i_val ) );
116 for( ptr = res; ptr != NULL; ptr = ptr->ai_next )
118 int fd = net_Socket( p_this, ptr->ai_family, ptr->ai_socktype,
125 i_saved_errno = net_errno;
127 msg_Dbg( p_this, "socket error: %s", strerror( net_errno ) );
131 if( connect( fd, ptr->ai_addr, ptr->ai_addrlen ) )
133 socklen_t i_val_size = sizeof( i_val );
138 if( net_errno != EINPROGRESS )
143 i_saved_errno = net_errno;
145 msg_Dbg( p_this, "connect error: %s", strerror( net_errno ) );
149 var_Create( p_this, "ipv4-timeout",
150 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
151 var_Get( p_this, "ipv4-timeout", &timeout );
152 if( timeout.i_int < 0 )
154 msg_Err( p_this, "invalid negative value for ipv4-timeout" );
157 d = div( timeout.i_int, 100 );
159 msg_Dbg( p_this, "connection in progress" );
167 msg_Dbg( p_this, "connection aborted" );
169 vlc_freeaddrinfo( res );
174 /* Initialize file descriptor set */
179 * We'll wait 0.1 second if nothing happens
181 * time out will be shortened if we catch a signal (EINTR)
184 tv.tv_usec = (d.quot > 0) ? 100000 : (1000 * d.rem);
186 i_ret = select( fd + 1, NULL, &fds, NULL, &tv );
190 if( ( i_ret == -1 ) && ( net_errno != EINTR ) )
192 msg_Warn( p_this, "select error: %s",
193 strerror( net_errno ) );
199 msg_Dbg( p_this, "select timed out" );
203 i_saved_errno = ETIMEDOUT;
211 #if !defined( SYS_BEOS ) && !defined( UNDER_CE )
212 if( getsockopt( fd, SOL_SOCKET, SO_ERROR, (void*)&i_val,
213 &i_val_size ) == -1 || i_val != 0 )
216 i_saved_errno = i_val;
217 msg_Dbg( p_this, "connect error (via getsockopt): %s",
218 net_strerror( i_val ) );
224 i_handle = fd; /* success! */
227 next_ai: /* failure */
232 vlc_freeaddrinfo( res );
236 msg_Err( p_this, "Connection to %s port %d failed: %s", psz_host,
237 i_port, net_strerror( i_saved_errno ) );
242 if( *psz_socks && *psz_socks != ':' )
244 char *psz_user = var_CreateGetString( p_this, "socks-user" );
245 char *psz_pwd = var_CreateGetString( p_this, "socks-pwd" );
247 if( SocksHandshakeTCP( p_this, i_handle, 5, psz_user, psz_pwd,
250 msg_Err( p_this, "Failed to use the SOCKS server" );
251 net_Close( i_handle );
264 /*****************************************************************************
266 *****************************************************************************
267 * Open TCP passive "listening" socket(s)
268 * This function returns NULL in case of error.
269 *****************************************************************************/
270 int *__net_ListenTCP( vlc_object_t *p_this, const char *psz_host, int i_port )
272 struct addrinfo hints, *res, *ptr;
273 int i_val, *pi_handles, i_size;
275 memset( &hints, 0, sizeof( hints ) );
276 hints.ai_socktype = SOCK_STREAM;
277 hints.ai_flags = AI_PASSIVE;
279 msg_Dbg( p_this, "net: listening to %s port %d", psz_host, i_port );
281 i_val = vlc_getaddrinfo( p_this, psz_host, i_port, &hints, &res );
284 msg_Err( p_this, "Cannot resolve %s port %d : %s", psz_host, i_port,
285 vlc_gai_strerror( i_val ) );
292 for( ptr = res; ptr != NULL; ptr = ptr->ai_next )
296 fd = net_Socket( p_this, ptr->ai_family, ptr->ai_socktype,
300 msg_Dbg( p_this, "socket error: %s", net_strerror( net_errno ) );
304 /* Bind the socket */
305 if( bind( fd, ptr->ai_addr, ptr->ai_addrlen ) )
309 saved_errno = net_errno;
311 #if !defined(WIN32) && !defined(UNDER_CE)
312 fd = rootwrap_bind( ptr->ai_family, ptr->ai_socktype,
313 ptr->ai_protocol, ptr->ai_addr,
317 msg_Dbg( p_this, "got socket %d from rootwrap", fd );
322 msg_Err( p_this, "cannot bind socket (%s)",
323 net_strerror( saved_errno ) );
329 if( listen( fd, 100 ) == -1 )
331 msg_Err( p_this, "cannot bring the socket in listening mode (%s)",
332 net_strerror( net_errno ) );
337 newpi = (int *)realloc( pi_handles, (++i_size) * sizeof( int ) );
345 newpi[i_size - 2] = fd;
350 vlc_freeaddrinfo( res );
352 if( pi_handles != NULL )
353 pi_handles[i_size - 1] = -1;
357 /*****************************************************************************
359 *****************************************************************************
360 * Accept a connection on a set of listening sockets and return it
361 *****************************************************************************/
362 int __net_Accept( vlc_object_t *p_this, int *pi_fd, mtime_t i_wait )
364 vlc_bool_t b_die = p_this->b_die, b_block = (i_wait < 0);
366 while( p_this->b_die == b_die )
368 int i_val = -1, *pi, *pi_end;
369 struct timeval timeout;
374 /* Initialize file descriptor set */
378 for( pi = pi_fd; *pi != -1; pi++ )
385 FD_SET( i_fd, &fds_r );
386 FD_SET( i_fd, &fds_e );
391 timeout.tv_usec = b_block ? 500000 : i_wait;
393 i_val = select( i_val + 1, &fds_r, NULL, &fds_e, &timeout );
394 if( ( ( i_val < 0 ) && ( net_errno == EINTR ) ) || i_val == 0 )
403 msg_Err( p_this, "network select error (%s)",
404 net_strerror( net_errno ) );
408 for( pi = pi_fd; *pi != -1; pi++ )
412 if( !FD_ISSET( i_fd, &fds_r ) && !FD_ISSET( i_fd, &fds_e ) )
415 i_val = accept( i_fd, NULL, 0 );
417 msg_Err( p_this, "accept failed (%s)",
418 net_strerror( net_errno ) );
419 else if( i_val >= FD_SETSIZE )
421 net_Close( i_val ); /* avoid future overflows in FD_SET */
422 msg_Err( p_this, "accept failed (too many sockets opened)" );
427 setsockopt( i_fd, SOL_SOCKET, SO_REUSEADDR, &yes, sizeof( yes ));
429 fcntl( i_fd, F_SETFD, FD_CLOEXEC );
432 * This round-robin trick ensures that the first sockets in
433 * pi_fd won't prevent the last ones from getting accept'ed.
436 memmove( pi, pi + 1, pi_end - pi );
447 /*****************************************************************************
449 *****************************************************************************
450 * Negociate authentication with a SOCKS server.
451 *****************************************************************************/
452 static int SocksNegociate( vlc_object_t *p_obj,
453 int fd, int i_socks_version,
454 char *psz_socks_user,
455 char *psz_socks_passwd )
457 uint8_t buffer[128+2*256];
459 vlc_bool_t b_auth = VLC_FALSE;
461 if( i_socks_version != 5 )
464 /* We negociate authentication */
466 if( psz_socks_user && psz_socks_passwd &&
467 *psz_socks_user && *psz_socks_passwd )
470 buffer[0] = i_socks_version; /* SOCKS version */
473 buffer[1] = 2; /* Number of methods */
474 buffer[2] = 0x00; /* - No auth required */
475 buffer[3] = 0x02; /* - USer/Password */
480 buffer[1] = 1; /* Number of methods */
481 buffer[2] = 0x00; /* - No auth required */
485 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
487 if( net_Read( p_obj, fd, NULL, buffer, 2, VLC_TRUE ) != 2 )
490 msg_Dbg( p_obj, "socks: v=%d method=%x", buffer[0], buffer[1] );
492 if( buffer[1] == 0x00 )
494 msg_Dbg( p_obj, "socks: no authentication required" );
496 else if( buffer[1] == 0x02 )
498 int i_len1 = __MIN( strlen(psz_socks_user), 255 );
499 int i_len2 = __MIN( strlen(psz_socks_passwd), 255 );
500 msg_Dbg( p_obj, "socks: username/password authentication" );
502 /* XXX: we don't support user/pwd > 255 (truncated)*/
503 buffer[0] = i_socks_version; /* Version */
504 buffer[1] = i_len1; /* User length */
505 memcpy( &buffer[2], psz_socks_user, i_len1 );
506 buffer[2+i_len1] = i_len2; /* Password length */
507 memcpy( &buffer[2+i_len1+1], psz_socks_passwd, i_len2 );
509 i_len = 3 + i_len1 + i_len2;
511 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
514 if( net_Read( p_obj, fd, NULL, buffer, 2, VLC_TRUE ) != 2 )
517 msg_Dbg( p_obj, "socks: v=%d status=%x", buffer[0], buffer[1] );
518 if( buffer[1] != 0x00 )
520 msg_Err( p_obj, "socks: authentication rejected" );
527 msg_Err( p_obj, "socks: unsupported authentication method %x",
530 msg_Err( p_obj, "socks: authentification needed" );
537 /*****************************************************************************
539 *****************************************************************************
540 * Open a TCP connection using a SOCKS server and return a handle (RFC 1928)
541 *****************************************************************************/
542 static int SocksHandshakeTCP( vlc_object_t *p_obj,
545 char *psz_socks_user, char *psz_socks_passwd,
546 const char *psz_host, int i_port )
548 uint8_t buffer[128+2*256];
550 if( i_socks_version != 4 && i_socks_version != 5 )
552 msg_Warn( p_obj, "invalid socks protocol version %d", i_socks_version );
556 if( i_socks_version == 5 &&
557 SocksNegociate( p_obj, fd, i_socks_version,
558 psz_socks_user, psz_socks_passwd ) )
561 if( i_socks_version == 4 )
563 struct addrinfo hints, *p_res;
565 /* v4 only support ipv4 */
566 memset (&hints, 0, sizeof (hints));
567 hints.ai_family = AF_INET;
568 if( vlc_getaddrinfo( p_obj, psz_host, 0, &hints, &p_res ) )
571 buffer[0] = i_socks_version;
572 buffer[1] = 0x01; /* CONNECT */
573 SetWBE( &buffer[2], i_port ); /* Port */
574 memcpy( &buffer[4], /* Address */
575 &((struct sockaddr_in *)(p_res->ai_addr))->sin_addr, 4 );
576 vlc_freeaddrinfo( p_res );
578 buffer[8] = 0; /* Empty user id */
580 if( net_Write( p_obj, fd, NULL, buffer, 9 ) != 9 )
582 if( net_Read( p_obj, fd, NULL, buffer, 8, VLC_TRUE ) != 8 )
585 msg_Dbg( p_obj, "socks: v=%d cd=%d",
586 buffer[0], buffer[1] );
588 if( buffer[1] != 90 )
591 else if( i_socks_version == 5 )
593 int i_hlen = __MIN(strlen( psz_host ), 255);
596 buffer[0] = i_socks_version; /* Version */
597 buffer[1] = 0x01; /* Cmd: connect */
598 buffer[2] = 0x00; /* Reserved */
599 buffer[3] = 3; /* ATYP: for now domainname */
602 memcpy( &buffer[5], psz_host, i_hlen );
603 SetWBE( &buffer[5+i_hlen], i_port );
605 i_len = 5 + i_hlen + 2;
608 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
611 /* Read the header */
612 if( net_Read( p_obj, fd, NULL, buffer, 5, VLC_TRUE ) != 5 )
615 msg_Dbg( p_obj, "socks: v=%d rep=%d atyp=%d",
616 buffer[0], buffer[1], buffer[3] );
618 if( buffer[1] != 0x00 )
620 msg_Err( p_obj, "socks: CONNECT request failed\n" );
624 /* Read the remaining bytes */
625 if( buffer[3] == 0x01 )
627 else if( buffer[3] == 0x03 )
628 i_len = buffer[4] + 2;
629 else if( buffer[3] == 0x04 )
634 if( net_Read( p_obj, fd, NULL, buffer, i_len, VLC_TRUE ) != i_len )
641 void net_ListenClose( int *pi_fd )
647 for( pi = pi_fd; *pi != -1; pi++ )