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_lock_directory(), 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 }