release/src/router/samba3/source/nmbd/nmbd_sendannounce.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    SMB Version handling
   9    Copyright (C) John H Terpstra 1995-1998
  10
  11    This program is free software; you can redistribute it and/or modify
  12    it under the terms of the GNU General Public License as published by
  13    the Free Software Foundation; either version 2 of the License, or
  14    (at your option) any later version.
  15
  16    This program is distributed in the hope that it will be useful,
  17    but WITHOUT ANY WARRANTY; without even the implied warranty of
  18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19    GNU General Public License for more details.
  20
  21    You should have received a copy of the GNU General Public License
  22    along with this program; if not, write to the Free Software
  23    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  24
  25 */
  26
  27 #include "includes.h"
  28
  29 extern int  updatecount;
  30 extern BOOL found_lm_clients;
  31
  32 /****************************************************************************
  33  Send a browser reset packet.
  34 **************************************************************************/
  35
  36 void send_browser_reset(int reset_type, const char *to_name, int to_type, struct in_addr to_ip)
  37 {
  38         char outbuf[PSTRING_LEN];
  39         char *p;
  40
  41         DEBUG(3,("send_browser_reset: sending reset request type %d to %s<%02x> IP %s.\n",
  42                 reset_type, to_name, to_type, inet_ntoa(to_ip) ));
  43
  44         memset(outbuf,'\0',sizeof(outbuf));
  45         p = outbuf;
  46         SCVAL(p,0,ANN_ResetBrowserState);
  47         p++;
  48         SCVAL(p,0,reset_type);
  49         p++;
  50
  51         send_mailslot(True, BROWSE_MAILSLOT, outbuf,PTR_DIFF(p,outbuf),
  52                 global_myname(), 0x0, to_name, to_type, to_ip,
  53                 FIRST_SUBNET->myip, DGRAM_PORT);
  54 }
  55
  56 /****************************************************************************
  57   Broadcast a packet to the local net requesting that all servers in this
  58   workgroup announce themselves to us.
  59   **************************************************************************/
  60
  61 void broadcast_announce_request(struct subnet_record *subrec, struct work_record *work)
  62 {
  63         char outbuf[PSTRING_LEN];
  64         char *p;
  65
  66         work->needannounce = True;
  67
  68         DEBUG(3,("broadcast_announce_request: sending announce request for workgroup %s \
  69 to subnet %s\n", work->work_group, subrec->subnet_name));
  70
  71         memset(outbuf,'\0',sizeof(outbuf));
  72         p = outbuf;
  73         SCVAL(p,0,ANN_AnnouncementRequest);
  74         p++;
  75
  76         SCVAL(p,0,work->token); /* (local) Unique workgroup token id. */
  77         p++;
  78         p +=  push_string(NULL, p+1, global_myname(), 15, STR_ASCII|STR_UPPER|STR_TERMINATE);
  79
  80         send_mailslot(False, BROWSE_MAILSLOT, outbuf,PTR_DIFF(p,outbuf),
  81                 global_myname(), 0x0, work->work_group,0x1e, subrec->bcast_ip,
  82                 subrec->myip, DGRAM_PORT);
  83 }
  84
  85 /****************************************************************************
  86   Broadcast an announcement.
  87   **************************************************************************/
  88
  89 static void send_announcement(struct subnet_record *subrec, int announce_type,
  90                               const char *from_name, const char *to_name, int to_type, struct in_addr to_ip,
  91                               time_t announce_interval,
  92                               const char *server_name, int server_type, const char *server_comment)
  93 {
  94         char outbuf[PSTRING_LEN];
  95         unstring upper_server_name;
  96         char *p;
  97
  98         memset(outbuf,'\0',sizeof(outbuf));
  99         p = outbuf+1;
 100
 101         SCVAL(outbuf,0,announce_type);
 102
 103         /* Announcement parameters. */
 104         SCVAL(p,0,updatecount);
 105         SIVAL(p,1,announce_interval*1000); /* Milliseconds - despite the spec. */
 106
 107         safe_strcpy(upper_server_name, server_name, sizeof(upper_server_name)-1);
 108         strupper_m(upper_server_name);
 109         push_string(NULL, p+5, upper_server_name, 16, STR_ASCII|STR_TERMINATE);
 110
 111         SCVAL(p,21,lp_major_announce_version()); /* Major version. */
 112         SCVAL(p,22,lp_minor_announce_version()); /* Minor version. */
 113
 114         SIVAL(p,23,server_type & ~SV_TYPE_LOCAL_LIST_ONLY);
 115         /* Browse version: got from NT/AS 4.00  - Value defined in smb.h (JHT). */
 116         SSVAL(p,27,BROWSER_ELECTION_VERSION);
 117         SSVAL(p,29,BROWSER_CONSTANT); /* Browse signature. */
 118
 119         p += 31 + push_string(NULL, p+31, server_comment, sizeof(outbuf) - (p + 31 - outbuf), STR_ASCII|STR_TERMINATE);
 120
 121         send_mailslot(False,BROWSE_MAILSLOT, outbuf, PTR_DIFF(p,outbuf),
 122                         from_name, 0x0, to_name, to_type, to_ip, subrec->myip,
 123                         DGRAM_PORT);
 124 }
 125
 126 /****************************************************************************
 127   Broadcast a LanMan announcement.
 128 **************************************************************************/
 129
 130 static void send_lm_announcement(struct subnet_record *subrec, int announce_type,
 131                               char *from_name, char *to_name, int to_type, struct in_addr to_ip,
 132                               time_t announce_interval,
 133                               char *server_name, int server_type, char *server_comment)
 134 {
 135         char outbuf[PSTRING_LEN];
 136         char *p=outbuf;
 137
 138         memset(outbuf,'\0',sizeof(outbuf));
 139
 140         SSVAL(p,0,announce_type);
 141         SIVAL(p,2,server_type & ~SV_TYPE_LOCAL_LIST_ONLY);
 142         SCVAL(p,6,lp_major_announce_version()); /* Major version. */
 143         SCVAL(p,7,lp_minor_announce_version()); /* Minor version. */
 144         SSVAL(p,8,announce_interval);            /* In seconds - according to spec. */
 145
 146         p += 10;
 147         p += push_string(NULL, p, server_name, 15, STR_ASCII|STR_UPPER|STR_TERMINATE);
 148         p += push_string(NULL, p, server_comment, sizeof(outbuf)- (p - outbuf), STR_ASCII|STR_UPPER|STR_TERMINATE);
 149
 150         send_mailslot(False,LANMAN_MAILSLOT, outbuf, PTR_DIFF(p,outbuf),
 151                 from_name, 0x0, to_name, to_type, to_ip, subrec->myip,
 152                 DGRAM_PORT);
 153 }
 154
 155 /****************************************************************************
 156  We are a local master browser. Announce this to WORKGROUP<1e>.
 157 ****************************************************************************/
 158
 159 static void send_local_master_announcement(struct subnet_record *subrec, struct work_record *work,
 160                                            struct server_record *servrec)
 161 {
 162         /* Ensure we don't have the prohibited bit set. */
 163         uint32 type = servrec->serv.type & ~SV_TYPE_LOCAL_LIST_ONLY;
 164
 165         DEBUG(3,("send_local_master_announcement: type %x for name %s on subnet %s for workgroup %s\n",
 166                 type, global_myname(), subrec->subnet_name, work->work_group));
 167
 168         send_announcement(subrec, ANN_LocalMasterAnnouncement,
 169                         global_myname(),                 /* From nbt name. */
 170                         work->work_group, 0x1e,          /* To nbt name. */
 171                         subrec->bcast_ip,                /* To ip. */
 172                         work->announce_interval,         /* Time until next announce. */
 173                         global_myname(),                 /* Name to announce. */
 174                         type,                            /* Type field. */
 175                         servrec->serv.comment);
 176 }
 177
 178 /****************************************************************************
 179  Announce the workgroup WORKGROUP to MSBROWSE<01>.
 180 ****************************************************************************/
 181
 182 static void send_workgroup_announcement(struct subnet_record *subrec, struct work_record *work)
 183 {
 184         DEBUG(3,("send_workgroup_announcement: on subnet %s for workgroup %s\n",
 185                 subrec->subnet_name, work->work_group));
 186
 187         send_announcement(subrec, ANN_DomainAnnouncement,
 188                         global_myname(),                 /* From nbt name. */
 189                         MSBROWSE, 0x1,                   /* To nbt name. */
 190                         subrec->bcast_ip,                /* To ip. */
 191                         work->announce_interval,         /* Time until next announce. */
 192                         work->work_group,                /* Name to announce. */
 193                         SV_TYPE_DOMAIN_ENUM|SV_TYPE_NT,  /* workgroup announce flags. */
 194                         global_myname());                /* From name as comment. */
 195 }
 196
 197 /****************************************************************************
 198  Announce the given host to WORKGROUP<1d>.
 199 ****************************************************************************/
 200
 201 static void send_host_announcement(struct subnet_record *subrec, struct work_record *work,
 202                                    struct server_record *servrec)
 203 {
 204         /* Ensure we don't have the prohibited bits set. */
 205         uint32 type = servrec->serv.type & ~SV_TYPE_LOCAL_LIST_ONLY;
 206
 207         DEBUG(3,("send_host_announcement: type %x for host %s on subnet %s for workgroup %s\n",
 208                 type, servrec->serv.name, subrec->subnet_name, work->work_group));
 209
 210         send_announcement(subrec, ANN_HostAnnouncement,
 211                         servrec->serv.name,              /* From nbt name. */
 212                         work->work_group, 0x1d,          /* To nbt name. */
 213                         subrec->bcast_ip,                /* To ip. */
 214                         work->announce_interval,         /* Time until next announce. */
 215                         servrec->serv.name,              /* Name to announce. */
 216                         type,                            /* Type field. */
 217                         servrec->serv.comment);
 218 }
 219
 220 /****************************************************************************
 221  Announce the given LanMan host
 222 ****************************************************************************/
 223
 224 static void send_lm_host_announcement(struct subnet_record *subrec, struct work_record *work,
 225                                    struct server_record *servrec, int lm_interval)
 226 {
 227         /* Ensure we don't have the prohibited bits set. */
 228         uint32 type = servrec->serv.type & ~SV_TYPE_LOCAL_LIST_ONLY;
 229
 230         DEBUG(3,("send_lm_host_announcement: type %x for host %s on subnet %s for workgroup %s, ttl: %d\n",
 231                 type, servrec->serv.name, subrec->subnet_name, work->work_group, lm_interval));
 232
 233         send_lm_announcement(subrec, ANN_HostAnnouncement,
 234                         servrec->serv.name,              /* From nbt name. */
 235                         work->work_group, 0x00,          /* To nbt name. */
 236                         subrec->bcast_ip,                /* To ip. */
 237                         lm_interval,                     /* Time until next announce. */
 238                         servrec->serv.name,              /* Name to announce (fstring not netbios name struct). */
 239                         type,                            /* Type field. */
 240                         servrec->serv.comment);
 241 }
 242
 243 /****************************************************************************
 244   Announce a server record.
 245   ****************************************************************************/
 246
 247 static void announce_server(struct subnet_record *subrec, struct work_record *work,
 248                      struct server_record *servrec)
 249 {
 250         /* Only do domain announcements if we are a master and it's
 251                 our primary name we're being asked to announce. */
 252
 253         if (AM_LOCAL_MASTER_BROWSER(work) && strequal(global_myname(),servrec->serv.name)) {
 254                 send_local_master_announcement(subrec, work, servrec);
 255                 send_workgroup_announcement(subrec, work);
 256         } else {
 257                 send_host_announcement(subrec, work, servrec);
 258         }
 259 }
 260
 261 /****************************************************************************
 262   Go through all my registered names on all broadcast subnets and announce
 263   them if the timeout requires it.
 264   **************************************************************************/
 265
 266 void announce_my_server_names(time_t t)
 267 {
 268         struct subnet_record *subrec;
 269
 270         for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
 271                 struct work_record *work = find_workgroup_on_subnet(subrec, lp_workgroup());
 272
 273                 if(work) {
 274                         struct server_record *servrec;
 275
 276                         if (work->needannounce) {
 277                                 /* Drop back to a max 3 minute announce. This is to prevent a
 278                                         single lost packet from breaking things for too long. */
 279
 280                                 work->announce_interval = MIN(work->announce_interval,
 281                                                         CHECK_TIME_MIN_HOST_ANNCE*60);
 282                                 work->lastannounce_time = t - (work->announce_interval+1);
 283                                 work->needannounce = False;
 284                         }
 285
 286                         /* Announce every minute at first then progress to every 12 mins */
 287                         if ((t - work->lastannounce_time) < work->announce_interval)
 288                                 continue;
 289
 290                         if (work->announce_interval < (CHECK_TIME_MAX_HOST_ANNCE * 60))
 291                                 work->announce_interval += 60;
 292
 293                         work->lastannounce_time = t;
 294
 295                         for (servrec = work->serverlist; servrec; servrec = servrec->next) {
 296                                 if (is_myname(servrec->serv.name))
 297                                         announce_server(subrec, work, servrec);
 298                         }
 299                 } /* if work */
 300         } /* for subrec */
 301 }
 302
 303 /****************************************************************************
 304   Go through all my registered names on all broadcast subnets and announce
 305   them as a LanMan server if the timeout requires it.
 306 **************************************************************************/
 307
 308 void announce_my_lm_server_names(time_t t)
 309 {
 310         struct subnet_record *subrec;
 311         static time_t last_lm_announce_time=0;
 312         int announce_interval = lp_lm_interval();
 313         int lm_announce = lp_lm_announce();
 314
 315         if ((announce_interval <= 0) || (lm_announce <= 0)) {
 316                 /* user absolutely does not want LM announcements to be sent. */
 317                 return;
 318         }
 319
 320         if ((lm_announce >= 2) && (!found_lm_clients)) {
 321                 /* has been set to 2 (Auto) but no LM clients detected (yet). */
 322                 return;
 323         }
 324
 325         /* Otherwise: must have been set to 1 (Yes), or LM clients *have*
 326                 been detected. */
 327
 328         for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
 329                 struct work_record *work = find_workgroup_on_subnet(subrec, lp_workgroup());
 330
 331                 if(work) {
 332                         struct server_record *servrec;
 333
 334                         if (last_lm_announce_time && ((t - last_lm_announce_time) < announce_interval ))
 335                                 continue;
 336
 337                         last_lm_announce_time = t;
 338
 339                         for (servrec = work->serverlist; servrec; servrec = servrec->next) {
 340                                 if (is_myname(servrec->serv.name))
 341                                         /* skipping equivalent of announce_server() */
 342                                         send_lm_host_announcement(subrec, work, servrec, announce_interval);
 343                         }
 344                 } /* if work */
 345         } /* for subrec */
 346 }
 347
 348 /* Announce timer. Moved into global static so it can be reset
 349    when a machine becomes a local master browser. */
 350 static time_t announce_timer_last=0;
 351
 352 /****************************************************************************
 353  Reset the announce_timer so that a local master browser announce will be done
 354  immediately.
 355  ****************************************************************************/
 356
 357 void reset_announce_timer(void)
 358 {
 359         announce_timer_last = time(NULL) - (CHECK_TIME_MST_ANNOUNCE * 60);
 360 }
 361
 362 /****************************************************************************
 363   Announce myself as a local master browser to a domain master browser.
 364   **************************************************************************/
 365
 366 void announce_myself_to_domain_master_browser(time_t t)
 367 {
 368         struct subnet_record *subrec;
 369         struct work_record *work;
 370
 371         if(!we_are_a_wins_client()) {
 372                 DEBUG(10,("announce_myself_to_domain_master_browser: no unicast subnet, ignoring.\n"));
 373                 return;
 374         }
 375
 376         if (!announce_timer_last)
 377                 announce_timer_last = t;
 378
 379         if ((t-announce_timer_last) < (CHECK_TIME_MST_ANNOUNCE * 60)) {
 380                 DEBUG(10,("announce_myself_to_domain_master_browser: t (%d) - last(%d) < %d\n",
 381                         (int)t, (int)announce_timer_last,
 382                         CHECK_TIME_MST_ANNOUNCE * 60 ));
 383                 return;
 384         }
 385
 386         announce_timer_last = t;
 387
 388         /* Look over all our broadcast subnets to see if any of them
 389                 has the state set as local master browser. */
 390
 391         for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
 392                 for (work = subrec->workgrouplist; work; work = work->next) {
 393                         if (AM_LOCAL_MASTER_BROWSER(work)) {
 394                                 DEBUG(4,( "announce_myself_to_domain_master_browser: I am a local master browser for \
 395 workgroup %s on subnet %s\n", work->work_group, subrec->subnet_name));
 396
 397                                 /* Look in nmbd_browsersync.c for the rest of this code. */
 398                                 announce_and_sync_with_domain_master_browser(subrec, work);
 399                         }
 400                 }
 401         }
 402 }
 403
 404 /****************************************************************************
 405 Announce all samba's server entries as 'gone'.
 406 This must *only* be called on shutdown.
 407 ****************************************************************************/
 408
 409 void announce_my_servers_removed(void)
 410 {
 411         int announce_interval = lp_lm_interval();
 412         int lm_announce = lp_lm_announce();
 413         struct subnet_record *subrec;
 414
 415         for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
 416                 struct work_record *work;
 417                 for (work = subrec->workgrouplist; work; work = work->next) {
 418                         struct server_record *servrec;
 419
 420                         work->announce_interval = 0;
 421                         for (servrec = work->serverlist; servrec; servrec = servrec->next) {
 422                                 if (!is_myname(servrec->serv.name))
 423                                         continue;
 424                                 servrec->serv.type = 0;
 425                                 if(AM_LOCAL_MASTER_BROWSER(work))
 426                                         send_local_master_announcement(subrec, work, servrec);
 427                                 send_host_announcement(subrec, work, servrec);
 428
 429                                 if ((announce_interval <= 0) || (lm_announce <= 0)) {
 430                                         /* user absolutely does not want LM announcements to be sent. */
 431                                         continue;
 432                                 }
 433
 434                                 if ((lm_announce >= 2) && (!found_lm_clients)) {
 435                                         /* has been set to 2 (Auto) but no LM clients detected (yet). */
 436                                         continue;
 437                                 }
 438
 439                                 /*
 440                                  * lm announce was set or we have seen lm announcements, so do
 441                                  * a lm announcement of host removed.
 442                                  */
 443
 444                                 send_lm_host_announcement(subrec, work, servrec, 0);
 445                         }
 446                 }
 447         }
 448 }
 449
 450 /****************************************************************************
 451   Do all the "remote" announcements. These are used to put ourselves
 452   on a remote browse list. They are done blind, no checking is done to
 453   see if there is actually a local master browser at the other end.
 454   **************************************************************************/
 455
 456 void announce_remote(time_t t)
 457 {
 458         char *s;
 459         const char *ptr;
 460         static time_t last_time = 0;
 461         pstring s2;
 462         struct in_addr addr;
 463         char *comment;
 464         int stype = lp_default_server_announce();
 465
 466         if (last_time && (t < (last_time + REMOTE_ANNOUNCE_INTERVAL)))
 467                 return;
 468
 469         last_time = t;
 470
 471         s = lp_remote_announce();
 472         if (!*s)
 473                 return;
 474
 475         comment = string_truncate(lp_serverstring(), MAX_SERVER_STRING_LENGTH);
 476
 477         for (ptr=s; next_token(&ptr,s2,NULL,sizeof(s2)); ) {
 478                 /* The entries are of the form a.b.c.d/WORKGROUP with
 479                                 WORKGROUP being optional */
 480                 const char *wgroup;
 481                 char *pwgroup;
 482                 int i;
 483
 484                 pwgroup = strchr_m(s2,'/');
 485                 if (pwgroup)
 486                         *pwgroup++ = 0;
 487                 if (!pwgroup || !*pwgroup)
 488                         wgroup = lp_workgroup();
 489                 else
 490                         wgroup = pwgroup;
 491
 492                 addr = *interpret_addr2(s2);
 493
 494                 /* Announce all our names including aliases */
 495                 /* Give the ip address as the address of our first
 496                                 broadcast subnet. */
 497
 498                 for(i=0; my_netbios_names(i); i++) {
 499                         const char *name = my_netbios_names(i);
 500
 501                         DEBUG(5,("announce_remote: Doing remote announce for server %s to IP %s.\n",
 502                                 name, inet_ntoa(addr) ));
 503
 504                         send_announcement(FIRST_SUBNET, ANN_HostAnnouncement,
 505                                                 name,                      /* From nbt name. */
 506                                                 wgroup, 0x1d,              /* To nbt name. */
 507                                                 addr,                      /* To ip. */
 508                                                 REMOTE_ANNOUNCE_INTERVAL,  /* Time until next announce. */
 509                                                 name,                      /* Name to announce. */
 510                                                 stype,                     /* Type field. */
 511                                                 comment);
 512                 }
 513         }
 514 }
 515
 516 /****************************************************************************
 517   Implement the 'remote browse sync' feature Andrew added.
 518   These are used to put our browse lists into remote browse lists.
 519 **************************************************************************/
 520
 521 void browse_sync_remote(time_t t)
 522 {
 523         char *s;
 524         const char *ptr;
 525         static time_t last_time = 0;
 526         pstring s2;
 527         struct in_addr addr;
 528         struct work_record *work;
 529         pstring outbuf;
 530         char *p;
 531         unstring myname;
 532
 533         if (last_time && (t < (last_time + REMOTE_ANNOUNCE_INTERVAL)))
 534                 return;
 535
 536         last_time = t;
 537
 538         s = lp_remote_browse_sync();
 539         if (!*s)
 540                 return;
 541
 542         /*
 543          * We only do this if we are the local master browser
 544          * for our workgroup on the firsst subnet.
 545          */
 546
 547         if((work = find_workgroup_on_subnet(FIRST_SUBNET, lp_workgroup())) == NULL) {
 548                 DEBUG(0,("browse_sync_remote: Cannot find workgroup %s on subnet %s\n",
 549                         lp_workgroup(), FIRST_SUBNET->subnet_name ));
 550                 return;
 551         }
 552
 553         if(!AM_LOCAL_MASTER_BROWSER(work)) {
 554                 DEBUG(5,("browse_sync_remote: We can only do this if we are a local master browser \
 555 for workgroup %s on subnet %s.\n", lp_workgroup(), FIRST_SUBNET->subnet_name ));
 556                 return;
 557         }
 558
 559         memset(outbuf,'\0',sizeof(outbuf));
 560         p = outbuf;
 561         SCVAL(p,0,ANN_MasterAnnouncement);
 562         p++;
 563
 564         unstrcpy(myname, global_myname());
 565         strupper_m(myname);
 566         myname[15]='\0';
 567         push_pstring_base(p, myname, outbuf);
 568
 569         p = skip_string(p,1);
 570
 571         for (ptr=s; next_token(&ptr,s2,NULL,sizeof(s2)); ) {
 572                 /* The entries are of the form a.b.c.d */
 573                 addr = *interpret_addr2(s2);
 574
 575                 DEBUG(5,("announce_remote: Doing remote browse sync announce for server %s to IP %s.\n",
 576                         global_myname(), inet_ntoa(addr) ));
 577
 578                 send_mailslot(True, BROWSE_MAILSLOT, outbuf,PTR_DIFF(p,outbuf),
 579                         global_myname(), 0x0, "*", 0x0, addr, FIRST_SUBNET->myip, DGRAM_PORT);
 580         }
 581 }