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