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