?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Fix bug #6476 - more then 3000 smbd-zombies in memory
[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
9
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.
14
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.
19
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/>.
22 */
23
24 #include "includes.h"
25
26 static_decl_rpc;
27
28 static int am_parent = 1;
29
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;
34
35 #ifdef WITH_DFS
36 extern int dcelogin_atmost_once;
37 #endif /* WITH_DFS */
38
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 :(
41
42 the following 2 functions are an alternative - they make the file
43 descriptor private to smbd
44 */
45 static int server_fd = -1;
46
47 int smbd_server_fd(void)
48 {
49 return server_fd;
50 }
51
52 static void smbd_set_server_fd(int fd)
53 {
54 server_fd = fd;
55 }
56
57 int get_client_fd(void)
58 {
59 return server_fd;
60 }
61
62 int client_get_tcp_info(struct sockaddr_in *server, struct sockaddr_in *client)
63 {
64 socklen_t length;
65 if (server_fd == -1) {
66 return -1;
67 }
68 length = sizeof(*server);
69 if (getsockname(server_fd, (struct sockaddr *)server, &length) != 0) {
70 return -1;
71 }
72 length = sizeof(*client);
73 if (getpeername(server_fd, (struct sockaddr *)client, &length) != 0) {
74 return -1;
75 }
76 return 0;
77 }
78
79 struct event_context *smbd_event_context(void)
80 {
81 static struct event_context *ctx;
82
83 if (!ctx && !(ctx = event_context_init(NULL))) {
84 smb_panic("Could not init smbd event context");
85 }
86 return ctx;
87 }
88
89 struct messaging_context *smbd_messaging_context(void)
90 {
91 static struct messaging_context *ctx;
92
93 if (!ctx && !(ctx = messaging_init(NULL, server_id_self(),
94 smbd_event_context()))) {
95 smb_panic("Could not init smbd messaging context");
96 }
97 return ctx;
98 }
99
100 struct memcache *smbd_memcache(void)
101 {
102 static struct memcache *cache;
103
104 if (!cache
105 && !(cache = memcache_init(NULL,
106 lp_max_stat_cache_size()*1024))) {
107
108 smb_panic("Could not init smbd memcache");
109 }
110 return cache;
111 }
112
113 /*******************************************************************
114 What to do when smb.conf is updated.
115 ********************************************************************/
116
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)
122 {
123 DEBUG(10,("smb_conf_updated: Got message saying smb.conf was "
124 "updated. Reloading.\n"));
125 reload_services(False);
126 }
127
128
129 /*******************************************************************
130 Delete a statcache entry.
131 ********************************************************************/
132
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)
138 {
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);
142 }
143
144 /****************************************************************************
145 Terminate signal.
146 ****************************************************************************/
147
148 static void sig_term(void)
149 {
150 got_sig_term = 1;
151 sys_select_signal(SIGTERM);
152 }
153
154 /****************************************************************************
155 Catch a sighup.
156 ****************************************************************************/
157
158 static void sig_hup(int sig)
159 {
160 reload_after_sighup = 1;
161 sys_select_signal(SIGHUP);
162 }
163
164 /****************************************************************************
165 Catch a sigcld
166 ****************************************************************************/
167 static void sig_cld(int sig)
168 {
169 got_sig_cld = 1;
170 sys_select_signal(SIGCLD);
171 }
172
173 /****************************************************************************
174 Send a SIGTERM to our process group.
175 *****************************************************************************/
176
177 static void killkids(void)
178 {
179 if(am_parent) kill(0,SIGTERM);
180 }
181
182 /****************************************************************************
183 Process a sam sync message - not sure whether to do this here or
184 somewhere else.
185 ****************************************************************************/
186
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)
192 {
193 DEBUG(10, ("** sam sync message received, ignoring\n"));
194 }
195
196
197 /****************************************************************************
198 Open the socket communication - inetd.
199 ****************************************************************************/
200
201 static bool open_sockets_inetd(void)
202 {
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));
207
208 /* close our standard file descriptors */
209 close_low_fds(False); /* Don't close stderr */
210
211 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
212 set_socket_options(smbd_server_fd(), lp_socket_options());
213
214 return True;
215 }
216
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)
222 {
223 DEBUG(3, ("got a SHUTDOWN message\n"));
224 exit_server_cleanly(NULL);
225 }
226
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)
233 {
234 int sig;
235
236 if (data->length != sizeof(sig)) {
237
238 DEBUG(0, ("Process %s sent bogus signal injection request\n",
239 procid_str_static(&src)));
240 return;
241 }
242
243 sig = *(int *)data->data;
244 if (sig == -1) {
245 exit_server("internal error injected");
246 return;
247 }
248
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
256
257 kill(sys_getpid(), sig);
258 }
259 #endif /* DEVELOPER */
260
261 struct child_pid {
262 struct child_pid *prev, *next;
263 pid_t pid;
264 };
265
266 static struct child_pid *children;
267 static int num_children;
268
269 static void add_child_pid(pid_t pid)
270 {
271 struct child_pid *child;
272
273 if (lp_max_smbd_processes() == 0) {
274 /* Don't bother with the child list if we don't care anyway */
275 return;
276 }
277
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;
282 }
283 child->pid = pid;
284 DLIST_ADD(children, child);
285 num_children += 1;
286 }
287
288 static void remove_child_pid(pid_t pid, bool unclean_shutdown)
289 {
290 struct child_pid *child;
291
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
295 */
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);
300 }
301
302 if (lp_max_smbd_processes() == 0) {
303 /* Don't bother with the child list if we don't care anyway */
304 return;
305 }
306
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;
314 }
315 }
316
317 DEBUG(0, ("Could not find child %d -- ignoring\n", (int)pid));
318 }
319
320 /****************************************************************************
321 Have we reached the process limit ?
322 ****************************************************************************/
323
324 static bool allowable_number_of_smbd_processes(void)
325 {
326 int max_processes = lp_max_smbd_processes();
327
328 if (!max_processes)
329 return True;
330
331 return num_children < max_processes;
332 }
333
334 /****************************************************************************
335 Open the socket communication.
336 ****************************************************************************/
337
338 static bool open_sockets_smbd(bool is_daemon, bool interactive, const char *smb_ports)
339 {
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;
350
351 #ifdef HAVE_ATEXIT
352 {
353 static int atexit_set;
354 if(atexit_set == 0) {
355 atexit_set=1;
356 atexit(killkids);
357 }
358 }
359 #endif
360
361 if (!is_daemon) {
362 /*
363 * Stop zombies the old way.
364 * We aren't forking any new
365 * 'normal' connections when
366 * run from [x]inetd.
367 */
368 CatchChild();
369 return open_sockets_inetd();
370 }
371
372 /* Stop zombies */
373 CatchSignal(SIGCLD, sig_cld);
374
375 FD_ZERO(&listen_set);
376
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);
384 }
385 } else {
386 ports = smb_xstrdup(smb_ports);
387 }
388
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.
393 */
394
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;
403
404 if (ifss == NULL) {
405 DEBUG(0,("open_sockets_smbd: "
406 "interface %d has NULL IP address !\n",
407 i));
408 continue;
409 }
410
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;
417 }
418
419 /* Keep the first port for mDNS service
420 * registration.
421 */
422 if (dns_port == 0) {
423 dns_port = port;
424 }
425
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;
434 }
435
436 /* ready to listen */
437 set_socket_options(s,"SO_KEEPALIVE");
438 set_socket_options(s,lp_socket_options());
439
440 /* Set server socket to
441 * non-blocking for the accept. */
442 set_blocking(s,False);
443
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;
450 }
451 FD_SET(s,&listen_set);
452 maxfd = MAX( maxfd, s);
453
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;
460 }
461 }
462 TALLOC_FREE(frame);
463 }
464 } else {
465 /* Just bind to 0.0.0.0 - accept connections
466 from anywhere. */
467
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;
474
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
482 }
483
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;
488
489 unsigned port = atoi(tok);
490 if (port == 0 || port > 0xffff) {
491 continue;
492 }
493
494 /* Keep the first port for mDNS service
495 * registration.
496 */
497 if (dns_port == 0) {
498 dns_port = port;
499 }
500
501 /* open an incoming socket */
502 if (!interpret_string_addr(&ss, sock_tok,
503 AI_NUMERICHOST|AI_PASSIVE)) {
504 continue;
505 }
506
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;
514 }
515
516 /* ready to listen */
517 set_socket_options(s,"SO_KEEPALIVE");
518 set_socket_options(s,lp_socket_options());
519
520 /* Set server socket to non-blocking
521 * for the accept. */
522 set_blocking(s,False);
523
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;
531 }
532
533 fd_listenset[num_sockets] = s;
534 FD_SET(s,&listen_set);
535 maxfd = MAX( maxfd, s);
536
537 num_sockets++;
538
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;
544 }
545 }
546 }
547 TALLOC_FREE(frame);
548 }
549
550 SAFE_FREE(ports);
551
552 if (num_sockets == 0) {
553 DEBUG(0,("open_sockets_smbd: No "
554 "sockets available to bind to.\n"));
555 return false;
556 }
557
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);
565
566 /* Listen to messages */
567
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());
579
580 #ifdef DEVELOPER
581 messaging_register(smbd_messaging_context(), NULL,
582 MSG_SMB_INJECT_FAULT, msg_inject_fault);
583 #endif
584
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;
592
593 /* Ensure we respond to PING and DEBUG messages from the main smbd. */
594 message_dispatch(smbd_messaging_context());
595
596 if (got_sig_cld) {
597 pid_t pid;
598 int status;
599
600 got_sig_cld = False;
601
602 while ((pid = sys_waitpid(-1, &status, WNOHANG)) > 0) {
603 bool unclean_shutdown = False;
604
605 /* If the child terminated normally, assume
606 it was an unclean shutdown unless the
607 status is 0
608 */
609 if (WIFEXITED(status)) {
610 unclean_shutdown = WEXITSTATUS(status);
611 }
612 /* If the child terminated due to a signal
613 we always assume it was unclean.
614 */
615 if (WIFSIGNALED(status)) {
616 unclean_shutdown = True;
617 }
618 remove_child_pid(pid, unclean_shutdown);
619 }
620 }
621
622 idle_timeout = timeval_zero();
623
624 memcpy((char *)&r_fds, (char *)&listen_set,
625 sizeof(listen_set));
626 FD_ZERO(&w_fds);
627 GetTimeOfDay(&now);
628
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);
633 }
634
635 event_add_to_select_args(smbd_event_context(), &now,
636 &r_fds, &w_fds, &idle_timeout,
637 &maxfd);
638
639 num = sys_select(maxfd+1,&r_fds,&w_fds,NULL,
640 timeval_is_zero(&idle_timeout) ?
641 NULL : &idle_timeout);
642
643 if (num == -1 && errno == EINTR) {
644 if (got_sig_term) {
645 exit_server_cleanly(NULL);
646 }
647
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;
654 }
655
656 continue;
657 }
658
659
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.
663 */
664 if (num == 0 && count_all_current_connections() == 0) {
665 exit_server_cleanly("idle timeout");
666 }
667
668 /* process pending nDNS responses */
669 if (dns_register_smbd_reply(dns_reg, &r_fds, &idle_timeout)) {
670 --num;
671 }
672
673 if (run_events(smbd_event_context(), num, &r_fds, &w_fds)) {
674 continue;
675 }
676
677 /* check if we need to reload services */
678 check_reload(time(NULL));
679
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;
686
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;
695 }
696 }
697
698 smbd_set_server_fd(accept(s,&addr,&in_addrlen));
699
700 if (smbd_server_fd() == -1 && errno == EINTR)
701 continue;
702
703 if (smbd_server_fd() == -1) {
704 DEBUG(2,("open_sockets_smbd: accept: %s\n",
705 strerror(errno)));
706 continue;
707 }
708
709 /* Ensure child is set to blocking mode */
710 set_blocking(smbd_server_fd(),True);
711
712 if (smbd_server_fd() != -1 && interactive)
713 return True;
714
715 if (allowable_number_of_smbd_processes() &&
716 smbd_server_fd() != -1 &&
717 ((child = sys_fork())==0)) {
718 char remaddr[INET6_ADDRSTRLEN];
719
720 /* Child code ... */
721
722 /* Stop zombies, the parent explicitly handles
723 * them, counting worker smbds. */
724 CatchChild();
725
726 /* close the listening socket(s) */
727 for(i = 0; i < num_sockets; i++)
728 close(fd_listenset[i]);
729
730 /* close our mDNS daemon handle */
731 dns_register_close(&dns_reg);
732
733 /* close our standard file
734 descriptors */
735 close_low_fds(False);
736 am_parent = 0;
737
738 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
739 set_socket_options(smbd_server_fd(),
740 lp_socket_options());
741
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);
748
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");
755 }
756
757 return True;
758 }
759 /* The parent doesn't need this socket */
760 close(smbd_server_fd());
761
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.
768 */
769
770 smbd_set_server_fd(-1);
771
772 if (child != 0) {
773 add_child_pid(child);
774 }
775
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();
791
792 } /* end for num */
793 } /* end while 1 */
794
795 /* NOTREACHED return True; */
796 }
797
798 /****************************************************************************
799 Reload printers
800 **************************************************************************/
801 void reload_printers(void)
802 {
803 int snum;
804 int n_services = lp_numservices();
805 int pnum = lp_servicenumber(PRINTERS_NAME);
806 const char *pname;
807
808 pcap_cache_reload();
809
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;
816
817 pname = lp_printername(snum);
818 if (!pcap_printername_ok(pname)) {
819 DEBUG(3, ("removing stale printer %s\n", pname));
820
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);
825 }
826 }
827
828 load_printers();
829 }
830
831 /****************************************************************************
832 Reload the services file.
833 **************************************************************************/
834
835 bool reload_services(bool test)
836 {
837 bool ret;
838
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;
845 }
846 }
847
848 reopen_logs();
849
850 if (test && !lp_file_list_changed())
851 return(True);
852
853 lp_killunused(conn_snum_used);
854
855 ret = lp_load(get_dyn_CONFIGFILE(), False, False, True, True);
856
857 reload_printers();
858
859 /* perhaps the config filename is now set */
860 if (!test)
861 reload_services(True);
862
863 reopen_logs();
864
865 load_interfaces();
866
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());
870 }
871
872 mangle_reset_cache();
873 reset_stat_cache();
874
875 /* this forces service parameters to be flushed */
876 set_current_service(NULL,0,True);
877
878 return(ret);
879 }
880
881 /****************************************************************************
882 Exit the server.
883 ****************************************************************************/
884
885 /* Reasons for shutting down a server process. */
886 enum server_exit_reason { SERVER_EXIT_NORMAL, SERVER_EXIT_ABNORMAL };
887
888 static void exit_server_common(enum server_exit_reason how,
889 const char *const reason) NORETURN_ATTRIBUTE;
890
891 static void exit_server_common(enum server_exit_reason how,
892 const char *const reason)
893 {
894 static int firsttime=1;
895
896 if (!firsttime)
897 exit(0);
898 firsttime = 0;
899
900 change_to_root_user();
901
902 if (negprot_global_auth_context) {
903 (negprot_global_auth_context->free)(&negprot_global_auth_context);
904 }
905
906 conn_close_all();
907
908 invalidate_all_vuids();
909
910 /* 3 second timeout. */
911 print_notify_send_messages(smbd_messaging_context(), 3);
912
913 /* delete our entry in the connections database. */
914 yield_connection(NULL,"");
915
916 respond_to_all_remaining_local_messages();
917
918 #ifdef WITH_DFS
919 if (dcelogin_atmost_once) {
920 dfs_unlogin();
921 }
922 #endif
923
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"));
929 }
930 }
931 #endif
932
933 locking_end();
934 printing_end();
935
936 if (how != SERVER_EXIT_NORMAL) {
937 int oldlevel = DEBUGLEVEL;
938
939 DEBUGLEVEL = 10;
940
941 DEBUGSEP(0);
942 DEBUG(0,("Abnormal server exit: %s\n",
943 reason ? reason : "no explanation provided"));
944 DEBUGSEP(0);
945
946 log_stack_trace();
947
948 DEBUGLEVEL = oldlevel;
949 dump_core();
950
951 } else {
952 DEBUG(3,("Server exit (%s)\n",
953 (reason ? reason : "normal exit")));
954 }
955
956 exit(0);
957 }
958
959 void exit_server(const char *const explanation)
960 {
961 exit_server_common(SERVER_EXIT_ABNORMAL, explanation);
962 }
963
964 void exit_server_cleanly(const char *const explanation)
965 {
966 exit_server_common(SERVER_EXIT_NORMAL, explanation);
967 }
968
969 void exit_server_fault(void)
970 {
971 exit_server("critical server fault");
972 }
973
974
975 /****************************************************************************
976 received when we should release a specific IP
977 ****************************************************************************/
978 static void release_ip(const char *ip, void *priv)
979 {
980 char addr[INET6_ADDRSTRLEN];
981
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);
991 }
992 }
993
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)
996 {
997 release_ip((char *)data->data, NULL);
998 }
999
1000 /****************************************************************************
1001 Initialise connect, service and file structs.
1002 ****************************************************************************/
1003
1004 static bool init_structs(void )
1005 {
1006 /*
1007 * Set the machine NETBIOS name if not already
1008 * set from the config file.
1009 */
1010
1011 if (!init_names())
1012 return False;
1013
1014 conn_init();
1015
1016 file_init();
1017
1018 /* for RPC pipes */
1019 init_rpc_pipe_hnd();
1020
1021 init_dptrs();
1022
1023 if (!secrets_init())
1024 return False;
1025
1026 return True;
1027 }
1028
1029 /*
1030 * Send keepalive packets to our client
1031 */
1032 static bool keepalive_fn(const struct timeval *now, void *private_data)
1033 {
1034 if (!send_keepalive(smbd_server_fd())) {
1035 DEBUG( 2, ( "Keepalive failed - exiting.\n" ) );
1036 return False;
1037 }
1038 return True;
1039 }
1040
1041 /*
1042 * Do the recurring check if we're idle
1043 */
1044 static bool deadtime_fn(const struct timeval *now, void *private_data)
1045 {
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;
1052 }
1053
1054 return True;
1055 }
1056
1057
1058 /****************************************************************************
1059 main program.
1060 ****************************************************************************/
1061
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. */
1065
1066 extern void build_options(bool screen);
1067
1068 int main(int argc,const char *argv[])
1069 {
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
1087 };
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
1101 };
1102 TALLOC_CTX *frame = talloc_stackframe(); /* Setup tos. */
1103
1104 TimeInit();
1105
1106 db_tdb2_setup_messaging(NULL, false);
1107
1108 #ifdef HAVE_SET_AUTH_PARAMETERS
1109 set_auth_parameters(argc,argv);
1110 #endif
1111
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);
1138 }
1139 }
1140 poptFreeContext(pc);
1141
1142 if (interactive) {
1143 Fork = False;
1144 log_stdout = True;
1145 }
1146
1147 setup_logging(argv[0],log_stdout);
1148
1149 if (print_build_options) {
1150 build_options(True); /* Display output to screen as well as debug */
1151 exit(0);
1152 }
1153
1154 load_case_tables();
1155
1156 #ifdef HAVE_SETLUID
1157 /* needed for SecureWare on SCO */
1158 setluid(0);
1159 #endif
1160
1161 sec_init();
1162
1163 set_remote_machine_name("smbd", False);
1164
1165 if (interactive && (DEBUGLEVEL >= 9)) {
1166 talloc_enable_leak_report();
1167 }
1168
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);
1172 }
1173
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);
1177
1178 /* make absolutely sure we run as root - to handle cases where people
1179 are crazy enough to have it setuid */
1180
1181 gain_root_privilege();
1182 gain_root_group_privilege();
1183
1184 fault_setup((void (*)(void *))exit_server_fault);
1185 dump_core_setup("smbd");
1186
1187 CatchSignal(SIGTERM , SIGNAL_CAST sig_term);
1188 CatchSignal(SIGHUP,SIGNAL_CAST sig_hup);
1189
1190 /* we are never interested in SIGPIPE */
1191 BlockSignals(True,SIGPIPE);
1192
1193 #if defined(SIGFPE)
1194 /* we are never interested in SIGFPE */
1195 BlockSignals(True,SIGFPE);
1196 #endif
1197
1198 #if defined(SIGUSR2)
1199 /* We are no longer interested in USR2 */
1200 BlockSignals(True,SIGUSR2);
1201 #endif
1202
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);
1208
1209 /* Ensure we leave no zombies until we
1210 * correctly set up child handling below. */
1211 CatchChild();
1212
1213 /* we want total control over the permissions on created files,
1214 so set our umask to 0 */
1215 umask(0);
1216
1217 init_sec_ctx();
1218
1219 reopen_logs();
1220
1221 DEBUG(0,("smbd version %s started.\n", SAMBA_VERSION_STRING));
1222 DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1223
1224 DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1225 (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1226
1227 /* Output the build options to the debug log */
1228 build_options(False);
1229
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);
1233 }
1234
1235 if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1236 DEBUG(0, ("error opening config file\n"));
1237 exit(1);
1238 }
1239
1240 if (smbd_messaging_context() == NULL)
1241 exit(1);
1242
1243 /*
1244 * Do this before reload_services.
1245 */
1246 db_tdb2_setup_messaging(smbd_messaging_context(), true);
1247
1248 if (!reload_services(False))
1249 return(-1);
1250
1251 init_structs();
1252
1253 #ifdef WITH_PROFILE
1254 if (!profile_setup(smbd_messaging_context(), False)) {
1255 DEBUG(0,("ERROR: failed to setup profiling\n"));
1256 return -1;
1257 }
1258 if (profile_level != NULL) {
1259 int pl = atoi(profile_level);
1260 struct server_id src;
1261
1262 DEBUG(1, ("setting profiling level: %s\n",profile_level));
1263 src.pid = getpid();
1264 set_profile_level(pl, src);
1265 }
1266 #endif
1267
1268 DEBUG(3,( "loaded services\n"));
1269
1270 if (!is_daemon && !is_a_socket(0)) {
1271 if (!interactive)
1272 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
1273
1274 /*
1275 * Setting is_daemon here prevents us from eventually calling
1276 * the open_sockets_inetd()
1277 */
1278
1279 is_daemon = True;
1280 }
1281
1282 if (is_daemon && !interactive) {
1283 DEBUG( 3, ( "Becoming a daemon.\n" ) );
1284 become_daemon(Fork, no_process_group);
1285 }
1286
1287 #if HAVE_SETPGID
1288 /*
1289 * If we're interactive we want to set our own process group for
1290 * signal management.
1291 */
1292 if (interactive && !no_process_group)
1293 setpgid( (pid_t)0, (pid_t)0);
1294 #endif
1295
1296 if (!directory_exist(lp_lockdir(), NULL))
1297 mkdir(lp_lockdir(), 0755);
1298
1299 if (is_daemon)
1300 pidfile_create("smbd");
1301
1302 if (!reinit_after_fork(smbd_messaging_context(),
1303 smbd_event_context(), false)) {
1304 DEBUG(0,("reinit_after_fork() failed\n"));
1305 exit(1);
1306 }
1307
1308 /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1309
1310 if (smbd_memcache() == NULL) {
1311 exit(1);
1312 }
1313
1314 memcache_set_global(smbd_memcache());
1315
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 */
1318
1319 if(!initialize_password_db(False, smbd_event_context()))
1320 exit(1);
1321
1322 if (!secrets_init()) {
1323 DEBUG(0, ("ERROR: smbd can not open secrets.tdb\n"));
1324 exit(1);
1325 }
1326
1327 if(!get_global_sam_sid()) {
1328 DEBUG(0,("ERROR: Samba cannot create a SAM SID.\n"));
1329 exit(1);
1330 }
1331
1332 if (!session_init())
1333 exit(1);
1334
1335 if (!connections_init(True))
1336 exit(1);
1337
1338 if (!locking_init())
1339 exit(1);
1340
1341 namecache_enable();
1342
1343 if (!W_ERROR_IS_OK(registry_init_full()))
1344 exit(1);
1345
1346 #if 0
1347 if (!init_svcctl_db())
1348 exit(1);
1349 #endif
1350
1351 if (!print_backend_init(smbd_messaging_context()))
1352 exit(1);
1353
1354 if (!init_guest_info()) {
1355 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1356 return -1;
1357 }
1358
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 */
1363
1364 if (is_daemon && !interactive
1365 && lp_parm_bool(-1, "smbd", "backgroundqueue", true)) {
1366 start_background_queue();
1367 }
1368
1369 if (!open_sockets_smbd(is_daemon, interactive, ports))
1370 exit(1);
1371
1372 /*
1373 * everything after this point is run after the fork()
1374 */
1375
1376 static_init_rpc;
1377
1378 init_modules();
1379
1380 /* Possibly reload the services file. Only worth doing in
1381 * daemon mode. In inetd mode, we know we only just loaded this.
1382 */
1383 if (is_daemon) {
1384 reload_services(True);
1385 }
1386
1387 if (!init_account_policy()) {
1388 DEBUG(0,("Could not open account policy tdb.\n"));
1389 exit(1);
1390 }
1391
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);
1396 }
1397 if (chdir("/") == -1) {
1398 DEBUG(0,("Failed to chdir to / on chroot to %s\n", lp_rootdir()));
1399 exit(1);
1400 }
1401 DEBUG(0,("Changed root to %s\n", lp_rootdir()));
1402 }
1403
1404 /* Setup oplocks */
1405 if (!init_oplocks(smbd_messaging_context()))
1406 exit(1);
1407
1408 /* Setup aio signal handler. */
1409 initialize_async_io_handler();
1410
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);
1418
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);
1426 }
1427
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);
1433 }
1434
1435 #ifdef CLUSTER_SUPPORT
1436
1437 if (lp_clustering()) {
1438 /*
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.
1443 */
1444
1445 struct sockaddr_in srv, clnt;
1446
1447 if (client_get_tcp_info(&srv, &clnt) == 0) {
1448
1449 NTSTATUS status;
1450
1451 status = ctdbd_register_ips(
1452 messaging_ctdbd_connection(),
1453 &srv, &clnt, release_ip, NULL);
1454
1455 if (!NT_STATUS_IS_OK(status)) {
1456 DEBUG(0, ("ctdbd_register_ips failed: %s\n",
1457 nt_errstr(status)));
1458 }
1459 } else
1460 {
1461 DEBUG(0,("Unable to get tcp info for "
1462 "CTDB_CONTROL_TCP_CLIENT: %s\n",
1463 strerror(errno)));
1464 }
1465 }
1466
1467 #endif
1468
1469 TALLOC_FREE(frame);
1470
1471 smbd_process();
1472
1473 namecache_shutdown();
1474
1475 exit_server_cleanly(NULL);
1476 return(0);
1477 }
Samba GIT mirror