networking/libiproute/utils.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * utils.c
   4  *
   5  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
   6  *
   7  * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
   8  *
   9  * Changes:
  10  *
  11  * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses
  12  */
  13
  14 #include "libbb.h"
  15
  16 #include <string.h>
  17 #include <unistd.h>
  18
  19 #include "utils.h"
  20 #include "inet_common.h"
  21
  22 int get_integer(int *val, char *arg, int base)
  23 {
  24         long res;
  25         char *ptr;
  26
  27         if (!arg || !*arg)
  28                 return -1;
  29         res = strtol(arg, &ptr, base);
  30         if (!ptr || ptr == arg || *ptr || res > INT_MAX || res < INT_MIN)
  31                 return -1;
  32         *val = res;
  33         return 0;
  34 }
  35
  36 int get_unsigned(unsigned *val, char *arg, int base)
  37 {
  38         unsigned long res;
  39         char *ptr;
  40
  41         if (!arg || !*arg)
  42                 return -1;
  43         res = strtoul(arg, &ptr, base);
  44         if (!ptr || ptr == arg || *ptr || res > UINT_MAX)
  45                 return -1;
  46         *val = res;
  47         return 0;
  48 }
  49
  50 int get_u32(uint32_t * val, char *arg, int base)
  51 {
  52         unsigned long res;
  53         char *ptr;
  54
  55         if (!arg || !*arg)
  56                 return -1;
  57         res = strtoul(arg, &ptr, base);
  58         if (!ptr || ptr == arg || *ptr || res > 0xFFFFFFFFUL)
  59                 return -1;
  60         *val = res;
  61         return 0;
  62 }
  63
  64 int get_u16(uint16_t * val, char *arg, int base)
  65 {
  66         unsigned long res;
  67         char *ptr;
  68
  69         if (!arg || !*arg)
  70                 return -1;
  71         res = strtoul(arg, &ptr, base);
  72         if (!ptr || ptr == arg || *ptr || res > 0xFFFF)
  73                 return -1;
  74         *val = res;
  75         return 0;
  76 }
  77
  78 int get_u8(uint8_t * val, char *arg, int base)
  79 {
  80         unsigned long res;
  81         char *ptr;
  82
  83         if (!arg || !*arg)
  84                 return -1;
  85         res = strtoul(arg, &ptr, base);
  86         if (!ptr || ptr == arg || *ptr || res > 0xFF)
  87                 return -1;
  88         *val = res;
  89         return 0;
  90 }
  91
  92 int get_s16(int16_t * val, char *arg, int base)
  93 {
  94         long res;
  95         char *ptr;
  96
  97         if (!arg || !*arg)
  98                 return -1;
  99         res = strtol(arg, &ptr, base);
 100         if (!ptr || ptr == arg || *ptr || res > 0x7FFF || res < -0x8000)
 101                 return -1;
 102         *val = res;
 103         return 0;
 104 }
 105
 106 int get_s8(int8_t * val, char *arg, int base)
 107 {
 108         long res;
 109         char *ptr;
 110
 111         if (!arg || !*arg)
 112                 return -1;
 113         res = strtol(arg, &ptr, base);
 114         if (!ptr || ptr == arg || *ptr || res > 0x7F || res < -0x80)
 115                 return -1;
 116         *val = res;
 117         return 0;
 118 }
 119
 120 int get_addr_1(inet_prefix * addr, char *name, int family)
 121 {
 122         char *cp;
 123         unsigned char *ap = (unsigned char *) addr->data;
 124         int i;
 125
 126         memset(addr, 0, sizeof(*addr));
 127
 128         if (strcmp(name, bb_str_default) == 0 ||
 129                 strcmp(name, "all") == 0 || strcmp(name, "any") == 0) {
 130                 addr->family = family;
 131                 addr->bytelen = (family == AF_INET6 ? 16 : 4);
 132                 addr->bitlen = -1;
 133                 return 0;
 134         }
 135
 136         if (strchr(name, ':')) {
 137                 addr->family = AF_INET6;
 138                 if (family != AF_UNSPEC && family != AF_INET6)
 139                         return -1;
 140                 if (inet_pton(AF_INET6, name, addr->data) <= 0)
 141                         return -1;
 142                 addr->bytelen = 16;
 143                 addr->bitlen = -1;
 144                 return 0;
 145         }
 146
 147         addr->family = AF_INET;
 148         if (family != AF_UNSPEC && family != AF_INET)
 149                 return -1;
 150         addr->bytelen = 4;
 151         addr->bitlen = -1;
 152         for (cp = name, i = 0; *cp; cp++) {
 153                 if (*cp <= '9' && *cp >= '0') {
 154                         ap[i] = 10 * ap[i] + (*cp - '0');
 155                         continue;
 156                 }
 157                 if (*cp == '.' && ++i <= 3)
 158                         continue;
 159                 return -1;
 160         }
 161         return 0;
 162 }
 163
 164 int get_prefix_1(inet_prefix * dst, char *arg, int family)
 165 {
 166         int err;
 167         int plen;
 168         char *slash;
 169
 170         memset(dst, 0, sizeof(*dst));
 171
 172         if (strcmp(arg, bb_str_default) == 0 || strcmp(arg, "any") == 0) {
 173                 dst->family = family;
 174                 dst->bytelen = 0;
 175                 dst->bitlen = 0;
 176                 return 0;
 177         }
 178
 179         slash = strchr(arg, '/');
 180         if (slash)
 181                 *slash = 0;
 182         err = get_addr_1(dst, arg, family);
 183         if (err == 0) {
 184                 switch (dst->family) {
 185                 case AF_INET6:
 186                         dst->bitlen = 128;
 187                         break;
 188                 default:
 189                 case AF_INET:
 190                         dst->bitlen = 32;
 191                 }
 192                 if (slash) {
 193                         if (get_integer(&plen, slash + 1, 0) || plen > dst->bitlen) {
 194                                 err = -1;
 195                                 goto done;
 196                         }
 197                         dst->bitlen = plen;
 198                 }
 199         }
 200   done:
 201         if (slash)
 202                 *slash = '/';
 203         return err;
 204 }
 205
 206 int get_addr(inet_prefix * dst, char *arg, int family)
 207 {
 208         if (family == AF_PACKET) {
 209                 bb_error_msg_and_die("\"%s\" may be inet address, but it is not allowed in this context", arg);
 210         }
 211         if (get_addr_1(dst, arg, family)) {
 212                 bb_error_msg_and_die("an inet address is expected rather than \"%s\"", arg);
 213         }
 214         return 0;
 215 }
 216
 217 int get_prefix(inet_prefix * dst, char *arg, int family)
 218 {
 219         if (family == AF_PACKET) {
 220                 bb_error_msg_and_die("\"%s\" may be inet address, but it is not allowed in this context", arg);
 221         }
 222         if (get_prefix_1(dst, arg, family)) {
 223                 bb_error_msg_and_die("an inet address is expected rather than \"%s\"", arg);
 224         }
 225         return 0;
 226 }
 227
 228 uint32_t get_addr32(char *name)
 229 {
 230         inet_prefix addr;
 231
 232         if (get_addr_1(&addr, name, AF_INET)) {
 233                 bb_error_msg_and_die("an IP address is expected rather than \"%s\"", name);
 234         }
 235         return addr.data[0];
 236 }
 237
 238 void incomplete_command(void)
 239 {
 240         bb_error_msg("command line is not complete, try option \"help\"");
 241         exit(-1);
 242 }
 243
 244 void invarg(const char * const arg, const char * const opt)
 245 {
 246         bb_error_msg(bb_msg_invalid_arg, arg, opt);
 247         exit(-1);
 248 }
 249
 250 void duparg(char *key, char *arg)
 251 {
 252         bb_error_msg("duplicate \"%s\": \"%s\" is the second value", key, arg);
 253         exit(-1);
 254 }
 255
 256 void duparg2(char *key, char *arg)
 257 {
 258         bb_error_msg("either \"%s\" is duplicate, or \"%s\" is garbage", key, arg);
 259         exit(-1);
 260 }
 261
 262 int matches(const char *cmd, const char *pattern)
 263 {
 264         int len = strlen(cmd);
 265
 266         return strncmp(pattern, cmd, len);
 267 }
 268
 269 int inet_addr_match(inet_prefix * a, inet_prefix * b, int bits)
 270 {
 271         uint32_t *a1 = a->data;
 272         uint32_t *a2 = b->data;
 273         int words = bits >> 0x05;
 274
 275         bits &= 0x1f;
 276
 277         if (words)
 278                 if (memcmp(a1, a2, words << 2))
 279                         return -1;
 280
 281         if (bits) {
 282                 uint32_t w1, w2;
 283                 uint32_t mask;
 284
 285                 w1 = a1[words];
 286                 w2 = a2[words];
 287
 288                 mask = htonl((0xffffffff) << (0x20 - bits));
 289
 290                 if ((w1 ^ w2) & mask)
 291                         return 1;
 292         }
 293
 294         return 0;
 295 }
 296
 297 const char *rt_addr_n2a(int af, int ATTRIBUTE_UNUSED len,
 298                 void *addr, char *buf, int buflen)
 299 {
 300         switch (af) {
 301         case AF_INET:
 302         case AF_INET6:
 303                 return inet_ntop(af, addr, buf, buflen);
 304         default:
 305                 return "???";
 306         }
 307 }
 308
 309
 310 const char *format_host(int af, int len, void *addr, char *buf, int buflen)
 311 {
 312 #ifdef RESOLVE_HOSTNAMES
 313         if (resolve_hosts) {
 314                 struct hostent *h_ent;
 315
 316                 if (len <= 0) {
 317                         switch (af) {
 318                         case AF_INET:
 319                                 len = 4;
 320                                 break;
 321                         case AF_INET6:
 322                                 len = 16;
 323                                 break;
 324                         default:;
 325                         }
 326                 }
 327                 if (len > 0 && (h_ent = gethostbyaddr(addr, len, af)) != NULL) {
 328                         snprintf(buf, buflen - 1, "%s", h_ent->h_name);
 329                         return buf;
 330                 }
 331         }
 332 #endif
 333         return rt_addr_n2a(af, len, addr, buf, buflen);
 334 }