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