561 lines
17 KiB
C
561 lines
17 KiB
C
/* Extracted from anet.c to work properly with Hiredis error reporting.
|
|
*
|
|
* Copyright (c) 2009-2011, Salvatore Sanfilippo <antirez at gmail dot com>
|
|
* Copyright (c) 2010-2014, Pieter Noordhuis <pcnoordhuis at gmail dot com>
|
|
* Copyright (c) 2015, Matt Stancliff <matt at genges dot com>,
|
|
* Jan-Erik Rediger <janerik at fnordig dot com>
|
|
*
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions are met:
|
|
*
|
|
* * Redistributions of source code must retain the above copyright notice,
|
|
* this list of conditions and the following disclaimer.
|
|
* * Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* * Neither the name of Redis nor the names of its contributors may be used
|
|
* to endorse or promote products derived from this software without
|
|
* specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include "fmacros.h"
|
|
#include <sys/types.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <limits.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "net.h"
|
|
#include "sds.h"
|
|
#include "sockcompat.h"
|
|
#include "win32.h"
|
|
|
|
/* Defined in hiredis.c */
|
|
void __redisSetError(redisContext *c, int type, const char *str);
|
|
|
|
void redisNetClose(redisContext *c) {
|
|
if (c && c->fd != REDIS_INVALID_FD) {
|
|
close(c->fd);
|
|
c->fd = REDIS_INVALID_FD;
|
|
}
|
|
}
|
|
|
|
int redisNetRead(redisContext *c, char *buf, size_t bufcap) {
|
|
int nread = recv(c->fd, buf, bufcap, 0);
|
|
if (nread == -1) {
|
|
if ((errno == EWOULDBLOCK && !(c->flags & REDIS_BLOCK)) || (errno == EINTR)) {
|
|
/* Try again later */
|
|
return 0;
|
|
} else {
|
|
__redisSetError(c, REDIS_ERR_IO, NULL);
|
|
return -1;
|
|
}
|
|
} else if (nread == 0) {
|
|
__redisSetError(c, REDIS_ERR_EOF, "Server closed the connection");
|
|
return -1;
|
|
} else {
|
|
return nread;
|
|
}
|
|
}
|
|
|
|
int redisNetWrite(redisContext *c) {
|
|
int nwritten = send(c->fd, c->obuf, sdslen(c->obuf), 0);
|
|
if (nwritten < 0) {
|
|
if ((errno == EWOULDBLOCK && !(c->flags & REDIS_BLOCK)) || (errno == EINTR)) {
|
|
/* Try again later */
|
|
} else {
|
|
__redisSetError(c, REDIS_ERR_IO, NULL);
|
|
return -1;
|
|
}
|
|
}
|
|
return nwritten;
|
|
}
|
|
|
|
static void __redisSetErrorFromErrno(redisContext *c, int type, const char *prefix) {
|
|
int errorno = errno; /* snprintf() may change errno */
|
|
char buf[128] = { 0 };
|
|
size_t len = 0;
|
|
|
|
if (prefix != NULL)
|
|
len = snprintf(buf,sizeof(buf),"%s: ",prefix);
|
|
strerror_r(errorno, (char *)(buf + len), sizeof(buf) - len);
|
|
__redisSetError(c,type,buf);
|
|
}
|
|
|
|
static int redisSetReuseAddr(redisContext *c) {
|
|
int on = 1;
|
|
if (setsockopt(c->fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on)) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,NULL);
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
return REDIS_OK;
|
|
}
|
|
|
|
static int redisCreateSocket(redisContext *c, int type) {
|
|
redisFD s;
|
|
if ((s = socket(type, SOCK_STREAM, 0)) == REDIS_INVALID_FD) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,NULL);
|
|
return REDIS_ERR;
|
|
}
|
|
c->fd = s;
|
|
if (type == AF_INET) {
|
|
if (redisSetReuseAddr(c) == REDIS_ERR) {
|
|
return REDIS_ERR;
|
|
}
|
|
}
|
|
return REDIS_OK;
|
|
}
|
|
|
|
static int redisSetBlocking(redisContext *c, int blocking) {
|
|
#ifndef _WIN32
|
|
int flags;
|
|
|
|
/* Set the socket nonblocking.
|
|
* Note that fcntl(2) for F_GETFL and F_SETFL can't be
|
|
* interrupted by a signal. */
|
|
if ((flags = fcntl(c->fd, F_GETFL)) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"fcntl(F_GETFL)");
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
if (blocking)
|
|
flags &= ~O_NONBLOCK;
|
|
else
|
|
flags |= O_NONBLOCK;
|
|
|
|
if (fcntl(c->fd, F_SETFL, flags) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"fcntl(F_SETFL)");
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
#else
|
|
u_long mode = blocking ? 0 : 1;
|
|
if (ioctl(c->fd, FIONBIO, &mode) == -1) {
|
|
__redisSetErrorFromErrno(c, REDIS_ERR_IO, "ioctl(FIONBIO)");
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
#endif /* _WIN32 */
|
|
return REDIS_OK;
|
|
}
|
|
|
|
int redisKeepAlive(redisContext *c, int interval) {
|
|
int val = 1;
|
|
redisFD fd = c->fd;
|
|
|
|
if (setsockopt(fd, SOL_SOCKET, SO_KEEPALIVE, &val, sizeof(val)) == -1){
|
|
__redisSetError(c,REDIS_ERR_OTHER,strerror(errno));
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
val = interval;
|
|
|
|
#if defined(__APPLE__) && defined(__MACH__)
|
|
if (setsockopt(fd, IPPROTO_TCP, TCP_KEEPALIVE, &val, sizeof(val)) < 0) {
|
|
__redisSetError(c,REDIS_ERR_OTHER,strerror(errno));
|
|
return REDIS_ERR;
|
|
}
|
|
#else
|
|
#if defined(__GLIBC__) && !defined(__FreeBSD_kernel__)
|
|
if (setsockopt(fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof(val)) < 0) {
|
|
__redisSetError(c,REDIS_ERR_OTHER,strerror(errno));
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
val = interval/3;
|
|
if (val == 0) val = 1;
|
|
if (setsockopt(fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof(val)) < 0) {
|
|
__redisSetError(c,REDIS_ERR_OTHER,strerror(errno));
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
val = 3;
|
|
if (setsockopt(fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof(val)) < 0) {
|
|
__redisSetError(c,REDIS_ERR_OTHER,strerror(errno));
|
|
return REDIS_ERR;
|
|
}
|
|
#endif
|
|
#endif
|
|
|
|
return REDIS_OK;
|
|
}
|
|
|
|
static int redisSetTcpNoDelay(redisContext *c) {
|
|
int yes = 1;
|
|
if (setsockopt(c->fd, IPPROTO_TCP, TCP_NODELAY, &yes, sizeof(yes)) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"setsockopt(TCP_NODELAY)");
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
return REDIS_OK;
|
|
}
|
|
|
|
#define __MAX_MSEC (((LONG_MAX) - 999) / 1000)
|
|
|
|
static int redisContextTimeoutMsec(redisContext *c, long *result)
|
|
{
|
|
const struct timeval *timeout = c->timeout;
|
|
long msec = -1;
|
|
|
|
/* Only use timeout when not NULL. */
|
|
if (timeout != NULL) {
|
|
if (timeout->tv_usec > 1000000 || timeout->tv_sec > __MAX_MSEC) {
|
|
*result = msec;
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
msec = (timeout->tv_sec * 1000) + ((timeout->tv_usec + 999) / 1000);
|
|
|
|
if (msec < 0 || msec > INT_MAX) {
|
|
msec = INT_MAX;
|
|
}
|
|
}
|
|
|
|
*result = msec;
|
|
return REDIS_OK;
|
|
}
|
|
|
|
static int redisContextWaitReady(redisContext *c, long msec) {
|
|
struct pollfd wfd[1];
|
|
|
|
wfd[0].fd = c->fd;
|
|
wfd[0].events = POLLOUT;
|
|
|
|
if (errno == EINPROGRESS) {
|
|
int res;
|
|
|
|
if ((res = poll(wfd, 1, msec)) == -1) {
|
|
__redisSetErrorFromErrno(c, REDIS_ERR_IO, "poll(2)");
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
} else if (res == 0) {
|
|
errno = ETIMEDOUT;
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,NULL);
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
if (redisCheckConnectDone(c, &res) != REDIS_OK || res == 0) {
|
|
redisCheckSocketError(c);
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
return REDIS_OK;
|
|
}
|
|
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,NULL);
|
|
redisNetClose(c);
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
int redisCheckConnectDone(redisContext *c, int *completed) {
|
|
int rc = connect(c->fd, (const struct sockaddr *)c->saddr, c->addrlen);
|
|
if (rc == 0) {
|
|
*completed = 1;
|
|
return REDIS_OK;
|
|
}
|
|
switch (errno) {
|
|
case EISCONN:
|
|
*completed = 1;
|
|
return REDIS_OK;
|
|
case EALREADY:
|
|
case EINPROGRESS:
|
|
case EWOULDBLOCK:
|
|
*completed = 0;
|
|
return REDIS_OK;
|
|
default:
|
|
return REDIS_ERR;
|
|
}
|
|
}
|
|
|
|
int redisCheckSocketError(redisContext *c) {
|
|
int err = 0, errno_saved = errno;
|
|
socklen_t errlen = sizeof(err);
|
|
|
|
if (getsockopt(c->fd, SOL_SOCKET, SO_ERROR, &err, &errlen) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"getsockopt(SO_ERROR)");
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
if (err == 0) {
|
|
err = errno_saved;
|
|
}
|
|
|
|
if (err) {
|
|
errno = err;
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,NULL);
|
|
return REDIS_ERR;
|
|
}
|
|
|
|
return REDIS_OK;
|
|
}
|
|
|
|
int redisContextSetTimeout(redisContext *c, const struct timeval tv) {
|
|
if (setsockopt(c->fd,SOL_SOCKET,SO_RCVTIMEO,&tv,sizeof(tv)) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"setsockopt(SO_RCVTIMEO)");
|
|
return REDIS_ERR;
|
|
}
|
|
if (setsockopt(c->fd,SOL_SOCKET,SO_SNDTIMEO,&tv,sizeof(tv)) == -1) {
|
|
__redisSetErrorFromErrno(c,REDIS_ERR_IO,"setsockopt(SO_SNDTIMEO)");
|
|
return REDIS_ERR;
|
|
}
|
|
return REDIS_OK;
|
|
}
|
|
|
|
static int _redisContextConnectTcp(redisContext *c, const char *addr, int port,
|
|
const struct timeval *timeout,
|
|
const char *source_addr) {
|
|
redisFD s;
|
|
int rv, n;
|
|
char _port[6]; /* strlen("65535"); */
|
|
struct addrinfo hints, *servinfo, *bservinfo, *p, *b;
|
|
int blocking = (c->flags & REDIS_BLOCK);
|
|
int reuseaddr = (c->flags & REDIS_REUSEADDR);
|
|
int reuses = 0;
|
|
long timeout_msec = -1;
|
|
|
|
servinfo = NULL;
|
|
c->connection_type = REDIS_CONN_TCP;
|
|
c->tcp.port = port;
|
|
|
|
/* We need to take possession of the passed parameters
|
|
* to make them reusable for a reconnect.
|
|
* We also carefully check we don't free data we already own,
|
|
* as in the case of the reconnect method.
|
|
*
|
|
* This is a bit ugly, but atleast it works and doesn't leak memory.
|
|
**/
|
|
if (c->tcp.host != addr) {
|
|
free(c->tcp.host);
|
|
|
|
c->tcp.host = strdup(addr);
|
|
}
|
|
|
|
if (timeout) {
|
|
if (c->timeout != timeout) {
|
|
if (c->timeout == NULL)
|
|
c->timeout = malloc(sizeof(struct timeval));
|
|
|
|
memcpy(c->timeout, timeout, sizeof(struct timeval));
|
|
}
|
|
} else {
|
|
free(c->timeout);
|
|
c->timeout = NULL;
|
|
}
|
|
|
|
if (redisContextTimeoutMsec(c, &timeout_msec) != REDIS_OK) {
|
|
__redisSetError(c, REDIS_ERR_IO, "Invalid timeout specified");
|
|
goto error;
|
|
}
|
|
|
|
if (source_addr == NULL) {
|
|
free(c->tcp.source_addr);
|
|
c->tcp.source_addr = NULL;
|
|
} else if (c->tcp.source_addr != source_addr) {
|
|
free(c->tcp.source_addr);
|
|
c->tcp.source_addr = strdup(source_addr);
|
|
}
|
|
|
|
snprintf(_port, 6, "%d", port);
|
|
memset(&hints,0,sizeof(hints));
|
|
hints.ai_family = AF_INET;
|
|
hints.ai_socktype = SOCK_STREAM;
|
|
|
|
/* Try with IPv6 if no IPv4 address was found. We do it in this order since
|
|
* in a Redis client you can't afford to test if you have IPv6 connectivity
|
|
* as this would add latency to every connect. Otherwise a more sensible
|
|
* route could be: Use IPv6 if both addresses are available and there is IPv6
|
|
* connectivity. */
|
|
if ((rv = getaddrinfo(c->tcp.host,_port,&hints,&servinfo)) != 0) {
|
|
hints.ai_family = AF_INET6;
|
|
if ((rv = getaddrinfo(addr,_port,&hints,&servinfo)) != 0) {
|
|
__redisSetError(c,REDIS_ERR_OTHER,gai_strerror(rv));
|
|
return REDIS_ERR;
|
|
}
|
|
}
|
|
for (p = servinfo; p != NULL; p = p->ai_next) {
|
|
addrretry:
|
|
if ((s = socket(p->ai_family,p->ai_socktype,p->ai_protocol)) == REDIS_INVALID_FD)
|
|
continue;
|
|
|
|
c->fd = s;
|
|
if (redisSetBlocking(c,0) != REDIS_OK)
|
|
goto error;
|
|
if (c->tcp.source_addr) {
|
|
int bound = 0;
|
|
/* Using getaddrinfo saves us from self-determining IPv4 vs IPv6 */
|
|
if ((rv = getaddrinfo(c->tcp.source_addr, NULL, &hints, &bservinfo)) != 0) {
|
|
char buf[128];
|
|
snprintf(buf,sizeof(buf),"Can't get addr: %s",gai_strerror(rv));
|
|
__redisSetError(c,REDIS_ERR_OTHER,buf);
|
|
goto error;
|
|
}
|
|
|
|
if (reuseaddr) {
|
|
n = 1;
|
|
if (setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char*) &n,
|
|
sizeof(n)) < 0) {
|
|
freeaddrinfo(bservinfo);
|
|
goto error;
|
|
}
|
|
}
|
|
|
|
for (b = bservinfo; b != NULL; b = b->ai_next) {
|
|
if (bind(s,b->ai_addr,b->ai_addrlen) != -1) {
|
|
bound = 1;
|
|
break;
|
|
}
|
|
}
|
|
freeaddrinfo(bservinfo);
|
|
if (!bound) {
|
|
char buf[128];
|
|
snprintf(buf,sizeof(buf),"Can't bind socket: %s",strerror(errno));
|
|
__redisSetError(c,REDIS_ERR_OTHER,buf);
|
|
goto error;
|
|
}
|
|
}
|
|
|
|
/* For repeat connection */
|
|
free(c->saddr);
|
|
c->saddr = malloc(p->ai_addrlen);
|
|
memcpy(c->saddr, p->ai_addr, p->ai_addrlen);
|
|
c->addrlen = p->ai_addrlen;
|
|
|
|
if (connect(s,p->ai_addr,p->ai_addrlen) == -1) {
|
|
if (errno == EHOSTUNREACH) {
|
|
redisNetClose(c);
|
|
continue;
|
|
} else if (errno == EINPROGRESS) {
|
|
if (blocking) {
|
|
goto wait_for_ready;
|
|
}
|
|
/* This is ok.
|
|
* Note that even when it's in blocking mode, we unset blocking
|
|
* for `connect()`
|
|
*/
|
|
} else if (errno == EADDRNOTAVAIL && reuseaddr) {
|
|
if (++reuses >= REDIS_CONNECT_RETRIES) {
|
|
goto error;
|
|
} else {
|
|
redisNetClose(c);
|
|
goto addrretry;
|
|
}
|
|
} else {
|
|
wait_for_ready:
|
|
if (redisContextWaitReady(c,timeout_msec) != REDIS_OK)
|
|
goto error;
|
|
}
|
|
}
|
|
if (blocking && redisSetBlocking(c,1) != REDIS_OK)
|
|
goto error;
|
|
if (redisSetTcpNoDelay(c) != REDIS_OK)
|
|
goto error;
|
|
|
|
c->flags |= REDIS_CONNECTED;
|
|
rv = REDIS_OK;
|
|
goto end;
|
|
}
|
|
if (p == NULL) {
|
|
char buf[128];
|
|
snprintf(buf,sizeof(buf),"Can't create socket: %s",strerror(errno));
|
|
__redisSetError(c,REDIS_ERR_OTHER,buf);
|
|
goto error;
|
|
}
|
|
|
|
error:
|
|
rv = REDIS_ERR;
|
|
end:
|
|
if(servinfo) {
|
|
freeaddrinfo(servinfo);
|
|
}
|
|
|
|
return rv; // Need to return REDIS_OK if alright
|
|
}
|
|
|
|
int redisContextConnectTcp(redisContext *c, const char *addr, int port,
|
|
const struct timeval *timeout) {
|
|
return _redisContextConnectTcp(c, addr, port, timeout, NULL);
|
|
}
|
|
|
|
int redisContextConnectBindTcp(redisContext *c, const char *addr, int port,
|
|
const struct timeval *timeout,
|
|
const char *source_addr) {
|
|
return _redisContextConnectTcp(c, addr, port, timeout, source_addr);
|
|
}
|
|
|
|
int redisContextConnectUnix(redisContext *c, const char *path, const struct timeval *timeout) {
|
|
#ifndef _WIN32
|
|
int blocking = (c->flags & REDIS_BLOCK);
|
|
struct sockaddr_un *sa;
|
|
long timeout_msec = -1;
|
|
|
|
if (redisCreateSocket(c,AF_UNIX) < 0)
|
|
return REDIS_ERR;
|
|
if (redisSetBlocking(c,0) != REDIS_OK)
|
|
return REDIS_ERR;
|
|
|
|
c->connection_type = REDIS_CONN_UNIX;
|
|
if (c->unix_sock.path != path)
|
|
c->unix_sock.path = strdup(path);
|
|
|
|
if (timeout) {
|
|
if (c->timeout != timeout) {
|
|
if (c->timeout == NULL)
|
|
c->timeout = malloc(sizeof(struct timeval));
|
|
|
|
memcpy(c->timeout, timeout, sizeof(struct timeval));
|
|
}
|
|
} else {
|
|
free(c->timeout);
|
|
c->timeout = NULL;
|
|
}
|
|
|
|
if (redisContextTimeoutMsec(c,&timeout_msec) != REDIS_OK)
|
|
return REDIS_ERR;
|
|
|
|
sa = (struct sockaddr_un*)(c->saddr = malloc(sizeof(struct sockaddr_un)));
|
|
c->addrlen = sizeof(struct sockaddr_un);
|
|
sa->sun_family = AF_UNIX;
|
|
strncpy(sa->sun_path, path, sizeof(sa->sun_path) - 1);
|
|
if (connect(c->fd, (struct sockaddr*)sa, sizeof(*sa)) == -1) {
|
|
if (errno == EINPROGRESS && !blocking) {
|
|
/* This is ok. */
|
|
} else {
|
|
if (redisContextWaitReady(c,timeout_msec) != REDIS_OK)
|
|
return REDIS_ERR;
|
|
}
|
|
}
|
|
|
|
/* Reset socket to be blocking after connect(2). */
|
|
if (blocking && redisSetBlocking(c,1) != REDIS_OK)
|
|
return REDIS_ERR;
|
|
|
|
c->flags |= REDIS_CONNECTED;
|
|
return REDIS_OK;
|
|
#else
|
|
/* We currently do not support Unix sockets for Windows. */
|
|
/* TODO(m): https://devblogs.microsoft.com/commandline/af_unix-comes-to-windows/ */
|
|
errno = EPROTONOSUPPORT;
|
|
return REDIS_ERR;
|
|
#endif /* _WIN32 */
|
|
}
|