Merge branch 'master' of ssh://git.samba.org/data/git/samba
[sfrench/samba-autobuild/.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 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 SIG_ATOMIC_T do_sigterm = 0;
177
178 static void termination_handler(int signum)
179 {
180         do_sigterm = 1;
181         sys_select_signal(signum);
182 }
183
184 static SIG_ATOMIC_T do_sigusr2 = 0;
185
186 static void sigusr2_handler(int signum)
187 {
188         do_sigusr2 = 1;
189         sys_select_signal(SIGUSR2);
190 }
191
192 static SIG_ATOMIC_T do_sighup = 0;
193
194 static void sighup_handler(int signum)
195 {
196         do_sighup = 1;
197         sys_select_signal(SIGHUP);
198 }
199
200 static SIG_ATOMIC_T do_sigchld = 0;
201
202 static void sigchld_handler(int signum)
203 {
204         do_sigchld = 1;
205         sys_select_signal(SIGCHLD);
206 }
207
208 /* React on 'smbcontrol winbindd reload-config' in the same way as on SIGHUP*/
209 static void msg_reload_services(struct messaging_context *msg,
210                                 void *private_data,
211                                 uint32_t msg_type,
212                                 struct server_id server_id,
213                                 DATA_BLOB *data)
214 {
215         /* Flush various caches */
216         flush_caches();
217         reload_services_file((const char *) private_data);
218 }
219
220 /* React on 'smbcontrol winbindd shutdown' in the same way as on SIGTERM*/
221 static void msg_shutdown(struct messaging_context *msg,
222                          void *private_data,
223                          uint32_t msg_type,
224                          struct server_id server_id,
225                          DATA_BLOB *data)
226 {
227         do_sigterm = 1;
228 }
229
230
231 static void winbind_msg_validate_cache(struct messaging_context *msg_ctx,
232                                        void *private_data,
233                                        uint32_t msg_type,
234                                        struct server_id server_id,
235                                        DATA_BLOB *data)
236 {
237         uint8 ret;
238         pid_t child_pid;
239         struct sigaction act;
240         struct sigaction oldact;
241
242         DEBUG(10, ("winbindd_msg_validate_cache: got validate-cache "
243                    "message.\n"));
244
245         /*
246          * call the validation code from a child:
247          * so we don't block the main winbindd and the validation
248          * code can safely use fork/waitpid...
249          */
250         CatchChild();
251         child_pid = sys_fork();
252
253         if (child_pid == -1) {
254                 DEBUG(1, ("winbind_msg_validate_cache: Could not fork: %s\n",
255                           strerror(errno)));
256                 return;
257         }
258
259         if (child_pid != 0) {
260                 /* parent */
261                 DEBUG(5, ("winbind_msg_validate_cache: child created with "
262                           "pid %d.\n", child_pid));
263                 return;
264         }
265
266         /* child */
267
268         /* install default SIGCHLD handler: validation code uses fork/waitpid */
269         ZERO_STRUCT(act);
270         act.sa_handler = SIG_DFL;
271 #ifdef SA_RESTART
272         /* We *want* SIGALRM to interrupt a system call. */
273         act.sa_flags = SA_RESTART;
274 #endif
275         sigemptyset(&act.sa_mask);
276         sigaddset(&act.sa_mask,SIGCHLD);
277         sigaction(SIGCHLD,&act,&oldact);
278
279         ret = (uint8)winbindd_validate_cache_nobackup();
280         DEBUG(10, ("winbindd_msg_validata_cache: got return value %d\n", ret));
281         messaging_send_buf(msg_ctx, server_id, MSG_WINBIND_VALIDATE_CACHE, &ret,
282                            (size_t)1);
283         _exit(0);
284 }
285
286 static struct winbindd_dispatch_table {
287         enum winbindd_cmd cmd;
288         void (*fn)(struct winbindd_cli_state *state);
289         const char *winbindd_cmd_name;
290 } dispatch_table[] = {
291
292         /* User functions */
293
294         { WINBINDD_GETPWNAM, winbindd_getpwnam, "GETPWNAM" },
295         { WINBINDD_GETPWUID, winbindd_getpwuid, "GETPWUID" },
296
297         { WINBINDD_SETPWENT, winbindd_setpwent, "SETPWENT" },
298         { WINBINDD_ENDPWENT, winbindd_endpwent, "ENDPWENT" },
299         { WINBINDD_GETPWENT, winbindd_getpwent, "GETPWENT" },
300
301         { WINBINDD_GETGROUPS, winbindd_getgroups, "GETGROUPS" },
302         { WINBINDD_GETUSERSIDS, winbindd_getusersids, "GETUSERSIDS" },
303         { WINBINDD_GETUSERDOMGROUPS, winbindd_getuserdomgroups,
304           "GETUSERDOMGROUPS" },
305
306         /* Group functions */
307
308         { WINBINDD_GETGRNAM, winbindd_getgrnam, "GETGRNAM" },
309         { WINBINDD_GETGRGID, winbindd_getgrgid, "GETGRGID" },
310         { WINBINDD_SETGRENT, winbindd_setgrent, "SETGRENT" },
311         { WINBINDD_ENDGRENT, winbindd_endgrent, "ENDGRENT" },
312         { WINBINDD_GETGRENT, winbindd_getgrent, "GETGRENT" },
313         { WINBINDD_GETGRLST, winbindd_getgrent, "GETGRLST" },
314
315         /* PAM auth functions */
316
317         { WINBINDD_PAM_AUTH, winbindd_pam_auth, "PAM_AUTH" },
318         { WINBINDD_PAM_AUTH_CRAP, winbindd_pam_auth_crap, "AUTH_CRAP" },
319         { WINBINDD_PAM_CHAUTHTOK, winbindd_pam_chauthtok, "CHAUTHTOK" },
320         { WINBINDD_PAM_LOGOFF, winbindd_pam_logoff, "PAM_LOGOFF" },
321         { WINBINDD_PAM_CHNG_PSWD_AUTH_CRAP, winbindd_pam_chng_pswd_auth_crap, "CHNG_PSWD_AUTH_CRAP" },
322
323         /* Enumeration functions */
324
325         { WINBINDD_LIST_USERS, winbindd_list_users, "LIST_USERS" },
326         { WINBINDD_LIST_GROUPS, winbindd_list_groups, "LIST_GROUPS" },
327         { WINBINDD_LIST_TRUSTDOM, winbindd_list_trusted_domains,
328           "LIST_TRUSTDOM" },
329         { WINBINDD_SHOW_SEQUENCE, winbindd_show_sequence, "SHOW_SEQUENCE" },
330
331         /* SID related functions */
332
333         { WINBINDD_LOOKUPSID, winbindd_lookupsid, "LOOKUPSID" },
334         { WINBINDD_LOOKUPNAME, winbindd_lookupname, "LOOKUPNAME" },
335         { WINBINDD_LOOKUPRIDS, winbindd_lookuprids, "LOOKUPRIDS" },
336
337         /* Lookup related functions */
338
339         { WINBINDD_SID_TO_UID, winbindd_sid_to_uid, "SID_TO_UID" },
340         { WINBINDD_SID_TO_GID, winbindd_sid_to_gid, "SID_TO_GID" },
341         { WINBINDD_UID_TO_SID, winbindd_uid_to_sid, "UID_TO_SID" },
342         { WINBINDD_GID_TO_SID, winbindd_gid_to_sid, "GID_TO_SID" },
343         { WINBINDD_ALLOCATE_UID, winbindd_allocate_uid, "ALLOCATE_UID" },
344         { WINBINDD_ALLOCATE_GID, winbindd_allocate_gid, "ALLOCATE_GID" },
345         { WINBINDD_SET_MAPPING, winbindd_set_mapping, "SET_MAPPING" },
346         { WINBINDD_REMOVE_MAPPING, winbindd_remove_mapping, "REMOVE_MAPPING" },
347         { WINBINDD_SET_HWM, winbindd_set_hwm, "SET_HWMS" },
348
349         /* Miscellaneous */
350
351         { WINBINDD_CHECK_MACHACC, winbindd_check_machine_acct, "CHECK_MACHACC" },
352         { WINBINDD_PING, winbindd_ping, "PING" },
353         { WINBINDD_INFO, winbindd_info, "INFO" },
354         { WINBINDD_INTERFACE_VERSION, winbindd_interface_version,
355           "INTERFACE_VERSION" },
356         { WINBINDD_DOMAIN_NAME, winbindd_domain_name, "DOMAIN_NAME" },
357         { WINBINDD_DOMAIN_INFO, winbindd_domain_info, "DOMAIN_INFO" },
358         { WINBINDD_NETBIOS_NAME, winbindd_netbios_name, "NETBIOS_NAME" },
359         { WINBINDD_PRIV_PIPE_DIR, winbindd_priv_pipe_dir,
360           "WINBINDD_PRIV_PIPE_DIR" },
361         { WINBINDD_GETDCNAME, winbindd_getdcname, "GETDCNAME" },
362         { WINBINDD_DSGETDCNAME, winbindd_dsgetdcname, "DSGETDCNAME" },
363
364         /* Credential cache access */
365         { WINBINDD_CCACHE_NTLMAUTH, winbindd_ccache_ntlm_auth, "NTLMAUTH" },
366
367         /* WINS functions */
368
369         { WINBINDD_WINS_BYNAME, winbindd_wins_byname, "WINS_BYNAME" },
370         { WINBINDD_WINS_BYIP, winbindd_wins_byip, "WINS_BYIP" },
371
372         /* End of list */
373
374         { WINBINDD_NUM_CMDS, NULL, "NONE" }
375 };
376
377 static void process_request(struct winbindd_cli_state *state)
378 {
379         struct winbindd_dispatch_table *table = dispatch_table;
380
381         /* Free response data - we may be interrupted and receive another
382            command before being able to send this data off. */
383
384         SAFE_FREE(state->response.extra_data.data);  
385
386         ZERO_STRUCT(state->response);
387
388         state->response.result = WINBINDD_PENDING;
389         state->response.length = sizeof(struct winbindd_response);
390
391         state->mem_ctx = talloc_init("winbind request");
392         if (state->mem_ctx == NULL)
393                 return;
394
395         /* Remember who asked us. */
396         state->pid = state->request.pid;
397
398         /* Process command */
399
400         for (table = dispatch_table; table->fn; table++) {
401                 if (state->request.cmd == table->cmd) {
402                         DEBUG(10,("process_request: request fn %s\n",
403                                   table->winbindd_cmd_name ));
404                         table->fn(state);
405                         break;
406                 }
407         }
408
409         if (!table->fn) {
410                 DEBUG(10,("process_request: unknown request fn number %d\n",
411                           (int)state->request.cmd ));
412                 request_error(state);
413         }
414 }
415
416 /*
417  * A list of file descriptors being monitored by select in the main processing
418  * loop. winbindd_fd_event->handler is called whenever the socket is readable/writable.
419  */
420
421 static struct winbindd_fd_event *fd_events = NULL;
422
423 void add_fd_event(struct winbindd_fd_event *ev)
424 {
425         struct winbindd_fd_event *match;
426
427         /* only add unique winbindd_fd_event structs */
428
429         for (match=fd_events; match; match=match->next ) {
430 #ifdef DEVELOPER
431                 SMB_ASSERT( match != ev );
432 #else
433                 if ( match == ev )
434                         return;
435 #endif
436         }
437
438         DLIST_ADD(fd_events, ev);
439 }
440
441 void remove_fd_event(struct winbindd_fd_event *ev)
442 {
443         DLIST_REMOVE(fd_events, ev);
444 }
445
446 /*
447  * Handler for winbindd_fd_events to complete a read/write request, set up by
448  * setup_async_read/setup_async_write.
449  */
450
451 static void rw_callback(struct winbindd_fd_event *event, int flags)
452 {
453         size_t todo;
454         ssize_t done = 0;
455
456         todo = event->length - event->done;
457
458         if (event->flags & EVENT_FD_WRITE) {
459                 SMB_ASSERT(flags == EVENT_FD_WRITE);
460                 done = sys_write(event->fd,
461                                  &((char *)event->data)[event->done],
462                                  todo);
463
464                 if (done <= 0) {
465                         event->flags = 0;
466                         event->finished(event->private_data, False);
467                         return;
468                 }
469         }
470
471         if (event->flags & EVENT_FD_READ) {
472                 SMB_ASSERT(flags == EVENT_FD_READ);
473                 done = sys_read(event->fd, &((char *)event->data)[event->done],
474                                 todo);
475
476                 if (done <= 0) {
477                         event->flags = 0;
478                         event->finished(event->private_data, False);
479                         return;
480                 }
481         }
482
483         event->done += done;
484
485         if (event->done == event->length) {
486                 event->flags = 0;
487                 event->finished(event->private_data, True);
488         }
489 }
490
491 /*
492  * Request an async read/write on a winbindd_fd_event structure. (*finished) is called
493  * when the request is completed or an error had occurred.
494  */
495
496 void setup_async_read(struct winbindd_fd_event *event, void *data, size_t length,
497                       void (*finished)(void *private_data, bool success),
498                       void *private_data)
499 {
500         SMB_ASSERT(event->flags == 0);
501         event->data = data;
502         event->length = length;
503         event->done = 0;
504         event->handler = rw_callback;
505         event->finished = finished;
506         event->private_data = private_data;
507         event->flags = EVENT_FD_READ;
508 }
509
510 void setup_async_write(struct winbindd_fd_event *event, void *data, size_t length,
511                        void (*finished)(void *private_data, bool success),
512                        void *private_data)
513 {
514         SMB_ASSERT(event->flags == 0);
515         event->data = data;
516         event->length = length;
517         event->done = 0;
518         event->handler = rw_callback;
519         event->finished = finished;
520         event->private_data = private_data;
521         event->flags = EVENT_FD_WRITE;
522 }
523
524 /*
525  * This is the main event loop of winbind requests. It goes through a
526  * state-machine of 3 read/write requests, 4 if you have extra data to send.
527  *
528  * An idle winbind client has a read request of 4 bytes outstanding,
529  * finalizing function is request_len_recv, checking the length. request_recv
530  * then processes the packet. The processing function then at some point has
531  * to call request_finished which schedules sending the response.
532  */
533
534 static void request_len_recv(void *private_data, bool success);
535 static void request_recv(void *private_data, bool success);
536 static void request_main_recv(void *private_data, bool success);
537 static void request_finished(struct winbindd_cli_state *state);
538 static void response_main_sent(void *private_data, bool success);
539 static void response_extra_sent(void *private_data, bool success);
540
541 static void response_extra_sent(void *private_data, bool success)
542 {
543         struct winbindd_cli_state *state =
544                 talloc_get_type_abort(private_data, struct winbindd_cli_state);
545
546         TALLOC_FREE(state->mem_ctx);
547
548         if (!success) {
549                 state->finished = True;
550                 return;
551         }
552
553         SAFE_FREE(state->response.extra_data.data);
554
555         setup_async_read(&state->fd_event, &state->request, sizeof(uint32),
556                          request_len_recv, state);
557 }
558
559 static void response_main_sent(void *private_data, bool success)
560 {
561         struct winbindd_cli_state *state =
562                 talloc_get_type_abort(private_data, struct winbindd_cli_state);
563
564         if (!success) {
565                 state->finished = True;
566                 return;
567         }
568
569         if (state->response.length == sizeof(state->response)) {
570                 TALLOC_FREE(state->mem_ctx);
571
572                 setup_async_read(&state->fd_event, &state->request,
573                                  sizeof(uint32), request_len_recv, state);
574                 return;
575         }
576
577         setup_async_write(&state->fd_event, state->response.extra_data.data,
578                           state->response.length - sizeof(state->response),
579                           response_extra_sent, state);
580 }
581
582 static void request_finished(struct winbindd_cli_state *state)
583 {
584         /* Make sure request.extra_data is freed when finish processing a request */
585         SAFE_FREE(state->request.extra_data.data);
586         setup_async_write(&state->fd_event, &state->response,
587                           sizeof(state->response), response_main_sent, state);
588 }
589
590 void request_error(struct winbindd_cli_state *state)
591 {
592         SMB_ASSERT(state->response.result == WINBINDD_PENDING);
593         state->response.result = WINBINDD_ERROR;
594         request_finished(state);
595 }
596
597 void request_ok(struct winbindd_cli_state *state)
598 {
599         SMB_ASSERT(state->response.result == WINBINDD_PENDING);
600         state->response.result = WINBINDD_OK;
601         request_finished(state);
602 }
603
604 static void request_len_recv(void *private_data, bool success)
605 {
606         struct winbindd_cli_state *state =
607                 talloc_get_type_abort(private_data, struct winbindd_cli_state);
608
609         if (!success) {
610                 state->finished = True;
611                 return;
612         }
613
614         if (*(uint32 *)(&state->request) != sizeof(state->request)) {
615                 DEBUG(0,("request_len_recv: Invalid request size received: %d (expected %u)\n",
616                          *(uint32_t *)(&state->request), (uint32_t)sizeof(state->request)));
617                 state->finished = True;
618                 return;
619         }
620
621         setup_async_read(&state->fd_event, (uint32 *)(&state->request)+1,
622                          sizeof(state->request) - sizeof(uint32),
623                          request_main_recv, state);
624 }
625
626 static void request_main_recv(void *private_data, bool success)
627 {
628         struct winbindd_cli_state *state =
629                 talloc_get_type_abort(private_data, struct winbindd_cli_state);
630
631         if (!success) {
632                 state->finished = True;
633                 return;
634         }
635
636         if (state->request.extra_len == 0) {
637                 state->request.extra_data.data = NULL;
638                 request_recv(state, True);
639                 return;
640         }
641
642         if ((!state->privileged) &&
643             (state->request.extra_len > WINBINDD_MAX_EXTRA_DATA)) {
644                 DEBUG(3, ("Got request with %d bytes extra data on "
645                           "unprivileged socket\n", (int)state->request.extra_len));
646                 state->request.extra_data.data = NULL;
647                 state->finished = True;
648                 return;
649         }
650
651         state->request.extra_data.data =
652                 SMB_MALLOC_ARRAY(char, state->request.extra_len + 1);
653
654         if (state->request.extra_data.data == NULL) {
655                 DEBUG(0, ("malloc failed\n"));
656                 state->finished = True;
657                 return;
658         }
659
660         /* Ensure null termination */
661         state->request.extra_data.data[state->request.extra_len] = '\0';
662
663         setup_async_read(&state->fd_event, state->request.extra_data.data,
664                          state->request.extra_len, request_recv, state);
665 }
666
667 static void request_recv(void *private_data, bool success)
668 {
669         struct winbindd_cli_state *state =
670                 talloc_get_type_abort(private_data, struct winbindd_cli_state);
671
672         if (!success) {
673                 state->finished = True;
674                 return;
675         }
676
677         process_request(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         socklen_t len;
687         int sock;
688
689         /* Accept connection */
690
691         len = sizeof(sunaddr);
692
693         do {
694                 sock = accept(listen_sock, (struct sockaddr *)&sunaddr, &len);
695         } while (sock == -1 && errno == EINTR);
696
697         if (sock == -1)
698                 return;
699
700         DEBUG(6,("accepted socket %d\n", sock));
701
702         /* Create new connection structure */
703
704         if ((state = TALLOC_ZERO_P(NULL, struct winbindd_cli_state)) == NULL) {
705                 close(sock);
706                 return;
707         }
708
709         state->sock = sock;
710
711         state->last_access = time(NULL);        
712
713         state->privileged = privileged;
714
715         state->fd_event.fd = state->sock;
716         state->fd_event.flags = 0;
717         add_fd_event(&state->fd_event);
718
719         setup_async_read(&state->fd_event, &state->request, sizeof(uint32),
720                          request_len_recv, state);
721
722         /* Add to connection list */
723
724         winbindd_add_client(state);
725 }
726
727 /* Remove a client connection from client connection list */
728
729 static void remove_client(struct winbindd_cli_state *state)
730 {
731         char c = 0;
732         int nwritten;
733
734         /* It's a dead client - hold a funeral */
735
736         if (state == NULL) {
737                 return;
738         }
739
740         /* tell client, we are closing ... */
741         nwritten = write(state->sock, &c, sizeof(c));
742         if (nwritten == -1) {
743                 DEBUG(2, ("final write to client failed: %s\n",
744                           strerror(errno)));
745         }
746
747         /* Close socket */
748
749         close(state->sock);
750
751         /* Free any getent state */
752
753         free_getent_state(state->getpwent_state);
754         free_getent_state(state->getgrent_state);
755
756         /* We may have some extra data that was not freed if the client was
757            killed unexpectedly */
758
759         SAFE_FREE(state->response.extra_data.data);
760
761         TALLOC_FREE(state->mem_ctx);
762
763         remove_fd_event(&state->fd_event);
764
765         /* Remove from list and free */
766
767         winbindd_remove_client(state);
768         TALLOC_FREE(state);
769 }
770
771 /* Shutdown client connection which has been idle for the longest time */
772
773 static bool remove_idle_client(void)
774 {
775         struct winbindd_cli_state *state, *remove_state = NULL;
776         time_t last_access = 0;
777         int nidle = 0;
778
779         for (state = winbindd_client_list(); state; state = state->next) {
780                 if (state->response.result != WINBINDD_PENDING &&
781                     !state->getpwent_state && !state->getgrent_state) {
782                         nidle++;
783                         if (!last_access || state->last_access < last_access) {
784                                 last_access = state->last_access;
785                                 remove_state = state;
786                         }
787                 }
788         }
789
790         if (remove_state) {
791                 DEBUG(5,("Found %d idle client connections, shutting down sock %d, pid %u\n",
792                         nidle, remove_state->sock, (unsigned int)remove_state->pid));
793                 remove_client(remove_state);
794                 return True;
795         }
796
797         return False;
798 }
799
800 /* check if HUP has been received and reload files */
801 void winbind_check_sighup(const char *lfile)
802 {
803         if (do_sighup) {
804
805                 DEBUG(3, ("got SIGHUP\n"));
806
807                 flush_caches();
808                 reload_services_file(lfile);
809
810                 do_sighup = 0;
811         }
812 }
813
814 /* check if TERM has been received */
815 void winbind_check_sigterm(bool is_parent)
816 {
817         if (do_sigterm)
818                 terminate(is_parent);
819 }
820
821 /* Process incoming clients on listen_sock.  We use a tricky non-blocking,
822    non-forking, non-threaded model which allows us to handle many
823    simultaneous connections while remaining impervious to many denial of
824    service attacks. */
825
826 static void process_loop(void)
827 {
828         struct winbindd_cli_state *state;
829         struct winbindd_fd_event *ev;
830         fd_set r_fds, w_fds;
831         int maxfd, listen_sock, listen_priv_sock, selret;
832         struct timeval timeout, ev_timeout;
833
834         /* Open Sockets here to get stuff going ASAP */
835         listen_sock = open_winbindd_socket();
836         listen_priv_sock = open_winbindd_priv_socket();
837
838         if (listen_sock == -1 || listen_priv_sock == -1) {
839                 perror("open_winbind_socket");
840                 exit(1);
841         }
842
843         run_events(winbind_event_context(), 0, NULL, NULL);
844
845         /* refresh the trusted domain cache */
846
847         rescan_trusted_domains();
848
849         /* Initialise fd lists for select() */
850
851         maxfd = MAX(listen_sock, listen_priv_sock);
852
853         FD_ZERO(&r_fds);
854         FD_ZERO(&w_fds);
855         FD_SET(listen_sock, &r_fds);
856         FD_SET(listen_priv_sock, &r_fds);
857
858         timeout.tv_sec = WINBINDD_ESTABLISH_LOOP;
859         timeout.tv_usec = 0;
860
861         /* Check for any event timeouts. */
862         {
863                 struct timeval now;
864                 GetTimeOfDay(&now);
865
866                 event_add_to_select_args(winbind_event_context(), &now,
867                                          &r_fds, &w_fds, &ev_timeout, &maxfd);
868         }
869         if (get_timed_events_timeout(winbind_event_context(), &ev_timeout)) {
870                 timeout = timeval_min(&timeout, &ev_timeout);
871         }
872
873         /* Set up client readers and writers */
874
875         state = winbindd_client_list();
876
877         while (state) {
878
879                 struct winbindd_cli_state *next = state->next;
880
881                 /* Dispose of client connection if it is marked as 
882                    finished */ 
883
884                 if (state->finished)
885                         remove_client(state);
886
887                 state = next;
888         }
889
890         for (ev = fd_events; ev; ev = ev->next) {
891                 if (ev->flags & EVENT_FD_READ) {
892                         FD_SET(ev->fd, &r_fds);
893                         maxfd = MAX(ev->fd, maxfd);
894                 }
895                 if (ev->flags & EVENT_FD_WRITE) {
896                         FD_SET(ev->fd, &w_fds);
897                         maxfd = MAX(ev->fd, maxfd);
898                 }
899         }
900
901         /* Call select */
902
903         selret = sys_select(maxfd + 1, &r_fds, &w_fds, NULL, &timeout);
904
905         if (selret == 0) {
906                 goto no_fds_ready;
907         }
908
909         if (selret == -1) {
910                 if (errno == EINTR) {
911                         goto no_fds_ready;
912                 }
913
914                 /* Select error, something is badly wrong */
915
916                 perror("select");
917                 exit(1);
918         }
919
920         /* selret > 0 */
921
922         run_events(winbind_event_context(), selret, &r_fds, &w_fds);
923
924         ev = fd_events;
925         while (ev != NULL) {
926                 struct winbindd_fd_event *next = ev->next;
927                 int flags = 0;
928                 if (FD_ISSET(ev->fd, &r_fds))
929                         flags |= EVENT_FD_READ;
930                 if (FD_ISSET(ev->fd, &w_fds))
931                         flags |= EVENT_FD_WRITE;
932                 if (flags)
933                         ev->handler(ev, flags);
934                 ev = next;
935         }
936
937         if (FD_ISSET(listen_sock, &r_fds)) {
938                 while (winbindd_num_clients() >
939                        WINBINDD_MAX_SIMULTANEOUS_CLIENTS - 1) {
940                         DEBUG(5,("winbindd: Exceeding %d client "
941                                  "connections, removing idle "
942                                  "connection.\n",
943                                  WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
944                         if (!remove_idle_client()) {
945                                 DEBUG(0,("winbindd: Exceeding %d "
946                                          "client connections, no idle "
947                                          "connection found\n",
948                                          WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
949                                 break;
950                         }
951                 }
952                 /* new, non-privileged connection */
953                 new_connection(listen_sock, False);
954         }
955
956         if (FD_ISSET(listen_priv_sock, &r_fds)) {
957                 while (winbindd_num_clients() >
958                        WINBINDD_MAX_SIMULTANEOUS_CLIENTS - 1) {
959                         DEBUG(5,("winbindd: Exceeding %d client "
960                                  "connections, removing idle "
961                                  "connection.\n",
962                                  WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
963                         if (!remove_idle_client()) {
964                                 DEBUG(0,("winbindd: Exceeding %d "
965                                          "client connections, no idle "
966                                          "connection found\n",
967                                          WINBINDD_MAX_SIMULTANEOUS_CLIENTS));
968                                 break;
969                         }
970                 }
971                 /* new, privileged connection */
972                 new_connection(listen_priv_sock, True);
973         }
974
975  no_fds_ready:
976
977         run_events(winbind_event_context(), selret, &r_fds, &w_fds);
978
979 #if 0
980         winbindd_check_cache_size(time(NULL));
981 #endif
982
983         /* Check signal handling things */
984
985         winbind_check_sigterm(true);
986         winbind_check_sighup(NULL);
987
988         if (do_sigusr2) {
989                 print_winbindd_status();
990                 do_sigusr2 = 0;
991         }
992
993         if (do_sigchld) {
994                 pid_t pid;
995
996                 do_sigchld = 0;
997
998                 while ((pid = sys_waitpid(-1, NULL, WNOHANG)) > 0) {
999                         winbind_child_died(pid);
1000                 }
1001         }
1002 }
1003
1004 /* Main function */
1005
1006 int main(int argc, char **argv, char **envp)
1007 {
1008         static bool is_daemon = False;
1009         static bool Fork = True;
1010         static bool log_stdout = False;
1011         static bool no_process_group = False;
1012         enum {
1013                 OPT_DAEMON = 1000,
1014                 OPT_FORK,
1015                 OPT_NO_PROCESS_GROUP,
1016                 OPT_LOG_STDOUT
1017         };
1018         struct poptOption long_options[] = {
1019                 POPT_AUTOHELP
1020                 { "stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
1021                 { "foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Daemon in foreground mode" },
1022                 { "no-process-group", 0, POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
1023                 { "daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
1024                 { "interactive", 'i', POPT_ARG_NONE, NULL, 'i', "Interactive mode" },
1025                 { "no-caching", 'n', POPT_ARG_NONE, NULL, 'n', "Disable caching" },
1026                 POPT_COMMON_SAMBA
1027                 POPT_TABLEEND
1028         };
1029         poptContext pc;
1030         int opt;
1031         TALLOC_CTX *frame = talloc_stackframe();
1032
1033         /* glibc (?) likes to print "User defined signal 1" and exit if a
1034            SIGUSR[12] is received before a handler is installed */
1035
1036         CatchSignal(SIGUSR1, SIG_IGN);
1037         CatchSignal(SIGUSR2, SIG_IGN);
1038
1039         fault_setup((void (*)(void *))fault_quit );
1040         dump_core_setup("winbindd");
1041
1042         load_case_tables();
1043
1044         /* Initialise for running in non-root mode */
1045
1046         sec_init();
1047
1048         set_remote_machine_name("winbindd", False);
1049
1050         /* Set environment variable so we don't recursively call ourselves.
1051            This may also be useful interactively. */
1052
1053         if ( !winbind_off() ) {
1054                 DEBUG(0,("Failed to disable recusive winbindd calls.  Exiting.\n"));
1055                 exit(1);
1056         }
1057
1058         /* Initialise samba/rpc client stuff */
1059
1060         pc = poptGetContext("winbindd", argc, (const char **)argv, long_options, 0);
1061
1062         while ((opt = poptGetNextOpt(pc)) != -1) {
1063                 switch (opt) {
1064                         /* Don't become a daemon */
1065                 case OPT_DAEMON:
1066                         is_daemon = True;
1067                         break;
1068                 case 'i':
1069                         interactive = True;
1070                         log_stdout = True;
1071                         Fork = False;
1072                         break;
1073                 case OPT_FORK:
1074                         Fork = false;
1075                         break;
1076                 case OPT_NO_PROCESS_GROUP:
1077                         no_process_group = true;
1078                         break;
1079                 case OPT_LOG_STDOUT:
1080                         log_stdout = true;
1081                         break;
1082                 case 'n':
1083                         opt_nocache = true;
1084                         break;
1085                 default:
1086                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1087                                   poptBadOption(pc, 0), poptStrerror(opt));
1088                         poptPrintUsage(pc, stderr, 0);
1089                         exit(1);
1090                 }
1091         }
1092
1093         if (is_daemon && interactive) {
1094                 d_fprintf(stderr,"\nERROR: "
1095                           "Option -i|--interactive is not allowed together with -D|--daemon\n\n");
1096                 poptPrintUsage(pc, stderr, 0);
1097                 exit(1);
1098         }
1099
1100         if (log_stdout && Fork) {
1101                 d_fprintf(stderr, "\nERROR: "
1102                           "Can't log to stdout (-S) unless daemon is in foreground +(-F) or interactive (-i)\n\n");
1103                 poptPrintUsage(pc, stderr, 0);
1104                 exit(1);
1105         }
1106
1107         poptFreeContext(pc);
1108
1109         if (!override_logfile) {
1110                 char *lfile = NULL;
1111                 if (asprintf(&lfile,"%s/log.winbindd",
1112                                 get_dyn_LOGFILEBASE()) > 0) {
1113                         lp_set_logfile(lfile);
1114                         SAFE_FREE(lfile);
1115                 }
1116         }
1117         setup_logging("winbindd", log_stdout);
1118         reopen_logs();
1119
1120         DEBUG(0,("winbindd version %s started.\n", samba_version_string()));
1121         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1122
1123         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1124                 DEBUG(0, ("error opening config file\n"));
1125                 exit(1);
1126         }
1127
1128         /* Initialise messaging system */
1129
1130         if (winbind_messaging_context() == NULL) {
1131                 exit(1);
1132         }
1133
1134         if (!reload_services_file(NULL)) {
1135                 DEBUG(0, ("error opening config file\n"));
1136                 exit(1);
1137         }
1138
1139         if (!directory_exist(lp_lockdir())) {
1140                 mkdir(lp_lockdir(), 0755);
1141         }
1142
1143         /* Setup names. */
1144
1145         if (!init_names())
1146                 exit(1);
1147
1148         load_interfaces();
1149
1150         if (!secrets_init()) {
1151
1152                 DEBUG(0,("Could not initialize domain trust account secrets. Giving up\n"));
1153                 return False;
1154         }
1155
1156         /* Enable netbios namecache */
1157
1158         namecache_enable();
1159
1160         /* Unblock all signals we are interested in as they may have been
1161            blocked by the parent process. */
1162
1163         BlockSignals(False, SIGINT);
1164         BlockSignals(False, SIGQUIT);
1165         BlockSignals(False, SIGTERM);
1166         BlockSignals(False, SIGUSR1);
1167         BlockSignals(False, SIGUSR2);
1168         BlockSignals(False, SIGHUP);
1169         BlockSignals(False, SIGCHLD);
1170
1171         /* Setup signal handlers */
1172
1173         CatchSignal(SIGINT, termination_handler);      /* Exit on these sigs */
1174         CatchSignal(SIGQUIT, termination_handler);
1175         CatchSignal(SIGTERM, termination_handler);
1176         CatchSignal(SIGCHLD, sigchld_handler);
1177
1178         CatchSignal(SIGPIPE, SIG_IGN);                 /* Ignore sigpipe */
1179
1180         CatchSignal(SIGUSR2, sigusr2_handler);         /* Debugging sigs */
1181         CatchSignal(SIGHUP, sighup_handler);
1182
1183         if (!interactive)
1184                 become_daemon(Fork, no_process_group);
1185
1186         pidfile_create("winbindd");
1187
1188 #if HAVE_SETPGID
1189         /*
1190          * If we're interactive we want to set our own process group for
1191          * signal management.
1192          */
1193         if (interactive && !no_process_group)
1194                 setpgid( (pid_t)0, (pid_t)0);
1195 #endif
1196
1197         TimeInit();
1198
1199         /* Don't use winbindd_reinit_after_fork here as
1200          * we're just starting up and haven't created any
1201          * winbindd-specific resources we must free yet. JRA.
1202          */
1203
1204         if (!reinit_after_fork(winbind_messaging_context(),
1205                                winbind_event_context(), false)) {
1206                 DEBUG(0,("reinit_after_fork() failed\n"));
1207                 exit(1);
1208         }
1209
1210         /*
1211          * Ensure all cache and idmap caches are consistent
1212          * and initialized before we startup.
1213          */
1214         if (!winbindd_cache_validate_and_initialize()) {
1215                 exit(1);
1216         }
1217
1218         /* get broadcast messages */
1219         claim_connection(NULL,"",FLAG_MSG_GENERAL|FLAG_MSG_DBWRAP);
1220
1221         /* React on 'smbcontrol winbindd reload-config' in the same way
1222            as to SIGHUP signal */
1223         messaging_register(winbind_messaging_context(), NULL,
1224                            MSG_SMB_CONF_UPDATED, msg_reload_services);
1225         messaging_register(winbind_messaging_context(), NULL,
1226                            MSG_SHUTDOWN, msg_shutdown);
1227
1228         /* Handle online/offline messages. */
1229         messaging_register(winbind_messaging_context(), NULL,
1230                            MSG_WINBIND_OFFLINE, winbind_msg_offline);
1231         messaging_register(winbind_messaging_context(), NULL,
1232                            MSG_WINBIND_ONLINE, winbind_msg_online);
1233         messaging_register(winbind_messaging_context(), NULL,
1234                            MSG_WINBIND_ONLINESTATUS, winbind_msg_onlinestatus);
1235
1236         messaging_register(winbind_messaging_context(), NULL,
1237                            MSG_DUMP_EVENT_LIST, winbind_msg_dump_event_list);
1238
1239         messaging_register(winbind_messaging_context(), NULL,
1240                            MSG_WINBIND_VALIDATE_CACHE,
1241                            winbind_msg_validate_cache);
1242
1243         messaging_register(winbind_messaging_context(), NULL,
1244                            MSG_WINBIND_DUMP_DOMAIN_LIST,
1245                            winbind_msg_dump_domain_list);
1246
1247         /* Register handler for MSG_DEBUG. */
1248         messaging_register(winbind_messaging_context(), NULL,
1249                            MSG_DEBUG,
1250                            winbind_msg_debug);
1251
1252         netsamlogon_cache_init(); /* Non-critical */
1253
1254         /* clear the cached list of trusted domains */
1255
1256         wcache_tdc_clear();     
1257
1258         if (!init_domain_list()) {
1259                 DEBUG(0,("unable to initialize domain list\n"));
1260                 exit(1);
1261         }
1262
1263         init_idmap_child();
1264         init_locator_child();
1265
1266         smb_nscd_flush_user_cache();
1267         smb_nscd_flush_group_cache();
1268
1269         /* Loop waiting for requests */
1270
1271         TALLOC_FREE(frame);
1272         while (1) {
1273                 frame = talloc_stackframe();
1274                 process_loop();
1275                 TALLOC_FREE(frame);
1276         }
1277
1278         return 0;
1279 }