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