Libinfo-173.tar.gz
[apple/libinfo.git] / rpc.subproj / get_myaddress.c
1 /*
2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * Copyright (c) 1999-2003 Apple Computer, Inc. All Rights Reserved.
7 *
8 * This file contains Original Code and/or Modifications of Original Code
9 * as defined in and that are subject to the Apple Public Source License
10 * Version 2.0 (the 'License'). You may not use this file except in
11 * compliance with the License. Please obtain a copy of the License at
12 * http://www.opensource.apple.com/apsl/ and read it before using this
13 * file.
14 *
15 * The Original Code and all software distributed under the License are
16 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
17 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
18 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
20 * Please see the License for the specific language governing rights and
21 * limitations under the License.
22 *
23 * @APPLE_LICENSE_HEADER_END@
24 */
25 /*
26 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
27 * unrestricted use provided that this legend is included on all tape
28 * media and as a part of the software program in whole or part. Users
29 * may copy or modify Sun RPC without charge, but are not authorized
30 * to license or distribute it to anyone else except as part of a product or
31 * program developed by the user.
32 *
33 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
34 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
35 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
36 *
37 * Sun RPC is provided with no support and without any obligation on the
38 * part of Sun Microsystems, Inc. to assist in its use, correction,
39 * modification or enhancement.
40 *
41 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
42 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
43 * OR ANY PART THEREOF.
44 *
45 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
46 * or profits or other special, indirect and consequential damages, even if
47 * Sun has been advised of the possibility of such damages.
48 *
49 * Sun Microsystems, Inc.
50 * 2550 Garcia Avenue
51 * Mountain View, California 94043
52 */
53
54 #if defined(LIBC_SCCS) && !defined(lint)
55 /*static char *sccsid = "from: @(#)get_myaddress.c 1.4 87/08/11 Copyr 1984 Sun Micro";*/
56 /*static char *sccsid = "from: @(#)get_myaddress.c 2.1 88/07/29 4.0 RPCSRC";*/
57 static char *rcsid = "$Id: get_myaddress.c,v 1.4 2002/02/19 20:36:23 epeyton Exp $";
58 #endif
59
60 /*
61 * get_myaddress.c
62 *
63 * Get client's IP address via ioctl. This avoids using the yellowpages.
64 * Copyright (C) 1984, Sun Microsystems, Inc.
65 *
66 * Re-worked for 4.4BSD by Marc Majka at Apple.
67 */
68
69 #include <rpc/types.h>
70 #include <rpc/xdr.h>
71 #include <rpc/pmap_prot.h>
72 #include <sys/socket.h>
73 #include <stdio.h>
74 #include <string.h>
75 #include <unistd.h>
76 #include <net/if.h>
77 #include <sys/ioctl.h>
78 #include <netinet/in.h>
79 #include <arpa/inet.h>
80
81 int
82 get_myaddress(struct sockaddr_in *addr)
83 {
84 struct ifconf ifc;
85 struct ifreq *ifr;
86 char buf[BUFSIZ];
87 int offset, x, addrlen, s;
88
89 bzero(addr, sizeof(struct sockaddr_in));
90 addr->sin_family = AF_INET;
91
92 s = socket(AF_INET, SOCK_DGRAM, 0);
93
94 if (s < 0)
95 {
96 addr->sin_addr.s_addr = htonl(INADDR_LOOPBACK);
97 return 0;
98 }
99
100 ifc.ifc_len = sizeof(buf);
101 ifc.ifc_buf = buf;
102
103 if (ioctl(s, SIOCGIFCONF, (char *)&ifc) < 0)
104 {
105 addr->sin_addr.s_addr = htonl(INADDR_LOOPBACK);
106 close(s);
107 return 0;
108 }
109
110 addrlen = sizeof(struct ifreq) - IFNAMSIZ;
111 offset = 0;
112
113 while (offset <= ifc.ifc_len)
114 {
115 ifr = (struct ifreq *)(ifc.ifc_buf + offset);
116 offset += IFNAMSIZ;
117 if (ifr->ifr_addr.sa_len > addrlen) offset += ifr->ifr_addr.sa_len;
118 else offset += addrlen;
119
120 if (ifr->ifr_addr.sa_family != AF_INET) continue;
121 if (ioctl(s, SIOCGIFFLAGS, ifr) < 0) continue;
122
123 x = ((struct sockaddr_in *)&(ifr->ifr_addr))->sin_addr.s_addr;
124 if
125 (
126 (ifr->ifr_flags & IFF_UP) &&
127 (!(ifr->ifr_flags & IFF_LOOPBACK)) &&
128 (x != 0) &&
129 (x != -1)
130 )
131 {
132 addr->sin_addr.s_addr = x;
133 close(s);
134 return 0;
135 }
136 }
137
138 close(s);
139 addr->sin_addr.s_addr = htonl(INADDR_LOOPBACK);
140 return 0;
141 }