d21923d972b490d91b0263306521ca03d70a2ce4
[jelmer/samba4-debian.git] / source / lib / socket / interface.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    multiple interface handling
5
6    Copyright (C) Andrew Tridgell 1992-2005
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include "includes.h"
23 #include "system/network.h"
24 #include "lib/socket/netif.h"
25 #include "lib/util/dlinklist.h"
26 #include "param/param.h"
27
28 /** used for network interfaces */
29 struct interface {
30         struct interface *next, *prev;
31         struct in_addr ip;
32         struct in_addr nmask;
33         const char *ip_s;
34         const char *bcast_s;
35         const char *nmask_s;
36 };
37
38 #define ALLONES  ((uint32_t)0xFFFFFFFF)
39 /*
40   address construction based on a patch from fred@datalync.com
41 */
42 #define MKBCADDR(_IP, _NM) ((_IP & _NM) | (_NM ^ ALLONES))
43 #define MKNETADDR(_IP, _NM) (_IP & _NM)
44
45 /****************************************************************************
46 Try and find an interface that matches an ip. If we cannot, return NULL
47   **************************************************************************/
48 static struct interface *iface_find(struct interface *interfaces, 
49                                     struct in_addr ip, bool CheckMask)
50 {
51         struct interface *i;
52         if (is_zero_ip(ip)) return interfaces;
53
54         for (i=interfaces;i;i=i->next)
55                 if (CheckMask) {
56                         if (same_net(i->ip,ip,i->nmask)) return i;
57                 } else if (i->ip.s_addr == ip.s_addr) return i;
58
59         return NULL;
60 }
61
62
63 /****************************************************************************
64 add an interface to the linked list of interfaces
65 ****************************************************************************/
66 static void add_interface(struct in_addr ip, struct in_addr nmask, struct interface **interfaces)
67 {
68         struct interface *iface;
69         struct in_addr bcast;
70
71         if (iface_find(*interfaces, ip, false)) {
72                 DEBUG(3,("not adding duplicate interface %s\n",inet_ntoa(ip)));
73                 return;
74         }
75
76         iface = talloc(*interfaces == NULL ? talloc_autofree_context() : *interfaces, struct interface);
77         if (iface == NULL) 
78                 return;
79         
80         ZERO_STRUCTPN(iface);
81
82         iface->ip = ip;
83         iface->nmask = nmask;
84         bcast.s_addr = MKBCADDR(iface->ip.s_addr, iface->nmask.s_addr);
85
86         /* keep string versions too, to avoid people tripping over the implied
87            static in inet_ntoa() */
88         iface->ip_s = talloc_strdup(iface, inet_ntoa(iface->ip));
89         iface->nmask_s = talloc_strdup(iface, inet_ntoa(iface->nmask));
90         
91         if (nmask.s_addr != ~0) {
92                 iface->bcast_s = talloc_strdup(iface, inet_ntoa(bcast));
93         }
94
95         DLIST_ADD_END(*interfaces, iface, struct interface *);
96
97         DEBUG(2,("added interface ip=%s nmask=%s\n", iface->ip_s, iface->nmask_s));
98 }
99
100
101
102 /**
103 interpret a single element from a interfaces= config line 
104
105 This handles the following different forms:
106
107 1) wildcard interface name
108 2) DNS name
109 3) IP/masklen
110 4) ip/mask
111 5) bcast/mask
112 **/
113 static void interpret_interface(const char *token, 
114                                 struct iface_struct *probed_ifaces, 
115                                 int total_probed,
116                                 struct interface **local_interfaces)
117 {
118         struct in_addr ip, nmask;
119         char *p;
120         int i, added=0;
121
122         ip.s_addr = 0;
123         nmask.s_addr = 0;
124         
125         /* first check if it is an interface name */
126         for (i=0;i<total_probed;i++) {
127                 if (gen_fnmatch(token, probed_ifaces[i].name) == 0) {
128                         add_interface(probed_ifaces[i].ip,
129                                       probed_ifaces[i].netmask,
130                                       local_interfaces);
131                         added = 1;
132                 }
133         }
134         if (added) return;
135
136         /* maybe it is a DNS name */
137         p = strchr_m(token,'/');
138         if (!p) {
139                 /* don't try to do dns lookups on wildcard names */
140                 if (strpbrk(token, "*?") != NULL) {
141                         return;
142                 }
143                 ip.s_addr = interpret_addr2(token).s_addr;
144                 for (i=0;i<total_probed;i++) {
145                         if (ip.s_addr == probed_ifaces[i].ip.s_addr) {
146                                 add_interface(probed_ifaces[i].ip,
147                                               probed_ifaces[i].netmask,
148                                               local_interfaces);
149                                 return;
150                         }
151                 }
152                 DEBUG(2,("can't determine netmask for %s\n", token));
153                 return;
154         }
155
156         /* parse it into an IP address/netmasklength pair */
157         *p++ = 0;
158
159         ip.s_addr = interpret_addr2(token).s_addr;
160
161         if (strlen(p) > 2) {
162                 nmask.s_addr = interpret_addr2(p).s_addr;
163         } else {
164                 nmask.s_addr = htonl(((ALLONES >> atoi(p)) ^ ALLONES));
165         }
166
167         /* maybe the first component was a broadcast address */
168         if (ip.s_addr == MKBCADDR(ip.s_addr, nmask.s_addr) ||
169             ip.s_addr == MKNETADDR(ip.s_addr, nmask.s_addr)) {
170                 for (i=0;i<total_probed;i++) {
171                         if (same_net(ip, probed_ifaces[i].ip, nmask)) {
172                                 add_interface(probed_ifaces[i].ip, nmask,
173                                               local_interfaces);
174                                 return;
175                         }
176                 }
177                 DEBUG(2,("Can't determine ip for broadcast address %s\n", token));
178                 return;
179         }
180
181         add_interface(ip, nmask, local_interfaces);
182 }
183
184
185 /**
186 load the list of network interfaces
187 **/
188 void load_interfaces(const char **interfaces, struct interface **local_interfaces)
189 {
190         const char **ptr = interfaces;
191         int i;
192         struct iface_struct ifaces[MAX_INTERFACES];
193         struct in_addr loopback_ip;
194         int total_probed;
195
196         *local_interfaces = NULL;
197
198         loopback_ip = interpret_addr2("127.0.0.1");
199
200         /* probe the kernel for interfaces */
201         total_probed = get_interfaces(ifaces, MAX_INTERFACES);
202
203         /* if we don't have a interfaces line then use all interfaces
204            except loopback */
205         if (!ptr || !*ptr || !**ptr) {
206                 if (total_probed <= 0) {
207                         DEBUG(0,("ERROR: Could not determine network interfaces, you must use a interfaces config line\n"));
208                 }
209                 for (i=0;i<total_probed;i++) {
210                         if (ifaces[i].ip.s_addr != loopback_ip.s_addr) {
211                                 add_interface(ifaces[i].ip, 
212                                               ifaces[i].netmask, local_interfaces);
213                         }
214                 }
215         }
216
217         while (ptr && *ptr) {
218                 interpret_interface(*ptr, ifaces, total_probed, local_interfaces);
219                 ptr++;
220         }
221
222         if (!*local_interfaces) {
223                 DEBUG(0,("WARNING: no network interfaces found\n"));
224         }
225 }
226
227 /**
228   how many interfaces do we have
229   **/
230 int iface_count(struct interface *ifaces)
231 {
232         int ret = 0;
233         struct interface *i;
234
235         for (i=ifaces;i;i=i->next)
236                 ret++;
237         return ret;
238 }
239
240 /**
241   return IP of the Nth interface
242   **/
243 const char *iface_n_ip(struct interface *ifaces, int n)
244 {
245         struct interface *i;
246   
247         for (i=ifaces;i && n;i=i->next)
248                 n--;
249
250         if (i) {
251                 return i->ip_s;
252         }
253         return NULL;
254 }
255
256 /**
257   return bcast of the Nth interface
258   **/
259 const char *iface_n_bcast(struct interface *ifaces, int n)
260 {
261         struct interface *i;
262   
263         for (i=ifaces;i && n;i=i->next)
264                 n--;
265
266         if (i) {
267                 return i->bcast_s;
268         }
269         return NULL;
270 }
271
272 /**
273   return netmask of the Nth interface
274   **/
275 const char *iface_n_netmask(struct interface *ifaces, int n)
276 {
277         struct interface *i;
278   
279         for (i=ifaces;i && n;i=i->next)
280                 n--;
281
282         if (i) {
283                 return i->nmask_s;
284         }
285         return NULL;
286 }
287
288 /**
289   return the local IP address that best matches a destination IP, or
290   our first interface if none match
291 */
292 const char *iface_best_ip(struct interface *ifaces, const char *dest)
293 {
294         struct interface *iface;
295         struct in_addr ip;
296
297         ip.s_addr = interpret_addr(dest);
298         iface = iface_find(ifaces, ip, true);
299         if (iface) {
300                 return iface->ip_s;
301         }
302         return iface_n_ip(ifaces, 0);
303 }
304
305 /**
306   return true if an IP is one one of our local networks
307 */
308 bool iface_is_local(struct interface *ifaces, const char *dest)
309 {
310         struct in_addr ip;
311
312         ip.s_addr = interpret_addr(dest);
313         if (iface_find(ifaces, ip, true)) {
314                 return true;
315         }
316         return false;
317 }
318
319 /**
320   return true if a IP matches a IP/netmask pair
321 */
322 bool iface_same_net(const char *ip1, const char *ip2, const char *netmask)
323 {
324         return same_net(interpret_addr2(ip1),
325                         interpret_addr2(ip2),
326                         interpret_addr2(netmask));
327 }