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 "system/filesys.h"
  26 #include "popt_common.h"
  27 #include "smbd/smbd.h"
  28 #include "smbd/globals.h"
  29 #include "registry/reg_init_full.h"
  30 #include "libcli/auth/schannel.h"
  31 #include "secrets.h"
  32 #include "../lib/util/memcache.h"
  33 #include "ctdbd_conn.h"
  34 #include "util_cluster.h"
  35 #include "printing/queue_process.h"
  36 #include "rpc_server/rpc_service_setup.h"
  37 #include "rpc_server/rpc_config.h"
  38 #include "serverid.h"
  39 #include "passdb.h"
  40 #include "auth.h"
  41 #include "messages.h"
  42 #include "smbprofile.h"
  43 #include "lib/id_cache.h"
  44 #include "lib/param/param.h"
  45 #include "lib/background.h"
  46 #include "lib/conn_tdb.h"
  47 #include "../lib/util/pidfile.h"
  48 #include "lib/smbd_shim.h"
  49 #include "scavenger.h"
  50 #include "locking/leases_db.h"
  51 #include "smbd/notifyd/notifyd.h"
  52
  53 #ifdef CLUSTER_SUPPORT
  54 #include "ctdb_protocol.h"
  55 #endif
  56
  57 struct smbd_open_socket;
  58 struct smbd_child_pid;
  59
  60 struct smbd_parent_context {
  61         bool interactive;
  62
  63         struct tevent_context *ev_ctx;
  64         struct messaging_context *msg_ctx;
  65
  66         /* the list of listening sockets */
  67         struct smbd_open_socket *sockets;
  68
  69         /* the list of current child processes */
  70         struct smbd_child_pid *children;
  71         size_t num_children;
  72
  73         struct tevent_timer *cleanup_te;
  74 };
  75
  76 struct smbd_open_socket {
  77         struct smbd_open_socket *prev, *next;
  78         struct smbd_parent_context *parent;
  79         int fd;
  80         struct tevent_fd *fde;
  81 };
  82
  83 struct smbd_child_pid {
  84         struct smbd_child_pid *prev, *next;
  85         pid_t pid;
  86 };
  87
  88 extern void start_epmd(struct tevent_context *ev_ctx,
  89                        struct messaging_context *msg_ctx);
  90
  91 extern void start_lsasd(struct tevent_context *ev_ctx,
  92                         struct messaging_context *msg_ctx);
  93
  94 extern void start_fssd(struct tevent_context *ev_ctx,
  95                        struct messaging_context *msg_ctx);
  96
  97 extern void start_mdssd(struct tevent_context *ev_ctx,
  98                         struct messaging_context *msg_ctx);
  99
 100 /*******************************************************************
 101  What to do when smb.conf is updated.
 102  ********************************************************************/
 103
 104 static void smbd_parent_conf_updated(struct messaging_context *msg,
 105                                      void *private_data,
 106                                      uint32_t msg_type,
 107                                      struct server_id server_id,
 108                                      DATA_BLOB *data)
 109 {
 110         struct tevent_context *ev_ctx =
 111                 talloc_get_type_abort(private_data, struct tevent_context);
 112
 113         DEBUG(10,("smbd_parent_conf_updated: Got message saying smb.conf was "
 114                   "updated. Reloading.\n"));
 115         change_to_root_user();
 116         reload_services(NULL, NULL, false);
 117         printing_subsystem_update(ev_ctx, msg, false);
 118 }
 119
 120 /*******************************************************************
 121  Delete a statcache entry.
 122  ********************************************************************/
 123
 124 static void smb_stat_cache_delete(struct messaging_context *msg,
 125                                   void *private_data,
 126                                   uint32_t msg_tnype,
 127                                   struct server_id server_id,
 128                                   DATA_BLOB *data)
 129 {
 130         const char *name = (const char *)data->data;
 131         DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
 132         stat_cache_delete(name);
 133 }
 134
 135 /****************************************************************************
 136   Send a SIGTERM to our process group.
 137 *****************************************************************************/
 138
 139 static void  killkids(void)
 140 {
 141         if(am_parent) kill(0,SIGTERM);
 142 }
 143
 144 static void msg_exit_server(struct messaging_context *msg,
 145                             void *private_data,
 146                             uint32_t msg_type,
 147                             struct server_id server_id,
 148                             DATA_BLOB *data)
 149 {
 150         DEBUG(3, ("got a SHUTDOWN message\n"));
 151         exit_server_cleanly(NULL);
 152 }
 153
 154 #ifdef DEVELOPER
 155 static void msg_inject_fault(struct messaging_context *msg,
 156                              void *private_data,
 157                              uint32_t msg_type,
 158                              struct server_id src,
 159                              DATA_BLOB *data)
 160 {
 161         int sig;
 162         struct server_id_buf tmp;
 163
 164         if (data->length != sizeof(sig)) {
 165                 DEBUG(0, ("Process %s sent bogus signal injection request\n",
 166                           server_id_str_buf(src, &tmp)));
 167                 return;
 168         }
 169
 170         sig = *(int *)data->data;
 171         if (sig == -1) {
 172                 exit_server("internal error injected");
 173                 return;
 174         }
 175
 176 #if HAVE_STRSIGNAL
 177         DEBUG(0, ("Process %s requested injection of signal %d (%s)\n",
 178                   server_id_str_buf(src, &tmp), sig, strsignal(sig)));
 179 #else
 180         DEBUG(0, ("Process %s requested injection of signal %d\n",
 181                   server_id_str_buf(src, &tmp), sig));
 182 #endif
 183
 184         kill(getpid(), sig);
 185 }
 186 #endif /* DEVELOPER */
 187
 188 static NTSTATUS messaging_send_to_children(struct messaging_context *msg_ctx,
 189                                            uint32_t msg_type, DATA_BLOB* data)
 190 {
 191         NTSTATUS status;
 192         struct smbd_parent_context *parent = am_parent;
 193         struct smbd_child_pid *child;
 194
 195         if (parent == NULL) {
 196                 return NT_STATUS_INTERNAL_ERROR;
 197         }
 198
 199         for (child = parent->children; child != NULL; child = child->next) {
 200                 status = messaging_send(parent->msg_ctx,
 201                                         pid_to_procid(child->pid),
 202                                         msg_type, data);
 203                 if (!NT_STATUS_IS_OK(status)) {
 204                         return status;
 205                 }
 206         }
 207         return NT_STATUS_OK;
 208 }
 209
 210 static void smb_parent_send_to_children(struct messaging_context *ctx,
 211                                         void* data,
 212                                         uint32_t msg_type,
 213                                         struct server_id srv_id,
 214                                         DATA_BLOB* msg_data)
 215 {
 216         messaging_send_to_children(ctx, msg_type, msg_data);
 217 }
 218
 219 /*
 220  * Parent smbd process sets its own debug level first and then
 221  * sends a message to all the smbd children to adjust their debug
 222  * level to that of the parent.
 223  */
 224
 225 static void smbd_msg_debug(struct messaging_context *msg_ctx,
 226                            void *private_data,
 227                            uint32_t msg_type,
 228                            struct server_id server_id,
 229                            DATA_BLOB *data)
 230 {
 231         debug_message(msg_ctx, private_data, MSG_DEBUG, server_id, data);
 232
 233         messaging_send_to_children(msg_ctx, MSG_DEBUG, data);
 234 }
 235
 236 static void smbd_parent_id_cache_kill(struct messaging_context *msg_ctx,
 237                                       void *private_data,
 238                                       uint32_t msg_type,
 239                                       struct server_id server_id,
 240                                       DATA_BLOB* data)
 241 {
 242         const char *msg = (data && data->data)
 243                 ? (const char *)data->data : "<NULL>";
 244         struct id_cache_ref id;
 245
 246         if (!id_cache_ref_parse(msg, &id)) {
 247                 DEBUG(0, ("Invalid ?ID: %s\n", msg));
 248                 return;
 249         }
 250
 251         id_cache_delete_from_cache(&id);
 252
 253         messaging_send_to_children(msg_ctx, msg_type, data);
 254 }
 255
 256 static void smbd_parent_id_cache_delete(struct messaging_context *ctx,
 257                                         void* data,
 258                                         uint32_t msg_type,
 259                                         struct server_id srv_id,
 260                                         DATA_BLOB* msg_data)
 261 {
 262         id_cache_delete_message(ctx, data, msg_type, srv_id, msg_data);
 263
 264         messaging_send_to_children(ctx, msg_type, msg_data);
 265 }
 266
 267 #ifdef CLUSTER_SUPPORT
 268 static int smbd_parent_ctdb_reconfigured(
 269         uint32_t src_vnn, uint32_t dst_vnn, uint64_t dst_srvid,
 270         const uint8_t *msg, size_t msglen, void *private_data)
 271 {
 272         struct messaging_context *msg_ctx = talloc_get_type_abort(
 273                 private_data, struct messaging_context);
 274
 275         DEBUG(10, ("Got %s message\n", (dst_srvid == CTDB_SRVID_RECONFIGURE)
 276                    ? "cluster reconfigure" : "SAMBA_NOTIFY"));
 277
 278         /*
 279          * Someone from the family died, validate our locks
 280          */
 281
 282         messaging_send_buf(msg_ctx, messaging_server_id(msg_ctx),
 283                            MSG_SMB_BRL_VALIDATE, NULL, 0);
 284
 285         return 0;
 286 }
 287 #endif
 288
 289 static void add_child_pid(struct smbd_parent_context *parent,
 290                           pid_t pid)
 291 {
 292         struct smbd_child_pid *child;
 293
 294         child = talloc_zero(parent, struct smbd_child_pid);
 295         if (child == NULL) {
 296                 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
 297                 return;
 298         }
 299         child->pid = pid;
 300         DLIST_ADD(parent->children, child);
 301         parent->num_children += 1;
 302 }
 303
 304 static void smb_tell_num_children(struct messaging_context *ctx, void *data,
 305                                   uint32_t msg_type, struct server_id srv_id,
 306                                   DATA_BLOB *msg_data)
 307 {
 308         uint8_t buf[sizeof(uint32_t)];
 309
 310         if (am_parent) {
 311                 SIVAL(buf, 0, am_parent->num_children);
 312                 messaging_send_buf(ctx, srv_id, MSG_SMB_NUM_CHILDREN,
 313                                    buf, sizeof(buf));
 314         }
 315 }
 316
 317 static void notifyd_stopped(struct tevent_req *req);
 318
 319 static struct tevent_req *notifyd_req(struct messaging_context *msg_ctx,
 320                                       struct tevent_context *ev)
 321 {
 322         struct tevent_req *req;
 323         sys_notify_watch_fn sys_notify_watch = NULL;
 324         struct sys_notify_context *sys_notify_ctx = NULL;
 325
 326         if (lp_kernel_change_notify()) {
 327
 328 #ifdef HAVE_INOTIFY
 329                 if (lp_parm_bool(-1, "notify", "inotify", true)) {
 330                         sys_notify_watch = inotify_watch;
 331                 }
 332 #endif
 333
 334 #ifdef HAVE_FAM
 335                 if (lp_parm_bool(-1, "notify", "fam",
 336                                  (sys_notify_watch == NULL))) {
 337                         sys_notify_watch = fam_watch;
 338                 }
 339 #endif
 340         }
 341
 342         if (sys_notify_watch != NULL) {
 343                 sys_notify_ctx = sys_notify_context_create(msg_ctx, ev);
 344                 if (sys_notify_ctx == NULL) {
 345                         return NULL;
 346                 }
 347         }
 348
 349         req = notifyd_send(msg_ctx, ev, msg_ctx,
 350                            messaging_ctdbd_connection(),
 351                            sys_notify_watch, sys_notify_ctx);
 352         if (req == NULL) {
 353                 TALLOC_FREE(sys_notify_ctx);
 354                 return NULL;
 355         }
 356         tevent_req_set_callback(req, notifyd_stopped, msg_ctx);
 357
 358         return req;
 359 }
 360
 361 static void notifyd_stopped(struct tevent_req *req)
 362 {
 363         int ret;
 364
 365         ret = notifyd_recv(req);
 366         TALLOC_FREE(req);
 367         DEBUG(1, ("notifyd stopped: %s\n", strerror(ret)));
 368 }
 369
 370 static bool smbd_notifyd_init(struct messaging_context *msg, bool interactive)
 371 {
 372         struct tevent_context *ev = messaging_tevent_context(msg);
 373         struct tevent_req *req;
 374         pid_t pid;
 375         NTSTATUS status;
 376
 377         if (interactive) {
 378                 req = notifyd_req(msg, ev);
 379                 return (req != NULL);
 380         }
 381
 382         pid = fork();
 383         if (pid == -1) {
 384                 DEBUG(1, ("%s: fork failed: %s\n", __func__,
 385                           strerror(errno)));
 386                 return false;
 387         }
 388
 389         if (pid != 0) {
 390                 return true;
 391         }
 392
 393         status = reinit_after_fork(msg, ev, true, "smbd-notifyd");
 394         if (!NT_STATUS_IS_OK(status)) {
 395                 DEBUG(1, ("%s: reinit_after_fork failed: %s\n",
 396                           __func__, nt_errstr(status)));
 397                 exit(1);
 398         }
 399
 400         req = notifyd_req(msg, ev);
 401         if (req == NULL) {
 402                 exit(1);
 403         }
 404         tevent_req_set_callback(req, notifyd_stopped, msg);
 405         return tevent_req_poll(req, ev);
 406 }
 407
 408 /*
 409   at most every smbd:cleanuptime seconds (default 20), we scan the BRL
 410   and locking database for entries to cleanup. As a side effect this
 411   also cleans up dead entries in the connections database (due to the
 412   traversal in message_send_all()
 413
 414   Using a timer for this prevents a flood of traversals when a large
 415   number of clients disconnect at the same time (perhaps due to a
 416   network outage).
 417 */
 418
 419 static void cleanup_timeout_fn(struct tevent_context *event_ctx,
 420                                 struct tevent_timer *te,
 421                                 struct timeval now,
 422                                 void *private_data)
 423 {
 424         struct smbd_parent_context *parent =
 425                 talloc_get_type_abort(private_data,
 426                 struct smbd_parent_context);
 427
 428         parent->cleanup_te = NULL;
 429
 430         DEBUG(1,("Cleaning up brl and lock database after unclean shutdown\n"));
 431         message_send_all(parent->msg_ctx, MSG_SMB_UNLOCK, NULL, 0, NULL);
 432         messaging_send_buf(parent->msg_ctx,
 433                            messaging_server_id(parent->msg_ctx),
 434                            MSG_SMB_BRL_VALIDATE, NULL, 0);
 435 }
 436
 437 static void remove_child_pid(struct smbd_parent_context *parent,
 438                              pid_t pid,
 439                              bool unclean_shutdown)
 440 {
 441         struct smbd_child_pid *child;
 442         struct server_id child_id;
 443         int ret;
 444
 445         child_id = pid_to_procid(pid);
 446
 447         ret = messaging_cleanup(parent->msg_ctx, pid);
 448
 449         if ((ret != 0) && (ret != ENOENT)) {
 450                 DEBUG(10, ("%s: messaging_cleanup returned %s\n",
 451                            __func__, strerror(ret)));
 452         }
 453
 454         smbprofile_cleanup(pid);
 455
 456         for (child = parent->children; child != NULL; child = child->next) {
 457                 if (child->pid == pid) {
 458                         struct smbd_child_pid *tmp = child;
 459                         DLIST_REMOVE(parent->children, child);
 460                         TALLOC_FREE(tmp);
 461                         parent->num_children -= 1;
 462                         break;
 463                 }
 464         }
 465
 466         if (child == NULL) {
 467                 /* not all forked child processes are added to the children list */
 468                 DEBUG(2, ("Could not find child %d -- ignoring\n", (int)pid));
 469                 return;
 470         }
 471
 472         if (unclean_shutdown) {
 473                 /* a child terminated uncleanly so tickle all
 474                    processes to see if they can grab any of the
 475                    pending locks
 476                 */
 477                 DEBUG(3,(__location__ " Unclean shutdown of pid %u\n",
 478                         (unsigned int)pid));
 479                 if (parent->cleanup_te == NULL) {
 480                         /* call the cleanup timer, but not too often */
 481                         int cleanup_time = lp_parm_int(-1, "smbd", "cleanuptime", 20);
 482                         parent->cleanup_te = tevent_add_timer(parent->ev_ctx,
 483                                                 parent,
 484                                                 timeval_current_ofs(cleanup_time, 0),
 485                                                 cleanup_timeout_fn,
 486                                                 parent);
 487                         DEBUG(1,("Scheduled cleanup of brl and lock database after unclean shutdown\n"));
 488                 }
 489         }
 490
 491         if (!serverid_deregister(child_id)) {
 492                 DEBUG(1, ("Could not remove pid %d from serverid.tdb\n",
 493                           (int)pid));
 494         }
 495 }
 496
 497 /****************************************************************************
 498  Have we reached the process limit ?
 499 ****************************************************************************/
 500
 501 static bool allowable_number_of_smbd_processes(struct smbd_parent_context *parent)
 502 {
 503         int max_processes = lp_max_smbd_processes();
 504
 505         if (!max_processes)
 506                 return True;
 507
 508         return parent->num_children < max_processes;
 509 }
 510
 511 static void smbd_sig_chld_handler(struct tevent_context *ev,
 512                                   struct tevent_signal *se,
 513                                   int signum,
 514                                   int count,
 515                                   void *siginfo,
 516                                   void *private_data)
 517 {
 518         pid_t pid;
 519         int status;
 520         struct smbd_parent_context *parent =
 521                 talloc_get_type_abort(private_data,
 522                 struct smbd_parent_context);
 523
 524         while ((pid = sys_waitpid(-1, &status, WNOHANG)) > 0) {
 525                 bool unclean_shutdown = False;
 526
 527                 /* If the child terminated normally, assume
 528                    it was an unclean shutdown unless the
 529                    status is 0
 530                 */
 531                 if (WIFEXITED(status)) {
 532                         unclean_shutdown = WEXITSTATUS(status);
 533                 }
 534                 /* If the child terminated due to a signal
 535                    we always assume it was unclean.
 536                 */
 537                 if (WIFSIGNALED(status)) {
 538                         unclean_shutdown = True;
 539                 }
 540                 remove_child_pid(parent, pid, unclean_shutdown);
 541         }
 542 }
 543
 544 static void smbd_setup_sig_chld_handler(struct smbd_parent_context *parent)
 545 {
 546         struct tevent_signal *se;
 547
 548         se = tevent_add_signal(parent->ev_ctx,
 549                                parent, /* mem_ctx */
 550                                SIGCHLD, 0,
 551                                smbd_sig_chld_handler,
 552                                parent);
 553         if (!se) {
 554                 exit_server("failed to setup SIGCHLD handler");
 555         }
 556 }
 557
 558 static void smbd_open_socket_close_fn(struct tevent_context *ev,
 559                                       struct tevent_fd *fde,
 560                                       int fd,
 561                                       void *private_data)
 562 {
 563         /* this might be the socket_wrapper swrap_close() */
 564         close(fd);
 565 }
 566
 567 static void smbd_accept_connection(struct tevent_context *ev,
 568                                    struct tevent_fd *fde,
 569                                    uint16_t flags,
 570                                    void *private_data)
 571 {
 572         struct smbd_open_socket *s = talloc_get_type_abort(private_data,
 573                                      struct smbd_open_socket);
 574         struct messaging_context *msg_ctx = s->parent->msg_ctx;
 575         struct sockaddr_storage addr;
 576         socklen_t in_addrlen = sizeof(addr);
 577         int fd;
 578         pid_t pid = 0;
 579
 580         fd = accept(s->fd, (struct sockaddr *)(void *)&addr,&in_addrlen);
 581         if (fd == -1 && errno == EINTR)
 582                 return;
 583
 584         if (fd == -1) {
 585                 DEBUG(0,("accept: %s\n",
 586                          strerror(errno)));
 587                 return;
 588         }
 589
 590         if (s->parent->interactive) {
 591                 reinit_after_fork(msg_ctx, ev, true, NULL);
 592                 smbd_process(ev, msg_ctx, fd, true);
 593                 exit_server_cleanly("end of interactive mode");
 594                 return;
 595         }
 596
 597         if (!allowable_number_of_smbd_processes(s->parent)) {
 598                 close(fd);
 599                 return;
 600         }
 601
 602         pid = fork();
 603         if (pid == 0) {
 604                 NTSTATUS status = NT_STATUS_OK;
 605
 606                 /*
 607                  * Can't use TALLOC_FREE here. Nulling out the argument to it
 608                  * would overwrite memory we've just freed.
 609                  */
 610                 talloc_free(s->parent);
 611                 s = NULL;
 612
 613                 /* Stop zombies, the parent explicitly handles
 614                  * them, counting worker smbds. */
 615                 CatchChild();
 616
 617                 status = smbd_reinit_after_fork(msg_ctx, ev, true, NULL);
 618                 if (!NT_STATUS_IS_OK(status)) {
 619                         if (NT_STATUS_EQUAL(status,
 620                                             NT_STATUS_TOO_MANY_OPENED_FILES)) {
 621                                 DEBUG(0,("child process cannot initialize "
 622                                          "because too many files are open\n"));
 623                                 goto exit;
 624                         }
 625                         if (lp_clustering() &&
 626                             NT_STATUS_EQUAL(status,
 627                             NT_STATUS_INTERNAL_DB_ERROR)) {
 628                                 DEBUG(1,("child process cannot initialize "
 629                                          "because connection to CTDB "
 630                                          "has failed\n"));
 631                                 goto exit;
 632                         }
 633
 634                         DEBUG(0,("reinit_after_fork() failed\n"));
 635                         smb_panic("reinit_after_fork() failed");
 636                 }
 637
 638                 smbd_process(ev, msg_ctx, fd, false);
 639          exit:
 640                 exit_server_cleanly("end of child");
 641                 return;
 642         }
 643
 644         if (pid < 0) {
 645                 DEBUG(0,("smbd_accept_connection: fork() failed: %s\n",
 646                          strerror(errno)));
 647         }
 648
 649         /* The parent doesn't need this socket */
 650         close(fd);
 651
 652         /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
 653                 Clear the closed fd info out of server_fd --
 654                 and more importantly, out of client_fd in
 655                 util_sock.c, to avoid a possible
 656                 getpeername failure if we reopen the logs
 657                 and use %I in the filename.
 658         */
 659
 660         if (pid != 0) {
 661                 add_child_pid(s->parent, pid);
 662         }
 663
 664         /* Force parent to check log size after
 665          * spawning child.  Fix from
 666          * klausr@ITAP.Physik.Uni-Stuttgart.De.  The
 667          * parent smbd will log to logserver.smb.  It
 668          * writes only two messages for each child
 669          * started/finished. But each child writes,
 670          * say, 50 messages also in logserver.smb,
 671          * begining with the debug_count of the
 672          * parent, before the child opens its own log
 673          * file logserver.client. In a worst case
 674          * scenario the size of logserver.smb would be
 675          * checked after about 50*50=2500 messages
 676          * (ca. 100kb).
 677          * */
 678         force_check_log_size();
 679 }
 680
 681 static bool smbd_open_one_socket(struct smbd_parent_context *parent,
 682                                  struct tevent_context *ev_ctx,
 683                                  const struct sockaddr_storage *ifss,
 684                                  uint16_t port)
 685 {
 686         struct smbd_open_socket *s;
 687
 688         s = talloc(parent, struct smbd_open_socket);
 689         if (!s) {
 690                 return false;
 691         }
 692
 693         s->parent = parent;
 694         s->fd = open_socket_in(SOCK_STREAM,
 695                                port,
 696                                parent->sockets == NULL ? 0 : 2,
 697                                ifss,
 698                                true);
 699         if (s->fd == -1) {
 700                 DEBUG(0,("smbd_open_one_socket: open_socket_in: "
 701                         "%s\n", strerror(errno)));
 702                 TALLOC_FREE(s);
 703                 /*
 704                  * We ignore an error here, as we've done before
 705                  */
 706                 return true;
 707         }
 708
 709         /* ready to listen */
 710         set_socket_options(s->fd, "SO_KEEPALIVE");
 711         set_socket_options(s->fd, lp_socket_options());
 712
 713         /* Set server socket to
 714          * non-blocking for the accept. */
 715         set_blocking(s->fd, False);
 716
 717         if (listen(s->fd, SMBD_LISTEN_BACKLOG) == -1) {
 718                 DEBUG(0,("smbd_open_one_socket: listen: "
 719                         "%s\n", strerror(errno)));
 720                         close(s->fd);
 721                 TALLOC_FREE(s);
 722                 return false;
 723         }
 724
 725         s->fde = tevent_add_fd(ev_ctx,
 726                                s,
 727                                s->fd, TEVENT_FD_READ,
 728                                smbd_accept_connection,
 729                                s);
 730         if (!s->fde) {
 731                 DEBUG(0,("smbd_open_one_socket: "
 732                          "tevent_add_fd: %s\n",
 733                          strerror(errno)));
 734                 close(s->fd);
 735                 TALLOC_FREE(s);
 736                 return false;
 737         }
 738         tevent_fd_set_close_fn(s->fde, smbd_open_socket_close_fn);
 739
 740         DLIST_ADD_END(parent->sockets, s, struct smbd_open_socket *);
 741
 742         return true;
 743 }
 744
 745 /****************************************************************************
 746  Open the socket communication.
 747 ****************************************************************************/
 748
 749 static bool open_sockets_smbd(struct smbd_parent_context *parent,
 750                               struct tevent_context *ev_ctx,
 751                               struct messaging_context *msg_ctx,
 752                               const char *smb_ports)
 753 {
 754         int num_interfaces = iface_count();
 755         int i,j;
 756         const char **ports;
 757         unsigned dns_port = 0;
 758
 759 #ifdef HAVE_ATEXIT
 760         atexit(killkids);
 761 #endif
 762
 763         /* Stop zombies */
 764         smbd_setup_sig_chld_handler(parent);
 765
 766         ports = lp_smb_ports();
 767
 768         /* use a reasonable default set of ports - listing on 445 and 139 */
 769         if (smb_ports) {
 770                 char **l;
 771                 l = str_list_make_v3(talloc_tos(), smb_ports, NULL);
 772                 ports = discard_const_p(const char *, l);
 773         }
 774
 775         for (j = 0; ports && ports[j]; j++) {
 776                 unsigned port = atoi(ports[j]);
 777
 778                 if (port == 0 || port > 0xffff) {
 779                         exit_server_cleanly("Invalid port in the config or on "
 780                                             "the commandline specified!");
 781                 }
 782         }
 783
 784         if (lp_interfaces() && lp_bind_interfaces_only()) {
 785                 /* We have been given an interfaces line, and been
 786                    told to only bind to those interfaces. Create a
 787                    socket per interface and bind to only these.
 788                 */
 789
 790                 /* Now open a listen socket for each of the
 791                    interfaces. */
 792                 for(i = 0; i < num_interfaces; i++) {
 793                         const struct sockaddr_storage *ifss =
 794                                         iface_n_sockaddr_storage(i);
 795                         if (ifss == NULL) {
 796                                 DEBUG(0,("open_sockets_smbd: "
 797                                         "interface %d has NULL IP address !\n",
 798                                         i));
 799                                 continue;
 800                         }
 801
 802                         for (j = 0; ports && ports[j]; j++) {
 803                                 unsigned port = atoi(ports[j]);
 804
 805                                 /* Keep the first port for mDNS service
 806                                  * registration.
 807                                  */
 808                                 if (dns_port == 0) {
 809                                         dns_port = port;
 810                                 }
 811
 812                                 if (!smbd_open_one_socket(parent,
 813                                                           ev_ctx,
 814                                                           ifss,
 815                                                           port)) {
 816                                         return false;
 817                                 }
 818                         }
 819                 }
 820         } else {
 821                 /* Just bind to 0.0.0.0 - accept connections
 822                    from anywhere. */
 823
 824                 const char *sock_addr;
 825                 char *sock_tok;
 826                 const char *sock_ptr;
 827
 828 #if HAVE_IPV6
 829                 sock_addr = "::,0.0.0.0";
 830 #else
 831                 sock_addr = "0.0.0.0";
 832 #endif
 833
 834                 for (sock_ptr=sock_addr;
 835                      next_token_talloc(talloc_tos(), &sock_ptr, &sock_tok, " \t,"); ) {
 836                         for (j = 0; ports && ports[j]; j++) {
 837                                 struct sockaddr_storage ss;
 838                                 unsigned port = atoi(ports[j]);
 839
 840                                 /* Keep the first port for mDNS service
 841                                  * registration.
 842                                  */
 843                                 if (dns_port == 0) {
 844                                         dns_port = port;
 845                                 }
 846
 847                                 /* open an incoming socket */
 848                                 if (!interpret_string_addr(&ss, sock_tok,
 849                                                 AI_NUMERICHOST|AI_PASSIVE)) {
 850                                         continue;
 851                                 }
 852
 853                                 /*
 854                                  * If we fail to open any sockets
 855                                  * in this loop the parent-sockets == NULL
 856                                  * case below will prevent us from starting.
 857                                  */
 858
 859                                 (void)smbd_open_one_socket(parent,
 860                                                   ev_ctx,
 861                                                   &ss,
 862                                                   port);
 863                         }
 864                 }
 865         }
 866
 867         if (parent->sockets == NULL) {
 868                 DEBUG(0,("open_sockets_smbd: No "
 869                         "sockets available to bind to.\n"));
 870                 return false;
 871         }
 872
 873         /* Setup the main smbd so that we can get messages. Note that
 874            do this after starting listening. This is needed as when in
 875            clustered mode, ctdb won't allow us to start doing database
 876            operations until it has gone thru a full startup, which
 877            includes checking to see that smbd is listening. */
 878
 879         if (!serverid_register(messaging_server_id(msg_ctx),
 880                                FLAG_MSG_GENERAL|FLAG_MSG_SMBD
 881                                |FLAG_MSG_PRINT_GENERAL
 882                                |FLAG_MSG_DBWRAP)) {
 883                 DEBUG(0, ("open_sockets_smbd: Failed to register "
 884                           "myself in serverid.tdb\n"));
 885                 return false;
 886         }
 887
 888         /* Listen to messages */
 889
 890         messaging_register(msg_ctx, NULL, MSG_SHUTDOWN, msg_exit_server);
 891         messaging_register(msg_ctx, ev_ctx, MSG_SMB_CONF_UPDATED,
 892                            smbd_parent_conf_updated);
 893         messaging_register(msg_ctx, NULL, MSG_SMB_STAT_CACHE_DELETE,
 894                            smb_stat_cache_delete);
 895         messaging_register(msg_ctx, NULL, MSG_DEBUG, smbd_msg_debug);
 896         messaging_register(msg_ctx, NULL, MSG_SMB_BRL_VALIDATE,
 897                            brl_revalidate);
 898         messaging_register(msg_ctx, NULL, MSG_SMB_FORCE_TDIS,
 899                            smb_parent_send_to_children);
 900         messaging_register(msg_ctx, NULL, MSG_SMB_KILL_CLIENT_IP,
 901                            smb_parent_send_to_children);
 902         messaging_register(msg_ctx, NULL, MSG_SMB_TELL_NUM_CHILDREN,
 903                            smb_tell_num_children);
 904
 905         messaging_register(msg_ctx, NULL,
 906                            ID_CACHE_DELETE, smbd_parent_id_cache_delete);
 907         messaging_register(msg_ctx, NULL,
 908                            ID_CACHE_KILL, smbd_parent_id_cache_kill);
 909
 910 #ifdef CLUSTER_SUPPORT
 911         if (lp_clustering()) {
 912                 struct ctdbd_connection *conn = messaging_ctdbd_connection();
 913
 914                 register_with_ctdbd(conn, CTDB_SRVID_RECONFIGURE,
 915                                     smbd_parent_ctdb_reconfigured, msg_ctx);
 916                 register_with_ctdbd(conn, CTDB_SRVID_SAMBA_NOTIFY,
 917                                     smbd_parent_ctdb_reconfigured, msg_ctx);
 918         }
 919 #endif
 920
 921 #ifdef DEVELOPER
 922         messaging_register(msg_ctx, NULL, MSG_SMB_INJECT_FAULT,
 923                            msg_inject_fault);
 924 #endif
 925
 926         if (lp_multicast_dns_register() && (dns_port != 0)) {
 927 #ifdef WITH_DNSSD_SUPPORT
 928                 smbd_setup_mdns_registration(ev_ctx,
 929                                              parent, dns_port);
 930 #endif
 931 #ifdef WITH_AVAHI_SUPPORT
 932                 void *avahi_conn;
 933
 934                 avahi_conn = avahi_start_register(ev_ctx,
 935                                                   ev_ctx,
 936                                                   dns_port);
 937                 if (avahi_conn == NULL) {
 938                         DEBUG(10, ("avahi_start_register failed\n"));
 939                 }
 940 #endif
 941         }
 942
 943         return true;
 944 }
 945
 946
 947 /*
 948   handle stdin becoming readable when we are in --foreground mode
 949  */
 950 static void smbd_stdin_handler(struct tevent_context *ev,
 951                                struct tevent_fd *fde,
 952                                uint16_t flags,
 953                                void *private_data)
 954 {
 955         char c;
 956         if (read(0, &c, 1) != 1) {
 957                 /* we have reached EOF on stdin, which means the
 958                    parent has exited. Shutdown the server */
 959                 exit_server_cleanly("EOF on stdin");
 960         }
 961 }
 962
 963 struct smbd_parent_tevent_trace_state {
 964         TALLOC_CTX *frame;
 965 };
 966
 967 static void smbd_parent_tevent_trace_callback(enum tevent_trace_point point,
 968                                               void *private_data)
 969 {
 970         struct smbd_parent_tevent_trace_state *state =
 971                 (struct smbd_parent_tevent_trace_state *)private_data;
 972
 973         switch (point) {
 974         case TEVENT_TRACE_BEFORE_WAIT:
 975                 break;
 976         case TEVENT_TRACE_AFTER_WAIT:
 977                 break;
 978         case TEVENT_TRACE_BEFORE_LOOP_ONCE:
 979                 TALLOC_FREE(state->frame);
 980                 state->frame = talloc_stackframe();
 981                 break;
 982         case TEVENT_TRACE_AFTER_LOOP_ONCE:
 983                 TALLOC_FREE(state->frame);
 984                 break;
 985         }
 986
 987         errno = 0;
 988 }
 989
 990 static void smbd_parent_loop(struct tevent_context *ev_ctx,
 991                              struct smbd_parent_context *parent)
 992 {
 993         struct smbd_parent_tevent_trace_state trace_state = {
 994                 .frame = NULL,
 995         };
 996         int ret = 0;
 997
 998         tevent_set_trace_callback(ev_ctx, smbd_parent_tevent_trace_callback,
 999                                   &trace_state);
1000
1001         /* now accept incoming connections - forking a new process
1002            for each incoming connection */
1003         DEBUG(2,("waiting for connections\n"));
1004
1005         ret = tevent_loop_wait(ev_ctx);
1006         if (ret != 0) {
1007                 DEBUG(0, ("tevent_loop_wait failed: %d, %s, exiting\n",
1008                           ret, strerror(errno)));
1009         }
1010
1011         TALLOC_FREE(trace_state.frame);
1012
1013 /* NOTREACHED   return True; */
1014 }
1015
1016
1017 /****************************************************************************
1018  Initialise connect, service and file structs.
1019 ****************************************************************************/
1020
1021 static bool init_structs(void )
1022 {
1023         /*
1024          * Set the machine NETBIOS name if not already
1025          * set from the config file.
1026          */
1027
1028         if (!init_names())
1029                 return False;
1030
1031         if (!secrets_init())
1032                 return False;
1033
1034         return True;
1035 }
1036
1037 static void smbd_parent_sig_term_handler(struct tevent_context *ev,
1038                                          struct tevent_signal *se,
1039                                          int signum,
1040                                          int count,
1041                                          void *siginfo,
1042                                          void *private_data)
1043 {
1044         exit_server_cleanly("termination signal");
1045 }
1046
1047 static void smbd_parent_sig_hup_handler(struct tevent_context *ev,
1048                                         struct tevent_signal *se,
1049                                         int signum,
1050                                         int count,
1051                                         void *siginfo,
1052                                         void *private_data)
1053 {
1054         struct smbd_parent_context *parent =
1055                 talloc_get_type_abort(private_data,
1056                 struct smbd_parent_context);
1057
1058         change_to_root_user();
1059         DEBUG(1,("parent: Reloading services after SIGHUP\n"));
1060         reload_services(NULL, NULL, false);
1061
1062         printing_subsystem_update(parent->ev_ctx, parent->msg_ctx, true);
1063 }
1064
1065 /****************************************************************************
1066  main program.
1067 ****************************************************************************/
1068
1069 /* Declare prototype for build_options() to avoid having to run it through
1070    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
1071    prototype generation system is too complicated. */
1072
1073 extern void build_options(bool screen);
1074
1075  int main(int argc,const char *argv[])
1076 {
1077         /* shall I run as a daemon */
1078         bool is_daemon = false;
1079         bool interactive = false;
1080         bool Fork = true;
1081         bool no_process_group = false;
1082         bool log_stdout = false;
1083         char *ports = NULL;
1084         char *profile_level = NULL;
1085         int opt;
1086         poptContext pc;
1087         bool print_build_options = False;
1088         enum {
1089                 OPT_DAEMON = 1000,
1090                 OPT_INTERACTIVE,
1091                 OPT_FORK,
1092                 OPT_NO_PROCESS_GROUP,
1093                 OPT_LOG_STDOUT
1094         };
1095         struct poptOption long_options[] = {
1096         POPT_AUTOHELP
1097         {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
1098         {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)"},
1099         {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools, etc.)" },
1100         {"no-process-group", '\0', POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
1101         {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
1102         {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
1103         {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
1104         {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
1105         POPT_COMMON_SAMBA
1106         POPT_TABLEEND
1107         };
1108         struct smbd_parent_context *parent = NULL;
1109         TALLOC_CTX *frame;
1110         NTSTATUS status;
1111         struct tevent_context *ev_ctx;
1112         struct messaging_context *msg_ctx;
1113         struct server_id server_id;
1114         struct tevent_signal *se;
1115         int profiling_level;
1116         char *np_dir = NULL;
1117         static const struct smbd_shim smbd_shim_fns =
1118         {
1119                 .cancel_pending_lock_requests_by_fid = smbd_cancel_pending_lock_requests_by_fid,
1120                 .send_stat_cache_delete_message = smbd_send_stat_cache_delete_message,
1121                 .change_to_root_user = smbd_change_to_root_user,
1122                 .become_authenticated_pipe_user = smbd_become_authenticated_pipe_user,
1123                 .unbecome_authenticated_pipe_user = smbd_unbecome_authenticated_pipe_user,
1124
1125                 .contend_level2_oplocks_begin = smbd_contend_level2_oplocks_begin,
1126                 .contend_level2_oplocks_end = smbd_contend_level2_oplocks_end,
1127
1128                 .become_root = smbd_become_root,
1129                 .unbecome_root = smbd_unbecome_root,
1130
1131                 .exit_server = smbd_exit_server,
1132                 .exit_server_cleanly = smbd_exit_server_cleanly,
1133         };
1134
1135         /*
1136          * Do this before any other talloc operation
1137          */
1138         talloc_enable_null_tracking();
1139         frame = talloc_stackframe();
1140
1141         setup_logging(argv[0], DEBUG_DEFAULT_STDOUT);
1142
1143         smb_init_locale();
1144
1145         set_smbd_shim(&smbd_shim_fns);
1146
1147         smbd_init_globals();
1148
1149         TimeInit();
1150
1151 #ifdef HAVE_SET_AUTH_PARAMETERS
1152         set_auth_parameters(argc,argv);
1153 #endif
1154
1155         pc = poptGetContext("smbd", argc, argv, long_options, 0);
1156         while((opt = poptGetNextOpt(pc)) != -1) {
1157                 switch (opt)  {
1158                 case OPT_DAEMON:
1159                         is_daemon = true;
1160                         break;
1161                 case OPT_INTERACTIVE:
1162                         interactive = true;
1163                         break;
1164                 case OPT_FORK:
1165                         Fork = false;
1166                         break;
1167                 case OPT_NO_PROCESS_GROUP:
1168                         no_process_group = true;
1169                         break;
1170                 case OPT_LOG_STDOUT:
1171                         log_stdout = true;
1172                         break;
1173                 case 'b':
1174                         print_build_options = True;
1175                         break;
1176                 default:
1177                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1178                                   poptBadOption(pc, 0), poptStrerror(opt));
1179                         poptPrintUsage(pc, stderr, 0);
1180                         exit(1);
1181                 }
1182         }
1183         poptFreeContext(pc);
1184
1185         if (interactive) {
1186                 Fork = False;
1187                 log_stdout = True;
1188         }
1189
1190         if (log_stdout) {
1191                 setup_logging(argv[0], DEBUG_STDOUT);
1192         } else {
1193                 setup_logging(argv[0], DEBUG_FILE);
1194         }
1195
1196         if (print_build_options) {
1197                 build_options(True); /* Display output to screen as well as debug */
1198                 exit(0);
1199         }
1200
1201 #ifdef HAVE_SETLUID
1202         /* needed for SecureWare on SCO */
1203         setluid(0);
1204 #endif
1205
1206         set_remote_machine_name("smbd", False);
1207
1208         if (interactive && (DEBUGLEVEL >= 9)) {
1209                 talloc_enable_leak_report();
1210         }
1211
1212         if (log_stdout && Fork) {
1213                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
1214                 exit(1);
1215         }
1216
1217         /*
1218          * We want to die early if we can't open /dev/urandom
1219          */
1220         generate_random_buffer(NULL, 0);
1221
1222         /* get initial effective uid and gid */
1223         sec_init();
1224
1225         /* make absolutely sure we run as root - to handle cases where people
1226            are crazy enough to have it setuid */
1227         gain_root_privilege();
1228         gain_root_group_privilege();
1229
1230         fault_setup();
1231         dump_core_setup("smbd", lp_logfile(talloc_tos()));
1232
1233         /* we are never interested in SIGPIPE */
1234         BlockSignals(True,SIGPIPE);
1235
1236 #if defined(SIGFPE)
1237         /* we are never interested in SIGFPE */
1238         BlockSignals(True,SIGFPE);
1239 #endif
1240
1241 #if defined(SIGUSR2)
1242         /* We are no longer interested in USR2 */
1243         BlockSignals(True,SIGUSR2);
1244 #endif
1245
1246         /* POSIX demands that signals are inherited. If the invoking process has
1247          * these signals masked, we will have problems, as we won't recieve them. */
1248         BlockSignals(False, SIGHUP);
1249         BlockSignals(False, SIGUSR1);
1250         BlockSignals(False, SIGTERM);
1251
1252         /* Ensure we leave no zombies until we
1253          * correctly set up child handling below. */
1254
1255         CatchChild();
1256
1257         /* we want total control over the permissions on created files,
1258            so set our umask to 0 */
1259         umask(0);
1260
1261         reopen_logs();
1262
1263         DEBUG(0,("smbd version %s started.\n", samba_version_string()));
1264         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1265
1266         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1267                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1268
1269         /* Output the build options to the debug log */
1270         build_options(False);
1271
1272         if (sizeof(uint16_t) < 2 || sizeof(uint32_t) < 4) {
1273                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
1274                 exit(1);
1275         }
1276
1277         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1278                 DEBUG(0, ("error opening config file '%s'\n", get_dyn_CONFIGFILE()));
1279                 exit(1);
1280         }
1281
1282         if (!cluster_probe_ok()) {
1283                 exit(1);
1284         }
1285
1286         /* Init the security context and global current_user */
1287         init_sec_ctx();
1288
1289         /*
1290          * Initialize the event context. The event context needs to be
1291          * initialized before the messaging context, cause the messaging
1292          * context holds an event context.
1293          * FIXME: This should be s3_tevent_context_init()
1294          */
1295         ev_ctx = server_event_context();
1296         if (ev_ctx == NULL) {
1297                 exit(1);
1298         }
1299
1300         /*
1301          * Init the messaging context
1302          * FIXME: This should only call messaging_init()
1303          */
1304         msg_ctx = server_messaging_context();
1305         if (msg_ctx == NULL) {
1306                 exit(1);
1307         }
1308
1309         /*
1310          * Reloading of the printers will not work here as we don't have a
1311          * server info and rpc services set up. It will be called later.
1312          */
1313         if (!reload_services(NULL, NULL, false)) {
1314                 exit(1);
1315         }
1316
1317         if (lp_server_role() == ROLE_ACTIVE_DIRECTORY_DC
1318             && !lp_parm_bool(-1, "server role check", "inhibit", false)) {
1319                 DEBUG(0, ("server role = 'active directory domain controller' not compatible with running smbd standalone. \n"));
1320                 DEBUGADD(0, ("You should start 'samba' instead, and it will control starting smbd if required\n"));
1321                 exit(1);
1322         }
1323
1324         /* ...NOTE... Log files are working from this point! */
1325
1326         DEBUG(3,("loaded services\n"));
1327
1328         init_structs();
1329
1330         if (!profile_setup(msg_ctx, False)) {
1331                 DEBUG(0,("ERROR: failed to setup profiling\n"));
1332                 return -1;
1333         }
1334
1335         if (profile_level != NULL) {
1336                 profiling_level = atoi(profile_level);
1337         } else {
1338                 profiling_level = lp_smbd_profiling_level();
1339         }
1340         set_profile_level(profiling_level, messaging_server_id(msg_ctx));
1341
1342         if (!is_daemon && !is_a_socket(0)) {
1343                 if (!interactive) {
1344                         DEBUG(3, ("Standard input is not a socket, "
1345                                   "assuming -D option\n"));
1346                 }
1347
1348                 /*
1349                  * Setting is_daemon here prevents us from eventually calling
1350                  * the open_sockets_inetd()
1351                  */
1352
1353                 is_daemon = True;
1354         }
1355
1356         if (is_daemon && !interactive) {
1357                 DEBUG(3, ("Becoming a daemon.\n"));
1358                 become_daemon(Fork, no_process_group, log_stdout);
1359         }
1360
1361 #if HAVE_SETPGID
1362         /*
1363          * If we're interactive we want to set our own process group for
1364          * signal management.
1365          */
1366         if (interactive && !no_process_group)
1367                 setpgid( (pid_t)0, (pid_t)0);
1368 #endif
1369
1370         if (!directory_exist(lp_lock_directory()))
1371                 mkdir(lp_lock_directory(), 0755);
1372
1373         if (!directory_exist(lp_pid_directory()))
1374                 mkdir(lp_pid_directory(), 0755);
1375
1376         if (is_daemon)
1377                 pidfile_create(lp_pid_directory(), "smbd");
1378
1379         status = reinit_after_fork(msg_ctx, ev_ctx, false, NULL);
1380         if (!NT_STATUS_IS_OK(status)) {
1381                 exit_daemon("reinit_after_fork() failed", map_errno_from_nt_status(status));
1382         }
1383
1384         if (!interactive) {
1385                 /*
1386                  * Do not initialize the parent-child-pipe before becoming a
1387                  * daemon: this is used to detect a died parent in the child
1388                  * process.
1389                  */
1390                 status = init_before_fork();
1391                 if (!NT_STATUS_IS_OK(status)) {
1392                         exit_daemon(nt_errstr(status), map_errno_from_nt_status(status));
1393                 }
1394         }
1395
1396         parent = talloc_zero(ev_ctx, struct smbd_parent_context);
1397         if (!parent) {
1398                 exit_server("talloc(struct smbd_parent_context) failed");
1399         }
1400         parent->interactive = interactive;
1401         parent->ev_ctx = ev_ctx;
1402         parent->msg_ctx = msg_ctx;
1403         am_parent = parent;
1404
1405         se = tevent_add_signal(parent->ev_ctx,
1406                                parent,
1407                                SIGTERM, 0,
1408                                smbd_parent_sig_term_handler,
1409                                parent);
1410         if (!se) {
1411                 exit_server("failed to setup SIGTERM handler");
1412         }
1413         se = tevent_add_signal(parent->ev_ctx,
1414                                parent,
1415                                SIGHUP, 0,
1416                                smbd_parent_sig_hup_handler,
1417                                parent);
1418         if (!se) {
1419                 exit_server("failed to setup SIGHUP handler");
1420         }
1421
1422         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1423
1424         if (smbd_memcache() == NULL) {
1425                 exit_daemon("no memcache available", EACCES);
1426         }
1427
1428         memcache_set_global(smbd_memcache());
1429
1430         /* Initialise the password backed before the global_sam_sid
1431            to ensure that we fetch from ldap before we make a domain sid up */
1432
1433         if(!initialize_password_db(false, ev_ctx))
1434                 exit(1);
1435
1436         if (!secrets_init()) {
1437                 exit_daemon("smbd can not open secrets.tdb", EACCES);
1438         }
1439
1440         if (lp_server_role() == ROLE_DOMAIN_BDC || lp_server_role() == ROLE_DOMAIN_PDC) {
1441                 struct loadparm_context *lp_ctx = loadparm_init_s3(NULL, loadparm_s3_helpers());
1442                 if (!open_schannel_session_store(NULL, lp_ctx)) {
1443                         exit_daemon("ERROR: Samba cannot open schannel store for secured NETLOGON operations.", EACCES);
1444                 }
1445                 TALLOC_FREE(lp_ctx);
1446         }
1447
1448         if(!get_global_sam_sid()) {
1449                 exit_daemon("Samba cannot create a SAM SID", EACCES);
1450         }
1451
1452         server_id = messaging_server_id(msg_ctx);
1453         status = smbXsrv_version_global_init(&server_id);
1454         if (!NT_STATUS_IS_OK(status)) {
1455                 exit_daemon("Samba cannot init server context", EACCES);
1456         }
1457
1458         status = smbXsrv_session_global_init();
1459         if (!NT_STATUS_IS_OK(status)) {
1460                 exit_daemon("Samba cannot init session context", EACCES);
1461         }
1462
1463         status = smbXsrv_tcon_global_init();
1464         if (!NT_STATUS_IS_OK(status)) {
1465                 exit_daemon("Samba cannot init tcon context", EACCES);
1466         }
1467
1468         if (!locking_init())
1469                 exit_daemon("Samba cannot init locking", EACCES);
1470
1471         if (!leases_db_init(false)) {
1472                 exit_daemon("Samba cannot init leases", EACCES);
1473         }
1474
1475         if (!smbd_notifyd_init(msg_ctx, interactive)) {
1476                 exit_daemon("Samba cannot init notification", EACCES);
1477         }
1478
1479         if (!messaging_parent_dgm_cleanup_init(msg_ctx)) {
1480                 exit(1);
1481         }
1482
1483         if (!smbd_scavenger_init(NULL, msg_ctx, ev_ctx)) {
1484                 exit_daemon("Samba cannot init scavenging", EACCES);
1485         }
1486
1487         if (!serverid_parent_init(ev_ctx)) {
1488                 exit_daemon("Samba cannot init server id", EACCES);
1489         }
1490
1491         if (!W_ERROR_IS_OK(registry_init_full()))
1492                 exit_daemon("Samba cannot init registry", EACCES);
1493
1494         /* Open the share_info.tdb here, so we don't have to open
1495            after the fork on every single connection.  This is a small
1496            performance improvment and reduces the total number of system
1497            fds used. */
1498         if (!share_info_db_init()) {
1499                 exit_daemon("ERROR: failed to load share info db.", EACCES);
1500         }
1501
1502         status = init_system_session_info();
1503         if (!NT_STATUS_IS_OK(status)) {
1504                 DEBUG(1, ("ERROR: failed to setup system user info: %s.\n",
1505                           nt_errstr(status)));
1506                 return -1;
1507         }
1508
1509         if (!init_guest_info()) {
1510                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1511                 return -1;
1512         }
1513
1514         if (!file_init_global()) {
1515                 DEBUG(0, ("ERROR: file_init_global() failed\n"));
1516                 return -1;
1517         }
1518         status = smbXsrv_open_global_init();
1519         if (!NT_STATUS_IS_OK(status)) {
1520                 exit_daemon("Samba cannot init global open", map_errno_from_nt_status(status));
1521         }
1522
1523         /* This MUST be done before start_epmd() because otherwise
1524          * start_epmd() forks and races against dcesrv_ep_setup() to
1525          * call directory_create_or_exist() */
1526         if (!directory_create_or_exist(lp_ncalrpc_dir(), 0755)) {
1527                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1528                           lp_ncalrpc_dir(), strerror(errno)));
1529                 return -1;
1530         }
1531
1532         np_dir = talloc_asprintf(talloc_tos(), "%s/np", lp_ncalrpc_dir());
1533         if (!np_dir) {
1534                 DEBUG(0, ("%s: Out of memory\n", __location__));
1535                 return -1;
1536         }
1537
1538         if (!directory_create_or_exist_strict(np_dir, geteuid(), 0700)) {
1539                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1540                           np_dir, strerror(errno)));
1541                 return -1;
1542         }
1543
1544         if (is_daemon && !interactive) {
1545                 if (rpc_epmapper_daemon() == RPC_DAEMON_FORK) {
1546                         start_epmd(ev_ctx, msg_ctx);
1547                 }
1548         }
1549
1550         if (!dcesrv_ep_setup(ev_ctx, msg_ctx)) {
1551                 exit_daemon("Samba cannot setup ep pipe", EACCES);
1552         }
1553
1554         if (is_daemon && !interactive) {
1555                 daemon_ready("smbd");
1556         }
1557
1558         /* only start other daemons if we are running as a daemon
1559          * -- bad things will happen if smbd is launched via inetd
1560          *  and we fork a copy of ourselves here */
1561         if (is_daemon && !interactive) {
1562
1563                 if (rpc_lsasd_daemon() == RPC_DAEMON_FORK) {
1564                         start_lsasd(ev_ctx, msg_ctx);
1565                 }
1566
1567                 if (rpc_fss_daemon() == RPC_DAEMON_FORK) {
1568                         start_fssd(ev_ctx, msg_ctx);
1569                 }
1570
1571                 if (!lp__disable_spoolss() &&
1572                     (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1573                         bool bgq = lp_parm_bool(-1, "smbd", "backgroundqueue", true);
1574
1575                         if (!printing_subsystem_init(ev_ctx, msg_ctx, true, bgq)) {
1576                                 exit_daemon("Samba failed to init printing subsystem", EACCES);
1577                         }
1578                 }
1579
1580 #ifdef WITH_SPOTLIGHT
1581                 if ((rpc_mdssvc_mode() == RPC_SERVICE_MODE_EXTERNAL) &&
1582                     (rpc_mdssd_daemon() == RPC_DAEMON_FORK)) {
1583                         start_mdssd(ev_ctx, msg_ctx);
1584                 }
1585 #endif
1586         } else if (!lp__disable_spoolss() &&
1587                    (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1588                 if (!printing_subsystem_init(ev_ctx, msg_ctx, false, false)) {
1589                         exit(1);
1590                 }
1591         }
1592
1593         if (!is_daemon) {
1594                 int sock;
1595
1596                 /* inetd mode */
1597                 TALLOC_FREE(frame);
1598
1599                 /* Started from inetd. fd 0 is the socket. */
1600                 /* We will abort gracefully when the client or remote system
1601                    goes away */
1602                 sock = dup(0);
1603
1604                 /* close stdin, stdout (if not logging to it), but not stderr */
1605                 close_low_fds(true, !debug_get_output_is_stdout(), false);
1606
1607 #ifdef HAVE_ATEXIT
1608                 atexit(killkids);
1609 #endif
1610
1611                 /* Stop zombies */
1612                 smbd_setup_sig_chld_handler(parent);
1613
1614                 smbd_process(ev_ctx, msg_ctx, sock, true);
1615
1616                 exit_server_cleanly(NULL);
1617                 return(0);
1618         }
1619
1620         if (!open_sockets_smbd(parent, ev_ctx, msg_ctx, ports))
1621                 exit_server("open_sockets_smbd() failed");
1622
1623         /* do a printer update now that all messaging has been set up,
1624          * before we allow clients to start connecting */
1625         if (!lp__disable_spoolss() &&
1626             (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1627                 printing_subsystem_update(ev_ctx, msg_ctx, false);
1628         }
1629
1630         TALLOC_FREE(frame);
1631         /* make sure we always have a valid stackframe */
1632         frame = talloc_stackframe();
1633
1634         if (!Fork) {
1635                 /* if we are running in the foreground then look for
1636                    EOF on stdin, and exit if it happens. This allows
1637                    us to die if the parent process dies
1638                    Only do this on a pipe or socket, no other device.
1639                 */
1640                 struct stat st;
1641                 if (fstat(0, &st) != 0) {
1642                         return false;
1643                 }
1644                 if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode)) {
1645                         tevent_add_fd(ev_ctx,
1646                                         parent,
1647                                         0,
1648                                         TEVENT_FD_READ,
1649                                         smbd_stdin_handler,
1650                                         NULL);
1651                 }
1652         }
1653
1654         smbd_parent_loop(ev_ctx, parent);
1655
1656         exit_server_cleanly(NULL);
1657         TALLOC_FREE(frame);
1658         return(0);
1659 }