release/src/router/samba/source/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 FILE *fp;
  49
  50 /*******************************************************************
  51   This is the NetServerEnum callback.
  52   ******************************************************************/
  53 static void callback(const char *sname, uint32 stype, const char *comment)
  54 {
  55         fprintf(fp,"\"%s\" %08X \"%s\"\n", sname, stype, comment);
  56 }
  57
  58
  59 /*******************************************************************
  60   Synchronise browse lists with another browse server.
  61   Log in on the remote server's SMB port to their IPC$ service,
  62   do a NetServerEnum and record the results in fname
  63 ******************************************************************/
  64 static void sync_child(char *name, int nm_type,
  65                        char *workgroup,
  66                        struct in_addr ip, BOOL local, BOOL servers,
  67                        char *fname)
  68 {
  69         extern fstring local_machine;
  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         if (!cli_initialise(&cli) || !cli_connect(&cli, name, &ip)) {
  75                 fclose(fp);
  76                 return;
  77         }
  78
  79         make_nmb_name(&calling, local_machine, 0x0);
  80         make_nmb_name(&called , name, nm_type);
  81
  82         if (!cli_session_request(&cli, &calling, &called))
  83         {
  84                 cli_shutdown(&cli);
  85                 fclose(fp);
  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         /* Fetch a workgroup list. */
 105         cli_NetServerEnum(&cli, cli.server_domain?cli.server_domain:workgroup,
 106                           local_type|SV_TYPE_DOMAIN_ENUM,
 107                           callback);
 108
 109         /* Now fetch a server list. */
 110         if (servers) {
 111                 cli_NetServerEnum(&cli, workgroup,
 112                                   local?SV_TYPE_LOCAL_LIST_ONLY:SV_TYPE_ALL,
 113                                   callback);
 114         }
 115
 116         cli_shutdown(&cli);
 117 }
 118
 119
 120 /*******************************************************************
 121   initialise a browse sync with another browse server.  Log in on the
 122   remote server's SMB port to their IPC$ service, do a NetServerEnum
 123   and record the results
 124 ******************************************************************/
 125 void sync_browse_lists(struct work_record *work,
 126                        char *name, int nm_type,
 127                        struct in_addr ip, BOOL local, BOOL servers)
 128 {
 129         struct sync_record *s;
 130         static int counter;
 131
 132         /* Check we're not trying to sync with ourselves. This can
 133            happen if we are a domain *and* a local master browser. */
 134         if (ismyip(ip)) {
 135                 return;
 136         }
 137
 138         s = (struct sync_record *)malloc(sizeof(*s));
 139         if (!s) return;
 140
 141         ZERO_STRUCTP(s);
 142
 143         fstrcpy(s->workgroup, work->work_group);
 144         fstrcpy(s->server, name);
 145         s->ip = ip;
 146
 147         slprintf(s->fname, sizeof(pstring)-1,
 148                  "%s/sync.%d", lp_lockdir(), counter++);
 149         all_string_sub(s->fname,"//", "/", 0);
 150
 151         DLIST_ADD(syncs, s);
 152
 153         /* the parent forks and returns, leaving the child to do the
 154            actual sync */
 155         CatchChild();
 156         if ((s->pid = fork())) return;
 157
 158         BlockSignals( False, SIGTERM );
 159
 160         DEBUG(2,("Initiating browse sync for %s to %s(%s)\n",
 161                  work->work_group, name, inet_ntoa(ip)));
 162
 163         fp = sys_fopen(s->fname,"w");
 164         if (!fp) _exit(1);
 165
 166         sync_child(name, nm_type, work->work_group, ip, local, servers,
 167                    s->fname);
 168
 169         fclose(fp);
 170         _exit(0);
 171 }
 172
 173 /**********************************************************************
 174 handle one line from a completed sync file
 175  **********************************************************************/
 176 static void complete_one(struct sync_record *s,
 177                          char *sname, uint32 stype, char *comment)
 178 {
 179         struct work_record *work;
 180         struct server_record *servrec;
 181
 182         stype &= ~SV_TYPE_LOCAL_LIST_ONLY;
 183
 184         if (stype & SV_TYPE_DOMAIN_ENUM) {
 185                 /* See if we can find the workgroup on this subnet. */
 186                 if((work=find_workgroup_on_subnet(unicast_subnet, sname))) {
 187                         /* We already know about this workgroup -
 188                            update the ttl. */
 189                         update_workgroup_ttl(work,lp_max_ttl());
 190                 } else {
 191                         /* Create the workgroup on the subnet. */
 192                         work = create_workgroup_on_subnet(unicast_subnet,
 193                                                           sname, lp_max_ttl());
 194                         if (work) {
 195                                 /* remember who the master is */
 196                                 fstrcpy(work->local_master_browser_name,
 197                                         comment);
 198                         }
 199                 }
 200                 return;
 201         }
 202
 203         work = find_workgroup_on_subnet(unicast_subnet, s->workgroup);
 204         if (!work) {
 205                 DEBUG(3,("workgroup %s doesn't exist on unicast subnet?\n",
 206                          s->workgroup));
 207                 return;
 208         }
 209
 210         if ((servrec = find_server_in_workgroup( work, sname))) {
 211                 /* Check that this is not a locally known
 212                    server - if so ignore the entry. */
 213                 if(!(servrec->serv.type & SV_TYPE_LOCAL_LIST_ONLY)) {
 214                         /* We already know about this server - update
 215                            the ttl. */
 216                         update_server_ttl(servrec, lp_max_ttl());
 217                         /* Update the type. */
 218                         servrec->serv.type = stype;
 219                 }
 220                 return;
 221         }
 222
 223         /* Create the server in the workgroup. */
 224         create_server_on_workgroup(work, sname,stype, lp_max_ttl(), comment);
 225 }
 226
 227
 228 /**********************************************************************
 229 read the completed sync info
 230  **********************************************************************/
 231 static void complete_sync(struct sync_record *s)
 232 {
 233         FILE *f;
 234         fstring server, type_str;
 235         unsigned type;
 236         pstring comment;
 237         pstring line;
 238         char *ptr;
 239         int count=0;
 240
 241         f = sys_fopen(s->fname,"r");
 242
 243         if (!f) return;
 244
 245         while (!feof(f)) {
 246
 247                 if (!fgets_slash(line,sizeof(pstring),f)) continue;
 248
 249                 ptr = line;
 250
 251                 if (!next_token(&ptr,server,NULL,sizeof(server)) ||
 252                     !next_token(&ptr,type_str,NULL, sizeof(type_str)) ||
 253                     !next_token(&ptr,comment,NULL, sizeof(comment))) {
 254                         continue;
 255                 }
 256
 257                 sscanf(type_str, "%X", &type);
 258
 259                 complete_one(s, server, type, comment);
 260
 261                 count++;
 262         }
 263
 264         fclose(f);
 265
 266         unlink(s->fname);
 267
 268         DEBUG(2,("sync with %s(%s) for workgroup %s completed (%d records)\n",
 269                  s->server, inet_ntoa(s->ip), s->workgroup, count));
 270 }
 271
 272 /**********************************************************************
 273 check for completion of any of the child processes
 274  **********************************************************************/
 275 void sync_check_completion(void)
 276 {
 277         struct sync_record *s, *next;
 278
 279         for (s=syncs;s;s=next) {
 280                 next = s->next;
 281                 if (!process_exists(s->pid)) {
 282                         /* it has completed - grab the info */
 283                         complete_sync(s);
 284                         DLIST_REMOVE(syncs, s);
 285                         ZERO_STRUCTP(s);
 286                         free(s);
 287                 }
 288         }
 289 }