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