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