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