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