Fix if_linux_ipv6 verbose output of interface addresses

Previously the verbose output of if_linux_ipv6_open looked like this:

    found interface ab c: 0ab: a b: abc: 0 0: a 0:abcd: 0 0 scope 0

This changes the output to:

    found interface eth0 inet6 ab0c:ab:a0b:abc:0:a00:abcd:0 scope 0

Signed-off-by: Orivej Desh <[email protected]>

Author: orivej

opal/mca/if/linux_ipv6/if_linux_ipv6.c

@@ -52,6 +52,8 @@
 #include "opal/mca/if/if.h"
 #include "opal/mca/if/base/base.h"
 
+#define LOG_PREFIX "mca: if: linux_ipv6: "
+
 static int if_linux_ipv6_open(void);
 
 /* Discovers Linux IPv6 interfaces */
@@ -77,7 +79,34 @@ opal_if_base_component_t mca_if_linux_ipv6_component = {
     },
 };
 
-/* configure using getifaddrs(3) */
+static bool hex2int(char hex, int *dst)
+{
+    if ('0' <= hex && hex <= '9') {
+        *dst = hex - '0';
+    } else if ('A' <= hex && hex <= 'F') {
+        *dst = hex - 'A' + 10;
+    } else if ('a' <= hex && hex <= 'f') {
+        *dst = hex - 'a' + 10;
+    } else {
+        return false;
+    }
+    return true;
+
+}
+
+static bool hexdecode(const char *src, char *dst, size_t dstsize)
+{
+    int hi, lo;
+    for (size_t i = 0; i < dstsize; i++) {
+        if (hex2int(src[i * 2], &hi) && hex2int(src[i * 2 + 1], &lo)) {
+            dst[i] = 16 * hi + lo;
+        } else {
+            return false;
+        }
+    }
+    return true;
+}
+
 static int if_linux_ipv6_open(void)
 {
 #if OPAL_ENABLE_IPV6
@@ -86,49 +115,42 @@ static int if_linux_ipv6_open(void)
         char ifname[IF_NAMESIZE];
         unsigned int idx, pfxlen, scope, dadstat;
         struct in6_addr a6;
-        int iter;
         uint32_t flag;
-        unsigned int addrbyte[16];
+        char addrhex[sizeof a6.s6_addr * 2 + 1];
+        char addrstr[INET6_ADDRSTRLEN];
 
-        while (fscanf(f, "%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x %x %x %x %x %20s\n",
-                      &addrbyte[0], &addrbyte[1], &addrbyte[2], &addrbyte[3],
-                      &addrbyte[4], &addrbyte[5], &addrbyte[6], &addrbyte[7],
-                      &addrbyte[8], &addrbyte[9], &addrbyte[10], &addrbyte[11],
-                      &addrbyte[12], &addrbyte[13], &addrbyte[14], &addrbyte[15],
+        while (fscanf(f, "%s %x %x %x %x %s\n", addrhex,
                       &idx, &pfxlen, &scope, &dadstat, ifname) != EOF) {
             opal_if_t *intf;
 
+            if (!hexdecode(addrhex, a6.s6_addr, sizeof a6.s6_addr)) {
+                opal_output(0, LOG_PREFIX "skipped interface %s: failed to hexdecode %s\n",
+                            ifname, addrhex);
+                continue;
+            };
+            inet_ntop(AF_INET6, a6.s6_addr, addrstr, sizeof addrstr);
+
             opal_output_verbose(1, opal_if_base_framework.framework_output,
-                                "found interface %2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x scope %x\n",
-                                addrbyte[0], addrbyte[1], addrbyte[2], addrbyte[3],
-                                addrbyte[4], addrbyte[5], addrbyte[6], addrbyte[7],
-                                addrbyte[8], addrbyte[9], addrbyte[10], addrbyte[11],
-                                addrbyte[12], addrbyte[13], addrbyte[14], addrbyte[15], scope);
+                                LOG_PREFIX "found interface %s inet6 %s scope %x\n",
+                                ifname, addrstr, scope);
 
             /* Only interested in global (0x00) scope */
             if (scope != 0x00)  {
                 opal_output_verbose(1, opal_if_base_framework.framework_output,
-                                    "skipping interface %2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x scope %x\n",
-                                    addrbyte[0], addrbyte[1], addrbyte[2], addrbyte[3],
-                                    addrbyte[4], addrbyte[5], addrbyte[6], addrbyte[7],
-                                    addrbyte[8], addrbyte[9], addrbyte[10], addrbyte[11],
-                                    addrbyte[12], addrbyte[13], addrbyte[14], addrbyte[15], scope);
+                                    LOG_PREFIX "skipped interface %s inet6 %s scope %x\n",
+                                    ifname, addrstr, scope);
                 continue;
             }
 
             intf = OBJ_NEW(opal_if_t);
             if (NULL == intf) {
-                opal_output(0, "opal_ifinit: unable to allocate %lu bytes\n",
+                opal_output(0, LOG_PREFIX "unable to allocate %lu bytes\n",
                             (unsigned long)sizeof(opal_if_t));
                 fclose(f);
                 return OPAL_ERR_OUT_OF_RESOURCE;
             }
             intf->af_family = AF_INET6;
 
-            for (iter = 0; iter < 16; iter++) {
-                a6.s6_addr[iter] = addrbyte[iter];
-            }
-
             /* now construct the opal_if_t */
             opal_string_copy(intf->if_name, ifname, IF_NAMESIZE);
             intf->if_index = opal_list_get_size(&opal_if_list)+1;
@@ -147,17 +169,12 @@ static int if_linux_ipv6_open(void)
                to list */
             opal_list_append(&opal_if_list, &(intf->super));
             opal_output_verbose(1, opal_if_base_framework.framework_output,
-                                "added interface %2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x:%2x%2x\n",
-                                addrbyte[0], addrbyte[1], addrbyte[2], addrbyte[3],
-                                addrbyte[4], addrbyte[5], addrbyte[6], addrbyte[7],
-                                addrbyte[8], addrbyte[9], addrbyte[10], addrbyte[11],
-                                addrbyte[12], addrbyte[13], addrbyte[14], addrbyte[15]);
+                                LOG_PREFIX "added interface %s inet6 %s scope %x\n",
+                                ifname, addrstr, scope);
         } /* of while */
         fclose(f);
     }
 #endif  /* OPAL_ENABLE_IPV6 */
 
     return OPAL_SUCCESS;
 }
-
-