diff options
Diffstat (limited to 'src/lib/libast/string/strtoip4.c')
| -rw-r--r-- | src/lib/libast/string/strtoip4.c | 150 |
1 files changed, 150 insertions, 0 deletions
diff --git a/src/lib/libast/string/strtoip4.c b/src/lib/libast/string/strtoip4.c new file mode 100644 index 0000000..6d4aed2 --- /dev/null +++ b/src/lib/libast/string/strtoip4.c @@ -0,0 +1,150 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler <gsf@research.att.com> * +* David Korn <dgk@research.att.com> * +* Phong Vo <kpv@research.att.com> * +* * +***********************************************************************/ +#pragma prototyped + +#include <ast.h> +#include <ctype.h> + +/* + * convert string to 4 byte local byte order ip address + * with optional prefix bits + * pointer to first unused char placed in *e, even on error + * return 0:ok <0:error + * + * valid addresses match the egrep RE: + * + * [0-9]{1,3}(\.[0-9]{1,3})*|0[xX][0-9a-fA-Z]+ + * + * valid bits/masks match the egrep RE: + * + * (/([0-9]+|[0-9]{1,3}(\.[0-9]{1,3})*))? + * + * if pbits!=0 and no bits/mask specified then trailing 0's in addr + * are used to compute the mask + */ + +int +strtoip4(register const char* s, char** e, uint32_t* paddr, unsigned char* pbits) +{ + register int c; + register unsigned int n; + register uint32_t addr; + register int part; + register unsigned char bits; + uint32_t z; + int old; + int r; + const char* b; + + r = -1; + while (isspace(*s)) + s++; + b = s; + addr = 0; + bits = 0; + part = 0; + do + { + n = 0; + while ((c = *s++) >= '0' && c <= '9') + n = n * 10 + (c - '0'); + if ((c == 'x' || c == 'X') && !part) + { + addr = n; + for (;;) + { + if ((c = *s++) >= '0' && c <= '9') + c -= '0'; + else if (c >= 'a' && c <= 'f') + c -= 'a' - 10; + else if (c >= 'A' && c <= 'F') + c -= 'F' - 10; + else + break; + addr = addr * 16 + c; + } + part = 4; + break; + } + if (n > 0xff) + goto done; + addr = (addr << 8) | n; + part++; + } while (c == '.'); + if ((s - b) == 1 && c != '/' || part > 4) + goto done; + if (old = part < 4) + while (part++ < 4) + addr <<= 8; + if (pbits) + { + if (c == '/') + { + part = 0; + z = 0; + for (;;) + { + n = 0; + while ((c = *s++) >= '0' && c <= '9') + n = n * 10 + (c - '0'); + z = (z << 8) | n; + part++; + if (c != '.') + break; + old = 1; + } + if (part > 4) + goto done; + if (z <= 32 && (!old || part < 2)) + bits = z; + else if (z) + { + if (part == 4 && (z & 0x8000001) == 1) + z = ~z; + while (!(z & 1)) + z >>= 1; + while (z & 1) + { + z >>= 1; + bits++; + } + } + } + else if ((z = (addr >> 24)) < 128) + bits = 8; + else if (z < 192) + bits = 16; + else + bits = 24; + if (*pbits = bits) + addr &= ~((((uint32_t)1)<<(32-bits))-1); + else + addr = 0; + } + if (paddr) + *paddr = addr; + r = 0; + done: + if (e) + *e = (char*)(s - 1); + return r; +} |