/* Convert IP address from network format to ASCII dot notation. */
const char *ipaddrstr(ipaddr addr, char *ipstr) {
if (mill_ipfamily(addr) == AF_INET) {
return inet_ntop(AF_INET, &(((struct sockaddr_in*)&addr)->sin_addr),
ipstr, INET_ADDRSTRLEN);
}
else {
return inet_ntop(AF_INET6, &(((struct sockaddr_in6*)&addr)->sin6_addr),
ipstr, INET6_ADDRSTRLEN);
}
}
tcpsock tcpconnect(ipaddr addr, int64_t deadline) {
/* Open a socket. */
int s = socket(mill_ipfamily(addr), SOCK_STREAM, 0);
if(s == -1)
return NULL;
mill_tcptune(s);
/* Connect to the remote endpoint. */
int rc = connect(s, (struct sockaddr*)&addr, mill_iplen(addr));
if(rc != 0) {
mill_assert(rc == -1);
if(errno != EINPROGRESS)
return NULL;
rc = fdwait(s, FDW_OUT, deadline);
if(rc == 0) {
errno = ETIMEDOUT;
return NULL;
}
int err;
socklen_t errsz = sizeof(err);
rc = getsockopt(s, SOL_SOCKET, SO_ERROR, (void*)&err, &errsz);
if(rc != 0) {
err = errno;
fdclean(s);
close(s);
errno = err;
return NULL;
}
if(err != 0) {
fdclean(s);
close(s);
errno = err;
return NULL;
}
}
/* Create the object. */
struct mill_tcpconn *conn = malloc(sizeof(struct mill_tcpconn));
if(!conn) {
fdclean(s);
close(s);
errno = ENOMEM;
return NULL;
}
tcpconn_init(conn, s);
errno = 0;
return (tcpsock)conn;
}
tcpsock tcplisten(ipaddr addr, int backlog) {
/* Open the listening socket. */
int s = socket(mill_ipfamily(addr), SOCK_STREAM, 0);
if(s == -1)
return NULL;
mill_tcptune(s);
/* Start listening. */
int rc = bind(s, (struct sockaddr*)&addr, mill_iplen(addr));
if(rc != 0)
return NULL;
rc = listen(s, backlog);
if(rc != 0)
return NULL;
/* If the user requested an ephemeral port,
retrieve the port number assigned by the OS now. */
int port = mill_ipport(addr);
if(!port == 0) {
ipaddr baddr;
socklen_t len = sizeof(ipaddr);
rc = getsockname(s, (struct sockaddr*)&baddr, &len);
if(rc == -1) {
int err = errno;
fdclean(s);
close(s);
errno = err;
return NULL;
}
port = mill_ipport(baddr);
}
/* Create the object. */
struct mill_tcplistener *l = malloc(sizeof(struct mill_tcplistener));
if(!l) {
fdclean(s);
close(s);
errno = ENOMEM;
return NULL;
}
l->sock.type = MILL_TCPLISTENER;
l->fd = s;
l->port = port;
errno = 0;
return &l->sock;
}
struct mill_udpsock *mill_udplisten_(ipaddr addr) {
/* Open the listening socket. */
int s = socket(mill_ipfamily(addr), SOCK_DGRAM, 0);
if(s == -1)
return NULL;
mill_udptune(s);
/* Start listening. */
int rc = bind(s, (struct sockaddr*)&addr, mill_iplen(addr));
if(rc != 0)
return NULL;
/* If the user requested an ephemeral port,
retrieve the port number assigned by the OS now. */
int port = mill_ipport(addr);
if(port) {
ipaddr baddr;
socklen_t len = sizeof(ipaddr);
rc = getsockname(s, (struct sockaddr*)&baddr, &len);
if(rc == -1) {
int err = errno;
fdclean(s);
close(s);
errno = err;
return NULL;
}
port = mill_ipport(baddr);
}
/* Create the object. */
struct mill_udpsock *us = malloc(sizeof(struct mill_udpsock));
if(!us) {
fdclean(s);
close(s);
errno = ENOMEM;
return NULL;
}
us->fd = s;
us->port = port;
errno = 0;
return us;
}
int mill_ipport(ipaddr addr) {
return ntohs(mill_ipfamily(addr) == AF_INET ?
((struct sockaddr_in*)&addr)->sin_port :
((struct sockaddr_in6*)&addr)->sin6_port);
}
int mill_iplen(ipaddr addr) {
return mill_ipfamily(addr) == AF_INET ?
sizeof(struct sockaddr_in) : sizeof(struct sockaddr_in6);
}