server/admin.c: Remove spurious `ping' in usage message.
[tripe] / pkstream / pkstream.c
index dd4658e..8b2a058 100644 (file)
@@ -61,6 +61,7 @@
 typedef union addr {
   struct sockaddr sa;
   struct sockaddr_in sin;
+  struct sockaddr_in6 sin6;
 } addr;
 
 DA_DECL(addr_v, addr);
@@ -107,14 +108,29 @@ static socklen_t addrsz(const addr *a)
 {
   switch (a->sa.sa_family) {
     case AF_INET: return sizeof(a->sin);
+    case AF_INET6: return sizeof(a->sin6);
     default: abort();
   }
 }
 
+static int knownafp(int af)
+{
+  switch (af) {
+    case AF_INET: case AF_INET6: return (1);
+    default: return (0);
+  }
+}
+
 static int initsock(int fd, int af)
 {
+  int yes = 1;
+
   switch (af) {
     case AF_INET: break;
+    case AF_INET6:
+      if (setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, &yes, sizeof(yes)))
+       return (-1);
+      break;
     default: abort();
   }
   return (0);
@@ -136,16 +152,33 @@ static int addreq(const addr *a, const addr *b)
   switch (a->sa.sa_family) {
     case AF_INET:
       return (a->sin.sin_addr.s_addr == b->sin.sin_addr.s_addr);
+    case AF_INET6:
+      return (!memcmp(a->sin6.sin6_addr.s6_addr,
+                     b->sin6.sin6_addr.s6_addr,
+                     16) &&
+             a->sin6.sin6_scope_id == b->sin6.sin6_scope_id);
     default:
       abort();
   }
 }
 
-static void initaddr(addr *a)
+static void initaddr(addr *a, int af)
 {
-  a->sin.sin_family = AF_INET;
-  a->sin.sin_addr.s_addr = INADDR_ANY;
-  a->sin.sin_port = 0;
+  a->sa.sa_family = af;
+  switch (af) {
+    case AF_INET:
+      a->sin.sin_addr.s_addr = INADDR_ANY;
+      a->sin.sin_port = 0;
+      break;
+    case AF_INET6:
+      memset(a->sin6.sin6_addr.s6_addr, 0, 16);
+      a->sin6.sin6_port = 0;
+      a->sin6.sin6_flowinfo = 0;
+      a->sin6.sin6_scope_id = 0;
+      break;
+    default:
+      abort();
+  }
 }
 
 #define caf_addr 1u
@@ -153,6 +186,7 @@ static void initaddr(addr *a)
 static void copyaddr(addr *a, const struct sockaddr *sa, unsigned f)
 {
   const struct sockaddr_in *sin;
+  const struct sockaddr_in6 *sin6;
 
   a->sa.sa_family = sa->sa_family;
   switch (sa->sa_family) {
@@ -161,6 +195,15 @@ static void copyaddr(addr *a, const struct sockaddr *sa, unsigned f)
       if (f&caf_addr) a->sin.sin_addr = sin->sin_addr;
       if (f&caf_port) a->sin.sin_port = sin->sin_port;
       break;
+    case AF_INET6:
+      sin6 = (const struct sockaddr_in6 *)sa;
+      if (f&caf_addr) {
+       a->sin6.sin6_addr = sin6->sin6_addr;
+       a->sin6.sin6_scope_id = sin6->sin6_scope_id;
+      }
+      if (f&caf_port) a->sin6.sin6_port = sin6->sin6_port;
+      /* ??? flowinfo? */
+      break;
     default:
       abort();
   }
@@ -343,10 +386,12 @@ static void pushaddrs(addr_v *av, const struct addrinfo *ailist)
   const struct addrinfo *ai;
   size_t i, n;
 
-  for (ai = ailist, n = 0; ai; ai = ai->ai_next) n++;
+  for (ai = ailist, n = 0; ai; ai = ai->ai_next)
+    if (knownafp(ai->ai_family)) n++;
   DA_ENSURE(av, n);
   for (i = DA_LEN(av), ai = ailist; ai; ai = ai->ai_next) {
-    initaddr(&DA(av)[i]);
+    if (!knownafp(ai->ai_family)) continue;
+    initaddr(&DA(av)[i], ai->ai_family);
     copyaddr(&DA(av)[i++], ai->ai_addr, caf_addr | caf_port);
   }
   DA_EXTEND(av, n);
@@ -362,9 +407,15 @@ static void parseaddr(const struct addrinfo *aihint,
 
   if (f&paf_parse) {
     alloc = xstrdup(host);
-    if ((sep = strchr(alloc, ':')) == 0)
-      die(1, "missing port number in address `%s'", host);
-    host = alloc; *sep = 0; svc = sep + 1;
+    if (alloc[0] != '[') {
+      if ((sep = strchr(alloc, ':')) == 0)
+       die(1, "missing port number in address `%s'", host);
+      host = alloc; *sep = 0; svc = sep + 1;
+    } else {
+      if ((sep = strchr(alloc, ']')) == 0 || sep[1] != ':')
+       die(1, "bad syntax in address `%s:'", host);
+      host = alloc + 1; *sep = 0; svc = sep + 2;
+    }
   }
 
   err = getaddrinfo(host, svc, aihint, ai_out);
@@ -384,7 +435,7 @@ static void parseaddr(const struct addrinfo *aihint,
 static void usage(FILE *fp)
 {
   pquis(fp,
-       "Usage: $ [-l PORT] [-b ADDR] [-p ADDR] [-c ADDR:PORT]\n\
+       "Usage: $ [-46] [-l PORT] [-b ADDR] [-p ADDR] [-c ADDR:PORT]\n\
        ADDR:PORT ADDR:PORT\n");
 }
 
@@ -403,6 +454,8 @@ Options:\n\
 -v, --version          Display version number.\n\
 -u, --usage            Display pointless usage message.\n\
 \n\
+-4, --ipv4             Restrict to IPv4 only.\n\
+-6, --ipv6             Restrict to IPv6 only.\n\
 -l, --listen=PORT      Listen for connections to TCP PORT.\n\
 -p, --peer=ADDR                Only accept connections from IP ADDR.\n\
 -b, --bind=ADDR                Bind to ADDR before connecting.\n\
@@ -421,6 +474,7 @@ int main(int argc, char *argv[])
   addr bindaddr;
   const char *connhost = 0;
   struct addrinfo aihint = { 0 }, *ai, *ailist;
+  int af = AF_UNSPEC;
   int fd = -1;
   int len = 65536;
   size_t i, n;
@@ -436,6 +490,8 @@ int main(int argc, char *argv[])
       { "help",                        0,              0,      'h' },
       { "version",             0,              0,      'v' },
       { "usage",               0,              0,      'u' },
+      { "ipv4",                        0,              0,      '4' },
+      { "ipv6",                        0,              0,      '6' },
       { "listen",              OPTF_ARGREQ,    0,      'l' },
       { "peer",                        OPTF_ARGREQ,    0,      'p' },
       { "bind",                        OPTF_ARGREQ,    0,      'b' },
@@ -444,13 +500,15 @@ int main(int argc, char *argv[])
     };
     int i;
 
-    i = mdwopt(argc, argv, "hvul:p:b:c:", opt, 0, 0, 0);
+    i = mdwopt(argc, argv, "hvu46l:p:b:c:", opt, 0, 0, 0);
     if (i < 0)
       break;
     switch (i) {
       case 'h': help(stdout); exit(0);
       case 'v': version(stdout); exit(0);
       case 'u': usage(stdout); exit(0);
+      case '4': af = AF_INET; break;
+      case '6': af = AF_INET6; break;
       case 'l': bindsvc = optarg; break;
       case 'p': DA_PUSH(&peerhosts, optarg); break;
       case 'b': DA_PUSH(&bindhosts, optarg); break;
@@ -467,7 +525,7 @@ int main(int argc, char *argv[])
   if (bindsvc && connhost)
     die(1, "can't listen and connect");
 
-  aihint.ai_family = AF_INET;
+  aihint.ai_family = af;
   DA_CREATE(&cw.me); DA_CREATE(&cw.peer);
 
   n = DA_LEN(&bindhosts);
@@ -481,9 +539,13 @@ int main(int argc, char *argv[])
       freeaddrinfo(ailist);
     } else if (!bindsvc) {
       if (n != 1) die(1, "can only bind to one address as client");
-      parseaddr(&aihint, DA(&bindhosts)[0], 0, 0, &ailist); ai = ailist;
-      initaddr(&bindaddr);
+      parseaddr(&aihint, DA(&bindhosts)[0], 0, 0, &ailist);
+      for (ai = ailist; ai && !knownafp(ai->ai_family); ai = ai->ai_next);
+      if (!ai)
+       die(1, "no usable addresses returned for `%s'", DA(&bindhosts)[0]);
+      initaddr(&bindaddr, ai->ai_family);
       copyaddr(&bindaddr, ai->ai_addr, caf_addr);
+      aihint.ai_family = ai->ai_family;
       freeaddrinfo(ailist);
     } else for (i = 0; i < n; i++) {
       parseaddr(&aihint, DA(&bindhosts)[i], bindsvc, 0, &ailist);
@@ -507,6 +569,7 @@ int main(int argc, char *argv[])
       pushaddrs(&cw.peer, ailist);
       freeaddrinfo(ailist);
     }
+    if (!DA_LEN(&cw.peer)) die(1, "no usable peer addresses");
   }
 
   if (connhost) {
@@ -530,10 +593,13 @@ int main(int argc, char *argv[])
       die(1, "couldn't connect to TCP server: %s", strerror(errno));
   }
 
+  aihint.ai_family = af;
   aihint.ai_socktype = SOCK_DGRAM;
   aihint.ai_protocol = IPPROTO_UDP;
   aihint.ai_flags = AI_ADDRCONFIG | AI_PASSIVE;
-  parseaddr(&aihint, argv[optind], 0, paf_parse, &ailist); ai = ailist;
+  parseaddr(&aihint, argv[optind], 0, paf_parse, &ailist);
+  for (ai = ailist; ai && !knownafp(ai->ai_family); ai = ai->ai_next);
+  if (!ai) die(1, "no usable addresses returned for `%s'", argv[optind]);
   if ((fd_udp = socket(ai->ai_family, SOCK_DGRAM, IPPROTO_UDP)) < 0 ||
       initsock(fd_udp, ai->ai_family) ||
       nonblockify(fd_udp) || cloexec(fd_udp) ||
@@ -542,6 +608,7 @@ int main(int argc, char *argv[])
       bind(fd_udp, ai->ai_addr, ai->ai_addrlen))
     die(1, "couldn't set up UDP socket: %s", strerror(errno));
   freeaddrinfo(ailist);
+  aihint.ai_family = ai->ai_family;
   aihint.ai_flags = AI_ADDRCONFIG;
   parseaddr(&aihint, argv[optind + 1], 0, paf_parse, &ailist);
   for (ai = ailist; ai; ai = ai->ai_next)