Fix the character set handling properly in nmbd. Also fix bug where
[samba.git] / source3 / nmbd / nmbd_synclists.c
1 /* 
2    Unix SMB/CIFS implementation.
3    NBT netbios routines and daemon - version 2
4    Copyright (C) Andrew Tridgell 1994-1998
5    Copyright (C) Luke Kenneth Casson Leighton 1994-1998
6    Copyright (C) Jeremy Allison 1994-1998
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 2 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, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21    
22 */
23
24 /* this file handles asynchronous browse synchronisation requests. The
25    requests are done by forking and putting the result in a file in the
26    locks directory. We do it this way because we don't want nmbd to be
27    blocked waiting for some server to respond on a TCP connection. This
28    also allows us to have more than 1 sync going at once (tridge) */
29
30 #include "includes.h"
31
32 struct sync_record {
33         struct sync_record *next, *prev;
34         fstring workgroup;
35         fstring server;
36         pstring fname;
37         struct in_addr ip;
38         pid_t pid;
39 };
40
41 /* a linked list of current sync connections */
42 static struct sync_record *syncs;
43
44 static XFILE *fp;
45
46 /*******************************************************************
47   This is the NetServerEnum callback.
48   Note sname and comment are in UNIX codepage format.
49   ******************************************************************/
50
51 static void callback(const char *sname, uint32 stype, 
52                      const char *comment, void *state)
53 {
54         x_fprintf(fp,"\"%s\" %08X \"%s\"\n", sname, stype, comment);
55 }
56
57 /*******************************************************************
58   Synchronise browse lists with another browse server.
59   Log in on the remote server's SMB port to their IPC$ service,
60   do a NetServerEnum and record the results in fname
61 ******************************************************************/
62
63 static void sync_child(char *name, int nm_type, 
64                        char *workgroup,
65                        struct in_addr ip, BOOL local, BOOL servers,
66                        char *fname)
67 {
68         extern fstring local_machine;
69         fstring unix_workgroup;
70         static struct cli_state cli;
71         uint32 local_type = local ? SV_TYPE_LOCAL_LIST_ONLY : 0;
72         struct nmb_name called, calling;
73
74         /* W2K DMB's return empty browse lists on port 445. Use 139.
75          * Patch from Andy Levine andyl@epicrealm.com.
76          */
77
78         if (!cli_initialise(&cli) || !cli_set_port(&cli, 139) || !cli_connect(&cli, name, &ip)) {
79                 return;
80         }
81
82         make_nmb_name(&calling, local_machine, 0x0);
83         make_nmb_name(&called , name, nm_type);
84
85         if (!cli_session_request(&cli, &calling, &called)) {
86                 cli_shutdown(&cli);
87                 return;
88         }
89
90         if (!cli_negprot(&cli)) {
91                 cli_shutdown(&cli);
92                 return;
93         }
94
95         if (!cli_session_setup(&cli, "", "", 1, "", 0, workgroup)) {
96                 cli_shutdown(&cli);
97                 return;
98         }
99
100         if (!cli_send_tconX(&cli, "IPC$", "IPC", "", 1)) {
101                 cli_shutdown(&cli);
102                 return;
103         }
104
105         /* All the cli_XX functions take UNIX character set. */
106         fstrcpy(unix_workgroup, cli.server_domain?cli.server_domain:workgroup);
107
108         /* Fetch a workgroup list. */
109         cli_NetServerEnum(&cli, unix_workgroup,
110                           local_type|SV_TYPE_DOMAIN_ENUM, 
111                           callback, NULL);
112         
113         /* Now fetch a server list. */
114         if (servers) {
115                 fstrcpy(unix_workgroup, workgroup);
116                 cli_NetServerEnum(&cli, unix_workgroup, 
117                                   local?SV_TYPE_LOCAL_LIST_ONLY:SV_TYPE_ALL,
118                                   callback, NULL);
119         }
120         
121         cli_shutdown(&cli);
122 }
123
124 /*******************************************************************
125   initialise a browse sync with another browse server.  Log in on the
126   remote server's SMB port to their IPC$ service, do a NetServerEnum
127   and record the results
128 ******************************************************************/
129
130 void sync_browse_lists(struct work_record *work,
131                        char *name, int nm_type, 
132                        struct in_addr ip, BOOL local, BOOL servers)
133 {
134         struct sync_record *s;
135         static int counter;
136
137         START_PROFILE(sync_browse_lists);
138         /* Check we're not trying to sync with ourselves. This can
139            happen if we are a domain *and* a local master browser. */
140         if (ismyip(ip)) {
141 done:
142                 END_PROFILE(sync_browse_lists);
143                 return;
144         }
145
146         s = (struct sync_record *)malloc(sizeof(*s));
147         if (!s) goto done;
148
149         ZERO_STRUCTP(s);
150         
151         fstrcpy(s->workgroup, work->work_group);
152         fstrcpy(s->server, name);
153         s->ip = ip;
154
155         slprintf(s->fname, sizeof(pstring)-1,
156                  "%s/sync.%d", lp_lockdir(), counter++);
157         all_string_sub(s->fname,"//", "/", 0);
158         
159         DLIST_ADD(syncs, s);
160
161         /* the parent forks and returns, leaving the child to do the
162            actual sync and call END_PROFILE*/
163         CatchChild();
164         if ((s->pid = sys_fork())) return;
165
166         BlockSignals( False, SIGTERM );
167
168         DEBUG(2,("Initiating browse sync for %s to %s(%s)\n",
169                  work->work_group, name, inet_ntoa(ip)));
170
171         fp = x_fopen(s->fname,O_WRONLY|O_CREAT|O_TRUNC, 0644);
172         if (!fp) {
173                 END_PROFILE(sync_browse_lists);
174                 _exit(1);       
175         }
176
177         sync_child(name, nm_type, work->work_group, ip, local, servers,
178                    s->fname);
179
180         x_fclose(fp);
181         END_PROFILE(sync_browse_lists);
182         _exit(0);
183 }
184
185 /**********************************************************************
186  Handle one line from a completed sync file.
187  **********************************************************************/
188
189 static void complete_one(struct sync_record *s, 
190                          char *sname, uint32 stype, char *comment)
191 {
192         struct work_record *work;
193         struct server_record *servrec;
194
195         stype &= ~SV_TYPE_LOCAL_LIST_ONLY;
196
197         if (stype & SV_TYPE_DOMAIN_ENUM) {
198                 /* See if we can find the workgroup on this subnet. */
199                 if((work=find_workgroup_on_subnet(unicast_subnet, sname))) {
200                         /* We already know about this workgroup -
201                            update the ttl. */
202                         update_workgroup_ttl(work,lp_max_ttl());
203                 } else {
204                         /* Create the workgroup on the subnet. */
205                         work = create_workgroup_on_subnet(unicast_subnet, 
206                                                           sname, lp_max_ttl());
207                         if (work) {
208                                 /* remember who the master is */
209                                 fstrcpy(work->local_master_browser_name, 
210                                         comment);
211                         }
212                 }
213                 return;
214         } 
215
216         work = find_workgroup_on_subnet(unicast_subnet, s->workgroup);
217         if (!work) {
218                 DEBUG(3,("workgroup %s doesn't exist on unicast subnet?\n",
219                          s->workgroup));
220                 return;
221         }
222
223         if ((servrec = find_server_in_workgroup( work, sname))) {
224                 /* Check that this is not a locally known
225                    server - if so ignore the entry. */
226                 if(!(servrec->serv.type & SV_TYPE_LOCAL_LIST_ONLY)) {
227                         /* We already know about this server - update
228                            the ttl. */
229                         update_server_ttl(servrec, lp_max_ttl());
230                         /* Update the type. */
231                         servrec->serv.type = stype;
232                 }
233                 return;
234         } 
235
236         /* Create the server in the workgroup. */ 
237         create_server_on_workgroup(work, sname,stype, lp_max_ttl(), comment);
238 }
239                 
240 /**********************************************************************
241  Read the completed sync info.
242 **********************************************************************/
243
244 static void complete_sync(struct sync_record *s)
245 {
246         XFILE *f;
247         fstring server, type_str;
248         unsigned type;
249         pstring comment;
250         pstring line;
251         const char *ptr;
252         int count=0;
253
254         f = x_fopen(s->fname,O_RDONLY, 0);
255
256         if (!f)
257                 return;
258         
259         while (!x_feof(f)) {
260                 
261                 if (!fgets_slash(line,sizeof(pstring),f))
262                         continue;
263                 
264                 ptr = line;
265
266                 if (!next_token(&ptr,server,NULL,sizeof(server)) ||
267                     !next_token(&ptr,type_str,NULL, sizeof(type_str)) ||
268                     !next_token(&ptr,comment,NULL, sizeof(comment))) {
269                         continue;
270                 }
271
272                 sscanf(type_str, "%X", &type);
273
274                 complete_one(s, server, type, comment);
275
276                 count++;
277         }
278
279         x_fclose(f);
280
281         unlink(s->fname);
282
283         DEBUG(2,("sync with %s(%s) for workgroup %s completed (%d records)\n",
284                  s->server, inet_ntoa(s->ip), s->workgroup, count));
285 }
286
287 /**********************************************************************
288  Check for completion of any of the child processes.
289 **********************************************************************/
290
291 void sync_check_completion(void)
292 {
293         struct sync_record *s, *next;
294
295         for (s=syncs;s;s=next) {
296                 next = s->next;
297                 if (!process_exists(s->pid)) {
298                         /* it has completed - grab the info */
299                         complete_sync(s);
300                         DLIST_REMOVE(syncs, s);
301                         ZERO_STRUCTP(s);
302                         SAFE_FREE(s);
303                 }
304         }
305 }