31 #include <netlink-private/netlink.h> 32 #include <netlink/netlink.h> 33 #include <netlink/utils.h> 34 #include <netlink/addr.h> 35 #include <netlink-private/route/mpls.h> 36 #include <linux/socket.h> 40 static inline uint16_t dn_ntohs(uint16_t addr)
49 return ((uint16_t) u.byte[0]) | (((uint16_t) u.byte[1]) << 8);
52 static inline int do_digit(
char *str, uint16_t *addr, uint16_t scale,
53 size_t *pos,
size_t len,
int *started)
55 uint16_t tmp = *addr / scale;
60 if (((tmp) > 0) || *started || (scale == 1)) {
64 *addr -= (tmp * scale);
70 static const char *dnet_ntop(
const char *addrbuf,
size_t addrlen,
char *str,
73 uint16_t addr = dn_ntohs(*(uint16_t *)addrbuf);
74 uint16_t area = addr >> 10;
86 if (do_digit(str + pos, &area, 10, &pos, len, &started))
89 if (do_digit(str + pos, &area, 1, &pos, len, &started))
99 if (do_digit(str + pos, &addr, 1000, &pos, len, &started))
102 if (do_digit(str + pos, &addr, 100, &pos, len, &started))
105 if (do_digit(str + pos, &addr, 10, &pos, len, &started))
108 if (do_digit(str + pos, &addr, 1, &pos, len, &started))
119 static int dnet_num(
const char *src, uint16_t * dst)
125 while ((tmp = *src++) != 0) {
127 if ((tmp < 0) || (tmp > 9))
138 static inline int dnet_pton(
const char *src,
char *addrbuf)
144 pos = dnet_num(src, &area);
145 if ((pos == 0) || (area > 63) ||
146 ((*(src + pos) !=
'.') && (*(src + pos) !=
',')))
149 pos = dnet_num(src + pos + 1, &node);
150 if ((pos == 0) || (node > 1023))
153 *(uint16_t *)addrbuf = dn_ntohs((area << 10) | node);
158 static void addr_destroy(
struct nl_addr *addr)
163 if (addr->a_refcnt != 1)
189 struct nl_addr *addr;
191 addr = calloc(1,
sizeof(*addr) + maxsize);
196 addr->a_maxsize = maxsize;
220 struct nl_addr *addr;
226 addr->a_family = family;
230 addr->a_prefixlen = 20;
233 addr->a_prefixlen = size*8;
237 memcpy(addr->a_addr, buf, size);
301 int err, copy = 0, len = 0, family = AF_UNSPEC, plen = 0;
302 char *str, *prefix = NULL, buf[256];
303 struct nl_addr *addr = NULL;
305 str = strdup(addrstr);
311 if (hint != AF_MPLS) {
312 prefix = strchr(str,
'/');
317 if (!strcasecmp(str,
"none")) {
322 if (!strcasecmp(str,
"default") ||
323 !strcasecmp(str,
"all") ||
324 !strcasecmp(str,
"any")) {
346 err = -NLE_AF_NOSUPPORT;
353 if (hint == AF_INET || hint == AF_UNSPEC) {
354 if (inet_pton(AF_INET, str, buf) > 0) {
359 if (hint == AF_INET) {
365 if (hint == AF_INET6 || hint == AF_UNSPEC) {
366 if (inet_pton(AF_INET6, str, buf) > 0) {
371 if (hint == AF_INET6) {
377 if ((hint == AF_LLC || hint == AF_UNSPEC) && strchr(str,
':')) {
378 unsigned int a, b, c, d, e, f;
380 if (sscanf(str,
"%02x:%02x:%02x:%02x:%02x:%02x",
381 &a, &b, &c, &d, &e, &f) == 6) {
384 buf[0] = (
unsigned char) a;
385 buf[1] = (
unsigned char) b;
386 buf[2] = (
unsigned char) c;
387 buf[3] = (
unsigned char) d;
388 buf[4] = (
unsigned char) e;
389 buf[5] = (
unsigned char) f;
393 if (hint == AF_LLC) {
399 if ((hint == AF_DECnet || hint == AF_UNSPEC) &&
400 (strchr(str,
'.') || strchr(str,
','))) {
401 if (dnet_pton(str, buf) > 0) {
406 if (hint == AF_DECnet) {
412 if (hint == AF_MPLS) {
413 len = mpls_pton(AF_MPLS, str, buf,
sizeof(buf));
423 if (hint == AF_UNSPEC && strchr(str,
':')) {
427 long l = strtol(s, &p, 16);
429 if (s == p || l > 0xff || i >=
sizeof(buf)) {
434 buf[i++] = (
unsigned char) l;
462 long pl = strtol(++prefix, &p, 0);
498 new =
nl_addr_build(addr->a_family, addr->a_addr, addr->a_len);
500 new->a_prefixlen = addr->a_prefixlen;
545 if (addr->a_refcnt == 1)
559 return addr->a_refcnt > 1;
597 d = a->a_family - b->a_family;
599 d = a->a_len - b->a_len;
601 if (a->a_len && d == 0) {
602 d = memcmp(a->a_addr, b->a_addr, a->a_len);
605 return (a->a_prefixlen - b->a_prefixlen);
627 int d = a->a_family - b->a_family;
630 int len = min(a->a_prefixlen, b->a_prefixlen);
633 d = memcmp(a->a_addr, b->a_addr, bytes);
634 if (d == 0 && (len % 8) != 0) {
635 int mask = (0xFF00 >> (len % 8)) & 0xFF;
637 d = (a->a_addr[bytes] & mask) -
638 (b->a_addr[bytes] & mask);
655 for (i = 0; i < addr->a_len; i++)
678 ret = inet_pton(family, addr, buf);
684 ret = mpls_pton(family, addr, buf,
sizeof(buf));
690 ret = dnet_pton(addr, buf);
696 if (sscanf(addr,
"%*02x:%*02x:%*02x:%*02x:%*02x:%*02x") != 6)
712 switch (addr->a_len) {
740 switch (addr->a_family) {
742 struct sockaddr_in *sai = (
struct sockaddr_in *) sa;
744 if (*salen <
sizeof(*sai))
747 if (addr->a_len == 4)
748 memcpy(&sai->sin_addr, addr->a_addr, 4);
749 else if (addr->a_len != 0)
752 memset(&sai->sin_addr, 0, 4);
754 sai->sin_family = addr->a_family;
755 *salen =
sizeof(*sai);
760 struct sockaddr_in6 *sa6 = (
struct sockaddr_in6 *) sa;
762 if (*salen <
sizeof(*sa6))
765 if (addr->a_len == 16)
766 memcpy(&sa6->sin6_addr, addr->a_addr, 16);
767 else if (addr->a_len != 0)
770 memset(&sa6->sin6_addr, 0, 16);
772 sa6->sin6_family = addr->a_family;
773 *salen =
sizeof(*sa6);
808 char buf[INET6_ADDRSTRLEN+5];
809 struct addrinfo hint = {
810 .ai_flags = AI_NUMERICHOST,
811 .ai_family = addr->a_family,
816 err = getaddrinfo(buf, NULL, &hint, result);
819 case EAI_ADDRFAMILY:
return -NLE_AF_NOSUPPORT;
820 case EAI_AGAIN:
return -NLE_AGAIN;
821 case EAI_BADFLAGS:
return -NLE_INVAL;
822 case EAI_FAIL:
return -NLE_NOADDR;
823 case EAI_FAMILY:
return -NLE_AF_NOSUPPORT;
824 case EAI_MEMORY:
return -NLE_NOMEM;
825 case EAI_NODATA:
return -NLE_NOADDR;
826 case EAI_NONAME:
return -NLE_OBJ_NOTFOUND;
827 case EAI_SERVICE:
return -NLE_OPNOTSUPP;
828 case EAI_SOCKTYPE:
return -NLE_BAD_SOCK;
829 default:
return -NLE_FAILURE;
852 struct sockaddr_in6 buf;
853 socklen_t salen =
sizeof(buf);
859 err = getnameinfo((
struct sockaddr *) &buf, salen, host, hostlen,
860 NULL, 0, NI_NAMEREQD);
862 return nl_syserr2nlerr(err);
883 addr->a_family = family;
896 return addr->a_family;
921 if (len > addr->a_maxsize)
925 memset(addr->a_addr, 0, addr->a_maxsize);
928 memcpy(addr->a_addr, buf, len);
944 return (
void*)addr->a_addr;
968 addr->a_prefixlen = prefixlen;
979 return addr->a_prefixlen;
1005 if (!addr || !addr->a_len) {
1006 snprintf(buf, size,
"none");
1013 switch (addr->a_family) {
1015 inet_ntop(AF_INET, addr->a_addr, buf, size);
1019 inet_ntop(AF_INET6, addr->a_addr, buf, size);
1023 mpls_ntop(AF_MPLS, addr->a_addr, buf, size);
1027 dnet_ntop(addr->a_addr, addr->a_len, buf, size);
1032 snprintf(buf, size,
"%02x",
1033 (
unsigned char) addr->a_addr[0]);
1034 for (i = 1; i < addr->a_len; i++) {
1035 snprintf(tmp,
sizeof(tmp),
":%02x",
1036 (
unsigned char) addr->a_addr[i]);
1037 strncat(buf, tmp, size - strlen(buf) - 1);
1043 if (addr->a_family != AF_MPLS &&
1044 addr->a_prefixlen != (8 * addr->a_len)) {
1045 snprintf(tmp,
sizeof(tmp),
"/%u", addr->a_prefixlen);
1046 strncat(buf, tmp, size - strlen(buf) - 1);
1059 static const struct trans_tbl afs[] = {
1060 __ADD(AF_UNSPEC,unspec),
1061 __ADD(AF_UNIX,unix),
1062 __ADD(AF_INET,inet),
1063 __ADD(AF_AX25,ax25),
1065 __ADD(AF_APPLETALK,appletalk),
1066 __ADD(AF_NETROM,netrom),
1067 __ADD(AF_BRIDGE,bridge),
1068 __ADD(AF_ATMPVC,atmpvc),
1070 __ADD(AF_INET6,inet6),
1071 __ADD(AF_ROSE,rose),
1072 __ADD(AF_DECnet,decnet),
1073 __ADD(AF_NETBEUI,netbeui),
1074 __ADD(AF_SECURITY,security),
1076 __ADD(AF_NETLINK,netlink),
1077 __ADD(AF_PACKET,packet),
1079 __ADD(AF_ECONET,econet),
1080 __ADD(AF_ATMSVC,atmsvc),
1085 __ADD(AF_IRDA,irda),
1086 __ADD(AF_PPPOX,pppox),
1087 __ADD(AF_WANPIPE,wanpipe),
1093 __ADD(AF_TIPC,tipc),
1095 __ADD(AF_BLUETOOTH,bluetooth),
1097 __ADD(AF_IUCV,iucv),
1100 __ADD(AF_RXRPC,rxrpc),
1103 __ADD(AF_ISDN,isdn),
1106 __ADD(AF_PHONET,phonet),
1108 #ifdef AF_IEEE802154 1109 __ADD(AF_IEEE802154,ieee802154),
1112 __ADD(AF_CAIF,caif),
1121 __ADD(AF_VSOCK,vsock),
1123 __ADD(AF_MPLS,mpls),
1126 char *nl_af2str(
int family,
char *buf,
size_t size)
1128 return __type2str(family, buf, size, afs, ARRAY_SIZE(afs));
1131 int nl_str2af(
const char *name)
1133 int fam = __str2type(name, afs, ARRAY_SIZE(afs));
1134 return fam >= 0 ? fam : -EINVAL;
struct nl_addr * nl_addr_clone(const struct nl_addr *addr)
Clone existing abstract address object.
struct nl_addr * nl_addr_alloc(size_t maxsize)
Allocate empty abstract address.
int nl_addr_resolve(const struct nl_addr *addr, char *host, size_t hostlen)
Resolve abstract address object to a name using getnameinfo().
void nl_addr_set_prefixlen(struct nl_addr *addr, int prefixlen)
Set the prefix length of an abstract address.
int nl_addr_cmp(const struct nl_addr *a, const struct nl_addr *b)
Compare abstract addresses.
int nl_addr_guess_family(const struct nl_addr *addr)
Guess address family of abstract address based on address size.
unsigned int nl_addr_get_prefixlen(const struct nl_addr *addr)
Return prefix length of abstract address object.
struct nl_addr * nl_addr_build(int family, const void *buf, size_t size)
Allocate abstract address based on a binary address.
int nl_addr_parse(const char *addrstr, int hint, struct nl_addr **result)
Allocate abstract address based on character string.
struct nl_addr * nl_addr_get(struct nl_addr *addr)
Increase the reference counter of an abstract address.
void nl_addr_set_family(struct nl_addr *addr, int family)
Set address family.
struct nl_addr * nl_addr_alloc_attr(const struct nlattr *nla, int family)
Allocate abstract address based on Netlink attribute.
int nl_addr_iszero(const struct nl_addr *addr)
Returns true if the address consists of all zeros.
int nl_addr_set_binary_addr(struct nl_addr *addr, const void *buf, size_t len)
Set binary address of abstract address object.
int nl_addr_info(const struct nl_addr *addr, struct addrinfo **result)
Call getaddrinfo() for an abstract address object.
void * nla_data(const struct nlattr *nla)
Return pointer to the payload section.
int nla_len(const struct nlattr *nla)
Return length of the payload .
void nl_addr_put(struct nl_addr *addr)
Decrease the reference counter of an abstract address.
int nl_addr_valid(const char *addr, int family)
Check if address string is parseable for a specific address family.
int nl_addr_fill_sockaddr(const struct nl_addr *addr, struct sockaddr *sa, socklen_t *salen)
Fill out sockaddr structure with values from abstract address object.
int nl_addr_cmp_prefix(const struct nl_addr *a, const struct nl_addr *b)
Compare the prefix of two abstract addresses.
unsigned int nl_addr_get_len(const struct nl_addr *addr)
Get length of binary address of abstract address object.
void * nl_addr_get_binary_addr(const struct nl_addr *addr)
Get binary address of abstract address object.
int nl_addr_shared(const struct nl_addr *addr)
Check whether an abstract address is shared.
char * nl_addr2str(const struct nl_addr *addr, char *buf, size_t size)
Convert abstract address object to character string.
int nl_addr_get_family(const struct nl_addr *addr)
Return address family.