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                                  const struct sockaddr_storage *ifss,
 666                                  uint16_t port)
 667 {
 668         struct smbd_open_socket *s;
 669
 670         s = talloc(parent, struct smbd_open_socket);
 671         if (!s) {
 672                 return false;
 673         }
 674
 675         s->parent = parent;
 676         s->fd = open_socket_in(SOCK_STREAM,
 677                                port,
 678                                parent->sockets == NULL ? 0 : 2,
 679                                ifss,
 680                                true);
 681         if (s->fd == -1) {
 682                 DEBUG(0,("smbd_open_once_socket: open_socket_in: "
 683                         "%s\n", strerror(errno)));
 684                 TALLOC_FREE(s);
 685                 /*
 686                  * We ignore an error here, as we've done before
 687                  */
 688                 return true;
 689         }
 690
 691         /* ready to listen */
 692         set_socket_options(s->fd, "SO_KEEPALIVE");
 693         set_socket_options(s->fd, lp_socket_options());
 694
 695         /* Set server socket to
 696          * non-blocking for the accept. */
 697         set_blocking(s->fd, False);
 698
 699         if (listen(s->fd, SMBD_LISTEN_BACKLOG) == -1) {
 700                 DEBUG(0,("open_sockets_smbd: listen: "
 701                         "%s\n", strerror(errno)));
 702                         close(s->fd);
 703                 TALLOC_FREE(s);
 704                 return false;
 705         }
 706
 707         s->fde = tevent_add_fd(ev_ctx,
 708                                s,
 709                                s->fd, TEVENT_FD_READ,
 710                                smbd_accept_connection,
 711                                s);
 712         if (!s->fde) {
 713                 DEBUG(0,("open_sockets_smbd: "
 714                          "tevent_add_fd: %s\n",
 715                          strerror(errno)));
 716                 close(s->fd);
 717                 TALLOC_FREE(s);
 718                 return false;
 719         }
 720         tevent_fd_set_close_fn(s->fde, smbd_open_socket_close_fn);
 721
 722         DLIST_ADD_END(parent->sockets, s, struct smbd_open_socket *);
 723
 724         return true;
 725 }
 726
 727 /****************************************************************************
 728  Open the socket communication.
 729 ****************************************************************************/
 730
 731 static bool open_sockets_smbd(struct smbd_parent_context *parent,
 732                               struct tevent_context *ev_ctx,
 733                               struct messaging_context *msg_ctx,
 734                               const char *smb_ports)
 735 {
 736         int num_interfaces = iface_count();
 737         int i,j;
 738         const char **ports;
 739         unsigned dns_port = 0;
 740
 741 #ifdef HAVE_ATEXIT
 742         atexit(killkids);
 743 #endif
 744
 745         /* Stop zombies */
 746         smbd_setup_sig_chld_handler(parent);
 747
 748         ports = lp_smb_ports();
 749
 750         /* use a reasonable default set of ports - listing on 445 and 139 */
 751         if (smb_ports) {
 752                 ports = (const char **)str_list_make_v3(talloc_tos(), smb_ports, NULL);
 753         }
 754
 755         for (j = 0; ports && ports[j]; j++) {
 756                 unsigned port = atoi(ports[j]);
 757
 758                 if (port == 0 || port > 0xffff) {
 759                         exit_server_cleanly("Invalid port in the config or on "
 760                                             "the commandline specified!");
 761                 }
 762         }
 763
 764         if (lp_interfaces() && lp_bind_interfaces_only()) {
 765                 /* We have been given an interfaces line, and been
 766                    told to only bind to those interfaces. Create a
 767                    socket per interface and bind to only these.
 768                 */
 769
 770                 /* Now open a listen socket for each of the
 771                    interfaces. */
 772                 for(i = 0; i < num_interfaces; i++) {
 773                         const struct sockaddr_storage *ifss =
 774                                         iface_n_sockaddr_storage(i);
 775                         if (ifss == NULL) {
 776                                 DEBUG(0,("open_sockets_smbd: "
 777                                         "interface %d has NULL IP address !\n",
 778                                         i));
 779                                 continue;
 780                         }
 781
 782                         for (j = 0; ports && ports[j]; j++) {
 783                                 unsigned port = atoi(ports[j]);
 784
 785                                 /* Keep the first port for mDNS service
 786                                  * registration.
 787                                  */
 788                                 if (dns_port == 0) {
 789                                         dns_port = port;
 790                                 }
 791
 792                                 if (!smbd_open_one_socket(parent,
 793                                                           ev_ctx,
 794                                                           ifss,
 795                                                           port)) {
 796                                         return false;
 797                                 }
 798                         }
 799                 }
 800         } else {
 801                 /* Just bind to 0.0.0.0 - accept connections
 802                    from anywhere. */
 803
 804                 const char *sock_addr;
 805                 char *sock_tok;
 806                 const char *sock_ptr;
 807
 808 #if HAVE_IPV6
 809                 sock_addr = "::,0.0.0.0";
 810 #else
 811                 sock_addr = "0.0.0.0";
 812 #endif
 813
 814                 for (sock_ptr=sock_addr;
 815                      next_token_talloc(talloc_tos(), &sock_ptr, &sock_tok, " \t,"); ) {
 816                         for (j = 0; ports && ports[j]; j++) {
 817                                 struct sockaddr_storage ss;
 818                                 unsigned port = atoi(ports[j]);
 819
 820                                 /* Keep the first port for mDNS service
 821                                  * registration.
 822                                  */
 823                                 if (dns_port == 0) {
 824                                         dns_port = port;
 825                                 }
 826
 827                                 /* open an incoming socket */
 828                                 if (!interpret_string_addr(&ss, sock_tok,
 829                                                 AI_NUMERICHOST|AI_PASSIVE)) {
 830                                         continue;
 831                                 }
 832
 833                                 if (!smbd_open_one_socket(parent,
 834                                                           ev_ctx,
 835                                                           &ss,
 836                                                           port)) {
 837                                         return false;
 838                                 }
 839                         }
 840                 }
 841         }
 842
 843         if (parent->sockets == NULL) {
 844                 DEBUG(0,("open_sockets_smbd: No "
 845                         "sockets available to bind to.\n"));
 846                 return false;
 847         }
 848
 849         /* Setup the main smbd so that we can get messages. Note that
 850            do this after starting listening. This is needed as when in
 851            clustered mode, ctdb won't allow us to start doing database
 852            operations until it has gone thru a full startup, which
 853            includes checking to see that smbd is listening. */
 854
 855         if (!serverid_register(messaging_server_id(msg_ctx),
 856                                FLAG_MSG_GENERAL|FLAG_MSG_SMBD
 857                                |FLAG_MSG_PRINT_GENERAL
 858                                |FLAG_MSG_DBWRAP)) {
 859                 DEBUG(0, ("open_sockets_smbd: Failed to register "
 860                           "myself in serverid.tdb\n"));
 861                 return false;
 862         }
 863
 864         /* Listen to messages */
 865
 866         messaging_register(msg_ctx, NULL, MSG_SHUTDOWN, msg_exit_server);
 867         messaging_register(msg_ctx, ev_ctx, MSG_SMB_CONF_UPDATED,
 868                            smbd_parent_conf_updated);
 869         messaging_register(msg_ctx, NULL, MSG_SMB_STAT_CACHE_DELETE,
 870                            smb_stat_cache_delete);
 871         messaging_register(msg_ctx, NULL, MSG_DEBUG, smbd_msg_debug);
 872         messaging_register(msg_ctx, ev_ctx, MSG_PRINTER_PCAP,
 873                            smb_pcap_updated);
 874         messaging_register(msg_ctx, NULL, MSG_SMB_BRL_VALIDATE,
 875                            brl_revalidate);
 876         messaging_register(msg_ctx, NULL, MSG_SMB_FORCE_TDIS,
 877                            smb_parent_force_tdis);
 878
 879         messaging_register(msg_ctx, NULL,
 880                            ID_CACHE_DELETE, smbd_parent_id_cache_delete);
 881         messaging_register(msg_ctx, NULL,
 882                            ID_CACHE_KILL, smbd_parent_id_cache_kill);
 883
 884 #ifdef CLUSTER_SUPPORT
 885         if (lp_clustering()) {
 886                 ctdbd_register_reconfigure(messaging_ctdbd_connection());
 887         }
 888 #endif
 889
 890 #ifdef DEVELOPER
 891         messaging_register(msg_ctx, NULL, MSG_SMB_INJECT_FAULT,
 892                            msg_inject_fault);
 893 #endif
 894
 895         if (lp_multicast_dns_register() && (dns_port != 0)) {
 896 #ifdef WITH_DNSSD_SUPPORT
 897                 smbd_setup_mdns_registration(ev_ctx,
 898                                              parent, dns_port);
 899 #endif
 900 #ifdef WITH_AVAHI_SUPPORT
 901                 void *avahi_conn;
 902
 903                 avahi_conn = avahi_start_register(ev_ctx,
 904                                                   ev_ctx,
 905                                                   dns_port);
 906                 if (avahi_conn == NULL) {
 907                         DEBUG(10, ("avahi_start_register failed\n"));
 908                 }
 909 #endif
 910         }
 911
 912         return true;
 913 }
 914
 915
 916 /*
 917   handle stdin becoming readable when we are in --foreground mode
 918  */
 919 static void smbd_stdin_handler(struct tevent_context *ev,
 920                                struct tevent_fd *fde,
 921                                uint16_t flags,
 922                                void *private_data)
 923 {
 924         char c;
 925         if (read(0, &c, 1) != 1) {
 926                 /* we have reached EOF on stdin, which means the
 927                    parent has exited. Shutdown the server */
 928                 exit_server_cleanly("EOF on stdin");
 929         }
 930 }
 931
 932 static void smbd_parent_loop(struct tevent_context *ev_ctx,
 933                              struct smbd_parent_context *parent)
 934 {
 935         /* now accept incoming connections - forking a new process
 936            for each incoming connection */
 937         DEBUG(2,("waiting for connections\n"));
 938         while (1) {
 939                 int ret;
 940                 TALLOC_CTX *frame = talloc_stackframe();
 941
 942                 ret = tevent_loop_once(ev_ctx);
 943                 if (ret != 0) {
 944                         exit_server_cleanly("tevent_loop_once() error");
 945                 }
 946
 947                 TALLOC_FREE(frame);
 948         } /* end while 1 */
 949
 950 /* NOTREACHED   return True; */
 951 }
 952
 953
 954 /****************************************************************************
 955  Initialise connect, service and file structs.
 956 ****************************************************************************/
 957
 958 static bool init_structs(void )
 959 {
 960         /*
 961          * Set the machine NETBIOS name if not already
 962          * set from the config file.
 963          */
 964
 965         if (!init_names())
 966                 return False;
 967
 968         if (!secrets_init())
 969                 return False;
 970
 971         return True;
 972 }
 973
 974 static void smbd_parent_sig_term_handler(struct tevent_context *ev,
 975                                          struct tevent_signal *se,
 976                                          int signum,
 977                                          int count,
 978                                          void *siginfo,
 979                                          void *private_data)
 980 {
 981         exit_server_cleanly("termination signal");
 982 }
 983
 984 static void smbd_parent_sig_hup_handler(struct tevent_context *ev,
 985                                         struct tevent_signal *se,
 986                                         int signum,
 987                                         int count,
 988                                         void *siginfo,
 989                                         void *private_data)
 990 {
 991         struct smbd_parent_context *parent =
 992                 talloc_get_type_abort(private_data,
 993                 struct smbd_parent_context);
 994
 995         change_to_root_user();
 996         DEBUG(1,("parent: Reloading services after SIGHUP\n"));
 997         reload_services(NULL, NULL, false);
 998
 999         printing_subsystem_update(parent->ev_ctx, parent->msg_ctx, true);
1000 }
1001
1002 /****************************************************************************
1003  main program.
1004 ****************************************************************************/
1005
1006 /* Declare prototype for build_options() to avoid having to run it through
1007    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
1008    prototype generation system is too complicated. */
1009
1010 extern void build_options(bool screen);
1011
1012  int main(int argc,const char *argv[])
1013 {
1014         /* shall I run as a daemon */
1015         bool is_daemon = false;
1016         bool interactive = false;
1017         bool Fork = true;
1018         bool no_process_group = false;
1019         bool log_stdout = false;
1020         char *ports = NULL;
1021         char *profile_level = NULL;
1022         int opt;
1023         poptContext pc;
1024         bool print_build_options = False;
1025         enum {
1026                 OPT_DAEMON = 1000,
1027                 OPT_INTERACTIVE,
1028                 OPT_FORK,
1029                 OPT_NO_PROCESS_GROUP,
1030                 OPT_LOG_STDOUT
1031         };
1032         struct poptOption long_options[] = {
1033         POPT_AUTOHELP
1034         {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
1035         {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)"},
1036         {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools, etc.)" },
1037         {"no-process-group", '\0', POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
1038         {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
1039         {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
1040         {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
1041         {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
1042         POPT_COMMON_SAMBA
1043         POPT_COMMON_DYNCONFIG
1044         POPT_TABLEEND
1045         };
1046         struct smbd_parent_context *parent = NULL;
1047         TALLOC_CTX *frame;
1048         NTSTATUS status;
1049         struct tevent_context *ev_ctx;
1050         struct messaging_context *msg_ctx;
1051         struct server_id server_id;
1052         struct tevent_signal *se;
1053         char *np_dir = NULL;
1054         static const struct smbd_shim smbd_shim_fns =
1055         {
1056                 .cancel_pending_lock_requests_by_fid = smbd_cancel_pending_lock_requests_by_fid,
1057                 .send_stat_cache_delete_message = smbd_send_stat_cache_delete_message,
1058                 .change_to_root_user = smbd_change_to_root_user,
1059
1060                 .contend_level2_oplocks_begin = smbd_contend_level2_oplocks_begin,
1061                 .contend_level2_oplocks_end = smbd_contend_level2_oplocks_end,
1062
1063                 .become_root = smbd_become_root,
1064                 .unbecome_root = smbd_unbecome_root,
1065
1066                 .exit_server = smbd_exit_server,
1067                 .exit_server_cleanly = smbd_exit_server_cleanly,
1068         };
1069
1070         /*
1071          * Do this before any other talloc operation
1072          */
1073         talloc_enable_null_tracking();
1074         frame = talloc_stackframe();
1075
1076         setup_logging(argv[0], DEBUG_DEFAULT_STDOUT);
1077
1078         load_case_tables();
1079
1080         set_smbd_shim(&smbd_shim_fns);
1081
1082         smbd_init_globals();
1083
1084         TimeInit();
1085
1086 #ifdef HAVE_SET_AUTH_PARAMETERS
1087         set_auth_parameters(argc,argv);
1088 #endif
1089
1090         pc = poptGetContext("smbd", argc, argv, long_options, 0);
1091         while((opt = poptGetNextOpt(pc)) != -1) {
1092                 switch (opt)  {
1093                 case OPT_DAEMON:
1094                         is_daemon = true;
1095                         break;
1096                 case OPT_INTERACTIVE:
1097                         interactive = true;
1098                         break;
1099                 case OPT_FORK:
1100                         Fork = false;
1101                         break;
1102                 case OPT_NO_PROCESS_GROUP:
1103                         no_process_group = true;
1104                         break;
1105                 case OPT_LOG_STDOUT:
1106                         log_stdout = true;
1107                         break;
1108                 case 'b':
1109                         print_build_options = True;
1110                         break;
1111                 default:
1112                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1113                                   poptBadOption(pc, 0), poptStrerror(opt));
1114                         poptPrintUsage(pc, stderr, 0);
1115                         exit(1);
1116                 }
1117         }
1118         poptFreeContext(pc);
1119
1120         if (interactive) {
1121                 Fork = False;
1122                 log_stdout = True;
1123         }
1124
1125         if (log_stdout) {
1126                 setup_logging(argv[0], DEBUG_STDOUT);
1127         } else {
1128                 setup_logging(argv[0], DEBUG_FILE);
1129         }
1130
1131         if (print_build_options) {
1132                 build_options(True); /* Display output to screen as well as debug */
1133                 exit(0);
1134         }
1135
1136 #ifdef HAVE_SETLUID
1137         /* needed for SecureWare on SCO */
1138         setluid(0);
1139 #endif
1140
1141         set_remote_machine_name("smbd", False);
1142
1143         if (interactive && (DEBUGLEVEL >= 9)) {
1144                 talloc_enable_leak_report();
1145         }
1146
1147         if (log_stdout && Fork) {
1148                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
1149                 exit(1);
1150         }
1151
1152         /* we want to re-seed early to prevent time delays causing
1153            client problems at a later date. (tridge) */
1154         generate_random_buffer(NULL, 0);
1155
1156         /* get initial effective uid and gid */
1157         sec_init();
1158
1159         /* make absolutely sure we run as root - to handle cases where people
1160            are crazy enough to have it setuid */
1161         gain_root_privilege();
1162         gain_root_group_privilege();
1163
1164         fault_setup();
1165         dump_core_setup("smbd", lp_logfile(talloc_tos()));
1166
1167         /* we are never interested in SIGPIPE */
1168         BlockSignals(True,SIGPIPE);
1169
1170 #if defined(SIGFPE)
1171         /* we are never interested in SIGFPE */
1172         BlockSignals(True,SIGFPE);
1173 #endif
1174
1175 #if defined(SIGUSR2)
1176         /* We are no longer interested in USR2 */
1177         BlockSignals(True,SIGUSR2);
1178 #endif
1179
1180         /* POSIX demands that signals are inherited. If the invoking process has
1181          * these signals masked, we will have problems, as we won't recieve them. */
1182         BlockSignals(False, SIGHUP);
1183         BlockSignals(False, SIGUSR1);
1184         BlockSignals(False, SIGTERM);
1185
1186         /* Ensure we leave no zombies until we
1187          * correctly set up child handling below. */
1188
1189         CatchChild();
1190
1191         /* we want total control over the permissions on created files,
1192            so set our umask to 0 */
1193         umask(0);
1194
1195         reopen_logs();
1196
1197         DEBUG(0,("smbd version %s started.\n", samba_version_string()));
1198         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1199
1200         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1201                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1202
1203         /* Output the build options to the debug log */
1204         build_options(False);
1205
1206         if (sizeof(uint16) < 2 || sizeof(uint32) < 4) {
1207                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
1208                 exit(1);
1209         }
1210
1211         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1212                 DEBUG(0, ("error opening config file '%s'\n", get_dyn_CONFIGFILE()));
1213                 exit(1);
1214         }
1215
1216         /* Init the security context and global current_user */
1217         init_sec_ctx();
1218
1219         /*
1220          * Initialize the event context. The event context needs to be
1221          * initialized before the messaging context, cause the messaging
1222          * context holds an event context.
1223          * FIXME: This should be s3_tevent_context_init()
1224          */
1225         ev_ctx = server_event_context();
1226         if (ev_ctx == NULL) {
1227                 exit(1);
1228         }
1229
1230         /*
1231          * Init the messaging context
1232          * FIXME: This should only call messaging_init()
1233          */
1234         msg_ctx = server_messaging_context();
1235         if (msg_ctx == NULL) {
1236                 exit(1);
1237         }
1238
1239         /*
1240          * Reloading of the printers will not work here as we don't have a
1241          * server info and rpc services set up. It will be called later.
1242          */
1243         if (!reload_services(NULL, NULL, false)) {
1244                 exit(1);
1245         }
1246
1247         if (lp_server_role() == ROLE_ACTIVE_DIRECTORY_DC
1248             && !lp_parm_bool(-1, "server role check", "inhibit", false)) {
1249                 DEBUG(0, ("server role = 'active directory domain controller' not compatible with running smbd standalone. \n"));
1250                 DEBUGADD(0, ("You should start 'samba' instead, and it will control starting smbd if required\n"));
1251                 exit(1);
1252         }
1253
1254         /* ...NOTE... Log files are working from this point! */
1255
1256         DEBUG(3,("loaded services\n"));
1257
1258         init_structs();
1259
1260 #ifdef WITH_PROFILE
1261         if (!profile_setup(msg_ctx, False)) {
1262                 DEBUG(0,("ERROR: failed to setup profiling\n"));
1263                 return -1;
1264         }
1265         if (profile_level != NULL) {
1266                 int pl = atoi(profile_level);
1267                 struct server_id src;
1268
1269                 DEBUG(1, ("setting profiling level: %s\n",profile_level));
1270                 src.pid = getpid();
1271                 set_profile_level(pl, src);
1272         }
1273 #endif
1274
1275         if (!is_daemon && !is_a_socket(0)) {
1276                 if (!interactive)
1277                         DEBUG(0,("standard input is not a socket, assuming -D option\n"));
1278
1279                 /*
1280                  * Setting is_daemon here prevents us from eventually calling
1281                  * the open_sockets_inetd()
1282                  */
1283
1284                 is_daemon = True;
1285         }
1286
1287         if (is_daemon && !interactive) {
1288                 DEBUG( 3, ( "Becoming a daemon.\n" ) );
1289                 become_daemon(Fork, no_process_group, log_stdout);
1290         }
1291
1292         set_my_unique_id(serverid_get_random_unique_id());
1293
1294 #if HAVE_SETPGID
1295         /*
1296          * If we're interactive we want to set our own process group for
1297          * signal management.
1298          */
1299         if (interactive && !no_process_group)
1300                 setpgid( (pid_t)0, (pid_t)0);
1301 #endif
1302
1303         if (!directory_exist(lp_lockdir()))
1304                 mkdir(lp_lockdir(), 0755);
1305
1306         if (!directory_exist(lp_piddir()))
1307                 mkdir(lp_piddir(), 0755);
1308
1309         if (is_daemon)
1310                 pidfile_create(lp_piddir(), "smbd");
1311
1312         status = reinit_after_fork(msg_ctx,
1313                                    ev_ctx,
1314                                    false);
1315         if (!NT_STATUS_IS_OK(status)) {
1316                 DEBUG(0,("reinit_after_fork() failed\n"));
1317                 exit(1);
1318         }
1319
1320         if (!interactive) {
1321                 /*
1322                  * Do not initialize the parent-child-pipe before becoming a
1323                  * daemon: this is used to detect a died parent in the child
1324                  * process.
1325                  */
1326                 status = init_before_fork();
1327                 if (!NT_STATUS_IS_OK(status)) {
1328                         DEBUG(0, ("init_before_fork failed: %s\n", nt_errstr(status)));
1329                         exit(1);
1330                 }
1331         }
1332
1333         parent = talloc_zero(ev_ctx, struct smbd_parent_context);
1334         if (!parent) {
1335                 exit_server("talloc(struct smbd_parent_context) failed");
1336         }
1337         parent->interactive = interactive;
1338         parent->ev_ctx = ev_ctx;
1339         parent->msg_ctx = msg_ctx;
1340         am_parent = parent;
1341
1342         se = tevent_add_signal(parent->ev_ctx,
1343                                parent,
1344                                SIGTERM, 0,
1345                                smbd_parent_sig_term_handler,
1346                                parent);
1347         if (!se) {
1348                 exit_server("failed to setup SIGTERM handler");
1349         }
1350         se = tevent_add_signal(parent->ev_ctx,
1351                                parent,
1352                                SIGHUP, 0,
1353                                smbd_parent_sig_hup_handler,
1354                                parent);
1355         if (!se) {
1356                 exit_server("failed to setup SIGHUP handler");
1357         }
1358
1359         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1360
1361         if (smbd_memcache() == NULL) {
1362                 exit(1);
1363         }
1364
1365         memcache_set_global(smbd_memcache());
1366
1367         /* Initialise the password backed before the global_sam_sid
1368            to ensure that we fetch from ldap before we make a domain sid up */
1369
1370         if(!initialize_password_db(false, ev_ctx))
1371                 exit(1);
1372
1373         if (!secrets_init()) {
1374                 DEBUG(0, ("ERROR: smbd can not open secrets.tdb\n"));
1375                 exit(1);
1376         }
1377
1378         if (lp_server_role() == ROLE_DOMAIN_BDC || lp_server_role() == ROLE_DOMAIN_PDC) {
1379                 struct loadparm_context *lp_ctx = loadparm_init_s3(NULL, loadparm_s3_helpers());
1380                 if (!open_schannel_session_store(NULL, lp_ctx)) {
1381                         DEBUG(0,("ERROR: Samba cannot open schannel store for secured NETLOGON operations.\n"));
1382                         exit(1);
1383                 }
1384                 TALLOC_FREE(lp_ctx);
1385         }
1386
1387         if(!get_global_sam_sid()) {
1388                 DEBUG(0,("ERROR: Samba cannot create a SAM SID.\n"));
1389                 exit(1);
1390         }
1391
1392         server_id = messaging_server_id(msg_ctx);
1393         status = smbXsrv_version_global_init(&server_id);
1394         if (!NT_STATUS_IS_OK(status)) {
1395                 exit(1);
1396         }
1397
1398         status = smbXsrv_session_global_init();
1399         if (!NT_STATUS_IS_OK(status)) {
1400                 exit(1);
1401         }
1402
1403         status = smbXsrv_tcon_global_init();
1404         if (!NT_STATUS_IS_OK(status)) {
1405                 exit(1);
1406         }
1407
1408         if (!locking_init())
1409                 exit(1);
1410
1411         if (!messaging_tdb_parent_init(ev_ctx)) {
1412                 exit(1);
1413         }
1414
1415         if (!smbd_parent_notify_init(NULL, msg_ctx, ev_ctx)) {
1416                 exit(1);
1417         }
1418
1419         if (!serverid_parent_init(ev_ctx)) {
1420                 exit(1);
1421         }
1422
1423         if (!W_ERROR_IS_OK(registry_init_full()))
1424                 exit(1);
1425
1426         /* Open the share_info.tdb here, so we don't have to open
1427            after the fork on every single connection.  This is a small
1428            performance improvment and reduces the total number of system
1429            fds used. */
1430         if (!share_info_db_init()) {
1431                 DEBUG(0,("ERROR: failed to load share info db.\n"));
1432                 exit(1);
1433         }
1434
1435         status = init_system_session_info();
1436         if (!NT_STATUS_IS_OK(status)) {
1437                 DEBUG(1, ("ERROR: failed to setup system user info: %s.\n",
1438                           nt_errstr(status)));
1439                 return -1;
1440         }
1441
1442         if (!init_guest_info()) {
1443                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1444                 return -1;
1445         }
1446
1447         if (!file_init_global()) {
1448                 DEBUG(0, ("ERROR: file_init_global() failed\n"));
1449                 return -1;
1450         }
1451         status = smbXsrv_open_global_init();
1452         if (!NT_STATUS_IS_OK(status)) {
1453                 exit(1);
1454         }
1455
1456         /* This MUST be done before start_epmd() because otherwise
1457          * start_epmd() forks and races against dcesrv_ep_setup() to
1458          * call directory_create_or_exist() */
1459         if (!directory_create_or_exist(lp_ncalrpc_dir(), geteuid(), 0755)) {
1460                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1461                           lp_ncalrpc_dir(), strerror(errno)));
1462                 return -1;
1463         }
1464
1465         np_dir = talloc_asprintf(talloc_tos(), "%s/np", lp_ncalrpc_dir());
1466         if (!np_dir) {
1467                 DEBUG(0, ("%s: Out of memory\n", __location__));
1468                 return -1;
1469         }
1470
1471         if (!directory_create_or_exist_strict(np_dir, geteuid(), 0700)) {
1472                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1473                           np_dir, strerror(errno)));
1474                 return -1;
1475         }
1476
1477         if (is_daemon && !interactive) {
1478                 if (rpc_epmapper_daemon() == RPC_DAEMON_FORK) {
1479                         start_epmd(ev_ctx, msg_ctx);
1480                 }
1481         }
1482
1483         if (!dcesrv_ep_setup(ev_ctx, msg_ctx)) {
1484                 exit(1);
1485         }
1486
1487         /* only start other daemons if we are running as a daemon
1488          * -- bad things will happen if smbd is launched via inetd
1489          *  and we fork a copy of ourselves here */
1490         if (is_daemon && !interactive) {
1491
1492                 if (rpc_lsasd_daemon() == RPC_DAEMON_FORK) {
1493                         start_lsasd(ev_ctx, msg_ctx);
1494                 }
1495
1496                 if (!lp__disable_spoolss() &&
1497                     (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1498                         bool bgq = lp_parm_bool(-1, "smbd", "backgroundqueue", true);
1499
1500                         if (!printing_subsystem_init(ev_ctx, msg_ctx, true, bgq)) {
1501                                 exit(1);
1502                         }
1503                 }
1504         } else if (!lp__disable_spoolss() &&
1505                    (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1506                 if (!printing_subsystem_init(ev_ctx, msg_ctx, false, false)) {
1507                         exit(1);
1508                 }
1509         }
1510
1511         if (!is_daemon) {
1512                 int sock;
1513
1514                 /* inetd mode */
1515                 TALLOC_FREE(frame);
1516
1517                 /* Started from inetd. fd 0 is the socket. */
1518                 /* We will abort gracefully when the client or remote system
1519                    goes away */
1520                 sock = dup(0);
1521
1522                 /* close stdin, stdout (if not logging to it), but not stderr */
1523                 close_low_fds(true, !debug_get_output_is_stdout(), false);
1524
1525 #ifdef HAVE_ATEXIT
1526                 atexit(killkids);
1527 #endif
1528
1529                 /* Stop zombies */
1530                 smbd_setup_sig_chld_handler(parent);
1531
1532                 smbd_process(ev_ctx, msg_ctx, sock, true);
1533
1534                 exit_server_cleanly(NULL);
1535                 return(0);
1536         }
1537
1538         if (!open_sockets_smbd(parent, ev_ctx, msg_ctx, ports))
1539                 exit_server("open_sockets_smbd() failed");
1540
1541         /* do a printer update now that all messaging has been set up,
1542          * before we allow clients to start connecting */
1543         if (!lp__disable_spoolss() &&
1544             (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1545                 printing_subsystem_update(ev_ctx, msg_ctx, false);
1546         }
1547
1548         TALLOC_FREE(frame);
1549         /* make sure we always have a valid stackframe */
1550         frame = talloc_stackframe();
1551
1552         if (!Fork) {
1553                 /* if we are running in the foreground then look for
1554                    EOF on stdin, and exit if it happens. This allows
1555                    us to die if the parent process dies
1556                 */
1557                 tevent_add_fd(ev_ctx, parent, 0, TEVENT_FD_READ, smbd_stdin_handler, NULL);
1558         }
1559
1560         smbd_parent_loop(ev_ctx, parent);
1561
1562         exit_server_cleanly(NULL);
1563         TALLOC_FREE(frame);
1564         return(0);
1565 }