#include "IOInternal.h"
#include "IOHandler.h"
#include "IODNSLookup.h"
+#include "IOLog.h"
+#include "IOSockets.h"
+#include "IOTimer.h"
+
+#ifdef HAVE_ARES_H
+#include <ares.h>
+#include <string.h>
+#include <sys/time.h>
+#ifdef WIN32
+#define _WIN32_WINNT 0x501
+#include <windows.h>
+#include <winsock2.h>
+#elif defined HAVE_SYS_SELECT_H
+#include <sys/select.h>
+#include <netdb.h>
+#include <arpa/inet.h>
+#endif
+
+#include "compat/inet.h"
+
+struct dnsengine_cares_socket {
+ struct _IOSocket *iosock;
+ int want_read : 1;
+ int want_write : 1;
+};
+
+struct dnsengine_cares_query {
+ int query_count;
+ int query_successful;
+ struct _IODNSQuery *iodns;
+};
+
+static IOTIMER_CALLBACK(dnsengine_cares_timer_callback);
+
+static ares_channel dnsengine_cares_channel;
+static struct dnsengine_cares_socket dnsengine_cares_sockets[ARES_GETSOCK_MAXNUM];
+static struct IOTimerDescriptor *dnsengine_cares_timer = NULL;
static int dnsengine_cares_init() {
- /* TODO */
- return 0;
+ int res;
+
+ // zero dnsengine_cares_sockets array
+ memset(dnsengine_cares_sockets, 0, sizeof(*dnsengine_cares_sockets) * ARES_GETSOCK_MAXNUM);
+
+ // initialize cares
+ if((res = ares_init(&dnsengine_cares_channel)) != ARES_SUCCESS) {
+ iolog_trigger(IOLOG_ERROR, "Failed to initialize c-ares in %s:%d", __FILE__, __LINE__);
+ return 0;
+ }
+ return 1;
+}
+
+static void dnsengine_cares_update_sockets() {
+ int ares_socks[ARES_GETSOCK_MAXNUM];
+ memset(ares_socks, 0, sizeof(*ares_socks) * ARES_GETSOCK_MAXNUM);
+ int sockreqs = ares_getsock(dnsengine_cares_channel, ares_socks, ARES_GETSOCK_MAXNUM);
+ int i, j, sockid, newsock, updatesock;
+ struct _IOSocket *iosock;
+
+ //unregister "old" sockets
+ for(i = 0; i < ARES_GETSOCK_MAXNUM; i++) {
+ if(!dnsengine_cares_sockets[i].iosock)
+ continue;
+
+ //search matching ares_socks
+ sockid = -1;
+ for(j = 0; j < ARES_GETSOCK_MAXNUM; j++) {
+ if(dnsengine_cares_sockets[i].iosock->fd == ares_socks[j]) {
+ sockid = j;
+ break;
+ }
+ }
+ if(sockid == -1) {
+ //unregister socket
+ _free_socket(dnsengine_cares_sockets[i].iosock);
+ dnsengine_cares_sockets[i].iosock = NULL;
+ }
+ }
+
+ //register new / update existing sockets
+ for(i = 0; i < ARES_GETSOCK_MAXNUM; i++) {
+ if(!ares_socks[i])
+ break;
+
+ //search matching dnsengine_cares_socket
+ sockid = -1;
+ for(j = 0; j < ARES_GETSOCK_MAXNUM; j++) {
+ if(dnsengine_cares_sockets[j].iosock && dnsengine_cares_sockets[j].iosock->fd == ares_socks[i]) {
+ sockid = j;
+ break;
+ }
+ }
+
+ if(sockid == -1) {
+ //append new socket
+ for(j = 0; j < ARES_GETSOCK_MAXNUM; j++) {
+ if(!dnsengine_cares_sockets[j].iosock) {
+ sockid = j;
+ break;
+ }
+ }
+ if(sockid == -1) {
+ iolog_trigger(IOLOG_ERROR, "Error in dnsengine_cares_update_sockets: could not find free dnsengine_cares_socket in %s:%d", __FILE__, __LINE__);
+ continue;
+ }
+ iosock = _create_socket();
+ if(!iosock)
+ continue;
+
+ //set up iosock
+ iosock->socket_flags |= IOSOCKETFLAG_PARENT_DNSENGINE | IOSOCKETFLAG_OVERRIDE_WANT_RW;
+ iosock->fd = ares_socks[i];
+ dnsengine_cares_sockets[sockid].iosock = iosock;
+ dnsengine_cares_sockets[sockid].want_read = 0;
+ dnsengine_cares_sockets[sockid].want_write = 0;
+
+ newsock = 1;
+ } else
+ newsock = 0;
+
+ updatesock = 0;
+ if(dnsengine_cares_sockets[sockid].want_read ^ ARES_GETSOCK_READABLE(sockreqs, i)) {
+ if(ARES_GETSOCK_READABLE(sockreqs, i)) {
+ dnsengine_cares_sockets[sockid].iosock->socket_flags |= IOSOCKETFLAG_OVERRIDE_WANT_R;
+ dnsengine_cares_sockets[sockid].want_read = 1;
+ } else {
+ dnsengine_cares_sockets[sockid].iosock->socket_flags &= ~IOSOCKETFLAG_OVERRIDE_WANT_R;
+ dnsengine_cares_sockets[sockid].want_read = 0;
+ }
+ updatesock = 1;
+ }
+ if(dnsengine_cares_sockets[sockid].want_write ^ ARES_GETSOCK_WRITABLE(sockreqs, i)) {
+ if(ARES_GETSOCK_WRITABLE(sockreqs, i)) {
+ dnsengine_cares_sockets[sockid].iosock->socket_flags |= IOSOCKETFLAG_OVERRIDE_WANT_W;
+ dnsengine_cares_sockets[sockid].want_write = 1;
+ } else {
+ dnsengine_cares_sockets[sockid].iosock->socket_flags &= ~IOSOCKETFLAG_OVERRIDE_WANT_W;
+ dnsengine_cares_sockets[sockid].want_write = 0;
+ }
+ updatesock = 1;
+ }
+ if(updatesock || newsock) {
+ if(newsock)
+ iosocket_activate(dnsengine_cares_sockets[sockid].iosock);
+ else
+ iosocket_update(dnsengine_cares_sockets[sockid].iosock);
+ }
+ }
+}
+
+static void dnsengine_cares_update_timeout() {
+ struct timeval timeout, now;
+ timeout.tv_sec = 60;
+ timeout.tv_usec = 0;
+ ares_timeout(dnsengine_cares_channel, &timeout, &timeout);
+
+ gettimeofday(&now, NULL);
+ timeout.tv_sec += now.tv_sec;
+ timeout.tv_usec += now.tv_usec;
+ if(timeout.tv_usec > 1000000) {
+ timeout.tv_sec += 1;
+ timeout.tv_usec -= 1000000;
+ }
+
+ if(dnsengine_cares_timer)
+ iotimer_set_timeout(dnsengine_cares_timer, &timeout);
+ else {
+ dnsengine_cares_timer = iotimer_create(&timeout);
+ iotimer_set_callback(dnsengine_cares_timer, dnsengine_cares_timer_callback);
+ iotimer_start(dnsengine_cares_timer);
+ }
+}
+
+static IOTIMER_CALLBACK(dnsengine_cares_timer_callback) {
+ dnsengine_cares_timer = NULL;
+ ares_process_fd(dnsengine_cares_channel, ARES_SOCKET_BAD, ARES_SOCKET_BAD);
+ dnsengine_cares_update_timeout();
+ dnsengine_cares_update_sockets();
+}
+
+static void dnsengine_cares_socket_callback(struct _IOSocket *iosock, int wantread, int wantwrite) {
+ int socketfd = iosock->fd;
+ ares_process_fd(dnsengine_cares_channel, (wantread ? socketfd : ARES_SOCKET_BAD), (wantread ? socketfd : ARES_SOCKET_BAD));
+ dnsengine_cares_update_timeout();
+ dnsengine_cares_update_sockets();
}
static void dnsengine_cares_stop() {
- /* TODO */
+ if(dnsengine_cares_timer)
+ iotimer_destroy(dnsengine_cares_timer);
+}
+
+
+static void dnsengine_cares_callback(void *arg, int status, int timeouts, struct hostent *host) {
+ struct dnsengine_cares_query *query = arg;
+ struct _IODNSQuery *iodns = query->iodns;
+ query->query_count--;
+ if(iodns) {
+ if(!(iodns->flags & IODNSFLAG_RUNNING)) {
+ // query stopped
+ query->iodns = NULL;
+ iodns = NULL;
+ iodns_free_result(iodns->result);
+ _free_dnsquery(iodns);
+ }
+ if(iodns && status == ARES_SUCCESS) {
+ if((iodns->type & IODNS_FORWARD)) {
+ char **h_addr;
+ for(h_addr = host->h_addr_list; *h_addr; h_addr++) {
+ struct IODNSResult *dnsresult = malloc(sizeof(*dnsresult));
+ if(!dnsresult) {
+ iolog_trigger(IOLOG_ERROR, "Failed to allocate memory for IODNSResult in %s:%d", __FILE__, __LINE__);
+ goto dnsengine_cares_callback_finally;
+ }
+
+ int sockaddrlen;
+ if(host->h_addrtype == AF_INET) {
+ dnsresult->type = IODNS_RECORD_A;
+ sockaddrlen = sizeof(struct sockaddr_in);
+ } else {
+ dnsresult->type = IODNS_RECORD_AAAA;
+ sockaddrlen = sizeof(struct sockaddr_in6);
+ }
+ dnsresult->result.addr.addresslen = sockaddrlen;
+ dnsresult->result.addr.address = malloc(sockaddrlen);
+ if(!dnsresult->result.addr.address) {
+ iolog_trigger(IOLOG_ERROR, "Failed to allocate memory for sockaddr in %s:%d", __FILE__, __LINE__);
+ goto dnsengine_cares_callback_finally;
+ }
+ void *target = (host->h_addrtype == AF_INET ? ((void *) &((struct sockaddr_in *)dnsresult->result.addr.address)->sin_addr) : ((void *) &((struct sockaddr_in6 *)dnsresult->result.addr.address)->sin6_addr));
+ memcpy(target, *h_addr, host->h_length);
+
+ dnsresult->result.addr.address->sa_family = host->h_addrtype;
+ if(host->h_addrtype == AF_INET) {
+ char str[INET_ADDRSTRLEN];
+ inet_ntop( AF_INET, &((struct sockaddr_in *)dnsresult->result.addr.address)->sin_addr, str, INET_ADDRSTRLEN );
+ iolog_trigger(IOLOG_DEBUG, "Resolved %s to (A): %s", iodns->request.host, str);
+ } else {
+ char str[INET6_ADDRSTRLEN];
+ inet_ntop( AF_INET6, &((struct sockaddr_in6 *)dnsresult->result.addr.address)->sin6_addr, str, INET6_ADDRSTRLEN );
+ iolog_trigger(IOLOG_DEBUG, "Resolved %s to (AAAA): %s", iodns->request.host, str);
+ }
+
+ dnsresult->next = iodns->result;
+ iodns->result = dnsresult;
+ }
+
+ } else if((iodns->type & IODNS_REVERSE)) {
+ struct IODNSResult *dnsresult = malloc(sizeof(*dnsresult));
+ if(!dnsresult) {
+ iolog_trigger(IOLOG_ERROR, "Failed to allocate memory for IODNSResult in %s:%d", __FILE__, __LINE__);
+ goto dnsengine_cares_callback_finally;
+ }
+
+ dnsresult->type = IODNS_RECORD_PTR;
+ dnsresult->result.host = strdup(host->h_name);
+ if(!dnsresult->result.host) {
+ iolog_trigger(IOLOG_ERROR, "Failed to duplicate h_name string for IODNSResult in %s:%d", __FILE__, __LINE__);
+ goto dnsengine_cares_callback_finally;
+ }
+
+ dnsresult->next = iodns->result;
+ iodns->result = dnsresult;
+ }
+
+ query->query_successful++;
+ }
+ }
+ dnsengine_cares_callback_finally:
+ if(query->query_count <= 0) {
+ if(iodns) {
+ iodns->flags &= ~(IODNSFLAG_PROCESSING | IODNSFLAG_RUNNING);
+ iodns_event_callback(iodns, (query->query_successful ? IODNSEVENT_SUCCESS : IODNSEVENT_FAILED));
+ }
+ free(query);
+ }
}
static void dnsengine_cares_add(struct _IODNSQuery *iodns) {
- /* TODO */
+ struct dnsengine_cares_query *query = malloc(sizeof(*query));
+ if(!query) {
+ iolog_trigger(IOLOG_ERROR, "Failed to allocate memory for dnsengine_cares_query in %s:%d", __FILE__, __LINE__);
+ iodns_event_callback(iodns, IODNSEVENT_FAILED);
+ return;
+ }
+ iodns->query = query;
+ query->query_count = 0;
+ query->query_successful = 0;
+ query->iodns = iodns;
+ iodns->flags |= IODNSFLAG_PROCESSING;
+ if((iodns->type & IODNS_FORWARD)) {
+ if((iodns->type & IODNS_RECORD_A)) {
+ query->query_count++;
+ ares_gethostbyname(dnsengine_cares_channel, iodns->request.host, AF_INET, dnsengine_cares_callback, query);
+ }
+ if((iodns->type & IODNS_RECORD_AAAA)) {
+ query->query_count++;
+ ares_gethostbyname(dnsengine_cares_channel, iodns->request.host, AF_INET6, dnsengine_cares_callback, query);
+ }
+ } else if((iodns->type & IODNS_REVERSE)) {
+ query->query_count++;
+ struct sockaddr *addr = iodns->request.addr.address;
+ if(addr->sa_family == AF_INET) {
+ struct sockaddr_in *addr4 = (struct sockaddr_in *) iodns->request.addr.address;
+ ares_gethostbyaddr(dnsengine_cares_channel, &addr4->sin_addr, sizeof(addr4->sin_addr), addr->sa_family, dnsengine_cares_callback, query);
+ } else {
+ struct sockaddr_in6 *addr6 = (struct sockaddr_in6 *)iodns->request.addr.address;
+ ares_gethostbyaddr(dnsengine_cares_channel, &addr6->sin6_addr, sizeof(addr6->sin6_addr), addr->sa_family, dnsengine_cares_callback, query);
+ }
+ }
+ dnsengine_cares_update_timeout();
+ dnsengine_cares_update_sockets();
}
static void dnsengine_cares_remove(struct _IODNSQuery *iodns) {
- /* TODO */
+ /* empty */
}
static void dnsengine_cares_loop() {
- /* TODO */
+ /* empty */
}
struct IODNSEngine dnsengine_cares = {
- .name = "c-ares",
- .init = dnsengine_cares_init,
+ .name = "c-ares",
+ .init = dnsengine_cares_init,
.stop = dnsengine_cares_stop,
- .add = dnsengine_cares_add,
- .remove = dnsengine_cares_remove,
- .loop = dnsengine_cares_loop,
+ .add = dnsengine_cares_add,
+ .remove = dnsengine_cares_remove,
+ .loop = dnsengine_cares_loop,
+ .socket_callback = dnsengine_cares_socket_callback,
+};
+
+#else
+
+struct IODNSEngine dnsengine_cares = {
+ .name = "c-ares",
+ .init = NULL,
+ .stop = NULL,
+ .add = NULL,
+ .remove = NULL,
+ .loop = NULL,
+ .socket_callback = NULL,
};
+
+#endif