/*****************************************************************************
* io.c: network I/O functions
*****************************************************************************
- * Copyright (C) 2004-2005 the VideoLAN team
+ * Copyright (C) 2004-2005, 2007 the VideoLAN team
* Copyright © 2005-2006 Rémi Denis-Courmont
* $Id$
*
* Authors: Laurent Aimar <fenrir@videolan.org>
* Rémi Denis-Courmont <rem # videolan.org>
+ * Christophe Mutricy <xtophe at videolan dot org>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
#include <stdlib.h>
#include <stdio.h>
+#include <limits.h>
#include <errno.h>
#include <assert.h>
# include <poll.h>
#endif
-#include "network.h"
+#include <vlc_network.h>
#ifndef INADDR_ANY
# define INADDR_ANY 0x00000000
# define INADDR_NONE 0xFFFFFFFF
#endif
-int net_Socket( vlc_object_t *p_this, int i_family, int i_socktype,
- int i_protocol )
-{
- int fd, i_val;
-
- fd = socket( i_family, i_socktype, i_protocol );
- if( fd == -1 )
- {
#if defined(WIN32) || defined(UNDER_CE)
- if( WSAGetLastError ( ) != WSAEAFNOSUPPORT )
-#else
- if( errno != EAFNOSUPPORT )
+# undef EAFNOSUPPORT
+# define EAFNOSUPPORT WSAEAFNOSUPPORT
#endif
- msg_Warn( p_this, "cannot create socket: %s",
- net_strerror(net_errno) );
- return -1;
- }
-#if defined( WIN32 ) || defined( UNDER_CE )
+extern int rootwrap_bind (int family, int socktype, int protocol,
+ const struct sockaddr *addr, size_t alen);
+
+int net_Socket (vlc_object_t *p_this, int family, int socktype,
+ int protocol)
+{
+ int fd = socket (family, socktype, protocol);
+ if (fd == -1)
{
- unsigned long i_dummy = 1;
- if( ioctlsocket( fd, FIONBIO, &i_dummy ) != 0 )
- msg_Err( p_this, "cannot set socket to non-blocking mode" );
+ if (net_errno != EAFNOSUPPORT)
+ msg_Err (p_this, "cannot create socket: %s",
+ net_strerror (net_errno));
+ return -1;
}
+
+#if defined (WIN32) || defined (UNDER_CE)
+ ioctlsocket (fd, FIONBIO, &(unsigned long){ 1 });
#else
- fcntl( fd, F_SETFD, FD_CLOEXEC );
- i_val = fcntl( fd, F_GETFL, 0 );
- fcntl( fd, F_SETFL, ((i_val != -1) ? i_val : 0) | O_NONBLOCK );
+ fcntl (fd, F_SETFD, FD_CLOEXEC);
+ fcntl (fd, F_SETFL, fcntl (fd, F_GETFL, 0) | O_NONBLOCK);
#endif
- i_val = 1;
- setsockopt( fd, SOL_SOCKET, SO_REUSEADDR, (void *)&i_val,
- sizeof( i_val ) );
+ setsockopt (fd, SOL_SOCKET, SO_REUSEADDR, &(int){ 1 }, sizeof (int));
#ifdef IPV6_V6ONLY
/*
* it makes sure that IPv4 addresses will be printed as w.x.y.z rather
* than ::ffff:w.x.y.z
*/
- if( i_family == AF_INET6 )
- setsockopt( fd, IPPROTO_IPV6, IPV6_V6ONLY, (void *)&i_val,
- sizeof( i_val ) );
+ if (family == AF_INET6)
+ setsockopt (fd, IPPROTO_IPV6, IPV6_V6ONLY, &(int){ 1 }, sizeof (int));
#endif
-#if defined( WIN32 ) || defined( UNDER_CE )
+#if defined (WIN32) || defined (UNDER_CE)
# ifndef IPV6_PROTECTION_LEVEL
+# warning Please update your C library headers.
# define IPV6_PROTECTION_LEVEL 23
+# define PROTECTION_LEVEL_UNRESTRICTED 10
# endif
- if( i_family == AF_INET6 )
+ if (family == AF_INET6)
+ setsockopt (fd, IPPROTO_IPV6, IPV6_PROTECTION_LEVEL,
+ &(int){ PROTECTION_LEVEL_UNRESTRICTED }, sizeof (int));
+#endif
+
+ return fd;
+}
+
+
+int *net_Listen (vlc_object_t *p_this, const char *psz_host,
+ int i_port, int family, int socktype, int protocol)
+{
+ struct addrinfo hints, *res;
+
+ memset (&hints, 0, sizeof( hints ));
+ hints.ai_family = family;
+ hints.ai_socktype = socktype;
+ hints.ai_flags = AI_PASSIVE;
+
+ msg_Dbg (p_this, "net: listening to %s port %d", psz_host, i_port);
+
+ int i_val = vlc_getaddrinfo (p_this, psz_host, i_port, &hints, &res);
+ if (i_val)
{
- i_val = 30 /*PROTECTION_LEVEL_UNRESTRICTED*/;
- setsockopt( fd, IPPROTO_IPV6, IPV6_PROTECTION_LEVEL,
- (const char*)&i_val, sizeof( i_val ) );
+ msg_Err (p_this, "Cannot resolve %s port %d : %s", psz_host, i_port,
+ vlc_gai_strerror (i_val));
+ return NULL;
}
+
+ int *sockv = NULL;
+ unsigned sockc = 0;
+
+ for (struct addrinfo *ptr = res; ptr != NULL; ptr = ptr->ai_next)
+ {
+ int fd = net_Socket (p_this, ptr->ai_family, ptr->ai_socktype,
+ protocol ?: ptr->ai_protocol);
+ if (fd == -1)
+ {
+ msg_Dbg (p_this, "socket error: %s", net_strerror (net_errno));
+ continue;
+ }
+
+ /* Bind the socket */
+#if defined (WIN32) || defined (UNDER_CE)
+ /*
+ * Under Win32 and for multicasting, we bind to INADDR_ANY.
+ * This is of course a severe bug, since the socket would logically
+ * receive unicast traffic, and multicast traffic of groups subscribed
+ * to via other sockets.
+ */
+ if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
+ && (sizeof (struct sockaddr_storage) >= ptr->ai_addrlen))
+ {
+ // This works for IPv4 too - don't worry!
+ struct sockaddr_in6 dumb =
+ {
+ .sin6_family = ptr->ai_addr->sa_family,
+ .sin6_port = ((struct sockaddr_in *)(ptr->ai_addr))->sin_port
+ };
+
+ bind (fd, (struct sockaddr *)&dumb, ptr->ai_addrlen);
+ }
+ else
#endif
+ if (bind (fd, ptr->ai_addr, ptr->ai_addrlen))
+ {
+ int saved_errno = net_errno;
+
+ net_Close (fd);
+#if !defined(WIN32) && !defined(UNDER_CE)
+ fd = rootwrap_bind (ptr->ai_family, ptr->ai_socktype,
+ protocol ?: ptr->ai_protocol, ptr->ai_addr,
+ ptr->ai_addrlen);
+ if (fd != -1)
+ {
+ msg_Dbg (p_this, "got socket %d from rootwrap", fd);
+ }
+ else
+#endif
+ {
+ msg_Err (p_this, "socket bind error (%s)",
+ net_strerror( saved_errno ) );
+ continue;
+ }
+ }
+
+ if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen))
+ {
+ if (net_Subscribe (p_this, fd, ptr->ai_addr, ptr->ai_addrlen))
+ {
+ net_Close (fd);
+ continue;
+ }
+ }
+
+ /* Listen */
+ switch (ptr->ai_socktype)
+ {
+ case SOCK_STREAM:
+ case SOCK_RDM:
+ case SOCK_SEQPACKET:
+ if (listen (fd, INT_MAX))
+ {
+ msg_Err (p_this, "socket listen error (%s)",
+ net_strerror (net_errno));
+ net_Close (fd);
+ continue;
+ }
+ }
+
+ int *nsockv = (int *)realloc (sockv, (sockc + 2) * sizeof (int));
+ if (nsockv != NULL)
+ {
+ nsockv[sockc++] = fd;
+ sockv = nsockv;
+ }
+ else
+ net_Close (fd);
+ }
+
+ vlc_freeaddrinfo (res);
+
+ if (sockv != NULL)
+ sockv[sockc] = -1;
+
+ return sockv;
+}
+
+
+int net_ListenSingle (vlc_object_t *obj, const char *host, int port,
+ int family, int socktype, int protocol)
+{
+ int *fdv = net_Listen (obj, host, port, family, socktype, protocol);
+ if (fdv == NULL)
+ return -1;
+
+ for (unsigned i = 1; fdv[i] != -1; i++)
+ {
+ msg_Warn (obj, "Multiple sockets opened. Dropping extra ones!");
+ net_Close (fdv[i]);
+ }
+
+ int fd = fdv[0];
+ assert (fd != -1);
+
+ free (fdv);
return fd;
}
+
/*****************************************************************************
* __net_Close:
*****************************************************************************
* Close a network handle
*****************************************************************************/
-void net_Close( int fd )
+void net_Close (int fd)
{
#ifdef UNDER_CE
- CloseHandle( (HANDLE)fd );
-#elif defined( WIN32 )
- closesocket( fd );
+ CloseHandle ((HANDLE)fd);
+#elif defined (WIN32)
+ closesocket (fd);
#else
- close( fd );
+ (void)close (fd);
#endif
}
-static int
+static ssize_t
net_ReadInner( vlc_object_t *restrict p_this, unsigned fdc, const int *fdv,
const v_socket_t *const *restrict vsv,
uint8_t *restrict p_buf, size_t i_buflen,
int wait_ms, vlc_bool_t waitall )
{
size_t i_total = 0;
- int eof[fdc];
- unsigned int i_eof = 0;
- memset( eof, 0, sizeof( eof ) );
- do
+ while (i_buflen > 0)
{
- unsigned int i;
- int n, delay_ms;
-#ifdef HAVE_POLL
+ unsigned i;
+ ssize_t n;
struct pollfd ufd[fdc];
-#else
- int maxfd = -1;
- fd_set set;
-#endif
-
- if( i_buflen == 0 )
- return i_total; // output buffer full
-
- if( i_eof == fdc )
- return i_total; // all sockets are at EOF
- delay_ms = 500;
- if( (wait_ms != -1) && (wait_ms < 500) )
+ int delay_ms = 500;
+ if ((wait_ms != -1) && (wait_ms < 500))
delay_ms = wait_ms;
-#ifdef HAVE_POLL
- memset(ufd, 0, sizeof (ufd) );
+ if (p_this->b_die)
+ {
+ errno = EINTR;
+ goto error;
+ }
+
+ memset (ufd, 0, sizeof (ufd));
for( i = 0; i < fdc; i++ )
{
ufd[i].events = POLLIN;
}
- if( p_this->b_die )
- return i_total;
-
- n = poll( ufd, fdc, (wait_ms == -1) ? -1 : delay_ms );
+ n = poll( ufd, fdc, delay_ms );
if( n == -1 )
goto error;
- assert( (unsigned int)n <= fdc );
+ assert ((unsigned)n <= fdc);
+
+ if (n == 0) // timeout
+ continue;
- for( i = 0; n > 0; i++ )
+ for (i = 0;; i++)
{
- if( (i_total > 0) && (ufd[i].revents & POLLERR) )
+ if ((i_total > 0) && (ufd[i].revents & POLLERR))
return i_total; // error will be dequeued on next run
- if( ufd[i].revents )
- {
- fdc = 1;
- fdv += i;
- vsv += i;
- n--;
- goto receive;
- }
- }
-#else
- FD_ZERO (&set);
+ if ((ufd[i].revents & POLLIN) == 0)
+ continue;
- for( i = 0; i < fdc; i++ )
- {
-#if !defined(WIN32) && !defined(UNDER_CE)
- if( fdv[i] >= FD_SETSIZE )
- {
- /* We don't want to overflow select() fd_set */
- msg_Err( p_this, "select set overflow" );
- return -1;
- }
-#endif
- FD_SET( fdv[i], &set );
- if( fdv[i] > maxfd )
- maxfd = fdv[i];
+ fdc = 1;
+ fdv += i;
+ vsv += i;
+ break;
}
- n = select( maxfd + 1, &set, NULL, NULL,
- (wait_ms == -1) ? NULL
- : &(struct timeval){ 0, delay_ms * 1000 } );
- if( n == -1 )
- goto error;
-
- for( i = 0; n > 0; i++ )
- if( FD_ISSET (fdv[i], &set) )
- {
- fdc = 1;
- fdv += i;
- vsv += i;
- n--;
- goto receive;
- }
-#endif
-
- continue;
-
-receive:
if( (*vsv) != NULL )
{
n = (*vsv)->pf_recv( (*vsv)->p_sys, p_buf, i_buflen );
goto error;
}
+ if (n == 0) // EOF
+ return i_total;
+
i_total += n;
p_buf += n;
i_buflen -= n;
- if( n == 0 ) // EOF on socket
- {
- unsigned int j;
- for( j = 0 ; j < i_eof ; j++ )
- if( eof[j] == *fdv ) goto end;
- eof[i_eof++] = *fdv;
- }
-end:
- if( wait_ms == -1 )
- {
- if( !waitall )
- return i_total;
- }
- else
+ if (!waitall)
+ return i_total;
+
+ if (wait_ms != -1)
{
wait_ms -= delay_ms;
+ if (wait_ms == 0)
+ return i_total; // time's up!
}
}
- while( wait_ms );
-
- return i_total; // timeout
+ return i_total;
error:
- msg_Err( p_this, "Read error: %s", net_strerror (net_errno) );
- return i_total ? (int)i_total : -1;
+ if( errno != EINTR )
+ msg_Err( p_this, "Read error: %s", net_strerror (net_errno) );
+ return i_total ? (ssize_t)i_total : -1;
}
* If b_retry is true, then we repeat until we have read the right amount of
* data
*****************************************************************************/
-int __net_Read( vlc_object_t *restrict p_this, int fd,
- const v_socket_t *restrict p_vs,
- uint8_t *restrict p_data, int i_data, vlc_bool_t b_retry )
+ssize_t __net_Read( vlc_object_t *restrict p_this, int fd,
+ const v_socket_t *restrict p_vs,
+ uint8_t *restrict buf, size_t len, vlc_bool_t b_retry )
{
return net_ReadInner( p_this, 1, &(int){ fd },
- &(const v_socket_t *){ p_vs },
- p_data, i_data, -1, b_retry );
+ &(const v_socket_t *){ p_vs }, buf, len, -1,
+ b_retry );
}
*****************************************************************************
* Read from a network socket, non blocking mode (with timeout)
*****************************************************************************/
-int __net_ReadNonBlock( vlc_object_t *restrict p_this, int fd,
- const v_socket_t *restrict p_vs,
- uint8_t *restrict p_data, int i_data, mtime_t i_wait)
+ssize_t __net_ReadNonBlock( vlc_object_t *restrict p_this, int fd,
+ const v_socket_t *restrict p_vs,
+ uint8_t *restrict buf, size_t len, mtime_t i_wait)
{
return net_ReadInner (p_this, 1, &(int){ fd },
&(const v_socket_t *){ p_vs },
- p_data, i_data, i_wait / 1000, VLC_FALSE);
+ buf, len, i_wait / 1000, VLC_FALSE);
}
* Read from several sockets (with timeout). Takes data from the first socket
* that has some.
*****************************************************************************/
-int __net_Select( vlc_object_t *restrict p_this, const int *restrict pi_fd,
- const v_socket_t *const *restrict pp_vs,
- int i_fd, uint8_t *restrict p_data, int i_data,
- mtime_t i_wait )
+ssize_t __net_Select( vlc_object_t *restrict p_this,
+ const int *restrict fds, int nfd,
+ uint8_t *restrict buf, size_t len, mtime_t i_wait )
{
- if( pp_vs == NULL )
- {
- const v_socket_t *vsv[i_fd];
- memset( vsv, 0, sizeof (vsv) );
-
- return net_ReadInner( p_this, i_fd, pi_fd, vsv, p_data, i_data,
- i_wait / 1000, VLC_FALSE );
- }
+ const v_socket_t *vsv[nfd];
+ memset( vsv, 0, sizeof (vsv) );
- return net_ReadInner( p_this, i_fd, pi_fd, pp_vs, p_data, i_data,
+ return net_ReadInner( p_this, nfd, fds, vsv, buf, len,
i_wait / 1000, VLC_FALSE );
}
/* Write exact amount requested */
-int __net_Write( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
- const uint8_t *p_data, int i_data )
+ssize_t __net_Write( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
+ const uint8_t *p_data, size_t i_data )
{
size_t i_total = 0;
while( i_data > 0 )
{
if( p_this->b_die )
- return i_total;
+ break;
-#ifdef HAVE_POLL
struct pollfd ufd[1];
memset (ufd, 0, sizeof (ufd));
ufd[0].fd = fd;
ufd[0].events = POLLOUT;
int val = poll (ufd, 1, 500);
- if ((val > 0) && (ufd[0].revents & POLLERR) && (i_total > 0))
- return i_total; // error will be dequeued separately on next call
-#else
- fd_set set;
- FD_ZERO (&set);
-
-#if !defined(WIN32) && !defined(UNDER_CE)
- if (fd >= FD_SETSIZE)
- {
- /* We don't want to overflow select() fd_set */
- msg_Err (p_this, "select set overflow");
- return -1;
- }
-#endif
- FD_SET (fd, &set);
-
- int val = select (fd + 1, NULL, &set, NULL,
- &(struct timeval){ 0, 500000 });
-#endif
switch (val)
{
case -1:
- if (errno != EINTR)
- {
- msg_Err (p_this, "Write error: %s",
- net_strerror (net_errno));
- return i_total ? (int)i_total : -1;
- }
+ msg_Err (p_this, "Write error: %s", net_strerror (net_errno));
+ goto out;
case 0:
continue;
}
+ if ((ufd[0].revents & POLLERR) && (i_total > 0))
+ return i_total; // error will be dequeued separately on next call
+
if (p_vs != NULL)
val = p_vs->pf_send (p_vs->p_sys, p_data, i_data);
else
#endif
if (val == -1)
- return i_total ? (int)i_total : -1;
+ {
+ msg_Err (p_this, "Write error: %s", net_strerror (net_errno));
+ break;
+ }
if (val == 0)
return i_total;
i_total += val;
}
- return i_total;
+out:
+ if ((i_total > 0) || (i_data == 0))
+ return i_total;
+
+ return -1;
}
char *__net_Gets( vlc_object_t *p_this, int fd, const v_socket_t *p_vs )
return psz_line;
}
-int net_Printf( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
- const char *psz_fmt, ... )
+ssize_t net_Printf( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
+ const char *psz_fmt, ... )
{
int i_ret;
va_list args;
return i_ret;
}
-int __net_vaPrintf( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
- const char *psz_fmt, va_list args )
+ssize_t __net_vaPrintf( vlc_object_t *p_this, int fd, const v_socket_t *p_vs,
+ const char *psz_fmt, va_list args )
{
char *psz;
int i_size, i_ret;
return 0;
}
#endif /* HAVE_INET_PTON */
+
+#ifndef HAVE_INET_NTOP
+#ifdef WIN32
+const char *inet_ntop(int af, const void * src,
+ char * dst, socklen_t cnt)
+{
+ switch( af )
+ {
+#ifdef AF_INET6
+ case AF_INET6:
+ {
+ struct sockaddr_in6 addr;
+ memset(&addr, 0, sizeof(addr));
+ addr.sin6_family = AF_INET6;
+ addr.sin6_addr = *((struct in6_addr*)src);
+ if( 0 == WSAAddressToStringA((LPSOCKADDR)&addr,
+ sizeof(struct sockaddr_in6),
+ NULL, dst, &cnt) )
+ {
+ dst[cnt] = '\0';
+ return dst;
+ }
+ errno = WSAGetLastError();
+ return NULL;
+
+ }
+
+#endif
+ case AF_INET:
+ {
+ struct sockaddr_in addr;
+ memset(&addr, 0, sizeof(addr));
+ addr.sin_family = AF_INET;
+ addr.sin_addr = *((struct in_addr*)src);
+ if( 0 == WSAAddressToStringA((LPSOCKADDR)&addr,
+ sizeof(struct sockaddr_in),
+ NULL, dst, &cnt) )
+ {
+ dst[cnt] = '\0';
+ return dst;
+ }
+ errno = WSAGetLastError();
+ return NULL;
+
+ }
+ }
+ errno = EAFNOSUPPORT;
+ return NULL;
+}
+#endif
+#endif