| #include "lookup.h" |
| #include <arpa/inet.h> |
| #include <ctype.h> |
| #include <limits.h> |
| #include <net/if.h> |
| #include <netdb.h> |
| #include <netinet/in.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <sys/socket.h> |
| |
| int __inet_aton(const char*, struct in_addr*); |
| |
| int __lookup_ipliteral(struct address buf[static 1], const char* name, int family) { |
| struct in_addr a4; |
| struct in6_addr a6; |
| if (__inet_aton(name, &a4) > 0) { |
| if (family == AF_INET6) /* wrong family */ |
| return EAI_NONAME; |
| memcpy(&buf[0].addr, &a4, sizeof a4); |
| buf[0].family = AF_INET; |
| buf[0].scopeid = 0; |
| return 1; |
| } |
| |
| char tmp[64]; |
| char *p = strchr(name, '%'), *z; |
| unsigned long long scopeid = 0; |
| if (p && p - name < 64) { |
| memcpy(tmp, name, p - name); |
| tmp[p - name] = 0; |
| name = tmp; |
| } |
| |
| if (inet_pton(AF_INET6, name, &a6) <= 0) |
| return 0; |
| if (family == AF_INET) /* wrong family */ |
| return EAI_NONAME; |
| |
| memcpy(&buf[0].addr, &a6, sizeof a6); |
| buf[0].family = AF_INET6; |
| if (p) { |
| if (isdigit(*++p)) |
| scopeid = strtoull(p, &z, 10); |
| else |
| z = p - 1; |
| if (*z) { |
| if (!IN6_IS_ADDR_LINKLOCAL(&a6) && !IN6_IS_ADDR_MC_LINKLOCAL(&a6)) |
| return EAI_NONAME; |
| scopeid = if_nametoindex(p); |
| if (!scopeid) |
| return EAI_NONAME; |
| } |
| if (scopeid > UINT_MAX) |
| return EAI_NONAME; |
| } |
| buf[0].scopeid = scopeid; |
| return 1; |
| } |
