X-Git-Url: http://git.meshlink.io/?p=meshlink;a=blobdiff_plain;f=src%2Fnet_socket.c;h=63bf49ea3c6f0511de3322e9d84e21d8ddcc5092;hp=a7c781529c16fe99f990ca0a20b26b89fbcacb93;hb=963c5055505f2fc117cd5efa06eaa02c9b2bf85d;hpb=d917c8cb6b69475d568ccbe82389b9f2b3eb5e80 diff --git a/src/net_socket.c b/src/net_socket.c index a7c78152..63bf49ea 100644 --- a/src/net_socket.c +++ b/src/net_socket.c @@ -1,9 +1,6 @@ /* net_socket.c -- Handle various kinds of sockets. - Copyright (C) 1998-2005 Ivo Timmermans, - 2000-2012 Guus Sliepen - 2006 Scott Lamb - 2009 Florian Forster + Copyright (C) 2014-2017 Guus Sliepen 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 @@ -26,6 +23,7 @@ #include "connection.h" #include "list.h" #include "logger.h" +#include "meshlink_internal.h" #include "meta.h" #include "net.h" #include "netutl.h" @@ -38,438 +36,378 @@ #define SOL_TCP IPPROTO_TCP #endif -int addressfamily = AF_UNSPEC; -int maxtimeout = 900; -int seconds_till_retry = 5; -int udp_rcvbuf = 0; -int udp_sndbuf = 0; +#ifndef MSG_NOSIGNAL +#define MSG_NOSIGNAL 0 +#endif -listen_socket_t listen_socket[MAXSOCKETS]; -int listen_sockets; -list_t *outgoing_list = NULL; +static const int max_connection_burst = 100; /* Setup sockets */ static void configure_tcp(connection_t *c) { - int option; - #ifdef O_NONBLOCK int flags = fcntl(c->socket, F_GETFL); if(fcntl(c->socket, F_SETFL, flags | O_NONBLOCK) < 0) { - logger(DEBUG_ALWAYS, LOG_ERR, "fcntl for %s: %s", c->hostname, strerror(errno)); + logger(c->mesh, MESHLINK_ERROR, "System call `%s' failed: %s", "fcntl", strerror(errno)); } + #elif defined(WIN32) unsigned long arg = 1; if(ioctlsocket(c->socket, FIONBIO, &arg) != 0) { - logger(DEBUG_ALWAYS, LOG_ERR, "ioctlsocket for %s: %d", c->hostname, sockstrerror(sockerrno)); + logger(c->mesh, MESHLINK_ERROR, "System call `%s' failed: %s", "ioctlsocket", sockstrerror(sockerrno)); } + #endif #if defined(SOL_TCP) && defined(TCP_NODELAY) - option = 1; - setsockopt(c->socket, SOL_TCP, TCP_NODELAY, (void *)&option, sizeof option); + int nodelay = 1; + setsockopt(c->socket, SOL_TCP, TCP_NODELAY, (void *)&nodelay, sizeof(nodelay)); #endif -#if defined(SOL_IP) && defined(IP_TOS) && defined(IPTOS_LOWDELAY) - option = IPTOS_LOWDELAY; - setsockopt(c->socket, SOL_IP, IP_TOS, (void *)&option, sizeof option); +#if defined(IP_TOS) && defined(IPTOS_LOWDELAY) + int lowdelay = IPTOS_LOWDELAY; + setsockopt(c->socket, IPPROTO_IP, IP_TOS, (void *)&lowdelay, sizeof(lowdelay)); #endif } -static bool bind_to_interface(int sd) { - char *iface; - -#if defined(SOL_SOCKET) && defined(SO_BINDTODEVICE) - struct ifreq ifr; - int status; -#endif /* defined(SOL_SOCKET) && defined(SO_BINDTODEVICE) */ +static void retry_outgoing_handler(event_loop_t *loop, void *data) { + assert(data); - if(!get_config_string (lookup_config (config_tree, "BindToInterface"), &iface)) - return true; + meshlink_handle_t *mesh = loop->data; + outgoing_t *outgoing = data; + setup_outgoing_connection(mesh, outgoing); +} -#if defined(SOL_SOCKET) && defined(SO_BINDTODEVICE) - memset(&ifr, 0, sizeof(ifr)); - strncpy(ifr.ifr_ifrn.ifrn_name, iface, IFNAMSIZ); - ifr.ifr_ifrn.ifrn_name[IFNAMSIZ - 1] = 0; +void retry_outgoing(meshlink_handle_t *mesh, outgoing_t *outgoing) { + if(!mesh->reachable && mesh->loop.now.tv_sec < mesh->last_unreachable + mesh->dev_class_traits[mesh->devclass].fast_retry_period) { + outgoing->timeout = 1; + } else { + outgoing->timeout += 5; + } - status = setsockopt(sd, SOL_SOCKET, SO_BINDTODEVICE, (void *)&ifr, sizeof(ifr)); - if(status) { - logger(DEBUG_ALWAYS, LOG_ERR, "Can't bind to interface %s: %s", iface, - strerror(errno)); - return false; + if(outgoing->timeout > mesh->maxtimeout) { + outgoing->timeout = mesh->maxtimeout; } -#else /* if !defined(SOL_SOCKET) || !defined(SO_BINDTODEVICE) */ - logger(DEBUG_ALWAYS, LOG_WARNING, "%s not supported on this platform", "BindToInterface"); -#endif - return true; + timeout_add(&mesh->loop, &outgoing->ev, retry_outgoing_handler, outgoing, &(struct timespec) { + outgoing->timeout, prng(mesh, TIMER_FUDGE) + }); + + logger(mesh, MESHLINK_INFO, "Trying to re-establish outgoing connection in %d seconds", outgoing->timeout); } -int setup_listen_socket(const sockaddr_t *sa) { - int nfd; - char *addrstr; - int option; - char *iface; +void finish_connecting(meshlink_handle_t *mesh, connection_t *c) { + logger(mesh, MESHLINK_INFO, "Connected to %s", c->name); - nfd = socket(sa->sa.sa_family, SOCK_STREAM, IPPROTO_TCP); + c->last_ping_time = mesh->loop.now.tv_sec; + c->status.connecting = false; - if(nfd < 0) { - logger(DEBUG_STATUS, LOG_ERR, "Creating metasocket failed: %s", sockstrerror(sockerrno)); - return -1; + send_id(mesh, c); +} + +static void handle_meta_write(meshlink_handle_t *mesh, connection_t *c) { + if(c->outbuf.len <= c->outbuf.offset) { + return; } -#ifdef FD_CLOEXEC - fcntl(nfd, F_SETFD, FD_CLOEXEC); -#endif + ssize_t outlen = send(c->socket, c->outbuf.data + c->outbuf.offset, c->outbuf.len - c->outbuf.offset, MSG_NOSIGNAL); + + if(outlen <= 0) { + if(!errno || errno == EPIPE) { + logger(mesh, MESHLINK_INFO, "Connection closed by %s", c->name); + } else if(sockwouldblock(sockerrno)) { + logger(mesh, MESHLINK_DEBUG, "Sending %lu bytes to %s would block", (unsigned long)(c->outbuf.len - c->outbuf.offset), c->name); + return; + } else { + logger(mesh, MESHLINK_ERROR, "Could not send %lu bytes of data to %s: %s", (unsigned long)(c->outbuf.len - c->outbuf.offset), c->name, strerror(errno)); + } - /* Optimize TCP settings */ + terminate_connection(mesh, c, c->status.active); + return; + } - option = 1; - setsockopt(nfd, SOL_SOCKET, SO_REUSEADDR, (void *)&option, sizeof option); + buffer_read(&c->outbuf, outlen); -#if defined(SOL_IPV6) && defined(IPV6_V6ONLY) - if(sa->sa.sa_family == AF_INET6) - setsockopt(nfd, SOL_IPV6, IPV6_V6ONLY, (void *)&option, sizeof option); -#endif + if(!c->outbuf.len) { + io_set(&mesh->loop, &c->io, IO_READ); + } +} - if(get_config_string - (lookup_config(config_tree, "BindToInterface"), &iface)) { -#if defined(SOL_SOCKET) && defined(SO_BINDTODEVICE) - struct ifreq ifr; +static void handle_meta_io(event_loop_t *loop, void *data, int flags) { + meshlink_handle_t *mesh = loop->data; + connection_t *c = data; - memset(&ifr, 0, sizeof ifr); - strncpy(ifr.ifr_ifrn.ifrn_name, iface, IFNAMSIZ); + if(c->status.connecting) { + c->status.connecting = false; - if(setsockopt(nfd, SOL_SOCKET, SO_BINDTODEVICE, (void *)&ifr, sizeof ifr)) { - closesocket(nfd); - logger(DEBUG_ALWAYS, LOG_ERR, "Can't bind to interface %s: %s", iface, - strerror(sockerrno)); - return -1; - } -#else - logger(DEBUG_ALWAYS, LOG_WARNING, "%s not supported on this platform", "BindToInterface"); -#endif - } + int result; + socklen_t len = sizeof(result); + getsockopt(c->socket, SOL_SOCKET, SO_ERROR, (void *)&result, &len); - if(bind(nfd, &sa->sa, SALEN(sa->sa))) { - closesocket(nfd); - addrstr = sockaddr2hostname(sa); - logger(DEBUG_ALWAYS, LOG_ERR, "Can't bind to %s/tcp: %s", addrstr, sockstrerror(sockerrno)); - free(addrstr); - return -1; + if(!result) { + finish_connecting(mesh, c); + } else { + logger(mesh, MESHLINK_DEBUG, "Error while connecting to %s: %s", c->name, sockstrerror(result)); + terminate_connection(mesh, c, false); + return; + } } - if(listen(nfd, 3)) { - closesocket(nfd); - logger(DEBUG_ALWAYS, LOG_ERR, "System call `%s' failed: %s", "listen", sockstrerror(sockerrno)); - return -1; + if(flags & IO_WRITE) { + handle_meta_write(mesh, c); + } else { + handle_meta_connection_data(mesh, c); } - - return nfd; } -int setup_vpn_in_socket(const sockaddr_t *sa) { - int nfd; - char *addrstr; - int option; - - nfd = socket(sa->sa.sa_family, SOCK_DGRAM, IPPROTO_UDP); +// Find edges pointing to this node, and use them to build a list of unique, known addresses. +static struct addrinfo *get_known_addresses(node_t *n) { + struct addrinfo *ai = NULL; - if(nfd < 0) { - logger(DEBUG_ALWAYS, LOG_ERR, "Creating UDP socket failed: %s", sockstrerror(sockerrno)); - return -1; - } + for splay_each(edge_t, e, n->edge_tree) { + if(!e->reverse) { + continue; + } -#ifdef FD_CLOEXEC - fcntl(nfd, F_SETFD, FD_CLOEXEC); -#endif + bool found = false; -#ifdef O_NONBLOCK - { - int flags = fcntl(nfd, F_GETFL); - - if(fcntl(nfd, F_SETFL, flags | O_NONBLOCK) < 0) { - closesocket(nfd); - logger(DEBUG_ALWAYS, LOG_ERR, "System call `%s' failed: %s", "fcntl", - strerror(errno)); - return -1; + for(struct addrinfo *aip = ai; aip; aip = aip->ai_next) { + if(!sockaddrcmp(&e->reverse->address, (sockaddr_t *)aip->ai_addr)) { + found = true; + break; + } } - } -#elif defined(WIN32) - { - unsigned long arg = 1; - if(ioctlsocket(nfd, FIONBIO, &arg) != 0) { - closesocket(nfd); - logger(DEBUG_ALWAYS, LOG_ERR, "Call to `%s' failed: %s", "ioctlsocket", sockstrerror(sockerrno)); - return -1; + + if(found) { + continue; } + + // Create a new struct addrinfo, and put it at the head of the list. + struct addrinfo *nai = xzalloc(sizeof(*nai) + SALEN(e->reverse->address.sa)); + nai->ai_next = ai; + ai = nai; + + ai->ai_family = e->reverse->address.sa.sa_family; + ai->ai_socktype = SOCK_STREAM; + ai->ai_protocol = IPPROTO_TCP; + ai->ai_addrlen = SALEN(e->reverse->address.sa); + ai->ai_addr = (struct sockaddr *)(nai + 1); + memcpy(ai->ai_addr, &e->reverse->address, ai->ai_addrlen); } -#endif - option = 1; - setsockopt(nfd, SOL_SOCKET, SO_REUSEADDR, (void *)&option, sizeof option); - setsockopt(nfd, SOL_SOCKET, SO_BROADCAST, (void *)&option, sizeof option); + return ai; +} - if(udp_rcvbuf && setsockopt(nfd, SOL_SOCKET, SO_RCVBUF, (void *)&udp_rcvbuf, sizeof(udp_rcvbuf))) - logger(DEBUG_ALWAYS, LOG_WARNING, "Can't set UDP SO_RCVBUF to %i: %s", udp_rcvbuf, strerror(errno)); +// Build a list of recently seen addresses. +static struct addrinfo *get_recent_addresses(node_t *n) { + struct addrinfo *ai = NULL; + struct addrinfo *aip; - if(udp_sndbuf && setsockopt(nfd, SOL_SOCKET, SO_SNDBUF, (void *)&udp_sndbuf, sizeof(udp_sndbuf))) - logger(DEBUG_ALWAYS, LOG_WARNING, "Can't set UDP SO_SNDBUF to %i: %s", udp_sndbuf, strerror(errno)); + for(int i = 0; i < 5; i++) { + if(!n->recent[i].sa.sa_family) { + break; + } -#if defined(IPPROTO_IPV6) && defined(IPV6_V6ONLY) - if(sa->sa.sa_family == AF_INET6) - setsockopt(nfd, IPPROTO_IPV6, IPV6_V6ONLY, (void *)&option, sizeof option); -#endif + // Create a new struct addrinfo, and put it at the end of the list. + struct addrinfo *nai = xzalloc(sizeof(*nai) + SALEN(n->recent[i].sa)); -#if defined(IP_DONTFRAG) && !defined(IP_DONTFRAGMENT) -#define IP_DONTFRAGMENT IP_DONTFRAG -#endif + if(!ai) { + ai = nai; + } else { + aip->ai_next = nai; + } -#if defined(SOL_IP) && defined(IP_MTU_DISCOVER) && defined(IP_PMTUDISC_DO) - if(myself->options & OPTION_PMTU_DISCOVERY) { - option = IP_PMTUDISC_DO; - setsockopt(nfd, SOL_IP, IP_MTU_DISCOVER, (void *)&option, sizeof(option)); - } -#elif defined(IPPROTO_IP) && defined(IP_DONTFRAGMENT) - if(myself->options & OPTION_PMTU_DISCOVERY) { - option = 1; - setsockopt(nfd, IPPROTO_IP, IP_DONTFRAGMENT, (void *)&option, sizeof(option)); - } -#else -#warning No way to disable IPv4 fragmentation -#endif + aip = nai; -#if defined(SOL_IPV6) && defined(IPV6_MTU_DISCOVER) && defined(IPV6_PMTUDISC_DO) - if(myself->options & OPTION_PMTU_DISCOVERY) { - option = IPV6_PMTUDISC_DO; - setsockopt(nfd, SOL_IPV6, IPV6_MTU_DISCOVER, (void *)&option, sizeof(option)); - } -#elif defined(IPPROTO_IPV6) && defined(IPV6_DONTFRAG) - if(myself->options & OPTION_PMTU_DISCOVERY) { - option = 1; - setsockopt(nfd, IPPROTO_IPV6, IPV6_DONTFRAG, (void *)&option, sizeof(option)); + nai->ai_family = n->recent[i].sa.sa_family; + nai->ai_socktype = SOCK_STREAM; + nai->ai_protocol = IPPROTO_TCP; + nai->ai_addrlen = SALEN(n->recent[i].sa); + nai->ai_addr = (struct sockaddr *)(nai + 1); + memcpy(nai->ai_addr, &n->recent[i], nai->ai_addrlen); } -#else -#warning No way to disable IPv6 fragmentation -#endif - if (!bind_to_interface(nfd)) { - closesocket(nfd); - return -1; - } + return ai; +} - if(bind(nfd, &sa->sa, SALEN(sa->sa))) { - closesocket(nfd); - addrstr = sockaddr2hostname(sa); - logger(DEBUG_ALWAYS, LOG_ERR, "Can't bind to %s/udp: %s", addrstr, sockstrerror(sockerrno)); - free(addrstr); - return -1; +// Free struct addrinfo list from get_known_addresses(). +static void free_known_addresses(struct addrinfo *ai) { + for(struct addrinfo *aip = ai, *next; aip; aip = next) { + next = aip->ai_next; + free(aip); } +} - return nfd; -} /* int setup_vpn_in_socket */ +static struct addrinfo *get_canonical_address(node_t *n) { + if(!n->canonical_address) { + return false; + } -static void retry_outgoing_handler(int fd, short events, void *data) { - setup_outgoing_connection(data); -} + char *address = xstrdup(n->canonical_address); + char *port = strchr(address, ' '); -void retry_outgoing(outgoing_t *outgoing) { - outgoing->timeout += 5; + if(!port) { + free(address); + return false; + } - if(outgoing->timeout > maxtimeout) - outgoing->timeout = maxtimeout; + *port++ = 0; - timeout_set(&outgoing->ev, retry_outgoing_handler, outgoing); - event_add(&outgoing->ev, &(struct timeval){outgoing->timeout, 0}); + struct addrinfo *ai = str2addrinfo(address, port, SOCK_STREAM); + free(address); - logger(DEBUG_CONNECTIONS, LOG_NOTICE, - "Trying to re-establish outgoing connection in %d seconds", - outgoing->timeout); + return ai; } -void finish_connecting(connection_t *c) { - logger(DEBUG_CONNECTIONS, LOG_INFO, "Connected to %s (%s)", c->name, c->hostname); +static bool get_next_outgoing_address(meshlink_handle_t *mesh, outgoing_t *outgoing) { + (void)mesh; - if(proxytype != PROXY_EXEC) - configure_tcp(c); + bool start = false; - c->last_ping_time = time(NULL); - c->status.connecting = false; + if(outgoing->state == OUTGOING_START) { + start = true; + outgoing->state = OUTGOING_CANONICAL; + } - send_id(c); -} + if(outgoing->state == OUTGOING_CANONICAL) { + if(!outgoing->aip) { + outgoing->ai = get_canonical_address(outgoing->node); + outgoing->aip = outgoing->ai; + } else { + outgoing->aip = outgoing->aip->ai_next; + } -static void do_outgoing_pipe(connection_t *c, char *command) { -#ifndef HAVE_MINGW - int fd[2]; + if(outgoing->aip) { + return true; + } - if(socketpair(AF_UNIX, SOCK_STREAM, 0, fd)) { - logger(DEBUG_ALWAYS, LOG_ERR, "Could not create socketpair: %s", strerror(errno)); - return; + freeaddrinfo(outgoing->ai); + outgoing->ai = NULL; + outgoing->aip = NULL; + outgoing->state = OUTGOING_RECENT; } - if(fork()) { - c->socket = fd[0]; - close(fd[1]); - logger(DEBUG_CONNECTIONS, LOG_DEBUG, "Using proxy %s", command); - return; - } + if(outgoing->state == OUTGOING_RECENT) { + if(!outgoing->aip) { + outgoing->ai = get_recent_addresses(outgoing->node); + outgoing->aip = outgoing->ai; + } else { + outgoing->aip = outgoing->aip->ai_next; + } - close(0); - close(1); - close(fd[0]); - dup2(fd[1], 0); - dup2(fd[1], 1); - close(fd[1]); - - // Other filedescriptors should be closed automatically by CLOEXEC - - char *host = NULL; - char *port = NULL; - - sockaddr2str(&c->address, &host, &port); - setenv("REMOTEADDRESS", host, true); - setenv("REMOTEPORT", port, true); - setenv("NODE", c->name, true); - setenv("NAME", myself->name, true); - if(netname) - setenv("NETNAME", netname, true); - - int result = system(command); - if(result < 0) - logger(DEBUG_ALWAYS, LOG_ERR, "Could not execute %s: %s", command, strerror(errno)); - else if(result) - logger(DEBUG_ALWAYS, LOG_ERR, "%s exited with non-zero status %d", command, result); - exit(result); -#else - logger(DEBUG_ALWAYS, LOG_ERR, "Proxy type exec not supported on this platform!"); - return; -#endif -} + if(outgoing->aip) { + return true; + } -static void handle_meta_write(int sock, short events, void *data) { - connection_t *c = data; + free_known_addresses(outgoing->ai); + outgoing->ai = NULL; + outgoing->aip = NULL; + outgoing->state = OUTGOING_KNOWN; + } - ssize_t outlen = send(c->socket, c->outbuf.data + c->outbuf.offset, c->outbuf.len - c->outbuf.offset, 0); - if(outlen <= 0) { - if(!errno || errno == EPIPE) { - logger(DEBUG_CONNECTIONS, LOG_NOTICE, "Connection closed by %s (%s)", c->name, c->hostname); - } else if(sockwouldblock(sockerrno)) { - logger(DEBUG_CONNECTIONS, LOG_DEBUG, "Sending %d bytes to %s (%s) would block", c->outbuf.len - c->outbuf.offset, c->name, c->hostname); - return; + if(outgoing->state == OUTGOING_KNOWN) { + if(!outgoing->aip) { + outgoing->ai = get_known_addresses(outgoing->node); + outgoing->aip = outgoing->ai; } else { - logger(DEBUG_CONNECTIONS, LOG_ERR, "Could not send %d bytes of data to %s (%s): %s", c->outbuf.len - c->outbuf.offset, c->name, c->hostname, strerror(errno)); + outgoing->aip = outgoing->aip->ai_next; } - terminate_connection(c, c->status.active); - return; + if(outgoing->aip) { + return true; + } + + free_known_addresses(outgoing->ai); + outgoing->ai = NULL; + outgoing->aip = NULL; + outgoing->state = OUTGOING_END; } - buffer_read(&c->outbuf, outlen); - if(!c->outbuf.len && event_initialized(&c->outevent)) - event_del(&c->outevent); -} + if(start) { + outgoing->state = OUTGOING_NO_KNOWN_ADDRESSES; + } + return false; +} -bool do_outgoing_connection(outgoing_t *outgoing) { - char *address, *port, *space; +void do_outgoing_connection(meshlink_handle_t *mesh, outgoing_t *outgoing) { struct addrinfo *proxyai = NULL; int result; begin: - if(!outgoing->ai) { - if(!outgoing->cfg) { - logger(DEBUG_CONNECTIONS, LOG_ERR, "Could not set up a meta connection to %s", outgoing->name); - retry_outgoing(outgoing); - return false; - } - get_config_string(outgoing->cfg, &address); - - space = strchr(address, ' '); - if(space) { - port = xstrdup(space + 1); - *space = 0; + if(!get_next_outgoing_address(mesh, outgoing)) { + if(outgoing->state == OUTGOING_NO_KNOWN_ADDRESSES) { + logger(mesh, MESHLINK_ERROR, "No known addresses for %s", outgoing->node->name); } else { - if(!get_config_string(lookup_config(outgoing->config_tree, "Port"), &port)) - port = xstrdup("655"); + logger(mesh, MESHLINK_ERROR, "Could not set up a meta connection to %s", outgoing->node->name); + retry_outgoing(mesh, outgoing); } - outgoing->ai = str2addrinfo(address, port, SOCK_STREAM); - free(address); - free(port); - - outgoing->aip = outgoing->ai; - outgoing->cfg = lookup_config_next(outgoing->config_tree, outgoing->cfg); - } - - if(!outgoing->aip) { - if(outgoing->ai) - freeaddrinfo(outgoing->ai); - outgoing->ai = NULL; - goto begin; + return; } connection_t *c = new_connection(); c->outgoing = outgoing; memcpy(&c->address, outgoing->aip->ai_addr, outgoing->aip->ai_addrlen); - outgoing->aip = outgoing->aip->ai_next; - c->hostname = sockaddr2hostname(&c->address); + char *hostname = sockaddr2hostname(&c->address); - logger(DEBUG_CONNECTIONS, LOG_INFO, "Trying to connect to %s (%s)", outgoing->name, c->hostname); + logger(mesh, MESHLINK_INFO, "Trying to connect to %s at %s", outgoing->node->name, hostname); - if(!proxytype) { + if(!mesh->proxytype) { c->socket = socket(c->address.sa.sa_family, SOCK_STREAM, IPPROTO_TCP); configure_tcp(c); - } else if(proxytype == PROXY_EXEC) { - do_outgoing_pipe(c, proxyhost); } else { - proxyai = str2addrinfo(proxyhost, proxyport, SOCK_STREAM); + proxyai = str2addrinfo(mesh->proxyhost, mesh->proxyport, SOCK_STREAM); + if(!proxyai) { free_connection(c); + free(hostname); goto begin; } - logger(DEBUG_CONNECTIONS, LOG_INFO, "Using proxy at %s port %s", proxyhost, proxyport); + + logger(mesh, MESHLINK_INFO, "Using proxy at %s port %s", mesh->proxyhost, mesh->proxyport); c->socket = socket(proxyai->ai_family, SOCK_STREAM, IPPROTO_TCP); + configure_tcp(c); } if(c->socket == -1) { - logger(DEBUG_CONNECTIONS, LOG_ERR, "Creating socket for %s failed: %s", c->hostname, sockstrerror(sockerrno)); + logger(mesh, MESHLINK_ERROR, "Creating socket for %s at %s failed: %s", c->name, hostname, sockstrerror(sockerrno)); free_connection(c); + free(hostname); goto begin; } + free(hostname); + #ifdef FD_CLOEXEC fcntl(c->socket, F_SETFD, FD_CLOEXEC); #endif - if(proxytype != PROXY_EXEC) { -#if defined(SOL_IPV6) && defined(IPV6_V6ONLY) - int option = 1; - if(c->address.sa.sa_family == AF_INET6) - setsockopt(c->socket, SOL_IPV6, IPV6_V6ONLY, (void *)&option, sizeof option); -#endif +#if defined(IPV6_V6ONLY) - bind_to_interface(c->socket); + if(c->address.sa.sa_family == AF_INET6) { + static const int option = 1; + setsockopt(c->socket, IPPROTO_IPV6, IPV6_V6ONLY, (void *)&option, sizeof(option)); } +#endif + /* Connect */ - if(!proxytype) { + if(!mesh->proxytype) { result = connect(c->socket, &c->address.sa, SALEN(c->address.sa)); - } else if(proxytype == PROXY_EXEC) { - result = 0; } else { result = connect(c->socket, proxyai->ai_addr, proxyai->ai_addrlen); freeaddrinfo(proxyai); } if(result == -1 && !sockinprogress(sockerrno)) { - logger(DEBUG_CONNECTIONS, LOG_ERR, "Could not connect to %s (%s): %s", outgoing->name, c->hostname, sockstrerror(sockerrno)); + logger(mesh, MESHLINK_ERROR, "Could not connect to %s: %s", outgoing->node->name, sockstrerror(sockerrno)); free_connection(c); goto begin; @@ -478,163 +416,158 @@ begin: /* Now that there is a working socket, fill in the rest and register this connection. */ c->status.connecting = true; - c->name = xstrdup(outgoing->name); - c->outcipher = myself->connection->outcipher; - c->outdigest = myself->connection->outdigest; - c->outmaclength = myself->connection->outmaclength; - c->outcompression = myself->connection->outcompression; - c->last_ping_time = time(NULL); + c->status.initiator = true; + c->name = xstrdup(outgoing->node->name); + c->last_ping_time = mesh->loop.now.tv_sec; - connection_add(c); + connection_add(mesh, c); - event_set(&c->inevent, c->socket, EV_READ | EV_PERSIST, handle_meta_connection_data, c); - event_set(&c->outevent, c->socket, EV_WRITE | EV_PERSIST, handle_meta_write, c); - event_add(&c->inevent, NULL); + io_add(&mesh->loop, &c->io, handle_meta_io, c, c->socket, IO_READ | IO_WRITE); +} - return true; +void reset_outgoing(outgoing_t *outgoing) { + if(outgoing->ai) { + if(outgoing->state == OUTGOING_RECENT || outgoing->state == OUTGOING_KNOWN) { + free_known_addresses(outgoing->ai); + } else { + freeaddrinfo(outgoing->ai); + } + } + + outgoing->ai = NULL; + outgoing->aip = NULL; + outgoing->state = OUTGOING_START; } -void setup_outgoing_connection(outgoing_t *outgoing) { - if(event_initialized(&outgoing->ev)) - event_del(&outgoing->ev); +void setup_outgoing_connection(meshlink_handle_t *mesh, outgoing_t *outgoing) { + timeout_del(&mesh->loop, &outgoing->ev); - node_t *n = lookup_node(outgoing->name); + if(outgoing->node->connection) { + logger(mesh, MESHLINK_INFO, "Already connected to %s", outgoing->node->name); - if(n && n->connection) { - logger(DEBUG_CONNECTIONS, LOG_INFO, "Already connected to %s", outgoing->name); + outgoing->node->connection->outgoing = outgoing; + return; + } + + reset_outgoing(outgoing); - n->connection->outgoing = outgoing; + if(outgoing->node->status.blacklisted) { return; } - init_configuration(&outgoing->config_tree); - read_host_config(outgoing->config_tree, outgoing->name); - outgoing->cfg = lookup_config(outgoing->config_tree, "Address"); + if(mesh->connection_try_cb) { + mesh->connection_try_cb(mesh, (meshlink_node_t *)outgoing->node); + } + + do_outgoing_connection(mesh, outgoing); +} - if(!outgoing->cfg) { - logger(DEBUG_ALWAYS, LOG_ERR, "No address specified for %s", outgoing->name); +/// Delayed close of a filedescriptor. +static void tarpit(meshlink_handle_t *mesh, int fd) { + if(!fd) { return; } - do_outgoing_connection(outgoing); + if(mesh->pits[mesh->next_pit]) { + closesocket(mesh->pits[mesh->next_pit]); + } + + mesh->pits[mesh->next_pit++] = fd; + + if(mesh->next_pit >= (int)(sizeof mesh->pits / sizeof mesh->pits[0])) { + mesh->next_pit = 0; + } } /* accept a new tcp connect and create a new connection */ -void handle_new_meta_connection(int sock, short events, void *data) { +void handle_new_meta_connection(event_loop_t *loop, void *data, int flags) { + (void)flags; + meshlink_handle_t *mesh = loop->data; + listen_socket_t *l = data; connection_t *c; sockaddr_t sa; int fd; - socklen_t len = sizeof sa; + socklen_t len = sizeof(sa); + + memset(&sa, 0, sizeof(sa)); - fd = accept(sock, &sa.sa, &len); + fd = accept(l->tcp.fd, &sa.sa, &len); if(fd < 0) { - logger(DEBUG_ALWAYS, LOG_ERR, "Accepting a new connection failed: %s", sockstrerror(sockerrno)); + if(errno == EINVAL) { // TODO: check if Windows agrees + event_loop_stop(loop); + return; + } + + logger(mesh, MESHLINK_ERROR, "Accepting a new connection failed: %s", sockstrerror(sockerrno)); return; } sockaddrunmap(&sa); + /* Rate limit incoming connections to max_connection_burst/second. */ + + if(mesh->loop.now.tv_sec != mesh->connection_burst_time) { + mesh->connection_burst_time = mesh->loop.now.tv_sec; + mesh->connection_burst = 0; + } + + if(mesh->connection_burst >= max_connection_burst) { + tarpit(mesh, fd); + return; + } + + mesh->connection_burst++; + + // Accept the new connection + c = new_connection(); c->name = xstrdup(""); - c->outcipher = myself->connection->outcipher; - c->outdigest = myself->connection->outdigest; - c->outmaclength = myself->connection->outmaclength; - c->outcompression = myself->connection->outcompression; c->address = sa; - c->hostname = sockaddr2hostname(&sa); c->socket = fd; - c->last_ping_time = time(NULL); + c->last_ping_time = mesh->loop.now.tv_sec; - logger(DEBUG_CONNECTIONS, LOG_NOTICE, "Connection from %s", c->hostname); + char *hostname = sockaddr2hostname(&sa); + logger(mesh, MESHLINK_INFO, "Connection from %s", hostname); + free(hostname); - event_set(&c->inevent, c->socket, EV_READ | EV_PERSIST, handle_meta_connection_data, c); - event_set(&c->outevent, c->socket, EV_WRITE | EV_PERSIST, handle_meta_write, c); - event_add(&c->inevent, NULL); + io_add(&mesh->loop, &c->io, handle_meta_io, c, c->socket, IO_READ); configure_tcp(c); - connection_add(c); + connection_add(mesh, c); c->allow_request = ID; - send_id(c); + send_id(mesh, c); } static void free_outgoing(outgoing_t *outgoing) { - if(event_initialized(&outgoing->ev)) - event_del(&outgoing->ev); - - if(outgoing->ai) - freeaddrinfo(outgoing->ai); + meshlink_handle_t *mesh = outgoing->node->mesh; - if(outgoing->config_tree) - exit_configuration(&outgoing->config_tree); + timeout_del(&mesh->loop, &outgoing->ev); - if(outgoing->name) - free(outgoing->name); + if(outgoing->ai) { + if(outgoing->state == OUTGOING_RECENT || outgoing->state == OUTGOING_KNOWN) { + free_known_addresses(outgoing->ai); + } else { + freeaddrinfo(outgoing->ai); + } + } free(outgoing); } -void try_outgoing_connections(void) { - /* If there is no outgoing list yet, create one. Otherwise, mark all outgoings as deleted. */ - - if(!outgoing_list) { - outgoing_list = list_alloc((list_action_t)free_outgoing); - } else { - for list_each(outgoing_t, outgoing, outgoing_list) - outgoing->timeout = -1; - } - - /* Make sure there is one outgoing_t in the list for each ConnectTo. */ - - for(config_t *cfg = lookup_config(config_tree, "ConnectTo"); cfg; cfg = lookup_config_next(config_tree, cfg)) { - char *name; - get_config_string(cfg, &name); - - if(!check_id(name)) { - logger(DEBUG_ALWAYS, LOG_ERR, - "Invalid name for outgoing connection in %s line %d", - cfg->file, cfg->line); - free(name); - continue; - } - - bool found = false; - - for list_each(outgoing_t, outgoing, outgoing_list) { - if(!strcmp(outgoing->name, name)) { - found = true; - outgoing->timeout = 0; - break; - } - } - - if(!found) { - outgoing_t *outgoing = xmalloc_and_zero(sizeof *outgoing); - outgoing->name = name; - list_insert_tail(outgoing_list, outgoing); - setup_outgoing_connection(outgoing); - } - } - - /* Terminate any connections whose outgoing_t is to be deleted. */ +void init_outgoings(meshlink_handle_t *mesh) { + mesh->outgoings = list_alloc((list_action_t)free_outgoing); +} - for list_each(connection_t, c, connection_list) { - if(c->outgoing && c->outgoing->timeout == -1) { - c->outgoing = NULL; - logger(DEBUG_CONNECTIONS, LOG_INFO, "No more outgoing connection to %s", c->name); - terminate_connection(c, c->status.active); - } +void exit_outgoings(meshlink_handle_t *mesh) { + if(mesh->outgoings) { + list_delete_list(mesh->outgoings); + mesh->outgoings = NULL; } - - /* Delete outgoing_ts for which there is no ConnectTo. */ - - for list_each(outgoing_t, outgoing, outgoing_list) - if(outgoing->timeout == -1) - list_delete_node(outgoing_list, node); }