Update copyrights
[dhcpcd-ui] / src / libdhcpcd / dhcpcd.c
index 3413b4403f6770b5abe43449b8c4d19cfe1e8b6d..c8bdd14fbfd8cb48cd54b610fbc3dc06c77a55ab 100644 (file)
@@ -1,6 +1,6 @@
 /*
  * libdhcpcd
- * Copyright 2009-2014 Roy Marples <roy@marples.name>
+ * Copyright 2009-2015 Roy Marples <roy@marples.name>
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
@@ -34,9 +34,9 @@
 #include <arpa/inet.h>
 
 #include <assert.h>
+#include <ctype.h>
 #include <errno.h>
 #include <fcntl.h>
-#include <libintl.h>
 #include <limits.h>
 #include <stdio.h>
 #include <stdlib.h>
 #define _(a) (a)
 #endif
 
+#ifdef HAVE_VIS_H
+#include <vis.h>
+#endif
+
 #ifndef SUN_LEN
 #define SUN_LEN(su) \
        (sizeof(*(su)) - sizeof((su)->sun_path) + strlen((su)->sun_path))
 #endif
 
+#ifndef iswhite
+#define iswhite(c)     (c == ' ' || c == '\t' || c == '\n')
+#endif
+
 static const char * const dhcpcd_types[] =
     { "link", "ipv4", "ra", "dhcp6", NULL };
 
@@ -222,8 +230,13 @@ get_value(const char *data, size_t len, const char *var)
        vlen = strlen(var);
        p = NULL;
        while (data + vlen + 1 < end) {
-               if (strncmp(data, var, vlen) == 0) {
-                       p = data + vlen;
+               /* Skip past NUL padding */
+               if (*data == '\0') {
+                       data++;
+                       continue;
+               }
+               if (strncmp(data, var, vlen) == 0 && data[vlen] == '=') {
+                       p = data + vlen + 1;
                        break;
                }
                data += strlen(data) + 1;
@@ -242,6 +255,172 @@ dhcpcd_get_value(const DHCPCD_IF *i, const char *var)
        return get_value(i->data, i->data_len, var);
 }
 
+ssize_t
+dhcpcd_encode_string_escape(char *dst, size_t len, const char *src, size_t slen)
+{
+       const char *end;
+       size_t bytes;
+       unsigned char c;
+
+       end = src + slen;
+       bytes = 0;
+       while (src < end) {
+               c = (unsigned char)*src++;
+               if ((c == '\\' || !isascii(c) || !isprint(c))) {
+                       if (c == '\\') {
+                               if (dst) {
+                                       if (len  == 0 || len == 1) {
+                                               errno = ENOSPC;
+                                               return -1;
+                                       }
+                                       *dst++ = '\\'; *dst++ = '\\';
+                                       len -= 2;
+                               }
+                               bytes += 2;
+                               continue;
+                       }
+                       if (dst) {
+                               if (len < 5) {
+                                       errno = ENOSPC;
+                                       return -1;
+                               }
+                               *dst++ = '\\';
+                               *dst++ = (char)(((c >> 6) & 03) + '0');
+                               *dst++ = (char)(((c >> 3) & 07) + '0');
+                               *dst++ = (char)(( c       & 07) + '0');
+                               len -= 4;
+                       }
+                       bytes += 4;
+               } else {
+                       if (dst) {
+                               if (len == 0) {
+                                       errno = ENOSPC;
+                                       return -1;
+                               }
+                               *dst++ = (char)c;
+                               len--;
+                       }
+                       bytes++;
+               }
+       }
+
+       if (dst) {
+               if (len == 0) {
+                       errno = ENOSPC;
+                       return -1;
+               }
+               *dst = '\0';
+       }
+
+       return (ssize_t)bytes;
+}
+
+ssize_t
+dhcpcd_decode_string_escape(char *dst, size_t dlen, const char *src)
+{
+       char c, esc;
+       int oct;
+       ssize_t bytes;
+
+       bytes = 0;
+       for (;;) {
+               c = *src++;
+               if (c == '\0')
+                       break;
+               if (dst && --dlen == 0) {
+                       errno = ENOSPC;
+                       return -1;
+               }
+               switch (c) {
+               case '\\':
+                       if (*src == '\0') {
+                               errno = EINVAL;
+                               return -1;
+                       }
+                       esc = *src++;
+                       switch (esc) {
+                       case '\\':
+                       case '0':
+                       case '1':
+                       case '3':
+                       case '4':
+                       case '5':
+                       case '6':
+                       case '7':
+                               oct = esc - '0';
+                               if (*src >= '0' && *src <='7')
+                                       oct = oct * 8 + (*src++ - '0');
+                               else {
+                                       errno = EINVAL;
+                                       return -1;
+                               }
+                               if (*src >= '0' && *src <='7')
+                                       oct = oct * 8 + (*src++ - '0');
+                               else {
+                                       errno = EINVAL;
+                                       return -1;
+                               }
+                               if (dst)
+                                       *dst++ = (char)oct;
+                       default:
+                               errno = EINVAL;
+                               return -1;
+                       }
+                       break;
+               default:
+                       if (dst)
+                               *dst++ = c;
+               }
+               bytes++;
+       }
+
+       if (dst) {
+               if (--dlen == 0) {
+                       errno = ENOSPC;
+                       return -1;
+               }
+               *dst = '\0';
+       }
+       return bytes;
+}
+
+ssize_t
+dhcpcd_decode_hex(char *dst, size_t dlen, const char *src)
+{
+       size_t bytes, i;
+       char c;
+       int val, n;
+
+       bytes = 0;
+       while (*src) {
+               if (dlen == 0 || dlen == 1) {
+                       errno = ENOSPC;
+                       return -1;
+               }
+               val = 0;
+               for (i = 0; i < 2; i++) {
+                       c = *src++;
+                       if (c >= '0' && c <= '9')
+                               n = c - '0';
+                       else if (c >= 'a' && c <= 'f')
+                               n = 10 + c - 'a';
+                       else if (c >= 'A' && c <= 'F')
+                               n = 10 + c - 'A';
+                       else {
+                               errno = EINVAL;
+                               return -1;
+                       }
+                       val = val * 16 + n;
+               }
+               *dst++ = (char)val;
+               bytes += 2;
+               dlen -= 2;
+               if (*src == ':')
+                       src++;
+       }
+       return (ssize_t)bytes;
+}
+
 const char *
 dhcpcd_get_prefix_value(const DHCPCD_IF *i, const char *prefix, const char *var)
 {
@@ -331,6 +510,80 @@ dhcpcd_interfaces(DHCPCD_CONNECTION *con)
        return con->interfaces;
 }
 
+char **
+dhcpcd_interface_names(DHCPCD_CONNECTION *con, size_t *nnames)
+{
+       char **names;
+       size_t n;
+       DHCPCD_IF *i;
+
+       assert(con);
+       if (con->interfaces == NULL)
+               return NULL;
+
+       n = 0;
+       for (i = con->interfaces; i; i = i->next) {
+               if (strcmp(i->type, "link") == 0)
+                       n++;
+       }
+       names = malloc(sizeof(char *) * (n + 1));
+       if (names == NULL)
+               return NULL;
+       n = 0;
+       for (i = con->interfaces; i; i = i->next) {
+               if (strcmp(i->type, "link") == 0) {
+                       names[n] = strdup(i->ifname);
+                       if (names[n] == NULL) {
+                               dhcpcd_freev(names);
+                               return NULL;
+                       }
+                       n++;
+               }
+       }
+       names[n] = NULL;
+       if (nnames)
+               *nnames = n;
+
+       return names;
+}
+
+void
+dhcpcd_freev(char **argv)
+{
+       char **v;
+
+       if (argv) {
+               for (v = argv; *v; v++)
+                       free(*v);
+               free(argv);
+       }
+}
+
+static int
+dhcpcd_cmpstring(const void *p1, const void *p2)
+{
+       const char *s1, *s2;
+       int cmp;
+
+       s1 = *(char * const *)p1;
+       s2 = *(char * const *)p2;
+       if ((cmp = strcasecmp(s1, s2)) == 0)
+               cmp = strcmp(s1, s2);
+       return cmp;
+}
+
+char **
+dhcpcd_interface_names_sorted(DHCPCD_CONNECTION *con)
+{
+       char **names;
+       size_t nnames;
+
+       names = dhcpcd_interface_names(con, &nnames);
+       if (names)
+               qsort(names, nnames, sizeof(char *), dhcpcd_cmpstring);
+       return names;
+}
+
 DHCPCD_IF *
 dhcpcd_get_if(DHCPCD_CONNECTION *con, const char *ifname, const char *type)
 {
@@ -356,27 +609,37 @@ dhcpcd_new_if(DHCPCD_CONNECTION *con, char *data, size_t len)
        int ti;
        bool addedi;
 
-       ifname = get_value(data, len, "interface=");
+#if 0
+       char *dp = data, *de = data + len;
+       while (dp < de) {
+               printf ("XX: %s\n", dp);
+               dp += strlen(dp) + 1;
+       }
+#endif
+
+       ifname = get_value(data, len, "interface");
        if (ifname == NULL || *ifname == '\0') {
                errno = ESRCH;
                return NULL;
        }
-       reason = get_value(data, len, "reason=");
+       reason = get_value(data, len, "reason");
        if (reason == NULL || *reason == '\0') {
                errno = ESRCH;
                return NULL;
        }
-       ifclass = get_value(data, len, "ifclass=");
+       ifclass = get_value(data, len, "ifclass");
        /* Skip pseudo interfaces */
        if (ifclass && *ifclass != '\0') {
                errno = ENOTSUP;
                return NULL;
        }
-       if (strcmp(reason, "RECONFIGURE") == 0) {
+       if (strcmp(reason, "RECONFIGURE") == 0 ||
+           strcmp(reason, "INFORM") == 0 || strcmp(reason, "INFORM6") == 0)
+       {
                errno = ENOTSUP;
                return NULL;
        }
-       order = get_value(data, len, "interface_order=");
+       order = get_value(data, len, "interface_order");
        if (order == NULL || *order == '\0') {
                errno = ESRCH;
                return NULL;
@@ -464,17 +727,20 @@ dhcpcd_new_if(DHCPCD_CONNECTION *con, char *data, size_t len)
        i->ifname = ifname;
        i->type = type;
        i->reason = reason;
-       flags = dhcpcd_get_value(i, "ifflags=");
+       flags = dhcpcd_get_value(i, "ifflags");
        if (flags)
                i->flags = (unsigned int)strtoul(flags, NULL, 0);
        else
                i->flags = 0;
-       if (strcmp(reason, "CARRIER") == 0)
+       if (strcmp(reason, "CARRIER") == 0 ||
+           strcmp(reason, "DELEGATED6") == 0)
                i->up = true;
        else
-               i->up = strtobool(dhcpcd_get_value(i, "if_up="));
-       i->wireless = strtobool(dhcpcd_get_value(i, "ifwireless="));
-       i->ssid = dhcpcd_get_value(i, i->up ? "new_ssid=" : "old_ssid=");
+               i->up = strtobool(dhcpcd_get_value(i, "if_up"));
+       i->wireless = strtobool(dhcpcd_get_value(i, "ifwireless"));
+       i->ssid = dhcpcd_get_value(i, "ifssid");
+       if (i->ssid == NULL && i->wireless)
+               i->ssid = dhcpcd_get_value(i, i->up ? "new_ssid" : "old_ssid");
 
        /* Sort! */
        n = nl = NULL;
@@ -842,7 +1108,7 @@ dhcpcd_if_message(DHCPCD_IF *i, bool *new_msg)
        assert(i);
        /* Don't report non SLAAC configurations */
        if (strcmp(i->type, "ra") == 0 && i->up &&
-           dhcpcd_get_value(i, "ra1_prefix=") == NULL)
+           dhcpcd_get_value(i, "ra1_prefix") == NULL)
                return NULL;
 
        showssid = false;
@@ -852,8 +1118,20 @@ dhcpcd_if_message(DHCPCD_IF *i, bool *new_msg)
                if (i->wireless) {
                        showssid = true;
                        reason = _("Associated with");
-               } else
-                       reason = _("Cable plugged in");
+               } else {
+                       /* Don't report able in if we have addresses */
+                       const DHCPCD_IF *ci;
+
+                       for (ci = i->con->interfaces; ci; ci = ci->next) {
+                               if (ci != i &&
+                                   strcmp(i->ifname, ci->ifname) == 0 &&
+                                   ci->up)
+                                       break;
+                       }
+                       if (ci)
+                               return NULL;
+                       reason = _("Link is up, configuring");
+               }
        } else if (strcmp(i->reason, "NOCARRIER") == 0) {
                if (i->wireless) {
                        if (i->ssid) {
@@ -862,7 +1140,7 @@ dhcpcd_if_message(DHCPCD_IF *i, bool *new_msg)
                        } else
                                reason = _("Not associated");
                } else
-                       reason = _("Cable unplugged");
+                       reason = _("Link is down");
        } else if (strcmp(i->reason, "DEPARTED") == 0)
                reason = _("Departed");
        else if (strcmp(i->reason, "UNKNOWN") == 0)
@@ -873,22 +1151,30 @@ dhcpcd_if_message(DHCPCD_IF *i, bool *new_msg)
                reason = _("Waiting for 3rd Party configuration");
 
        if (reason == NULL) {
-               if (i->up)
-                       reason = _("Configured");
-               else if (strcmp(i->type, "ra") == 0)
+               if (i->up) {
+                       if (strcmp(i->reason, "DELEGATED6") == 0)
+                               reason = _("Delegated");
+                       else
+                               reason = _("Configured");
+               } else if (strcmp(i->type, "ra") == 0)
                        reason = "Expired RA";
                else
                        reason = i->reason;
        }
 
        pfx = i->up ? "new_" : "old_";
-       if ((ip = dhcpcd_get_prefix_value(i, pfx, "ip_address=")))
-               iplen = dhcpcd_get_prefix_value(i, pfx, "subnet_cidr=");
-       else if ((ip = dhcpcd_get_value(i, "ra1_prefix=")))
+       if ((ip = dhcpcd_get_prefix_value(i, pfx, "ip_address")))
+               iplen = dhcpcd_get_prefix_value(i, pfx, "subnet_cidr");
+       else if ((ip = dhcpcd_get_value(i, "ra1_addr")))
+               iplen = NULL;
+       else if ((ip = dhcpcd_get_value(i, "ra1_prefix")))
                iplen = NULL;
        else if ((ip = dhcpcd_get_prefix_value(i, pfx,
-           "dhcp6_ia_na1_ia_addr1=")))
+           "dhcp6_ia_na1_ia_addr1")))
                iplen = "128";
+       else if ((ip = dhcpcd_get_prefix_value(i, pfx,
+           "delegated_dhcp6_prefix")))
+               iplen = NULL;
        else {
                ip = NULL;
                iplen = NULL;