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