s3:winbind: Add a lower-cost alternative to wbinfo -t: wbinfo --ping-dc
[nivanova/samba-autobuild/.git] / source3 / winbindd / winbindd.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Winbind daemon for ntdom nss module
5
6    Copyright (C) by Tim Potter 2000-2002
7    Copyright (C) Andrew Tridgell 2002
8    Copyright (C) Jelmer Vernooij 2003
9    Copyright (C) Volker Lendecke 2004
10
11    This program is free software; you can redistribute it and/or modify
12    it under the terms of the GNU General Public License as published by
13    the Free Software Foundation; either version 3 of the License, or
14    (at your option) any later version.
15
16    This program is distributed in the hope that it will be useful,
17    but WITHOUT ANY WARRANTY; without even the implied warranty of
18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19    GNU General Public License for more details.
20
21    You should have received a copy of the GNU General Public License
22    along with this program.  If not, see <http://www.gnu.org/licenses/>.
23 */
24
25 #include "includes.h"
26 #include "winbindd.h"
27 #include "../../nsswitch/libwbclient/wbc_async.h"
28
29 #undef DBGC_CLASS
30 #define DBGC_CLASS DBGC_WINBIND
31
32 static void remove_client(struct winbindd_cli_state *state);
33
34 static bool opt_nocache = False;
35 static bool interactive = False;
36
37 extern bool override_logfile;
38
39 struct event_context *winbind_event_context(void)
40 {
41         static struct event_context *ctx;
42
43         if (!ctx && !(ctx = event_context_init(NULL))) {
44                 smb_panic("Could not init winbind event context");
45         }
46         return ctx;
47 }
48
49 struct messaging_context *winbind_messaging_context(void)
50 {
51         static struct messaging_context *ctx;
52
53         if (ctx == NULL) {
54                 ctx = messaging_init(NULL, server_id_self(),
55                                      winbind_event_context());
56         }
57         if (ctx == NULL) {
58                 DEBUG(0, ("Could not init winbind messaging context.\n"));
59         }
60         return ctx;
61 }
62
63 /* Reload configuration */
64
65 static bool reload_services_file(const char *lfile)
66 {
67         bool ret;
68
69         if (lp_loaded()) {
70                 const char *fname = lp_configfile();
71
72                 if (file_exist(fname) && !strcsequal(fname,get_dyn_CONFIGFILE())) {
73                         set_dyn_CONFIGFILE(fname);
74                 }
75         }
76
77         /* if this is a child, restore the logfile to the special
78            name - <domain>, idmap, etc. */
79         if (lfile && *lfile) {
80                 lp_set_logfile(lfile);
81         }
82
83         reopen_logs();
84         ret = lp_load(get_dyn_CONFIGFILE(),False,False,True,True);
85
86         reopen_logs();
87         load_interfaces();
88
89         return(ret);
90 }
91
92
93 /**************************************************************************** **
94  Handle a fault..
95  **************************************************************************** */
96
97 static void fault_quit(void)
98 {
99         dump_core();
100 }
101
102 static void winbindd_status(void)
103 {
104         struct winbindd_cli_state *tmp;
105
106         DEBUG(0, ("winbindd status:\n"));
107
108         /* Print client state information */
109
110         DEBUG(0, ("\t%d clients currently active\n", winbindd_num_clients()));
111
112         if (DEBUGLEVEL >= 2 && winbindd_num_clients()) {
113                 DEBUG(2, ("\tclient list:\n"));
114                 for(tmp = winbindd_client_list(); tmp; tmp = tmp->next) {
115                         DEBUGADD(2, ("\t\tpid %lu, sock %d\n",
116                                   (unsigned long)tmp->pid, tmp->sock));
117                 }
118         }
119 }
120
121 /* Print winbindd status to log file */
122
123 static void print_winbindd_status(void)
124 {
125         winbindd_status();
126 }
127
128 /* Flush client cache */
129
130 static void flush_caches(void)
131 {
132         /* We need to invalidate cached user list entries on a SIGHUP 
133            otherwise cached access denied errors due to restrict anonymous
134            hang around until the sequence number changes. */
135
136         if (!wcache_invalidate_cache()) {
137                 DEBUG(0, ("invalidating the cache failed; revalidate the cache\n"));
138                 if (!winbindd_cache_validate_and_initialize()) {
139                         exit(1);
140                 }
141         }
142 }
143
144 /* Handle the signal by unlinking socket and exiting */
145
146 static void terminate(bool is_parent)
147 {
148         if (is_parent) {
149                 /* When parent goes away we should
150                  * remove the socket file. Not so
151                  * when children terminate.
152                  */ 
153                 char *path = NULL;
154
155                 if (asprintf(&path, "%s/%s",
156                         get_winbind_pipe_dir(), WINBINDD_SOCKET_NAME) > 0) {
157                         unlink(path);
158                         SAFE_FREE(path);
159                 }
160         }
161
162         idmap_close();
163
164         trustdom_cache_shutdown();
165
166         gencache_stabilize();
167
168 #if 0
169         if (interactive) {
170                 TALLOC_CTX *mem_ctx = talloc_init("end_description");
171                 char *description = talloc_describe_all(mem_ctx);
172
173                 DEBUG(3, ("tallocs left:\n%s\n", description));
174                 talloc_destroy(mem_ctx);
175         }
176 #endif
177
178         if (is_parent) {
179                 pidfile_unlink();
180         }
181
182         exit(0);
183 }
184
185 static void winbindd_sig_term_handler(struct tevent_context *ev,
186                                       struct tevent_signal *se,
187                                       int signum,
188                                       int count,
189                                       void *siginfo,
190                                       void *private_data)
191 {
192         bool *is_parent = talloc_get_type_abort(private_data, bool);
193
194         DEBUG(0,("Got sig[%d] terminate (is_parent=%d)\n",
195                  signum, (int)*is_parent));
196         terminate(*is_parent);
197 }
198
199 bool winbindd_setup_sig_term_handler(bool parent)
200 {
201         struct tevent_signal *se;
202         bool *is_parent;
203
204         is_parent = talloc(winbind_event_context(), bool);
205         if (!is_parent) {
206                 return false;
207         }
208
209         *is_parent = parent;
210
211         se = tevent_add_signal(winbind_event_context(),
212                                is_parent,
213                                SIGTERM, 0,
214                                winbindd_sig_term_handler,
215                                is_parent);
216         if (!se) {
217                 DEBUG(0,("failed to setup SIGTERM handler"));
218                 talloc_free(is_parent);
219                 return false;
220         }
221
222         se = tevent_add_signal(winbind_event_context(),
223                                is_parent,
224                                SIGINT, 0,
225                                winbindd_sig_term_handler,
226                                is_parent);
227         if (!se) {
228                 DEBUG(0,("failed to setup SIGINT handler"));
229                 talloc_free(is_parent);
230                 return false;
231         }
232
233         se = tevent_add_signal(winbind_event_context(),
234                                is_parent,
235                                SIGQUIT, 0,
236                                winbindd_sig_term_handler,
237                                is_parent);
238         if (!se) {
239                 DEBUG(0,("failed to setup SIGINT handler"));
240                 talloc_free(is_parent);
241                 return false;
242         }
243
244         return true;
245 }
246
247 static void winbindd_sig_hup_handler(struct tevent_context *ev,
248                                      struct tevent_signal *se,
249                                      int signum,
250                                      int count,
251                                      void *siginfo,
252                                      void *private_data)
253 {
254         const char *file = (const char *)private_data;
255
256         DEBUG(1,("Reloading services after SIGHUP\n"));
257         flush_caches();
258         reload_services_file(file);
259 }
260
261 bool winbindd_setup_sig_hup_handler(const char *lfile)
262 {
263         struct tevent_signal *se;
264         char *file = NULL;
265
266         if (lfile) {
267                 file = talloc_strdup(winbind_event_context(),
268                                      lfile);
269                 if (!file) {
270                         return false;
271                 }
272         }
273
274         se = tevent_add_signal(winbind_event_context(),
275                                winbind_event_context(),
276                                SIGHUP, 0,
277                                winbindd_sig_hup_handler,
278                                file);
279         if (!se) {
280                 return false;
281         }
282
283         return true;
284 }
285
286 static void winbindd_sig_chld_handler(struct tevent_context *ev,
287                                       struct tevent_signal *se,
288                                       int signum,
289                                       int count,
290                                       void *siginfo,
291                                       void *private_data)
292 {
293         pid_t pid;
294
295         while ((pid = sys_waitpid(-1, NULL, WNOHANG)) > 0) {
296                 winbind_child_died(pid);
297         }
298 }
299
300 static bool winbindd_setup_sig_chld_handler(void)
301 {
302         struct tevent_signal *se;
303
304         se = tevent_add_signal(winbind_event_context(),
305                                winbind_event_context(),
306                                SIGCHLD, 0,
307                                winbindd_sig_chld_handler,
308                                NULL);
309         if (!se) {
310                 return false;
311         }
312
313         return true;
314 }
315
316 static void winbindd_sig_usr2_handler(struct tevent_context *ev,
317                                       struct tevent_signal *se,
318                                       int signum,
319                                       int count,
320                                       void *siginfo,
321                                       void *private_data)
322 {
323         print_winbindd_status();
324 }
325
326 static bool winbindd_setup_sig_usr2_handler(void)
327 {
328         struct tevent_signal *se;
329
330         se = tevent_add_signal(winbind_event_context(),
331                                winbind_event_context(),
332                                SIGUSR2, 0,
333                                winbindd_sig_usr2_handler,
334                                NULL);
335         if (!se) {
336                 return false;
337         }
338
339         return true;
340 }
341
342 /* React on 'smbcontrol winbindd reload-config' in the same way as on SIGHUP*/
343 static void msg_reload_services(struct messaging_context *msg,
344                                 void *private_data,
345                                 uint32_t msg_type,
346                                 struct server_id server_id,
347                                 DATA_BLOB *data)
348 {
349         /* Flush various caches */
350         flush_caches();
351         reload_services_file((const char *) private_data);
352 }
353
354 /* React on 'smbcontrol winbindd shutdown' in the same way as on SIGTERM*/
355 static void msg_shutdown(struct messaging_context *msg,
356                          void *private_data,
357                          uint32_t msg_type,
358                          struct server_id server_id,
359                          DATA_BLOB *data)
360 {
361         /* only the parent waits for this message */
362         DEBUG(0,("Got shutdown message\n"));
363         terminate(true);
364 }
365
366
367 static void winbind_msg_validate_cache(struct messaging_context *msg_ctx,
368                                        void *private_data,
369                                        uint32_t msg_type,
370                                        struct server_id server_id,
371                                        DATA_BLOB *data)
372 {
373         uint8 ret;
374         pid_t child_pid;
375         struct sigaction act;
376         struct sigaction oldact;
377
378         DEBUG(10, ("winbindd_msg_validate_cache: got validate-cache "
379                    "message.\n"));
380
381         /*
382          * call the validation code from a child:
383          * so we don't block the main winbindd and the validation
384          * code can safely use fork/waitpid...
385          */
386         CatchChild();
387         child_pid = sys_fork();
388
389         if (child_pid == -1) {
390                 DEBUG(1, ("winbind_msg_validate_cache: Could not fork: %s\n",
391                           strerror(errno)));
392                 return;
393         }
394
395         if (child_pid != 0) {
396                 /* parent */
397                 DEBUG(5, ("winbind_msg_validate_cache: child created with "
398                           "pid %d.\n", (int)child_pid));
399                 return;
400         }
401
402         /* child */
403
404         /* install default SIGCHLD handler: validation code uses fork/waitpid */
405         ZERO_STRUCT(act);
406         act.sa_handler = SIG_DFL;
407 #ifdef SA_RESTART
408         /* We *want* SIGALRM to interrupt a system call. */
409         act.sa_flags = SA_RESTART;
410 #endif
411         sigemptyset(&act.sa_mask);
412         sigaddset(&act.sa_mask,SIGCHLD);
413         sigaction(SIGCHLD,&act,&oldact);
414
415         ret = (uint8)winbindd_validate_cache_nobackup();
416         DEBUG(10, ("winbindd_msg_validata_cache: got return value %d\n", ret));
417         messaging_send_buf(msg_ctx, server_id, MSG_WINBIND_VALIDATE_CACHE, &ret,
418                            (size_t)1);
419         _exit(0);
420 }
421
422 static struct winbindd_dispatch_table {
423         enum winbindd_cmd cmd;
424         void (*fn)(struct winbindd_cli_state *state);
425         const char *winbindd_cmd_name;
426 } dispatch_table[] = {
427
428         /* PAM auth functions */
429
430         { WINBINDD_PAM_AUTH, winbindd_pam_auth, "PAM_AUTH" },
431         { WINBINDD_PAM_AUTH_CRAP, winbindd_pam_auth_crap, "AUTH_CRAP" },
432         { WINBINDD_PAM_CHAUTHTOK, winbindd_pam_chauthtok, "CHAUTHTOK" },
433         { WINBINDD_PAM_LOGOFF, winbindd_pam_logoff, "PAM_LOGOFF" },
434         { WINBINDD_PAM_CHNG_PSWD_AUTH_CRAP, winbindd_pam_chng_pswd_auth_crap, "CHNG_PSWD_AUTH_CRAP" },
435
436         /* Enumeration functions */
437
438         { WINBINDD_LIST_TRUSTDOM, winbindd_list_trusted_domains,
439           "LIST_TRUSTDOM" },
440
441         /* Miscellaneous */
442
443         { WINBINDD_INFO, winbindd_info, "INFO" },
444         { WINBINDD_INTERFACE_VERSION, winbindd_interface_version,
445           "INTERFACE_VERSION" },
446         { WINBINDD_DOMAIN_NAME, winbindd_domain_name, "DOMAIN_NAME" },
447         { WINBINDD_DOMAIN_INFO, winbindd_domain_info, "DOMAIN_INFO" },
448         { WINBINDD_NETBIOS_NAME, winbindd_netbios_name, "NETBIOS_NAME" },
449         { WINBINDD_PRIV_PIPE_DIR, winbindd_priv_pipe_dir,
450           "WINBINDD_PRIV_PIPE_DIR" },
451
452         /* Credential cache access */
453         { WINBINDD_CCACHE_NTLMAUTH, winbindd_ccache_ntlm_auth, "NTLMAUTH" },
454
455         /* WINS functions */
456
457         { WINBINDD_WINS_BYNAME, winbindd_wins_byname, "WINS_BYNAME" },
458         { WINBINDD_WINS_BYIP, winbindd_wins_byip, "WINS_BYIP" },
459
460         /* End of list */
461
462         { WINBINDD_NUM_CMDS, NULL, "NONE" }
463 };
464
465 struct winbindd_async_dispatch_table {
466         enum winbindd_cmd cmd;
467         const char *cmd_name;
468         struct tevent_req *(*send_req)(TALLOC_CTX *mem_ctx,
469                                        struct tevent_context *ev,
470                                        struct winbindd_cli_state *cli,
471                                        struct winbindd_request *request);
472         NTSTATUS (*recv_req)(struct tevent_req *req,
473                              struct winbindd_response *presp);
474 };
475
476 static struct winbindd_async_dispatch_table async_nonpriv_table[] = {
477         { WINBINDD_PING, "PING",
478           wb_ping_send, wb_ping_recv },
479         { WINBINDD_LOOKUPSID, "LOOKUPSID",
480           winbindd_lookupsid_send, winbindd_lookupsid_recv },
481         { WINBINDD_LOOKUPNAME, "LOOKUPNAME",
482           winbindd_lookupname_send, winbindd_lookupname_recv },
483         { WINBINDD_SID_TO_UID, "SID_TO_UID",
484           winbindd_sid_to_uid_send, winbindd_sid_to_uid_recv },
485         { WINBINDD_SID_TO_GID, "SID_TO_GID",
486           winbindd_sid_to_gid_send, winbindd_sid_to_gid_recv },
487         { WINBINDD_UID_TO_SID, "UID_TO_SID",
488           winbindd_uid_to_sid_send, winbindd_uid_to_sid_recv },
489         { WINBINDD_GID_TO_SID, "GID_TO_SID",
490           winbindd_gid_to_sid_send, winbindd_gid_to_sid_recv },
491         { WINBINDD_GETPWSID, "GETPWSID",
492           winbindd_getpwsid_send, winbindd_getpwsid_recv },
493         { WINBINDD_GETPWNAM, "GETPWNAM",
494           winbindd_getpwnam_send, winbindd_getpwnam_recv },
495         { WINBINDD_GETPWUID, "GETPWUID",
496           winbindd_getpwuid_send, winbindd_getpwuid_recv },
497         { WINBINDD_GETSIDALIASES, "GETSIDALIASES",
498           winbindd_getsidaliases_send, winbindd_getsidaliases_recv },
499         { WINBINDD_GETUSERDOMGROUPS, "GETUSERDOMGROUPS",
500           winbindd_getuserdomgroups_send, winbindd_getuserdomgroups_recv },
501         { WINBINDD_GETGROUPS, "GETGROUPS",
502           winbindd_getgroups_send, winbindd_getgroups_recv },
503         { WINBINDD_SHOW_SEQUENCE, "SHOW_SEQUENCE",
504           winbindd_show_sequence_send, winbindd_show_sequence_recv },
505         { WINBINDD_GETGRGID, "GETGRGID",
506           winbindd_getgrgid_send, winbindd_getgrgid_recv },
507         { WINBINDD_GETGRNAM, "GETGRNAM",
508           winbindd_getgrnam_send, winbindd_getgrnam_recv },
509         { WINBINDD_GETUSERSIDS, "GETUSERSIDS",
510           winbindd_getusersids_send, winbindd_getusersids_recv },
511         { WINBINDD_LOOKUPRIDS, "LOOKUPRIDS",
512           winbindd_lookuprids_send, winbindd_lookuprids_recv },
513         { WINBINDD_SETPWENT, "SETPWENT",
514           winbindd_setpwent_send, winbindd_setpwent_recv },
515         { WINBINDD_GETPWENT, "GETPWENT",
516           winbindd_getpwent_send, winbindd_getpwent_recv },
517         { WINBINDD_ENDPWENT, "ENDPWENT",
518           winbindd_endpwent_send, winbindd_endpwent_recv },
519         { WINBINDD_DSGETDCNAME, "DSGETDCNAME",
520           winbindd_dsgetdcname_send, winbindd_dsgetdcname_recv },
521         { WINBINDD_GETDCNAME, "GETDCNAME",
522           winbindd_getdcname_send, winbindd_getdcname_recv },
523         { WINBINDD_SETGRENT, "SETGRENT",
524           winbindd_setgrent_send, winbindd_setgrent_recv },
525         { WINBINDD_GETGRENT, "GETGRENT",
526           winbindd_getgrent_send, winbindd_getgrent_recv },
527         { WINBINDD_ENDGRENT, "ENDGRENT",
528           winbindd_endgrent_send, winbindd_endgrent_recv },
529         { WINBINDD_LIST_USERS, "LIST_USERS",
530           winbindd_list_users_send, winbindd_list_users_recv },
531         { WINBINDD_LIST_GROUPS, "LIST_GROUPS",
532           winbindd_list_groups_send, winbindd_list_groups_recv },
533         { WINBINDD_CHECK_MACHACC, "CHECK_MACHACC",
534           winbindd_check_machine_acct_send, winbindd_check_machine_acct_recv },
535         { WINBINDD_PING_DC, "PING_DC",
536           winbindd_ping_dc_send, winbindd_ping_dc_recv },
537
538         { 0, NULL, NULL, NULL }
539 };
540
541 static struct winbindd_async_dispatch_table async_priv_table[] = {
542         { WINBINDD_ALLOCATE_UID, "ALLOCATE_UID",
543           winbindd_allocate_uid_send, winbindd_allocate_uid_recv },
544         { WINBINDD_ALLOCATE_GID, "ALLOCATE_GID",
545           winbindd_allocate_gid_send, winbindd_allocate_gid_recv },
546         { WINBINDD_SET_MAPPING, "SET_MAPPING",
547           winbindd_set_mapping_send, winbindd_set_mapping_recv },
548         { WINBINDD_REMOVE_MAPPING, "SET_MAPPING",
549           winbindd_remove_mapping_send, winbindd_remove_mapping_recv },
550         { WINBINDD_SET_HWM, "SET_HWM",
551           winbindd_set_hwm_send, winbindd_set_hwm_recv },
552         { WINBINDD_CHANGE_MACHACC, "CHANGE_MACHACC",
553           winbindd_change_machine_acct_send, winbindd_change_machine_acct_recv },
554
555         { 0, NULL, NULL, NULL }
556 };
557
558 static void wb_request_done(struct tevent_req *req);
559
560 static void process_request(struct winbindd_cli_state *state)
561 {
562         struct winbindd_dispatch_table *table = dispatch_table;
563         struct winbindd_async_dispatch_table *atable;
564
565         state->mem_ctx = talloc_init("winbind request");
566         if (state->mem_ctx == NULL)
567                 return;
568
569         /* Remember who asked us. */
570         state->pid = state->request->pid;
571
572         /* Process command */
573
574         for (atable = async_nonpriv_table; atable->send_req; atable += 1) {
575                 if (state->request->cmd == atable->cmd) {
576                         break;
577                 }
578         }
579
580         if ((atable->send_req == NULL) && state->privileged) {
581                 for (atable = async_priv_table; atable->send_req;
582                      atable += 1) {
583                         if (state->request->cmd == atable->cmd) {
584                                 break;
585                         }
586                 }
587         }
588
589         if (atable->send_req != NULL) {
590                 struct tevent_req *req;
591
592                 DEBUG(10, ("process_request: Handling async request %s\n",
593                            atable->cmd_name));
594
595                 req = atable->send_req(state->mem_ctx, winbind_event_context(),
596                                        state, state->request);
597                 if (req == NULL) {
598                         DEBUG(0, ("process_request: atable->send failed for "
599                                   "%s\n", atable->cmd_name));
600                         request_error(state);
601                         return;
602                 }
603                 tevent_req_set_callback(req, wb_request_done, state);
604                 state->recv_fn = atable->recv_req;
605                 return;
606         }
607
608         state->response = talloc_zero(state->mem_ctx,
609                                       struct winbindd_response);
610         if (state->response == NULL) {
611                 DEBUG(10, ("talloc failed\n"));
612                 remove_client(state);
613                 return;
614         }
615         state->response->result = WINBINDD_PENDING;
616         state->response->length = sizeof(struct winbindd_response);
617
618         for (table = dispatch_table; table->fn; table++) {
619                 if (state->request->cmd == table->cmd) {
620                         DEBUG(10,("process_request: request fn %s\n",
621                                   table->winbindd_cmd_name ));
622                         table->fn(state);
623                         break;
624                 }
625         }
626
627         if (!table->fn) {
628                 DEBUG(10,("process_request: unknown request fn number %d\n",
629                           (int)state->request->cmd ));
630                 request_error(state);
631         }
632 }
633
634 static void wb_request_done(struct tevent_req *req)
635 {
636         struct winbindd_cli_state *state = tevent_req_callback_data(
637                 req, struct winbindd_cli_state);
638         NTSTATUS status;
639
640         state->response = talloc_zero(state, struct winbindd_response);
641         if (state->response == NULL) {
642                 remove_client(state);
643                 return;
644         }
645         state->response->result = WINBINDD_PENDING;
646         state->response->length = sizeof(struct winbindd_response);
647
648         status = state->recv_fn(req, state->response);
649         TALLOC_FREE(req);
650         if (!NT_STATUS_IS_OK(status)) {
651                 DEBUG(10, ("returning %s\n", nt_errstr(status)));
652                 request_error(state);
653                 return;
654         }
655         request_ok(state);
656 }
657
658 /*
659  * This is the main event loop of winbind requests. It goes through a
660  * state-machine of 3 read/write requests, 4 if you have extra data to send.
661  *
662  * An idle winbind client has a read request of 4 bytes outstanding,
663  * finalizing function is request_len_recv, checking the length. request_recv
664  * then processes the packet. The processing function then at some point has
665  * to call request_finished which schedules sending the response.
666  */
667
668 static void request_finished(struct winbindd_cli_state *state);
669
670 static void winbind_client_request_read(struct tevent_req *req);
671 static void winbind_client_response_written(struct tevent_req *req);
672
673 static void request_finished(struct winbindd_cli_state *state)
674 {
675         struct tevent_req *req;
676
677         TALLOC_FREE(state->request);
678
679         req = wb_resp_write_send(state, winbind_event_context(),
680                                  state->out_queue, state->sock,
681                                  state->response);
682         if (req == NULL) {
683                 remove_client(state);
684                 return;
685         }
686         tevent_req_set_callback(req, winbind_client_response_written, state);
687 }
688
689 static void winbind_client_response_written(struct tevent_req *req)
690 {
691         struct winbindd_cli_state *state = tevent_req_callback_data(
692                 req, struct winbindd_cli_state);
693         ssize_t ret;
694         int err;
695
696         ret = wb_resp_write_recv(req, &err);
697         TALLOC_FREE(req);
698         if (ret == -1) {
699                 close(state->sock);
700                 state->sock = -1;
701                 DEBUG(2, ("Could not write response to client: %s\n",
702                           strerror(err)));
703                 remove_client(state);
704                 return;
705         }
706
707         TALLOC_FREE(state->mem_ctx);
708         state->response = NULL;
709
710         req = wb_req_read_send(state, winbind_event_context(), state->sock,
711                                WINBINDD_MAX_EXTRA_DATA);
712         if (req == NULL) {
713                 remove_client(state);
714                 return;
715         }
716         tevent_req_set_callback(req, winbind_client_request_read, state);
717 }
718
719 void request_error(struct winbindd_cli_state *state)
720 {
721         SMB_ASSERT(state->response->result == WINBINDD_PENDING);
722         state->response->result = WINBINDD_ERROR;
723         request_finished(state);
724 }
725
726 void request_ok(struct winbindd_cli_state *state)
727 {
728         SMB_ASSERT(state->response->result == WINBINDD_PENDING);
729         state->response->result = WINBINDD_OK;
730         request_finished(state);
731 }
732
733 /* Process a new connection by adding it to the client connection list */
734
735 static void new_connection(int listen_sock, bool privileged)
736 {
737         struct sockaddr_un sunaddr;
738         struct winbindd_cli_state *state;
739         struct tevent_req *req;
740         socklen_t len;
741         int sock;
742
743         /* Accept connection */
744
745         len = sizeof(sunaddr);
746
747         do {
748                 sock = accept(listen_sock, (struct sockaddr *)(void *)&sunaddr,
749                               &len);
750         } while (sock == -1 && errno == EINTR);
751
752         if (sock == -1)
753                 return;
754
755         DEBUG(6,("accepted socket %d\n", sock));
756
757         /* Create new connection structure */
758
759         if ((state = TALLOC_ZERO_P(NULL, struct winbindd_cli_state)) == NULL) {
760                 close(sock);
761                 return;
762         }
763
764         state->sock = sock;
765
766         state->out_queue = tevent_queue_create(state, "winbind client reply");
767         if (state->out_queue == NULL) {
768                 close(sock);
769                 TALLOC_FREE(state);
770                 return;
771         }
772
773         state->last_access = time(NULL);        
774
775         state->privileged = privileged;
776
777         req = wb_req_read_send(state, winbind_event_context(), state->sock,
778                                WINBINDD_MAX_EXTRA_DATA);
779         if (req == NULL) {
780                 TALLOC_FREE(state);
781                 close(sock);
782                 return;
783         }
784         tevent_req_set_callback(req, winbind_client_request_read, state);
785
786         /* Add to connection list */
787
788         winbindd_add_client(state);
789 }
790
791 static void winbind_client_request_read(struct tevent_req *req)
792 {
793         struct winbindd_cli_state *state = tevent_req_callback_data(
794                 req, struct winbindd_cli_state);
795         ssize_t ret;
796         int err;
797
798         ret = wb_req_read_recv(req, state, &state->request, &err);
799         TALLOC_FREE(req);
800         if (ret == -1) {
801                 close(state->sock);
802                 state->sock = -1;
803                 DEBUG(2, ("Could not read client request: %s\n",
804                           strerror(err)));
805                 remove_client(state);
806                 return;
807         }
808         process_request(state);
809 }
810
811 /* Remove a client connection from client connection list */
812
813 static void remove_client(struct winbindd_cli_state *state)
814 {
815         char c = 0;
816         int nwritten;
817
818         /* It's a dead client - hold a funeral */
819
820         if (state == NULL) {
821                 return;
822         }
823
824         if (state->sock != -1) {
825                 /* tell client, we are closing ... */
826                 nwritten = write(state->sock, &c, sizeof(c));
827                 if (nwritten == -1) {
828                         DEBUG(2, ("final write to client failed: %s\n",
829                                 strerror(errno)));
830                 }
831
832                 /* Close socket */
833
834                 close(state->sock);
835                 state->sock = -1;
836         }
837
838         /* Free any getent state */
839
840         free_getent_state(state->getgrent_state);
841
842         TALLOC_FREE(state->mem_ctx);
843
844         /* Remove from list and free */
845
846         winbindd_remove_client(state);
847         TALLOC_FREE(state);
848 }
849
850 /* Shutdown client connection which has been idle for the longest time */
851
852 static bool remove_idle_client(void)
853 {
854         struct winbindd_cli_state *state, *remove_state = NULL;
855         time_t last_access = 0;
856         int nidle = 0;
857
858         for (state = winbindd_client_list(); state; state = state->next) {
859                 if (state->response == NULL &&
860                     !state->pwent_state && !state->getgrent_state) {
861                         nidle++;
862                         if (!last_access || state->last_access < last_access) {
863                                 last_access = state->last_access;
864                                 remove_state = state;
865                         }
866                 }
867         }
868
869         if (remove_state) {
870                 DEBUG(5,("Found %d idle client connections, shutting down sock %d, pid %u\n",
871                         nidle, remove_state->sock, (unsigned int)remove_state->pid));
872                 remove_client(remove_state);
873                 return True;
874         }
875
876         return False;
877 }
878
879 struct winbindd_listen_state {
880         bool privileged;
881         int fd;
882 };
883
884 static void winbindd_listen_fde_handler(struct tevent_context *ev,
885                                         struct tevent_fd *fde,
886                                         uint16_t flags,
887                                         void *private_data)
888 {
889         struct winbindd_listen_state *s = talloc_get_type_abort(private_data,
890                                           struct winbindd_listen_state);
891
892         while (winbindd_num_clients() >
893                WINBINDD_MAX_SIMULTANEOUS_CLIENTS - 1) {
894                 DEBUG(5,("winbindd: Exceeding %d client "
895                          "connections, removing idle "
896                          "connection.\n",
897                          WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
898                 if (!remove_idle_client()) {
899                         DEBUG(0,("winbindd: Exceeding %d "
900                                  "client connections, no idle "
901                                  "connection found\n",
902                                  WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
903                         break;
904                 }
905         }
906         new_connection(s->fd, s->privileged);
907 }
908
909 static bool winbindd_setup_listeners(void)
910 {
911         struct winbindd_listen_state *pub_state = NULL;
912         struct winbindd_listen_state *priv_state = NULL;
913         struct tevent_fd *fde;
914
915         pub_state = talloc(winbind_event_context(),
916                            struct winbindd_listen_state);
917         if (!pub_state) {
918                 goto failed;
919         }
920
921         pub_state->privileged = false;
922         pub_state->fd = open_winbindd_socket();
923         if (pub_state->fd == -1) {
924                 goto failed;
925         }
926
927         fde = tevent_add_fd(winbind_event_context(), pub_state, pub_state->fd,
928                             TEVENT_FD_READ, winbindd_listen_fde_handler,
929                             pub_state);
930         if (fde == NULL) {
931                 close(pub_state->fd);
932                 goto failed;
933         }
934         tevent_fd_set_auto_close(fde);
935
936         priv_state = talloc(winbind_event_context(),
937                             struct winbindd_listen_state);
938         if (!priv_state) {
939                 goto failed;
940         }
941
942         priv_state->privileged = true;
943         priv_state->fd = open_winbindd_priv_socket();
944         if (priv_state->fd == -1) {
945                 goto failed;
946         }
947
948         fde = tevent_add_fd(winbind_event_context(), priv_state,
949                             priv_state->fd, TEVENT_FD_READ,
950                             winbindd_listen_fde_handler, priv_state);
951         if (fde == NULL) {
952                 close(priv_state->fd);
953                 goto failed;
954         }
955         tevent_fd_set_auto_close(fde);
956
957         return true;
958 failed:
959         TALLOC_FREE(pub_state);
960         TALLOC_FREE(priv_state);
961         return false;
962 }
963
964 bool winbindd_use_idmap_cache(void)
965 {
966         return !opt_nocache;
967 }
968
969 bool winbindd_use_cache(void)
970 {
971         return !opt_nocache;
972 }
973
974 /* Main function */
975
976 int main(int argc, char **argv, char **envp)
977 {
978         static bool is_daemon = False;
979         static bool Fork = True;
980         static bool log_stdout = False;
981         static bool no_process_group = False;
982         enum {
983                 OPT_DAEMON = 1000,
984                 OPT_FORK,
985                 OPT_NO_PROCESS_GROUP,
986                 OPT_LOG_STDOUT
987         };
988         struct poptOption long_options[] = {
989                 POPT_AUTOHELP
990                 { "stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
991                 { "foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Daemon in foreground mode" },
992                 { "no-process-group", 0, POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
993                 { "daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
994                 { "interactive", 'i', POPT_ARG_NONE, NULL, 'i', "Interactive mode" },
995                 { "no-caching", 'n', POPT_ARG_NONE, NULL, 'n', "Disable caching" },
996                 POPT_COMMON_SAMBA
997                 POPT_TABLEEND
998         };
999         poptContext pc;
1000         int opt;
1001         TALLOC_CTX *frame = talloc_stackframe();
1002         struct tevent_timer *te;
1003
1004         /* glibc (?) likes to print "User defined signal 1" and exit if a
1005            SIGUSR[12] is received before a handler is installed */
1006
1007         CatchSignal(SIGUSR1, SIG_IGN);
1008         CatchSignal(SIGUSR2, SIG_IGN);
1009
1010         fault_setup((void (*)(void *))fault_quit );
1011         dump_core_setup("winbindd");
1012
1013         load_case_tables();
1014
1015         /* Initialise for running in non-root mode */
1016
1017         sec_init();
1018
1019         set_remote_machine_name("winbindd", False);
1020
1021         /* Set environment variable so we don't recursively call ourselves.
1022            This may also be useful interactively. */
1023
1024         if ( !winbind_off() ) {
1025                 DEBUG(0,("Failed to disable recusive winbindd calls.  Exiting.\n"));
1026                 exit(1);
1027         }
1028
1029         /* Initialise samba/rpc client stuff */
1030
1031         pc = poptGetContext("winbindd", argc, (const char **)argv, long_options, 0);
1032
1033         while ((opt = poptGetNextOpt(pc)) != -1) {
1034                 switch (opt) {
1035                         /* Don't become a daemon */
1036                 case OPT_DAEMON:
1037                         is_daemon = True;
1038                         break;
1039                 case 'i':
1040                         interactive = True;
1041                         log_stdout = True;
1042                         Fork = False;
1043                         break;
1044                 case OPT_FORK:
1045                         Fork = false;
1046                         break;
1047                 case OPT_NO_PROCESS_GROUP:
1048                         no_process_group = true;
1049                         break;
1050                 case OPT_LOG_STDOUT:
1051                         log_stdout = true;
1052                         break;
1053                 case 'n':
1054                         opt_nocache = true;
1055                         break;
1056                 default:
1057                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1058                                   poptBadOption(pc, 0), poptStrerror(opt));
1059                         poptPrintUsage(pc, stderr, 0);
1060                         exit(1);
1061                 }
1062         }
1063
1064         if (is_daemon && interactive) {
1065                 d_fprintf(stderr,"\nERROR: "
1066                           "Option -i|--interactive is not allowed together with -D|--daemon\n\n");
1067                 poptPrintUsage(pc, stderr, 0);
1068                 exit(1);
1069         }
1070
1071         if (log_stdout && Fork) {
1072                 d_fprintf(stderr, "\nERROR: "
1073                           "Can't log to stdout (-S) unless daemon is in foreground +(-F) or interactive (-i)\n\n");
1074                 poptPrintUsage(pc, stderr, 0);
1075                 exit(1);
1076         }
1077
1078         poptFreeContext(pc);
1079
1080         if (!override_logfile) {
1081                 char *lfile = NULL;
1082                 if (asprintf(&lfile,"%s/log.winbindd",
1083                                 get_dyn_LOGFILEBASE()) > 0) {
1084                         lp_set_logfile(lfile);
1085                         SAFE_FREE(lfile);
1086                 }
1087         }
1088         setup_logging("winbindd", log_stdout);
1089         reopen_logs();
1090
1091         DEBUG(0,("winbindd version %s started.\n", samba_version_string()));
1092         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1093
1094         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1095                 DEBUG(0, ("error opening config file\n"));
1096                 exit(1);
1097         }
1098
1099         /* Initialise messaging system */
1100
1101         if (winbind_messaging_context() == NULL) {
1102                 exit(1);
1103         }
1104
1105         if (!reload_services_file(NULL)) {
1106                 DEBUG(0, ("error opening config file\n"));
1107                 exit(1);
1108         }
1109
1110         if (!directory_exist(lp_lockdir())) {
1111                 mkdir(lp_lockdir(), 0755);
1112         }
1113
1114         /* Setup names. */
1115
1116         if (!init_names())
1117                 exit(1);
1118
1119         load_interfaces();
1120
1121         if (!secrets_init()) {
1122
1123                 DEBUG(0,("Could not initialize domain trust account secrets. Giving up\n"));
1124                 return False;
1125         }
1126
1127         /* Enable netbios namecache */
1128
1129         namecache_enable();
1130
1131         /* Unblock all signals we are interested in as they may have been
1132            blocked by the parent process. */
1133
1134         BlockSignals(False, SIGINT);
1135         BlockSignals(False, SIGQUIT);
1136         BlockSignals(False, SIGTERM);
1137         BlockSignals(False, SIGUSR1);
1138         BlockSignals(False, SIGUSR2);
1139         BlockSignals(False, SIGHUP);
1140         BlockSignals(False, SIGCHLD);
1141
1142         if (!interactive)
1143                 become_daemon(Fork, no_process_group);
1144
1145         pidfile_create("winbindd");
1146
1147 #if HAVE_SETPGID
1148         /*
1149          * If we're interactive we want to set our own process group for
1150          * signal management.
1151          */
1152         if (interactive && !no_process_group)
1153                 setpgid( (pid_t)0, (pid_t)0);
1154 #endif
1155
1156         TimeInit();
1157
1158         /* Don't use winbindd_reinit_after_fork here as
1159          * we're just starting up and haven't created any
1160          * winbindd-specific resources we must free yet. JRA.
1161          */
1162
1163         if (!NT_STATUS_IS_OK(reinit_after_fork(winbind_messaging_context(),
1164                                                winbind_event_context(),
1165                                                false))) {
1166                 DEBUG(0,("reinit_after_fork() failed\n"));
1167                 exit(1);
1168         }
1169
1170         /* Setup signal handlers */
1171
1172         if (!winbindd_setup_sig_term_handler(true))
1173                 exit(1);
1174         if (!winbindd_setup_sig_hup_handler(NULL))
1175                 exit(1);
1176         if (!winbindd_setup_sig_chld_handler())
1177                 exit(1);
1178         if (!winbindd_setup_sig_usr2_handler())
1179                 exit(1);
1180
1181         CatchSignal(SIGPIPE, SIG_IGN);                 /* Ignore sigpipe */
1182
1183         /*
1184          * Ensure all cache and idmap caches are consistent
1185          * and initialized before we startup.
1186          */
1187         if (!winbindd_cache_validate_and_initialize()) {
1188                 exit(1);
1189         }
1190
1191         /* get broadcast messages */
1192         claim_connection(NULL,"",FLAG_MSG_GENERAL|FLAG_MSG_DBWRAP);
1193
1194         /* React on 'smbcontrol winbindd reload-config' in the same way
1195            as to SIGHUP signal */
1196         messaging_register(winbind_messaging_context(), NULL,
1197                            MSG_SMB_CONF_UPDATED, msg_reload_services);
1198         messaging_register(winbind_messaging_context(), NULL,
1199                            MSG_SHUTDOWN, msg_shutdown);
1200
1201         /* Handle online/offline messages. */
1202         messaging_register(winbind_messaging_context(), NULL,
1203                            MSG_WINBIND_OFFLINE, winbind_msg_offline);
1204         messaging_register(winbind_messaging_context(), NULL,
1205                            MSG_WINBIND_ONLINE, winbind_msg_online);
1206         messaging_register(winbind_messaging_context(), NULL,
1207                            MSG_WINBIND_ONLINESTATUS, winbind_msg_onlinestatus);
1208
1209         messaging_register(winbind_messaging_context(), NULL,
1210                            MSG_DUMP_EVENT_LIST, winbind_msg_dump_event_list);
1211
1212         messaging_register(winbind_messaging_context(), NULL,
1213                            MSG_WINBIND_VALIDATE_CACHE,
1214                            winbind_msg_validate_cache);
1215
1216         messaging_register(winbind_messaging_context(), NULL,
1217                            MSG_WINBIND_DUMP_DOMAIN_LIST,
1218                            winbind_msg_dump_domain_list);
1219
1220         /* Register handler for MSG_DEBUG. */
1221         messaging_register(winbind_messaging_context(), NULL,
1222                            MSG_DEBUG,
1223                            winbind_msg_debug);
1224
1225         netsamlogon_cache_init(); /* Non-critical */
1226
1227         /* clear the cached list of trusted domains */
1228
1229         wcache_tdc_clear();     
1230
1231         if (!init_domain_list()) {
1232                 DEBUG(0,("unable to initialize domain list\n"));
1233                 exit(1);
1234         }
1235
1236         init_idmap_child();
1237         init_locator_child();
1238
1239         smb_nscd_flush_user_cache();
1240         smb_nscd_flush_group_cache();
1241
1242         /* setup listen sockets */
1243
1244         if (!winbindd_setup_listeners()) {
1245                 DEBUG(0,("winbindd_setup_listeners() failed\n"));
1246                 exit(1);
1247         }
1248
1249         te = tevent_add_timer(winbind_event_context(), NULL, timeval_zero(),
1250                               rescan_trusted_domains, NULL);
1251         if (te == NULL) {
1252                 DEBUG(0, ("Could not trigger rescan_trusted_domains()\n"));
1253                 exit(1);
1254         }
1255
1256         TALLOC_FREE(frame);
1257         /* Loop waiting for requests */
1258         while (1) {
1259                 frame = talloc_stackframe();
1260
1261                 if (tevent_loop_once(winbind_event_context()) == -1) {
1262                         DEBUG(1, ("tevent_loop_once() failed: %s\n",
1263                                   strerror(errno)));
1264                         return 1;
1265                 }
1266
1267                 TALLOC_FREE(frame);
1268         }
1269
1270         return 0;
1271 }