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 "lib/util/server_id.h"
  27 #include "lib/util/close_low_fd.h"
  28 #include "popt_common.h"
  29 #include "locking/share_mode_lock.h"
  30 #include "smbd/smbd.h"
  31 #include "smbd/globals.h"
  32 #include "registry/reg_init_full.h"
  33 #include "libcli/auth/schannel.h"
  34 #include "secrets.h"
  35 #include "../lib/util/memcache.h"
  36 #include "ctdbd_conn.h"
  37 #include "util_cluster.h"
  38 #include "printing/queue_process.h"
  39 #include "rpc_server/rpc_service_setup.h"
  40 #include "rpc_server/rpc_config.h"
  41 #include "passdb.h"
  42 #include "auth.h"
  43 #include "messages.h"
  44 #include "messages_ctdb.h"
  45 #include "smbprofile.h"
  46 #include "lib/id_cache.h"
  47 #include "lib/param/param.h"
  48 #include "lib/background.h"
  49 #include "../lib/util/pidfile.h"
  50 #include "lib/smbd_shim.h"
  51 #include "scavenger.h"
  52 #include "locking/leases_db.h"
  53 #include "smbd/notifyd/notifyd.h"
  54 #include "smbd/smbd_cleanupd.h"
  55 #include "lib/util/sys_rw.h"
  56 #include "cleanupdb.h"
  57 #include "g_lock.h"
  58 #include "rpc_server/epmd.h"
  59 #include "rpc_server/lsasd.h"
  60 #include "rpc_server/fssd.h"
  61 #include "rpc_server/mdssd.h"
  62 #include "lib/global_contexts.h"
  63
  64 #ifdef CLUSTER_SUPPORT
  65 #include "ctdb_protocol.h"
  66 #endif
  67
  68 struct smbd_open_socket;
  69 struct smbd_child_pid;
  70
  71 struct smbd_parent_context {
  72         bool interactive;
  73
  74         struct tevent_context *ev_ctx;
  75         struct messaging_context *msg_ctx;
  76         struct dcesrv_context *dce_ctx;
  77
  78         /* the list of listening sockets */
  79         struct smbd_open_socket *sockets;
  80
  81         /* the list of current child processes */
  82         struct smbd_child_pid *children;
  83         size_t num_children;
  84
  85         struct server_id cleanupd;
  86         struct server_id notifyd;
  87
  88         struct tevent_timer *cleanup_te;
  89 };
  90
  91 struct smbd_open_socket {
  92         struct smbd_open_socket *prev, *next;
  93         struct smbd_parent_context *parent;
  94         int fd;
  95         struct tevent_fd *fde;
  96 };
  97
  98 struct smbd_child_pid {
  99         struct smbd_child_pid *prev, *next;
 100         pid_t pid;
 101 };
 102
 103 /*******************************************************************
 104  What to do when smb.conf is updated.
 105  ********************************************************************/
 106
 107 static NTSTATUS messaging_send_to_children(struct messaging_context *msg_ctx,
 108                                            uint32_t msg_type, DATA_BLOB* data);
 109
 110 static void smbd_parent_conf_updated(struct messaging_context *msg,
 111                                      void *private_data,
 112                                      uint32_t msg_type,
 113                                      struct server_id server_id,
 114                                      DATA_BLOB *data)
 115 {
 116         struct tevent_context *ev_ctx =
 117                 talloc_get_type_abort(private_data, struct tevent_context);
 118         bool ok;
 119
 120         DEBUG(10,("smbd_parent_conf_updated: Got message saying smb.conf was "
 121                   "updated. Reloading.\n"));
 122         change_to_root_user();
 123         reload_services(NULL, NULL, false);
 124         printing_subsystem_update(ev_ctx, msg, false);
 125
 126         ok = reinit_guest_session_info(NULL);
 127         if (!ok) {
 128                 DBG_ERR("Failed to reinit guest info\n");
 129         }
 130         messaging_send_to_children(msg, MSG_SMB_CONF_UPDATED, NULL);
 131 }
 132
 133 /*******************************************************************
 134  Delete a statcache entry.
 135  ********************************************************************/
 136
 137 static void smb_stat_cache_delete(struct messaging_context *msg,
 138                                   void *private_data,
 139                                   uint32_t msg_tnype,
 140                                   struct server_id server_id,
 141                                   DATA_BLOB *data)
 142 {
 143         const char *name = (const char *)data->data;
 144         DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
 145         stat_cache_delete(name);
 146 }
 147
 148 /****************************************************************************
 149   Send a SIGTERM to our process group.
 150 *****************************************************************************/
 151
 152 static void  killkids(void)
 153 {
 154         if(am_parent) kill(0,SIGTERM);
 155 }
 156
 157 static void msg_exit_server(struct messaging_context *msg,
 158                             void *private_data,
 159                             uint32_t msg_type,
 160                             struct server_id server_id,
 161                             DATA_BLOB *data)
 162 {
 163         DEBUG(3, ("got a SHUTDOWN message\n"));
 164         exit_server_cleanly(NULL);
 165 }
 166
 167 #ifdef DEVELOPER
 168 static void msg_inject_fault(struct messaging_context *msg,
 169                              void *private_data,
 170                              uint32_t msg_type,
 171                              struct server_id src,
 172                              DATA_BLOB *data)
 173 {
 174         int sig;
 175         struct server_id_buf tmp;
 176
 177         if (data->length != sizeof(sig)) {
 178                 DEBUG(0, ("Process %s sent bogus signal injection request\n",
 179                           server_id_str_buf(src, &tmp)));
 180                 return;
 181         }
 182
 183         sig = *(int *)data->data;
 184         if (sig == -1) {
 185                 exit_server("internal error injected");
 186                 return;
 187         }
 188
 189 #ifdef HAVE_STRSIGNAL
 190         DEBUG(0, ("Process %s requested injection of signal %d (%s)\n",
 191                   server_id_str_buf(src, &tmp), sig, strsignal(sig)));
 192 #else
 193         DEBUG(0, ("Process %s requested injection of signal %d\n",
 194                   server_id_str_buf(src, &tmp), sig));
 195 #endif
 196
 197         kill(getpid(), sig);
 198 }
 199 #endif /* DEVELOPER */
 200
 201 #if defined(DEVELOPER) || defined(ENABLE_SELFTEST)
 202 /*
 203  * Sleep for the specified number of seconds.
 204  */
 205 static void msg_sleep(struct messaging_context *msg,
 206                       void *private_data,
 207                       uint32_t msg_type,
 208                       struct server_id src,
 209                       DATA_BLOB *data)
 210 {
 211         unsigned int seconds;
 212         struct server_id_buf tmp;
 213
 214         if (data->length != sizeof(seconds)) {
 215                 DBG_ERR("Process %s sent bogus sleep request\n",
 216                         server_id_str_buf(src, &tmp));
 217                 return;
 218         }
 219
 220         seconds = *(unsigned int *)data->data;
 221         DBG_ERR("Process %s request a sleep of %u seconds\n",
 222                 server_id_str_buf(src, &tmp),
 223                 seconds);
 224         sleep(seconds);
 225         DBG_ERR("Restarting after %u second sleep requested by process %s\n",
 226                 seconds,
 227                 server_id_str_buf(src, &tmp));
 228 }
 229 #endif /* DEVELOPER */
 230
 231 static NTSTATUS messaging_send_to_children(struct messaging_context *msg_ctx,
 232                                            uint32_t msg_type, DATA_BLOB* data)
 233 {
 234         NTSTATUS status;
 235         struct smbd_parent_context *parent = am_parent;
 236         struct smbd_child_pid *child;
 237
 238         if (parent == NULL) {
 239                 return NT_STATUS_INTERNAL_ERROR;
 240         }
 241
 242         for (child = parent->children; child != NULL; child = child->next) {
 243                 status = messaging_send(parent->msg_ctx,
 244                                         pid_to_procid(child->pid),
 245                                         msg_type, data);
 246                 if (!NT_STATUS_IS_OK(status)) {
 247                         DBG_DEBUG("messaging_send(%d) failed: %s\n",
 248                                   (int)child->pid, nt_errstr(status));
 249                 }
 250         }
 251         return NT_STATUS_OK;
 252 }
 253
 254 static void smb_parent_send_to_children(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         messaging_send_to_children(ctx, msg_type, msg_data);
 261 }
 262
 263 /*
 264  * Parent smbd process sets its own debug level first and then
 265  * sends a message to all the smbd children to adjust their debug
 266  * level to that of the parent.
 267  */
 268
 269 static void smbd_msg_debug(struct messaging_context *msg_ctx,
 270                            void *private_data,
 271                            uint32_t msg_type,
 272                            struct server_id server_id,
 273                            DATA_BLOB *data)
 274 {
 275         debug_message(msg_ctx, private_data, MSG_DEBUG, server_id, data);
 276
 277         messaging_send_to_children(msg_ctx, MSG_DEBUG, data);
 278 }
 279
 280 static void smbd_parent_id_cache_kill(struct messaging_context *msg_ctx,
 281                                       void *private_data,
 282                                       uint32_t msg_type,
 283                                       struct server_id server_id,
 284                                       DATA_BLOB* data)
 285 {
 286         const char *msg = (data && data->data)
 287                 ? (const char *)data->data : "<NULL>";
 288         struct id_cache_ref id;
 289
 290         if (!id_cache_ref_parse(msg, &id)) {
 291                 DEBUG(0, ("Invalid ?ID: %s\n", msg));
 292                 return;
 293         }
 294
 295         id_cache_delete_from_cache(&id);
 296
 297         messaging_send_to_children(msg_ctx, msg_type, data);
 298 }
 299
 300 static void smbd_parent_id_cache_delete(struct messaging_context *ctx,
 301                                         void* data,
 302                                         uint32_t msg_type,
 303                                         struct server_id srv_id,
 304                                         DATA_BLOB* msg_data)
 305 {
 306         id_cache_delete_message(ctx, data, msg_type, srv_id, msg_data);
 307
 308         messaging_send_to_children(ctx, msg_type, msg_data);
 309 }
 310
 311 static void add_child_pid(struct smbd_parent_context *parent,
 312                           pid_t pid)
 313 {
 314         struct smbd_child_pid *child;
 315
 316         child = talloc_zero(parent, struct smbd_child_pid);
 317         if (child == NULL) {
 318                 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
 319                 return;
 320         }
 321         child->pid = pid;
 322         DLIST_ADD(parent->children, child);
 323         parent->num_children += 1;
 324 }
 325
 326 static void smb_tell_num_children(struct messaging_context *ctx, void *data,
 327                                   uint32_t msg_type, struct server_id srv_id,
 328                                   DATA_BLOB *msg_data)
 329 {
 330         uint8_t buf[sizeof(uint32_t)];
 331
 332         if (am_parent) {
 333                 SIVAL(buf, 0, am_parent->num_children);
 334                 messaging_send_buf(ctx, srv_id, MSG_SMB_NUM_CHILDREN,
 335                                    buf, sizeof(buf));
 336         }
 337 }
 338
 339 static void notifyd_stopped(struct tevent_req *req);
 340
 341 static struct tevent_req *notifyd_req(struct messaging_context *msg_ctx,
 342                                       struct tevent_context *ev)
 343 {
 344         struct tevent_req *req;
 345         sys_notify_watch_fn sys_notify_watch = NULL;
 346         struct sys_notify_context *sys_notify_ctx = NULL;
 347         struct ctdbd_connection *ctdbd_conn = NULL;
 348
 349         if (lp_kernel_change_notify()) {
 350
 351 #ifdef HAVE_INOTIFY
 352                 if (lp_parm_bool(-1, "notify", "inotify", true)) {
 353                         sys_notify_watch = inotify_watch;
 354                 }
 355 #endif
 356
 357 #ifdef HAVE_FAM
 358                 if (lp_parm_bool(-1, "notify", "fam",
 359                                  (sys_notify_watch == NULL))) {
 360                         sys_notify_watch = fam_watch;
 361                 }
 362 #endif
 363         }
 364
 365         if (sys_notify_watch != NULL) {
 366                 sys_notify_ctx = sys_notify_context_create(msg_ctx, ev);
 367                 if (sys_notify_ctx == NULL) {
 368                         return NULL;
 369                 }
 370         }
 371
 372         if (lp_clustering()) {
 373                 ctdbd_conn = messaging_ctdb_connection();
 374         }
 375
 376         req = notifyd_send(msg_ctx, ev, msg_ctx, ctdbd_conn,
 377                            sys_notify_watch, sys_notify_ctx);
 378         if (req == NULL) {
 379                 TALLOC_FREE(sys_notify_ctx);
 380                 return NULL;
 381         }
 382         tevent_req_set_callback(req, notifyd_stopped, msg_ctx);
 383
 384         return req;
 385 }
 386
 387 static void notifyd_stopped(struct tevent_req *req)
 388 {
 389         int ret;
 390
 391         ret = notifyd_recv(req);
 392         TALLOC_FREE(req);
 393         DEBUG(1, ("notifyd stopped: %s\n", strerror(ret)));
 394 }
 395
 396 static void notifyd_sig_hup_handler(struct tevent_context *ev,
 397                                     struct tevent_signal *se,
 398                                     int signum,
 399                                     int count,
 400                                     void *siginfo,
 401                                     void *pvt)
 402 {
 403         DBG_NOTICE("notifyd: Reloading services after SIGHUP\n");
 404         reload_services(NULL, NULL, false);
 405 }
 406
 407 static bool smbd_notifyd_init(struct messaging_context *msg, bool interactive,
 408                               struct server_id *ppid)
 409 {
 410         struct tevent_context *ev = messaging_tevent_context(msg);
 411         struct tevent_req *req;
 412         pid_t pid;
 413         NTSTATUS status;
 414         bool ok;
 415         struct tevent_signal *se;
 416
 417         if (interactive) {
 418                 req = notifyd_req(msg, ev);
 419                 return (req != NULL);
 420         }
 421
 422         pid = fork();
 423         if (pid == -1) {
 424                 DEBUG(1, ("%s: fork failed: %s\n", __func__,
 425                           strerror(errno)));
 426                 return false;
 427         }
 428
 429         if (pid != 0) {
 430                 if (am_parent != NULL) {
 431                         add_child_pid(am_parent, pid);
 432                 }
 433                 *ppid = pid_to_procid(pid);
 434                 return true;
 435         }
 436
 437         status = smbd_reinit_after_fork(msg, ev, true, "smbd-notifyd");
 438         if (!NT_STATUS_IS_OK(status)) {
 439                 DEBUG(1, ("%s: reinit_after_fork failed: %s\n",
 440                           __func__, nt_errstr(status)));
 441                 exit(1);
 442         }
 443
 444         reopen_logs();
 445
 446         /* Set up sighup handler for notifyd */
 447         se = tevent_add_signal(ev,
 448                                ev,
 449                                SIGHUP, 0,
 450                                notifyd_sig_hup_handler,
 451                                NULL);
 452         if (!se) {
 453                 DEBUG(0, ("failed to setup notifyd SIGHUP handler\n"));
 454                 exit(1);
 455         }
 456
 457         req = notifyd_req(msg, ev);
 458         if (req == NULL) {
 459                 exit(1);
 460         }
 461         tevent_req_set_callback(req, notifyd_stopped, msg);
 462
 463         /* Block those signals that we are not handling */
 464         BlockSignals(True, SIGUSR1);
 465
 466         messaging_send(msg, pid_to_procid(getppid()), MSG_SMB_NOTIFY_STARTED,
 467                        NULL);
 468
 469         ok = tevent_req_poll(req, ev);
 470         if (!ok) {
 471                 DBG_WARNING("tevent_req_poll returned %s\n", strerror(errno));
 472                 exit(1);
 473         }
 474         exit(0);
 475 }
 476
 477 static void notifyd_init_trigger(struct tevent_req *req);
 478
 479 struct notifyd_init_state {
 480         bool ok;
 481         struct tevent_context *ev;
 482         struct messaging_context *msg;
 483         struct server_id *ppid;
 484 };
 485
 486 static struct tevent_req *notifyd_init_send(struct tevent_context *ev,
 487                                             TALLOC_CTX *mem_ctx,
 488                                             struct messaging_context *msg,
 489                                             struct server_id *ppid)
 490 {
 491         struct tevent_req *req = NULL;
 492         struct tevent_req *subreq = NULL;
 493         struct notifyd_init_state *state = NULL;
 494
 495         req = tevent_req_create(mem_ctx, &state, struct notifyd_init_state);
 496         if (req == NULL) {
 497                 return NULL;
 498         }
 499
 500         *state = (struct notifyd_init_state) {
 501                 .msg = msg,
 502                 .ev = ev,
 503                 .ppid = ppid
 504         };
 505
 506         subreq = tevent_wakeup_send(state, ev, tevent_timeval_current_ofs(1, 0));
 507         if (tevent_req_nomem(subreq, req)) {
 508                 return tevent_req_post(req, ev);
 509         }
 510
 511         tevent_req_set_callback(subreq, notifyd_init_trigger, req);
 512         return req;
 513 }
 514
 515 static void notifyd_init_trigger(struct tevent_req *subreq)
 516 {
 517         struct tevent_req *req = tevent_req_callback_data(
 518                 subreq, struct tevent_req);
 519         struct notifyd_init_state *state = tevent_req_data(
 520                 req, struct notifyd_init_state);
 521         bool ok;
 522
 523         DBG_NOTICE("Triggering notifyd startup\n");
 524
 525         ok = tevent_wakeup_recv(subreq);
 526         TALLOC_FREE(subreq);
 527         if (!ok) {
 528                 tevent_req_error(req, ENOMEM);
 529                 return;
 530         }
 531
 532         state->ok = smbd_notifyd_init(state->msg, false, state->ppid);
 533         if (state->ok) {
 534                 DBG_WARNING("notifyd restarted\n");
 535                 tevent_req_done(req);
 536                 return;
 537         }
 538
 539         DBG_NOTICE("notifyd startup failed, rescheduling\n");
 540
 541         subreq = tevent_wakeup_send(state, state->ev,
 542                                     tevent_timeval_current_ofs(1, 0));
 543         if (tevent_req_nomem(subreq, req)) {
 544                 DBG_ERR("scheduling notifyd restart failed, giving up\n");
 545                 return;
 546         }
 547
 548         tevent_req_set_callback(subreq, notifyd_init_trigger, req);
 549         return;
 550 }
 551
 552 static bool notifyd_init_recv(struct tevent_req *req)
 553 {
 554         struct notifyd_init_state *state = tevent_req_data(
 555                 req, struct notifyd_init_state);
 556
 557         return state->ok;
 558 }
 559
 560 static void notifyd_started(struct tevent_req *req)
 561 {
 562         bool ok;
 563
 564         ok = notifyd_init_recv(req);
 565         TALLOC_FREE(req);
 566         if (!ok) {
 567                 DBG_ERR("Failed to restart notifyd, giving up\n");
 568                 return;
 569         }
 570 }
 571
 572 static void cleanupd_stopped(struct tevent_req *req);
 573
 574 static bool cleanupd_init(struct messaging_context *msg, bool interactive,
 575                           struct server_id *ppid)
 576 {
 577         struct tevent_context *ev = messaging_tevent_context(msg);
 578         struct server_id parent_id = messaging_server_id(msg);
 579         struct tevent_req *req;
 580         pid_t pid;
 581         NTSTATUS status;
 582         ssize_t rwret;
 583         int ret;
 584         bool ok;
 585         char c;
 586         int up_pipe[2];
 587
 588         if (interactive) {
 589                 req = smbd_cleanupd_send(msg, ev, msg, parent_id.pid);
 590                 *ppid = messaging_server_id(msg);
 591                 return (req != NULL);
 592         }
 593
 594         ret = pipe(up_pipe);
 595         if (ret == -1) {
 596                 DBG_WARNING("pipe failed: %s\n", strerror(errno));
 597                 return false;
 598         }
 599
 600         pid = fork();
 601         if (pid == -1) {
 602                 DBG_WARNING("fork failed: %s\n", strerror(errno));
 603                 close(up_pipe[0]);
 604                 close(up_pipe[1]);
 605                 return false;
 606         }
 607
 608         if (pid != 0) {
 609
 610                 close(up_pipe[1]);
 611                 rwret = sys_read(up_pipe[0], &c, 1);
 612                 close(up_pipe[0]);
 613
 614                 if (rwret == -1) {
 615                         DBG_WARNING("sys_read failed: %s\n", strerror(errno));
 616                         return false;
 617                 }
 618                 if (rwret == 0) {
 619                         DBG_WARNING("cleanupd could not start\n");
 620                         return false;
 621                 }
 622                 if (c != 0) {
 623                         DBG_WARNING("cleanupd returned %d\n", (int)c);
 624                         return false;
 625                 }
 626
 627                 DBG_DEBUG("Started cleanupd pid=%d\n", (int)pid);
 628
 629                 if (am_parent != NULL) {
 630                         add_child_pid(am_parent, pid);
 631                 }
 632
 633                 *ppid = pid_to_procid(pid);
 634                 return true;
 635         }
 636
 637         close(up_pipe[0]);
 638
 639         status = smbd_reinit_after_fork(msg, ev, true, "cleanupd");
 640         if (!NT_STATUS_IS_OK(status)) {
 641                 DBG_WARNING("reinit_after_fork failed: %s\n",
 642                             nt_errstr(status));
 643                 c = 1;
 644                 sys_write(up_pipe[1], &c, 1);
 645
 646                 exit(1);
 647         }
 648
 649         req = smbd_cleanupd_send(msg, ev, msg, parent_id.pid);
 650         if (req == NULL) {
 651                 DBG_WARNING("smbd_cleanupd_send failed\n");
 652                 c = 2;
 653                 sys_write(up_pipe[1], &c, 1);
 654
 655                 exit(1);
 656         }
 657
 658         tevent_req_set_callback(req, cleanupd_stopped, msg);
 659
 660         c = 0;
 661         rwret = sys_write(up_pipe[1], &c, 1);
 662         close(up_pipe[1]);
 663
 664         if (rwret == -1) {
 665                 DBG_WARNING("sys_write failed: %s\n", strerror(errno));
 666                 exit(1);
 667         }
 668         if (rwret != 1) {
 669                 DBG_WARNING("sys_write could not write result\n");
 670                 exit(1);
 671         }
 672
 673         ok = tevent_req_poll(req, ev);
 674         if (!ok) {
 675                 DBG_WARNING("tevent_req_poll returned %s\n", strerror(errno));
 676         }
 677         exit(0);
 678 }
 679
 680 static void cleanupd_stopped(struct tevent_req *req)
 681 {
 682         NTSTATUS status;
 683
 684         status = smbd_cleanupd_recv(req);
 685         DBG_WARNING("cleanupd stopped: %s\n", nt_errstr(status));
 686 }
 687
 688 static void cleanupd_init_trigger(struct tevent_req *req);
 689
 690 struct cleanup_init_state {
 691         bool ok;
 692         struct tevent_context *ev;
 693         struct messaging_context *msg;
 694         struct server_id *ppid;
 695 };
 696
 697 static struct tevent_req *cleanupd_init_send(struct tevent_context *ev,
 698                                              TALLOC_CTX *mem_ctx,
 699                                              struct messaging_context *msg,
 700                                              struct server_id *ppid)
 701 {
 702         struct tevent_req *req = NULL;
 703         struct tevent_req *subreq = NULL;
 704         struct cleanup_init_state *state = NULL;
 705
 706         req = tevent_req_create(mem_ctx, &state, struct cleanup_init_state);
 707         if (req == NULL) {
 708                 return NULL;
 709         }
 710
 711         *state = (struct cleanup_init_state) {
 712                 .msg = msg,
 713                 .ev = ev,
 714                 .ppid = ppid
 715         };
 716
 717         subreq = tevent_wakeup_send(state, ev, tevent_timeval_current_ofs(0, 0));
 718         if (tevent_req_nomem(subreq, req)) {
 719                 return tevent_req_post(req, ev);
 720         }
 721
 722         tevent_req_set_callback(subreq, cleanupd_init_trigger, req);
 723         return req;
 724 }
 725
 726 static void cleanupd_init_trigger(struct tevent_req *subreq)
 727 {
 728         struct tevent_req *req = tevent_req_callback_data(
 729                 subreq, struct tevent_req);
 730         struct cleanup_init_state *state = tevent_req_data(
 731                 req, struct cleanup_init_state);
 732         bool ok;
 733
 734         DBG_NOTICE("Triggering cleanupd startup\n");
 735
 736         ok = tevent_wakeup_recv(subreq);
 737         TALLOC_FREE(subreq);
 738         if (!ok) {
 739                 tevent_req_error(req, ENOMEM);
 740                 return;
 741         }
 742
 743         state->ok = cleanupd_init(state->msg, false, state->ppid);
 744         if (state->ok) {
 745                 DBG_WARNING("cleanupd restarted\n");
 746                 tevent_req_done(req);
 747                 return;
 748         }
 749
 750         DBG_NOTICE("cleanupd startup failed, rescheduling\n");
 751
 752         subreq = tevent_wakeup_send(state, state->ev,
 753                                     tevent_timeval_current_ofs(1, 0));
 754         if (tevent_req_nomem(subreq, req)) {
 755                 DBG_ERR("scheduling cleanupd restart failed, giving up\n");
 756                 return;
 757         }
 758
 759         tevent_req_set_callback(subreq, cleanupd_init_trigger, req);
 760         return;
 761 }
 762
 763 static bool cleanupd_init_recv(struct tevent_req *req)
 764 {
 765         struct cleanup_init_state *state = tevent_req_data(
 766                 req, struct cleanup_init_state);
 767
 768         return state->ok;
 769 }
 770
 771 static void cleanupd_started(struct tevent_req *req)
 772 {
 773         bool ok;
 774         NTSTATUS status;
 775         struct smbd_parent_context *parent = tevent_req_callback_data(
 776                 req, struct smbd_parent_context);
 777
 778         ok = cleanupd_init_recv(req);
 779         TALLOC_FREE(req);
 780         if (!ok) {
 781                 DBG_ERR("Failed to restart cleanupd, giving up\n");
 782                 return;
 783         }
 784
 785         status = messaging_send(parent->msg_ctx,
 786                                 parent->cleanupd,
 787                                 MSG_SMB_NOTIFY_CLEANUP,
 788                                 &data_blob_null);
 789         if (!NT_STATUS_IS_OK(status)) {
 790                 DBG_ERR("messaging_send returned %s\n",
 791                         nt_errstr(status));
 792         }
 793 }
 794
 795 static void remove_child_pid(struct smbd_parent_context *parent,
 796                              pid_t pid,
 797                              bool unclean_shutdown)
 798 {
 799         struct smbd_child_pid *child;
 800         NTSTATUS status;
 801         bool ok;
 802
 803         for (child = parent->children; child != NULL; child = child->next) {
 804                 if (child->pid == pid) {
 805                         struct smbd_child_pid *tmp = child;
 806                         DLIST_REMOVE(parent->children, child);
 807                         TALLOC_FREE(tmp);
 808                         parent->num_children -= 1;
 809                         break;
 810                 }
 811         }
 812
 813         if (child == NULL) {
 814                 /* not all forked child processes are added to the children list */
 815                 DEBUG(2, ("Could not find child %d -- ignoring\n", (int)pid));
 816                 return;
 817         }
 818
 819         if (pid == procid_to_pid(&parent->cleanupd)) {
 820                 struct tevent_req *req;
 821
 822                 server_id_set_disconnected(&parent->cleanupd);
 823
 824                 DBG_WARNING("Restarting cleanupd\n");
 825                 req = cleanupd_init_send(messaging_tevent_context(parent->msg_ctx),
 826                                          parent,
 827                                          parent->msg_ctx,
 828                                          &parent->cleanupd);
 829                 if (req == NULL) {
 830                         DBG_ERR("Failed to restart cleanupd\n");
 831                         return;
 832                 }
 833                 tevent_req_set_callback(req, cleanupd_started, parent);
 834                 return;
 835         }
 836
 837         if (pid == procid_to_pid(&parent->notifyd)) {
 838                 struct tevent_req *req;
 839                 struct tevent_context *ev = messaging_tevent_context(
 840                         parent->msg_ctx);
 841
 842                 server_id_set_disconnected(&parent->notifyd);
 843
 844                 DBG_WARNING("Restarting notifyd\n");
 845                 req = notifyd_init_send(ev,
 846                                         parent,
 847                                         parent->msg_ctx,
 848                                         &parent->notifyd);
 849                 if (req == NULL) {
 850                         DBG_ERR("Failed to restart notifyd\n");
 851                         return;
 852                 }
 853                 tevent_req_set_callback(req, notifyd_started, parent);
 854                 return;
 855         }
 856
 857         ok = cleanupdb_store_child(pid, unclean_shutdown);
 858         if (!ok) {
 859                 DBG_ERR("cleanupdb_store_child failed\n");
 860                 return;
 861         }
 862
 863         if (!server_id_is_disconnected(&parent->cleanupd)) {
 864                 status = messaging_send(parent->msg_ctx,
 865                                         parent->cleanupd,
 866                                         MSG_SMB_NOTIFY_CLEANUP,
 867                                         &data_blob_null);
 868                 if (!NT_STATUS_IS_OK(status)) {
 869                         DBG_ERR("messaging_send returned %s\n",
 870                                 nt_errstr(status));
 871                 }
 872         }
 873 }
 874
 875 /****************************************************************************
 876  Have we reached the process limit ?
 877 ****************************************************************************/
 878
 879 static bool allowable_number_of_smbd_processes(struct smbd_parent_context *parent)
 880 {
 881         int max_processes = lp_max_smbd_processes();
 882
 883         if (!max_processes)
 884                 return True;
 885
 886         return parent->num_children < max_processes;
 887 }
 888
 889 static void smbd_sig_chld_handler(struct tevent_context *ev,
 890                                   struct tevent_signal *se,
 891                                   int signum,
 892                                   int count,
 893                                   void *siginfo,
 894                                   void *private_data)
 895 {
 896         pid_t pid;
 897         int status;
 898         struct smbd_parent_context *parent =
 899                 talloc_get_type_abort(private_data,
 900                 struct smbd_parent_context);
 901
 902         while ((pid = waitpid(-1, &status, WNOHANG)) > 0) {
 903                 bool unclean_shutdown = False;
 904
 905                 /* If the child terminated normally, assume
 906                    it was an unclean shutdown unless the
 907                    status is 0
 908                 */
 909                 if (WIFEXITED(status)) {
 910                         unclean_shutdown = WEXITSTATUS(status);
 911                 }
 912                 /* If the child terminated due to a signal
 913                    we always assume it was unclean.
 914                 */
 915                 if (WIFSIGNALED(status)) {
 916                         unclean_shutdown = True;
 917                 }
 918                 remove_child_pid(parent, pid, unclean_shutdown);
 919         }
 920 }
 921
 922 static void smbd_setup_sig_chld_handler(struct smbd_parent_context *parent)
 923 {
 924         struct tevent_signal *se;
 925
 926         se = tevent_add_signal(parent->ev_ctx,
 927                                parent, /* mem_ctx */
 928                                SIGCHLD, 0,
 929                                smbd_sig_chld_handler,
 930                                parent);
 931         if (!se) {
 932                 exit_server("failed to setup SIGCHLD handler");
 933         }
 934 }
 935
 936 static void smbd_open_socket_close_fn(struct tevent_context *ev,
 937                                       struct tevent_fd *fde,
 938                                       int fd,
 939                                       void *private_data)
 940 {
 941         /* this might be the socket_wrapper swrap_close() */
 942         close(fd);
 943 }
 944
 945 static void smbd_accept_connection(struct tevent_context *ev,
 946                                    struct tevent_fd *fde,
 947                                    uint16_t flags,
 948                                    void *private_data)
 949 {
 950         struct smbd_open_socket *s = talloc_get_type_abort(private_data,
 951                                      struct smbd_open_socket);
 952         struct messaging_context *msg_ctx = s->parent->msg_ctx;
 953         struct dcesrv_context *dce_ctx = s->parent->dce_ctx;
 954         struct sockaddr_storage addr;
 955         socklen_t in_addrlen = sizeof(addr);
 956         int fd;
 957         pid_t pid = 0;
 958
 959         fd = accept(s->fd, (struct sockaddr *)(void *)&addr,&in_addrlen);
 960         if (fd == -1 && errno == EINTR)
 961                 return;
 962
 963         if (fd == -1) {
 964                 DEBUG(0,("accept: %s\n",
 965                          strerror(errno)));
 966                 return;
 967         }
 968         smb_set_close_on_exec(fd);
 969
 970         if (s->parent->interactive) {
 971                 reinit_after_fork(msg_ctx, ev, true, NULL);
 972                 smbd_process(ev, msg_ctx, dce_ctx, fd, true);
 973                 exit_server_cleanly("end of interactive mode");
 974                 return;
 975         }
 976
 977         if (!allowable_number_of_smbd_processes(s->parent)) {
 978                 close(fd);
 979                 return;
 980         }
 981
 982         pid = fork();
 983         if (pid == 0) {
 984                 NTSTATUS status = NT_STATUS_OK;
 985
 986                 /*
 987                  * Can't use TALLOC_FREE here. Nulling out the argument to it
 988                  * would overwrite memory we've just freed.
 989                  */
 990                 talloc_free(s->parent);
 991                 s = NULL;
 992
 993                 /* Stop zombies, the parent explicitly handles
 994                  * them, counting worker smbds. */
 995                 CatchChild();
 996
 997                 status = smbd_reinit_after_fork(msg_ctx, ev, true, NULL);
 998                 if (!NT_STATUS_IS_OK(status)) {
 999                         if (NT_STATUS_EQUAL(status,
1000                                             NT_STATUS_TOO_MANY_OPENED_FILES)) {
1001                                 DEBUG(0,("child process cannot initialize "
1002                                          "because too many files are open\n"));
1003                                 goto exit;
1004                         }
1005                         if (lp_clustering() &&
1006                             (NT_STATUS_EQUAL(
1007                                     status, NT_STATUS_INTERNAL_DB_ERROR) ||
1008                              NT_STATUS_EQUAL(
1009                                     status, NT_STATUS_CONNECTION_REFUSED))) {
1010                                 DEBUG(1, ("child process cannot initialize "
1011                                           "because connection to CTDB "
1012                                           "has failed: %s\n",
1013                                           nt_errstr(status)));
1014                                 goto exit;
1015                         }
1016
1017                         DEBUG(0,("reinit_after_fork() failed\n"));
1018                         smb_panic("reinit_after_fork() failed");
1019                 }
1020
1021                 smbd_process(ev, msg_ctx, dce_ctx, fd, false);
1022          exit:
1023                 exit_server_cleanly("end of child");
1024                 return;
1025         }
1026
1027         if (pid < 0) {
1028                 DEBUG(0,("smbd_accept_connection: fork() failed: %s\n",
1029                          strerror(errno)));
1030         }
1031
1032         /* The parent doesn't need this socket */
1033         close(fd);
1034
1035         /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
1036                 Clear the closed fd info out of server_fd --
1037                 and more importantly, out of client_fd in
1038                 util_sock.c, to avoid a possible
1039                 getpeername failure if we reopen the logs
1040                 and use %I in the filename.
1041         */
1042
1043         if (pid != 0) {
1044                 add_child_pid(s->parent, pid);
1045         }
1046
1047         /* Force parent to check log size after
1048          * spawning child.  Fix from
1049          * klausr@ITAP.Physik.Uni-Stuttgart.De.  The
1050          * parent smbd will log to logserver.smb.  It
1051          * writes only two messages for each child
1052          * started/finished. But each child writes,
1053          * say, 50 messages also in logserver.smb,
1054          * beginning with the debug_count of the
1055          * parent, before the child opens its own log
1056          * file logserver.client. In a worst case
1057          * scenario the size of logserver.smb would be
1058          * checked after about 50*50=2500 messages
1059          * (ca. 100kb).
1060          * */
1061         force_check_log_size();
1062 }
1063
1064 static bool smbd_open_one_socket(struct smbd_parent_context *parent,
1065                                  struct tevent_context *ev_ctx,
1066                                  const struct sockaddr_storage *ifss,
1067                                  uint16_t port)
1068 {
1069         struct smbd_open_socket *s;
1070
1071         s = talloc(parent, struct smbd_open_socket);
1072         if (!s) {
1073                 return false;
1074         }
1075
1076         s->parent = parent;
1077
1078         s->fd = open_socket_in(SOCK_STREAM, ifss, port, true);
1079         if (s->fd < 0) {
1080                 int err = -(s->fd);
1081                 DBG_ERR("open_socket_in failed: %s\n", strerror(err));
1082                 TALLOC_FREE(s);
1083                 /*
1084                  * We ignore an error here, as we've done before
1085                  */
1086                 return true;
1087         }
1088
1089         /* ready to listen */
1090         set_socket_options(s->fd, "SO_KEEPALIVE");
1091         set_socket_options(s->fd, lp_socket_options());
1092
1093         /* Set server socket to
1094          * non-blocking for the accept. */
1095         set_blocking(s->fd, False);
1096
1097         if (listen(s->fd, SMBD_LISTEN_BACKLOG) == -1) {
1098                 DEBUG(0,("smbd_open_one_socket: listen: "
1099                         "%s\n", strerror(errno)));
1100                         close(s->fd);
1101                 TALLOC_FREE(s);
1102                 return false;
1103         }
1104
1105         s->fde = tevent_add_fd(ev_ctx,
1106                                s,
1107                                s->fd, TEVENT_FD_READ,
1108                                smbd_accept_connection,
1109                                s);
1110         if (!s->fde) {
1111                 DEBUG(0,("smbd_open_one_socket: "
1112                          "tevent_add_fd: %s\n",
1113                          strerror(errno)));
1114                 close(s->fd);
1115                 TALLOC_FREE(s);
1116                 return false;
1117         }
1118         tevent_fd_set_close_fn(s->fde, smbd_open_socket_close_fn);
1119
1120         DLIST_ADD_END(parent->sockets, s);
1121
1122         return true;
1123 }
1124
1125 /****************************************************************************
1126  Open the socket communication.
1127 ****************************************************************************/
1128
1129 static bool open_sockets_smbd(struct smbd_parent_context *parent,
1130                               struct tevent_context *ev_ctx,
1131                               struct messaging_context *msg_ctx,
1132                               const char *smb_ports)
1133 {
1134         int num_interfaces = iface_count();
1135         int i,j;
1136         const char **ports;
1137         unsigned dns_port = 0;
1138
1139 #ifdef HAVE_ATEXIT
1140         atexit(killkids);
1141 #endif
1142
1143         /* Stop zombies */
1144         smbd_setup_sig_chld_handler(parent);
1145
1146         ports = lp_smb_ports();
1147
1148         /* use a reasonable default set of ports - listing on 445 and 139 */
1149         if (smb_ports) {
1150                 char **l;
1151                 l = str_list_make_v3(talloc_tos(), smb_ports, NULL);
1152                 ports = discard_const_p(const char *, l);
1153         }
1154
1155         for (j = 0; ports && ports[j]; j++) {
1156                 unsigned port = atoi(ports[j]);
1157
1158                 if (port == 0 || port > 0xffff) {
1159                         exit_server_cleanly("Invalid port in the config or on "
1160                                             "the commandline specified!");
1161                 }
1162         }
1163
1164         if (lp_interfaces() && lp_bind_interfaces_only()) {
1165                 /* We have been given an interfaces line, and been
1166                    told to only bind to those interfaces. Create a
1167                    socket per interface and bind to only these.
1168                 */
1169
1170                 /* Now open a listen socket for each of the
1171                    interfaces. */
1172                 for(i = 0; i < num_interfaces; i++) {
1173                         const struct sockaddr_storage *ifss =
1174                                         iface_n_sockaddr_storage(i);
1175                         if (ifss == NULL) {
1176                                 DEBUG(0,("open_sockets_smbd: "
1177                                         "interface %d has NULL IP address !\n",
1178                                         i));
1179                                 continue;
1180                         }
1181
1182                         for (j = 0; ports && ports[j]; j++) {
1183                                 unsigned port = atoi(ports[j]);
1184
1185                                 /* Keep the first port for mDNS service
1186                                  * registration.
1187                                  */
1188                                 if (dns_port == 0) {
1189                                         dns_port = port;
1190                                 }
1191
1192                                 if (!smbd_open_one_socket(parent,
1193                                                           ev_ctx,
1194                                                           ifss,
1195                                                           port)) {
1196                                         return false;
1197                                 }
1198                         }
1199                 }
1200         } else {
1201                 /* Just bind to 0.0.0.0 - accept connections
1202                    from anywhere. */
1203
1204                 const char *sock_addr;
1205                 char *sock_tok;
1206                 const char *sock_ptr;
1207
1208 #ifdef HAVE_IPV6
1209                 sock_addr = "::,0.0.0.0";
1210 #else
1211                 sock_addr = "0.0.0.0";
1212 #endif
1213
1214                 for (sock_ptr=sock_addr;
1215                      next_token_talloc(talloc_tos(), &sock_ptr, &sock_tok, " \t,"); ) {
1216                         for (j = 0; ports && ports[j]; j++) {
1217                                 struct sockaddr_storage ss;
1218                                 unsigned port = atoi(ports[j]);
1219
1220                                 /* Keep the first port for mDNS service
1221                                  * registration.
1222                                  */
1223                                 if (dns_port == 0) {
1224                                         dns_port = port;
1225                                 }
1226
1227                                 /* open an incoming socket */
1228                                 if (!interpret_string_addr(&ss, sock_tok,
1229                                                 AI_NUMERICHOST|AI_PASSIVE)) {
1230                                         continue;
1231                                 }
1232
1233                                 /*
1234                                  * If we fail to open any sockets
1235                                  * in this loop the parent-sockets == NULL
1236                                  * case below will prevent us from starting.
1237                                  */
1238
1239                                 (void)smbd_open_one_socket(parent,
1240                                                   ev_ctx,
1241                                                   &ss,
1242                                                   port);
1243                         }
1244                 }
1245         }
1246
1247         if (parent->sockets == NULL) {
1248                 DEBUG(0,("open_sockets_smbd: No "
1249                         "sockets available to bind to.\n"));
1250                 return false;
1251         }
1252
1253         /* Listen to messages */
1254
1255         messaging_register(msg_ctx, NULL, MSG_SHUTDOWN, msg_exit_server);
1256         messaging_register(msg_ctx, ev_ctx, MSG_SMB_CONF_UPDATED,
1257                            smbd_parent_conf_updated);
1258         messaging_register(msg_ctx, NULL, MSG_SMB_STAT_CACHE_DELETE,
1259                            smb_stat_cache_delete);
1260         messaging_register(msg_ctx, NULL, MSG_DEBUG, smbd_msg_debug);
1261         messaging_register(msg_ctx, NULL, MSG_SMB_FORCE_TDIS,
1262                            smb_parent_send_to_children);
1263         messaging_register(msg_ctx, NULL, MSG_SMB_FORCE_TDIS_DENIED,
1264                            smb_parent_send_to_children);
1265         messaging_register(msg_ctx, NULL, MSG_SMB_KILL_CLIENT_IP,
1266                            smb_parent_send_to_children);
1267         messaging_register(msg_ctx, NULL, MSG_SMB_TELL_NUM_CHILDREN,
1268                            smb_tell_num_children);
1269
1270         messaging_register(msg_ctx, NULL,
1271                            ID_CACHE_DELETE, smbd_parent_id_cache_delete);
1272         messaging_register(msg_ctx, NULL,
1273                            ID_CACHE_KILL, smbd_parent_id_cache_kill);
1274         messaging_register(msg_ctx, NULL, MSG_SMB_NOTIFY_STARTED,
1275                            smb_parent_send_to_children);
1276
1277 #ifdef DEVELOPER
1278         messaging_register(msg_ctx, NULL, MSG_SMB_INJECT_FAULT,
1279                            msg_inject_fault);
1280 #endif
1281
1282 #if defined(DEVELOPER) || defined(ENABLE_SELFTEST)
1283         messaging_register(msg_ctx, NULL, MSG_SMB_SLEEP, msg_sleep);
1284 #endif
1285
1286         if (lp_multicast_dns_register() && (dns_port != 0)) {
1287 #ifdef WITH_DNSSD_SUPPORT
1288                 smbd_setup_mdns_registration(ev_ctx,
1289                                              parent, dns_port);
1290 #endif
1291 #ifdef WITH_AVAHI_SUPPORT
1292                 void *avahi_conn;
1293
1294                 avahi_conn = avahi_start_register(ev_ctx,
1295                                                   ev_ctx,
1296                                                   dns_port);
1297                 if (avahi_conn == NULL) {
1298                         DEBUG(10, ("avahi_start_register failed\n"));
1299                 }
1300 #endif
1301         }
1302
1303         return true;
1304 }
1305
1306
1307 /*
1308   handle stdin becoming readable when we are in --foreground mode
1309  */
1310 static void smbd_stdin_handler(struct tevent_context *ev,
1311                                struct tevent_fd *fde,
1312                                uint16_t flags,
1313                                void *private_data)
1314 {
1315         char c;
1316         if (read(0, &c, 1) != 1) {
1317                 /* we have reached EOF on stdin, which means the
1318                    parent has exited. Shutdown the server */
1319                 exit_server_cleanly("EOF on stdin");
1320         }
1321 }
1322
1323 struct smbd_parent_tevent_trace_state {
1324         TALLOC_CTX *frame;
1325 };
1326
1327 static void smbd_parent_tevent_trace_callback(enum tevent_trace_point point,
1328                                               void *private_data)
1329 {
1330         struct smbd_parent_tevent_trace_state *state =
1331                 (struct smbd_parent_tevent_trace_state *)private_data;
1332
1333         switch (point) {
1334         case TEVENT_TRACE_BEFORE_WAIT:
1335                 break;
1336         case TEVENT_TRACE_AFTER_WAIT:
1337                 break;
1338         case TEVENT_TRACE_BEFORE_LOOP_ONCE:
1339                 TALLOC_FREE(state->frame);
1340                 state->frame = talloc_stackframe();
1341                 break;
1342         case TEVENT_TRACE_AFTER_LOOP_ONCE:
1343                 TALLOC_FREE(state->frame);
1344                 break;
1345         }
1346
1347         errno = 0;
1348 }
1349
1350 static void smbd_parent_loop(struct tevent_context *ev_ctx,
1351                              struct smbd_parent_context *parent)
1352 {
1353         struct smbd_parent_tevent_trace_state trace_state = {
1354                 .frame = NULL,
1355         };
1356         int ret = 0;
1357
1358         tevent_set_trace_callback(ev_ctx, smbd_parent_tevent_trace_callback,
1359                                   &trace_state);
1360
1361         /* now accept incoming connections - forking a new process
1362            for each incoming connection */
1363         DEBUG(2,("waiting for connections\n"));
1364
1365         ret = tevent_loop_wait(ev_ctx);
1366         if (ret != 0) {
1367                 DEBUG(0, ("tevent_loop_wait failed: %d, %s, exiting\n",
1368                           ret, strerror(errno)));
1369         }
1370
1371         TALLOC_FREE(trace_state.frame);
1372
1373 /* NOTREACHED   return True; */
1374 }
1375
1376
1377 /****************************************************************************
1378  Initialise connect, service and file structs.
1379 ****************************************************************************/
1380
1381 static bool init_structs(void )
1382 {
1383         /*
1384          * Set the machine NETBIOS name if not already
1385          * set from the config file.
1386          */
1387
1388         if (!secrets_init())
1389                 return False;
1390
1391         return True;
1392 }
1393
1394 static void smbd_parent_sig_term_handler(struct tevent_context *ev,
1395                                          struct tevent_signal *se,
1396                                          int signum,
1397                                          int count,
1398                                          void *siginfo,
1399                                          void *private_data)
1400 {
1401         exit_server_cleanly("termination signal");
1402 }
1403
1404 static void smbd_parent_sig_hup_handler(struct tevent_context *ev,
1405                                         struct tevent_signal *se,
1406                                         int signum,
1407                                         int count,
1408                                         void *siginfo,
1409                                         void *private_data)
1410 {
1411         struct smbd_parent_context *parent =
1412                 talloc_get_type_abort(private_data,
1413                 struct smbd_parent_context);
1414
1415         change_to_root_user();
1416         DEBUG(1,("parent: Reloading services after SIGHUP\n"));
1417         reload_services(NULL, NULL, false);
1418
1419         printing_subsystem_update(parent->ev_ctx, parent->msg_ctx, true);
1420 }
1421
1422 struct smbd_claim_version_state {
1423         TALLOC_CTX *mem_ctx;
1424         char *version;
1425 };
1426
1427 static void smbd_claim_version_parser(struct server_id exclusive,
1428                                       size_t num_shared,
1429                                       struct server_id *shared,
1430                                       const uint8_t *data,
1431                                       size_t datalen,
1432                                       void *private_data)
1433 {
1434         struct smbd_claim_version_state *state = private_data;
1435
1436         if (datalen == 0) {
1437                 state->version = NULL;
1438                 return;
1439         }
1440         if (data[datalen-1] != '\0') {
1441                 DBG_WARNING("Invalid samba version\n");
1442                 dump_data(DBGLVL_WARNING, data, datalen);
1443                 state->version = NULL;
1444                 return;
1445         }
1446         state->version = talloc_strdup(state->mem_ctx, (const char *)data);
1447 }
1448
1449 static NTSTATUS smbd_claim_version(struct messaging_context *msg,
1450                                    const char *version)
1451 {
1452         const char *name = "samba_version_string";
1453         const TDB_DATA key = string_term_tdb_data(name);
1454         struct smbd_claim_version_state state;
1455         struct g_lock_ctx *ctx;
1456         NTSTATUS status;
1457
1458         ctx = g_lock_ctx_init(msg, msg);
1459         if (ctx == NULL) {
1460                 DBG_WARNING("g_lock_ctx_init failed\n");
1461                 return NT_STATUS_UNSUCCESSFUL;
1462         }
1463
1464         status = g_lock_lock(
1465                 ctx, key, G_LOCK_READ, (struct timeval) { .tv_sec = 60 });
1466         if (!NT_STATUS_IS_OK(status)) {
1467                 DBG_WARNING("g_lock_lock(G_LOCK_READ) failed: %s\n",
1468                             nt_errstr(status));
1469                 TALLOC_FREE(ctx);
1470                 return status;
1471         }
1472
1473         state = (struct smbd_claim_version_state) { .mem_ctx = ctx };
1474
1475         status = g_lock_dump(ctx, key, smbd_claim_version_parser, &state);
1476         if (!NT_STATUS_IS_OK(status) &&
1477             !NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
1478                 DBG_ERR("Could not read samba_version_string\n");
1479                 g_lock_unlock(ctx, key);
1480                 TALLOC_FREE(ctx);
1481                 return status;
1482         }
1483
1484         if ((state.version != NULL) && (strcmp(version, state.version) == 0)) {
1485                 /*
1486                  * Leave the read lock for us around. Someone else already
1487                  * set the version correctly
1488                  */
1489                 TALLOC_FREE(ctx);
1490                 return NT_STATUS_OK;
1491         }
1492
1493         status = g_lock_lock(
1494                 ctx, key, G_LOCK_UPGRADE, (struct timeval) { .tv_sec = 60 });
1495         if (!NT_STATUS_IS_OK(status)) {
1496                 DBG_WARNING("g_lock_lock(G_LOCK_WRITE) failed: %s\n",
1497                             nt_errstr(status));
1498                 DBG_ERR("smbd %s already running, refusing to start "
1499                         "version %s\n", state.version, version);
1500                 TALLOC_FREE(ctx);
1501                 return NT_STATUS_SXS_VERSION_CONFLICT;
1502         }
1503
1504         status = g_lock_write_data(
1505                 ctx, key, (const uint8_t *)version, strlen(version)+1);
1506         if (!NT_STATUS_IS_OK(status)) {
1507                 DBG_WARNING("g_lock_write_data failed: %s\n",
1508                             nt_errstr(status));
1509                 TALLOC_FREE(ctx);
1510                 return status;
1511         }
1512
1513         status = g_lock_lock(
1514                 ctx, key, G_LOCK_DOWNGRADE, (struct timeval) { .tv_sec = 60 });
1515         if (!NT_STATUS_IS_OK(status)) {
1516                 DBG_WARNING("g_lock_lock(G_LOCK_READ) failed: %s\n",
1517                             nt_errstr(status));
1518                 TALLOC_FREE(ctx);
1519                 return status;
1520         }
1521
1522         /*
1523          * Leave "ctx" dangling so that g_lock.tdb keeps opened.
1524          */
1525         return NT_STATUS_OK;
1526 }
1527
1528 /****************************************************************************
1529  main program.
1530 ****************************************************************************/
1531
1532 /* Declare prototype for build_options() to avoid having to run it through
1533    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
1534    prototype generation system is too complicated. */
1535
1536 extern void build_options(bool screen);
1537
1538  int main(int argc,const char *argv[])
1539 {
1540         /* shall I run as a daemon */
1541         bool is_daemon = false;
1542         bool interactive = false;
1543         bool Fork = true;
1544         bool no_process_group = false;
1545         bool log_stdout = false;
1546         char *ports = NULL;
1547         char *profile_level = NULL;
1548         int opt;
1549         poptContext pc;
1550         bool print_build_options = False;
1551         bool serving_printers = false;
1552         struct server_id main_server_id = {0};
1553         enum {
1554                 OPT_DAEMON = 1000,
1555                 OPT_INTERACTIVE,
1556                 OPT_FORK,
1557                 OPT_NO_PROCESS_GROUP,
1558                 OPT_LOG_STDOUT
1559         };
1560         struct poptOption long_options[] = {
1561                 POPT_AUTOHELP
1562                 {
1563                         .longName   = "daemon",
1564                         .shortName  = 'D',
1565                         .argInfo    = POPT_ARG_NONE,
1566                         .arg        = NULL,
1567                         .val        = OPT_DAEMON,
1568                         .descrip    = "Become a daemon (default)" ,
1569                 },
1570                 {
1571                         .longName   = "interactive",
1572                         .shortName  = 'i',
1573                         .argInfo    = POPT_ARG_NONE,
1574                         .arg        = NULL,
1575                         .val        = OPT_INTERACTIVE,
1576                         .descrip    = "Run interactive (not a daemon) and log to stdout",
1577                 },
1578                 {
1579                         .longName   = "foreground",
1580                         .shortName  = 'F',
1581                         .argInfo    = POPT_ARG_NONE,
1582                         .arg        = NULL,
1583                         .val        = OPT_FORK,
1584                         .descrip    = "Run daemon in foreground (for daemontools, etc.)",
1585                 },
1586                 {
1587                         .longName   = "no-process-group",
1588                         .shortName  = '\0',
1589                         .argInfo    = POPT_ARG_NONE,
1590                         .arg        = NULL,
1591                         .val        = OPT_NO_PROCESS_GROUP,
1592                         .descrip    = "Don't create a new process group" ,
1593                 },
1594                 {
1595                         .longName   = "log-stdout",
1596                         .shortName  = 'S',
1597                         .argInfo    = POPT_ARG_NONE,
1598                         .arg        = NULL,
1599                         .val        = OPT_LOG_STDOUT,
1600                         .descrip    = "Log to stdout" ,
1601                 },
1602                 {
1603                         .longName   = "build-options",
1604                         .shortName  = 'b',
1605                         .argInfo    = POPT_ARG_NONE,
1606                         .arg        = NULL,
1607                         .val        = 'b',
1608                         .descrip    = "Print build options" ,
1609                 },
1610                 {
1611                         .longName   = "port",
1612                         .shortName  = 'p',
1613                         .argInfo    = POPT_ARG_STRING,
1614                         .arg        = &ports,
1615                         .val        = 0,
1616                         .descrip    = "Listen on the specified ports",
1617                 },
1618                 {
1619                         .longName   = "profiling-level",
1620                         .shortName  = 'P',
1621                         .argInfo    = POPT_ARG_STRING,
1622                         .arg        = &profile_level,
1623                         .val        = 0,
1624                         .descrip    = "Set profiling level","PROFILE_LEVEL",
1625                 },
1626                 POPT_COMMON_SAMBA
1627                 POPT_TABLEEND
1628         };
1629         struct smbd_parent_context *parent = NULL;
1630         TALLOC_CTX *frame;
1631         NTSTATUS status;
1632         struct tevent_context *ev_ctx;
1633         struct messaging_context *msg_ctx;
1634         struct dcesrv_context *dce_ctx = NULL;
1635         struct server_id server_id;
1636         struct tevent_signal *se;
1637         int profiling_level;
1638         char *np_dir = NULL;
1639         const struct loadparm_substitution *lp_sub =
1640                 loadparm_s3_global_substitution();
1641         static const struct smbd_shim smbd_shim_fns =
1642         {
1643                 .send_stat_cache_delete_message = smbd_send_stat_cache_delete_message,
1644                 .change_to_root_user = smbd_change_to_root_user,
1645                 .become_authenticated_pipe_user = smbd_become_authenticated_pipe_user,
1646                 .unbecome_authenticated_pipe_user = smbd_unbecome_authenticated_pipe_user,
1647
1648                 .contend_level2_oplocks_begin = smbd_contend_level2_oplocks_begin,
1649                 .contend_level2_oplocks_end = smbd_contend_level2_oplocks_end,
1650
1651                 .become_root = smbd_become_root,
1652                 .unbecome_root = smbd_unbecome_root,
1653
1654                 .exit_server = smbd_exit_server,
1655                 .exit_server_cleanly = smbd_exit_server_cleanly,
1656         };
1657
1658         /*
1659          * Do this before any other talloc operation
1660          */
1661         talloc_enable_null_tracking();
1662         frame = talloc_stackframe();
1663
1664         setup_logging(argv[0], DEBUG_DEFAULT_STDOUT);
1665
1666         smb_init_locale();
1667
1668         set_smbd_shim(&smbd_shim_fns);
1669
1670         smbd_init_globals();
1671
1672         TimeInit();
1673
1674 #ifdef HAVE_SET_AUTH_PARAMETERS
1675         set_auth_parameters(argc,argv);
1676 #endif
1677
1678         pc = poptGetContext("smbd", argc, argv, long_options, 0);
1679         while((opt = poptGetNextOpt(pc)) != -1) {
1680                 switch (opt)  {
1681                 case OPT_DAEMON:
1682                         is_daemon = true;
1683                         break;
1684                 case OPT_INTERACTIVE:
1685                         interactive = true;
1686                         break;
1687                 case OPT_FORK:
1688                         Fork = false;
1689                         break;
1690                 case OPT_NO_PROCESS_GROUP:
1691                         no_process_group = true;
1692                         break;
1693                 case OPT_LOG_STDOUT:
1694                         log_stdout = true;
1695                         break;
1696                 case 'b':
1697                         print_build_options = True;
1698                         break;
1699                 default:
1700                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1701                                   poptBadOption(pc, 0), poptStrerror(opt));
1702                         poptPrintUsage(pc, stderr, 0);
1703                         exit(1);
1704                 }
1705         }
1706         poptFreeContext(pc);
1707
1708         if (interactive) {
1709                 Fork = False;
1710                 log_stdout = True;
1711         }
1712
1713         if (log_stdout) {
1714                 setup_logging(argv[0], DEBUG_STDOUT);
1715         } else {
1716                 setup_logging(argv[0], DEBUG_FILE);
1717         }
1718
1719         if (print_build_options) {
1720                 build_options(True); /* Display output to screen as well as debug */
1721                 exit(0);
1722         }
1723
1724 #ifdef HAVE_SETLUID
1725         /* needed for SecureWare on SCO */
1726         setluid(0);
1727 #endif
1728
1729         set_remote_machine_name("smbd", False);
1730
1731         if (interactive && (DEBUGLEVEL >= 9)) {
1732                 talloc_enable_leak_report();
1733         }
1734
1735         if (log_stdout && Fork) {
1736                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
1737                 exit(1);
1738         }
1739
1740         /*
1741          * We want to die early if we can't open /dev/urandom
1742          */
1743         generate_random_buffer(NULL, 0);
1744
1745         /* get initial effective uid and gid */
1746         sec_init();
1747
1748         /* make absolutely sure we run as root - to handle cases where people
1749            are crazy enough to have it setuid */
1750         gain_root_privilege();
1751         gain_root_group_privilege();
1752
1753         fault_setup();
1754         dump_core_setup("smbd", lp_logfile(talloc_tos(), lp_sub));
1755
1756         /* we are never interested in SIGPIPE */
1757         BlockSignals(True,SIGPIPE);
1758
1759 #if defined(SIGFPE)
1760         /* we are never interested in SIGFPE */
1761         BlockSignals(True,SIGFPE);
1762 #endif
1763
1764 #if defined(SIGUSR2)
1765         /* We are no longer interested in USR2 */
1766         BlockSignals(True,SIGUSR2);
1767 #endif
1768
1769         /*
1770          * POSIX demands that signals are inherited. If the invoking
1771          * process has these signals masked, we will have problems, as
1772          * we won't receive them.
1773          */
1774         BlockSignals(False, SIGHUP);
1775         BlockSignals(False, SIGUSR1);
1776         BlockSignals(False, SIGTERM);
1777
1778         /* Ensure we leave no zombies until we
1779          * correctly set up child handling below. */
1780
1781         CatchChild();
1782
1783         /* we want total control over the permissions on created files,
1784            so set our umask to 0 */
1785         umask(0);
1786
1787         reopen_logs();
1788
1789         DEBUG(0,("smbd version %s started.\n", samba_version_string()));
1790         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1791
1792         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1793                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1794
1795         /* Output the build options to the debug log */
1796         build_options(False);
1797
1798         if (sizeof(uint16_t) < 2 || sizeof(uint32_t) < 4) {
1799                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
1800                 exit(1);
1801         }
1802
1803         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1804                 DEBUG(0, ("error opening config file '%s'\n", get_dyn_CONFIGFILE()));
1805                 exit(1);
1806         }
1807
1808         /*
1809          * This calls unshare(CLONE_FS); on linux
1810          * in order to check if the running kernel/container
1811          * environment supports it.
1812          */
1813         per_thread_cwd_check();
1814
1815         if (!cluster_probe_ok()) {
1816                 exit(1);
1817         }
1818
1819         /* Init the security context and global current_user */
1820         init_sec_ctx();
1821
1822         /*
1823          * Initialize the event context. The event context needs to be
1824          * initialized before the messaging context, cause the messaging
1825          * context holds an event context.
1826          */
1827         ev_ctx = global_event_context();
1828         if (ev_ctx == NULL) {
1829                 exit(1);
1830         }
1831
1832         /*
1833          * Init the messaging context
1834          * FIXME: This should only call messaging_init()
1835          */
1836         msg_ctx = global_messaging_context();
1837         if (msg_ctx == NULL) {
1838                 exit(1);
1839         }
1840
1841         dce_ctx = global_dcesrv_context();
1842         if (dce_ctx == NULL) {
1843                 exit(1);
1844         }
1845
1846         /*
1847          * Reloading of the printers will not work here as we don't have a
1848          * server info and rpc services set up. It will be called later.
1849          */
1850         if (!reload_services(NULL, NULL, false)) {
1851                 exit(1);
1852         }
1853
1854         if (lp_server_role() == ROLE_ACTIVE_DIRECTORY_DC) {
1855                 if (!lp_parm_bool(-1, "server role check", "inhibit", false)) {
1856                         DBG_ERR("server role = 'active directory domain controller' not compatible with running smbd standalone. \n");
1857                         DEBUGADD(0, ("You should start 'samba' instead, and it will control starting smbd if required\n"));
1858                         exit(1);
1859                 }
1860                 /* Main 'samba' daemon will notify */
1861                 daemon_sd_notifications(false);
1862         }
1863
1864         /* ...NOTE... Log files are working from this point! */
1865
1866         DEBUG(3,("loaded services\n"));
1867
1868         init_structs();
1869
1870         if (!profile_setup(msg_ctx, False)) {
1871                 DEBUG(0,("ERROR: failed to setup profiling\n"));
1872                 return -1;
1873         }
1874
1875         if (profile_level != NULL) {
1876                 profiling_level = atoi(profile_level);
1877         } else {
1878                 profiling_level = lp_smbd_profiling_level();
1879         }
1880         main_server_id = messaging_server_id(msg_ctx);
1881         set_profile_level(profiling_level, &main_server_id);
1882
1883         if (!is_daemon && !is_a_socket(0)) {
1884                 if (!interactive) {
1885                         DEBUG(3, ("Standard input is not a socket, "
1886                                   "assuming -D option\n"));
1887                 }
1888
1889                 /*
1890                  * Setting is_daemon here prevents us from eventually calling
1891                  * the open_sockets_inetd()
1892                  */
1893
1894                 is_daemon = True;
1895         }
1896
1897         if (is_daemon && !interactive) {
1898                 DEBUG(3, ("Becoming a daemon.\n"));
1899                 become_daemon(Fork, no_process_group, log_stdout);
1900         } else {
1901                 daemon_status("smbd", "Starting process ...");
1902         }
1903
1904 #ifdef HAVE_SETPGID
1905         /*
1906          * If we're interactive we want to set our own process group for
1907          * signal management.
1908          */
1909         if (interactive && !no_process_group)
1910                 setpgid( (pid_t)0, (pid_t)0);
1911 #endif
1912
1913         if (!directory_exist(lp_lock_directory()))
1914                 mkdir(lp_lock_directory(), 0755);
1915
1916         if (!directory_exist(lp_pid_directory()))
1917                 mkdir(lp_pid_directory(), 0755);
1918
1919         if (is_daemon)
1920                 pidfile_create(lp_pid_directory(), "smbd");
1921
1922         status = reinit_after_fork(msg_ctx, ev_ctx, false, NULL);
1923         if (!NT_STATUS_IS_OK(status)) {
1924                 exit_daemon("reinit_after_fork() failed", map_errno_from_nt_status(status));
1925         }
1926
1927         if (!interactive) {
1928                 /*
1929                  * Do not initialize the parent-child-pipe before becoming a
1930                  * daemon: this is used to detect a died parent in the child
1931                  * process.
1932                  */
1933                 status = init_before_fork();
1934                 if (!NT_STATUS_IS_OK(status)) {
1935                         exit_daemon(nt_errstr(status), map_errno_from_nt_status(status));
1936                 }
1937         }
1938
1939         parent = talloc_zero(ev_ctx, struct smbd_parent_context);
1940         if (!parent) {
1941                 exit_server("talloc(struct smbd_parent_context) failed");
1942         }
1943         parent->interactive = interactive;
1944         parent->ev_ctx = ev_ctx;
1945         parent->msg_ctx = msg_ctx;
1946         parent->dce_ctx = dce_ctx;
1947         am_parent = parent;
1948
1949         se = tevent_add_signal(parent->ev_ctx,
1950                                parent,
1951                                SIGTERM, 0,
1952                                smbd_parent_sig_term_handler,
1953                                parent);
1954         if (!se) {
1955                 exit_server("failed to setup SIGTERM handler");
1956         }
1957         se = tevent_add_signal(parent->ev_ctx,
1958                                parent,
1959                                SIGHUP, 0,
1960                                smbd_parent_sig_hup_handler,
1961                                parent);
1962         if (!se) {
1963                 exit_server("failed to setup SIGHUP handler");
1964         }
1965
1966         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1967
1968         if (smbd_memcache() == NULL) {
1969                 exit_daemon("no memcache available", EACCES);
1970         }
1971
1972         memcache_set_global(smbd_memcache());
1973
1974         /* Initialise the password backed before the global_sam_sid
1975            to ensure that we fetch from ldap before we make a domain sid up */
1976
1977         if(!initialize_password_db(false, ev_ctx))
1978                 exit(1);
1979
1980         if (!secrets_init()) {
1981                 exit_daemon("smbd can not open secrets.tdb", EACCES);
1982         }
1983
1984         if (lp_server_role() == ROLE_DOMAIN_BDC || lp_server_role() == ROLE_DOMAIN_PDC) {
1985                 struct loadparm_context *lp_ctx = loadparm_init_s3(NULL, loadparm_s3_helpers());
1986                 if (!open_schannel_session_store(NULL, lp_ctx)) {
1987                         exit_daemon("ERROR: Samba cannot open schannel store for secured NETLOGON operations.", EACCES);
1988                 }
1989                 TALLOC_FREE(lp_ctx);
1990         }
1991
1992         if(!get_global_sam_sid()) {
1993                 exit_daemon("Samba cannot create a SAM SID", EACCES);
1994         }
1995
1996         server_id = messaging_server_id(msg_ctx);
1997         status = smbXsrv_version_global_init(&server_id);
1998         if (!NT_STATUS_IS_OK(status)) {
1999                 exit_daemon("Samba cannot init server context", EACCES);
2000         }
2001
2002         status = smbXsrv_client_global_init();
2003         if (!NT_STATUS_IS_OK(status)) {
2004                 exit_daemon("Samba cannot init clients context", EACCES);
2005         }
2006
2007         status = smbXsrv_session_global_init(msg_ctx);
2008         if (!NT_STATUS_IS_OK(status)) {
2009                 exit_daemon("Samba cannot init session context", EACCES);
2010         }
2011
2012         status = smbXsrv_tcon_global_init();
2013         if (!NT_STATUS_IS_OK(status)) {
2014                 exit_daemon("Samba cannot init tcon context", EACCES);
2015         }
2016
2017         if (!locking_init())
2018                 exit_daemon("Samba cannot init locking", EACCES);
2019
2020         if (!leases_db_init(false)) {
2021                 exit_daemon("Samba cannot init leases", EACCES);
2022         }
2023
2024         if (!smbd_notifyd_init(msg_ctx, interactive, &parent->notifyd)) {
2025                 exit_daemon("Samba cannot init notification", EACCES);
2026         }
2027
2028         if (!cleanupd_init(msg_ctx, interactive, &parent->cleanupd)) {
2029                 exit_daemon("Samba cannot init the cleanupd", EACCES);
2030         }
2031
2032         if (!messaging_parent_dgm_cleanup_init(msg_ctx)) {
2033                 exit(1);
2034         }
2035
2036         if (!smbd_scavenger_init(NULL, msg_ctx, ev_ctx)) {
2037                 exit_daemon("Samba cannot init scavenging", EACCES);
2038         }
2039
2040         if (!W_ERROR_IS_OK(registry_init_full()))
2041                 exit_daemon("Samba cannot init registry", EACCES);
2042
2043         /* Open the share_info.tdb here, so we don't have to open
2044            after the fork on every single connection.  This is a small
2045            performance improvment and reduces the total number of system
2046            fds used. */
2047         status = share_info_db_init();
2048         if (!NT_STATUS_IS_OK(status)) {
2049                 exit_daemon("ERROR: failed to load share info db.", EACCES);
2050         }
2051
2052         status = init_system_session_info(NULL);
2053         if (!NT_STATUS_IS_OK(status)) {
2054                 DEBUG(1, ("ERROR: failed to setup system user info: %s.\n",
2055                           nt_errstr(status)));
2056                 return -1;
2057         }
2058
2059         if (!init_guest_session_info(NULL)) {
2060                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
2061                 return -1;
2062         }
2063
2064         if (!file_init_global()) {
2065                 DEBUG(0, ("ERROR: file_init_global() failed\n"));
2066                 return -1;
2067         }
2068         status = smbXsrv_open_global_init();
2069         if (!NT_STATUS_IS_OK(status)) {
2070                 exit_daemon("Samba cannot init global open", map_errno_from_nt_status(status));
2071         }
2072
2073         if (lp_clustering() && !lp_allow_unsafe_cluster_upgrade()) {
2074                 status = smbd_claim_version(msg_ctx, samba_version_string());
2075                 if (!NT_STATUS_IS_OK(status)) {
2076                         DBG_ERR("Could not claim version: %s\n",
2077                                     nt_errstr(status));
2078                         return -1;
2079                 }
2080         }
2081
2082         /* This MUST be done before start_epmd() because otherwise
2083          * start_epmd() forks and races against dcesrv_ep_setup() to
2084          * call directory_create_or_exist() */
2085         if (!directory_create_or_exist(lp_ncalrpc_dir(), 0755)) {
2086                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
2087                           lp_ncalrpc_dir(), strerror(errno)));
2088                 return -1;
2089         }
2090
2091         np_dir = talloc_asprintf(talloc_tos(), "%s/np", lp_ncalrpc_dir());
2092         if (!np_dir) {
2093                 DEBUG(0, ("%s: Out of memory\n", __location__));
2094                 return -1;
2095         }
2096
2097         if (!directory_create_or_exist_strict(np_dir, geteuid(), 0700)) {
2098                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
2099                           np_dir, strerror(errno)));
2100                 return -1;
2101         }
2102
2103         status = dcesrv_init(ev_ctx, ev_ctx, msg_ctx, dce_ctx);
2104         if (!NT_STATUS_IS_OK(status)) {
2105                 DBG_ERR("Failed to setup RPC server: %s\n", nt_errstr(status));
2106                 exit_daemon("Samba cannot setup ep pipe", EACCES);
2107         }
2108
2109         if (!interactive) {
2110                 daemon_ready("smbd");
2111         }
2112
2113         serving_printers = (!lp__disable_spoolss() &&
2114                             (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED));
2115
2116         /* only start other daemons if we are running as a daemon
2117          * -- bad things will happen if smbd is launched via inetd
2118          *  and we fork a copy of ourselves here */
2119         if (is_daemon && !interactive) {
2120
2121                 if (rpc_epmapper_daemon() == RPC_DAEMON_FORK) {
2122                         start_epmd(ev_ctx, msg_ctx, dce_ctx);
2123                 }
2124
2125                 if (rpc_lsasd_daemon() == RPC_DAEMON_FORK) {
2126                         start_lsasd(ev_ctx, msg_ctx, dce_ctx);
2127                 }
2128
2129                 if (rpc_fss_daemon() == RPC_DAEMON_FORK) {
2130                         start_fssd(ev_ctx, msg_ctx, dce_ctx);
2131                 }
2132
2133                 if (serving_printers) {
2134                         bool bgq = lp_parm_bool(-1, "smbd", "backgroundqueue", true);
2135                         bool ok = printing_subsystem_init(ev_ctx,
2136                                                           msg_ctx,
2137                                                           dce_ctx,
2138                                                           true,
2139                                                           bgq);
2140                         if (!ok) {
2141                                 exit_daemon("Samba failed to init printing subsystem", EACCES);
2142                         }
2143                 }
2144
2145 #ifdef WITH_SPOTLIGHT
2146                 if ((rpc_mdssvc_mode() == RPC_SERVICE_MODE_EXTERNAL) &&
2147                     (rpc_mdssd_daemon() == RPC_DAEMON_FORK)) {
2148                         start_mdssd(ev_ctx, msg_ctx, dce_ctx);
2149                 }
2150 #endif
2151         } else if (serving_printers) {
2152                 bool ok = printing_subsystem_init(ev_ctx,
2153                                                   msg_ctx,
2154                                                   dce_ctx,
2155                                                   false,
2156                                                   false);
2157                 if (!ok) {
2158                         exit(1);
2159                 }
2160         }
2161
2162         if (!is_daemon) {
2163                 int ret, sock;
2164
2165                 /* inetd mode */
2166                 TALLOC_FREE(frame);
2167
2168                 /* Started from inetd. fd 0 is the socket. */
2169                 /* We will abort gracefully when the client or remote system
2170                    goes away */
2171                 sock = dup(0);
2172
2173                 /* close stdin, stdout (if not logging to it), but not stderr */
2174                 ret = close_low_fd(0);
2175                 if (ret != 0) {
2176                         DBG_ERR("close_low_fd(0) failed: %s\n", strerror(ret));
2177                         return 1;
2178                 }
2179                 if (!debug_get_output_is_stdout()) {
2180                         ret = close_low_fd(1);
2181                         if (ret != 0) {
2182                                 DBG_ERR("close_low_fd(1) failed: %s\n",
2183                                         strerror(ret));
2184                                 return 1;
2185                         }
2186                 }
2187
2188 #ifdef HAVE_ATEXIT
2189                 atexit(killkids);
2190 #endif
2191
2192                 /* Stop zombies */
2193                 smbd_setup_sig_chld_handler(parent);
2194
2195                 smbd_process(ev_ctx, msg_ctx, dce_ctx, sock, true);
2196
2197                 exit_server_cleanly(NULL);
2198                 return(0);
2199         }
2200
2201         if (!open_sockets_smbd(parent, ev_ctx, msg_ctx, ports))
2202                 exit_server("open_sockets_smbd() failed");
2203
2204         /* do a printer update now that all messaging has been set up,
2205          * before we allow clients to start connecting */
2206         if (!lp__disable_spoolss() &&
2207             (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
2208                 printing_subsystem_update(ev_ctx, msg_ctx, false);
2209         }
2210
2211         TALLOC_FREE(frame);
2212         /* make sure we always have a valid stackframe */
2213         frame = talloc_stackframe();
2214
2215         if (!Fork) {
2216                 /* if we are running in the foreground then look for
2217                    EOF on stdin, and exit if it happens. This allows
2218                    us to die if the parent process dies
2219                    Only do this on a pipe or socket, no other device.
2220                 */
2221                 struct stat st;
2222                 if (fstat(0, &st) != 0) {
2223                         return false;
2224                 }
2225                 if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode)) {
2226                         tevent_add_fd(ev_ctx,
2227                                         parent,
2228                                         0,
2229                                         TEVENT_FD_READ,
2230                                         smbd_stdin_handler,
2231                                         NULL);
2232                 }
2233         }
2234
2235         smbd_parent_loop(ev_ctx, parent);
2236
2237         exit_server_cleanly(NULL);
2238         TALLOC_FREE(frame);
2239         return(0);
2240 }