s3/lanman: Workaround for KB932762.
[Samba.git] / source / smbd / server.c
blob35c98aa11dfa2a28ae20996988df3f29b3bb9074
1 /*
2 Unix SMB/CIFS implementation.
3 Main SMB server routines
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Martin Pool 2002
6 Copyright (C) Jelmer Vernooij 2002-2003
7 Copyright (C) Volker Lendecke 1993-2007
8 Copyright (C) Jeremy Allison 1993-2007
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 3 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 #include "includes.h"
26 static_decl_rpc;
28 static int am_parent = 1;
30 extern struct auth_context *negprot_global_auth_context;
31 extern SIG_ATOMIC_T got_sig_term;
32 extern SIG_ATOMIC_T reload_after_sighup;
33 static SIG_ATOMIC_T got_sig_cld;
35 #ifdef WITH_DFS
36 extern int dcelogin_atmost_once;
37 #endif /* WITH_DFS */
39 /* really we should have a top level context structure that has the
40 client file descriptor as an element. That would require a major rewrite :(
42 the following 2 functions are an alternative - they make the file
43 descriptor private to smbd
45 static int server_fd = -1;
47 int smbd_server_fd(void)
49 return server_fd;
52 static void smbd_set_server_fd(int fd)
54 server_fd = fd;
57 int get_client_fd(void)
59 return server_fd;
62 int client_get_tcp_info(struct sockaddr_in *server, struct sockaddr_in *client)
64 socklen_t length;
65 if (server_fd == -1) {
66 return -1;
68 length = sizeof(*server);
69 if (getsockname(server_fd, (struct sockaddr *)server, &length) != 0) {
70 return -1;
72 length = sizeof(*client);
73 if (getpeername(server_fd, (struct sockaddr *)client, &length) != 0) {
74 return -1;
76 return 0;
79 struct event_context *smbd_event_context(void)
81 static struct event_context *ctx;
83 if (!ctx && !(ctx = event_context_init(NULL))) {
84 smb_panic("Could not init smbd event context");
86 return ctx;
89 struct messaging_context *smbd_messaging_context(void)
91 static struct messaging_context *ctx;
93 if (!ctx && !(ctx = messaging_init(NULL, server_id_self(),
94 smbd_event_context()))) {
95 smb_panic("Could not init smbd messaging context");
97 return ctx;
100 struct memcache *smbd_memcache(void)
102 static struct memcache *cache;
104 if (!cache
105 && !(cache = memcache_init(NULL,
106 lp_max_stat_cache_size()*1024))) {
108 smb_panic("Could not init smbd memcache");
110 return cache;
113 /*******************************************************************
114 What to do when smb.conf is updated.
115 ********************************************************************/
117 static void smb_conf_updated(struct messaging_context *msg,
118 void *private_data,
119 uint32_t msg_type,
120 struct server_id server_id,
121 DATA_BLOB *data)
123 DEBUG(10,("smb_conf_updated: Got message saying smb.conf was "
124 "updated. Reloading.\n"));
125 reload_services(False);
129 /*******************************************************************
130 Delete a statcache entry.
131 ********************************************************************/
133 static void smb_stat_cache_delete(struct messaging_context *msg,
134 void *private_data,
135 uint32_t msg_tnype,
136 struct server_id server_id,
137 DATA_BLOB *data)
139 const char *name = (const char *)data->data;
140 DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
141 stat_cache_delete(name);
144 /****************************************************************************
145 Terminate signal.
146 ****************************************************************************/
148 static void sig_term(void)
150 got_sig_term = 1;
151 sys_select_signal(SIGTERM);
154 /****************************************************************************
155 Catch a sighup.
156 ****************************************************************************/
158 static void sig_hup(int sig)
160 reload_after_sighup = 1;
161 sys_select_signal(SIGHUP);
164 /****************************************************************************
165 Catch a sigcld
166 ****************************************************************************/
167 static void sig_cld(int sig)
169 got_sig_cld = 1;
170 sys_select_signal(SIGCLD);
173 /****************************************************************************
174 Send a SIGTERM to our process group.
175 *****************************************************************************/
177 static void killkids(void)
179 if(am_parent) kill(0,SIGTERM);
182 /****************************************************************************
183 Process a sam sync message - not sure whether to do this here or
184 somewhere else.
185 ****************************************************************************/
187 static void msg_sam_sync(struct messaging_context *msg,
188 void *private_data,
189 uint32_t msg_type,
190 struct server_id server_id,
191 DATA_BLOB *data)
193 DEBUG(10, ("** sam sync message received, ignoring\n"));
197 /****************************************************************************
198 Open the socket communication - inetd.
199 ****************************************************************************/
201 static bool open_sockets_inetd(void)
203 /* Started from inetd. fd 0 is the socket. */
204 /* We will abort gracefully when the client or remote system
205 goes away */
206 smbd_set_server_fd(dup(0));
208 /* close our standard file descriptors */
209 close_low_fds(False); /* Don't close stderr */
211 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
212 set_socket_options(smbd_server_fd(), lp_socket_options());
214 return True;
217 static void msg_exit_server(struct messaging_context *msg,
218 void *private_data,
219 uint32_t msg_type,
220 struct server_id server_id,
221 DATA_BLOB *data)
223 DEBUG(3, ("got a SHUTDOWN message\n"));
224 exit_server_cleanly(NULL);
227 #ifdef DEVELOPER
228 static void msg_inject_fault(struct messaging_context *msg,
229 void *private_data,
230 uint32_t msg_type,
231 struct server_id src,
232 DATA_BLOB *data)
234 int sig;
236 if (data->length != sizeof(sig)) {
238 DEBUG(0, ("Process %s sent bogus signal injection request\n",
239 procid_str_static(&src)));
240 return;
243 sig = *(int *)data->data;
244 if (sig == -1) {
245 exit_server("internal error injected");
246 return;
249 #if HAVE_STRSIGNAL
250 DEBUG(0, ("Process %s requested injection of signal %d (%s)\n",
251 procid_str_static(&src), sig, strsignal(sig)));
252 #else
253 DEBUG(0, ("Process %s requested injection of signal %d\n",
254 procid_str_static(&src), sig));
255 #endif
257 kill(sys_getpid(), sig);
259 #endif /* DEVELOPER */
261 struct child_pid {
262 struct child_pid *prev, *next;
263 pid_t pid;
266 static struct child_pid *children;
267 static int num_children;
269 static void add_child_pid(pid_t pid)
271 struct child_pid *child;
273 if (lp_max_smbd_processes() == 0) {
274 /* Don't bother with the child list if we don't care anyway */
275 return;
278 child = SMB_MALLOC_P(struct child_pid);
279 if (child == NULL) {
280 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
281 return;
283 child->pid = pid;
284 DLIST_ADD(children, child);
285 num_children += 1;
288 static void remove_child_pid(pid_t pid, bool unclean_shutdown)
290 struct child_pid *child;
292 if (unclean_shutdown) {
293 /* a child terminated uncleanly so tickle all processes to see
294 if they can grab any of the pending locks
296 messaging_send_buf(smbd_messaging_context(), procid_self(),
297 MSG_SMB_BRL_VALIDATE, NULL, 0);
298 message_send_all(smbd_messaging_context(),
299 MSG_SMB_UNLOCK, NULL, 0, NULL);
302 if (lp_max_smbd_processes() == 0) {
303 /* Don't bother with the child list if we don't care anyway */
304 return;
307 for (child = children; child != NULL; child = child->next) {
308 if (child->pid == pid) {
309 struct child_pid *tmp = child;
310 DLIST_REMOVE(children, child);
311 SAFE_FREE(tmp);
312 num_children -= 1;
313 return;
317 DEBUG(0, ("Could not find child %d -- ignoring\n", (int)pid));
320 /****************************************************************************
321 Have we reached the process limit ?
322 ****************************************************************************/
324 static bool allowable_number_of_smbd_processes(void)
326 int max_processes = lp_max_smbd_processes();
328 if (!max_processes)
329 return True;
331 return num_children < max_processes;
334 /****************************************************************************
335 Open the socket communication.
336 ****************************************************************************/
338 static bool open_sockets_smbd(bool is_daemon, bool interactive, const char *smb_ports)
340 int num_interfaces = iface_count();
341 int num_sockets = 0;
342 int fd_listenset[FD_SETSIZE];
343 fd_set listen_set;
344 int s;
345 int maxfd = 0;
346 int i;
347 char *ports;
348 struct dns_reg_state * dns_reg = NULL;
349 unsigned dns_port = 0;
351 #ifdef HAVE_ATEXIT
353 static int atexit_set;
354 if(atexit_set == 0) {
355 atexit_set=1;
356 atexit(killkids);
359 #endif
361 if (!is_daemon) {
363 * Stop zombies the old way.
364 * We aren't forking any new
365 * 'normal' connections when
366 * run from [x]inetd.
368 CatchChild();
369 return open_sockets_inetd();
372 /* Stop zombies */
373 CatchSignal(SIGCLD, sig_cld);
375 FD_ZERO(&listen_set);
377 /* use a reasonable default set of ports - listing on 445 and 139 */
378 if (!smb_ports) {
379 ports = lp_smb_ports();
380 if (!ports || !*ports) {
381 ports = smb_xstrdup(SMB_PORTS);
382 } else {
383 ports = smb_xstrdup(ports);
385 } else {
386 ports = smb_xstrdup(smb_ports);
389 if (lp_interfaces() && lp_bind_interfaces_only()) {
390 /* We have been given an interfaces line, and been
391 told to only bind to those interfaces. Create a
392 socket per interface and bind to only these.
395 /* Now open a listen socket for each of the
396 interfaces. */
397 for(i = 0; i < num_interfaces; i++) {
398 TALLOC_CTX *frame = NULL;
399 const struct sockaddr_storage *ifss =
400 iface_n_sockaddr_storage(i);
401 char *tok;
402 const char *ptr;
404 if (ifss == NULL) {
405 DEBUG(0,("open_sockets_smbd: "
406 "interface %d has NULL IP address !\n",
407 i));
408 continue;
411 frame = talloc_stackframe();
412 for (ptr=ports;
413 next_token_talloc(frame,&ptr, &tok, " \t,");) {
414 unsigned port = atoi(tok);
415 if (port == 0 || port > 0xffff) {
416 continue;
419 /* Keep the first port for mDNS service
420 * registration.
422 if (dns_port == 0) {
423 dns_port = port;
426 s = fd_listenset[num_sockets] =
427 open_socket_in(SOCK_STREAM,
428 port,
429 num_sockets == 0 ? 0 : 2,
430 ifss,
431 true);
432 if(s == -1) {
433 continue;
436 /* ready to listen */
437 set_socket_options(s,"SO_KEEPALIVE");
438 set_socket_options(s,lp_socket_options());
440 /* Set server socket to
441 * non-blocking for the accept. */
442 set_blocking(s,False);
444 if (listen(s, SMBD_LISTEN_BACKLOG) == -1) {
445 DEBUG(0,("open_sockets_smbd: listen: "
446 "%s\n", strerror(errno)));
447 close(s);
448 TALLOC_FREE(frame);
449 return False;
451 FD_SET(s,&listen_set);
452 maxfd = MAX( maxfd, s);
454 num_sockets++;
455 if (num_sockets >= FD_SETSIZE) {
456 DEBUG(0,("open_sockets_smbd: Too "
457 "many sockets to bind to\n"));
458 TALLOC_FREE(frame);
459 return False;
462 TALLOC_FREE(frame);
464 } else {
465 /* Just bind to 0.0.0.0 - accept connections
466 from anywhere. */
468 TALLOC_CTX *frame = talloc_stackframe();
469 char *tok;
470 const char *ptr;
471 const char *sock_addr = lp_socket_address();
472 char *sock_tok;
473 const char *sock_ptr;
475 if (strequal(sock_addr, "0.0.0.0") ||
476 strequal(sock_addr, "::")) {
477 #if HAVE_IPV6
478 sock_addr = "::,0.0.0.0";
479 #else
480 sock_addr = "0.0.0.0";
481 #endif
484 for (sock_ptr=sock_addr;
485 next_token_talloc(frame, &sock_ptr, &sock_tok, " \t,"); ) {
486 for (ptr=ports; next_token_talloc(frame, &ptr, &tok, " \t,"); ) {
487 struct sockaddr_storage ss;
489 unsigned port = atoi(tok);
490 if (port == 0 || port > 0xffff) {
491 continue;
494 /* Keep the first port for mDNS service
495 * registration.
497 if (dns_port == 0) {
498 dns_port = port;
501 /* open an incoming socket */
502 if (!interpret_string_addr(&ss, sock_tok,
503 AI_NUMERICHOST|AI_PASSIVE)) {
504 continue;
507 s = open_socket_in(SOCK_STREAM,
508 port,
509 num_sockets == 0 ? 0 : 2,
510 &ss,
511 true);
512 if (s == -1) {
513 continue;
516 /* ready to listen */
517 set_socket_options(s,"SO_KEEPALIVE");
518 set_socket_options(s,lp_socket_options());
520 /* Set server socket to non-blocking
521 * for the accept. */
522 set_blocking(s,False);
524 if (listen(s, SMBD_LISTEN_BACKLOG) == -1) {
525 DEBUG(0,("open_sockets_smbd: "
526 "listen: %s\n",
527 strerror(errno)));
528 close(s);
529 TALLOC_FREE(frame);
530 return False;
533 fd_listenset[num_sockets] = s;
534 FD_SET(s,&listen_set);
535 maxfd = MAX( maxfd, s);
537 num_sockets++;
539 if (num_sockets >= FD_SETSIZE) {
540 DEBUG(0,("open_sockets_smbd: Too "
541 "many sockets to bind to\n"));
542 TALLOC_FREE(frame);
543 return False;
547 TALLOC_FREE(frame);
550 SAFE_FREE(ports);
552 if (num_sockets == 0) {
553 DEBUG(0,("open_sockets_smbd: No "
554 "sockets available to bind to.\n"));
555 return false;
558 /* Setup the main smbd so that we can get messages. Note that
559 do this after starting listening. This is needed as when in
560 clustered mode, ctdb won't allow us to start doing database
561 operations until it has gone thru a full startup, which
562 includes checking to see that smbd is listening. */
563 claim_connection(NULL,"",
564 FLAG_MSG_GENERAL|FLAG_MSG_SMBD|FLAG_MSG_DBWRAP);
566 /* Listen to messages */
568 messaging_register(smbd_messaging_context(), NULL,
569 MSG_SMB_SAM_SYNC, msg_sam_sync);
570 messaging_register(smbd_messaging_context(), NULL,
571 MSG_SHUTDOWN, msg_exit_server);
572 messaging_register(smbd_messaging_context(), NULL,
573 MSG_SMB_FILE_RENAME, msg_file_was_renamed);
574 messaging_register(smbd_messaging_context(), NULL,
575 MSG_SMB_CONF_UPDATED, smb_conf_updated);
576 messaging_register(smbd_messaging_context(), NULL,
577 MSG_SMB_STAT_CACHE_DELETE, smb_stat_cache_delete);
578 brl_register_msgs(smbd_messaging_context());
580 #ifdef DEVELOPER
581 messaging_register(smbd_messaging_context(), NULL,
582 MSG_SMB_INJECT_FAULT, msg_inject_fault);
583 #endif
585 /* now accept incoming connections - forking a new process
586 for each incoming connection */
587 DEBUG(2,("waiting for a connection\n"));
588 while (1) {
589 struct timeval now, idle_timeout;
590 fd_set r_fds, w_fds;
591 int num;
593 /* Ensure we respond to PING and DEBUG messages from the main smbd. */
594 message_dispatch(smbd_messaging_context());
596 if (got_sig_cld) {
597 pid_t pid;
598 int status;
600 got_sig_cld = False;
602 while ((pid = sys_waitpid(-1, &status, WNOHANG)) > 0) {
603 bool unclean_shutdown = False;
605 /* If the child terminated normally, assume
606 it was an unclean shutdown unless the
607 status is 0
609 if (WIFEXITED(status)) {
610 unclean_shutdown = WEXITSTATUS(status);
612 /* If the child terminated due to a signal
613 we always assume it was unclean.
615 if (WIFSIGNALED(status)) {
616 unclean_shutdown = True;
618 remove_child_pid(pid, unclean_shutdown);
622 idle_timeout = timeval_zero();
624 memcpy((char *)&r_fds, (char *)&listen_set,
625 sizeof(listen_set));
626 FD_ZERO(&w_fds);
627 GetTimeOfDay(&now);
629 /* Kick off our mDNS registration. */
630 if (dns_port != 0) {
631 dns_register_smbd(&dns_reg, dns_port, &maxfd,
632 &r_fds, &idle_timeout);
635 event_add_to_select_args(smbd_event_context(), &now,
636 &r_fds, &w_fds, &idle_timeout,
637 &maxfd);
639 num = sys_select(maxfd+1,&r_fds,&w_fds,NULL,
640 timeval_is_zero(&idle_timeout) ?
641 NULL : &idle_timeout);
643 if (num == -1 && errno == EINTR) {
644 if (got_sig_term) {
645 exit_server_cleanly(NULL);
648 /* check for sighup processing */
649 if (reload_after_sighup) {
650 change_to_root_user();
651 DEBUG(1,("Reloading services after SIGHUP\n"));
652 reload_services(False);
653 reload_after_sighup = 0;
656 continue;
660 /* If the idle timeout fired and we don't have any connected
661 * users, exit gracefully. We should be running under a process
662 * controller that will restart us if necessry.
664 if (num == 0 && count_all_current_connections() == 0) {
665 exit_server_cleanly("idle timeout");
668 /* process pending nDNS responses */
669 if (dns_register_smbd_reply(dns_reg, &r_fds, &idle_timeout)) {
670 --num;
673 if (run_events(smbd_event_context(), num, &r_fds, &w_fds)) {
674 continue;
677 /* check if we need to reload services */
678 check_reload(time(NULL));
680 /* Find the sockets that are read-ready -
681 accept on these. */
682 for( ; num > 0; num--) {
683 struct sockaddr addr;
684 socklen_t in_addrlen = sizeof(addr);
685 pid_t child = 0;
687 s = -1;
688 for(i = 0; i < num_sockets; i++) {
689 if(FD_ISSET(fd_listenset[i],&r_fds)) {
690 s = fd_listenset[i];
691 /* Clear this so we don't look
692 at it again. */
693 FD_CLR(fd_listenset[i],&r_fds);
694 break;
698 smbd_set_server_fd(accept(s,&addr,&in_addrlen));
700 if (smbd_server_fd() == -1 && errno == EINTR)
701 continue;
703 if (smbd_server_fd() == -1) {
704 DEBUG(2,("open_sockets_smbd: accept: %s\n",
705 strerror(errno)));
706 continue;
709 /* Ensure child is set to blocking mode */
710 set_blocking(smbd_server_fd(),True);
712 if (smbd_server_fd() != -1 && interactive)
713 return True;
715 if (allowable_number_of_smbd_processes() &&
716 smbd_server_fd() != -1 &&
717 ((child = sys_fork())==0)) {
718 char remaddr[INET6_ADDRSTRLEN];
720 /* Child code ... */
722 /* Stop zombies, the parent explicitly handles
723 * them, counting worker smbds. */
724 CatchChild();
726 /* close the listening socket(s) */
727 for(i = 0; i < num_sockets; i++)
728 close(fd_listenset[i]);
730 /* close our mDNS daemon handle */
731 dns_register_close(&dns_reg);
733 /* close our standard file
734 descriptors */
735 close_low_fds(False);
736 am_parent = 0;
738 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
739 set_socket_options(smbd_server_fd(),
740 lp_socket_options());
742 /* this is needed so that we get decent entries
743 in smbstatus for port 445 connects */
744 set_remote_machine_name(get_peer_addr(smbd_server_fd(),
745 remaddr,
746 sizeof(remaddr)),
747 false);
749 if (!reinit_after_fork(
750 smbd_messaging_context(),
751 smbd_event_context(),
752 true)) {
753 DEBUG(0,("reinit_after_fork() failed\n"));
754 smb_panic("reinit_after_fork() failed");
757 return True;
759 /* The parent doesn't need this socket */
760 close(smbd_server_fd());
762 /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
763 Clear the closed fd info out of server_fd --
764 and more importantly, out of client_fd in
765 util_sock.c, to avoid a possible
766 getpeername failure if we reopen the logs
767 and use %I in the filename.
770 smbd_set_server_fd(-1);
772 if (child != 0) {
773 add_child_pid(child);
776 /* Force parent to check log size after
777 * spawning child. Fix from
778 * klausr@ITAP.Physik.Uni-Stuttgart.De. The
779 * parent smbd will log to logserver.smb. It
780 * writes only two messages for each child
781 * started/finished. But each child writes,
782 * say, 50 messages also in logserver.smb,
783 * begining with the debug_count of the
784 * parent, before the child opens its own log
785 * file logserver.client. In a worst case
786 * scenario the size of logserver.smb would be
787 * checked after about 50*50=2500 messages
788 * (ca. 100kb).
789 * */
790 force_check_log_size();
792 } /* end for num */
793 } /* end while 1 */
795 /* NOTREACHED return True; */
798 /****************************************************************************
799 Reload printers
800 **************************************************************************/
801 void reload_printers(void)
803 int snum;
804 int n_services = lp_numservices();
805 int pnum = lp_servicenumber(PRINTERS_NAME);
806 const char *pname;
808 pcap_cache_reload();
810 /* remove stale printers */
811 for (snum = 0; snum < n_services; snum++) {
812 /* avoid removing PRINTERS_NAME or non-autoloaded printers */
813 if (snum == pnum || !(lp_snum_ok(snum) && lp_print_ok(snum) &&
814 lp_autoloaded(snum)))
815 continue;
817 pname = lp_printername(snum);
818 if (!pcap_printername_ok(pname)) {
819 DEBUG(3, ("removing stale printer %s\n", pname));
821 if (is_printer_published(NULL, snum, NULL))
822 nt_printer_publish(NULL, snum, SPOOL_DS_UNPUBLISH);
823 del_a_printer(pname);
824 lp_killservice(snum);
828 load_printers();
831 /****************************************************************************
832 Reload the services file.
833 **************************************************************************/
835 bool reload_services(bool test)
837 bool ret;
839 if (lp_loaded()) {
840 char *fname = lp_configfile();
841 if (file_exist(fname, NULL) &&
842 !strcsequal(fname, get_dyn_CONFIGFILE())) {
843 set_dyn_CONFIGFILE(fname);
844 test = False;
848 reopen_logs();
850 if (test && !lp_file_list_changed())
851 return(True);
853 lp_killunused(conn_snum_used);
855 ret = lp_load(get_dyn_CONFIGFILE(), False, False, True, True);
857 reload_printers();
859 /* perhaps the config filename is now set */
860 if (!test)
861 reload_services(True);
863 reopen_logs();
865 load_interfaces();
867 if (smbd_server_fd() != -1) {
868 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
869 set_socket_options(smbd_server_fd(), lp_socket_options());
872 mangle_reset_cache();
873 reset_stat_cache();
875 /* this forces service parameters to be flushed */
876 set_current_service(NULL,0,True);
878 return(ret);
881 /****************************************************************************
882 Exit the server.
883 ****************************************************************************/
885 /* Reasons for shutting down a server process. */
886 enum server_exit_reason { SERVER_EXIT_NORMAL, SERVER_EXIT_ABNORMAL };
888 static void exit_server_common(enum server_exit_reason how,
889 const char *const reason) NORETURN_ATTRIBUTE;
891 static void exit_server_common(enum server_exit_reason how,
892 const char *const reason)
894 static int firsttime=1;
896 if (!firsttime)
897 exit(0);
898 firsttime = 0;
900 change_to_root_user();
902 if (negprot_global_auth_context) {
903 (negprot_global_auth_context->free)(&negprot_global_auth_context);
906 conn_close_all();
908 invalidate_all_vuids();
910 /* 3 second timeout. */
911 print_notify_send_messages(smbd_messaging_context(), 3);
913 /* delete our entry in the connections database. */
914 yield_connection(NULL,"");
916 respond_to_all_remaining_local_messages();
918 #ifdef WITH_DFS
919 if (dcelogin_atmost_once) {
920 dfs_unlogin();
922 #endif
924 #ifdef USE_DMAPI
925 /* Destroy Samba DMAPI session only if we are master smbd process */
926 if (am_parent) {
927 if (!dmapi_destroy_session()) {
928 DEBUG(0,("Unable to close Samba DMAPI session\n"));
931 #endif
933 locking_end();
934 printing_end();
936 if (how != SERVER_EXIT_NORMAL) {
937 int oldlevel = DEBUGLEVEL;
939 DEBUGLEVEL = 10;
941 DEBUGSEP(0);
942 DEBUG(0,("Abnormal server exit: %s\n",
943 reason ? reason : "no explanation provided"));
944 DEBUGSEP(0);
946 log_stack_trace();
948 DEBUGLEVEL = oldlevel;
949 dump_core();
951 } else {
952 DEBUG(3,("Server exit (%s)\n",
953 (reason ? reason : "normal exit")));
956 exit(0);
959 void exit_server(const char *const explanation)
961 exit_server_common(SERVER_EXIT_ABNORMAL, explanation);
964 void exit_server_cleanly(const char *const explanation)
966 exit_server_common(SERVER_EXIT_NORMAL, explanation);
969 void exit_server_fault(void)
971 exit_server("critical server fault");
975 /****************************************************************************
976 received when we should release a specific IP
977 ****************************************************************************/
978 static void release_ip(const char *ip, void *priv)
980 char addr[INET6_ADDRSTRLEN];
982 if (strcmp(client_socket_addr(get_client_fd(),addr,sizeof(addr)), ip) == 0) {
983 /* we can't afford to do a clean exit - that involves
984 database writes, which would potentially mean we
985 are still running after the failover has finished -
986 we have to get rid of this process ID straight
987 away */
988 DEBUG(0,("Got release IP message for our IP %s - exiting immediately\n",
989 ip));
990 _exit(0);
994 static void msg_release_ip(struct messaging_context *msg_ctx, void *private_data,
995 uint32_t msg_type, struct server_id server_id, DATA_BLOB *data)
997 release_ip((char *)data->data, NULL);
1000 /****************************************************************************
1001 Initialise connect, service and file structs.
1002 ****************************************************************************/
1004 static bool init_structs(void )
1007 * Set the machine NETBIOS name if not already
1008 * set from the config file.
1011 if (!init_names())
1012 return False;
1014 conn_init();
1016 file_init();
1018 /* for RPC pipes */
1019 init_rpc_pipe_hnd();
1021 init_dptrs();
1023 if (!secrets_init())
1024 return False;
1026 return True;
1030 * Send keepalive packets to our client
1032 static bool keepalive_fn(const struct timeval *now, void *private_data)
1034 if (!send_keepalive(smbd_server_fd())) {
1035 DEBUG( 2, ( "Keepalive failed - exiting.\n" ) );
1036 return False;
1038 return True;
1042 * Do the recurring check if we're idle
1044 static bool deadtime_fn(const struct timeval *now, void *private_data)
1046 if ((conn_num_open() == 0)
1047 || (conn_idle_all(now->tv_sec))) {
1048 DEBUG( 2, ( "Closing idle connection\n" ) );
1049 messaging_send(smbd_messaging_context(), procid_self(),
1050 MSG_SHUTDOWN, &data_blob_null);
1051 return False;
1054 return True;
1058 /****************************************************************************
1059 main program.
1060 ****************************************************************************/
1062 /* Declare prototype for build_options() to avoid having to run it through
1063 mkproto.h. Mixing $(builddir) and $(srcdir) source files in the current
1064 prototype generation system is too complicated. */
1066 extern void build_options(bool screen);
1068 int main(int argc,const char *argv[])
1070 /* shall I run as a daemon */
1071 static bool is_daemon = False;
1072 static bool interactive = False;
1073 static bool Fork = True;
1074 static bool no_process_group = False;
1075 static bool log_stdout = False;
1076 static char *ports = NULL;
1077 static char *profile_level = NULL;
1078 int opt;
1079 poptContext pc;
1080 bool print_build_options = False;
1081 enum {
1082 OPT_DAEMON = 1000,
1083 OPT_INTERACTIVE,
1084 OPT_FORK,
1085 OPT_NO_PROCESS_GROUP,
1086 OPT_LOG_STDOUT
1088 struct poptOption long_options[] = {
1089 POPT_AUTOHELP
1090 {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
1091 {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)"},
1092 {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools, etc.)" },
1093 {"no-process-group", '\0', POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
1094 {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
1095 {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
1096 {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
1097 {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
1098 POPT_COMMON_SAMBA
1099 POPT_COMMON_DYNCONFIG
1100 POPT_TABLEEND
1102 TALLOC_CTX *frame = talloc_stackframe(); /* Setup tos. */
1104 TimeInit();
1106 db_tdb2_setup_messaging(NULL, false);
1108 #ifdef HAVE_SET_AUTH_PARAMETERS
1109 set_auth_parameters(argc,argv);
1110 #endif
1112 pc = poptGetContext("smbd", argc, argv, long_options, 0);
1113 while((opt = poptGetNextOpt(pc)) != -1) {
1114 switch (opt) {
1115 case OPT_DAEMON:
1116 is_daemon = true;
1117 break;
1118 case OPT_INTERACTIVE:
1119 interactive = true;
1120 break;
1121 case OPT_FORK:
1122 Fork = false;
1123 break;
1124 case OPT_NO_PROCESS_GROUP:
1125 no_process_group = true;
1126 break;
1127 case OPT_LOG_STDOUT:
1128 log_stdout = true;
1129 break;
1130 case 'b':
1131 print_build_options = True;
1132 break;
1133 default:
1134 d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1135 poptBadOption(pc, 0), poptStrerror(opt));
1136 poptPrintUsage(pc, stderr, 0);
1137 exit(1);
1140 poptFreeContext(pc);
1142 if (interactive) {
1143 Fork = False;
1144 log_stdout = True;
1147 setup_logging(argv[0],log_stdout);
1149 if (print_build_options) {
1150 build_options(True); /* Display output to screen as well as debug */
1151 exit(0);
1154 load_case_tables();
1156 #ifdef HAVE_SETLUID
1157 /* needed for SecureWare on SCO */
1158 setluid(0);
1159 #endif
1161 sec_init();
1163 set_remote_machine_name("smbd", False);
1165 if (interactive && (DEBUGLEVEL >= 9)) {
1166 talloc_enable_leak_report();
1169 if (log_stdout && Fork) {
1170 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
1171 exit(1);
1174 /* we want to re-seed early to prevent time delays causing
1175 client problems at a later date. (tridge) */
1176 generate_random_buffer(NULL, 0);
1178 /* make absolutely sure we run as root - to handle cases where people
1179 are crazy enough to have it setuid */
1181 gain_root_privilege();
1182 gain_root_group_privilege();
1184 fault_setup((void (*)(void *))exit_server_fault);
1185 dump_core_setup("smbd");
1187 CatchSignal(SIGTERM , SIGNAL_CAST sig_term);
1188 CatchSignal(SIGHUP,SIGNAL_CAST sig_hup);
1190 /* we are never interested in SIGPIPE */
1191 BlockSignals(True,SIGPIPE);
1193 #if defined(SIGFPE)
1194 /* we are never interested in SIGFPE */
1195 BlockSignals(True,SIGFPE);
1196 #endif
1198 #if defined(SIGUSR2)
1199 /* We are no longer interested in USR2 */
1200 BlockSignals(True,SIGUSR2);
1201 #endif
1203 /* POSIX demands that signals are inherited. If the invoking process has
1204 * these signals masked, we will have problems, as we won't recieve them. */
1205 BlockSignals(False, SIGHUP);
1206 BlockSignals(False, SIGUSR1);
1207 BlockSignals(False, SIGTERM);
1209 /* Ensure we leave no zombies until we
1210 * correctly set up child handling below. */
1211 CatchChild();
1213 /* we want total control over the permissions on created files,
1214 so set our umask to 0 */
1215 umask(0);
1217 init_sec_ctx();
1219 reopen_logs();
1221 DEBUG(0,("smbd version %s started.\n", SAMBA_VERSION_STRING));
1222 DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1224 DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1225 (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1227 /* Output the build options to the debug log */
1228 build_options(False);
1230 if (sizeof(uint16) < 2 || sizeof(uint32) < 4) {
1231 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
1232 exit(1);
1235 if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1236 DEBUG(0, ("error opening config file\n"));
1237 exit(1);
1240 if (smbd_messaging_context() == NULL)
1241 exit(1);
1244 * Do this before reload_services.
1246 db_tdb2_setup_messaging(smbd_messaging_context(), true);
1248 if (!reload_services(False))
1249 return(-1);
1251 init_structs();
1253 #ifdef WITH_PROFILE
1254 if (!profile_setup(smbd_messaging_context(), False)) {
1255 DEBUG(0,("ERROR: failed to setup profiling\n"));
1256 return -1;
1258 if (profile_level != NULL) {
1259 int pl = atoi(profile_level);
1260 struct server_id src;
1262 DEBUG(1, ("setting profiling level: %s\n",profile_level));
1263 src.pid = getpid();
1264 set_profile_level(pl, src);
1266 #endif
1268 DEBUG(3,( "loaded services\n"));
1270 if (!is_daemon && !is_a_socket(0)) {
1271 if (!interactive)
1272 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
1275 * Setting is_daemon here prevents us from eventually calling
1276 * the open_sockets_inetd()
1279 is_daemon = True;
1282 if (is_daemon && !interactive) {
1283 DEBUG( 3, ( "Becoming a daemon.\n" ) );
1284 become_daemon(Fork, no_process_group);
1287 #if HAVE_SETPGID
1289 * If we're interactive we want to set our own process group for
1290 * signal management.
1292 if (interactive && !no_process_group)
1293 setpgid( (pid_t)0, (pid_t)0);
1294 #endif
1296 if (!directory_exist(lp_lockdir(), NULL))
1297 mkdir(lp_lockdir(), 0755);
1299 if (is_daemon)
1300 pidfile_create("smbd");
1302 if (!reinit_after_fork(smbd_messaging_context(),
1303 smbd_event_context(), false)) {
1304 DEBUG(0,("reinit_after_fork() failed\n"));
1305 exit(1);
1308 /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1310 if (smbd_memcache() == NULL) {
1311 exit(1);
1314 memcache_set_global(smbd_memcache());
1316 /* Initialise the password backed before the global_sam_sid
1317 to ensure that we fetch from ldap before we make a domain sid up */
1319 if(!initialize_password_db(False, smbd_event_context()))
1320 exit(1);
1322 if (!secrets_init()) {
1323 DEBUG(0, ("ERROR: smbd can not open secrets.tdb\n"));
1324 exit(1);
1327 if(!get_global_sam_sid()) {
1328 DEBUG(0,("ERROR: Samba cannot create a SAM SID.\n"));
1329 exit(1);
1332 if (!session_init())
1333 exit(1);
1335 if (!connections_init(True))
1336 exit(1);
1338 if (!locking_init())
1339 exit(1);
1341 namecache_enable();
1343 if (!W_ERROR_IS_OK(registry_init_full()))
1344 exit(1);
1346 #if 0
1347 if (!init_svcctl_db())
1348 exit(1);
1349 #endif
1351 if (!print_backend_init(smbd_messaging_context()))
1352 exit(1);
1354 if (!init_guest_info()) {
1355 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1356 return -1;
1359 /* only start the background queue daemon if we are
1360 running as a daemon -- bad things will happen if
1361 smbd is launched via inetd and we fork a copy of
1362 ourselves here */
1364 if (is_daemon && !interactive
1365 && lp_parm_bool(-1, "smbd", "backgroundqueue", true)) {
1366 start_background_queue();
1369 if (!open_sockets_smbd(is_daemon, interactive, ports))
1370 exit(1);
1373 * everything after this point is run after the fork()
1376 static_init_rpc;
1378 init_modules();
1380 /* Possibly reload the services file. Only worth doing in
1381 * daemon mode. In inetd mode, we know we only just loaded this.
1383 if (is_daemon) {
1384 reload_services(True);
1387 if (!init_account_policy()) {
1388 DEBUG(0,("Could not open account policy tdb.\n"));
1389 exit(1);
1392 if (*lp_rootdir()) {
1393 if (sys_chroot(lp_rootdir()) != 0) {
1394 DEBUG(0,("Failed to change root to %s\n", lp_rootdir()));
1395 exit(1);
1397 if (chdir("/") == -1) {
1398 DEBUG(0,("Failed to chdir to / on chroot to %s\n", lp_rootdir()));
1399 exit(1);
1401 DEBUG(0,("Changed root to %s\n", lp_rootdir()));
1404 /* Setup oplocks */
1405 if (!init_oplocks(smbd_messaging_context()))
1406 exit(1);
1408 /* Setup aio signal handler. */
1409 initialize_async_io_handler();
1411 /* register our message handlers */
1412 messaging_register(smbd_messaging_context(), NULL,
1413 MSG_SMB_FORCE_TDIS, msg_force_tdis);
1414 messaging_register(smbd_messaging_context(), NULL,
1415 MSG_SMB_RELEASE_IP, msg_release_ip);
1416 messaging_register(smbd_messaging_context(), NULL,
1417 MSG_SMB_CLOSE_FILE, msg_close_file);
1419 if ((lp_keepalive() != 0)
1420 && !(event_add_idle(smbd_event_context(), NULL,
1421 timeval_set(lp_keepalive(), 0),
1422 "keepalive", keepalive_fn,
1423 NULL))) {
1424 DEBUG(0, ("Could not add keepalive event\n"));
1425 exit(1);
1428 if (!(event_add_idle(smbd_event_context(), NULL,
1429 timeval_set(IDLE_CLOSED_TIMEOUT, 0),
1430 "deadtime", deadtime_fn, NULL))) {
1431 DEBUG(0, ("Could not add deadtime event\n"));
1432 exit(1);
1435 #ifdef CLUSTER_SUPPORT
1437 if (lp_clustering()) {
1439 * We need to tell ctdb about our client's TCP
1440 * connection, so that for failover ctdbd can send
1441 * tickle acks, triggering a reconnection by the
1442 * client.
1445 struct sockaddr_in srv, clnt;
1447 if (client_get_tcp_info(&srv, &clnt) == 0) {
1449 NTSTATUS status;
1451 status = ctdbd_register_ips(
1452 messaging_ctdbd_connection(),
1453 &srv, &clnt, release_ip, NULL);
1455 if (!NT_STATUS_IS_OK(status)) {
1456 DEBUG(0, ("ctdbd_register_ips failed: %s\n",
1457 nt_errstr(status)));
1459 } else
1461 DEBUG(0,("Unable to get tcp info for "
1462 "CTDB_CONTROL_TCP_CLIENT: %s\n",
1463 strerror(errno)));
1467 #endif
1469 TALLOC_FREE(frame);
1471 smbd_process();
1473 namecache_shutdown();
1475 exit_server_cleanly(NULL);
1476 return(0);