build: commit all the waf build files in the tree
[nivanova/samba-autobuild/.git] / source4 / 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/util_net.h"
26 #include "../lib/util/dlinklist.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_v4(ip)) return interfaces;
53
54         for (i=interfaces;i;i=i->next)
55                 if (CheckMask) {
56                         if (same_net_v4(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(TALLOC_CTX *mem_ctx, 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 ? mem_ctx : *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(TALLOC_CTX *mem_ctx, 
114                                 const char *token, 
115                                 struct iface_struct *probed_ifaces, 
116                                 int total_probed,
117                                 struct interface **local_interfaces)
118 {
119         struct in_addr ip, nmask;
120         char *p;
121         char *address;
122         int i, added=0;
123
124         ip.s_addr = 0;
125         nmask.s_addr = 0;
126         
127         /* first check if it is an interface name */
128         for (i=0;i<total_probed;i++) {
129                 if (gen_fnmatch(token, probed_ifaces[i].name) == 0) {
130                         add_interface(mem_ctx, probed_ifaces[i].ip,
131                                       probed_ifaces[i].netmask,
132                                       local_interfaces);
133                         added = 1;
134                 }
135         }
136         if (added) return;
137
138         /* maybe it is a DNS name */
139         p = strchr_m(token,'/');
140         if (!p) {
141                 /* don't try to do dns lookups on wildcard names */
142                 if (strpbrk(token, "*?") != NULL) {
143                         return;
144                 }
145                 ip.s_addr = interpret_addr2(token).s_addr;
146                 for (i=0;i<total_probed;i++) {
147                         if (ip.s_addr == probed_ifaces[i].ip.s_addr) {
148                                 add_interface(mem_ctx, probed_ifaces[i].ip,
149                                               probed_ifaces[i].netmask,
150                                               local_interfaces);
151                                 return;
152                         }
153                 }
154                 DEBUG(2,("can't determine netmask for %s\n", token));
155                 return;
156         }
157
158         address = talloc_strdup(mem_ctx, token);
159         p = strchr_m(address,'/');
160
161         /* parse it into an IP address/netmasklength pair */
162         *p++ = 0;
163
164         ip.s_addr = interpret_addr2(address).s_addr;
165
166         if (strlen(p) > 2) {
167                 nmask.s_addr = interpret_addr2(p).s_addr;
168         } else {
169                 nmask.s_addr = htonl(((ALLONES >> atoi(p)) ^ ALLONES));
170         }
171
172         /* maybe the first component was a broadcast address */
173         if (ip.s_addr == MKBCADDR(ip.s_addr, nmask.s_addr) ||
174             ip.s_addr == MKNETADDR(ip.s_addr, nmask.s_addr)) {
175                 for (i=0;i<total_probed;i++) {
176                         if (same_net_v4(ip, probed_ifaces[i].ip, nmask)) {
177                                 add_interface(mem_ctx, probed_ifaces[i].ip, nmask,
178                                               local_interfaces);
179                                 talloc_free(address);
180                                 return;
181                         }
182                 }
183                 DEBUG(2,("Can't determine ip for broadcast address %s\n", address));
184                 talloc_free(address);
185                 return;
186         }
187
188         add_interface(mem_ctx, ip, nmask, local_interfaces);
189         talloc_free(address);
190 }
191
192
193 /**
194 load the list of network interfaces
195 **/
196 void load_interfaces(TALLOC_CTX *mem_ctx, const char **interfaces, struct interface **local_interfaces)
197 {
198         const char **ptr = interfaces;
199         int i;
200         struct iface_struct ifaces[MAX_INTERFACES];
201         struct in_addr loopback_ip;
202         int total_probed;
203
204         *local_interfaces = NULL;
205
206         loopback_ip = interpret_addr2("127.0.0.1");
207
208         /* probe the kernel for interfaces */
209         total_probed = get_interfaces(ifaces, MAX_INTERFACES);
210
211         /* if we don't have a interfaces line then use all interfaces
212            except loopback */
213         if (!ptr || !*ptr || !**ptr) {
214                 if (total_probed <= 0) {
215                         DEBUG(0,("ERROR: Could not determine network interfaces, you must use a interfaces config line\n"));
216                 }
217                 for (i=0;i<total_probed;i++) {
218                         if (ifaces[i].ip.s_addr != loopback_ip.s_addr) {
219                                 add_interface(mem_ctx, ifaces[i].ip, 
220                                               ifaces[i].netmask, local_interfaces);
221                         }
222                 }
223         }
224
225         while (ptr && *ptr) {
226                 interpret_interface(mem_ctx, *ptr, ifaces, total_probed, local_interfaces);
227                 ptr++;
228         }
229
230         if (!*local_interfaces) {
231                 DEBUG(0,("WARNING: no network interfaces found\n"));
232         }
233 }
234
235 /**
236   how many interfaces do we have
237   **/
238 int iface_count(struct interface *ifaces)
239 {
240         int ret = 0;
241         struct interface *i;
242
243         for (i=ifaces;i;i=i->next)
244                 ret++;
245         return ret;
246 }
247
248 /**
249   return IP of the Nth interface
250   **/
251 const char *iface_n_ip(struct interface *ifaces, int n)
252 {
253         struct interface *i;
254   
255         for (i=ifaces;i && n;i=i->next)
256                 n--;
257
258         if (i) {
259                 return i->ip_s;
260         }
261         return NULL;
262 }
263
264 /**
265   return bcast of the Nth interface
266   **/
267 const char *iface_n_bcast(struct interface *ifaces, int n)
268 {
269         struct interface *i;
270   
271         for (i=ifaces;i && n;i=i->next)
272                 n--;
273
274         if (i) {
275                 return i->bcast_s;
276         }
277         return NULL;
278 }
279
280 /**
281   return netmask of the Nth interface
282   **/
283 const char *iface_n_netmask(struct interface *ifaces, int n)
284 {
285         struct interface *i;
286   
287         for (i=ifaces;i && n;i=i->next)
288                 n--;
289
290         if (i) {
291                 return i->nmask_s;
292         }
293         return NULL;
294 }
295
296 /**
297   return the local IP address that best matches a destination IP, or
298   our first interface if none match
299 */
300 const char *iface_best_ip(struct interface *ifaces, const char *dest)
301 {
302         struct interface *iface;
303         struct in_addr ip;
304
305         ip.s_addr = interpret_addr(dest);
306         iface = iface_find(ifaces, ip, true);
307         if (iface) {
308                 return iface->ip_s;
309         }
310         return iface_n_ip(ifaces, 0);
311 }
312
313 /**
314   return true if an IP is one one of our local networks
315 */
316 bool iface_is_local(struct interface *ifaces, const char *dest)
317 {
318         struct in_addr ip;
319
320         ip.s_addr = interpret_addr(dest);
321         if (iface_find(ifaces, ip, true)) {
322                 return true;
323         }
324         return false;
325 }
326
327 /**
328   return true if a IP matches a IP/netmask pair
329 */
330 bool iface_same_net(const char *ip1, const char *ip2, const char *netmask)
331 {
332         return same_net_v4(interpret_addr2(ip1),
333                         interpret_addr2(ip2),
334                         interpret_addr2(netmask));
335 }