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