source3/rpc_server/lsasd.c

   1 /*
   2  *  Unix SMB/CIFS implementation.
   3  *
   4  *  LSA service daemon
   5  *
   6  *  Copyright (c) 2011      Andreas Schneider <asn@samba.org>
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License as published by
  10  *  the Free Software Foundation; either version 3 of the License, or
  11  *  (at your option) any later version.
  12  *
  13  *  This program is distributed in the hope that it will be useful,
  14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  *  GNU General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License
  19  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22 #include "includes.h"
  23 #include "serverid.h"
  24 #include "messages.h"
  25 #include "ntdomain.h"
  26
  27 #include "lib/id_cache.h"
  28
  29 #include "../lib/tsocket/tsocket.h"
  30 #include "lib/server_prefork.h"
  31 #include "lib/server_prefork_util.h"
  32 #include "librpc/rpc/dcerpc_ep.h"
  33
  34 #include "rpc_server/rpc_server.h"
  35 #include "rpc_server/rpc_ep_register.h"
  36 #include "rpc_server/rpc_sock_helper.h"
  37
  38 #include "librpc/gen_ndr/srv_lsa.h"
  39 #include "librpc/gen_ndr/srv_samr.h"
  40 #include "librpc/gen_ndr/srv_netlogon.h"
  41
  42 #define DAEMON_NAME "lsasd"
  43 #define LSASD_MAX_SOCKETS 64
  44
  45 static struct server_id parent_id;
  46 static struct prefork_pool *lsasd_pool = NULL;
  47 static int lsasd_child_id = 0;
  48
  49 static struct pf_daemon_config default_pf_lsasd_cfg = {
  50         .prefork_status = PFH_INIT,
  51         .min_children = 5,
  52         .max_children = 25,
  53         .spawn_rate = 5,
  54         .max_allowed_clients = 100,
  55         .child_min_life = 60 /* 1 minute minimum life time */
  56 };
  57 static struct pf_daemon_config pf_lsasd_cfg = { 0 };
  58
  59 void start_lsasd(struct tevent_context *ev_ctx,
  60                  struct messaging_context *msg_ctx);
  61
  62 static void lsasd_reopen_logs(int child_id)
  63 {
  64         char *lfile = lp_logfile();
  65         char *extension;
  66         int rc;
  67
  68         if (child_id) {
  69                 rc = asprintf(&extension, "%s.%d", DAEMON_NAME, child_id);
  70         } else {
  71                 rc = asprintf(&extension, "%s", DAEMON_NAME);
  72         }
  73         if (rc == -1) {
  74                 return;
  75         }
  76
  77         rc = 0;
  78         if (lfile == NULL || lfile[0] == '\0') {
  79                 rc = asprintf(&lfile, "%s/log.%s",
  80                               get_dyn_LOGFILEBASE(), extension);
  81         } else {
  82                 if (strstr(lfile, extension) == NULL) {
  83                         if (child_id) {
  84                                 rc = asprintf(&lfile, "%s.%d",
  85                                                 lp_logfile(),
  86                                                 child_id);
  87                         } else {
  88                                 rc = asprintf(&lfile, "%s.%s",
  89                                                 lp_logfile(),
  90                                                 extension);
  91                         }
  92                 }
  93         }
  94
  95         if (rc > 0) {
  96                 lp_set_logfile(lfile);
  97                 SAFE_FREE(lfile);
  98         }
  99
 100         SAFE_FREE(extension);
 101
 102         reopen_logs();
 103 }
 104
 105 static void lsasd_smb_conf_updated(struct messaging_context *msg,
 106                                   void *private_data,
 107                                   uint32_t msg_type,
 108                                   struct server_id server_id,
 109                                   DATA_BLOB *data)
 110 {
 111         struct tevent_context *ev_ctx;
 112
 113         DEBUG(10, ("Got message saying smb.conf was updated. Reloading.\n"));
 114         ev_ctx = talloc_get_type_abort(private_data, struct tevent_context);
 115
 116         change_to_root_user();
 117         lp_load(get_dyn_CONFIGFILE(), true, false, false, true);
 118
 119         lsasd_reopen_logs(lsasd_child_id);
 120         if (lsasd_child_id == 0) {
 121                 pfh_daemon_config(DAEMON_NAME,
 122                                   &pf_lsasd_cfg,
 123                                   &default_pf_lsasd_cfg);
 124                 pfh_manage_pool(ev_ctx, msg, &pf_lsasd_cfg, lsasd_pool);
 125         }
 126 }
 127
 128 static void lsasd_sig_term_handler(struct tevent_context *ev,
 129                                   struct tevent_signal *se,
 130                                   int signum,
 131                                   int count,
 132                                   void *siginfo,
 133                                   void *private_data)
 134 {
 135         rpc_netlogon_shutdown();
 136         rpc_samr_shutdown();
 137         rpc_lsarpc_shutdown();
 138
 139         DEBUG(0, ("termination signal\n"));
 140         exit(0);
 141 }
 142
 143 static void lsasd_setup_sig_term_handler(struct tevent_context *ev_ctx)
 144 {
 145         struct tevent_signal *se;
 146
 147         se = tevent_add_signal(ev_ctx,
 148                                ev_ctx,
 149                                SIGTERM, 0,
 150                                lsasd_sig_term_handler,
 151                                NULL);
 152         if (!se) {
 153                 DEBUG(0, ("failed to setup SIGTERM handler\n"));
 154                 exit(1);
 155         }
 156 }
 157
 158 static void lsasd_sig_hup_handler(struct tevent_context *ev,
 159                                     struct tevent_signal *se,
 160                                     int signum,
 161                                     int count,
 162                                     void *siginfo,
 163                                     void *pvt)
 164 {
 165
 166         change_to_root_user();
 167         lp_load(get_dyn_CONFIGFILE(), true, false, false, true);
 168
 169         lsasd_reopen_logs(lsasd_child_id);
 170         pfh_daemon_config(DAEMON_NAME,
 171                           &pf_lsasd_cfg,
 172                           &default_pf_lsasd_cfg);
 173
 174         /* relay to all children */
 175         prefork_send_signal_to_all(lsasd_pool, SIGHUP);
 176 }
 177
 178 static void lsasd_setup_sig_hup_handler(struct tevent_context *ev_ctx)
 179 {
 180         struct tevent_signal *se;
 181
 182         se = tevent_add_signal(ev_ctx,
 183                                ev_ctx,
 184                                SIGHUP, 0,
 185                                lsasd_sig_hup_handler,
 186                                NULL);
 187         if (!se) {
 188                 DEBUG(0, ("failed to setup SIGHUP handler\n"));
 189                 exit(1);
 190         }
 191 }
 192
 193 /**********************************************************
 194  * Children
 195  **********************************************************/
 196
 197 static void lsasd_chld_sig_hup_handler(struct tevent_context *ev,
 198                                          struct tevent_signal *se,
 199                                          int signum,
 200                                          int count,
 201                                          void *siginfo,
 202                                          void *pvt)
 203 {
 204         change_to_root_user();
 205         lsasd_reopen_logs(lsasd_child_id);
 206 }
 207
 208 static bool lsasd_setup_chld_hup_handler(struct tevent_context *ev_ctx)
 209 {
 210         struct tevent_signal *se;
 211
 212         se = tevent_add_signal(ev_ctx,
 213                                ev_ctx,
 214                                SIGHUP, 0,
 215                                lsasd_chld_sig_hup_handler,
 216                                NULL);
 217         if (!se) {
 218                 DEBUG(1, ("failed to setup SIGHUP handler"));
 219                 return false;
 220         }
 221
 222         return true;
 223 }
 224
 225 static void parent_ping(struct messaging_context *msg_ctx,
 226                         void *private_data,
 227                         uint32_t msg_type,
 228                         struct server_id server_id,
 229                         DATA_BLOB *data)
 230 {
 231
 232         /* The fact we received this message is enough to let make the event
 233          * loop if it was idle. lsasd_children_main will cycle through
 234          * lsasd_next_client at least once. That function will take whatever
 235          * action is necessary */
 236
 237         DEBUG(10, ("Got message that the parent changed status.\n"));
 238         return;
 239 }
 240
 241 static bool lsasd_child_init(struct tevent_context *ev_ctx,
 242                              int child_id,
 243                              struct pf_worker_data *pf)
 244 {
 245         NTSTATUS status;
 246         struct messaging_context *msg_ctx = server_messaging_context();
 247         bool ok;
 248
 249         status = reinit_after_fork(msg_ctx, ev_ctx,
 250                                    true);
 251         if (!NT_STATUS_IS_OK(status)) {
 252                 DEBUG(0,("reinit_after_fork() failed\n"));
 253                 smb_panic("reinit_after_fork() failed");
 254         }
 255
 256         lsasd_child_id = child_id;
 257         lsasd_reopen_logs(child_id);
 258
 259         ok = lsasd_setup_chld_hup_handler(ev_ctx);
 260         if (!ok) {
 261                 return false;
 262         }
 263
 264         if (!serverid_register(procid_self(), FLAG_MSG_GENERAL)) {
 265                 return false;
 266         }
 267
 268         messaging_register(msg_ctx, ev_ctx,
 269                            MSG_SMB_CONF_UPDATED, lsasd_smb_conf_updated);
 270         messaging_register(msg_ctx, ev_ctx,
 271                            MSG_PREFORK_PARENT_EVENT, parent_ping);
 272         id_cache_register_msgs(msg_ctx);
 273
 274         status = rpc_lsarpc_init(NULL);
 275         if (!NT_STATUS_IS_OK(status)) {
 276                 DEBUG(0, ("Failed to register lsarpc rpc inteface! (%s)\n",
 277                           nt_errstr(status)));
 278                 return false;
 279         }
 280
 281         status = rpc_samr_init(NULL);
 282         if (!NT_STATUS_IS_OK(status)) {
 283                 DEBUG(0, ("Failed to register samr rpc inteface! (%s)\n",
 284                           nt_errstr(status)));
 285                 return false;
 286         }
 287
 288         status = rpc_netlogon_init(NULL);
 289         if (!NT_STATUS_IS_OK(status)) {
 290                 DEBUG(0, ("Failed to register netlogon rpc inteface! (%s)\n",
 291                           nt_errstr(status)));
 292                 return false;
 293         }
 294
 295         return true;
 296 }
 297
 298 struct lsasd_children_data {
 299         struct tevent_context *ev_ctx;
 300         struct messaging_context *msg_ctx;
 301         struct pf_worker_data *pf;
 302         int listen_fd_size;
 303         int *listen_fds;
 304 };
 305
 306 static void lsasd_next_client(void *pvt);
 307
 308 static int lsasd_children_main(struct tevent_context *ev_ctx,
 309                                struct messaging_context *msg_ctx,
 310                                struct pf_worker_data *pf,
 311                                int child_id,
 312                                int listen_fd_size,
 313                                int *listen_fds,
 314                                void *private_data)
 315 {
 316         struct lsasd_children_data *data;
 317         bool ok;
 318         int ret = 0;
 319
 320         ok = lsasd_child_init(ev_ctx, child_id, pf);
 321         if (!ok) {
 322                 return 1;
 323         }
 324
 325         data = talloc(ev_ctx, struct lsasd_children_data);
 326         if (!data) {
 327                 return 1;
 328         }
 329         data->pf = pf;
 330         data->ev_ctx = ev_ctx;
 331         data->msg_ctx = msg_ctx;
 332         data->listen_fd_size = listen_fd_size;
 333         data->listen_fds = listen_fds;
 334
 335         /* loop until it is time to exit */
 336         while (pf->status != PF_WORKER_EXITING) {
 337                 /* try to see if it is time to schedule the next client */
 338                 lsasd_next_client(data);
 339
 340                 ret = tevent_loop_once(ev_ctx);
 341                 if (ret != 0) {
 342                         DEBUG(0, ("tevent_loop_once() exited with %d: %s\n",
 343                                   ret, strerror(errno)));
 344                         pf->status = PF_WORKER_EXITING;
 345                 }
 346         }
 347
 348         return ret;
 349 }
 350
 351 static void lsasd_client_terminated(void *pvt)
 352 {
 353         struct lsasd_children_data *data;
 354
 355         data = talloc_get_type_abort(pvt, struct lsasd_children_data);
 356
 357         pfh_client_terminated(data->pf);
 358
 359         lsasd_next_client(pvt);
 360 }
 361
 362 struct lsasd_new_client {
 363         struct lsasd_children_data *data;
 364 };
 365
 366 static void lsasd_handle_client(struct tevent_req *req);
 367
 368 static void lsasd_next_client(void *pvt)
 369 {
 370         struct tevent_req *req;
 371         struct lsasd_children_data *data;
 372         struct lsasd_new_client *next;
 373
 374         data = talloc_get_type_abort(pvt, struct lsasd_children_data);
 375
 376         if (!pfh_child_allowed_to_accept(data->pf)) {
 377                 /* nothing to do for now we are already listening
 378                  * or we are not allowed to listen further */
 379                 return;
 380         }
 381
 382         next = talloc_zero(data, struct lsasd_new_client);
 383         if (!next) {
 384                 DEBUG(1, ("Out of memory!?\n"));
 385                 return;
 386         }
 387         next->data = data;
 388
 389         req = prefork_listen_send(next,
 390                                   data->ev_ctx,
 391                                   data->pf,
 392                                   data->listen_fd_size,
 393                                   data->listen_fds);
 394         if (!req) {
 395                 DEBUG(1, ("Failed to make listening request!?\n"));
 396                 talloc_free(next);
 397                 return;
 398         }
 399         tevent_req_set_callback(req, lsasd_handle_client, next);
 400 }
 401
 402 static void lsasd_handle_client(struct tevent_req *req)
 403 {
 404         struct lsasd_children_data *data;
 405         struct lsasd_new_client *client;
 406         const DATA_BLOB ping = data_blob_null;
 407         int rc;
 408         int sd;
 409         TALLOC_CTX *tmp_ctx;
 410         struct tsocket_address *srv_addr;
 411         struct tsocket_address *cli_addr;
 412
 413         client = tevent_req_callback_data(req, struct lsasd_new_client);
 414         data = client->data;
 415
 416         tmp_ctx = talloc_stackframe();
 417         if (tmp_ctx == NULL) {
 418                 DEBUG(1, ("Failed to allocate stackframe!\n"));
 419                 return;
 420         }
 421
 422         rc = prefork_listen_recv(req,
 423                                  tmp_ctx,
 424                                  &sd,
 425                                  &srv_addr,
 426                                  &cli_addr);
 427
 428         /* this will free the request too */
 429         talloc_free(client);
 430
 431         if (rc != 0) {
 432                 DEBUG(6, ("No client connection was available after all!\n"));
 433                 goto done;
 434         }
 435
 436         /* Warn parent that our status changed */
 437         messaging_send(data->msg_ctx, parent_id,
 438                         MSG_PREFORK_CHILD_EVENT, &ping);
 439
 440         DEBUG(2, ("LSASD preforked child %d got client connection!\n",
 441                   (int)(data->pf->pid)));
 442
 443         if (tsocket_address_is_inet(srv_addr, "ip")) {
 444                 DEBUG(3, ("Got a tcpip client connection from %s on inteface %s\n",
 445                            tsocket_address_string(cli_addr, tmp_ctx),
 446                            tsocket_address_string(srv_addr, tmp_ctx)));
 447
 448                 dcerpc_ncacn_accept(data->ev_ctx,
 449                                     data->msg_ctx,
 450                                     NCACN_IP_TCP,
 451                                     "IP",
 452                                     cli_addr,
 453                                     srv_addr,
 454                                     sd,
 455                                     NULL);
 456         } else if (tsocket_address_is_unix(srv_addr)) {
 457                 const char *p;
 458                 const char *b;
 459
 460                 p = tsocket_address_unix_path(srv_addr, tmp_ctx);
 461                 if (p == NULL) {
 462                         talloc_free(tmp_ctx);
 463                         return;
 464                 }
 465
 466                 b = strrchr(p, '/');
 467                 if (b != NULL) {
 468                         b++;
 469                 } else {
 470                         b = p;
 471                 }
 472
 473                 if (strstr(p, "/np/")) {
 474                         named_pipe_accept_function(data->ev_ctx,
 475                                                    data->msg_ctx,
 476                                                    b,
 477                                                    sd,
 478                                                    lsasd_client_terminated,
 479                                                    data);
 480                 } else {
 481                         dcerpc_ncacn_accept(data->ev_ctx,
 482                                             data->msg_ctx,
 483                                             NCALRPC,
 484                                             b,
 485                                             cli_addr,
 486                                             srv_addr,
 487                                             sd,
 488                                             NULL);
 489                 }
 490         } else {
 491                 DEBUG(0, ("ERROR: Unsupported socket!\n"));
 492         }
 493
 494 done:
 495         talloc_free(tmp_ctx);
 496 }
 497
 498 /*
 499  * MAIN
 500  */
 501
 502 static void child_ping(struct messaging_context *msg_ctx,
 503                         void *private_data,
 504                         uint32_t msg_type,
 505                         struct server_id server_id,
 506                         DATA_BLOB *data)
 507 {
 508         struct tevent_context *ev_ctx;
 509
 510         ev_ctx = talloc_get_type_abort(private_data, struct tevent_context);
 511
 512         DEBUG(10, ("Got message that a child changed status.\n"));
 513         pfh_manage_pool(ev_ctx, msg_ctx, &pf_lsasd_cfg, lsasd_pool);
 514 }
 515
 516 static bool lsasd_schedule_check(struct tevent_context *ev_ctx,
 517                                  struct messaging_context *msg_ctx,
 518                                  struct timeval current_time);
 519
 520 static void lsasd_check_children(struct tevent_context *ev_ctx,
 521                                     struct tevent_timer *te,
 522                                     struct timeval current_time,
 523                                     void *pvt);
 524
 525 static void lsasd_sigchld_handler(struct tevent_context *ev_ctx,
 526                                   struct prefork_pool *pfp,
 527                                   void *pvt)
 528 {
 529         struct messaging_context *msg_ctx;
 530
 531         msg_ctx = talloc_get_type_abort(pvt, struct messaging_context);
 532
 533         /* run pool management so we can fork/retire or increase
 534          * the allowed connections per child based on load */
 535         pfh_manage_pool(ev_ctx, msg_ctx, &pf_lsasd_cfg, lsasd_pool);
 536 }
 537
 538 static bool lsasd_setup_children_monitor(struct tevent_context *ev_ctx,
 539                                          struct messaging_context *msg_ctx)
 540 {
 541         bool ok;
 542
 543         /* add our oun sigchld callback */
 544         prefork_set_sigchld_callback(lsasd_pool, lsasd_sigchld_handler, msg_ctx);
 545
 546         ok = lsasd_schedule_check(ev_ctx, msg_ctx, tevent_timeval_current());
 547
 548         return ok;
 549 }
 550
 551 static bool lsasd_schedule_check(struct tevent_context *ev_ctx,
 552                                  struct messaging_context *msg_ctx,
 553                                  struct timeval current_time)
 554 {
 555         struct tevent_timer *te;
 556         struct timeval next_event;
 557
 558         /* check situation again in 10 seconds */
 559         next_event = tevent_timeval_current_ofs(10, 0);
 560
 561         /* TODO: check when the socket becomes readable, so that children
 562          * are checked only when there is some activity ? */
 563         te = tevent_add_timer(ev_ctx, lsasd_pool, next_event,
 564                               lsasd_check_children, msg_ctx);
 565         if (!te) {
 566                 DEBUG(2, ("Failed to set up children monitoring!\n"));
 567                 return false;
 568         }
 569
 570         return true;
 571 }
 572
 573 static void lsasd_check_children(struct tevent_context *ev_ctx,
 574                                  struct tevent_timer *te,
 575                                  struct timeval current_time,
 576                                  void *pvt)
 577 {
 578         struct messaging_context *msg_ctx;
 579
 580         msg_ctx = talloc_get_type_abort(pvt, struct messaging_context);
 581
 582         pfh_manage_pool(ev_ctx, msg_ctx, &pf_lsasd_cfg, lsasd_pool);
 583
 584         lsasd_schedule_check(ev_ctx, msg_ctx, current_time);
 585 }
 586
 587 /*
 588  * start it up
 589  */
 590
 591 static bool lsasd_create_sockets(struct tevent_context *ev_ctx,
 592                                  struct messaging_context *msg_ctx,
 593                                  int *listen_fd,
 594                                  int *listen_fd_size)
 595 {
 596         struct dcerpc_binding_vector *v, *v_orig;
 597         TALLOC_CTX *tmp_ctx;
 598         NTSTATUS status;
 599         uint32_t i;
 600         int fd;
 601         int rc;
 602         bool ok = true;
 603
 604         tmp_ctx = talloc_stackframe();
 605         if (tmp_ctx == NULL) {
 606                 return false;
 607         }
 608
 609         status = dcerpc_binding_vector_new(tmp_ctx, &v_orig);
 610         if (!NT_STATUS_IS_OK(status)) {
 611                 ok = false;
 612                 goto done;
 613         }
 614
 615         /* Create only one tcpip listener for all services */
 616         status = rpc_create_tcpip_sockets(&ndr_table_lsarpc,
 617                                           v_orig,
 618                                           0,
 619                                           listen_fd,
 620                                           listen_fd_size);
 621         if (!NT_STATUS_IS_OK(status)) {
 622                 ok = false;
 623                 goto done;
 624         }
 625
 626         /* Start to listen on tcpip sockets */
 627         for (i = 0; i < *listen_fd_size; i++) {
 628                 rc = listen(listen_fd[i], pf_lsasd_cfg.max_allowed_clients);
 629                 if (rc == -1) {
 630                         DEBUG(0, ("Failed to listen on tcpip socket - %s\n",
 631                                   strerror(errno)));
 632                         ok = false;
 633                         goto done;
 634                 }
 635         }
 636
 637         /* LSARPC */
 638         fd = create_named_pipe_socket("lsarpc");
 639         if (fd < 0) {
 640                 ok = false;
 641                 goto done;
 642         }
 643         listen_fd[*listen_fd_size] = fd;
 644         (*listen_fd_size)++;
 645
 646         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 647         if (rc == -1) {
 648                 DEBUG(0, ("Failed to listen on lsarpc pipe - %s\n",
 649                           strerror(errno)));
 650                 ok = false;
 651                 goto done;
 652         }
 653
 654         fd = create_named_pipe_socket("lsass");
 655         if (fd < 0) {
 656                 ok = false;
 657                 goto done;
 658         }
 659         listen_fd[*listen_fd_size] = fd;
 660         (*listen_fd_size)++;
 661
 662         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 663         if (rc == -1) {
 664                 DEBUG(0, ("Failed to listen on lsass pipe - %s\n",
 665                           strerror(errno)));
 666                 ok = false;
 667                 goto done;
 668         }
 669
 670         fd = create_dcerpc_ncalrpc_socket("lsarpc");
 671         if (fd < 0) {
 672                 ok = false;
 673                 goto done;
 674         }
 675         listen_fd[*listen_fd_size] = fd;
 676         (*listen_fd_size)++;
 677
 678         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 679         if (rc == -1) {
 680                 DEBUG(0, ("Failed to listen on lsarpc ncalrpc - %s\n",
 681                           strerror(errno)));
 682                 ok = false;
 683                 goto done;
 684         }
 685
 686         v = dcerpc_binding_vector_dup(tmp_ctx, v_orig);
 687         if (v == NULL) {
 688                 ok = false;
 689                 goto done;
 690         }
 691
 692         status = dcerpc_binding_vector_replace_iface(&ndr_table_lsarpc, v);
 693         if (!NT_STATUS_IS_OK(status)) {
 694                 return false;
 695         }
 696
 697         status = dcerpc_binding_vector_add_np_default(&ndr_table_lsarpc, v);
 698         if (!NT_STATUS_IS_OK(status)) {
 699                 ok = false;
 700                 goto done;
 701         }
 702
 703         status = dcerpc_binding_vector_add_unix(&ndr_table_lsarpc, v, "lsarpc");
 704         if (!NT_STATUS_IS_OK(status)) {
 705                 ok = false;
 706                 goto done;
 707         }
 708
 709         status = rpc_ep_register(ev_ctx, msg_ctx, &ndr_table_lsarpc, v);
 710         if (!NT_STATUS_IS_OK(status)) {
 711                 ok = false;
 712                 goto done;
 713         }
 714
 715         /* SAMR */
 716         fd = create_named_pipe_socket("samr");
 717         if (fd < 0) {
 718                 ok = false;
 719                 goto done;
 720         }
 721
 722         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 723         if (rc == -1) {
 724                 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
 725                           strerror(errno)));
 726                 ok = false;
 727                 goto done;
 728         }
 729         listen_fd[*listen_fd_size] = fd;
 730         (*listen_fd_size)++;
 731
 732         fd = create_dcerpc_ncalrpc_socket("samr");
 733         if (fd < 0) {
 734                 ok = false;
 735                 goto done;
 736         }
 737         listen_fd[*listen_fd_size] = fd;
 738         (*listen_fd_size)++;
 739
 740         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 741         if (rc == -1) {
 742                 DEBUG(0, ("Failed to listen on samr ncalrpc - %s\n",
 743                           strerror(errno)));
 744                 ok = false;
 745                 goto done;
 746         }
 747
 748         v = dcerpc_binding_vector_dup(tmp_ctx, v_orig);
 749         if (v == NULL) {
 750                 ok = false;
 751                 goto done;
 752         }
 753
 754         status = dcerpc_binding_vector_replace_iface(&ndr_table_samr, v);
 755         if (!NT_STATUS_IS_OK(status)) {
 756                 return false;
 757         }
 758
 759         status = dcerpc_binding_vector_add_np_default(&ndr_table_samr, v);
 760         if (!NT_STATUS_IS_OK(status)) {
 761                 ok = false;
 762                 goto done;
 763         }
 764
 765         status = dcerpc_binding_vector_add_unix(&ndr_table_lsarpc, v, "samr");
 766         if (!NT_STATUS_IS_OK(status)) {
 767                 ok = false;
 768                 goto done;
 769         }
 770
 771         status = rpc_ep_register(ev_ctx, msg_ctx, &ndr_table_samr, v);
 772         if (!NT_STATUS_IS_OK(status)) {
 773                 ok = false;
 774                 goto done;
 775         }
 776
 777         /* NETLOGON */
 778         fd = create_named_pipe_socket("netlogon");
 779         if (fd < 0) {
 780                 ok = false;
 781                 goto done;
 782         }
 783
 784         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 785         if (rc == -1) {
 786                 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
 787                           strerror(errno)));
 788                 ok = false;
 789                 goto done;
 790         }
 791         listen_fd[*listen_fd_size] = fd;
 792         (*listen_fd_size)++;
 793
 794         fd = create_dcerpc_ncalrpc_socket("netlogon");
 795         if (fd < 0) {
 796                 ok = false;
 797                 goto done;
 798         }
 799         listen_fd[*listen_fd_size] = fd;
 800         (*listen_fd_size)++;
 801
 802         rc = listen(fd, pf_lsasd_cfg.max_allowed_clients);
 803         if (rc == -1) {
 804                 DEBUG(0, ("Failed to listen on netlogon ncalrpc - %s\n",
 805                           strerror(errno)));
 806                 ok = false;
 807                 goto done;
 808         }
 809
 810         v = dcerpc_binding_vector_dup(tmp_ctx, v_orig);
 811         if (v == NULL) {
 812                 ok = false;
 813                 goto done;
 814         }
 815
 816         status = dcerpc_binding_vector_replace_iface(&ndr_table_netlogon, v);
 817         if (!NT_STATUS_IS_OK(status)) {
 818                 return false;
 819         }
 820
 821         status = dcerpc_binding_vector_add_np_default(&ndr_table_netlogon, v);
 822         if (!NT_STATUS_IS_OK(status)) {
 823                 ok = false;
 824                 goto done;
 825         }
 826
 827         status = dcerpc_binding_vector_add_unix(&ndr_table_lsarpc, v, "netlogon");
 828         if (!NT_STATUS_IS_OK(status)) {
 829                 ok = false;
 830                 goto done;
 831         }
 832
 833         status = rpc_ep_register(ev_ctx, msg_ctx, &ndr_table_netlogon, v);
 834         if (!NT_STATUS_IS_OK(status)) {
 835                 ok = false;
 836                 goto done;
 837         }
 838
 839 done:
 840         talloc_free(tmp_ctx);
 841         return ok;
 842 }
 843
 844 void start_lsasd(struct tevent_context *ev_ctx,
 845                  struct messaging_context *msg_ctx)
 846 {
 847         NTSTATUS status;
 848         int listen_fd[LSASD_MAX_SOCKETS];
 849         int listen_fd_size = 0;
 850         pid_t pid;
 851         int rc;
 852         bool ok;
 853
 854         DEBUG(1, ("Forking LSA Service Daemon\n"));
 855
 856         /*
 857          * Block signals before forking child as it will have to
 858          * set its own handlers. Child will re-enable SIGHUP as
 859          * soon as the handlers are set up.
 860          */
 861         BlockSignals(true, SIGTERM);
 862         BlockSignals(true, SIGHUP);
 863
 864         pid = fork();
 865         if (pid == -1) {
 866                 DEBUG(0, ("Failed to fork LSASD [%s], aborting ...\n",
 867                            strerror(errno)));
 868                 exit(1);
 869         }
 870
 871         /* parent or error */
 872         if (pid != 0) {
 873
 874                 /* Re-enable SIGHUP before returnig */
 875                 BlockSignals(false, SIGTERM);
 876                 BlockSignals(false, SIGHUP);
 877
 878                 return;
 879         }
 880
 881         /* save the parent process id so the children can use it later */
 882         parent_id = procid_self();
 883
 884         status = reinit_after_fork(msg_ctx,
 885                                    ev_ctx,
 886                                    true);
 887         if (!NT_STATUS_IS_OK(status)) {
 888                 DEBUG(0,("reinit_after_fork() failed\n"));
 889                 smb_panic("reinit_after_fork() failed");
 890         }
 891
 892         lsasd_reopen_logs(0);
 893         pfh_daemon_config(DAEMON_NAME,
 894                           &pf_lsasd_cfg,
 895                           &default_pf_lsasd_cfg);
 896
 897         lsasd_setup_sig_term_handler(ev_ctx);
 898         lsasd_setup_sig_hup_handler(ev_ctx);
 899
 900         BlockSignals(false, SIGTERM);
 901         BlockSignals(false, SIGHUP);
 902
 903         ok = lsasd_create_sockets(ev_ctx, msg_ctx, listen_fd, &listen_fd_size);
 904         if (!ok) {
 905                 exit(1);
 906         }
 907
 908         /* start children before any more initialization is done */
 909         ok = prefork_create_pool(ev_ctx, /* mem_ctx */
 910                                  ev_ctx,
 911                                  msg_ctx,
 912                                  listen_fd_size,
 913                                  listen_fd,
 914                                  pf_lsasd_cfg.min_children,
 915                                  pf_lsasd_cfg.max_children,
 916                                  &lsasd_children_main,
 917                                  NULL,
 918                                  &lsasd_pool);
 919         if (!ok) {
 920                 exit(1);
 921         }
 922
 923         if (!serverid_register(procid_self(), FLAG_MSG_GENERAL)) {
 924                 exit(1);
 925         }
 926
 927         messaging_register(msg_ctx,
 928                            ev_ctx,
 929                            MSG_SMB_CONF_UPDATED,
 930                            lsasd_smb_conf_updated);
 931         messaging_register(msg_ctx, ev_ctx,
 932                            MSG_PREFORK_CHILD_EVENT, child_ping);
 933
 934         status = rpc_lsarpc_init(NULL);
 935         if (!NT_STATUS_IS_OK(status)) {
 936                 DEBUG(0, ("Failed to register lsarpc rpc inteface in lsasd! (%s)\n",
 937                           nt_errstr(status)));
 938                 exit(1);
 939         }
 940
 941         status = rpc_samr_init(NULL);
 942         if (!NT_STATUS_IS_OK(status)) {
 943                 DEBUG(0, ("Failed to register samr rpc inteface in lsasd! (%s)\n",
 944                           nt_errstr(status)));
 945                 exit(1);
 946         }
 947
 948         status = rpc_netlogon_init(NULL);
 949         if (!NT_STATUS_IS_OK(status)) {
 950                 DEBUG(0, ("Failed to register netlogon rpc inteface in lsasd! (%s)\n",
 951                           nt_errstr(status)));
 952                 exit(1);
 953         }
 954
 955         ok = lsasd_setup_children_monitor(ev_ctx, msg_ctx);
 956         if (!ok) {
 957                 DEBUG(0, ("Failed to setup children monitoring!\n"));
 958                 exit(1);
 959         }
 960
 961         DEBUG(1, ("LSASD Daemon Started (%d)\n", getpid()));
 962
 963         /* loop forever */
 964         rc = tevent_loop_wait(ev_ctx);
 965
 966         /* should not be reached */
 967         DEBUG(0,("lsasd: tevent_loop_wait() exited with %d - %s\n",
 968                  rc, (rc == 0) ? "out of events" : strerror(errno)));
 969         exit(1);
 970 }