mirror of
https://github.com/php/php-src.git
synced 2024-11-24 10:24:11 +08:00
951 lines
22 KiB
C
951 lines
22 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 4 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2003 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.0 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_0.txt. |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Author: Stig Venaas <venaas@uninett.no> |
|
|
| Streams work by Wez Furlong <wez@thebrainroom.com> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
/*#define DEBUG_MAIN_NETWORK 1*/
|
|
|
|
#include "php.h"
|
|
|
|
#include <stddef.h>
|
|
|
|
#ifdef PHP_WIN32
|
|
#define O_RDONLY _O_RDONLY
|
|
#include "win32/param.h"
|
|
#elif defined(NETWARE)
|
|
#ifdef NEW_LIBC
|
|
#include <sys/timeval.h>
|
|
#include <sys/param.h>
|
|
#else
|
|
#include "netware/time_nw.h"
|
|
#endif
|
|
#else
|
|
#include <sys/param.h>
|
|
#endif
|
|
|
|
#include <sys/types.h>
|
|
#if HAVE_SYS_SOCKET_H
|
|
#include <sys/socket.h>
|
|
#endif
|
|
|
|
#ifndef _FCNTL_H
|
|
#include <fcntl.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_SELECT_H
|
|
#include <sys/select.h>
|
|
#endif
|
|
#if HAVE_SYS_POLL_H
|
|
#include <sys/poll.h>
|
|
#endif
|
|
|
|
#if defined(NETWARE)
|
|
#ifdef USE_WINSOCK
|
|
/*#include <ws2nlm.h>*/
|
|
#include <novsock2.h>
|
|
#else
|
|
/* New headers for socket stuff */
|
|
#ifdef NEW_LIBC
|
|
#include <netinet/in.h>
|
|
#include <netdb.h>
|
|
#include <sys/select.h>
|
|
#endif
|
|
#include <sys/socket.h>
|
|
#endif
|
|
#elif !defined(PHP_WIN32)
|
|
#include <netinet/in.h>
|
|
#include <netdb.h>
|
|
#if HAVE_ARPA_INET_H
|
|
#include <arpa/inet.h>
|
|
#endif
|
|
#endif
|
|
|
|
#ifndef HAVE_INET_ATON
|
|
int inet_aton(const char *, struct in_addr *);
|
|
#endif
|
|
|
|
#include "php_network.h"
|
|
|
|
#if defined(PHP_WIN32) || defined(__riscos__) || defined(NETWARE)
|
|
#undef AF_UNIX
|
|
#endif
|
|
|
|
#if defined(AF_UNIX)
|
|
#include <sys/un.h>
|
|
#endif
|
|
|
|
#include "ext/standard/file.h"
|
|
|
|
#ifdef PHP_WIN32
|
|
# include "win32/time.h"
|
|
# define SOCK_ERR INVALID_SOCKET
|
|
# define SOCK_CONN_ERR SOCKET_ERROR
|
|
# define PHP_TIMEOUT_ERROR_VALUE WSAETIMEDOUT
|
|
#else
|
|
# define SOCK_ERR -1
|
|
# define SOCK_CONN_ERR -1
|
|
# define PHP_TIMEOUT_ERROR_VALUE ETIMEDOUT
|
|
#endif
|
|
|
|
#ifdef HAVE_GETADDRINFO
|
|
#ifdef HAVE_GAI_STRERROR
|
|
# define PHP_GAI_STRERROR(x) (gai_strerror(x))
|
|
#else
|
|
# define PHP_GAI_STRERROR(x) (php_gai_strerror(x))
|
|
/* {{{ php_gai_strerror
|
|
*/
|
|
static char *php_gai_strerror(int code)
|
|
{
|
|
static struct {
|
|
int code;
|
|
const char *msg;
|
|
} values[] = {
|
|
# ifdef EAI_ADDRFAMILY
|
|
{EAI_ADDRFAMILY, "Address family for hostname not supported"},
|
|
# endif
|
|
{EAI_AGAIN, "Temporary failure in name resolution"},
|
|
{EAI_BADFLAGS, "Bad value for ai_flags"},
|
|
{EAI_FAIL, "Non-recoverable failure in name resolution"},
|
|
{EAI_FAMILY, "ai_family not supported"},
|
|
{EAI_MEMORY, "Memory allocation failure"},
|
|
# ifdef EAI_NODATA
|
|
{EAI_NODATA, "No address associated with hostname"},
|
|
# endif
|
|
{EAI_NONAME, "Name or service not known"},
|
|
{EAI_SERVICE, "Servname not supported for ai_socktype"},
|
|
{EAI_SOCKTYPE, "ai_socktype not supported"},
|
|
{EAI_SYSTEM, "System error"},
|
|
{0, NULL}
|
|
};
|
|
int i;
|
|
|
|
for (i = 0; values[i].msg != NULL; i++) {
|
|
if (values[i].code == code) {
|
|
return (char *)values[i].msg;
|
|
}
|
|
}
|
|
|
|
return "Unknown error";
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
#endif
|
|
|
|
/* {{{ php_network_freeaddresses
|
|
*/
|
|
static void php_network_freeaddresses(struct sockaddr **sal)
|
|
{
|
|
struct sockaddr **sap;
|
|
|
|
if (sal == NULL)
|
|
return;
|
|
for (sap = sal; *sap != NULL; sap++)
|
|
efree(*sap);
|
|
efree(sal);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ php_network_getaddresses
|
|
* Returns number of addresses, 0 for none/error
|
|
*/
|
|
static int php_network_getaddresses(const char *host, int socktype, struct sockaddr ***sal, char **error_string TSRMLS_DC)
|
|
{
|
|
struct sockaddr **sap;
|
|
int n;
|
|
#ifdef HAVE_GETADDRINFO
|
|
static int ipv6_borked = -1; /* the way this is used *is* thread safe */
|
|
struct addrinfo hints, *res, *sai;
|
|
#else
|
|
struct hostent *host_info;
|
|
struct in_addr in;
|
|
#endif
|
|
|
|
if (host == NULL) {
|
|
return 0;
|
|
}
|
|
#ifdef HAVE_GETADDRINFO
|
|
memset(&hints, '\0', sizeof(hints));
|
|
|
|
hints.ai_family = AF_INET; /* default to regular inet (see below) */
|
|
hints.ai_socktype = socktype;
|
|
|
|
# ifdef HAVE_IPV6
|
|
/* probe for a working IPv6 stack; even if detected as having v6 at compile
|
|
* time, at runtime some stacks are slow to resolve or have other issues
|
|
* if they are not correctly configured.
|
|
* static variable use is safe here since simple store or fetch operations
|
|
* are atomic and because the actual probe process is not in danger of
|
|
* collisions or race conditions. */
|
|
if (ipv6_borked == -1) {
|
|
int s;
|
|
|
|
s = socket(PF_INET6, SOCK_DGRAM, 0);
|
|
if (s == SOCK_ERR) {
|
|
ipv6_borked = 1;
|
|
} else {
|
|
ipv6_borked = 0;
|
|
closesocket(s);
|
|
}
|
|
}
|
|
hints.ai_family = ipv6_borked ? AF_INET : AF_UNSPEC;
|
|
# endif
|
|
|
|
if ((n = getaddrinfo(host, NULL, &hints, &res))) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "php_network_getaddresses: getaddrinfo failed: %s", PHP_GAI_STRERROR(n));
|
|
return 0;
|
|
} else if (res == NULL) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "php_network_getaddresses: getaddrinfo failed (null result pointer)");
|
|
return 0;
|
|
}
|
|
|
|
sai = res;
|
|
for (n = 1; (sai = sai->ai_next) != NULL; n++)
|
|
;
|
|
|
|
*sal = safe_emalloc((n + 1), sizeof(*sal), 0);
|
|
sai = res;
|
|
sap = *sal;
|
|
|
|
do {
|
|
*sap = emalloc(sai->ai_addrlen);
|
|
memcpy(*sap, sai->ai_addr, sai->ai_addrlen);
|
|
sap++;
|
|
} while ((sai = sai->ai_next) != NULL);
|
|
|
|
freeaddrinfo(res);
|
|
#else
|
|
if (!inet_aton(host, &in)) {
|
|
/* XXX NOT THREAD SAFE (is safe under win32) */
|
|
host_info = gethostbyname(host);
|
|
if (host_info == NULL) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "php_network_getaddresses: gethostbyname failed");
|
|
return 0;
|
|
}
|
|
in = *((struct in_addr *) host_info->h_addr);
|
|
}
|
|
|
|
*sal = safe_emalloc(2, sizeof(*sal), 0);
|
|
sap = *sal;
|
|
*sap = emalloc(sizeof(struct sockaddr_in));
|
|
(*sap)->sa_family = AF_INET;
|
|
((struct sockaddr_in *)*sap)->sin_addr = in;
|
|
sap++;
|
|
n = 1;
|
|
#endif
|
|
|
|
*sap = NULL;
|
|
return n;
|
|
}
|
|
/* }}} */
|
|
|
|
#ifndef O_NONBLOCK
|
|
#define O_NONBLOCK O_NDELAY
|
|
#endif
|
|
|
|
#if !defined(__BEOS__)
|
|
# define HAVE_NON_BLOCKING_CONNECT 1
|
|
# ifdef PHP_WIN32
|
|
typedef u_long php_non_blocking_flags_t;
|
|
# define SET_SOCKET_BLOCKING_MODE(sock, save) \
|
|
save = TRUE; ioctlsocket(sock, FIONBIO, &save)
|
|
# define RESTORE_SOCKET_BLOCKING_MODE(sock, save) \
|
|
ioctlsocket(sock, FIONBIO, &save)
|
|
# else
|
|
typedef int php_non_blocking_flags_t;
|
|
# define SET_SOCKET_BLOCKING_MODE(sock, save) \
|
|
save = fcntl(sock, F_GETFL, 0); \
|
|
fcntl(sock, F_SETFL, save | O_NONBLOCK)
|
|
# define RESTORE_SOCKET_BLOCKING_MODE(sock, save) \
|
|
fcntl(sock, F_SETFL, save)
|
|
# endif
|
|
#endif
|
|
|
|
/* Connect to a socket using an interruptible connect with optional timeout.
|
|
* Optionally, the connect can be made asynchronously, which will implicitly
|
|
* enable non-blocking mode on the socket.
|
|
* */
|
|
/* {{{ php_network_connect_socket */
|
|
PHPAPI int php_network_connect_socket(php_socket_t sockfd,
|
|
const struct sockaddr *addr,
|
|
socklen_t addrlen,
|
|
int asynchronous,
|
|
struct timeval *timeout,
|
|
char **error_string,
|
|
int *error_code)
|
|
{
|
|
#if HAVE_NON_BLOCKING_CONNECT
|
|
php_non_blocking_flags_t orig_flags;
|
|
int n;
|
|
int error = 0;
|
|
socklen_t len;
|
|
int ret = 0;
|
|
fd_set rset;
|
|
fd_set wset;
|
|
fd_set eset;
|
|
|
|
SET_SOCKET_BLOCKING_MODE(sockfd, orig_flags);
|
|
|
|
if ((n = connect(sockfd, addr, addrlen)) < 0) {
|
|
error = php_socket_errno();
|
|
|
|
if (error_code) {
|
|
*error_code = error;
|
|
}
|
|
|
|
if (error != EINPROGRESS) {
|
|
if (error_string) {
|
|
*error_string = php_socket_strerror(error, NULL, 0);
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
if (asynchronous && error == EINPROGRESS) {
|
|
/* this is fine by us */
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
if (n == 0) {
|
|
goto ok;
|
|
}
|
|
|
|
FD_ZERO(&rset);
|
|
FD_ZERO(&eset);
|
|
FD_SET(sockfd, &rset);
|
|
FD_SET(sockfd, &eset);
|
|
|
|
wset = rset;
|
|
|
|
if ((n = select(sockfd + 1, &rset, &wset, &eset, timeout)) == 0) {
|
|
error = PHP_TIMEOUT_ERROR_VALUE;
|
|
}
|
|
|
|
if(FD_ISSET(sockfd, &rset) || FD_ISSET(sockfd, &wset)) {
|
|
len = sizeof(error);
|
|
/*
|
|
BSD-derived systems set errno correctly
|
|
Solaris returns -1 from getsockopt in case of error
|
|
*/
|
|
if (getsockopt(sockfd, SOL_SOCKET, SO_ERROR, (char*)&error, &len) < 0) {
|
|
ret = -1;
|
|
}
|
|
} else {
|
|
/* whoops: sockfd has disappeared */
|
|
ret = -1;
|
|
}
|
|
|
|
ok:
|
|
if (!asynchronous) {
|
|
/* back to blocking mode */
|
|
RESTORE_SOCKET_BLOCKING_MODE(sockfd, orig_flags);
|
|
}
|
|
|
|
if (error_code) {
|
|
*error_code = error;
|
|
}
|
|
|
|
if (error && error_string) {
|
|
*error_string = php_socket_strerror(error, NULL, 0);
|
|
ret = -1;
|
|
}
|
|
return ret;
|
|
#else
|
|
if (asynchronous) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "Asynchronous connect() not supported on this platform");
|
|
}
|
|
return connect(sockfd, addr, addrlen);
|
|
#endif
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ sub_times */
|
|
static inline void sub_times(struct timeval a, struct timeval b, struct timeval *result)
|
|
{
|
|
result->tv_usec = a.tv_usec - b.tv_usec;
|
|
if (result->tv_usec < 0L) {
|
|
a.tv_sec--;
|
|
result->tv_usec += 1000000L;
|
|
}
|
|
result->tv_sec = a.tv_sec - b.tv_sec;
|
|
if (result->tv_sec < 0L) {
|
|
result->tv_sec++;
|
|
result->tv_usec -= 1000000L;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* Bind to a local IP address.
|
|
* Returns the bound socket, or -1 on failure.
|
|
* */
|
|
/* {{{ php_network_bind_socket_to_local_addr */
|
|
php_socket_t php_network_bind_socket_to_local_addr(const char *host, unsigned port,
|
|
int socktype, char **error_string, int *error_code
|
|
TSRMLS_DC)
|
|
{
|
|
int num_addrs, n, err = 0;
|
|
php_socket_t sock;
|
|
struct sockaddr **sal, **psal, *sa;
|
|
socklen_t socklen;
|
|
|
|
num_addrs = php_network_getaddresses(host, socktype, &psal, error_string TSRMLS_CC);
|
|
|
|
if (num_addrs == 0) {
|
|
/* could not resolve address(es) */
|
|
return -1;
|
|
}
|
|
|
|
for (sal = psal; *sal != NULL; sal++) {
|
|
sa = *sal;
|
|
|
|
/* create a socket for this address */
|
|
sock = socket(sa->sa_family, socktype, 0);
|
|
|
|
if (sock == SOCK_ERR) {
|
|
continue;
|
|
}
|
|
|
|
switch (sa->sa_family) {
|
|
#if HAVE_GETADDRINFO && HAVE_IPV6
|
|
case AF_INET6:
|
|
((struct sockaddr_in6 *)sa)->sin6_family = sa->sa_family;
|
|
((struct sockaddr_in6 *)sa)->sin6_port = htons(port);
|
|
socklen = sizeof(struct sockaddr_in6);
|
|
break;
|
|
#endif
|
|
case AF_INET:
|
|
((struct sockaddr_in *)sa)->sin_family = sa->sa_family;
|
|
((struct sockaddr_in *)sa)->sin_port = htons(port);
|
|
socklen = sizeof(struct sockaddr_in);
|
|
break;
|
|
default:
|
|
/* Unknown family */
|
|
socklen = 0;
|
|
sa = NULL;
|
|
}
|
|
|
|
if (sa) {
|
|
/* attempt to bind */
|
|
|
|
#ifdef SO_REUSEADDR
|
|
{
|
|
int val = 1;
|
|
setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (char*)&val, sizeof(val));
|
|
}
|
|
#endif
|
|
|
|
n = bind(sock, sa, socklen);
|
|
|
|
if (n != SOCK_CONN_ERR) {
|
|
goto bound;
|
|
}
|
|
|
|
err = php_socket_errno();
|
|
}
|
|
|
|
close(sock);
|
|
}
|
|
sock = -1;
|
|
|
|
if (error_code) {
|
|
*error_code = err;
|
|
}
|
|
if (error_string) {
|
|
*error_string = php_socket_strerror(err, NULL, 0);
|
|
}
|
|
|
|
bound:
|
|
|
|
php_network_freeaddresses(psal);
|
|
|
|
return sock;
|
|
|
|
}
|
|
/* }}} */
|
|
|
|
static void populate_name(
|
|
/* input address */
|
|
struct sockaddr *sa, socklen_t sl,
|
|
/* output readable address */
|
|
char **textaddr, long *textaddrlen,
|
|
/* output address */
|
|
struct sockaddr **addr,
|
|
socklen_t *addrlen
|
|
TSRMLS_DC)
|
|
{
|
|
if (addr) {
|
|
*addr = emalloc(sl);
|
|
memcpy(*addr, sa, sl);
|
|
*addrlen = sl;
|
|
}
|
|
|
|
if (textaddr) {
|
|
#if HAVE_IPV6 && HAVE_INET_NTOP
|
|
char abuf[256];
|
|
#endif
|
|
char *buf = NULL;
|
|
|
|
switch (sa->sa_family) {
|
|
case AF_INET:
|
|
/* generally not thread safe, but it *is* thread safe under win32 */
|
|
buf = inet_ntoa(((struct sockaddr_in*)sa)->sin_addr);
|
|
if (buf) {
|
|
*textaddrlen = strlen(buf);
|
|
*textaddr = estrndup(buf, *textaddrlen);
|
|
}
|
|
|
|
break;
|
|
|
|
#if HAVE_IPV6 && HAVE_INET_NTOP
|
|
case AF_INET6:
|
|
buf = (char*)inet_ntop(sa->sa_family, &((struct sockaddr_in6*)sa)->sin6_addr, (char *)&abuf, sizeof(abuf));
|
|
if (buf) {
|
|
*textaddrlen = strlen(buf);
|
|
*textaddr = estrndup(buf, *textaddrlen);
|
|
}
|
|
|
|
break;
|
|
#endif
|
|
#ifdef AF_UNIX
|
|
case AF_UNIX:
|
|
{
|
|
struct sockaddr_un *ua = (struct sockaddr_un*)sa;
|
|
|
|
if (ua->sun_path[0] == '\0') {
|
|
/* abstract name */
|
|
int len = strlen(ua->sun_path + 1) + 1;
|
|
*textaddrlen = len;
|
|
*textaddr = emalloc(len + 1);
|
|
memcpy(*textaddr, ua->sun_path, len);
|
|
(*textaddr)[len] = '\0';
|
|
} else {
|
|
*textaddrlen = strlen(ua->sun_path);
|
|
*textaddr = estrndup(ua->sun_path, *textaddrlen);
|
|
}
|
|
}
|
|
break;
|
|
#endif
|
|
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
PHPAPI int php_network_get_peer_name(php_socket_t sock,
|
|
char **textaddr, long *textaddrlen,
|
|
struct sockaddr **addr,
|
|
socklen_t *addrlen
|
|
TSRMLS_DC)
|
|
{
|
|
php_sockaddr_storage sa;
|
|
socklen_t sl = sizeof(sa);
|
|
|
|
if (getpeername(sock, (struct sockaddr*)&sa, &sl) == 0) {
|
|
populate_name((struct sockaddr*)&sa, sl,
|
|
textaddr, textaddrlen,
|
|
addr, addrlen
|
|
TSRMLS_CC);
|
|
return 0;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
PHPAPI int php_network_get_sock_name(php_socket_t sock,
|
|
char **textaddr, long *textaddrlen,
|
|
struct sockaddr **addr,
|
|
socklen_t *addrlen
|
|
TSRMLS_DC)
|
|
{
|
|
php_sockaddr_storage sa;
|
|
socklen_t sl = sizeof(sa);
|
|
|
|
if (getsockname(sock, (struct sockaddr*)&sa, &sl) == 0) {
|
|
populate_name((struct sockaddr*)&sa, sl,
|
|
textaddr, textaddrlen,
|
|
addr, addrlen
|
|
TSRMLS_CC);
|
|
return 0;
|
|
}
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
/* Accept a client connection from a server socket,
|
|
* using an optional timeout.
|
|
* Returns the peer address in addr/addrlen (it will emalloc
|
|
* these, so be sure to efree the result).
|
|
* If you specify textaddr/textaddrlen, a text-printable
|
|
* version of the address will be emalloc'd and returned.
|
|
* */
|
|
|
|
/* {{{ php_network_accept_incoming */
|
|
PHPAPI php_socket_t php_network_accept_incoming(php_socket_t srvsock,
|
|
char **textaddr, long *textaddrlen,
|
|
struct sockaddr **addr,
|
|
socklen_t *addrlen,
|
|
struct timeval *timeout,
|
|
char **error_string,
|
|
int *error_code
|
|
TSRMLS_DC)
|
|
{
|
|
php_socket_t clisock = -1;
|
|
fd_set rset;
|
|
int error = 0, n;
|
|
php_sockaddr_storage sa;
|
|
socklen_t sl;
|
|
|
|
FD_ZERO(&rset);
|
|
FD_SET(srvsock, &rset);
|
|
|
|
n = select(srvsock + 1, &rset, NULL, NULL, timeout);
|
|
|
|
if (n == 0) {
|
|
error = PHP_TIMEOUT_ERROR_VALUE;
|
|
} else if (n == -1) {
|
|
error = php_socket_errno();
|
|
} else if (FD_ISSET(srvsock, &rset)) {
|
|
sl = sizeof(sa);
|
|
|
|
clisock = accept(srvsock, (struct sockaddr*)&sa, &sl);
|
|
|
|
if (clisock >= 0) {
|
|
populate_name((struct sockaddr*)&sa, sl,
|
|
textaddr, textaddrlen,
|
|
addr, addrlen
|
|
TSRMLS_CC);
|
|
} else {
|
|
error = php_socket_errno();
|
|
}
|
|
}
|
|
|
|
if (error_code) {
|
|
*error_code = error;
|
|
}
|
|
if (error_string) {
|
|
*error_string = php_socket_strerror(error, NULL, 0);
|
|
}
|
|
|
|
return clisock;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* Connect to a remote host using an interruptible connect with optional timeout.
|
|
* Optionally, the connect can be made asynchronously, which will implicitly
|
|
* enable non-blocking mode on the socket.
|
|
* Returns the connected (or connecting) socket, or -1 on failure.
|
|
* */
|
|
|
|
/* {{{ php_network_connect_socket_to_host */
|
|
php_socket_t php_network_connect_socket_to_host(const char *host, unsigned short port,
|
|
int socktype, int asynchronous, struct timeval *timeout, char **error_string,
|
|
int *error_code
|
|
TSRMLS_DC)
|
|
{
|
|
int num_addrs, n, fatal = 0;
|
|
php_socket_t sock;
|
|
struct sockaddr **sal, **psal, *sa;
|
|
struct timeval working_timeout;
|
|
socklen_t socklen;
|
|
#if HAVE_GETTIMEOFDAY
|
|
struct timeval limit_time, time_now;
|
|
#endif
|
|
|
|
num_addrs = php_network_getaddresses(host, socktype, &psal, error_string TSRMLS_CC);
|
|
|
|
if (num_addrs == 0) {
|
|
/* could not resolve address(es) */
|
|
return -1;
|
|
}
|
|
|
|
if (timeout) {
|
|
memcpy(&working_timeout, timeout, sizeof(working_timeout));
|
|
#if HAVE_GETTIMEOFDAY
|
|
gettimeofday(&limit_time, NULL);
|
|
limit_time.tv_sec += working_timeout.tv_sec;
|
|
limit_time.tv_usec += working_timeout.tv_usec;
|
|
if (limit_time.tv_usec >= 1000000) {
|
|
limit_time.tv_usec -= 1000000;
|
|
limit_time.tv_sec++;
|
|
}
|
|
#endif
|
|
}
|
|
|
|
for (sal = psal; !fatal && *sal != NULL; sal++) {
|
|
sa = *sal;
|
|
|
|
/* create a socket for this address */
|
|
sock = socket(sa->sa_family, socktype, 0);
|
|
|
|
if (sock == SOCK_ERR) {
|
|
continue;
|
|
}
|
|
|
|
switch (sa->sa_family) {
|
|
#if HAVE_GETADDRINFO && HAVE_IPV6
|
|
case AF_INET6:
|
|
((struct sockaddr_in6 *)sa)->sin6_family = sa->sa_family;
|
|
((struct sockaddr_in6 *)sa)->sin6_port = htons(port);
|
|
socklen = sizeof(struct sockaddr_in6);
|
|
break;
|
|
#endif
|
|
case AF_INET:
|
|
((struct sockaddr_in *)sa)->sin_family = sa->sa_family;
|
|
((struct sockaddr_in *)sa)->sin_port = htons(port);
|
|
socklen = sizeof(struct sockaddr_in);
|
|
break;
|
|
default:
|
|
/* Unknown family */
|
|
socklen = 0;
|
|
sa = NULL;
|
|
}
|
|
|
|
if (sa) {
|
|
/* make a connection attempt */
|
|
|
|
n = php_network_connect_socket(sock, sa, socklen, asynchronous,
|
|
timeout ? &working_timeout : NULL,
|
|
error_string, error_code);
|
|
|
|
if (n != SOCK_CONN_ERR) {
|
|
goto connected;
|
|
}
|
|
|
|
/* adjust timeout for next attempt */
|
|
#if HAVE_GETTIMEOFDAY
|
|
if (timeout) {
|
|
gettimeofday(&time_now, NULL);
|
|
|
|
if (timercmp(&time_now, &limit_time, >=)) {
|
|
/* time limit expired; don't attempt any further connections */
|
|
fatal = 1;
|
|
} else {
|
|
/* work out remaining time */
|
|
sub_times(limit_time, time_now, &working_timeout);
|
|
}
|
|
}
|
|
#else
|
|
if (err == PHP_TIMEOUT_ERROR_VALUE) {
|
|
/* Don't even bother trying to connect to the next alternative;
|
|
* we have no way to determine how long we have already taken
|
|
* and it is quite likely that the next attempt will fail too. */
|
|
fatal = 1;
|
|
} else {
|
|
/* re-use the same initial timeout.
|
|
* Not the best thing, but in practice it should be good-enough */
|
|
if (timeout) {
|
|
memcpy(&working_timeout, timeout, sizeof(working_timeout));
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
close(sock);
|
|
}
|
|
sock = -1;
|
|
|
|
connected:
|
|
|
|
php_network_freeaddresses(psal);
|
|
|
|
return sock;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ php_any_addr
|
|
* Fills the any (wildcard) address into php_sockaddr_storage
|
|
*/
|
|
void php_any_addr(int family, php_sockaddr_storage *addr, unsigned short port)
|
|
{
|
|
memset(addr, 0, sizeof(php_sockaddr_storage));
|
|
switch (family) {
|
|
#ifdef HAVE_IPV6
|
|
case AF_INET6: {
|
|
struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) addr;
|
|
sin6->sin6_family = AF_INET6;
|
|
sin6->sin6_port = htons(port);
|
|
sin6->sin6_addr = in6addr_any;
|
|
break;
|
|
}
|
|
#endif
|
|
case AF_INET: {
|
|
struct sockaddr_in *sin = (struct sockaddr_in *) addr;
|
|
sin->sin_family = AF_INET;
|
|
sin->sin_port = htons(port);
|
|
sin->sin_addr.s_addr = htonl(INADDR_ANY);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ php_sockaddr_size
|
|
* Returns the size of struct sockaddr_xx for the family
|
|
*/
|
|
int php_sockaddr_size(php_sockaddr_storage *addr)
|
|
{
|
|
switch (((struct sockaddr *)addr)->sa_family) {
|
|
case AF_INET:
|
|
return sizeof(struct sockaddr_in);
|
|
#ifdef HAVE_IPV6
|
|
case AF_INET6:
|
|
return sizeof(struct sockaddr_in6);
|
|
#endif
|
|
#ifdef AF_UNIX
|
|
case AF_UNIX:
|
|
return sizeof(struct sockaddr_un);
|
|
#endif
|
|
default:
|
|
return 0;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* Given a socket error code, if buf == NULL:
|
|
* emallocs storage for the error message and returns
|
|
* else
|
|
* sprintf message into provided buffer and returns buf
|
|
*/
|
|
/* {{{ php_socket_strerror */
|
|
PHPAPI char *php_socket_strerror(long err, char *buf, size_t bufsize)
|
|
{
|
|
#ifndef PHP_WIN32
|
|
char *errstr;
|
|
|
|
errstr = strerror(err);
|
|
if (buf == NULL) {
|
|
buf = estrdup(errstr);
|
|
} else {
|
|
strncpy(buf, errstr, bufsize);
|
|
}
|
|
return buf;
|
|
#else
|
|
char *sysbuf;
|
|
int free_it = 1;
|
|
|
|
if (!FormatMessage(
|
|
FORMAT_MESSAGE_ALLOCATE_BUFFER |
|
|
FORMAT_MESSAGE_FROM_SYSTEM |
|
|
FORMAT_MESSAGE_IGNORE_INSERTS,
|
|
NULL,
|
|
err,
|
|
MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
|
|
(LPTSTR)&sysbuf,
|
|
0,
|
|
NULL)) {
|
|
free_it = 0;
|
|
sysbuf = "Unknown Error";
|
|
}
|
|
|
|
if (buf == NULL) {
|
|
buf = estrdup(sysbuf);
|
|
} else {
|
|
strncpy(buf, sysbuf, bufsize);
|
|
}
|
|
|
|
if (free_it) {
|
|
LocalFree(sysbuf);
|
|
}
|
|
|
|
return buf;
|
|
#endif
|
|
}
|
|
/* }}} */
|
|
|
|
/* deprecated */
|
|
PHPAPI php_stream *_php_stream_sock_open_from_socket(php_socket_t socket, const char *persistent_id STREAMS_DC TSRMLS_DC)
|
|
{
|
|
php_stream *stream;
|
|
php_netstream_data_t *sock;
|
|
|
|
sock = pemalloc(sizeof(php_netstream_data_t), persistent_id ? 1 : 0);
|
|
memset(sock, 0, sizeof(php_netstream_data_t));
|
|
|
|
sock->is_blocked = 1;
|
|
sock->timeout.tv_sec = FG(default_socket_timeout);
|
|
sock->timeout.tv_usec = 0;
|
|
sock->socket = socket;
|
|
|
|
stream = php_stream_alloc_rel(&php_stream_generic_socket_ops, sock, persistent_id, "r+");
|
|
stream->flags |= PHP_STREAM_FLAG_AVOID_BLOCKING;
|
|
|
|
if (stream == NULL)
|
|
pefree(sock, persistent_id ? 1 : 0);
|
|
|
|
return stream;
|
|
}
|
|
|
|
PHPAPI php_stream *_php_stream_sock_open_host(const char *host, unsigned short port,
|
|
int socktype, struct timeval *timeout, const char *persistent_id STREAMS_DC TSRMLS_DC)
|
|
{
|
|
char *res;
|
|
long reslen;
|
|
php_stream *stream;
|
|
|
|
reslen = spprintf(&res, 0, "tcp://%s:%d", host, port);
|
|
|
|
stream = php_stream_xport_create(res, reslen, ENFORCE_SAFE_MODE | REPORT_ERRORS,
|
|
STREAM_XPORT_CLIENT | STREAM_XPORT_CONNECT, persistent_id, timeout, NULL, NULL, NULL);
|
|
|
|
efree(res);
|
|
|
|
return stream;
|
|
}
|
|
|
|
PHPAPI int php_set_sock_blocking(int socketd, int block TSRMLS_DC)
|
|
{
|
|
int ret = SUCCESS;
|
|
int flags;
|
|
int myflag = 0;
|
|
|
|
#ifdef PHP_WIN32
|
|
/* with ioctlsocket, a non-zero sets nonblocking, a zero sets blocking */
|
|
flags = !block;
|
|
if (ioctlsocket(socketd, FIONBIO, &flags)==SOCKET_ERROR){
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", WSAGetLastError());
|
|
ret = FALSE;
|
|
}
|
|
#else
|
|
flags = fcntl(socketd, F_GETFL);
|
|
#ifdef O_NONBLOCK
|
|
myflag = O_NONBLOCK; /* POSIX version */
|
|
#elif defined(O_NDELAY)
|
|
myflag = O_NDELAY; /* old non-POSIX version */
|
|
#endif
|
|
if (!block) {
|
|
flags |= myflag;
|
|
} else {
|
|
flags &= ~myflag;
|
|
}
|
|
fcntl(socketd, F_SETFL, flags);
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 8
|
|
* c-basic-offset: 8
|
|
* End:
|
|
* vim600: sw=4 ts=4 fdm=marker
|
|
* vim<600: sw=4 ts=4
|
|
*/
|