source3/smbd/server.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Main SMB server routines
   4    Copyright (C) Andrew Tridgell                1992-1998
   5    Copyright (C) Martin Pool                    2002
   6    Copyright (C) Jelmer Vernooij                2002-2003
   7    Copyright (C) Volker Lendecke                1993-2007
   8    Copyright (C) Jeremy Allison                 1993-2007
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 3 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  22 */
  23
  24 #include "includes.h"
  25 #include "popt_common.h"
  26 #include "smbd/globals.h"
  27 #include "librpc/gen_ndr/messaging.h"
  28 #include "registry.h"
  29 #include "libcli/auth/schannel.h"
  30 #include "secrets.h"
  31 #include "memcache.h"
  32 #include "ctdbd_conn.h"
  33
  34 #include "../librpc/gen_ndr/srv_dfs.h"
  35 #include "../librpc/gen_ndr/srv_dssetup.h"
  36 #include "../librpc/gen_ndr/srv_echo.h"
  37 #include "../librpc/gen_ndr/srv_eventlog.h"
  38 #include "../librpc/gen_ndr/srv_initshutdown.h"
  39 #include "../librpc/gen_ndr/srv_lsa.h"
  40 #include "../librpc/gen_ndr/srv_netlogon.h"
  41 #include "../librpc/gen_ndr/srv_ntsvcs.h"
  42 #include "../librpc/gen_ndr/srv_samr.h"
  43 #include "../librpc/gen_ndr/srv_spoolss.h"
  44 #include "../librpc/gen_ndr/srv_srvsvc.h"
  45 #include "../librpc/gen_ndr/srv_svcctl.h"
  46 #include "../librpc/gen_ndr/srv_winreg.h"
  47 #include "../librpc/gen_ndr/srv_wkssvc.h"
  48
  49 #include "printing/nt_printing_migrate.h"
  50
  51 static_decl_rpc;
  52
  53 #ifdef WITH_DFS
  54 extern int dcelogin_atmost_once;
  55 #endif /* WITH_DFS */
  56
  57 static void smbd_set_server_fd(int fd)
  58 {
  59         struct smbd_server_connection *sconn = smbd_server_conn;
  60         char addr[INET6_ADDRSTRLEN];
  61         const char *name;
  62
  63         sconn->sock = fd;
  64
  65         /*
  66          * Initialize sconn->client_id: If we can't find the client's
  67          * name, default to its address.
  68          */
  69
  70         client_addr(fd, sconn->client_id.addr, sizeof(sconn->client_id.addr));
  71
  72         name = client_name(sconn->sock);
  73         if (strcmp(name, "UNKNOWN") != 0) {
  74                 name = talloc_strdup(sconn, name);
  75         } else {
  76                 name = NULL;
  77         }
  78         sconn->client_id.name =
  79                 (name != NULL) ? name : sconn->client_id.addr;
  80
  81         sub_set_socket_ids(sconn->client_id.addr, sconn->client_id.name,
  82                            client_socket_addr(sconn->sock, addr,
  83                                               sizeof(addr)));
  84 }
  85
  86 struct event_context *smbd_event_context(void)
  87 {
  88         return server_event_context();
  89 }
  90
  91 /*******************************************************************
  92  What to do when smb.conf is updated.
  93  ********************************************************************/
  94
  95 static void smb_conf_updated(struct messaging_context *msg,
  96                              void *private_data,
  97                              uint32_t msg_type,
  98                              struct server_id server_id,
  99                              DATA_BLOB *data)
 100 {
 101         DEBUG(10,("smb_conf_updated: Got message saying smb.conf was "
 102                   "updated. Reloading.\n"));
 103         change_to_root_user();
 104         reload_services(msg, smbd_server_conn->sock, False);
 105 }
 106
 107
 108 /*******************************************************************
 109  Delete a statcache entry.
 110  ********************************************************************/
 111
 112 static void smb_stat_cache_delete(struct messaging_context *msg,
 113                                   void *private_data,
 114                                   uint32_t msg_tnype,
 115                                   struct server_id server_id,
 116                                   DATA_BLOB *data)
 117 {
 118         const char *name = (const char *)data->data;
 119         DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
 120         stat_cache_delete(name);
 121 }
 122
 123 /****************************************************************************
 124   Send a SIGTERM to our process group.
 125 *****************************************************************************/
 126
 127 static void  killkids(void)
 128 {
 129         if(am_parent) kill(0,SIGTERM);
 130 }
 131
 132 /****************************************************************************
 133  Process a sam sync message - not sure whether to do this here or
 134  somewhere else.
 135 ****************************************************************************/
 136
 137 static void msg_sam_sync(struct messaging_context *msg,
 138                          void *private_data,
 139                          uint32_t msg_type,
 140                          struct server_id server_id,
 141                          DATA_BLOB *data)
 142 {
 143         DEBUG(10, ("** sam sync message received, ignoring\n"));
 144 }
 145
 146 static void msg_exit_server(struct messaging_context *msg,
 147                             void *private_data,
 148                             uint32_t msg_type,
 149                             struct server_id server_id,
 150                             DATA_BLOB *data)
 151 {
 152         DEBUG(3, ("got a SHUTDOWN message\n"));
 153         exit_server_cleanly(NULL);
 154 }
 155
 156 #ifdef DEVELOPER
 157 static void msg_inject_fault(struct messaging_context *msg,
 158                              void *private_data,
 159                              uint32_t msg_type,
 160                              struct server_id src,
 161                              DATA_BLOB *data)
 162 {
 163         int sig;
 164
 165         if (data->length != sizeof(sig)) {
 166                 DEBUG(0, ("Process %s sent bogus signal injection request\n",
 167                           procid_str_static(&src)));
 168                 return;
 169         }
 170
 171         sig = *(int *)data->data;
 172         if (sig == -1) {
 173                 exit_server("internal error injected");
 174                 return;
 175         }
 176
 177 #if HAVE_STRSIGNAL
 178         DEBUG(0, ("Process %s requested injection of signal %d (%s)\n",
 179                   procid_str_static(&src), sig, strsignal(sig)));
 180 #else
 181         DEBUG(0, ("Process %s requested injection of signal %d\n",
 182                   procid_str_static(&src), sig));
 183 #endif
 184
 185         kill(sys_getpid(), sig);
 186 }
 187 #endif /* DEVELOPER */
 188
 189 /*
 190  * Parent smbd process sets its own debug level first and then
 191  * sends a message to all the smbd children to adjust their debug
 192  * level to that of the parent.
 193  */
 194
 195 static void smbd_msg_debug(struct messaging_context *msg_ctx,
 196                            void *private_data,
 197                            uint32_t msg_type,
 198                            struct server_id server_id,
 199                            DATA_BLOB *data)
 200 {
 201         struct child_pid *child;
 202
 203         debug_message(msg_ctx, private_data, MSG_DEBUG, server_id, data);
 204
 205         for (child = children; child != NULL; child = child->next) {
 206                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
 207                                    MSG_DEBUG,
 208                                    data->data,
 209                                    strlen((char *) data->data) + 1);
 210         }
 211 }
 212
 213 static void add_child_pid(pid_t pid)
 214 {
 215         struct child_pid *child;
 216
 217         child = SMB_MALLOC_P(struct child_pid);
 218         if (child == NULL) {
 219                 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
 220                 return;
 221         }
 222         child->pid = pid;
 223         DLIST_ADD(children, child);
 224         num_children += 1;
 225 }
 226
 227 /*
 228   at most every smbd:cleanuptime seconds (default 20), we scan the BRL
 229   and locking database for entries to cleanup. As a side effect this
 230   also cleans up dead entries in the connections database (due to the
 231   traversal in message_send_all()
 232
 233   Using a timer for this prevents a flood of traversals when a large
 234   number of clients disconnect at the same time (perhaps due to a
 235   network outage).
 236 */
 237
 238 static void cleanup_timeout_fn(struct event_context *event_ctx,
 239                                 struct timed_event *te,
 240                                 struct timeval now,
 241                                 void *private_data)
 242 {
 243         struct timed_event **cleanup_te = (struct timed_event **)private_data;
 244
 245         DEBUG(1,("Cleaning up brl and lock database after unclean shutdown\n"));
 246         message_send_all(smbd_messaging_context(), MSG_SMB_UNLOCK, NULL, 0, NULL);
 247         messaging_send_buf(smbd_messaging_context(), procid_self(),
 248                                 MSG_SMB_BRL_VALIDATE, NULL, 0);
 249         /* mark the cleanup as having been done */
 250         (*cleanup_te) = NULL;
 251 }
 252
 253 static void remove_child_pid(pid_t pid, bool unclean_shutdown)
 254 {
 255         struct child_pid *child;
 256         static struct timed_event *cleanup_te;
 257         struct server_id child_id;
 258
 259         if (unclean_shutdown) {
 260                 /* a child terminated uncleanly so tickle all
 261                    processes to see if they can grab any of the
 262                    pending locks
 263                 */
 264                 DEBUG(3,(__location__ " Unclean shutdown of pid %u\n",
 265                         (unsigned int)pid));
 266                 if (!cleanup_te) {
 267                         /* call the cleanup timer, but not too often */
 268                         int cleanup_time = lp_parm_int(-1, "smbd", "cleanuptime", 20);
 269                         cleanup_te = event_add_timed(smbd_event_context(), NULL,
 270                                                 timeval_current_ofs(cleanup_time, 0),
 271                                                 cleanup_timeout_fn,
 272                                                 &cleanup_te);
 273                         DEBUG(1,("Scheduled cleanup of brl and lock database after unclean shutdown\n"));
 274                 }
 275         }
 276
 277         child_id = procid_self(); /* Just initialize pid and potentially vnn */
 278         child_id.pid = pid;
 279
 280         if (!serverid_deregister(child_id)) {
 281                 DEBUG(1, ("Could not remove pid %d from serverid.tdb\n",
 282                           (int)pid));
 283         }
 284
 285         for (child = children; child != NULL; child = child->next) {
 286                 if (child->pid == pid) {
 287                         struct child_pid *tmp = child;
 288                         DLIST_REMOVE(children, child);
 289                         SAFE_FREE(tmp);
 290                         num_children -= 1;
 291                         return;
 292                 }
 293         }
 294
 295         DEBUG(0, ("Could not find child %d -- ignoring\n", (int)pid));
 296 }
 297
 298 /****************************************************************************
 299  Have we reached the process limit ?
 300 ****************************************************************************/
 301
 302 static bool allowable_number_of_smbd_processes(void)
 303 {
 304         int max_processes = lp_max_smbd_processes();
 305
 306         if (!max_processes)
 307                 return True;
 308
 309         return num_children < max_processes;
 310 }
 311
 312 static void smbd_sig_chld_handler(struct tevent_context *ev,
 313                                   struct tevent_signal *se,
 314                                   int signum,
 315                                   int count,
 316                                   void *siginfo,
 317                                   void *private_data)
 318 {
 319         pid_t pid;
 320         int status;
 321
 322         while ((pid = sys_waitpid(-1, &status, WNOHANG)) > 0) {
 323                 bool unclean_shutdown = False;
 324
 325                 /* If the child terminated normally, assume
 326                    it was an unclean shutdown unless the
 327                    status is 0
 328                 */
 329                 if (WIFEXITED(status)) {
 330                         unclean_shutdown = WEXITSTATUS(status);
 331                 }
 332                 /* If the child terminated due to a signal
 333                    we always assume it was unclean.
 334                 */
 335                 if (WIFSIGNALED(status)) {
 336                         unclean_shutdown = True;
 337                 }
 338                 remove_child_pid(pid, unclean_shutdown);
 339         }
 340 }
 341
 342 static void smbd_setup_sig_chld_handler(void)
 343 {
 344         struct tevent_signal *se;
 345
 346         se = tevent_add_signal(smbd_event_context(),
 347                                smbd_event_context(),
 348                                SIGCHLD, 0,
 349                                smbd_sig_chld_handler,
 350                                NULL);
 351         if (!se) {
 352                 exit_server("failed to setup SIGCHLD handler");
 353         }
 354 }
 355
 356 struct smbd_open_socket;
 357
 358 struct smbd_parent_context {
 359         bool interactive;
 360
 361         /* the list of listening sockets */
 362         struct smbd_open_socket *sockets;
 363 };
 364
 365 struct smbd_open_socket {
 366         struct smbd_open_socket *prev, *next;
 367         struct smbd_parent_context *parent;
 368         int fd;
 369         struct tevent_fd *fde;
 370 };
 371
 372 static void smbd_open_socket_close_fn(struct tevent_context *ev,
 373                                       struct tevent_fd *fde,
 374                                       int fd,
 375                                       void *private_data)
 376 {
 377         /* this might be the socket_wrapper swrap_close() */
 378         close(fd);
 379 }
 380
 381 static void smbd_accept_connection(struct tevent_context *ev,
 382                                    struct tevent_fd *fde,
 383                                    uint16_t flags,
 384                                    void *private_data)
 385 {
 386         struct smbd_open_socket *s = talloc_get_type_abort(private_data,
 387                                      struct smbd_open_socket);
 388         struct sockaddr_storage addr;
 389         socklen_t in_addrlen = sizeof(addr);
 390         int fd;
 391         pid_t pid = 0;
 392         uint64_t unique_id;
 393
 394         fd = accept(s->fd, (struct sockaddr *)(void *)&addr,&in_addrlen);
 395         smbd_set_server_fd(fd);
 396
 397         if (fd == -1 && errno == EINTR)
 398                 return;
 399
 400         if (fd == -1) {
 401                 DEBUG(0,("open_sockets_smbd: accept: %s\n",
 402                          strerror(errno)));
 403                 return;
 404         }
 405
 406         if (s->parent->interactive) {
 407                 smbd_process(smbd_server_conn);
 408                 exit_server_cleanly("end of interactive mode");
 409                 return;
 410         }
 411
 412         if (!allowable_number_of_smbd_processes()) {
 413                 close(fd);
 414                 smbd_set_server_fd(-1);
 415                 return;
 416         }
 417
 418         /*
 419          * Generate a unique id in the parent process so that we use
 420          * the global random state in the parent.
 421          */
 422         generate_random_buffer((uint8_t *)&unique_id, sizeof(unique_id));
 423
 424         pid = sys_fork();
 425         if (pid == 0) {
 426                 NTSTATUS status = NT_STATUS_OK;
 427
 428                 /* Child code ... */
 429                 am_parent = 0;
 430
 431                 set_my_unique_id(unique_id);
 432
 433                 /* Stop zombies, the parent explicitly handles
 434                  * them, counting worker smbds. */
 435                 CatchChild();
 436
 437                 /* close our standard file
 438                    descriptors */
 439                 close_low_fds(False);
 440
 441                 /*
 442                  * Can't use TALLOC_FREE here. Nulling out the argument to it
 443                  * would overwrite memory we've just freed.
 444                  */
 445                 talloc_free(s->parent);
 446                 s = NULL;
 447
 448                 status = reinit_after_fork(smbd_messaging_context(),
 449                                            smbd_event_context(), procid_self(),
 450                                            true);
 451                 if (!NT_STATUS_IS_OK(status)) {
 452                         if (NT_STATUS_EQUAL(status,
 453                                             NT_STATUS_TOO_MANY_OPENED_FILES)) {
 454                                 DEBUG(0,("child process cannot initialize "
 455                                          "because too many files are open\n"));
 456                                 goto exit;
 457                         }
 458                         DEBUG(0,("reinit_after_fork() failed\n"));
 459                         smb_panic("reinit_after_fork() failed");
 460                 }
 461
 462                 smbd_setup_sig_term_handler();
 463                 smbd_setup_sig_hup_handler(server_event_context(),
 464                                            server_messaging_context());
 465
 466                 if (!serverid_register(procid_self(),
 467                                        FLAG_MSG_GENERAL|FLAG_MSG_SMBD
 468                                        |FLAG_MSG_DBWRAP
 469                                        |FLAG_MSG_PRINT_GENERAL)) {
 470                         exit_server_cleanly("Could not register myself in "
 471                                             "serverid.tdb");
 472                 }
 473
 474                 smbd_process(smbd_server_conn);
 475          exit:
 476                 exit_server_cleanly("end of child");
 477                 return;
 478         }
 479
 480         if (pid < 0) {
 481                 DEBUG(0,("smbd_accept_connection: sys_fork() failed: %s\n",
 482                          strerror(errno)));
 483         }
 484
 485         /* The parent doesn't need this socket */
 486         close(fd);
 487
 488         /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
 489                 Clear the closed fd info out of server_fd --
 490                 and more importantly, out of client_fd in
 491                 util_sock.c, to avoid a possible
 492                 getpeername failure if we reopen the logs
 493                 and use %I in the filename.
 494         */
 495
 496         smbd_set_server_fd(-1);
 497
 498         if (pid != 0) {
 499                 add_child_pid(pid);
 500         }
 501
 502         /* Force parent to check log size after
 503          * spawning child.  Fix from
 504          * klausr@ITAP.Physik.Uni-Stuttgart.De.  The
 505          * parent smbd will log to logserver.smb.  It
 506          * writes only two messages for each child
 507          * started/finished. But each child writes,
 508          * say, 50 messages also in logserver.smb,
 509          * begining with the debug_count of the
 510          * parent, before the child opens its own log
 511          * file logserver.client. In a worst case
 512          * scenario the size of logserver.smb would be
 513          * checked after about 50*50=2500 messages
 514          * (ca. 100kb).
 515          * */
 516         force_check_log_size();
 517 }
 518
 519 static bool smbd_open_one_socket(struct smbd_parent_context *parent,
 520                                  const struct sockaddr_storage *ifss,
 521                                  uint16_t port)
 522 {
 523         struct smbd_open_socket *s;
 524
 525         s = talloc(parent, struct smbd_open_socket);
 526         if (!s) {
 527                 return false;
 528         }
 529
 530         s->parent = parent;
 531         s->fd = open_socket_in(SOCK_STREAM,
 532                                port,
 533                                parent->sockets == NULL ? 0 : 2,
 534                                ifss,
 535                                true);
 536         if (s->fd == -1) {
 537                 DEBUG(0,("smbd_open_once_socket: open_socket_in: "
 538                         "%s\n", strerror(errno)));
 539                 TALLOC_FREE(s);
 540                 /*
 541                  * We ignore an error here, as we've done before
 542                  */
 543                 return true;
 544         }
 545
 546         /* ready to listen */
 547         set_socket_options(s->fd, "SO_KEEPALIVE");
 548         set_socket_options(s->fd, lp_socket_options());
 549
 550         /* Set server socket to
 551          * non-blocking for the accept. */
 552         set_blocking(s->fd, False);
 553
 554         if (listen(s->fd, SMBD_LISTEN_BACKLOG) == -1) {
 555                 DEBUG(0,("open_sockets_smbd: listen: "
 556                         "%s\n", strerror(errno)));
 557                         close(s->fd);
 558                 TALLOC_FREE(s);
 559                 return false;
 560         }
 561
 562         s->fde = tevent_add_fd(smbd_event_context(),
 563                                s,
 564                                s->fd, TEVENT_FD_READ,
 565                                smbd_accept_connection,
 566                                s);
 567         if (!s->fde) {
 568                 DEBUG(0,("open_sockets_smbd: "
 569                          "tevent_add_fd: %s\n",
 570                          strerror(errno)));
 571                 close(s->fd);
 572                 TALLOC_FREE(s);
 573                 return false;
 574         }
 575         tevent_fd_set_close_fn(s->fde, smbd_open_socket_close_fn);
 576
 577         DLIST_ADD_END(parent->sockets, s, struct smbd_open_socket *);
 578
 579         return true;
 580 }
 581
 582 /****************************************************************************
 583  Open the socket communication.
 584 ****************************************************************************/
 585
 586 static bool open_sockets_smbd(struct smbd_parent_context *parent,
 587                               const char *smb_ports)
 588 {
 589         int num_interfaces = iface_count();
 590         int i;
 591         char *ports;
 592         unsigned dns_port = 0;
 593
 594 #ifdef HAVE_ATEXIT
 595         atexit(killkids);
 596 #endif
 597
 598         /* Stop zombies */
 599         smbd_setup_sig_chld_handler();
 600
 601         /* use a reasonable default set of ports - listing on 445 and 139 */
 602         if (!smb_ports) {
 603                 ports = lp_smb_ports();
 604                 if (!ports || !*ports) {
 605                         ports = talloc_strdup(talloc_tos(), SMB_PORTS);
 606                 } else {
 607                         ports = talloc_strdup(talloc_tos(), ports);
 608                 }
 609         } else {
 610                 ports = talloc_strdup(talloc_tos(), smb_ports);
 611         }
 612
 613         if (lp_interfaces() && lp_bind_interfaces_only()) {
 614                 /* We have been given an interfaces line, and been
 615                    told to only bind to those interfaces. Create a
 616                    socket per interface and bind to only these.
 617                 */
 618
 619                 /* Now open a listen socket for each of the
 620                    interfaces. */
 621                 for(i = 0; i < num_interfaces; i++) {
 622                         const struct sockaddr_storage *ifss =
 623                                         iface_n_sockaddr_storage(i);
 624                         char *tok;
 625                         const char *ptr;
 626
 627                         if (ifss == NULL) {
 628                                 DEBUG(0,("open_sockets_smbd: "
 629                                         "interface %d has NULL IP address !\n",
 630                                         i));
 631                                 continue;
 632                         }
 633
 634                         for (ptr=ports;
 635                              next_token_talloc(talloc_tos(),&ptr, &tok, " \t,");) {
 636                                 unsigned port = atoi(tok);
 637                                 if (port == 0 || port > 0xffff) {
 638                                         continue;
 639                                 }
 640
 641                                 if (!smbd_open_one_socket(parent, ifss, port)) {
 642                                         return false;
 643                                 }
 644                         }
 645                 }
 646         } else {
 647                 /* Just bind to 0.0.0.0 - accept connections
 648                    from anywhere. */
 649
 650                 char *tok;
 651                 const char *ptr;
 652                 const char *sock_addr = lp_socket_address();
 653                 char *sock_tok;
 654                 const char *sock_ptr;
 655
 656                 if (strequal(sock_addr, "0.0.0.0") ||
 657                     strequal(sock_addr, "::")) {
 658 #if HAVE_IPV6
 659                         sock_addr = "::,0.0.0.0";
 660 #else
 661                         sock_addr = "0.0.0.0";
 662 #endif
 663                 }
 664
 665                 for (sock_ptr=sock_addr;
 666                      next_token_talloc(talloc_tos(), &sock_ptr, &sock_tok, " \t,"); ) {
 667                         for (ptr=ports; next_token_talloc(talloc_tos(), &ptr, &tok, " \t,"); ) {
 668                                 struct sockaddr_storage ss;
 669
 670                                 unsigned port = atoi(tok);
 671                                 if (port == 0 || port > 0xffff) {
 672                                         continue;
 673                                 }
 674
 675                                 /* Keep the first port for mDNS service
 676                                  * registration.
 677                                  */
 678                                 if (dns_port == 0) {
 679                                         dns_port = port;
 680                                 }
 681
 682                                 /* open an incoming socket */
 683                                 if (!interpret_string_addr(&ss, sock_tok,
 684                                                 AI_NUMERICHOST|AI_PASSIVE)) {
 685                                         continue;
 686                                 }
 687
 688                                 if (!smbd_open_one_socket(parent, &ss, port)) {
 689                                         return false;
 690                                 }
 691                         }
 692                 }
 693         }
 694
 695         if (parent->sockets == NULL) {
 696                 DEBUG(0,("open_sockets_smbd: No "
 697                         "sockets available to bind to.\n"));
 698                 return false;
 699         }
 700
 701         /* Setup the main smbd so that we can get messages. Note that
 702            do this after starting listening. This is needed as when in
 703            clustered mode, ctdb won't allow us to start doing database
 704            operations until it has gone thru a full startup, which
 705            includes checking to see that smbd is listening. */
 706
 707         if (!serverid_register(procid_self(),
 708                                FLAG_MSG_GENERAL|FLAG_MSG_SMBD
 709                                |FLAG_MSG_DBWRAP)) {
 710                 DEBUG(0, ("open_sockets_smbd: Failed to register "
 711                           "myself in serverid.tdb\n"));
 712                 return false;
 713         }
 714
 715         /* Listen to messages */
 716
 717         messaging_register(smbd_messaging_context(), NULL,
 718                            MSG_SMB_SAM_SYNC, msg_sam_sync);
 719         messaging_register(smbd_messaging_context(), NULL,
 720                            MSG_SHUTDOWN, msg_exit_server);
 721         messaging_register(smbd_messaging_context(), NULL,
 722                            MSG_SMB_FILE_RENAME, msg_file_was_renamed);
 723         messaging_register(smbd_messaging_context(), NULL,
 724                            MSG_SMB_CONF_UPDATED, smb_conf_updated);
 725         messaging_register(smbd_messaging_context(), NULL,
 726                            MSG_SMB_STAT_CACHE_DELETE, smb_stat_cache_delete);
 727         messaging_register(smbd_messaging_context(), NULL,
 728                            MSG_DEBUG, smbd_msg_debug);
 729         brl_register_msgs(smbd_messaging_context());
 730
 731 #ifdef CLUSTER_SUPPORT
 732         if (lp_clustering()) {
 733                 ctdbd_register_reconfigure(messaging_ctdbd_connection());
 734         }
 735 #endif
 736
 737 #ifdef DEVELOPER
 738         messaging_register(smbd_messaging_context(), NULL,
 739                            MSG_SMB_INJECT_FAULT, msg_inject_fault);
 740 #endif
 741
 742         if (dns_port != 0) {
 743 #ifdef WITH_DNSSD_SUPPORT
 744                 smbd_setup_mdns_registration(smbd_event_context(),
 745                                              parent, dns_port);
 746 #endif
 747 #ifdef WITH_AVAHI_SUPPORT
 748                 void *avahi_conn;
 749
 750                 avahi_conn = avahi_start_register(
 751                         smbd_event_context(), smbd_event_context(), dns_port);
 752                 if (avahi_conn == NULL) {
 753                         DEBUG(10, ("avahi_start_register failed\n"));
 754                 }
 755 #endif
 756         }
 757
 758         return true;
 759 }
 760
 761 static void smbd_parent_loop(struct smbd_parent_context *parent)
 762 {
 763         /* now accept incoming connections - forking a new process
 764            for each incoming connection */
 765         DEBUG(2,("waiting for connections\n"));
 766         while (1) {
 767                 int ret;
 768                 TALLOC_CTX *frame = talloc_stackframe();
 769
 770                 ret = tevent_loop_once(smbd_event_context());
 771                 if (ret != 0) {
 772                         exit_server_cleanly("tevent_loop_once() error");
 773                 }
 774
 775                 TALLOC_FREE(frame);
 776         } /* end while 1 */
 777
 778 /* NOTREACHED   return True; */
 779 }
 780
 781
 782 /****************************************************************************
 783  Initialise connect, service and file structs.
 784 ****************************************************************************/
 785
 786 static bool init_structs(void )
 787 {
 788         /*
 789          * Set the machine NETBIOS name if not already
 790          * set from the config file.
 791          */
 792
 793         if (!init_names())
 794                 return False;
 795
 796         file_init();
 797
 798         if (!secrets_init())
 799                 return False;
 800
 801         return True;
 802 }
 803
 804 static bool spoolss_init_cb(void *ptr)
 805 {
 806         struct messaging_context *msg_ctx = talloc_get_type_abort(
 807                 ptr, struct messaging_context);
 808         return nt_printing_tdb_migrate(msg_ctx);
 809 }
 810
 811 static bool spoolss_shutdown_cb(void *ptr)
 812 {
 813         srv_spoolss_cleanup();
 814
 815         return true;
 816 }
 817
 818 /****************************************************************************
 819  main program.
 820 ****************************************************************************/
 821
 822 /* Declare prototype for build_options() to avoid having to run it through
 823    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
 824    prototype generation system is too complicated. */
 825
 826 extern void build_options(bool screen);
 827
 828  int main(int argc,const char *argv[])
 829 {
 830         /* shall I run as a daemon */
 831         bool is_daemon = false;
 832         bool interactive = false;
 833         bool Fork = true;
 834         bool no_process_group = false;
 835         bool log_stdout = false;
 836         char *ports = NULL;
 837         char *profile_level = NULL;
 838         int opt;
 839         poptContext pc;
 840         bool print_build_options = False;
 841         enum {
 842                 OPT_DAEMON = 1000,
 843                 OPT_INTERACTIVE,
 844                 OPT_FORK,
 845                 OPT_NO_PROCESS_GROUP,
 846                 OPT_LOG_STDOUT
 847         };
 848         struct poptOption long_options[] = {
 849         POPT_AUTOHELP
 850         {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
 851         {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)"},
 852         {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools, etc.)" },
 853         {"no-process-group", '\0', POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
 854         {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
 855         {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
 856         {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
 857         {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
 858         POPT_COMMON_SAMBA
 859         POPT_COMMON_DYNCONFIG
 860         POPT_TABLEEND
 861         };
 862         struct smbd_parent_context *parent = NULL;
 863         TALLOC_CTX *frame = talloc_stackframe(); /* Setup tos. */
 864         NTSTATUS status;
 865         uint64_t unique_id;
 866         struct rpc_srv_callbacks spoolss_cb;
 867
 868         /* Initialize the event context, it will panic on error */
 869         smbd_event_context();
 870
 871         smbd_init_globals();
 872
 873         TimeInit();
 874
 875 #ifdef HAVE_SET_AUTH_PARAMETERS
 876         set_auth_parameters(argc,argv);
 877 #endif
 878
 879         pc = poptGetContext("smbd", argc, argv, long_options, 0);
 880         while((opt = poptGetNextOpt(pc)) != -1) {
 881                 switch (opt)  {
 882                 case OPT_DAEMON:
 883                         is_daemon = true;
 884                         break;
 885                 case OPT_INTERACTIVE:
 886                         interactive = true;
 887                         break;
 888                 case OPT_FORK:
 889                         Fork = false;
 890                         break;
 891                 case OPT_NO_PROCESS_GROUP:
 892                         no_process_group = true;
 893                         break;
 894                 case OPT_LOG_STDOUT:
 895                         log_stdout = true;
 896                         break;
 897                 case 'b':
 898                         print_build_options = True;
 899                         break;
 900                 default:
 901                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
 902                                   poptBadOption(pc, 0), poptStrerror(opt));
 903                         poptPrintUsage(pc, stderr, 0);
 904                         exit(1);
 905                 }
 906         }
 907         poptFreeContext(pc);
 908
 909         if (interactive) {
 910                 Fork = False;
 911                 log_stdout = True;
 912         }
 913
 914         setup_logging(argv[0],log_stdout);
 915
 916         if (print_build_options) {
 917                 build_options(True); /* Display output to screen as well as debug */
 918                 exit(0);
 919         }
 920
 921         load_case_tables();
 922
 923 #ifdef HAVE_SETLUID
 924         /* needed for SecureWare on SCO */
 925         setluid(0);
 926 #endif
 927
 928         set_remote_machine_name("smbd", False);
 929
 930         if (interactive && (DEBUGLEVEL >= 9)) {
 931                 talloc_enable_leak_report();
 932         }
 933
 934         if (log_stdout && Fork) {
 935                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
 936                 exit(1);
 937         }
 938
 939         /* we want to re-seed early to prevent time delays causing
 940            client problems at a later date. (tridge) */
 941         generate_random_buffer(NULL, 0);
 942
 943         /* get initial effective uid and gid */
 944         sec_init();
 945
 946         /* make absolutely sure we run as root - to handle cases where people
 947            are crazy enough to have it setuid */
 948         gain_root_privilege();
 949         gain_root_group_privilege();
 950
 951         fault_setup((void (*)(void *))exit_server_fault);
 952         dump_core_setup("smbd");
 953
 954         /* we are never interested in SIGPIPE */
 955         BlockSignals(True,SIGPIPE);
 956
 957 #if defined(SIGFPE)
 958         /* we are never interested in SIGFPE */
 959         BlockSignals(True,SIGFPE);
 960 #endif
 961
 962 #if defined(SIGUSR2)
 963         /* We are no longer interested in USR2 */
 964         BlockSignals(True,SIGUSR2);
 965 #endif
 966
 967         /* POSIX demands that signals are inherited. If the invoking process has
 968          * these signals masked, we will have problems, as we won't recieve them. */
 969         BlockSignals(False, SIGHUP);
 970         BlockSignals(False, SIGUSR1);
 971         BlockSignals(False, SIGTERM);
 972
 973         /* Ensure we leave no zombies until we
 974          * correctly set up child handling below. */
 975
 976         CatchChild();
 977
 978         /* we want total control over the permissions on created files,
 979            so set our umask to 0 */
 980         umask(0);
 981
 982         reopen_logs();
 983
 984         DEBUG(0,("smbd version %s started.\n", samba_version_string()));
 985         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
 986
 987         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
 988                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
 989
 990         /* Output the build options to the debug log */
 991         build_options(False);
 992
 993         if (sizeof(uint16) < 2 || sizeof(uint32) < 4) {
 994                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
 995                 exit(1);
 996         }
 997
 998         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
 999                 DEBUG(0, ("error opening config file\n"));
1000                 exit(1);
1001         }
1002
1003         /* Init the security context and global current_user */
1004         init_sec_ctx();
1005
1006         if (smbd_messaging_context() == NULL)
1007                 exit(1);
1008
1009         /*
1010          * Reloading of the printers will not work here as we don't have a
1011          * server info and rpc services set up. It will be called later.
1012          */
1013         if (!reload_services(smbd_messaging_context(), -1, False)) {
1014                 exit(1);
1015         }
1016
1017         /* ...NOTE... Log files are working from this point! */
1018
1019         DEBUG(3,("loaded services\n"));
1020
1021         init_structs();
1022
1023 #ifdef WITH_PROFILE
1024         if (!profile_setup(smbd_messaging_context(), False)) {
1025                 DEBUG(0,("ERROR: failed to setup profiling\n"));
1026                 return -1;
1027         }
1028         if (profile_level != NULL) {
1029                 int pl = atoi(profile_level);
1030                 struct server_id src;
1031
1032                 DEBUG(1, ("setting profiling level: %s\n",profile_level));
1033                 src.pid = getpid();
1034                 set_profile_level(pl, src);
1035         }
1036 #endif
1037
1038         if (!is_daemon && !is_a_socket(0)) {
1039                 if (!interactive)
1040                         DEBUG(0,("standard input is not a socket, assuming -D option\n"));
1041
1042                 /*
1043                  * Setting is_daemon here prevents us from eventually calling
1044                  * the open_sockets_inetd()
1045                  */
1046
1047                 is_daemon = True;
1048         }
1049
1050         if (is_daemon && !interactive) {
1051                 DEBUG( 3, ( "Becoming a daemon.\n" ) );
1052                 become_daemon(Fork, no_process_group, log_stdout);
1053         }
1054
1055         generate_random_buffer((uint8_t *)&unique_id, sizeof(unique_id));
1056         set_my_unique_id(unique_id);
1057
1058 #if HAVE_SETPGID
1059         /*
1060          * If we're interactive we want to set our own process group for
1061          * signal management.
1062          */
1063         if (interactive && !no_process_group)
1064                 setpgid( (pid_t)0, (pid_t)0);
1065 #endif
1066
1067         if (!directory_exist(lp_lockdir()))
1068                 mkdir(lp_lockdir(), 0755);
1069
1070         if (is_daemon)
1071                 pidfile_create("smbd");
1072
1073         status = reinit_after_fork(smbd_messaging_context(),
1074                                    smbd_event_context(),
1075                                    procid_self(), false);
1076         if (!NT_STATUS_IS_OK(status)) {
1077                 DEBUG(0,("reinit_after_fork() failed\n"));
1078                 exit(1);
1079         }
1080
1081         smbd_server_conn->msg_ctx = smbd_messaging_context();
1082
1083         smbd_setup_sig_term_handler();
1084         smbd_setup_sig_hup_handler(smbd_event_context(),
1085                                    smbd_server_conn->msg_ctx);
1086
1087         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1088
1089         if (smbd_memcache() == NULL) {
1090                 exit(1);
1091         }
1092
1093         memcache_set_global(smbd_memcache());
1094
1095         /* Initialise the password backed before the global_sam_sid
1096            to ensure that we fetch from ldap before we make a domain sid up */
1097
1098         if(!initialize_password_db(False, smbd_event_context()))
1099                 exit(1);
1100
1101         if (!secrets_init()) {
1102                 DEBUG(0, ("ERROR: smbd can not open secrets.tdb\n"));
1103                 exit(1);
1104         }
1105
1106         if (lp_server_role() == ROLE_DOMAIN_BDC || lp_server_role() == ROLE_DOMAIN_PDC) {
1107                 if (!open_schannel_session_store(NULL, lp_private_dir())) {
1108                         DEBUG(0,("ERROR: Samba cannot open schannel store for secured NETLOGON operations.\n"));
1109                         exit(1);
1110                 }
1111         }
1112
1113         if(!get_global_sam_sid()) {
1114                 DEBUG(0,("ERROR: Samba cannot create a SAM SID.\n"));
1115                 exit(1);
1116         }
1117
1118         if (!sessionid_init()) {
1119                 exit(1);
1120         }
1121
1122         if (!connections_init(True))
1123                 exit(1);
1124
1125         if (!locking_init())
1126                 exit(1);
1127
1128         if (!messaging_tdb_parent_init()) {
1129                 exit(1);
1130         }
1131
1132         if (!notify_internal_parent_init()) {
1133                 exit(1);
1134         }
1135
1136         if (!serverid_parent_init()) {
1137                 exit(1);
1138         }
1139
1140         if (!W_ERROR_IS_OK(registry_init_full()))
1141                 exit(1);
1142
1143         if (!print_backend_init(smbd_messaging_context()))
1144                 exit(1);
1145
1146 #if 0
1147         if (!init_svcctl_db())
1148                 exit(1);
1149 #endif
1150
1151         /* Open the share_info.tdb here, so we don't have to open
1152            after the fork on every single connection.  This is a small
1153            performance improvment and reduces the total number of system
1154            fds used. */
1155         if (!share_info_db_init()) {
1156                 DEBUG(0,("ERROR: failed to load share info db.\n"));
1157                 exit(1);
1158         }
1159
1160         if (!init_system_info()) {
1161                 DEBUG(0,("ERROR: failed to setup system user info.\n"));
1162                 return -1;
1163         }
1164
1165         if (!init_guest_info()) {
1166                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1167                 return -1;
1168         }
1169
1170         /*
1171          * Initialize spoolss with an init function to convert printers first.
1172          * static_init_rpc will try to initialize the spoolss server too but you
1173          * can't register it twice.
1174          */
1175         spoolss_cb.init = spoolss_init_cb;
1176         spoolss_cb.shutdown = spoolss_shutdown_cb;
1177         spoolss_cb.private_data = smbd_server_conn->msg_ctx;
1178
1179         /* Spoolss depends on a winreg pipe, so start it first. */
1180         if (!NT_STATUS_IS_OK(rpc_winreg_init(NULL))) {
1181                 exit(1);
1182         }
1183
1184         if (!NT_STATUS_IS_OK(rpc_spoolss_init(&spoolss_cb))) {
1185                 exit(1);
1186         }
1187
1188         static_init_rpc;
1189
1190         /* Publish nt printers, this requires a working winreg pipe */
1191         reload_printers(smbd_messaging_context());
1192
1193         /* only start the background queue daemon if we are
1194            running as a daemon -- bad things will happen if
1195            smbd is launched via inetd and we fork a copy of
1196            ourselves here */
1197
1198         if (is_daemon && !interactive
1199             && lp_parm_bool(-1, "smbd", "backgroundqueue", true)) {
1200                 start_background_queue(smbd_event_context(),
1201                                        smbd_messaging_context());
1202         }
1203
1204         if (!is_daemon) {
1205                 /* inetd mode */
1206                 TALLOC_FREE(frame);
1207
1208                 /* Started from inetd. fd 0 is the socket. */
1209                 /* We will abort gracefully when the client or remote system
1210                    goes away */
1211                 smbd_set_server_fd(dup(0));
1212
1213                 /* close our standard file descriptors */
1214                 close_low_fds(False); /* Don't close stderr */
1215
1216 #ifdef HAVE_ATEXIT
1217                 atexit(killkids);
1218 #endif
1219
1220                 /* Stop zombies */
1221                 smbd_setup_sig_chld_handler();
1222
1223                 smbd_process(smbd_server_conn);
1224
1225                 exit_server_cleanly(NULL);
1226                 return(0);
1227         }
1228
1229         parent = talloc_zero(smbd_event_context(), struct smbd_parent_context);
1230         if (!parent) {
1231                 exit_server("talloc(struct smbd_parent_context) failed");
1232         }
1233         parent->interactive = interactive;
1234
1235         if (!open_sockets_smbd(parent, ports))
1236                 exit_server("open_sockets_smbd() failed");
1237
1238         TALLOC_FREE(frame);
1239         /* make sure we always have a valid stackframe */
1240         frame = talloc_stackframe();
1241
1242         smbd_parent_loop(parent);
1243
1244         exit_server_cleanly(NULL);
1245         TALLOC_FREE(frame);
1246         return(0);
1247 }