Whitespace tidying.
[ppp.git] / pppd / plugins / radius / radiusclient / lib / ip_util.c
1 /*
2  * $Id: ip_util.c,v 1.2 2002/02/27 15:51:20 dfs Exp $
3  *
4  * Copyright (C) 1995,1996,1997 Lars Fenneberg
5  *
6  * Copyright 1992 Livingston Enterprises, Inc.
7  *
8  * Copyright 1992,1993, 1994,1995 The Regents of the University of Michigan
9  * and Merit Network, Inc. All Rights Reserved
10  *
11  * See the file COPYRIGHT for the respective terms and conditions.
12  * If the file is missing contact me at lf@elemental.net
13  * and I'll send you a copy.
14  *
15  */
16
17 #include <config.h>
18 #include <includes.h>
19 #include <radiusclient.h>
20
21 /*
22  * Function: rc_get_ipaddr
23  *
24  * Purpose: return an IP address in host long notation from a host
25  *          name or address in dot notation.
26  *
27  * Returns: 0 on failure
28  */
29
30 UINT4 rc_get_ipaddr (char *host)
31 {
32         struct hostent *hp;
33
34         if (rc_good_ipaddr (host) == 0)
35         {
36                 return ntohl(inet_addr (host));
37         }
38         else if ((hp = gethostbyname (host)) == (struct hostent *) NULL)
39         {
40                 rc_log(LOG_ERR,"rc_get_ipaddr: couldn't resolve hostname: %s", host);
41                 return ((UINT4) 0);
42         }
43         return ntohl((*(UINT4 *) hp->h_addr));
44 }
45
46 /*
47  * Function: rc_good_ipaddr
48  *
49  * Purpose: check for valid IP address in standard dot notation.
50  *
51  * Returns: 0 on success, -1 when failure
52  *
53  */
54
55 int rc_good_ipaddr (char *addr)
56 {
57         int             dot_count;
58         int             digit_count;
59
60         if (addr == NULL)
61                 return (-1);
62
63         dot_count = 0;
64         digit_count = 0;
65         while (*addr != '\0' && *addr != ' ')
66         {
67                 if (*addr == '.')
68                 {
69                         dot_count++;
70                         digit_count = 0;
71                 }
72                 else if (!isdigit (*addr))
73                 {
74                         dot_count = 5;
75                 }
76                 else
77                 {
78                         digit_count++;
79                         if (digit_count > 3)
80                         {
81                                 dot_count = 5;
82                         }
83                 }
84                 addr++;
85         }
86         if (dot_count != 3)
87         {
88                 return (-1);
89         }
90         else
91         {
92                 return (0);
93         }
94 }
95
96 /*
97  * Function: rc_ip_hostname
98  *
99  * Purpose: Return a printable host name (or IP address in dot notation)
100  *          for the supplied IP address.
101  *
102  */
103
104 const char *rc_ip_hostname (UINT4 h_ipaddr)
105 {
106         struct hostent  *hp;
107         UINT4           n_ipaddr = htonl (h_ipaddr);
108
109         if ((hp = gethostbyaddr ((char *) &n_ipaddr, sizeof (struct in_addr),
110                             AF_INET)) == NULL) {
111                 rc_log(LOG_ERR,"rc_ip_hostname: couldn't look up host by addr: %08lX", h_ipaddr);
112         }
113
114         return ((hp==NULL)?"unknown":hp->h_name);
115 }
116
117 /*
118  * Function: rc_getport
119  *
120  * Purpose: get the port number for the supplied request type
121  *
122  */
123
124 unsigned short rc_getport(int type)
125 {
126         struct servent *svp;
127
128         if ((svp = getservbyname ((type==AUTH)?"radius":"radacct", "udp")) == NULL)
129         {
130                 return ((type==AUTH)?PW_AUTH_UDP_PORT:PW_ACCT_UDP_PORT);
131         } else {
132                 return ntohs ((unsigned short) svp->s_port);
133         }
134 }
135
136 /*
137  * Function: rc_own_hostname
138  *
139  * Purpose: get the hostname of this machine
140  *
141  * Returns  -1 on failure, 0 on success
142  *
143  */
144
145 int
146 rc_own_hostname(char *hostname, int len)
147 {
148 #ifdef HAVE_UNAME
149         struct  utsname uts;
150 #endif
151
152 #if defined(HAVE_UNAME)
153         if (uname(&uts) < 0)
154         {
155                 rc_log(LOG_ERR,"rc_own_hostname: couldn't get own hostname");
156                 return -1;
157         }
158         strncpy(hostname, uts.nodename, len);
159 #elif defined(HAVE_GETHOSTNAME)
160         if (gethostname(hostname, len) < 0)
161         {
162                 rc_log(LOG_ERR,"rc_own_hostname: couldn't get own hostname");
163                 return -1;
164         }
165 #elif defined(HAVE_SYSINFO)
166         if (sysinfo(SI_HOSTNAME, hostname, len) < 0)
167         {
168                 rc_log(LOG_ERR,"rc_own_hostname: couldn't get own hostname");
169                 return -1;
170         }
171 #else
172         return -1;
173 #endif
174
175         return 0;
176 }
177
178 /*
179  * Function: rc_own_ipaddress
180  *
181  * Purpose: get the IP address of this host in host order
182  *
183  * Returns: IP address on success, 0 on failure
184  *
185  */
186
187 UINT4 rc_own_ipaddress(void)
188 {
189         static UINT4 this_host_ipaddr = 0;
190         char hostname[256];
191
192         if (!this_host_ipaddr) {
193                 if (rc_own_hostname(hostname, sizeof(hostname)) < 0)
194                         return 0;
195                 if ((this_host_ipaddr = rc_get_ipaddr (hostname)) == 0) {
196                         rc_log(LOG_ERR, "rc_own_ipaddress: couldn't get own IP address");
197                         return 0;
198                 }
199         }
200
201         return this_host_ipaddr;
202 }