winbind: Improve child selection
[samba.git] / 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         struct server_id *sender;
800
801         DEBUG(5,("winbind_msg_onlinestatus received.\n"));
802
803         if (!data->data) {
804                 return;
805         }
806
807         sender = (struct server_id *)data->data;
808
809         mem_ctx = talloc_init("winbind_msg_onlinestatus");
810         if (mem_ctx == NULL) {
811                 return;
812         }
813
814         message = collect_onlinestatus(mem_ctx);
815         if (message == NULL) {
816                 talloc_destroy(mem_ctx);
817                 return;
818         }
819
820         messaging_send_buf(msg_ctx, *sender, MSG_WINBIND_ONLINESTATUS, 
821                            (const uint8_t *)message, strlen(message) + 1);
822
823         talloc_destroy(mem_ctx);
824 }
825
826 void winbind_msg_dump_event_list(struct messaging_context *msg_ctx,
827                                  void *private_data,
828                                  uint32_t msg_type,
829                                  struct server_id server_id,
830                                  DATA_BLOB *data)
831 {
832         struct winbindd_child *child;
833
834         DEBUG(10,("winbind_msg_dump_event_list received\n"));
835
836         DBG_WARNING("dump event list no longer implemented\n");
837
838         for (child = winbindd_children; child != NULL; child = child->next) {
839
840                 DEBUG(10,("winbind_msg_dump_event_list: sending message to pid %u\n",
841                         (unsigned int)child->pid));
842
843                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
844                                    MSG_DUMP_EVENT_LIST,
845                                    NULL, 0);
846         }
847
848 }
849
850 void winbind_msg_dump_domain_list(struct messaging_context *msg_ctx,
851                                   void *private_data,
852                                   uint32_t msg_type,
853                                   struct server_id server_id,
854                                   DATA_BLOB *data)
855 {
856         TALLOC_CTX *mem_ctx;
857         const char *message = NULL;
858         struct server_id *sender = NULL;
859         const char *domain = NULL;
860         char *s = NULL;
861         NTSTATUS status;
862         struct winbindd_domain *dom = NULL;
863
864         DEBUG(5,("winbind_msg_dump_domain_list received.\n"));
865
866         if (!data || !data->data) {
867                 return;
868         }
869
870         if (data->length < sizeof(struct server_id)) {
871                 return;
872         }
873
874         mem_ctx = talloc_init("winbind_msg_dump_domain_list");
875         if (!mem_ctx) {
876                 return;
877         }
878
879         sender = (struct server_id *)data->data;
880         if (data->length > sizeof(struct server_id)) {
881                 domain = (const char *)data->data+sizeof(struct server_id);
882         }
883
884         if (domain) {
885
886                 DEBUG(5,("winbind_msg_dump_domain_list for domain: %s\n",
887                         domain));
888
889                 message = NDR_PRINT_STRUCT_STRING(mem_ctx, winbindd_domain,
890                                                   find_domain_from_name_noinit(domain));
891                 if (!message) {
892                         talloc_destroy(mem_ctx);
893                         return;
894                 }
895
896                 messaging_send_buf(msg_ctx, *sender,
897                                    MSG_WINBIND_DUMP_DOMAIN_LIST,
898                                    (const uint8_t *)message, strlen(message) + 1);
899
900                 talloc_destroy(mem_ctx);
901
902                 return;
903         }
904
905         DEBUG(5,("winbind_msg_dump_domain_list all domains\n"));
906
907         for (dom = domain_list(); dom; dom=dom->next) {
908                 message = NDR_PRINT_STRUCT_STRING(mem_ctx, winbindd_domain, dom);
909                 if (!message) {
910                         talloc_destroy(mem_ctx);
911                         return;
912                 }
913
914                 s = talloc_asprintf_append(s, "%s\n", message);
915                 if (!s) {
916                         talloc_destroy(mem_ctx);
917                         return;
918                 }
919         }
920
921         status = messaging_send_buf(msg_ctx, *sender,
922                                     MSG_WINBIND_DUMP_DOMAIN_LIST,
923                                     (uint8_t *)s, strlen(s) + 1);
924         if (!NT_STATUS_IS_OK(status)) {
925                 DEBUG(0,("failed to send message: %s\n",
926                 nt_errstr(status)));
927         }
928
929         talloc_destroy(mem_ctx);
930 }
931
932 static void account_lockout_policy_handler(struct tevent_context *ctx,
933                                            struct tevent_timer *te,
934                                            struct timeval now,
935                                            void *private_data)
936 {
937         struct winbindd_child *child =
938                 (struct winbindd_child *)private_data;
939         TALLOC_CTX *mem_ctx = NULL;
940         struct samr_DomInfo12 lockout_policy;
941         NTSTATUS result;
942
943         DEBUG(10,("account_lockout_policy_handler called\n"));
944
945         TALLOC_FREE(child->lockout_policy_event);
946
947         if ( !winbindd_can_contact_domain( child->domain ) ) {
948                 DEBUG(10,("account_lockout_policy_handler: Removing myself since I "
949                           "do not have an incoming trust to domain %s\n", 
950                           child->domain->name));
951
952                 return;         
953         }
954
955         mem_ctx = talloc_init("account_lockout_policy_handler ctx");
956         if (!mem_ctx) {
957                 result = NT_STATUS_NO_MEMORY;
958         } else {
959                 result = wb_cache_lockout_policy(child->domain, mem_ctx,
960                                                  &lockout_policy);
961         }
962         TALLOC_FREE(mem_ctx);
963
964         if (!NT_STATUS_IS_OK(result)) {
965                 DEBUG(10,("account_lockout_policy_handler: lockout_policy failed error %s\n",
966                          nt_errstr(result)));
967         }
968
969         child->lockout_policy_event = tevent_add_timer(server_event_context(), NULL,
970                                                       timeval_current_ofs(3600, 0),
971                                                       account_lockout_policy_handler,
972                                                       child);
973 }
974
975 static time_t get_machine_password_timeout(void)
976 {
977         /* until we have gpo support use lp setting */
978         return lp_machine_password_timeout();
979 }
980
981 static bool calculate_next_machine_pwd_change(const char *domain,
982                                               struct timeval *t)
983 {
984         time_t pass_last_set_time;
985         time_t timeout;
986         time_t next_change;
987         struct timeval tv;
988         char *pw;
989
990         pw = secrets_fetch_machine_password(domain,
991                                             &pass_last_set_time,
992                                             NULL);
993
994         if (pw == NULL) {
995                 DEBUG(0,("cannot fetch own machine password ????"));
996                 return false;
997         }
998
999         SAFE_FREE(pw);
1000
1001         timeout = get_machine_password_timeout();
1002         if (timeout == 0) {
1003                 DEBUG(10,("machine password never expires\n"));
1004                 return false;
1005         }
1006
1007         tv.tv_sec = pass_last_set_time;
1008         DEBUG(10, ("password last changed %s\n",
1009                    timeval_string(talloc_tos(), &tv, false)));
1010         tv.tv_sec += timeout;
1011         DEBUGADD(10, ("password valid until %s\n",
1012                       timeval_string(talloc_tos(), &tv, false)));
1013
1014         if (time(NULL) < (pass_last_set_time + timeout)) {
1015                 next_change = pass_last_set_time + timeout;
1016                 DEBUG(10,("machine password still valid until: %s\n",
1017                         http_timestring(talloc_tos(), next_change)));
1018                 *t = timeval_set(next_change, 0);
1019
1020                 if (lp_clustering()) {
1021                         uint8_t randbuf;
1022                         /*
1023                          * When having a cluster, we have several
1024                          * winbinds racing for the password change. In
1025                          * the machine_password_change_handler()
1026                          * function we check if someone else was
1027                          * faster when the event triggers. We add a
1028                          * 255-second random delay here, so that we
1029                          * don't run to change the password at the
1030                          * exact same moment.
1031                          */
1032                         generate_random_buffer(&randbuf, sizeof(randbuf));
1033                         DEBUG(10, ("adding %d seconds randomness\n",
1034                                    (int)randbuf));
1035                         t->tv_sec += randbuf;
1036                 }
1037                 return true;
1038         }
1039
1040         DEBUG(10,("machine password expired, needs immediate change\n"));
1041
1042         *t = timeval_zero();
1043
1044         return true;
1045 }
1046
1047 static void machine_password_change_handler(struct tevent_context *ctx,
1048                                             struct tevent_timer *te,
1049                                             struct timeval now,
1050                                             void *private_data)
1051 {
1052         struct messaging_context *msg_ctx = server_messaging_context();
1053         struct winbindd_child *child =
1054                 (struct winbindd_child *)private_data;
1055         struct rpc_pipe_client *netlogon_pipe = NULL;
1056         struct netlogon_creds_cli_context *netlogon_creds_ctx = NULL;
1057         NTSTATUS result;
1058         struct timeval next_change;
1059
1060         DEBUG(10,("machine_password_change_handler called\n"));
1061
1062         TALLOC_FREE(child->machine_password_change_event);
1063
1064         if (!calculate_next_machine_pwd_change(child->domain->name,
1065                                                &next_change)) {
1066                 DEBUG(10, ("calculate_next_machine_pwd_change failed\n"));
1067                 return;
1068         }
1069
1070         DEBUG(10, ("calculate_next_machine_pwd_change returned %s\n",
1071                    timeval_string(talloc_tos(), &next_change, false)));
1072
1073         if (!timeval_expired(&next_change)) {
1074                 DEBUG(10, ("Someone else has already changed the pw\n"));
1075                 goto done;
1076         }
1077
1078         if (!winbindd_can_contact_domain(child->domain)) {
1079                 DEBUG(10,("machine_password_change_handler: Removing myself since I "
1080                           "do not have an incoming trust to domain %s\n",
1081                           child->domain->name));
1082                 return;
1083         }
1084
1085         result = cm_connect_netlogon_secure(child->domain,
1086                                             &netlogon_pipe,
1087                                             &netlogon_creds_ctx);
1088         if (!NT_STATUS_IS_OK(result)) {
1089                 DEBUG(10,("machine_password_change_handler: "
1090                         "failed to connect netlogon pipe: %s\n",
1091                          nt_errstr(result)));
1092                 return;
1093         }
1094
1095         result = trust_pw_change(netlogon_creds_ctx,
1096                                  msg_ctx,
1097                                  netlogon_pipe->binding_handle,
1098                                  child->domain->name,
1099                                  child->domain->dcname,
1100                                  false); /* force */
1101
1102         DEBUG(10, ("machine_password_change_handler: "
1103                    "trust_pw_change returned %s\n",
1104                    nt_errstr(result)));
1105
1106         if (NT_STATUS_EQUAL(result, NT_STATUS_ACCESS_DENIED) ) {
1107                 DEBUG(3,("machine_password_change_handler: password set returned "
1108                          "ACCESS_DENIED.  Maybe the trust account "
1109                          "password was changed and we didn't know it. "
1110                          "Killing connections to domain %s\n",
1111                          child->domain->name));
1112                 invalidate_cm_connection(child->domain);
1113         }
1114
1115         if (!calculate_next_machine_pwd_change(child->domain->name,
1116                                                &next_change)) {
1117                 DEBUG(10, ("calculate_next_machine_pwd_change failed\n"));
1118                 return;
1119         }
1120
1121         DEBUG(10, ("calculate_next_machine_pwd_change returned %s\n",
1122                    timeval_string(talloc_tos(), &next_change, false)));
1123
1124         if (!NT_STATUS_IS_OK(result)) {
1125                 struct timeval tmp;
1126                 /*
1127                  * In case of failure, give the DC a minute to recover
1128                  */
1129                 tmp = timeval_current_ofs(60, 0);
1130                 next_change = timeval_max(&next_change, &tmp);
1131         }
1132
1133 done:
1134         child->machine_password_change_event = tevent_add_timer(server_event_context(), NULL,
1135                                                               next_change,
1136                                                               machine_password_change_handler,
1137                                                               child);
1138 }
1139
1140 /* Deal with a request to go offline. */
1141
1142 static void child_msg_offline(struct messaging_context *msg,
1143                               void *private_data,
1144                               uint32_t msg_type,
1145                               struct server_id server_id,
1146                               DATA_BLOB *data)
1147 {
1148         struct winbindd_domain *domain;
1149         struct winbindd_domain *primary_domain = NULL;
1150         const char *domainname = (const char *)data->data;
1151
1152         if (data->data == NULL || data->length == 0) {
1153                 return;
1154         }
1155
1156         DEBUG(5,("child_msg_offline received for domain %s.\n", domainname));
1157
1158         if (!lp_winbind_offline_logon()) {
1159                 DEBUG(10,("child_msg_offline: rejecting offline message.\n"));
1160                 return;
1161         }
1162
1163         primary_domain = find_our_domain();
1164
1165         /* Mark the requested domain offline. */
1166
1167         for (domain = domain_list(); domain; domain = domain->next) {
1168                 if (domain->internal) {
1169                         continue;
1170                 }
1171                 if (strequal(domain->name, domainname)) {
1172                         DEBUG(5,("child_msg_offline: marking %s offline.\n", domain->name));
1173                         set_domain_offline(domain);
1174                         /* we are in the trusted domain, set the primary domain 
1175                          * offline too */
1176                         if (domain != primary_domain) {
1177                                 set_domain_offline(primary_domain);
1178                         }
1179                 }
1180         }
1181 }
1182
1183 /* Deal with a request to go online. */
1184
1185 static void child_msg_online(struct messaging_context *msg,
1186                              void *private_data,
1187                              uint32_t msg_type,
1188                              struct server_id server_id,
1189                              DATA_BLOB *data)
1190 {
1191         struct winbindd_domain *domain;
1192         struct winbindd_domain *primary_domain = NULL;
1193         const char *domainname = (const char *)data->data;
1194
1195         if (data->data == NULL || data->length == 0) {
1196                 return;
1197         }
1198
1199         DEBUG(5,("child_msg_online received for domain %s.\n", domainname));
1200
1201         if (!lp_winbind_offline_logon()) {
1202                 DEBUG(10,("child_msg_online: rejecting online message.\n"));
1203                 return;
1204         }
1205
1206         primary_domain = find_our_domain();
1207
1208         /* Set our global state as online. */
1209         set_global_winbindd_state_online();
1210
1211         /* Try and mark everything online - delete any negative cache entries
1212            to force a reconnect now. */
1213
1214         for (domain = domain_list(); domain; domain = domain->next) {
1215                 if (domain->internal) {
1216                         continue;
1217                 }
1218                 if (strequal(domain->name, domainname)) {
1219                         DEBUG(5,("child_msg_online: requesting %s to go online.\n", domain->name));
1220                         winbindd_flush_negative_conn_cache(domain);
1221                         set_domain_online_request(domain);
1222
1223                         /* we can be in trusted domain, which will contact primary domain
1224                          * we have to bring primary domain online in trusted domain process
1225                          * see, winbindd_dual_pam_auth() --> winbindd_dual_pam_auth_samlogon()
1226                          * --> contact_domain = find_our_domain()
1227                          * */
1228                         if (domain != primary_domain) {
1229                                 winbindd_flush_negative_conn_cache(primary_domain);
1230                                 set_domain_online_request(primary_domain);
1231                         }
1232                 }
1233         }
1234 }
1235
1236 static void child_msg_dump_event_list(struct messaging_context *msg,
1237                                       void *private_data,
1238                                       uint32_t msg_type,
1239                                       struct server_id server_id,
1240                                       DATA_BLOB *data)
1241 {
1242         DEBUG(5,("child_msg_dump_event_list received\n"));
1243         DBG_WARNING("dump_event_list no longer implemented\n");
1244 }
1245
1246 NTSTATUS winbindd_reinit_after_fork(const struct winbindd_child *myself,
1247                                     const char *logfilename)
1248 {
1249         struct winbindd_domain *domain;
1250         struct winbindd_child *cl;
1251         NTSTATUS status;
1252
1253         status = reinit_after_fork(
1254                 server_messaging_context(),
1255                 server_event_context(),
1256                 true, NULL);
1257         if (!NT_STATUS_IS_OK(status)) {
1258                 DEBUG(0,("reinit_after_fork() failed\n"));
1259                 return status;
1260         }
1261
1262         close_conns_after_fork();
1263
1264         if (!override_logfile && logfilename) {
1265                 lp_set_logfile(logfilename);
1266                 reopen_logs();
1267         }
1268
1269         if (!winbindd_setup_sig_term_handler(false))
1270                 return NT_STATUS_NO_MEMORY;
1271         if (!winbindd_setup_sig_hup_handler(override_logfile ? NULL :
1272                                             logfilename))
1273                 return NT_STATUS_NO_MEMORY;
1274
1275         /* Stop zombies in children */
1276         CatchChild();
1277
1278         /* Don't handle the same messages as our parent. */
1279         messaging_deregister(server_messaging_context(),
1280                              MSG_SMB_CONF_UPDATED, NULL);
1281         messaging_deregister(server_messaging_context(),
1282                              MSG_SHUTDOWN, NULL);
1283         messaging_deregister(server_messaging_context(),
1284                              MSG_WINBIND_OFFLINE, NULL);
1285         messaging_deregister(server_messaging_context(),
1286                              MSG_WINBIND_ONLINE, NULL);
1287         messaging_deregister(server_messaging_context(),
1288                              MSG_WINBIND_ONLINESTATUS, NULL);
1289         messaging_deregister(server_messaging_context(),
1290                              MSG_DUMP_EVENT_LIST, NULL);
1291         messaging_deregister(server_messaging_context(),
1292                              MSG_WINBIND_DUMP_DOMAIN_LIST, NULL);
1293         messaging_deregister(server_messaging_context(),
1294                              MSG_DEBUG, NULL);
1295
1296         messaging_deregister(server_messaging_context(),
1297                              MSG_WINBIND_DOMAIN_OFFLINE, NULL);
1298         messaging_deregister(server_messaging_context(),
1299                              MSG_WINBIND_DOMAIN_ONLINE, NULL);
1300
1301         /* We have destroyed all events in the winbindd_event_context
1302          * in reinit_after_fork(), so clean out all possible pending
1303          * event pointers. */
1304
1305         /* Deal with check_online_events. */
1306
1307         for (domain = domain_list(); domain; domain = domain->next) {
1308                 TALLOC_FREE(domain->check_online_event);
1309         }
1310
1311         /* Ensure we're not handling a credential cache event inherited
1312          * from our parent. */
1313
1314         ccache_remove_all_after_fork();
1315
1316         /* Destroy all possible events in child list. */
1317         for (cl = winbindd_children; cl != NULL; cl = cl->next) {
1318                 TALLOC_FREE(cl->lockout_policy_event);
1319                 TALLOC_FREE(cl->machine_password_change_event);
1320
1321                 /* Children should never be able to send
1322                  * each other messages, all messages must
1323                  * go through the parent.
1324                  */
1325                 cl->pid = (pid_t)0;
1326
1327                 /*
1328                  * Close service sockets to all other children
1329                  */
1330                 if ((cl != myself) && (cl->sock != -1)) {
1331                         close(cl->sock);
1332                         cl->sock = -1;
1333                 }
1334         }
1335         /*
1336          * This is a little tricky, children must not
1337          * send an MSG_WINBIND_ONLINE message to idmap_child().
1338          * If we are in a child of our primary domain or
1339          * in the process created by fork_child_dc_connect(),
1340          * and the primary domain cannot go online,
1341          * fork_child_dc_connection() sends MSG_WINBIND_ONLINE
1342          * periodically to idmap_child().
1343          *
1344          * The sequence is, fork_child_dc_connect() ---> getdcs() --->
1345          * get_dc_name_via_netlogon() ---> cm_connect_netlogon()
1346          * ---> init_dc_connection() ---> cm_open_connection --->
1347          * set_domain_online(), sends MSG_WINBIND_ONLINE to
1348          * idmap_child(). Disallow children sending messages
1349          * to each other, all messages must go through the parent.
1350          */
1351         cl = idmap_child();
1352         cl->pid = (pid_t)0;
1353
1354         return NT_STATUS_OK;
1355 }
1356
1357 /*
1358  * In a child there will be only one domain, reference that here.
1359  */
1360 static struct winbindd_domain *child_domain;
1361
1362 struct winbindd_domain *wb_child_domain(void)
1363 {
1364         return child_domain;
1365 }
1366
1367 struct child_handler_state {
1368         struct winbindd_child *child;
1369         struct winbindd_cli_state cli;
1370 };
1371
1372 static void child_handler(struct tevent_context *ev, struct tevent_fd *fde,
1373                           uint16_t flags, void *private_data)
1374 {
1375         struct child_handler_state *state =
1376                 (struct child_handler_state *)private_data;
1377         NTSTATUS status;
1378
1379         /* fetch a request from the main daemon */
1380         status = child_read_request(state->cli.sock, state->cli.request);
1381
1382         if (!NT_STATUS_IS_OK(status)) {
1383                 /* we lost contact with our parent */
1384                 _exit(0);
1385         }
1386
1387         DEBUG(4,("child daemon request %d\n",
1388                  (int)state->cli.request->cmd));
1389
1390         ZERO_STRUCTP(state->cli.response);
1391         state->cli.request->null_term = '\0';
1392         state->cli.mem_ctx = talloc_tos();
1393         child_process_request(state->child, &state->cli);
1394
1395         DEBUG(4, ("Finished processing child request %d\n",
1396                   (int)state->cli.request->cmd));
1397
1398         SAFE_FREE(state->cli.request->extra_data.data);
1399
1400         status = child_write_response(state->cli.sock, state->cli.response);
1401         if (!NT_STATUS_IS_OK(status)) {
1402                 exit(1);
1403         }
1404 }
1405
1406 static bool fork_domain_child(struct winbindd_child *child)
1407 {
1408         int fdpair[2];
1409         struct child_handler_state state;
1410         struct winbindd_request request;
1411         struct winbindd_response response;
1412         struct winbindd_domain *primary_domain = NULL;
1413         NTSTATUS status;
1414         ssize_t nwritten;
1415         struct tevent_fd *fde;
1416
1417         if (child->domain) {
1418                 DEBUG(10, ("fork_domain_child called for domain '%s'\n",
1419                            child->domain->name));
1420         } else {
1421                 DEBUG(10, ("fork_domain_child called without domain.\n"));
1422         }
1423
1424         if (socketpair(AF_UNIX, SOCK_STREAM, 0, fdpair) != 0) {
1425                 DEBUG(0, ("Could not open child pipe: %s\n",
1426                           strerror(errno)));
1427                 return False;
1428         }
1429
1430         ZERO_STRUCT(state);
1431         state.child = child;
1432         state.cli.pid = getpid();
1433         state.cli.request = &request;
1434         state.cli.response = &response;
1435
1436         child->pid = fork();
1437
1438         if (child->pid == -1) {
1439                 DEBUG(0, ("Could not fork: %s\n", strerror(errno)));
1440                 close(fdpair[0]);
1441                 close(fdpair[1]);
1442                 return False;
1443         }
1444
1445         if (child->pid != 0) {
1446                 /* Parent */
1447                 ssize_t nread;
1448
1449                 close(fdpair[0]);
1450
1451                 nread = sys_read(fdpair[1], &status, sizeof(status));
1452                 if (nread != sizeof(status)) {
1453                         DEBUG(1, ("fork_domain_child: Could not read child status: "
1454                                   "nread=%d, error=%s\n", (int)nread,
1455                                   strerror(errno)));
1456                         close(fdpair[1]);
1457                         return false;
1458                 }
1459                 if (!NT_STATUS_IS_OK(status)) {
1460                         DEBUG(1, ("fork_domain_child: Child status is %s\n",
1461                                   nt_errstr(status)));
1462                         close(fdpair[1]);
1463                         return false;
1464                 }
1465
1466                 child->next = child->prev = NULL;
1467                 DLIST_ADD(winbindd_children, child);
1468                 child->sock = fdpair[1];
1469                 return True;
1470         }
1471
1472         /* Child */
1473         child_domain = child->domain;
1474
1475         DEBUG(10, ("Child process %d\n", (int)getpid()));
1476
1477         state.cli.sock = fdpair[0];
1478         close(fdpair[1]);
1479
1480         status = winbindd_reinit_after_fork(child, child->logfilename);
1481
1482         nwritten = sys_write(state.cli.sock, &status, sizeof(status));
1483         if (nwritten != sizeof(status)) {
1484                 DEBUG(1, ("fork_domain_child: Could not write status: "
1485                           "nwritten=%d, error=%s\n", (int)nwritten,
1486                           strerror(errno)));
1487                 _exit(0);
1488         }
1489         if (!NT_STATUS_IS_OK(status)) {
1490                 DEBUG(1, ("winbindd_reinit_after_fork failed: %s\n",
1491                           nt_errstr(status)));
1492                 _exit(0);
1493         }
1494
1495         if (child_domain != NULL) {
1496                 setproctitle("domain child [%s]", child_domain->name);
1497         } else if (child == idmap_child()) {
1498                 setproctitle("idmap child");
1499         }
1500
1501         /* Handle online/offline messages. */
1502         messaging_register(server_messaging_context(), NULL,
1503                            MSG_WINBIND_OFFLINE, child_msg_offline);
1504         messaging_register(server_messaging_context(), NULL,
1505                            MSG_WINBIND_ONLINE, child_msg_online);
1506         messaging_register(server_messaging_context(), NULL,
1507                            MSG_DUMP_EVENT_LIST, child_msg_dump_event_list);
1508         messaging_register(server_messaging_context(), NULL,
1509                            MSG_DEBUG, debug_message);
1510         messaging_register(server_messaging_context(), NULL,
1511                            MSG_WINBIND_IP_DROPPED,
1512                            winbind_msg_ip_dropped);
1513
1514
1515         primary_domain = find_our_domain();
1516
1517         if (primary_domain == NULL) {
1518                 smb_panic("no primary domain found");
1519         }
1520
1521         /* It doesn't matter if we allow cache login,
1522          * try to bring domain online after fork. */
1523         if ( child->domain ) {
1524                 child->domain->startup = True;
1525                 child->domain->startup_time = time_mono(NULL);
1526                 /* we can be in primary domain or in trusted domain
1527                  * If we are in trusted domain, set the primary domain
1528                  * in start-up mode */
1529                 if (!(child->domain->internal)) {
1530                         set_domain_online_request(child->domain);
1531                         if (!(child->domain->primary)) {
1532                                 primary_domain->startup = True;
1533                                 primary_domain->startup_time = time_mono(NULL);
1534                                 set_domain_online_request(primary_domain);
1535                         }
1536                 }
1537         }
1538
1539         /*
1540          * We are in idmap child, make sure that we set the
1541          * check_online_event to bring primary domain online.
1542          */
1543         if (child == idmap_child()) {
1544                 set_domain_online_request(primary_domain);
1545         }
1546
1547         /* We might be in the idmap child...*/
1548         if (child->domain && !(child->domain->internal) &&
1549             lp_winbind_offline_logon()) {
1550
1551                 set_domain_online_request(child->domain);
1552
1553                 if (primary_domain && (primary_domain != child->domain)) {
1554                         /* We need to talk to the primary
1555                          * domain as well as the trusted
1556                          * domain inside a trusted domain
1557                          * child.
1558                          * See the code in :
1559                          * set_dc_type_and_flags_trustinfo()
1560                          * for details.
1561                          */
1562                         set_domain_online_request(primary_domain);
1563                 }
1564
1565                 child->lockout_policy_event = tevent_add_timer(
1566                         server_event_context(), NULL, timeval_zero(),
1567                         account_lockout_policy_handler,
1568                         child);
1569         }
1570
1571         if (child->domain && child->domain->primary &&
1572             !USE_KERBEROS_KEYTAB &&
1573             lp_server_role() == ROLE_DOMAIN_MEMBER) {
1574
1575                 struct timeval next_change;
1576
1577                 if (calculate_next_machine_pwd_change(child->domain->name,
1578                                                        &next_change)) {
1579                         child->machine_password_change_event = tevent_add_timer(
1580                                 server_event_context(), NULL, next_change,
1581                                 machine_password_change_handler,
1582                                 child);
1583                 }
1584         }
1585
1586         fde = tevent_add_fd(server_event_context(), NULL, state.cli.sock,
1587                             TEVENT_FD_READ, child_handler, &state);
1588         if (fde == NULL) {
1589                 DEBUG(1, ("tevent_add_fd failed\n"));
1590                 _exit(1);
1591         }
1592
1593         while (1) {
1594
1595                 int ret;
1596                 TALLOC_CTX *frame = talloc_stackframe();
1597
1598                 ret = tevent_loop_once(server_event_context());
1599                 if (ret != 0) {
1600                         DEBUG(1, ("tevent_loop_once failed: %s\n",
1601                                   strerror(errno)));
1602                         _exit(1);
1603                 }
1604
1605                 if (child->domain && child->domain->startup &&
1606                                 (time_mono(NULL) > child->domain->startup_time + 30)) {
1607                         /* No longer in "startup" mode. */
1608                         DEBUG(10,("fork_domain_child: domain %s no longer in 'startup' mode.\n",
1609                                 child->domain->name ));
1610                         child->domain->startup = False;
1611                 }
1612
1613                 TALLOC_FREE(frame);
1614         }
1615 }
1616
1617 void winbind_msg_ip_dropped_parent(struct messaging_context *msg_ctx,
1618                                    void *private_data,
1619                                    uint32_t msg_type,
1620                                    struct server_id server_id,
1621                                    DATA_BLOB *data)
1622 {
1623         struct winbindd_child *child;
1624
1625         winbind_msg_ip_dropped(msg_ctx, private_data, msg_type,
1626                                server_id, data);
1627
1628
1629         for (child = winbindd_children; child != NULL; child = child->next) {
1630                 messaging_send_buf(msg_ctx, pid_to_procid(child->pid),
1631                                    msg_type, data->data, data->length);
1632         }
1633 }