source3/winbindd/winbindd_dual.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Winbind child daemons
   5
   6    Copyright (C) Andrew Tridgell 2002
   7    Copyright (C) Volker Lendecke 2004,2005
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 3 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  21 */
  22
  23 /*
  24  * We fork a child per domain to be able to act non-blocking in the main
  25  * winbind daemon. A domain controller thousands of miles away being being
  26  * slow replying with a 10.000 user list should not hold up netlogon calls
  27  * that can be handled locally.
  28  */
  29
  30 #include "includes.h"
  31 #include "winbindd.h"
  32 #include "rpc_client/rpc_client.h"
  33 #include "nsswitch/wb_reqtrans.h"
  34 #include "secrets.h"
  35 #include "../lib/util/select.h"
  36 #include "../libcli/security/security.h"
  37 #include "system/select.h"
  38 #include "messages.h"
  39 #include "../lib/util/tevent_unix.h"
  40 #include "lib/param/loadparm.h"
  41 #include "lib/util/sys_rw.h"
  42 #include "lib/util/sys_rw_data.h"
  43
  44 #undef DBGC_CLASS
  45 #define DBGC_CLASS DBGC_WINBIND
  46
  47 extern bool override_logfile;
  48
  49 static struct winbindd_child *winbindd_children = NULL;
  50
  51 /* Read some data from a client connection */
  52
  53 static NTSTATUS child_read_request(int sock, struct winbindd_request *wreq)
  54 {
  55         NTSTATUS status;
  56
  57         status = read_data_ntstatus(sock, (char *)wreq, sizeof(*wreq));
  58         if (!NT_STATUS_IS_OK(status)) {
  59                 DEBUG(3, ("child_read_request: read_data failed: %s\n",
  60                           nt_errstr(status)));
  61                 return status;
  62         }
  63
  64         if (wreq->extra_len == 0) {
  65                 wreq->extra_data.data = NULL;
  66                 return NT_STATUS_OK;
  67         }
  68
  69         DEBUG(10, ("Need to read %d extra bytes\n", (int)wreq->extra_len));
  70
  71         wreq->extra_data.data = SMB_MALLOC_ARRAY(char, wreq->extra_len + 1);
  72         if (wreq->extra_data.data == NULL) {
  73                 DEBUG(0, ("malloc failed\n"));
  74                 return NT_STATUS_NO_MEMORY;
  75         }
  76
  77         /* Ensure null termination */
  78         wreq->extra_data.data[wreq->extra_len] = '\0';
  79
  80         status = read_data_ntstatus(sock, wreq->extra_data.data,
  81                                     wreq->extra_len);
  82         if (!NT_STATUS_IS_OK(status)) {
  83                 DEBUG(0, ("Could not read extra data: %s\n",
  84                           nt_errstr(status)));
  85         }
  86         return status;
  87 }
  88
  89 static NTSTATUS child_write_response(int sock, struct winbindd_response *wrsp)
  90 {
  91         struct iovec iov[2];
  92         int iov_count;
  93
  94         iov[0].iov_base = (void *)wrsp;
  95         iov[0].iov_len = sizeof(struct winbindd_response);
  96         iov_count = 1;
  97
  98         if (wrsp->length > sizeof(struct winbindd_response)) {
  99                 iov[1].iov_base = (void *)wrsp->extra_data.data;
 100                 iov[1].iov_len = wrsp->length-iov[0].iov_len;
 101                 iov_count = 2;
 102         }
 103
 104         DEBUG(10, ("Writing %d bytes to parent\n", (int)wrsp->length));
 105
 106         if (write_data_iov(sock, iov, iov_count) != wrsp->length) {
 107                 DEBUG(0, ("Could not write result\n"));
 108                 return NT_STATUS_INVALID_HANDLE;
 109         }
 110
 111         return NT_STATUS_OK;
 112 }
 113
 114 /*
 115  * Do winbind child async request. This is not simply wb_simple_trans. We have
 116  * to do the queueing ourselves because while a request is queued, the child
 117  * might have crashed, and we have to re-fork it in the _trigger function.
 118  */
 119
 120 struct wb_child_request_state {
 121         struct tevent_context *ev;
 122         struct tevent_req *subreq;
 123         struct winbindd_child *child;
 124         struct winbindd_request *request;
 125         struct winbindd_response *response;
 126 };
 127
 128 static bool fork_domain_child(struct winbindd_child *child);
 129
 130 static void wb_child_request_trigger(struct tevent_req *req,
 131                                             void *private_data);
 132 static void wb_child_request_done(struct tevent_req *subreq);
 133
 134 static void wb_child_request_cleanup(struct tevent_req *req,
 135                                      enum tevent_req_state req_state);
 136
 137 struct tevent_req *wb_child_request_send(TALLOC_CTX *mem_ctx,
 138                                          struct tevent_context *ev,
 139                                          struct winbindd_child *child,
 140                                          struct winbindd_request *request)
 141 {
 142         struct tevent_req *req;
 143         struct wb_child_request_state *state;
 144
 145         req = tevent_req_create(mem_ctx, &state,
 146                                 struct wb_child_request_state);
 147         if (req == NULL) {
 148                 return NULL;
 149         }
 150
 151         state->ev = ev;
 152         state->child = child;
 153         state->request = request;
 154
 155         if (!tevent_queue_add(child->queue, ev, req,
 156                               wb_child_request_trigger, NULL)) {
 157                 tevent_req_oom(req);
 158                 return tevent_req_post(req, ev);
 159         }
 160
 161         tevent_req_set_cleanup_fn(req, wb_child_request_cleanup);
 162
 163         return req;
 164 }
 165
 166 static void wb_child_request_trigger(struct tevent_req *req,
 167                                      void *private_data)
 168 {
 169         struct wb_child_request_state *state = tevent_req_data(
 170                 req, struct wb_child_request_state);
 171         struct tevent_req *subreq;
 172
 173         if ((state->child->sock == -1) && (!fork_domain_child(state->child))) {
 174                 tevent_req_error(req, errno);
 175                 return;
 176         }
 177
 178         subreq = wb_simple_trans_send(state, server_event_context(), NULL,
 179                                       state->child->sock, state->request);
 180         if (tevent_req_nomem(subreq, req)) {
 181                 return;
 182         }
 183
 184         state->subreq = subreq;
 185         tevent_req_set_callback(subreq, wb_child_request_done, req);
 186         tevent_req_set_endtime(req, state->ev, timeval_current_ofs(300, 0));
 187 }
 188
 189 static void wb_child_request_done(struct tevent_req *subreq)
 190 {
 191         struct tevent_req *req = tevent_req_callback_data(
 192                 subreq, struct tevent_req);
 193         struct wb_child_request_state *state = tevent_req_data(
 194                 req, struct wb_child_request_state);
 195         int ret, err;
 196
 197         ret = wb_simple_trans_recv(subreq, state, &state->response, &err);
 198         /* Freeing the subrequest is deferred until the cleanup function,
 199          * which has to know whether a subrequest exists, and consequently
 200          * decide whether to shut down the pipe to the child process.
 201          */
 202         if (ret == -1) {
 203                 tevent_req_error(req, err);
 204                 return;
 205         }
 206         tevent_req_done(req);
 207 }
 208
 209 int wb_child_request_recv(struct tevent_req *req, TALLOC_CTX *mem_ctx,
 210                           struct winbindd_response **presponse, int *err)
 211 {
 212         struct wb_child_request_state *state = tevent_req_data(
 213                 req, struct wb_child_request_state);
 214
 215         if (tevent_req_is_unix_error(req, err)) {
 216                 return -1;
 217         }
 218         *presponse = talloc_move(mem_ctx, &state->response);
 219         return 0;
 220 }
 221
 222 static void wb_child_request_cleanup(struct tevent_req *req,
 223                                      enum tevent_req_state req_state)
 224 {
 225         struct wb_child_request_state *state =
 226             tevent_req_data(req, struct wb_child_request_state);
 227
 228         if (state->subreq == NULL) {
 229                 /* nothing to cleanup */
 230                 return;
 231         }
 232
 233         TALLOC_FREE(state->subreq);
 234
 235         if (req_state == TEVENT_REQ_DONE) {
 236                 /* transmitted request and got response */
 237                 return;
 238         }
 239
 240         /*
 241          * Failed to transmit and receive response, or request
 242          * cancelled while being serviced.
 243          * The basic parent/child communication broke, close
 244          * our socket
 245          */
 246         close(state->child->sock);
 247         state->child->sock = -1;
 248         DLIST_REMOVE(winbindd_children, state->child);
 249 }
 250
 251 struct winbindd_child *choose_domain_child(struct winbindd_domain *domain)
 252 {
 253         struct winbindd_child *shortest = &domain->children[0];
 254         struct winbindd_child *current;
 255         int i;
 256
 257         for (i=0; i<lp_winbind_max_domain_connections(); i++) {
 258                 size_t shortest_len, current_len;
 259
 260                 current = &domain->children[i];
 261                 current_len = tevent_queue_length(current->queue);
 262
 263                 if (current_len == 0) {
 264                         /* idle child */
 265                         return current;
 266                 }
 267
 268                 shortest_len = tevent_queue_length(shortest->queue);
 269
 270                 if (current_len < shortest_len) {
 271                         shortest = current;
 272                 }
 273         }
 274
 275         return shortest;
 276 }
 277
 278 struct dcerpc_binding_handle *dom_child_handle(struct winbindd_domain *domain)
 279 {
 280         struct winbindd_child *child;
 281
 282         child = choose_domain_child(domain);
 283         return child->binding_handle;
 284 }
 285
 286 struct wb_domain_request_state {
 287         struct tevent_context *ev;
 288         struct winbindd_domain *domain;
 289         struct winbindd_child *child;
 290         struct winbindd_request *request;
 291         struct winbindd_request *init_req;
 292         struct winbindd_response *response;
 293 };
 294
 295 static void wb_domain_request_gotdc(struct tevent_req *subreq);
 296 static void wb_domain_request_initialized(struct tevent_req *subreq);
 297 static void wb_domain_request_done(struct tevent_req *subreq);
 298
 299 struct tevent_req *wb_domain_request_send(TALLOC_CTX *mem_ctx,
 300                                           struct tevent_context *ev,
 301                                           struct winbindd_domain *domain,
 302                                           struct winbindd_request *request)
 303 {
 304         struct tevent_req *req, *subreq;
 305         struct wb_domain_request_state *state;
 306
 307         req = tevent_req_create(mem_ctx, &state,
 308                                 struct wb_domain_request_state);
 309         if (req == NULL) {
 310                 return NULL;
 311         }
 312
 313         state->child = choose_domain_child(domain);
 314
 315         if (domain->initialized) {
 316                 subreq = wb_child_request_send(state, ev, state->child,
 317                                                request);
 318                 if (tevent_req_nomem(subreq, req)) {
 319                         return tevent_req_post(req, ev);
 320                 }
 321                 tevent_req_set_callback(subreq, wb_domain_request_done, req);
 322                 return req;
 323         }
 324
 325         state->domain = domain;
 326         state->ev = ev;
 327         state->request = request;
 328
 329         state->init_req = talloc_zero(state, struct winbindd_request);
 330         if (tevent_req_nomem(state->init_req, req)) {
 331                 return tevent_req_post(req, ev);
 332         }
 333
 334         if (IS_DC || domain->primary || domain->internal) {
 335                 /* The primary domain has to find the DC name itself */
 336                 state->init_req->cmd = WINBINDD_INIT_CONNECTION;
 337                 fstrcpy(state->init_req->domain_name, domain->name);
 338                 state->init_req->data.init_conn.is_primary = domain->primary;
 339                 fstrcpy(state->init_req->data.init_conn.dcname, "");
 340
 341                 subreq = wb_child_request_send(state, ev, state->child,
 342                                                state->init_req);
 343                 if (tevent_req_nomem(subreq, req)) {
 344                         return tevent_req_post(req, ev);
 345                 }
 346                 tevent_req_set_callback(subreq, wb_domain_request_initialized,
 347                                         req);
 348                 return req;
 349         }
 350
 351         /*
 352          * Ask our DC for a DC name
 353          */
 354         domain = find_our_domain();
 355
 356         /* This is *not* the primary domain, let's ask our DC about a DC
 357          * name */
 358
 359         state->init_req->cmd = WINBINDD_GETDCNAME;
 360         fstrcpy(state->init_req->domain_name, domain->name);
 361
 362         subreq = wb_child_request_send(state, ev, state->child, request);
 363         if (tevent_req_nomem(subreq, req)) {
 364                 return tevent_req_post(req, ev);
 365         }
 366         tevent_req_set_callback(subreq, wb_domain_request_gotdc, req);
 367         return req;
 368 }
 369
 370 static void wb_domain_request_gotdc(struct tevent_req *subreq)
 371 {
 372         struct tevent_req *req = tevent_req_callback_data(
 373                 subreq, struct tevent_req);
 374         struct wb_domain_request_state *state = tevent_req_data(
 375                 req, struct wb_domain_request_state);
 376         struct winbindd_response *response;
 377         int ret, err;
 378
 379         ret = wb_child_request_recv(subreq, talloc_tos(), &response, &err);
 380         TALLOC_FREE(subreq);
 381         if (ret == -1) {
 382                 tevent_req_error(req, err);
 383                 return;
 384         }
 385         state->init_req->cmd = WINBINDD_INIT_CONNECTION;
 386         fstrcpy(state->init_req->domain_name, state->domain->name);
 387         state->init_req->data.init_conn.is_primary = False;
 388         fstrcpy(state->init_req->data.init_conn.dcname,
 389                 response->data.dc_name);
 390
 391         TALLOC_FREE(response);
 392
 393         subreq = wb_child_request_send(state, state->ev, state->child,
 394                                        state->init_req);
 395         if (tevent_req_nomem(subreq, req)) {
 396                 return;
 397         }
 398         tevent_req_set_callback(subreq, wb_domain_request_initialized, req);
 399 }
 400
 401 static void wb_domain_request_initialized(struct tevent_req *subreq)
 402 {
 403         struct tevent_req *req = tevent_req_callback_data(
 404                 subreq, struct tevent_req);
 405         struct wb_domain_request_state *state = tevent_req_data(
 406                 req, struct wb_domain_request_state);
 407         struct winbindd_response *response;
 408         int ret, err;
 409
 410         ret = wb_child_request_recv(subreq, talloc_tos(), &response, &err);
 411         TALLOC_FREE(subreq);
 412         if (ret == -1) {
 413                 tevent_req_error(req, err);
 414                 return;
 415         }
 416
 417         if (!string_to_sid(&state->domain->sid,
 418                            response->data.domain_info.sid)) {
 419                 DEBUG(1,("init_child_recv: Could not convert sid %s "
 420                         "from string\n", response->data.domain_info.sid));
 421                 tevent_req_error(req, EINVAL);
 422                 return;
 423         }
 424
 425         talloc_free(state->domain->name);
 426         state->domain->name = talloc_strdup(state->domain,
 427                                             response->data.domain_info.name);
 428         if (state->domain->name == NULL) {
 429                 tevent_req_error(req, ENOMEM);
 430                 return;
 431         }
 432
 433         if (response->data.domain_info.alt_name[0] != '\0') {
 434                 talloc_free(state->domain->alt_name);
 435
 436                 state->domain->alt_name = talloc_strdup(state->domain,
 437                                 response->data.domain_info.alt_name);
 438                 if (state->domain->alt_name == NULL) {
 439                         tevent_req_error(req, ENOMEM);
 440                         return;
 441                 }
 442         }
 443
 444         state->domain->native_mode = response->data.domain_info.native_mode;
 445         state->domain->active_directory =
 446                 response->data.domain_info.active_directory;
 447         state->domain->initialized = true;
 448
 449         TALLOC_FREE(response);
 450
 451         subreq = wb_child_request_send(state, state->ev, state->child,
 452                                        state->request);
 453         if (tevent_req_nomem(subreq, req)) {
 454                 return;
 455         }
 456         tevent_req_set_callback(subreq, wb_domain_request_done, req);
 457 }
 458
 459 static void wb_domain_request_done(struct tevent_req *subreq)
 460 {
 461         struct tevent_req *req = tevent_req_callback_data(
 462                 subreq, struct tevent_req);
 463         struct wb_domain_request_state *state = tevent_req_data(
 464                 req, struct wb_domain_request_state);
 465         int ret, err;
 466
 467         ret = wb_child_request_recv(subreq, talloc_tos(), &state->response,
 468                                     &err);
 469         TALLOC_FREE(subreq);
 470         if (ret == -1) {
 471                 tevent_req_error(req, err);
 472                 return;
 473         }
 474         tevent_req_done(req);
 475 }
 476
 477 int wb_domain_request_recv(struct tevent_req *req, TALLOC_CTX *mem_ctx,
 478                            struct winbindd_response **presponse, int *err)
 479 {
 480         struct wb_domain_request_state *state = tevent_req_data(
 481                 req, struct wb_domain_request_state);
 482
 483         if (tevent_req_is_unix_error(req, err)) {
 484                 return -1;
 485         }
 486         *presponse = talloc_move(mem_ctx, &state->response);
 487         return 0;
 488 }
 489
 490 static void child_process_request(struct winbindd_child *child,
 491                                   struct winbindd_cli_state *state)
 492 {
 493         struct winbindd_domain *domain = child->domain;
 494         const struct winbindd_child_dispatch_table *table = child->table;
 495
 496         /* Free response data - we may be interrupted and receive another
 497            command before being able to send this data off. */
 498
 499         state->response->result = WINBINDD_ERROR;
 500         state->response->length = sizeof(struct winbindd_response);
 501
 502         /* as all requests in the child are sync, we can use talloc_tos() */
 503         state->mem_ctx = talloc_tos();
 504
 505         /* Process command */
 506
 507         for (; table->name; table++) {
 508                 if (state->request->cmd == table->struct_cmd) {
 509                         DEBUG(10,("child_process_request: request fn %s\n",
 510                                   table->name));
 511                         state->response->result = table->struct_fn(domain, state);
 512                         return;
 513                 }
 514         }
 515
 516         DEBUG(1, ("child_process_request: unknown request fn number %d\n",
 517                   (int)state->request->cmd));
 518         state->response->result = WINBINDD_ERROR;
 519 }
 520
 521 void setup_child(struct winbindd_domain *domain, struct winbindd_child *child,
 522                  const struct winbindd_child_dispatch_table *table,
 523                  const char *logprefix,
 524                  const char *logname)
 525 {
 526         if (logprefix && logname) {
 527                 char *logbase = NULL;
 528
 529                 if (*lp_logfile(talloc_tos())) {
 530                         char *end = NULL;
 531
 532                         if (asprintf(&logbase, "%s", lp_logfile(talloc_tos())) < 0) {
 533                                 smb_panic("Internal error: asprintf failed");
 534                         }
 535
 536                         if ((end = strrchr_m(logbase, '/'))) {
 537                                 *end = '\0';
 538                         }
 539                 } else {
 540                         if (asprintf(&logbase, "%s", get_dyn_LOGFILEBASE()) < 0) {
 541                                 smb_panic("Internal error: asprintf failed");
 542                         }
 543                 }
 544
 545                 if (asprintf(&child->logfilename, "%s/%s-%s",
 546                              logbase, logprefix, logname) < 0) {
 547                         SAFE_FREE(logbase);
 548                         smb_panic("Internal error: asprintf failed");
 549                 }
 550
 551                 SAFE_FREE(logbase);
 552         } else {
 553                 smb_panic("Internal error: logprefix == NULL && "
 554                           "logname == NULL");
 555         }
 556
 557         child->sock = -1;
 558         child->domain = domain;
 559         child->table = table;
 560         child->queue = tevent_queue_create(NULL, "winbind_child");
 561         SMB_ASSERT(child->queue != NULL);
 562         child->binding_handle = wbint_binding_handle(NULL, domain, child);
 563         SMB_ASSERT(child->binding_handle != NULL);
 564 }
 565
 566 void winbind_child_died(pid_t pid)
 567 {
 568         struct winbindd_child *child;
 569
 570         for (child = winbindd_children; child != NULL; child = child->next) {
 571                 if (child->pid == pid) {
 572                         break;
 573                 }
 574         }
 575
 576         if (child == NULL) {
 577                 DEBUG(5, ("Already reaped child %u died\n", (unsigned int)pid));
 578                 return;
 579         }
 580
 581         /* This will be re-added in fork_domain_child() */
 582
 583         DLIST_REMOVE(winbindd_children, child);
 584         child->pid = 0;
 585
 586         if (child->sock != -1) {
 587                 close(child->sock);
 588                 child->sock = -1;
 589         }
 590 }
 591
 592 /* Ensure any negative cache entries with the netbios or realm names are removed. */
 593
 594 void winbindd_flush_negative_conn_cache(struct winbindd_domain *domain)
 595 {
 596         flush_negative_conn_cache_for_domain(domain->name);
 597         if (domain->alt_name != NULL) {
 598                 flush_negative_conn_cache_for_domain(domain->alt_name);
 599         }
 600 }
 601
 602 /*
 603  * Parent winbindd process sets its own debug level first and then
 604  * sends a message to all the winbindd children to adjust their debug
 605  * level to that of parents.
 606  */
 607
 608 void winbind_msg_debug(struct messaging_context *msg_ctx,
 609                          void *private_data,
 610                          uint32_t msg_type,
 611                          struct server_id server_id,
 612                          DATA_BLOB *data)
 613 {
 614         struct winbindd_child *child;
 615
 616         DEBUG(10,("winbind_msg_debug: got debug message.\n"));
 617
 618         debug_message(msg_ctx, private_data, MSG_DEBUG, server_id, data);
 619
 620         for (child = winbindd_children; child != NULL; child = child->next) {
 621
 622                 DEBUG(10,("winbind_msg_debug: sending message to pid %u.\n",
 623                         (unsigned int)child->pid));
 624
 625                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
 626                            MSG_DEBUG,
 627                            data->data,
 628                            strlen((char *) data->data) + 1);
 629         }
 630 }
 631
 632 /* Set our domains as offline and forward the offline message to our children. */
 633
 634 void winbind_msg_offline(struct messaging_context *msg_ctx,
 635                          void *private_data,
 636                          uint32_t msg_type,
 637                          struct server_id server_id,
 638                          DATA_BLOB *data)
 639 {
 640         struct winbindd_child *child;
 641         struct winbindd_domain *domain;
 642
 643         DEBUG(10,("winbind_msg_offline: got offline message.\n"));
 644
 645         if (!lp_winbind_offline_logon()) {
 646                 DEBUG(10,("winbind_msg_offline: rejecting offline message.\n"));
 647                 return;
 648         }
 649
 650         /* Set our global state as offline. */
 651         if (!set_global_winbindd_state_offline()) {
 652                 DEBUG(10,("winbind_msg_offline: offline request failed.\n"));
 653                 return;
 654         }
 655
 656         /* Set all our domains as offline. */
 657         for (domain = domain_list(); domain; domain = domain->next) {
 658                 if (domain->internal) {
 659                         continue;
 660                 }
 661                 DEBUG(5,("winbind_msg_offline: marking %s offline.\n", domain->name));
 662                 set_domain_offline(domain);
 663         }
 664
 665         for (child = winbindd_children; child != NULL; child = child->next) {
 666                 /* Don't send message to internal children.  We've already
 667                    done so above. */
 668                 if (!child->domain || winbindd_internal_child(child)) {
 669                         continue;
 670                 }
 671
 672                 /* Or internal domains (this should not be possible....) */
 673                 if (child->domain->internal) {
 674                         continue;
 675                 }
 676
 677                 /* Each winbindd child should only process requests for one domain - make sure
 678                    we only set it online / offline for that domain. */
 679
 680                 DEBUG(10,("winbind_msg_offline: sending message to pid %u for domain %s.\n",
 681                         (unsigned int)child->pid, child->domain->name ));
 682
 683                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
 684                                    MSG_WINBIND_OFFLINE,
 685                                    (const uint8_t *)child->domain->name,
 686                                    strlen(child->domain->name)+1);
 687         }
 688 }
 689
 690 /* Set our domains as online and forward the online message to our children. */
 691
 692 void winbind_msg_online(struct messaging_context *msg_ctx,
 693                         void *private_data,
 694                         uint32_t msg_type,
 695                         struct server_id server_id,
 696                         DATA_BLOB *data)
 697 {
 698         struct winbindd_child *child;
 699         struct winbindd_domain *domain;
 700
 701         DEBUG(10,("winbind_msg_online: got online message.\n"));
 702
 703         if (!lp_winbind_offline_logon()) {
 704                 DEBUG(10,("winbind_msg_online: rejecting online message.\n"));
 705                 return;
 706         }
 707
 708         /* Set our global state as online. */
 709         set_global_winbindd_state_online();
 710
 711         smb_nscd_flush_user_cache();
 712         smb_nscd_flush_group_cache();
 713
 714         /* Set all our domains as online. */
 715         for (domain = domain_list(); domain; domain = domain->next) {
 716                 if (domain->internal) {
 717                         continue;
 718                 }
 719                 DEBUG(5,("winbind_msg_online: requesting %s to go online.\n", domain->name));
 720
 721                 winbindd_flush_negative_conn_cache(domain);
 722                 set_domain_online_request(domain);
 723
 724                 /* Send an online message to the idmap child when our
 725                    primary domain comes back online */
 726
 727                 if ( domain->primary ) {
 728                         struct winbindd_child *idmap = idmap_child();
 729
 730                         if ( idmap->pid != 0 ) {
 731                                 messaging_send_buf(msg_ctx,
 732                                                    pid_to_procid(idmap->pid),
 733                                                    MSG_WINBIND_ONLINE,
 734                                                    (const uint8_t *)domain->name,
 735                                                    strlen(domain->name)+1);
 736                         }
 737                 }
 738         }
 739
 740         for (child = winbindd_children; child != NULL; child = child->next) {
 741                 /* Don't send message to internal childs. */
 742                 if (!child->domain || winbindd_internal_child(child)) {
 743                         continue;
 744                 }
 745
 746                 /* Or internal domains (this should not be possible....) */
 747                 if (child->domain->internal) {
 748                         continue;
 749                 }
 750
 751                 /* Each winbindd child should only process requests for one domain - make sure
 752                    we only set it online / offline for that domain. */
 753
 754                 DEBUG(10,("winbind_msg_online: sending message to pid %u for domain %s.\n",
 755                         (unsigned int)child->pid, child->domain->name ));
 756
 757                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
 758                                    MSG_WINBIND_ONLINE,
 759                                    (const uint8_t *)child->domain->name,
 760                                    strlen(child->domain->name)+1);
 761         }
 762 }
 763
 764 static const char *collect_onlinestatus(TALLOC_CTX *mem_ctx)
 765 {
 766         struct winbindd_domain *domain;
 767         char *buf = NULL;
 768
 769         if ((buf = talloc_asprintf(mem_ctx, "global:%s ",
 770                                    get_global_winbindd_state_offline() ?
 771                                    "Offline":"Online")) == NULL) {
 772                 return NULL;
 773         }
 774
 775         for (domain = domain_list(); domain; domain = domain->next) {
 776                 if ((buf = talloc_asprintf_append_buffer(buf, "%s:%s ",
 777                                                   domain->name,
 778                                                   domain->online ?
 779                                                   "Online":"Offline")) == NULL) {
 780                         return NULL;
 781                 }
 782         }
 783
 784         buf = talloc_asprintf_append_buffer(buf, "\n");
 785
 786         DEBUG(5,("collect_onlinestatus: %s", buf));
 787
 788         return buf;
 789 }
 790
 791 void winbind_msg_onlinestatus(struct messaging_context *msg_ctx,
 792                               void *private_data,
 793                               uint32_t msg_type,
 794                               struct server_id server_id,
 795                               DATA_BLOB *data)
 796 {
 797         TALLOC_CTX *mem_ctx;
 798         const char *message;
 799
 800         DEBUG(5,("winbind_msg_onlinestatus received.\n"));
 801
 802         mem_ctx = talloc_init("winbind_msg_onlinestatus");
 803         if (mem_ctx == NULL) {
 804                 return;
 805         }
 806
 807         message = collect_onlinestatus(mem_ctx);
 808         if (message == NULL) {
 809                 talloc_destroy(mem_ctx);
 810                 return;
 811         }
 812
 813         messaging_send_buf(msg_ctx, server_id, MSG_WINBIND_ONLINESTATUS,
 814                            (const uint8_t *)message, strlen(message) + 1);
 815
 816         talloc_destroy(mem_ctx);
 817 }
 818
 819 void winbind_msg_dump_event_list(struct messaging_context *msg_ctx,
 820                                  void *private_data,
 821                                  uint32_t msg_type,
 822                                  struct server_id server_id,
 823                                  DATA_BLOB *data)
 824 {
 825         struct winbindd_child *child;
 826
 827         DEBUG(10,("winbind_msg_dump_event_list received\n"));
 828
 829         DBG_WARNING("dump event list no longer implemented\n");
 830
 831         for (child = winbindd_children; child != NULL; child = child->next) {
 832
 833                 DEBUG(10,("winbind_msg_dump_event_list: sending message to pid %u\n",
 834                         (unsigned int)child->pid));
 835
 836                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
 837                                    MSG_DUMP_EVENT_LIST,
 838                                    NULL, 0);
 839         }
 840
 841 }
 842
 843 void winbind_msg_dump_domain_list(struct messaging_context *msg_ctx,
 844                                   void *private_data,
 845                                   uint32_t msg_type,
 846                                   struct server_id server_id,
 847                                   DATA_BLOB *data)
 848 {
 849         TALLOC_CTX *mem_ctx;
 850         const char *message = NULL;
 851         const char *domain = NULL;
 852         char *s = NULL;
 853         NTSTATUS status;
 854         struct winbindd_domain *dom = NULL;
 855
 856         DEBUG(5,("winbind_msg_dump_domain_list received.\n"));
 857
 858         mem_ctx = talloc_init("winbind_msg_dump_domain_list");
 859         if (!mem_ctx) {
 860                 return;
 861         }
 862
 863         if (data->length > 0) {
 864                 domain = (const char *)data->data;
 865         }
 866
 867         if (domain) {
 868
 869                 DEBUG(5,("winbind_msg_dump_domain_list for domain: %s\n",
 870                         domain));
 871
 872                 message = NDR_PRINT_STRUCT_STRING(mem_ctx, winbindd_domain,
 873                                                   find_domain_from_name_noinit(domain));
 874                 if (!message) {
 875                         talloc_destroy(mem_ctx);
 876                         return;
 877                 }
 878
 879                 messaging_send_buf(msg_ctx, server_id,
 880                                    MSG_WINBIND_DUMP_DOMAIN_LIST,
 881                                    (const uint8_t *)message, strlen(message) + 1);
 882
 883                 talloc_destroy(mem_ctx);
 884
 885                 return;
 886         }
 887
 888         DEBUG(5,("winbind_msg_dump_domain_list all domains\n"));
 889
 890         for (dom = domain_list(); dom; dom=dom->next) {
 891                 message = NDR_PRINT_STRUCT_STRING(mem_ctx, winbindd_domain, dom);
 892                 if (!message) {
 893                         talloc_destroy(mem_ctx);
 894                         return;
 895                 }
 896
 897                 s = talloc_asprintf_append(s, "%s\n", message);
 898                 if (!s) {
 899                         talloc_destroy(mem_ctx);
 900                         return;
 901                 }
 902         }
 903
 904         status = messaging_send_buf(msg_ctx, server_id,
 905                                     MSG_WINBIND_DUMP_DOMAIN_LIST,
 906                                     (uint8_t *)s, strlen(s) + 1);
 907         if (!NT_STATUS_IS_OK(status)) {
 908                 DEBUG(0,("failed to send message: %s\n",
 909                 nt_errstr(status)));
 910         }
 911
 912         talloc_destroy(mem_ctx);
 913 }
 914
 915 static void account_lockout_policy_handler(struct tevent_context *ctx,
 916                                            struct tevent_timer *te,
 917                                            struct timeval now,
 918                                            void *private_data)
 919 {
 920         struct winbindd_child *child =
 921                 (struct winbindd_child *)private_data;
 922         TALLOC_CTX *mem_ctx = NULL;
 923         struct samr_DomInfo12 lockout_policy;
 924         NTSTATUS result;
 925
 926         DEBUG(10,("account_lockout_policy_handler called\n"));
 927
 928         TALLOC_FREE(child->lockout_policy_event);
 929
 930         if ( !winbindd_can_contact_domain( child->domain ) ) {
 931                 DEBUG(10,("account_lockout_policy_handler: Removing myself since I "
 932                           "do not have an incoming trust to domain %s\n",
 933                           child->domain->name));
 934
 935                 return;
 936         }
 937
 938         mem_ctx = talloc_init("account_lockout_policy_handler ctx");
 939         if (!mem_ctx) {
 940                 result = NT_STATUS_NO_MEMORY;
 941         } else {
 942                 result = wb_cache_lockout_policy(child->domain, mem_ctx,
 943                                                  &lockout_policy);
 944         }
 945         TALLOC_FREE(mem_ctx);
 946
 947         if (!NT_STATUS_IS_OK(result)) {
 948                 DEBUG(10,("account_lockout_policy_handler: lockout_policy failed error %s\n",
 949                          nt_errstr(result)));
 950         }
 951
 952         child->lockout_policy_event = tevent_add_timer(server_event_context(), NULL,
 953                                                       timeval_current_ofs(3600, 0),
 954                                                       account_lockout_policy_handler,
 955                                                       child);
 956 }
 957
 958 static time_t get_machine_password_timeout(void)
 959 {
 960         /* until we have gpo support use lp setting */
 961         return lp_machine_password_timeout();
 962 }
 963
 964 static bool calculate_next_machine_pwd_change(const char *domain,
 965                                               struct timeval *t)
 966 {
 967         time_t pass_last_set_time;
 968         time_t timeout;
 969         time_t next_change;
 970         struct timeval tv;
 971         char *pw;
 972
 973         pw = secrets_fetch_machine_password(domain,
 974                                             &pass_last_set_time,
 975                                             NULL);
 976
 977         if (pw == NULL) {
 978                 DEBUG(0,("cannot fetch own machine password ????"));
 979                 return false;
 980         }
 981
 982         SAFE_FREE(pw);
 983
 984         timeout = get_machine_password_timeout();
 985         if (timeout == 0) {
 986                 DEBUG(10,("machine password never expires\n"));
 987                 return false;
 988         }
 989
 990         tv.tv_sec = pass_last_set_time;
 991         DEBUG(10, ("password last changed %s\n",
 992                    timeval_string(talloc_tos(), &tv, false)));
 993         tv.tv_sec += timeout;
 994         DEBUGADD(10, ("password valid until %s\n",
 995                       timeval_string(talloc_tos(), &tv, false)));
 996
 997         if (time(NULL) < (pass_last_set_time + timeout)) {
 998                 next_change = pass_last_set_time + timeout;
 999                 DEBUG(10,("machine password still valid until: %s\n",
1000                         http_timestring(talloc_tos(), next_change)));
1001                 *t = timeval_set(next_change, 0);
1002
1003                 if (lp_clustering()) {
1004                         uint8_t randbuf;
1005                         /*
1006                          * When having a cluster, we have several
1007                          * winbinds racing for the password change. In
1008                          * the machine_password_change_handler()
1009                          * function we check if someone else was
1010                          * faster when the event triggers. We add a
1011                          * 255-second random delay here, so that we
1012                          * don't run to change the password at the
1013                          * exact same moment.
1014                          */
1015                         generate_random_buffer(&randbuf, sizeof(randbuf));
1016                         DEBUG(10, ("adding %d seconds randomness\n",
1017                                    (int)randbuf));
1018                         t->tv_sec += randbuf;
1019                 }
1020                 return true;
1021         }
1022
1023         DEBUG(10,("machine password expired, needs immediate change\n"));
1024
1025         *t = timeval_zero();
1026
1027         return true;
1028 }
1029
1030 static void machine_password_change_handler(struct tevent_context *ctx,
1031                                             struct tevent_timer *te,
1032                                             struct timeval now,
1033                                             void *private_data)
1034 {
1035         struct messaging_context *msg_ctx = server_messaging_context();
1036         struct winbindd_child *child =
1037                 (struct winbindd_child *)private_data;
1038         struct rpc_pipe_client *netlogon_pipe = NULL;
1039         struct netlogon_creds_cli_context *netlogon_creds_ctx = NULL;
1040         NTSTATUS result;
1041         struct timeval next_change;
1042
1043         DEBUG(10,("machine_password_change_handler called\n"));
1044
1045         TALLOC_FREE(child->machine_password_change_event);
1046
1047         if (!calculate_next_machine_pwd_change(child->domain->name,
1048                                                &next_change)) {
1049                 DEBUG(10, ("calculate_next_machine_pwd_change failed\n"));
1050                 return;
1051         }
1052
1053         DEBUG(10, ("calculate_next_machine_pwd_change returned %s\n",
1054                    timeval_string(talloc_tos(), &next_change, false)));
1055
1056         if (!timeval_expired(&next_change)) {
1057                 DEBUG(10, ("Someone else has already changed the pw\n"));
1058                 goto done;
1059         }
1060
1061         if (!winbindd_can_contact_domain(child->domain)) {
1062                 DEBUG(10,("machine_password_change_handler: Removing myself since I "
1063                           "do not have an incoming trust to domain %s\n",
1064                           child->domain->name));
1065                 return;
1066         }
1067
1068         result = cm_connect_netlogon_secure(child->domain,
1069                                             &netlogon_pipe,
1070                                             &netlogon_creds_ctx);
1071         if (!NT_STATUS_IS_OK(result)) {
1072                 DEBUG(10,("machine_password_change_handler: "
1073                         "failed to connect netlogon pipe: %s\n",
1074                          nt_errstr(result)));
1075                 return;
1076         }
1077
1078         result = trust_pw_change(netlogon_creds_ctx,
1079                                  msg_ctx,
1080                                  netlogon_pipe->binding_handle,
1081                                  child->domain->name,
1082                                  child->domain->dcname,
1083                                  false); /* force */
1084
1085         DEBUG(10, ("machine_password_change_handler: "
1086                    "trust_pw_change returned %s\n",
1087                    nt_errstr(result)));
1088
1089         if (NT_STATUS_EQUAL(result, NT_STATUS_ACCESS_DENIED) ) {
1090                 DEBUG(3,("machine_password_change_handler: password set returned "
1091                          "ACCESS_DENIED.  Maybe the trust account "
1092                          "password was changed and we didn't know it. "
1093                          "Killing connections to domain %s\n",
1094                          child->domain->name));
1095                 invalidate_cm_connection(child->domain);
1096         }
1097
1098         if (!calculate_next_machine_pwd_change(child->domain->name,
1099                                                &next_change)) {
1100                 DEBUG(10, ("calculate_next_machine_pwd_change failed\n"));
1101                 return;
1102         }
1103
1104         DEBUG(10, ("calculate_next_machine_pwd_change returned %s\n",
1105                    timeval_string(talloc_tos(), &next_change, false)));
1106
1107         if (!NT_STATUS_IS_OK(result)) {
1108                 struct timeval tmp;
1109                 /*
1110                  * In case of failure, give the DC a minute to recover
1111                  */
1112                 tmp = timeval_current_ofs(60, 0);
1113                 next_change = timeval_max(&next_change, &tmp);
1114         }
1115
1116 done:
1117         child->machine_password_change_event = tevent_add_timer(server_event_context(), NULL,
1118                                                               next_change,
1119                                                               machine_password_change_handler,
1120                                                               child);
1121 }
1122
1123 /* Deal with a request to go offline. */
1124
1125 static void child_msg_offline(struct messaging_context *msg,
1126                               void *private_data,
1127                               uint32_t msg_type,
1128                               struct server_id server_id,
1129                               DATA_BLOB *data)
1130 {
1131         struct winbindd_domain *domain;
1132         struct winbindd_domain *primary_domain = NULL;
1133         const char *domainname = (const char *)data->data;
1134
1135         if (data->data == NULL || data->length == 0) {
1136                 return;
1137         }
1138
1139         DEBUG(5,("child_msg_offline received for domain %s.\n", domainname));
1140
1141         if (!lp_winbind_offline_logon()) {
1142                 DEBUG(10,("child_msg_offline: rejecting offline message.\n"));
1143                 return;
1144         }
1145
1146         primary_domain = find_our_domain();
1147
1148         /* Mark the requested domain offline. */
1149
1150         for (domain = domain_list(); domain; domain = domain->next) {
1151                 if (domain->internal) {
1152                         continue;
1153                 }
1154                 if (strequal(domain->name, domainname)) {
1155                         DEBUG(5,("child_msg_offline: marking %s offline.\n", domain->name));
1156                         set_domain_offline(domain);
1157                         /* we are in the trusted domain, set the primary domain
1158                          * offline too */
1159                         if (domain != primary_domain) {
1160                                 set_domain_offline(primary_domain);
1161                         }
1162                 }
1163         }
1164 }
1165
1166 /* Deal with a request to go online. */
1167
1168 static void child_msg_online(struct messaging_context *msg,
1169                              void *private_data,
1170                              uint32_t msg_type,
1171                              struct server_id server_id,
1172                              DATA_BLOB *data)
1173 {
1174         struct winbindd_domain *domain;
1175         struct winbindd_domain *primary_domain = NULL;
1176         const char *domainname = (const char *)data->data;
1177
1178         if (data->data == NULL || data->length == 0) {
1179                 return;
1180         }
1181
1182         DEBUG(5,("child_msg_online received for domain %s.\n", domainname));
1183
1184         if (!lp_winbind_offline_logon()) {
1185                 DEBUG(10,("child_msg_online: rejecting online message.\n"));
1186                 return;
1187         }
1188
1189         primary_domain = find_our_domain();
1190
1191         /* Set our global state as online. */
1192         set_global_winbindd_state_online();
1193
1194         /* Try and mark everything online - delete any negative cache entries
1195            to force a reconnect now. */
1196
1197         for (domain = domain_list(); domain; domain = domain->next) {
1198                 if (domain->internal) {
1199                         continue;
1200                 }
1201                 if (strequal(domain->name, domainname)) {
1202                         DEBUG(5,("child_msg_online: requesting %s to go online.\n", domain->name));
1203                         winbindd_flush_negative_conn_cache(domain);
1204                         set_domain_online_request(domain);
1205
1206                         /* we can be in trusted domain, which will contact primary domain
1207                          * we have to bring primary domain online in trusted domain process
1208                          * see, winbindd_dual_pam_auth() --> winbindd_dual_pam_auth_samlogon()
1209                          * --> contact_domain = find_our_domain()
1210                          * */
1211                         if (domain != primary_domain) {
1212                                 winbindd_flush_negative_conn_cache(primary_domain);
1213                                 set_domain_online_request(primary_domain);
1214                         }
1215                 }
1216         }
1217 }
1218
1219 static void child_msg_dump_event_list(struct messaging_context *msg,
1220                                       void *private_data,
1221                                       uint32_t msg_type,
1222                                       struct server_id server_id,
1223                                       DATA_BLOB *data)
1224 {
1225         DEBUG(5,("child_msg_dump_event_list received\n"));
1226         DBG_WARNING("dump_event_list no longer implemented\n");
1227 }
1228
1229 NTSTATUS winbindd_reinit_after_fork(const struct winbindd_child *myself,
1230                                     const char *logfilename)
1231 {
1232         struct winbindd_domain *domain;
1233         struct winbindd_child *cl;
1234         NTSTATUS status;
1235
1236         status = reinit_after_fork(
1237                 server_messaging_context(),
1238                 server_event_context(),
1239                 true, NULL);
1240         if (!NT_STATUS_IS_OK(status)) {
1241                 DEBUG(0,("reinit_after_fork() failed\n"));
1242                 return status;
1243         }
1244
1245         close_conns_after_fork();
1246
1247         if (!override_logfile && logfilename) {
1248                 lp_set_logfile(logfilename);
1249                 reopen_logs();
1250         }
1251
1252         if (!winbindd_setup_sig_term_handler(false))
1253                 return NT_STATUS_NO_MEMORY;
1254         if (!winbindd_setup_sig_hup_handler(override_logfile ? NULL :
1255                                             logfilename))
1256                 return NT_STATUS_NO_MEMORY;
1257
1258         /* Stop zombies in children */
1259         CatchChild();
1260
1261         /* Don't handle the same messages as our parent. */
1262         messaging_deregister(server_messaging_context(),
1263                              MSG_SMB_CONF_UPDATED, NULL);
1264         messaging_deregister(server_messaging_context(),
1265                              MSG_SHUTDOWN, NULL);
1266         messaging_deregister(server_messaging_context(),
1267                              MSG_WINBIND_OFFLINE, NULL);
1268         messaging_deregister(server_messaging_context(),
1269                              MSG_WINBIND_ONLINE, NULL);
1270         messaging_deregister(server_messaging_context(),
1271                              MSG_WINBIND_ONLINESTATUS, NULL);
1272         messaging_deregister(server_messaging_context(),
1273                              MSG_DUMP_EVENT_LIST, NULL);
1274         messaging_deregister(server_messaging_context(),
1275                              MSG_WINBIND_DUMP_DOMAIN_LIST, NULL);
1276         messaging_deregister(server_messaging_context(),
1277                              MSG_DEBUG, NULL);
1278
1279         messaging_deregister(server_messaging_context(),
1280                              MSG_WINBIND_DOMAIN_OFFLINE, NULL);
1281         messaging_deregister(server_messaging_context(),
1282                              MSG_WINBIND_DOMAIN_ONLINE, NULL);
1283
1284         /* We have destroyed all events in the winbindd_event_context
1285          * in reinit_after_fork(), so clean out all possible pending
1286          * event pointers. */
1287
1288         /* Deal with check_online_events. */
1289
1290         for (domain = domain_list(); domain; domain = domain->next) {
1291                 TALLOC_FREE(domain->check_online_event);
1292         }
1293
1294         /* Ensure we're not handling a credential cache event inherited
1295          * from our parent. */
1296
1297         ccache_remove_all_after_fork();
1298
1299         /* Destroy all possible events in child list. */
1300         for (cl = winbindd_children; cl != NULL; cl = cl->next) {
1301                 TALLOC_FREE(cl->lockout_policy_event);
1302                 TALLOC_FREE(cl->machine_password_change_event);
1303
1304                 /* Children should never be able to send
1305                  * each other messages, all messages must
1306                  * go through the parent.
1307                  */
1308                 cl->pid = (pid_t)0;
1309
1310                 /*
1311                  * Close service sockets to all other children
1312                  */
1313                 if ((cl != myself) && (cl->sock != -1)) {
1314                         close(cl->sock);
1315                         cl->sock = -1;
1316                 }
1317         }
1318         /*
1319          * This is a little tricky, children must not
1320          * send an MSG_WINBIND_ONLINE message to idmap_child().
1321          * If we are in a child of our primary domain or
1322          * in the process created by fork_child_dc_connect(),
1323          * and the primary domain cannot go online,
1324          * fork_child_dc_connection() sends MSG_WINBIND_ONLINE
1325          * periodically to idmap_child().
1326          *
1327          * The sequence is, fork_child_dc_connect() ---> getdcs() --->
1328          * get_dc_name_via_netlogon() ---> cm_connect_netlogon()
1329          * ---> init_dc_connection() ---> cm_open_connection --->
1330          * set_domain_online(), sends MSG_WINBIND_ONLINE to
1331          * idmap_child(). Disallow children sending messages
1332          * to each other, all messages must go through the parent.
1333          */
1334         cl = idmap_child();
1335         cl->pid = (pid_t)0;
1336
1337         return NT_STATUS_OK;
1338 }
1339
1340 /*
1341  * In a child there will be only one domain, reference that here.
1342  */
1343 static struct winbindd_domain *child_domain;
1344
1345 struct winbindd_domain *wb_child_domain(void)
1346 {
1347         return child_domain;
1348 }
1349
1350 struct child_handler_state {
1351         struct winbindd_child *child;
1352         struct winbindd_cli_state cli;
1353 };
1354
1355 static void child_handler(struct tevent_context *ev, struct tevent_fd *fde,
1356                           uint16_t flags, void *private_data)
1357 {
1358         struct child_handler_state *state =
1359                 (struct child_handler_state *)private_data;
1360         NTSTATUS status;
1361
1362         /* fetch a request from the main daemon */
1363         status = child_read_request(state->cli.sock, state->cli.request);
1364
1365         if (!NT_STATUS_IS_OK(status)) {
1366                 /* we lost contact with our parent */
1367                 _exit(0);
1368         }
1369
1370         DEBUG(4,("child daemon request %d\n",
1371                  (int)state->cli.request->cmd));
1372
1373         ZERO_STRUCTP(state->cli.response);
1374         state->cli.request->null_term = '\0';
1375         state->cli.mem_ctx = talloc_tos();
1376         child_process_request(state->child, &state->cli);
1377
1378         DEBUG(4, ("Finished processing child request %d\n",
1379                   (int)state->cli.request->cmd));
1380
1381         SAFE_FREE(state->cli.request->extra_data.data);
1382
1383         status = child_write_response(state->cli.sock, state->cli.response);
1384         if (!NT_STATUS_IS_OK(status)) {
1385                 exit(1);
1386         }
1387 }
1388
1389 static bool fork_domain_child(struct winbindd_child *child)
1390 {
1391         int fdpair[2];
1392         struct child_handler_state state;
1393         struct winbindd_request request;
1394         struct winbindd_response response;
1395         struct winbindd_domain *primary_domain = NULL;
1396         NTSTATUS status;
1397         ssize_t nwritten;
1398         struct tevent_fd *fde;
1399
1400         if (child->domain) {
1401                 DEBUG(10, ("fork_domain_child called for domain '%s'\n",
1402                            child->domain->name));
1403         } else {
1404                 DEBUG(10, ("fork_domain_child called without domain.\n"));
1405         }
1406
1407         if (socketpair(AF_UNIX, SOCK_STREAM, 0, fdpair) != 0) {
1408                 DEBUG(0, ("Could not open child pipe: %s\n",
1409                           strerror(errno)));
1410                 return False;
1411         }
1412
1413         ZERO_STRUCT(state);
1414         state.child = child;
1415         state.cli.pid = getpid();
1416         state.cli.request = &request;
1417         state.cli.response = &response;
1418
1419         child->pid = fork();
1420
1421         if (child->pid == -1) {
1422                 DEBUG(0, ("Could not fork: %s\n", strerror(errno)));
1423                 close(fdpair[0]);
1424                 close(fdpair[1]);
1425                 return False;
1426         }
1427
1428         if (child->pid != 0) {
1429                 /* Parent */
1430                 ssize_t nread;
1431
1432                 close(fdpair[0]);
1433
1434                 nread = sys_read(fdpair[1], &status, sizeof(status));
1435                 if (nread != sizeof(status)) {
1436                         DEBUG(1, ("fork_domain_child: Could not read child status: "
1437                                   "nread=%d, error=%s\n", (int)nread,
1438                                   strerror(errno)));
1439                         close(fdpair[1]);
1440                         return false;
1441                 }
1442                 if (!NT_STATUS_IS_OK(status)) {
1443                         DEBUG(1, ("fork_domain_child: Child status is %s\n",
1444                                   nt_errstr(status)));
1445                         close(fdpair[1]);
1446                         return false;
1447                 }
1448
1449                 child->next = child->prev = NULL;
1450                 DLIST_ADD(winbindd_children, child);
1451                 child->sock = fdpair[1];
1452                 return True;
1453         }
1454
1455         /* Child */
1456         child_domain = child->domain;
1457
1458         DEBUG(10, ("Child process %d\n", (int)getpid()));
1459
1460         state.cli.sock = fdpair[0];
1461         close(fdpair[1]);
1462
1463         status = winbindd_reinit_after_fork(child, child->logfilename);
1464
1465         nwritten = sys_write(state.cli.sock, &status, sizeof(status));
1466         if (nwritten != sizeof(status)) {
1467                 DEBUG(1, ("fork_domain_child: Could not write status: "
1468                           "nwritten=%d, error=%s\n", (int)nwritten,
1469                           strerror(errno)));
1470                 _exit(0);
1471         }
1472         if (!NT_STATUS_IS_OK(status)) {
1473                 DEBUG(1, ("winbindd_reinit_after_fork failed: %s\n",
1474                           nt_errstr(status)));
1475                 _exit(0);
1476         }
1477
1478         if (child_domain != NULL) {
1479                 setproctitle("domain child [%s]", child_domain->name);
1480         } else if (child == idmap_child()) {
1481                 setproctitle("idmap child");
1482         }
1483
1484         /* Handle online/offline messages. */
1485         messaging_register(server_messaging_context(), NULL,
1486                            MSG_WINBIND_OFFLINE, child_msg_offline);
1487         messaging_register(server_messaging_context(), NULL,
1488                            MSG_WINBIND_ONLINE, child_msg_online);
1489         messaging_register(server_messaging_context(), NULL,
1490                            MSG_DUMP_EVENT_LIST, child_msg_dump_event_list);
1491         messaging_register(server_messaging_context(), NULL,
1492                            MSG_DEBUG, debug_message);
1493         messaging_register(server_messaging_context(), NULL,
1494                            MSG_WINBIND_IP_DROPPED,
1495                            winbind_msg_ip_dropped);
1496
1497
1498         primary_domain = find_our_domain();
1499
1500         if (primary_domain == NULL) {
1501                 smb_panic("no primary domain found");
1502         }
1503
1504         /* It doesn't matter if we allow cache login,
1505          * try to bring domain online after fork. */
1506         if ( child->domain ) {
1507                 child->domain->startup = True;
1508                 child->domain->startup_time = time_mono(NULL);
1509                 /* we can be in primary domain or in trusted domain
1510                  * If we are in trusted domain, set the primary domain
1511                  * in start-up mode */
1512                 if (!(child->domain->internal)) {
1513                         set_domain_online_request(child->domain);
1514                         if (!(child->domain->primary)) {
1515                                 primary_domain->startup = True;
1516                                 primary_domain->startup_time = time_mono(NULL);
1517                                 set_domain_online_request(primary_domain);
1518                         }
1519                 }
1520         }
1521
1522         /*
1523          * We are in idmap child, make sure that we set the
1524          * check_online_event to bring primary domain online.
1525          */
1526         if (child == idmap_child()) {
1527                 set_domain_online_request(primary_domain);
1528         }
1529
1530         /* We might be in the idmap child...*/
1531         if (child->domain && !(child->domain->internal) &&
1532             lp_winbind_offline_logon()) {
1533
1534                 set_domain_online_request(child->domain);
1535
1536                 if (primary_domain && (primary_domain != child->domain)) {
1537                         /* We need to talk to the primary
1538                          * domain as well as the trusted
1539                          * domain inside a trusted domain
1540                          * child.
1541                          * See the code in :
1542                          * set_dc_type_and_flags_trustinfo()
1543                          * for details.
1544                          */
1545                         set_domain_online_request(primary_domain);
1546                 }
1547
1548                 child->lockout_policy_event = tevent_add_timer(
1549                         server_event_context(), NULL, timeval_zero(),
1550                         account_lockout_policy_handler,
1551                         child);
1552         }
1553
1554         if (child->domain && child->domain->primary &&
1555             !USE_KERBEROS_KEYTAB &&
1556             lp_server_role() == ROLE_DOMAIN_MEMBER) {
1557
1558                 struct timeval next_change;
1559
1560                 if (calculate_next_machine_pwd_change(child->domain->name,
1561                                                        &next_change)) {
1562                         child->machine_password_change_event = tevent_add_timer(
1563                                 server_event_context(), NULL, next_change,
1564                                 machine_password_change_handler,
1565                                 child);
1566                 }
1567         }
1568
1569         fde = tevent_add_fd(server_event_context(), NULL, state.cli.sock,
1570                             TEVENT_FD_READ, child_handler, &state);
1571         if (fde == NULL) {
1572                 DEBUG(1, ("tevent_add_fd failed\n"));
1573                 _exit(1);
1574         }
1575
1576         while (1) {
1577
1578                 int ret;
1579                 TALLOC_CTX *frame = talloc_stackframe();
1580
1581                 ret = tevent_loop_once(server_event_context());
1582                 if (ret != 0) {
1583                         DEBUG(1, ("tevent_loop_once failed: %s\n",
1584                                   strerror(errno)));
1585                         _exit(1);
1586                 }
1587
1588                 if (child->domain && child->domain->startup &&
1589                                 (time_mono(NULL) > child->domain->startup_time + 30)) {
1590                         /* No longer in "startup" mode. */
1591                         DEBUG(10,("fork_domain_child: domain %s no longer in 'startup' mode.\n",
1592                                 child->domain->name ));
1593                         child->domain->startup = False;
1594                 }
1595
1596                 TALLOC_FREE(frame);
1597         }
1598 }
1599
1600 void winbind_msg_ip_dropped_parent(struct messaging_context *msg_ctx,
1601                                    void *private_data,
1602                                    uint32_t msg_type,
1603                                    struct server_id server_id,
1604                                    DATA_BLOB *data)
1605 {
1606         struct winbindd_child *child;
1607
1608         winbind_msg_ip_dropped(msg_ctx, private_data, msg_type,
1609                                server_id, data);
1610
1611
1612         for (child = winbindd_children; child != NULL; child = child->next) {
1613                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
1614                                    msg_type, data->data, data->length);
1615         }
1616 }