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