lookup_ipliteral.c (1244B)
1 #include <sys/socket.h> 2 #include <netinet/in.h> 3 #include <netdb.h> 4 #include <net/if.h> 5 #include <arpa/inet.h> 6 #include <limits.h> 7 #include <stdlib.h> 8 #include <string.h> 9 #include <ctype.h> 10 #include "lookup.h" 11 12 int __lookup_ipliteral(struct address buf[1], const char *name, int family) 13 { 14 struct in_addr a4; 15 struct in6_addr a6; 16 if (__inet_aton(name, &a4) > 0) { 17 if (family == AF_INET6) /* wrong family */ 18 return EAI_NODATA; 19 memcpy(&buf[0].addr, &a4, sizeof a4); 20 buf[0].family = AF_INET; 21 buf[0].scopeid = 0; 22 return 1; 23 } 24 25 char tmp[64]; 26 char *p = strchr(name, '%'), *z; 27 unsigned long long scopeid = 0; 28 if (p && p-name < 64) { 29 memcpy(tmp, name, p-name); 30 tmp[p-name] = 0; 31 name = tmp; 32 } 33 34 if (inet_pton(AF_INET6, name, &a6) <= 0) 35 return 0; 36 if (family == AF_INET) /* wrong family */ 37 return EAI_NODATA; 38 39 memcpy(&buf[0].addr, &a6, sizeof a6); 40 buf[0].family = AF_INET6; 41 if (p) { 42 if (isdigit(*++p)) scopeid = strtoull(p, &z, 10); 43 else z = p-1; 44 if (*z) { 45 if (!IN6_IS_ADDR_LINKLOCAL(&a6) && 46 !IN6_IS_ADDR_MC_LINKLOCAL(&a6)) 47 return EAI_NONAME; 48 scopeid = if_nametoindex(p); 49 if (!scopeid) return EAI_NONAME; 50 } 51 if (scopeid > UINT_MAX) return EAI_NONAME; 52 } 53 buf[0].scopeid = scopeid; 54 return 1; 55 }