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 *****************************************************************************/
33 #include <vlc_common.h>
41 #ifdef HAVE_SYS_TIME_H
42 # include <sys/time.h>
51 #include <vlc_network.h>
52 #if defined (WIN32) || defined (UNDER_CE)
54 # define EINPROGRESS WSAEWOULDBLOCK
56 # define EINTR WSAEINTR
58 # define ETIMEDOUT WSAETIMEDOUT
61 #include "libvlc.h" /* vlc_object_waitpipe */
63 static int SocksNegotiate( vlc_object_t *, int fd, int i_socks_version,
64 const char *psz_user, const char *psz_passwd );
65 static int SocksHandshakeTCP( vlc_object_t *,
66 int fd, int i_socks_version,
67 const char *psz_user, const char *psz_passwd,
68 const char *psz_host, int i_port );
69 extern int net_Socket( vlc_object_t *p_this, int i_family, int i_socktype,
72 /*****************************************************************************
74 *****************************************************************************
75 * Open a network connection.
76 * @return socket handler or -1 on error.
77 *****************************************************************************/
78 int __net_Connect( vlc_object_t *p_this, const char *psz_host, int i_port,
81 struct addrinfo hints, *res, *ptr;
82 const char *psz_realhost;
84 int i_realport, i_val, i_handle = -1;
86 int evfd = vlc_object_waitpipe (p_this);
90 memset( &hints, 0, sizeof( hints ) );
91 hints.ai_socktype = SOCK_STREAM;
93 psz_socks = var_CreateGetNonEmptyString( p_this, "socks" );
94 if( psz_socks != NULL )
96 char *psz = strchr( psz_socks, ':' );
101 psz_realhost = psz_socks;
102 i_realport = ( psz != NULL ) ? atoi( psz ) : 1080;
103 hints.ai_flags &= ~AI_NUMERICHOST;
105 msg_Dbg( p_this, "net: connecting to %s port %d (SOCKS) "
106 "for %s port %d", psz_realhost, i_realport,
109 /* We only implement TCP with SOCKS */
117 msg_Err( p_this, "Socket type not supported through SOCKS" );
128 msg_Err( p_this, "Transport not supported through SOCKS" );
135 psz_realhost = psz_host;
138 msg_Dbg( p_this, "net: connecting to %s port %d", psz_realhost,
142 i_val = vlc_getaddrinfo( p_this, psz_realhost, i_realport, &hints, &res );
147 msg_Err( p_this, "cannot resolve %s port %d : %s", psz_realhost,
148 i_realport, vlc_gai_strerror( i_val ) );
152 for( ptr = res; ptr != NULL; ptr = ptr->ai_next )
154 int fd = net_Socket( p_this, ptr->ai_family, type ?: ptr->ai_socktype,
155 proto ?: ptr->ai_protocol );
158 msg_Dbg( p_this, "socket error: %m" );
162 if( connect( fd, ptr->ai_addr, ptr->ai_addrlen ) )
166 if( net_errno != EINPROGRESS && net_errno != EINTR )
168 msg_Err( p_this, "connection failed: %m" );
171 msg_Dbg( p_this, "connection: %m" );
173 timeout = var_CreateGetInteger (p_this, "ipv4-timeout");
176 msg_Err( p_this, "invalid negative value for ipv4-timeout" );
180 struct pollfd ufd[2] = {
181 { .fd = fd, .events = POLLOUT },
182 { .fd = evfd, .events = POLLIN },
186 /* NOTE: timeout screwed up if we catch a signal (EINTR) */
187 val = poll (ufd, sizeof (ufd) / sizeof (ufd[0]), timeout);
188 while ((val == -1) && (net_errno == EINTR));
193 msg_Err (p_this, "connection polling error: %m");
196 case 0: /* timeout */
197 msg_Warn (p_this, "connection timed out");
200 default: /* something happended */
202 goto next_ai; /* LibVLC object killed */
205 /* There is NO WAY around checking SO_ERROR.
206 * Don't ifdef it out!!! */
207 if (getsockopt (fd, SOL_SOCKET, SO_ERROR, &val,
208 &(socklen_t){ sizeof (val) }) || val)
211 msg_Err (p_this, "connection failed: %m");
216 msg_Dbg( p_this, "connection succeeded (socket = %d)", fd );
217 i_handle = fd; /* success! */
220 next_ai: /* failure */
225 vlc_freeaddrinfo( res );
230 if( psz_socks != NULL )
232 /* NOTE: psz_socks already free'd! */
233 char *psz_user = var_CreateGetNonEmptyString( p_this, "socks-user" );
234 char *psz_pwd = var_CreateGetNonEmptyString( p_this, "socks-pwd" );
236 if( SocksHandshakeTCP( p_this, i_handle, 5, psz_user, psz_pwd,
239 msg_Err( p_this, "SOCKS handshake failed" );
240 net_Close( i_handle );
252 int net_AcceptSingle (vlc_object_t *obj, int lfd)
256 fd = accept (lfd, NULL, NULL);
257 while (fd == -1 && errno == EINTR);
261 if (net_errno != EAGAIN)
262 msg_Err (obj, "accept failed (from socket %d): %m", lfd);
266 msg_Dbg (obj, "accepted socket %d (from socket %d)", fd, lfd);
267 net_SetupSocket (fd);
272 /*****************************************************************************
274 *****************************************************************************
275 * Accept a connection on a set of listening sockets and return it
276 *****************************************************************************/
277 int __net_Accept( vlc_object_t *p_this, int *pi_fd, mtime_t i_wait )
279 int timeout = (i_wait < 0) ? -1 : i_wait / 1000;
280 int evfd = vlc_object_waitpipe (p_this);
282 assert( pi_fd != NULL );
287 while (pi_fd[n] != -1)
289 struct pollfd ufd[n + 1];
291 /* Initialize file descriptor set */
292 for (unsigned i = 0; i <= n; i++)
294 ufd[i].fd = (i < n) ? pi_fd[i] : evfd;
295 ufd[i].events = POLLIN;
299 n--; /* avoid EBADF */
301 switch (poll (ufd, n, timeout))
304 if (net_errno == EINTR)
306 msg_Err (p_this, "poll error: %m");
319 for (unsigned i = 0; i < n; i++)
321 if (ufd[i].revents == 0)
325 int fd = net_AcceptSingle (p_this, sfd);
330 * Move listening socket to the end to let the others in the
331 * set a chance next time.
333 memmove (pi_fd + i, pi_fd + i + 1, n - (i + 1));
342 /*****************************************************************************
344 *****************************************************************************
345 * Negotiate authentication with a SOCKS server.
346 *****************************************************************************/
347 static int SocksNegotiate( vlc_object_t *p_obj,
348 int fd, int i_socks_version,
349 const char *psz_socks_user,
350 const char *psz_socks_passwd )
352 uint8_t buffer[128+2*256];
356 if( i_socks_version != 5 )
359 /* We negotiate authentication */
361 if( ( psz_socks_user == NULL ) && ( psz_socks_passwd == NULL ) )
364 buffer[0] = i_socks_version; /* SOCKS version */
367 buffer[1] = 2; /* Number of methods */
368 buffer[2] = 0x00; /* - No auth required */
369 buffer[3] = 0x02; /* - USer/Password */
374 buffer[1] = 1; /* Number of methods */
375 buffer[2] = 0x00; /* - No auth required */
379 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
381 if( net_Read( p_obj, fd, NULL, buffer, 2, true ) != 2 )
384 msg_Dbg( p_obj, "socks: v=%d method=%x", buffer[0], buffer[1] );
386 if( buffer[1] == 0x00 )
388 msg_Dbg( p_obj, "socks: no authentication required" );
390 else if( buffer[1] == 0x02 )
392 int i_len1 = __MIN( strlen(psz_socks_user), 255 );
393 int i_len2 = __MIN( strlen(psz_socks_passwd), 255 );
394 msg_Dbg( p_obj, "socks: username/password authentication" );
396 /* XXX: we don't support user/pwd > 255 (truncated)*/
397 buffer[0] = i_socks_version; /* Version */
398 buffer[1] = i_len1; /* User length */
399 memcpy( &buffer[2], psz_socks_user, i_len1 );
400 buffer[2+i_len1] = i_len2; /* Password length */
401 memcpy( &buffer[2+i_len1+1], psz_socks_passwd, i_len2 );
403 i_len = 3 + i_len1 + i_len2;
405 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
408 if( net_Read( p_obj, fd, NULL, buffer, 2, true ) != 2 )
411 msg_Dbg( p_obj, "socks: v=%d status=%x", buffer[0], buffer[1] );
412 if( buffer[1] != 0x00 )
414 msg_Err( p_obj, "socks: authentication rejected" );
421 msg_Err( p_obj, "socks: unsupported authentication method %x",
424 msg_Err( p_obj, "socks: authentification needed" );
431 /*****************************************************************************
433 *****************************************************************************
434 * Open a TCP connection using a SOCKS server and return a handle (RFC 1928)
435 *****************************************************************************/
436 static int SocksHandshakeTCP( vlc_object_t *p_obj,
439 const char *psz_user, const char *psz_passwd,
440 const char *psz_host, int i_port )
442 uint8_t buffer[128+2*256];
444 if( i_socks_version != 4 && i_socks_version != 5 )
446 msg_Warn( p_obj, "invalid socks protocol version %d", i_socks_version );
450 if( i_socks_version == 5 &&
451 SocksNegotiate( p_obj, fd, i_socks_version,
452 psz_user, psz_passwd ) )
455 if( i_socks_version == 4 )
457 struct addrinfo hints, *p_res;
459 /* v4 only support ipv4 */
460 memset (&hints, 0, sizeof (hints));
461 hints.ai_family = AF_INET;
462 if( vlc_getaddrinfo( p_obj, psz_host, 0, &hints, &p_res ) )
465 buffer[0] = i_socks_version;
466 buffer[1] = 0x01; /* CONNECT */
467 SetWBE( &buffer[2], i_port ); /* Port */
468 memcpy( &buffer[4], /* Address */
469 &((struct sockaddr_in *)(p_res->ai_addr))->sin_addr, 4 );
470 vlc_freeaddrinfo( p_res );
472 buffer[8] = 0; /* Empty user id */
474 if( net_Write( p_obj, fd, NULL, buffer, 9 ) != 9 )
476 if( net_Read( p_obj, fd, NULL, buffer, 8, true ) != 8 )
479 msg_Dbg( p_obj, "socks: v=%d cd=%d",
480 buffer[0], buffer[1] );
482 if( buffer[1] != 90 )
485 else if( i_socks_version == 5 )
487 int i_hlen = __MIN(strlen( psz_host ), 255);
490 buffer[0] = i_socks_version; /* Version */
491 buffer[1] = 0x01; /* Cmd: connect */
492 buffer[2] = 0x00; /* Reserved */
493 buffer[3] = 3; /* ATYP: for now domainname */
496 memcpy( &buffer[5], psz_host, i_hlen );
497 SetWBE( &buffer[5+i_hlen], i_port );
499 i_len = 5 + i_hlen + 2;
502 if( net_Write( p_obj, fd, NULL, buffer, i_len ) != i_len )
505 /* Read the header */
506 if( net_Read( p_obj, fd, NULL, buffer, 5, true ) != 5 )
509 msg_Dbg( p_obj, "socks: v=%d rep=%d atyp=%d",
510 buffer[0], buffer[1], buffer[3] );
512 if( buffer[1] != 0x00 )
514 msg_Err( p_obj, "socks: CONNECT request failed\n" );
518 /* Read the remaining bytes */
519 if( buffer[3] == 0x01 )
521 else if( buffer[3] == 0x03 )
522 i_len = buffer[4] + 2;
523 else if( buffer[3] == 0x04 )
528 if( net_Read( p_obj, fd, NULL, buffer, i_len, true ) != i_len )
535 void net_ListenClose( int *pi_fd )
541 for( pi = pi_fd; *pi != -1; pi++ )