Merge from vendor branch GDB:
[dragonfly.git] / lib / libc / rpc / get_myaddress.c
1 /*
2  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3  * unrestricted use provided that this legend is included on all tape
4  * media and as a part of the software program in whole or part.  Users
5  * may copy or modify Sun RPC without charge, but are not authorized
6  * to license or distribute it to anyone else except as part of a product or
7  * program developed by the user.
8  *
9  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
10  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
11  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
12  *
13  * Sun RPC is provided with no support and without any obligation on the
14  * part of Sun Microsystems, Inc. to assist in its use, correction,
15  * modification or enhancement.
16  *
17  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
18  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
19  * OR ANY PART THEREOF.
20  *
21  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
22  * or profits or other special, indirect and consequential damages, even if
23  * Sun has been advised of the possibility of such damages.
24  *
25  * Sun Microsystems, Inc.
26  * 2550 Garcia Avenue
27  * Mountain View, California  94043
28  *
29  * @(#)get_myaddress.c 1.4 87/08/11 Copyr 1984 Sun Micro
30  * @(#)get_myaddress.c  2.1 88/07/29 4.0 RPCSRC
31  * $FreeBSD: src/lib/libc/rpc/get_myaddress.c,v 1.18.2.1 2003/01/01 23:55:34 jdp Exp $
32  * $DragonFly: src/lib/libc/rpc/get_myaddress.c,v 1.4 2005/11/13 12:27:04 swildner Exp $
33  */
34
35 /*
36  * get_myaddress.c
37  *
38  * Get client's IP address via ioctl.  This avoids using the yellowpages.
39  * Copyright (C) 1984, Sun Microsystems, Inc.
40  */
41
42 #include "namespace.h"
43 #include <rpc/types.h>
44 #include <rpc/xdr.h>
45 #include <rpc/pmap_prot.h>
46 #include <sys/socket.h>
47 #include <stdio.h>
48 #include <unistd.h>
49 #include <net/if.h>
50 #include <sys/ioctl.h>
51 #include <netinet/in.h>
52 #include <arpa/inet.h>
53 #include "un-namespace.h"
54
55 /*
56  * don't use gethostbyname, which would invoke yellow pages
57  *
58  * Avoid loopback interfaces.  We return information from a loopback
59  * interface only if there are no other possible interfaces.
60  */
61 int
62 get_myaddress(struct sockaddr_in *addr)
63 {
64         int s;
65         char buf[BUFSIZ];
66         struct ifconf ifc;
67         struct ifreq ifreq, *ifr, *end;
68         int loopback = 0, gotit = 0;
69
70         if ((s = _socket(AF_INET, SOCK_DGRAM, 0)) < 0) {
71                 return(-1);
72         }
73         ifc.ifc_len = sizeof (buf);
74         ifc.ifc_buf = buf;
75         if (_ioctl(s, SIOCGIFCONF, (char *)&ifc) < 0) {
76                 _close(s);
77                 return(-1);
78         }
79 again:
80         ifr = ifc.ifc_req;
81         end = (struct ifreq *) (ifc.ifc_buf + ifc.ifc_len);
82
83         while (ifr < end) {
84                 memcpy(&ifreq, ifr, sizeof(ifreq));
85                 if (_ioctl(s, SIOCGIFFLAGS, (char *)&ifreq) < 0) {
86                         _close(s);
87                         return(-1);
88                 }
89                 if (((ifreq.ifr_flags & IFF_UP) &&
90                     ifr->ifr_addr.sa_family == AF_INET &&
91                         !(ifreq.ifr_flags & IFF_LOOPBACK) &&
92                         ((struct sockaddr_in *)&ifr->ifr_addr)->sin_addr.s_addr
93                         != 0) ||
94                     (loopback == 1 && (ifreq.ifr_flags & IFF_LOOPBACK)
95                         && (ifr->ifr_addr.sa_family == AF_INET)
96                         && (ifreq.ifr_flags &  IFF_UP))) {
97                         *addr = *((struct sockaddr_in *)&ifr->ifr_addr);
98                         addr->sin_port = htons(PMAPPORT);
99                         gotit = 1;
100                         break;
101                 }
102                 if (ifr->ifr_addr.sa_len)
103                         ifr = (struct ifreq *) ((caddr_t) ifr +
104                               ifr->ifr_addr.sa_len -
105                               sizeof(struct sockaddr));
106                 ifr++;
107         }
108         if (gotit == 0 && loopback == 0) {
109                 loopback = 1;
110                 goto again;
111         }
112         _close(s);
113         return (gotit ? 0 : -1);
114 }