xref: /freebsd/crypto/heimdal/lib/roken/getifaddrs.c (revision b9f654b163bce26de79705e77b872427c9f2afa1)
1 /*
2  * Copyright (c) 2000 - 2002, 2005 Kungliga Tekniska Högskolan
3  * (Royal Institute of Technology, Stockholm, Sweden).
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  *
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  *
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * 3. Neither the name of the Institute nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #include <config.h>
35 #include "roken.h"
36 
37 #ifdef __osf__
38 /* hate */
39 struct rtentry;
40 struct mbuf;
41 #endif
42 #ifdef HAVE_NET_IF_H
43 #include <net/if.h>
44 #endif
45 
46 #ifdef HAVE_SYS_SOCKIO_H
47 #include <sys/sockio.h>
48 #endif /* HAVE_SYS_SOCKIO_H */
49 
50 #ifdef HAVE_NETINET_IN6_VAR_H
51 #include <netinet/in6_var.h>
52 #endif /* HAVE_NETINET_IN6_VAR_H */
53 
54 #include <ifaddrs.h>
55 
56 #ifdef __hpux
57 #define lifconf if_laddrconf
58 #define lifc_len iflc_len
59 #define lifc_buf iflc_buf
60 #define lifc_req iflc_req
61 
62 #define lifreq if_laddrreq
63 #define lifr_addr iflr_addr
64 #define lifr_name iflr_name
65 #define lifr_dstaddr iflr_dstaddr
66 #define lifr_broadaddr iflr_broadaddr
67 #define lifr_flags iflr_flags
68 #define lifr_index iflr_index
69 #endif
70 
71 #ifdef AF_NETLINK
72 
73 /*
74  * The linux - AF_NETLINK version of getifaddrs - from Usagi.
75  * Linux does not return v6 addresses from SIOCGIFCONF.
76  */
77 
78 /* $USAGI: ifaddrs.c,v 1.18 2002/03/06 01:50:46 yoshfuji Exp $ */
79 
80 /**************************************************************************
81  * ifaddrs.c
82  * Copyright (C)2000 Hideaki YOSHIFUJI, All Rights Reserved.
83  *
84  * Redistribution and use in source and binary forms, with or without
85  * modification, are permitted provided that the following conditions
86  * are met:
87  * 1. Redistributions of source code must retain the above copyright
88  *    notice, this list of conditions and the following disclaimer.
89  * 2. Redistributions in binary form must reproduce the above copyright
90  *    notice, this list of conditions and the following disclaimer in the
91  *    documentation and/or other materials provided with the distribution.
92  * 3. Neither the name of the author nor the names of its contributors
93  *    may be used to endorse or promote products derived from this software
94  *    without specific prior written permission.
95  *
96  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
97  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
98  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
99  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
100  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
101  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
102  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
103  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
104  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
105  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
106  * SUCH DAMAGE.
107  */
108 
109 #include "config.h"
110 
111 #include <string.h>
112 #include <time.h>
113 #include <malloc.h>
114 #include <errno.h>
115 #include <unistd.h>
116 
117 #include <sys/socket.h>
118 #include <asm/types.h>
119 #include <linux/netlink.h>
120 #include <linux/rtnetlink.h>
121 #include <sys/types.h>
122 #include <sys/socket.h>
123 #include <sys/poll.h>
124 #include <netpacket/packet.h>
125 #include <net/ethernet.h>     /* the L2 protocols */
126 #include <sys/uio.h>
127 #include <net/if.h>
128 #include <net/if_arp.h>
129 #include <ifaddrs.h>
130 #include <netinet/in.h>
131 
132 #define __set_errno(e) (errno = (e))
133 #define __close(fd) (close(fd))
134 #undef ifa_broadaddr
135 #define ifa_broadaddr ifa_dstaddr
136 #define IFA_NETMASK
137 
138 /* ====================================================================== */
139 struct nlmsg_list{
140     struct nlmsg_list *nlm_next;
141     struct nlmsghdr *nlh;
142     int size;
143     time_t seq;
144 };
145 
146 struct rtmaddr_ifamap {
147   void *address;
148   void *local;
149 #ifdef IFA_NETMASK
150   void *netmask;
151 #endif
152   void *broadcast;
153 #ifdef HAVE_IFADDRS_IFA_ANYCAST
154   void *anycast;
155 #endif
156   int address_len;
157   int local_len;
158 #ifdef IFA_NETMASK
159   int netmask_len;
160 #endif
161   int broadcast_len;
162 #ifdef HAVE_IFADDRS_IFA_ANYCAST
163   int anycast_len;
164 #endif
165 };
166 
167 /* ====================================================================== */
168 static size_t
169 ifa_sa_len(sa_family_t family, int len)
170 {
171   size_t size;
172   switch(family){
173   case AF_INET:
174     size = sizeof(struct sockaddr_in);
175     break;
176   case AF_INET6:
177     size = sizeof(struct sockaddr_in6);
178     break;
179   case AF_PACKET:
180     size = (size_t)(((struct sockaddr_ll *)NULL)->sll_addr) + len;
181     if (size < sizeof(struct sockaddr_ll))
182       size = sizeof(struct sockaddr_ll);
183     break;
184   default:
185     size = (size_t)(((struct sockaddr *)NULL)->sa_data) + len;
186     if (size < sizeof(struct sockaddr))
187       size = sizeof(struct sockaddr);
188     break;
189   }
190   return size;
191 }
192 
193 static void
194 ifa_make_sockaddr(sa_family_t family,
195 		  struct sockaddr *sa,
196 		  void *p, size_t len,
197 		  uint32_t scope, uint32_t scopeid)
198 {
199   if (sa == NULL) return;
200   switch(family){
201   case AF_INET:
202     memcpy(&((struct sockaddr_in*)sa)->sin_addr, (char *)p, len);
203     break;
204   case AF_INET6:
205     memcpy(&((struct sockaddr_in6*)sa)->sin6_addr, (char *)p, len);
206     if (IN6_IS_ADDR_LINKLOCAL(p) ||
207 	IN6_IS_ADDR_MC_LINKLOCAL(p)){
208       ((struct sockaddr_in6*)sa)->sin6_scope_id = scopeid;
209     }
210     break;
211   case AF_PACKET:
212     memcpy(((struct sockaddr_ll*)sa)->sll_addr, (char *)p, len);
213     ((struct sockaddr_ll*)sa)->sll_halen = len;
214     break;
215   default:
216     memcpy(sa->sa_data, p, len);	/*XXX*/
217     break;
218   }
219   sa->sa_family = family;
220 #ifdef HAVE_SOCKADDR_SA_LEN
221   sa->sa_len = ifa_sa_len(family, len);
222 #endif
223 }
224 
225 #ifndef IFA_NETMASK
226 static struct sockaddr *
227 ifa_make_sockaddr_mask(sa_family_t family,
228 		       struct sockaddr *sa,
229 		       uint32_t prefixlen)
230 {
231   int i;
232   char *p = NULL, c;
233   uint32_t max_prefixlen = 0;
234 
235   if (sa == NULL) return NULL;
236   switch(family){
237   case AF_INET:
238     memset(&((struct sockaddr_in*)sa)->sin_addr, 0, sizeof(((struct sockaddr_in*)sa)->sin_addr));
239     p = (char *)&((struct sockaddr_in*)sa)->sin_addr;
240     max_prefixlen = 32;
241     break;
242   case AF_INET6:
243     memset(&((struct sockaddr_in6*)sa)->sin6_addr, 0, sizeof(((struct sockaddr_in6*)sa)->sin6_addr));
244     p = (char *)&((struct sockaddr_in6*)sa)->sin6_addr;
245 #if 0	/* XXX: fill scope-id? */
246     if (IN6_IS_ADDR_LINKLOCAL(p) ||
247 	IN6_IS_ADDR_MC_LINKLOCAL(p)){
248       ((struct sockaddr_in6*)sa)->sin6_scope_id = scopeid;
249     }
250 #endif
251     max_prefixlen = 128;
252     break;
253   default:
254     return NULL;
255   }
256   sa->sa_family = family;
257 #ifdef HAVE_SOCKADDR_SA_LEN
258   sa->sa_len = ifa_sa_len(family, len);
259 #endif
260   if (p){
261     if (prefixlen > max_prefixlen)
262       prefixlen = max_prefixlen;
263     for (i=0; i<(prefixlen / 8); i++)
264       *p++ = 0xff;
265     c = 0xff;
266     c <<= (8 - (prefixlen % 8));
267     *p = c;
268   }
269   return sa;
270 }
271 #endif
272 
273 /* ====================================================================== */
274 static int
275 nl_sendreq(int sd, int request, int flags, int *seq)
276 {
277   char reqbuf[NLMSG_ALIGN(sizeof(struct nlmsghdr)) +
278 	      NLMSG_ALIGN(sizeof(struct rtgenmsg))];
279   struct sockaddr_nl nladdr;
280   struct nlmsghdr *req_hdr;
281   struct rtgenmsg *req_msg;
282   time_t t = time(NULL);
283 
284   if (seq) *seq = t;
285   memset(&reqbuf, 0, sizeof(reqbuf));
286   req_hdr = (struct nlmsghdr *)reqbuf;
287   req_msg = (struct rtgenmsg *)NLMSG_DATA(req_hdr);
288   req_hdr->nlmsg_len = NLMSG_LENGTH(sizeof(*req_msg));
289   req_hdr->nlmsg_type = request;
290   req_hdr->nlmsg_flags = flags | NLM_F_REQUEST;
291   req_hdr->nlmsg_pid = 0;
292   req_hdr->nlmsg_seq = t;
293   req_msg->rtgen_family = AF_UNSPEC;
294   memset(&nladdr, 0, sizeof(nladdr));
295   nladdr.nl_family = AF_NETLINK;
296   return (sendto(sd, (void *)req_hdr, req_hdr->nlmsg_len, 0,
297 		 (struct sockaddr *)&nladdr, sizeof(nladdr)));
298 }
299 
300 static int
301 nl_recvmsg(int sd, int request, int seq,
302 	   void *buf, size_t buflen,
303 	   int *flags)
304 {
305   struct msghdr msg;
306   struct iovec iov = { buf, buflen };
307   struct sockaddr_nl nladdr;
308   int read_len;
309 
310   for (;;){
311     msg.msg_name = (void *)&nladdr;
312     msg.msg_namelen = sizeof(nladdr);
313     msg.msg_iov = &iov;
314     msg.msg_iovlen = 1;
315     msg.msg_control = NULL;
316     msg.msg_controllen = 0;
317     msg.msg_flags = 0;
318     read_len = recvmsg(sd, &msg, 0);
319     if ((read_len < 0 && errno == EINTR) || (msg.msg_flags & MSG_TRUNC))
320       continue;
321     if (flags) *flags = msg.msg_flags;
322     break;
323   }
324   return read_len;
325 }
326 
327 static int
328 nl_getmsg(int sd, int request, int seq,
329 	  struct nlmsghdr **nlhp,
330 	  int *done)
331 {
332   struct nlmsghdr *nh;
333   size_t bufsize = 65536, lastbufsize = 0;
334   void *buff = NULL;
335   int result = 0, read_size;
336   int msg_flags;
337   pid_t pid = getpid();
338   for (;;){
339     void *newbuff = realloc(buff, bufsize);
340     if (newbuff == NULL || bufsize < lastbufsize) {
341       result = -1;
342       break;
343     }
344     buff = newbuff;
345     result = read_size = nl_recvmsg(sd, request, seq, buff, bufsize, &msg_flags);
346     if (read_size < 0 || (msg_flags & MSG_TRUNC)){
347       lastbufsize = bufsize;
348       bufsize *= 2;
349       continue;
350     }
351     if (read_size == 0) break;
352     nh = (struct nlmsghdr *)buff;
353     for (nh = (struct nlmsghdr *)buff;
354 	 NLMSG_OK(nh, read_size);
355 	 nh = (struct nlmsghdr *)NLMSG_NEXT(nh, read_size)){
356       if (nh->nlmsg_pid != pid ||
357 	  nh->nlmsg_seq != seq)
358 	continue;
359       if (nh->nlmsg_type == NLMSG_DONE){
360 	(*done)++;
361 	break; /* ok */
362       }
363       if (nh->nlmsg_type == NLMSG_ERROR){
364 	struct nlmsgerr *nlerr = (struct nlmsgerr *)NLMSG_DATA(nh);
365 	result = -1;
366 	if (nh->nlmsg_len < NLMSG_LENGTH(sizeof(struct nlmsgerr)))
367 	  __set_errno(EIO);
368 	else
369 	  __set_errno(-nlerr->error);
370 	break;
371       }
372     }
373     break;
374   }
375   if (result < 0)
376     if (buff){
377       int saved_errno = errno;
378       free(buff);
379       __set_errno(saved_errno);
380     }
381   *nlhp = (struct nlmsghdr *)buff;
382   return result;
383 }
384 
385 static int
386 nl_getlist(int sd, int seq,
387 	   int request,
388 	   struct nlmsg_list **nlm_list,
389 	   struct nlmsg_list **nlm_end)
390 {
391   struct nlmsghdr *nlh = NULL;
392   int status;
393   int done = 0;
394   int tries = 3;
395 
396  try_again:
397   status = nl_sendreq(sd, request, NLM_F_ROOT|NLM_F_MATCH, &seq);
398   if (status < 0)
399     return status;
400   if (seq == 0)
401     seq = (int)time(NULL);
402   while(!done){
403     struct pollfd pfd;
404 
405     pfd.fd = sd;
406     pfd.events = POLLIN | POLLPRI;
407     pfd.revents = 0;
408     status = poll(&pfd, 1, 1000);
409     if (status < 0)
410 	return status;
411     else if (status == 0) {
412 	seq++;
413 	if (tries-- > 0)
414 	    goto try_again;
415 	return -1;
416     }
417 
418     status = nl_getmsg(sd, request, seq, &nlh, &done);
419     if (status < 0)
420       return status;
421     if (nlh){
422       struct nlmsg_list *nlm_next = (struct nlmsg_list *)malloc(sizeof(struct nlmsg_list));
423       if (nlm_next == NULL){
424 	int saved_errno = errno;
425 	free(nlh);
426 	__set_errno(saved_errno);
427 	status = -1;
428       } else {
429 	nlm_next->nlm_next = NULL;
430 	nlm_next->nlh = (struct nlmsghdr *)nlh;
431 	nlm_next->size = status;
432 	nlm_next->seq = seq;
433 	if (*nlm_list == NULL){
434 	  *nlm_list = nlm_next;
435 	  *nlm_end = nlm_next;
436 	} else {
437 	  (*nlm_end)->nlm_next = nlm_next;
438 	  *nlm_end = nlm_next;
439 	}
440       }
441     }
442   }
443   return status >= 0 ? seq : status;
444 }
445 
446 /* ---------------------------------------------------------------------- */
447 static void
448 free_nlmsglist(struct nlmsg_list *nlm0)
449 {
450   struct nlmsg_list *nlm, *nlm_next;
451   int saved_errno;
452   if (!nlm0)
453     return;
454   saved_errno = errno;
455   for (nlm=nlm0; nlm; nlm=nlm_next){
456     if (nlm->nlh)
457       free(nlm->nlh);
458     nlm_next=nlm->nlm_next;
459     free(nlm);
460   }
461   __set_errno(saved_errno);
462 }
463 
464 static void
465 free_data(void *data, void *ifdata)
466 {
467   int saved_errno = errno;
468   if (data != NULL) free(data);
469   if (ifdata != NULL) free(ifdata);
470   __set_errno(saved_errno);
471 }
472 
473 /* ---------------------------------------------------------------------- */
474 static void
475 nl_close(int sd)
476 {
477   int saved_errno = errno;
478   if (sd >= 0) __close(sd);
479   __set_errno(saved_errno);
480 }
481 
482 /* ---------------------------------------------------------------------- */
483 static int
484 nl_open(void)
485 {
486   struct sockaddr_nl nladdr;
487   int sd;
488 
489   sd = socket(PF_NETLINK, SOCK_RAW, NETLINK_ROUTE);
490   if (sd < 0) return -1;
491   memset(&nladdr, 0, sizeof(nladdr));
492   nladdr.nl_family = AF_NETLINK;
493   if (bind(sd, (struct sockaddr*)&nladdr, sizeof(nladdr)) < 0){
494     nl_close(sd);
495     return -1;
496   }
497   return sd;
498 }
499 
500 /* ====================================================================== */
501 ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
502 rk_getifaddrs(struct ifaddrs **ifap)
503 {
504   int sd;
505   struct nlmsg_list *nlmsg_list, *nlmsg_end, *nlm;
506   /* - - - - - - - - - - - - - - - */
507   int icnt;
508   size_t dlen, xlen, nlen;
509   uint32_t max_ifindex = 0;
510 
511   pid_t pid = getpid();
512   int seq;
513   int result;
514   int build     ; /* 0 or 1 */
515 
516 /* ---------------------------------- */
517   /* initialize */
518   icnt = dlen = xlen = nlen = 0;
519   nlmsg_list = nlmsg_end = NULL;
520 
521   if (ifap)
522     *ifap = NULL;
523 
524 /* ---------------------------------- */
525   /* open socket and bind */
526   sd = nl_open();
527   if (sd < 0)
528     return -1;
529 
530 /* ---------------------------------- */
531    /* gather info */
532   if ((seq = nl_getlist(sd, 0, RTM_GETLINK,
533 			&nlmsg_list, &nlmsg_end)) < 0){
534     free_nlmsglist(nlmsg_list);
535     nl_close(sd);
536     return -1;
537   }
538   if ((seq = nl_getlist(sd, seq+1, RTM_GETADDR,
539 			&nlmsg_list, &nlmsg_end)) < 0){
540     free_nlmsglist(nlmsg_list);
541     nl_close(sd);
542     return -1;
543   }
544 
545 /* ---------------------------------- */
546   /* Estimate size of result buffer and fill it */
547   for (build=0; build<=1; build++){
548     struct ifaddrs *ifl = NULL, *ifa = NULL;
549     struct nlmsghdr *nlh, *nlh0;
550     char *data = NULL, *xdata = NULL;
551     void *ifdata = NULL;
552     char *ifname = NULL, **iflist = NULL;
553     uint16_t *ifflist = NULL;
554     struct rtmaddr_ifamap ifamap;
555 
556     if (build){
557       data = calloc(1,
558 		    NLMSG_ALIGN(sizeof(struct ifaddrs[icnt]))
559 		    + dlen + xlen + nlen);
560       ifa = (struct ifaddrs *)data;
561       ifdata = calloc(1,
562 		      NLMSG_ALIGN(sizeof(char *[max_ifindex+1]))
563 		      + NLMSG_ALIGN(sizeof(uint16_t [max_ifindex+1])));
564       if (ifap != NULL)
565 	*ifap = (ifdata != NULL) ? ifa : NULL;
566       else{
567 	free_data(data, ifdata);
568 	result = 0;
569 	break;
570       }
571       if (data == NULL || ifdata == NULL){
572 	free_data(data, ifdata);
573 	result = -1;
574 	break;
575       }
576       ifl = NULL;
577       data += NLMSG_ALIGN(sizeof(struct ifaddrs)) * icnt;
578       xdata = data + dlen;
579       ifname = xdata + xlen;
580       iflist = ifdata;
581       ifflist = (uint16_t *)(((char *)iflist) + NLMSG_ALIGN(sizeof(char *[max_ifindex+1])));
582     }
583 
584     for (nlm=nlmsg_list; nlm; nlm=nlm->nlm_next){
585       int nlmlen = nlm->size;
586       if (!(nlh0 = nlm->nlh))
587 	continue;
588       for (nlh = nlh0;
589 	   NLMSG_OK(nlh, nlmlen);
590 	   nlh=NLMSG_NEXT(nlh,nlmlen)){
591 	struct ifinfomsg *ifim = NULL;
592 	struct ifaddrmsg *ifam = NULL;
593 	struct rtattr *rta;
594 
595 	size_t nlm_struct_size = 0;
596 	sa_family_t nlm_family = 0;
597 	uint32_t nlm_scope = 0, nlm_index = 0;
598 	size_t sockaddr_size = 0;
599 	uint32_t nlm_prefixlen = 0;
600 	size_t rtasize;
601 
602 	memset(&ifamap, 0, sizeof(ifamap));
603 
604 	/* check if the message is what we want */
605 	if (nlh->nlmsg_pid != pid ||
606 	    nlh->nlmsg_seq != nlm->seq)
607 	  continue;
608 	if (nlh->nlmsg_type == NLMSG_DONE){
609 	  break; /* ok */
610 	}
611 	switch (nlh->nlmsg_type){
612 	case RTM_NEWLINK:
613 	  ifim = (struct ifinfomsg *)NLMSG_DATA(nlh);
614 	  nlm_struct_size = sizeof(*ifim);
615 	  nlm_family = ifim->ifi_family;
616 	  nlm_scope = 0;
617 	  nlm_index = ifim->ifi_index;
618 	  nlm_prefixlen = 0;
619 	  if (build)
620 	    ifflist[nlm_index] = ifa->ifa_flags = ifim->ifi_flags;
621 	  break;
622 	case RTM_NEWADDR:
623 	  ifam = (struct ifaddrmsg *)NLMSG_DATA(nlh);
624 	  nlm_struct_size = sizeof(*ifam);
625 	  nlm_family = ifam->ifa_family;
626 	  nlm_scope = ifam->ifa_scope;
627 	  nlm_index = ifam->ifa_index;
628 	  nlm_prefixlen = ifam->ifa_prefixlen;
629 	  if (build)
630 	    ifa->ifa_flags = ifflist[nlm_index];
631 	  break;
632 	default:
633 	  continue;
634 	}
635 
636 	if (!build){
637 	  if (max_ifindex < nlm_index)
638 	    max_ifindex = nlm_index;
639 	} else {
640 	  if (ifl != NULL)
641 	    ifl->ifa_next = ifa;
642 	}
643 
644 	rtasize = NLMSG_PAYLOAD(nlh, nlmlen) - NLMSG_ALIGN(nlm_struct_size);
645 	for (rta = (struct rtattr *)(((char *)NLMSG_DATA(nlh)) + NLMSG_ALIGN(nlm_struct_size));
646 	     RTA_OK(rta, rtasize);
647 	     rta = RTA_NEXT(rta, rtasize)){
648 	  struct sockaddr **sap = NULL;
649 	  void *rtadata = RTA_DATA(rta);
650 	  size_t rtapayload = RTA_PAYLOAD(rta);
651 	  socklen_t sa_len;
652 
653 	  switch(nlh->nlmsg_type){
654 	  case RTM_NEWLINK:
655 	    switch(rta->rta_type){
656 	    case IFLA_ADDRESS:
657 	    case IFLA_BROADCAST:
658 	      if (build){
659 		sap = (rta->rta_type == IFLA_ADDRESS) ? &ifa->ifa_addr : &ifa->ifa_broadaddr;
660 		*sap = (struct sockaddr *)data;
661 	      }
662 	      sa_len = ifa_sa_len(AF_PACKET, rtapayload);
663 	      if (rta->rta_type == IFLA_ADDRESS)
664 		sockaddr_size = NLMSG_ALIGN(sa_len);
665 	      if (!build){
666 		dlen += NLMSG_ALIGN(sa_len);
667 	      } else {
668 		memset(*sap, 0, sa_len);
669 		ifa_make_sockaddr(AF_PACKET, *sap, rtadata,rtapayload, 0,0);
670 		((struct sockaddr_ll *)*sap)->sll_ifindex = nlm_index;
671 		((struct sockaddr_ll *)*sap)->sll_hatype = ifim->ifi_type;
672 		data += NLMSG_ALIGN(sa_len);
673 	      }
674 	      break;
675 	    case IFLA_IFNAME:/* Name of Interface */
676 	      if (!build)
677 		nlen += NLMSG_ALIGN(rtapayload + 1);
678 	      else{
679 		ifa->ifa_name = ifname;
680 		if (iflist[nlm_index] == NULL)
681 		  iflist[nlm_index] = ifa->ifa_name;
682 		strncpy(ifa->ifa_name, rtadata, rtapayload);
683 		ifa->ifa_name[rtapayload] = '\0';
684 		ifname += NLMSG_ALIGN(rtapayload + 1);
685 	      }
686 	      break;
687 	    case IFLA_STATS:/* Statistics of Interface */
688 	      if (!build)
689 		xlen += NLMSG_ALIGN(rtapayload);
690 	      else{
691 		ifa->ifa_data = xdata;
692 		memcpy(ifa->ifa_data, rtadata, rtapayload);
693 		xdata += NLMSG_ALIGN(rtapayload);
694 	      }
695 	      break;
696 	    case IFLA_UNSPEC:
697 	      break;
698 	    case IFLA_MTU:
699 	      break;
700 	    case IFLA_LINK:
701 	      break;
702 	    case IFLA_QDISC:
703 	      break;
704 	    default:
705 	      break;
706 	    }
707 	    break;
708 	  case RTM_NEWADDR:
709 	    if (nlm_family == AF_PACKET) break;
710 	    switch(rta->rta_type){
711 	    case IFA_ADDRESS:
712 		ifamap.address = rtadata;
713 		ifamap.address_len = rtapayload;
714 		break;
715 	    case IFA_LOCAL:
716 		ifamap.local = rtadata;
717 		ifamap.local_len = rtapayload;
718 		break;
719 	    case IFA_BROADCAST:
720 		ifamap.broadcast = rtadata;
721 		ifamap.broadcast_len = rtapayload;
722 		break;
723 #ifdef HAVE_IFADDRS_IFA_ANYCAST
724 	    case IFA_ANYCAST:
725 		ifamap.anycast = rtadata;
726 		ifamap.anycast_len = rtapayload;
727 		break;
728 #endif
729 	    case IFA_LABEL:
730 	      if (!build)
731 		nlen += NLMSG_ALIGN(rtapayload + 1);
732 	      else{
733 		ifa->ifa_name = ifname;
734 		if (iflist[nlm_index] == NULL)
735 		  iflist[nlm_index] = ifname;
736 		strncpy(ifa->ifa_name, rtadata, rtapayload);
737 		ifa->ifa_name[rtapayload] = '\0';
738 		ifname += NLMSG_ALIGN(rtapayload + 1);
739 	      }
740 	      break;
741 	    case IFA_UNSPEC:
742 	      break;
743 	    case IFA_CACHEINFO:
744 	      break;
745 	    default:
746 	      break;
747 	    }
748 	  }
749 	}
750 	if (nlh->nlmsg_type == RTM_NEWADDR &&
751 	    nlm_family != AF_PACKET) {
752 	  if (!ifamap.local) {
753 	    ifamap.local = ifamap.address;
754 	    ifamap.local_len = ifamap.address_len;
755 	  }
756 	  if (!ifamap.address) {
757 	    ifamap.address = ifamap.local;
758 	    ifamap.address_len = ifamap.local_len;
759 	  }
760 	  if (ifamap.address_len != ifamap.local_len ||
761 	      (ifamap.address != NULL &&
762 	       memcmp(ifamap.address, ifamap.local, ifamap.address_len))) {
763 	    /* p2p; address is peer and local is ours */
764 	    ifamap.broadcast = ifamap.address;
765 	    ifamap.broadcast_len = ifamap.address_len;
766 	    ifamap.address = ifamap.local;
767 	    ifamap.address_len = ifamap.local_len;
768 	  }
769 	  if (ifamap.address) {
770 #ifndef IFA_NETMASK
771 	    sockaddr_size = NLMSG_ALIGN(ifa_sa_len(nlm_family,ifamap.address_len));
772 #endif
773 	    if (!build)
774 	      dlen += NLMSG_ALIGN(ifa_sa_len(nlm_family,ifamap.address_len));
775 	    else {
776 	      ifa->ifa_addr = (struct sockaddr *)data;
777 	      ifa_make_sockaddr(nlm_family, ifa->ifa_addr, ifamap.address, ifamap.address_len,
778 				nlm_scope, nlm_index);
779 	      data += NLMSG_ALIGN(ifa_sa_len(nlm_family, ifamap.address_len));
780 	    }
781 	  }
782 #ifdef IFA_NETMASK
783 	  if (ifamap.netmask) {
784 	    if (!build)
785 	      dlen += NLMSG_ALIGN(ifa_sa_len(nlm_family,ifamap.netmask_len));
786 	    else {
787 	      ifa->ifa_netmask = (struct sockaddr *)data;
788 	      ifa_make_sockaddr(nlm_family, ifa->ifa_netmask, ifamap.netmask, ifamap.netmask_len,
789 				nlm_scope, nlm_index);
790 	      data += NLMSG_ALIGN(ifa_sa_len(nlm_family, ifamap.netmask_len));
791 	    }
792 	  }
793 #endif
794 	  if (ifamap.broadcast) {
795 	    if (!build)
796 	      dlen += NLMSG_ALIGN(ifa_sa_len(nlm_family,ifamap.broadcast_len));
797 	    else {
798 	      ifa->ifa_broadaddr = (struct sockaddr *)data;
799 	      ifa_make_sockaddr(nlm_family, ifa->ifa_broadaddr, ifamap.broadcast, ifamap.broadcast_len,
800 				nlm_scope, nlm_index);
801 	      data += NLMSG_ALIGN(ifa_sa_len(nlm_family, ifamap.broadcast_len));
802 	    }
803 	  }
804 #ifdef HAVE_IFADDRS_IFA_ANYCAST
805 	  if (ifamap.anycast) {
806 	    if (!build)
807 	      dlen += NLMSG_ALIGN(ifa_sa_len(nlm_family,ifamap.anycast_len));
808 	    else {
809 	      ifa->ifa_anycast = (struct sockaddr *)data;
810 	      ifa_make_sockaddr(nlm_family, ifa->ifa_anyaddr, ifamap.anycast, ifamap.anycast_len,
811 				nlm_scope, nlm_index);
812 	      data += NLMSG_ALIGN(ifa_sa_len(nlm_family, ifamap.anycast_len));
813 	    }
814 	  }
815 #endif
816 	}
817 	if (!build){
818 #ifndef IFA_NETMASK
819 	  dlen += sockaddr_size;
820 #endif
821 	  icnt++;
822 	} else {
823 	  if (ifa->ifa_name == NULL)
824 	    ifa->ifa_name = iflist[nlm_index];
825 #ifndef IFA_NETMASK
826 	  if (ifa->ifa_addr &&
827 	      ifa->ifa_addr->sa_family != AF_UNSPEC &&
828 	      ifa->ifa_addr->sa_family != AF_PACKET){
829 	    ifa->ifa_netmask = (struct sockaddr *)data;
830 	    ifa_make_sockaddr_mask(ifa->ifa_addr->sa_family, ifa->ifa_netmask, nlm_prefixlen);
831 	  }
832 	  data += sockaddr_size;
833 #endif
834 	  ifl = ifa++;
835 	}
836       }
837     }
838     if (!build){
839       if (icnt == 0 && (dlen + nlen + xlen == 0)){
840 	if (ifap != NULL)
841 	  *ifap = NULL;
842 	break; /* cannot found any addresses */
843       }
844     }
845     else
846       free_data(NULL, ifdata);
847   }
848 
849 /* ---------------------------------- */
850   /* Finalize */
851   free_nlmsglist(nlmsg_list);
852   nl_close(sd);
853   return 0;
854 }
855 
856 void ROKEN_LIB_FUNCTION
857 rk_freeifaddrs(struct ifaddrs *ifp)
858 {
859     /* AF_NETLINK method uses a single allocation for all interfaces */
860     free(ifp);
861 }
862 
863 #else /* !AF_NETLINK */
864 
865 /*
866  * The generic SIOCGIFCONF version.
867  */
868 
869 static int
870 getifaddrs2(struct ifaddrs **ifap,
871 	    int af, int siocgifconf, int siocgifflags,
872 	    size_t ifreq_sz)
873 {
874     int ret;
875     int fd;
876     size_t buf_size;
877     char *buf;
878     struct ifconf ifconf;
879     char *p;
880     size_t sz;
881     struct sockaddr sa_zero;
882     struct ifreq *ifr;
883     struct ifaddrs *start = NULL, **end = &start;
884 
885     buf = NULL;
886 
887     memset (&sa_zero, 0, sizeof(sa_zero));
888     fd = socket(af, SOCK_DGRAM, 0);
889     if (fd < 0)
890 	return -1;
891 
892     buf_size = 8192;
893     for (;;) {
894 	buf = calloc(1, buf_size);
895 	if (buf == NULL) {
896 	    ret = ENOMEM;
897 	    goto error_out;
898 	}
899 	ifconf.ifc_len = buf_size;
900 	ifconf.ifc_buf = buf;
901 
902 	/*
903 	 * Solaris returns EINVAL when the buffer is too small.
904 	 */
905 	if (ioctl (fd, siocgifconf, &ifconf) < 0 && errno != EINVAL) {
906 	    ret = errno;
907 	    goto error_out;
908 	}
909 	/*
910 	 * Can the difference between a full and a overfull buf
911 	 * be determined?
912 	 */
913 
914 	if (ifconf.ifc_len < buf_size)
915 	    break;
916 	free (buf);
917 	buf_size *= 2;
918     }
919 
920     for (p = ifconf.ifc_buf;
921 	 p < ifconf.ifc_buf + ifconf.ifc_len;
922 	 p += sz) {
923 	struct ifreq ifreq;
924 	struct sockaddr *sa;
925 	size_t salen;
926 
927 	ifr = (struct ifreq *)p;
928 	sa  = &ifr->ifr_addr;
929 
930 	sz = ifreq_sz;
931 	salen = sizeof(struct sockaddr);
932 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
933 	salen = sa->sa_len;
934 	sz = max(sz, sizeof(ifr->ifr_name) + sa->sa_len);
935 #endif
936 #ifdef SA_LEN
937 	salen = SA_LEN(sa);
938 	sz = max(sz, sizeof(ifr->ifr_name) + SA_LEN(sa));
939 #endif
940 	memset (&ifreq, 0, sizeof(ifreq));
941 	memcpy (ifreq.ifr_name, ifr->ifr_name, sizeof(ifr->ifr_name));
942 
943 	if (ioctl(fd, siocgifflags, &ifreq) < 0) {
944 	    ret = errno;
945 	    goto error_out;
946 	}
947 
948 	*end = malloc(sizeof(**end));
949 	if (*end == NULL) {
950 	    ret = ENOMEM;
951 	    goto error_out;
952 	}
953 
954 	(*end)->ifa_next = NULL;
955 	(*end)->ifa_name = strdup(ifr->ifr_name);
956 	if ((*end)->ifa_name == NULL) {
957 	    ret = ENOMEM;
958 	    goto error_out;
959 	}
960 	(*end)->ifa_flags = ifreq.ifr_flags;
961 	(*end)->ifa_addr = malloc(salen);
962 	if ((*end)->ifa_addr == NULL) {
963 	    ret = ENOMEM;
964 	    goto error_out;
965 	}
966 	memcpy((*end)->ifa_addr, sa, salen);
967 	(*end)->ifa_netmask = NULL;
968 
969 #if 0
970 	/* fix these when we actually need them */
971 	if(ifreq.ifr_flags & IFF_BROADCAST) {
972 	    (*end)->ifa_broadaddr = malloc(sizeof(ifr->ifr_broadaddr));
973 	    if ((*end)->ifa_broadaddr == NULL) {
974 		ret = ENOMEM;
975 		goto error_out;
976 	    }
977 	    memcpy((*end)->ifa_broadaddr, &ifr->ifr_broadaddr,
978 		   sizeof(ifr->ifr_broadaddr));
979 	} else if(ifreq.ifr_flags & IFF_POINTOPOINT) {
980 	    (*end)->ifa_dstaddr = malloc(sizeof(ifr->ifr_dstaddr));
981 	    if ((*end)->ifa_dstaddr == NULL) {
982 		ret = ENOMEM;
983 		goto error_out;
984 	    }
985 	    memcpy((*end)->ifa_dstaddr, &ifr->ifr_dstaddr,
986 		   sizeof(ifr->ifr_dstaddr));
987 	} else
988 	    (*end)->ifa_dstaddr = NULL;
989 #else
990 	    (*end)->ifa_dstaddr = NULL;
991 #endif
992 
993 	(*end)->ifa_data = NULL;
994 
995 	end = &(*end)->ifa_next;
996 
997     }
998     *ifap = start;
999     close(fd);
1000     free(buf);
1001     return 0;
1002   error_out:
1003     rk_freeifaddrs(start);
1004     close(fd);
1005     free(buf);
1006     errno = ret;
1007     return -1;
1008 }
1009 
1010 #if defined(HAVE_IPV6) && defined(SIOCGLIFCONF) && defined(SIOCGLIFFLAGS)
1011 static int
1012 getlifaddrs2(struct ifaddrs **ifap,
1013 	     int af, int siocgifconf, int siocgifflags,
1014 	     size_t ifreq_sz)
1015 {
1016     int ret;
1017     int fd;
1018     size_t buf_size;
1019     char *buf;
1020     struct lifconf ifconf;
1021     char *p;
1022     size_t sz;
1023     struct sockaddr sa_zero;
1024     struct lifreq *ifr;
1025     struct ifaddrs *start = NULL, **end = &start;
1026 
1027     buf = NULL;
1028 
1029     memset (&sa_zero, 0, sizeof(sa_zero));
1030     fd = socket(af, SOCK_DGRAM, 0);
1031     if (fd < 0)
1032 	return -1;
1033 
1034     buf_size = 8192;
1035     for (;;) {
1036 	buf = calloc(1, buf_size);
1037 	if (buf == NULL) {
1038 	    ret = ENOMEM;
1039 	    goto error_out;
1040 	}
1041 #ifndef __hpux
1042 	ifconf.lifc_family = af;
1043 	ifconf.lifc_flags  = 0;
1044 #endif
1045 	ifconf.lifc_len    = buf_size;
1046 	ifconf.lifc_buf    = buf;
1047 
1048 	/*
1049 	 * Solaris returns EINVAL when the buffer is too small.
1050 	 */
1051 	if (ioctl (fd, siocgifconf, &ifconf) < 0 && errno != EINVAL) {
1052 	    ret = errno;
1053 	    goto error_out;
1054 	}
1055 	/*
1056 	 * Can the difference between a full and a overfull buf
1057 	 * be determined?
1058 	 */
1059 
1060 	if (ifconf.lifc_len < buf_size)
1061 	    break;
1062 	free (buf);
1063 	buf_size *= 2;
1064     }
1065 
1066     for (p = ifconf.lifc_buf;
1067 	 p < ifconf.lifc_buf + ifconf.lifc_len;
1068 	 p += sz) {
1069 	struct lifreq ifreq;
1070 	struct sockaddr_storage *sa;
1071 	size_t salen;
1072 
1073 	ifr = (struct lifreq *)p;
1074 	sa  = &ifr->lifr_addr;
1075 
1076 	sz = ifreq_sz;
1077 	salen = sizeof(struct sockaddr_storage);
1078 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
1079 	salen = sa->sa_len;
1080 	sz = max(sz, sizeof(ifr->ifr_name) + sa->sa_len);
1081 #endif
1082 #ifdef SA_LEN
1083 	salen = SA_LEN(sa);
1084 	sz = max(sz, sizeof(ifr->ifr_name) + SA_LEN(sa));
1085 #endif
1086 	memset (&ifreq, 0, sizeof(ifreq));
1087 	memcpy (ifreq.lifr_name, ifr->lifr_name, sizeof(ifr->lifr_name));
1088 
1089 	if (ioctl(fd, siocgifflags, &ifreq) < 0) {
1090 	    ret = errno;
1091 	    goto error_out;
1092 	}
1093 
1094 	*end = malloc(sizeof(**end));
1095 	if (*end == NULL) {
1096 	    ret = ENOMEM;
1097 	    goto error_out;
1098 	}
1099 
1100 	(*end)->ifa_next = NULL;
1101 	(*end)->ifa_name = strdup(ifr->lifr_name);
1102 	if ((*end)->ifa_name == NULL) {
1103 	    ret = ENOMEM;
1104 	    goto error_out;
1105 	}
1106 	(*end)->ifa_flags = ifreq.lifr_flags;
1107 	(*end)->ifa_addr = malloc(salen);
1108 	if ((*end)->ifa_addr == NULL) {
1109 	    ret = ENOMEM;
1110 	    goto error_out;
1111 	}
1112 	memcpy((*end)->ifa_addr, sa, salen);
1113 	(*end)->ifa_netmask = NULL;
1114 
1115 #if 0
1116 	/* fix these when we actually need them */
1117 	if(ifreq.ifr_flags & IFF_BROADCAST) {
1118 	    (*end)->ifa_broadaddr = malloc(sizeof(ifr->ifr_broadaddr));
1119 	    if ((*end)->ifa_broadaddr == NULL) {
1120 		ret = ENOMEM;
1121 		goto error_out;
1122 	    }
1123 	    memcpy((*end)->ifa_broadaddr, &ifr->ifr_broadaddr,
1124 		   sizeof(ifr->ifr_broadaddr));
1125 	} else if(ifreq.ifr_flags & IFF_POINTOPOINT) {
1126 	    (*end)->ifa_dstaddr = malloc(sizeof(ifr->ifr_dstaddr));
1127 	    if ((*end)->ifa_dstaddr == NULL) {
1128 		ret = ENOMEM;
1129 		goto error_out;
1130 	    }
1131 	    memcpy((*end)->ifa_dstaddr, &ifr->ifr_dstaddr,
1132 		   sizeof(ifr->ifr_dstaddr));
1133 	} else
1134 	    (*end)->ifa_dstaddr = NULL;
1135 #else
1136 	    (*end)->ifa_dstaddr = NULL;
1137 #endif
1138 
1139 	(*end)->ifa_data = NULL;
1140 
1141 	end = &(*end)->ifa_next;
1142 
1143     }
1144     *ifap = start;
1145     close(fd);
1146     free(buf);
1147     return 0;
1148   error_out:
1149     rk_freeifaddrs(start);
1150     close(fd);
1151     free(buf);
1152     errno = ret;
1153     return -1;
1154 }
1155 #endif /* defined(HAVE_IPV6) && defined(SIOCGLIFCONF) && defined(SIOCGLIFFLAGS) */
1156 
1157 /**
1158  * Join two struct ifaddrs lists by appending supp to base.
1159  * Either may be NULL. The new list head (usually base) will be
1160  * returned.
1161  */
1162 static struct ifaddrs *
1163 append_ifaddrs(struct ifaddrs *base, struct ifaddrs *supp) {
1164     if (!base)
1165 	return supp;
1166 
1167     if (!supp)
1168 	return base;
1169 
1170     while (base->ifa_next)
1171 	base = base->ifa_next;
1172 
1173     base->ifa_next = supp;
1174 
1175     return base;
1176 }
1177 
1178 ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
1179 rk_getifaddrs(struct ifaddrs **ifap)
1180 {
1181     int ret = -1;
1182     errno = ENXIO;
1183 #if defined(AF_INET6) && defined(SIOCGIF6CONF) && defined(SIOCGIF6FLAGS)
1184     if (ret)
1185 	ret = getifaddrs2 (ifap, AF_INET6, SIOCGIF6CONF, SIOCGIF6FLAGS,
1186 			   sizeof(struct in6_ifreq));
1187 #endif
1188 #if defined(HAVE_IPV6) && defined(SIOCGLIFCONF) && defined(SIOCGLIFFLAGS)
1189     /* Do IPv6 and IPv4 queries separately then join the result.
1190      *
1191      * HP-UX only returns IPv6 addresses using SIOCGLIFCONF,
1192      * SIOCGIFCONF has to be used for IPv4 addresses. The result is then
1193      * merged.
1194      *
1195      * Solaris needs particular care, because a SIOCGLIFCONF lookup using
1196      * AF_UNSPEC can fail in a Zone requiring an AF_INET lookup, so we just
1197      * do them separately the same as for HP-UX. See
1198      * http://repo.or.cz/w/heimdal.git/commitdiff/76afc31e9ba2f37e64c70adc006ade9e37e9ef73
1199      */
1200     if (ret) {
1201 	int v6err, v4err;
1202 	struct ifaddrs *v6addrs, *v4addrs;
1203 
1204 	v6err = getlifaddrs2 (&v6addrs, AF_INET6, SIOCGLIFCONF, SIOCGLIFFLAGS,
1205 			    sizeof(struct lifreq));
1206 	v4err = getifaddrs2 (&v4addrs, AF_INET, SIOCGIFCONF, SIOCGIFFLAGS,
1207 			    sizeof(struct ifreq));
1208 	if (v6err)
1209 	    v6addrs = NULL;
1210 	if (v4err)
1211 	    v4addrs = NULL;
1212 
1213 	if (v6addrs) {
1214 	    if (v4addrs)
1215 		*ifap = append_ifaddrs(v6addrs, v4addrs);
1216 	    else
1217 		*ifap = v6addrs;
1218 	} else if (v4addrs) {
1219 	    *ifap = v4addrs;
1220 	} else {
1221 	    *ifap = NULL;
1222 	}
1223 
1224 	ret = (v6err || v4err) ? -1 : 0;
1225     }
1226 #endif
1227 #if defined(HAVE_IPV6) && defined(SIOCGIFCONF)
1228     if (ret)
1229 	ret = getifaddrs2 (ifap, AF_INET6, SIOCGIFCONF, SIOCGIFFLAGS,
1230 			   sizeof(struct ifreq));
1231 #endif
1232 #if defined(AF_INET) && defined(SIOCGIFCONF) && defined(SIOCGIFFLAGS)
1233     if (ret)
1234 	ret = getifaddrs2 (ifap, AF_INET, SIOCGIFCONF, SIOCGIFFLAGS,
1235 			   sizeof(struct ifreq));
1236 #endif
1237     return ret;
1238 }
1239 
1240 ROKEN_LIB_FUNCTION void ROKEN_LIB_CALL
1241 rk_freeifaddrs(struct ifaddrs *ifp)
1242 {
1243     struct ifaddrs *p, *q;
1244 
1245     for(p = ifp; p; ) {
1246 	free(p->ifa_name);
1247 	if(p->ifa_addr)
1248 	    free(p->ifa_addr);
1249 	if(p->ifa_dstaddr)
1250 	    free(p->ifa_dstaddr);
1251 	if(p->ifa_netmask)
1252 	    free(p->ifa_netmask);
1253 	if(p->ifa_data)
1254 	    free(p->ifa_data);
1255 	q = p;
1256 	p = p->ifa_next;
1257 	free(q);
1258     }
1259 }
1260 
1261 #endif /* !AF_NETLINK */
1262 
1263 #ifdef TEST
1264 
1265 void
1266 print_addr(const char *s, struct sockaddr *sa)
1267 {
1268     int i;
1269     printf("  %s=%d/", s, sa->sa_family);
1270 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
1271     for(i = 0; i < sa->sa_len - ((long)sa->sa_data - (long)&sa->sa_family); i++)
1272 	printf("%02x", ((unsigned char*)sa->sa_data)[i]);
1273 #else
1274     for(i = 0; i < sizeof(sa->sa_data); i++)
1275 	printf("%02x", ((unsigned char*)sa->sa_data)[i]);
1276 #endif
1277     printf("\n");
1278 }
1279 
1280 void
1281 print_ifaddrs(struct ifaddrs *x)
1282 {
1283     struct ifaddrs *p;
1284 
1285     for(p = x; p; p = p->ifa_next) {
1286 	printf("%s\n", p->ifa_name);
1287 	printf("  flags=%x\n", p->ifa_flags);
1288 	if(p->ifa_addr)
1289 	    print_addr("addr", p->ifa_addr);
1290 	if(p->ifa_dstaddr)
1291 	    print_addr("dstaddr", p->ifa_dstaddr);
1292 	if(p->ifa_netmask)
1293 	    print_addr("netmask", p->ifa_netmask);
1294 	printf("  %p\n", p->ifa_data);
1295     }
1296 }
1297 
1298 int
1299 main()
1300 {
1301     struct ifaddrs *a = NULL, *b;
1302     getifaddrs2(&a, AF_INET, SIOCGIFCONF, SIOCGIFFLAGS, sizeof(struct ifreq));
1303     print_ifaddrs(a);
1304     printf("---\n");
1305     getifaddrs(&b);
1306     print_ifaddrs(b);
1307     return 0;
1308 }
1309 #endif
1310