source3/smbd/server.c

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