This looks like a big change but really isn't.
[nivanova/samba-autobuild/.git] / source / nmbd / nmbd_subnetdb.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 1.9.
4    NBT netbios routines and daemon - version 2
5    Copyright (C) Andrew Tridgell 1994-1998
6    Copyright (C) Luke Kenneth Casson Leighton 1994-1998
7    Copyright (C) Jeremy Allison 1994-1998
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22    
23    Revision History:
24
25 */
26
27 #include "includes.h"
28 #include "smb.h"
29
30 extern int ClientNMB;
31 extern int ClientDGRAM;
32 extern int global_nmb_port;
33
34 extern int DEBUGLEVEL;
35
36 extern fstring myworkgroup;
37 extern char **my_netbios_names;
38 extern struct in_addr ipzero;
39
40 /* This is the broadcast subnets database. */
41 struct subnet_record *subnetlist = NULL;
42
43 /* Extra subnets - keep these separate so enumeration code doesn't
44    run onto it by mistake. */
45
46 struct subnet_record *unicast_subnet = NULL;
47 struct subnet_record *remote_broadcast_subnet = NULL;
48 struct subnet_record *wins_server_subnet = NULL;
49
50 extern uint16 samba_nb_type; /* Samba's NetBIOS name type. */
51
52 /****************************************************************************
53   Add a subnet into the list.
54   **************************************************************************/
55
56 static void add_subnet(struct subnet_record *subrec)
57 {
58   struct subnet_record *subrec2;
59
60   if (!subnetlist)
61   {
62     subnetlist = subrec;
63     subrec->prev = NULL;
64     subrec->next = NULL;
65     return;
66   }
67
68   for (subrec2 = subnetlist; subrec2->next; subrec2 = subrec2->next)
69     ;
70
71   subrec2->next = subrec;
72   subrec->next = NULL;
73   subrec->prev = subrec2;
74 }
75
76 /****************************************************************************
77   Create a subnet entry.
78   ****************************************************************************/
79
80 static struct subnet_record *make_subnet(char *name, enum subnet_type type,
81                                          struct in_addr myip, struct in_addr bcast_ip, 
82                                          struct in_addr mask_ip)
83 {
84   struct subnet_record *subrec = NULL;
85   int nmb_sock, dgram_sock;
86
87   /* Check if we are creating a non broadcast subnet - if so don't create
88      sockets.
89    */
90
91   if(type != NORMAL_SUBNET)
92   {
93     nmb_sock = -1;
94     dgram_sock = -1;
95   }
96   else
97   {
98     /*
99      * Attempt to open the sockets on port 137/138 for this interface
100      * and bind them.
101      * Fail the subnet creation if this fails.
102      */
103
104     if((nmb_sock = open_socket_in(SOCK_DGRAM, global_nmb_port,0, myip.s_addr)) == -1)
105     {
106       DEBUG(0,("make_subnet: Failed to open nmb socket on interface %s \
107 for port %d. Error was %s\n", inet_ntoa(myip), global_nmb_port, strerror(errno)));
108       return NULL;
109     }
110
111     if((dgram_sock = open_socket_in(SOCK_DGRAM,DGRAM_PORT,3, myip.s_addr)) == -1)
112     {
113       DEBUG(0,("make_subnet: Failed to open dgram socket on interface %s \
114 for port %d. Error was %s\n", inet_ntoa(myip), DGRAM_PORT, strerror(errno)));
115       return NULL;
116     }
117
118     /* Make sure we can broadcast from these sockets. */
119     set_socket_options(nmb_sock,"SO_BROADCAST");
120     set_socket_options(dgram_sock,"SO_BROADCAST");
121
122   }
123
124   subrec = (struct subnet_record *)malloc(sizeof(*subrec));
125   
126   if (!subrec) 
127   {
128     DEBUG(0,("make_subnet: malloc fail !\n"));
129     close(nmb_sock);
130     close(dgram_sock);
131     return(NULL);
132   }
133   
134   bzero((char *)subrec,sizeof(*subrec));
135   
136   if((subrec->subnet_name = strdup(name)) == NULL)
137   {
138     DEBUG(0,("make_subnet: malloc fail for subnet name !\n"));
139     close(nmb_sock);
140     close(dgram_sock);
141     free((char *)subrec);
142     return(NULL);
143   }
144
145   DEBUG(2, ("making subnet name:%s ", name ));
146   DEBUG(2, ("Broadcast address:%s ", inet_ntoa(bcast_ip)));
147   DEBUG(2, ("Subnet mask:%s\n", inet_ntoa(mask_ip)));
148  
149   subrec->namelist_changed = False;
150   subrec->work_changed = False;
151  
152   subrec->bcast_ip = bcast_ip;
153   subrec->mask_ip  = mask_ip;
154   subrec->myip = myip;
155   subrec->type = type;
156   subrec->nmb_sock = nmb_sock;
157   subrec->dgram_sock = dgram_sock;
158   
159   return subrec;
160 }
161
162 /****************************************************************************
163   Create subnet entries.
164 **************************************************************************/
165
166 BOOL create_subnets(void)
167 {    
168   int num_interfaces = iface_count();
169   int i;
170   struct in_addr unicast_ip;
171
172   if(num_interfaces == 0)
173   {
174     DEBUG(0,("create_subnets: No local interfaces !\n"));
175     return False;
176   }
177
178   /* 
179    * Create subnets from all the local interfaces and thread them onto
180    * the linked list. 
181    */
182
183   for (i = 0 ; i < num_interfaces; i++)
184   {
185     struct subnet_record *subrec;
186     struct interface *iface = get_interface(i);
187
188     if((subrec = make_subnet(inet_ntoa(iface->ip), NORMAL_SUBNET,
189                  iface->ip, iface->bcast,iface->nmask)) == NULL)
190       return False;
191     add_subnet(subrec);
192   }
193
194   /* 
195    * If we have been configured to use a WINS server, then try and
196    * get the ip address of it here. If we are the WINS server then
197    * set the unicast subnet address to be the first of our own real
198    * addresses.
199    */
200
201   if(*lp_wins_server())
202   {
203     struct in_addr real_wins_ip;
204     real_wins_ip = *interpret_addr2(lp_wins_server());
205
206     if (!zero_ip(real_wins_ip))
207     {
208       unicast_ip = real_wins_ip;
209     }
210     else
211     {
212       /* The smb.conf's wins server parameter MUST be a host_name
213          or an ip_address. */
214       DEBUG(0,("invalid smb.conf parameter 'wins server'\n"));
215       return False;
216     }
217   } 
218   else if(lp_we_are_a_wins_server())
219   {
220     /* Pick the first interface ip address as the WINS server ip. */
221     unicast_ip = *iface_n_ip(0);
222   }
223   else
224   {
225     /* We should not be using a WINS server at all. Set the
226       ip address of the subnet to be zero. */
227     unicast_ip = ipzero;
228   }
229
230   /*
231    * Create the unicast and remote broadcast subnets.
232    * Don't put these onto the linked list.
233    * The ip address of the unicast subnet is set to be
234    * the WINS server address, if it exists, or ipzero if not.
235    */
236
237   unicast_subnet = make_subnet( "UNICAST_SUBNET", UNICAST_SUBNET, 
238                                  unicast_ip, unicast_ip, unicast_ip);
239
240   remote_broadcast_subnet = make_subnet( "REMOTE_BROADCAST_SUBNET",
241                                          REMOTE_BROADCAST_SUBNET,
242                                          ipzero, ipzero, ipzero);
243
244   if((unicast_subnet == NULL) || (remote_broadcast_subnet == NULL))
245     return False;
246
247   /* 
248    * If we are WINS server, create the WINS_SERVER_SUBNET - don't put on
249    * the linked list.
250    */
251
252   if (lp_we_are_a_wins_server())
253   {
254     if((wins_server_subnet = make_subnet("WINS_SERVER_SUBNET",
255                                        WINS_SERVER_SUBNET, 
256                                        ipzero, ipzero, ipzero)) == NULL)
257       return False;
258   }
259
260   return True;
261 }
262
263 /*******************************************************************
264 Function to tell us if we can use the unicast subnet.
265 ******************************************************************/
266
267 BOOL we_are_a_wins_client(void)
268 {
269   static int cache_we_are_a_wins_client = -1;
270
271   if(cache_we_are_a_wins_client == -1)
272     cache_we_are_a_wins_client = (ip_equal(ipzero, unicast_subnet->myip) ? 
273                                   False : True);
274
275   return cache_we_are_a_wins_client;
276 }
277
278 /*******************************************************************
279 Access function used by NEXT_SUBNET_INCLUDING_UNICAST
280 ******************************************************************/
281
282 struct subnet_record *get_next_subnet_maybe_unicast(struct subnet_record *subrec)
283 {
284   if(subrec == unicast_subnet)
285     return NULL;
286   else if((subrec->next == NULL) && we_are_a_wins_client())
287     return unicast_subnet;
288   else
289     return subrec->next;
290 }
291
292 /*******************************************************************
293  Access function used by retransmit_or_expire_response_records() in
294  nmbd_packets.c. Patch from Andrey Alekseyev <fetch@muffin.arcadia.spb.ru>
295  Needed when we need to enumerate all the broadcast, unicast and
296  WINS subnets.
297 ******************************************************************/
298
299 struct subnet_record *get_next_subnet_maybe_unicast_or_wins_server(struct subnet_record *subrec)
300 {
301   if(subrec == unicast_subnet)
302   {
303     if(wins_server_subnet)
304       return wins_server_subnet;
305     else
306       return NULL;
307   }
308
309   if(wins_server_subnet && subrec == wins_server_subnet)
310     return NULL;
311
312   if((subrec->next == NULL) && we_are_a_wins_client())
313     return unicast_subnet;
314   else
315     return subrec->next;
316 }