r7415: * big change -- volker's new async winbindd from trunk
[Samba/gbeck.git] / source / nmbd / nmbd.c
blobaf93bf5197cad6a1f76b0c6a35c7cdb7384fe1c3
1 /*
2 Unix SMB/CIFS implementation.
3 NBT netbios routines and daemon - version 2
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Jeremy Allison 1997-2002
6 Copyright (C) Jelmer Vernooij 2002,2003 (Conversion to popt)
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include "includes.h"
26 int ClientNMB = -1;
27 int ClientDGRAM = -1;
28 int global_nmb_port = -1;
30 extern BOOL rescan_listen_set;
31 extern struct in_addr loopback_ip;
32 extern BOOL global_in_nmbd;
34 extern BOOL override_logfile;
36 /* are we running as a daemon ? */
37 static BOOL is_daemon;
39 /* fork or run in foreground ? */
40 static BOOL Fork = True;
42 /* log to standard output ? */
43 static BOOL log_stdout;
45 /* have we found LanMan clients yet? */
46 BOOL found_lm_clients = False;
48 /* what server type are we currently */
50 time_t StartupTime = 0;
52 /**************************************************************************** **
53 Handle a SIGTERM in band.
54 **************************************************************************** */
56 static void terminate(void)
58 DEBUG(0,("Got SIGTERM: going down...\n"));
60 /* Write out wins.dat file if samba is a WINS server */
61 wins_write_database(False);
63 /* Remove all SELF registered names from WINS */
64 release_wins_names();
66 /* Announce all server entries as 0 time-to-live, 0 type. */
67 announce_my_servers_removed();
69 /* If there was an async dns child - kill it. */
70 kill_async_dns_child();
72 exit(0);
75 /**************************************************************************** **
76 Handle a SHUTDOWN message from smbcontrol.
77 **************************************************************************** */
79 static void nmbd_terminate(int msg_type, pid_t src, void *buf, size_t len)
81 terminate();
84 /**************************************************************************** **
85 Catch a SIGTERM signal.
86 **************************************************************************** */
88 static SIG_ATOMIC_T got_sig_term;
90 static void sig_term(int sig)
92 got_sig_term = 1;
93 sys_select_signal();
96 /**************************************************************************** **
97 Catch a SIGHUP signal.
98 **************************************************************************** */
100 static SIG_ATOMIC_T reload_after_sighup;
102 static void sig_hup(int sig)
104 reload_after_sighup = 1;
105 sys_select_signal();
108 #if DUMP_CORE
109 /**************************************************************************** **
110 Prepare to dump a core file - carefully!
111 **************************************************************************** */
113 static BOOL dump_core(void)
115 char *p;
116 pstring dname;
117 pstrcpy( dname, lp_logfile() );
118 if ((p=strrchr_m(dname,'/')))
119 *p=0;
120 pstrcat( dname, "/corefiles" );
121 mkdir( dname, 0700 );
122 sys_chown( dname, getuid(), getgid() );
123 chmod( dname, 0700 );
124 if ( chdir(dname) )
125 return( False );
126 umask( ~(0700) );
128 #ifdef HAVE_GETRLIMIT
129 #ifdef RLIMIT_CORE
131 struct rlimit rlp;
132 getrlimit( RLIMIT_CORE, &rlp );
133 rlp.rlim_cur = MAX( 4*1024*1024, rlp.rlim_cur );
134 setrlimit( RLIMIT_CORE, &rlp );
135 getrlimit( RLIMIT_CORE, &rlp );
136 DEBUG( 3, ( "Core limits now %d %d\n", (int)rlp.rlim_cur, (int)rlp.rlim_max ) );
138 #endif
139 #endif
142 DEBUG(0,("Dumping core in %s\n",dname));
143 abort();
144 return( True );
146 #endif
148 /**************************************************************************** **
149 Possibly continue after a fault.
150 **************************************************************************** */
152 static void fault_continue(void)
154 #if DUMP_CORE
155 dump_core();
156 #endif
159 /**************************************************************************** **
160 Expire old names from the namelist and server list.
161 **************************************************************************** */
163 static void expire_names_and_servers(time_t t)
165 static time_t lastrun = 0;
167 if ( !lastrun )
168 lastrun = t;
169 if ( t < (lastrun + 5) )
170 return;
171 lastrun = t;
174 * Expire any timed out names on all the broadcast
175 * subnets and those registered with the WINS server.
176 * (nmbd_namelistdb.c)
179 expire_names(t);
182 * Go through all the broadcast subnets and for each
183 * workgroup known on that subnet remove any expired
184 * server names. If a workgroup has an empty serverlist
185 * and has itself timed out then remove the workgroup.
186 * (nmbd_workgroupdb.c)
189 expire_workgroups_and_servers(t);
192 /************************************************************************** **
193 Reload the list of network interfaces.
194 ************************************************************************** */
196 static BOOL reload_interfaces(time_t t)
198 static time_t lastt;
199 int n;
200 struct subnet_record *subrec;
202 if (t && ((t - lastt) < NMBD_INTERFACES_RELOAD)) return False;
203 lastt = t;
205 if (!interfaces_changed()) return False;
207 /* the list of probed interfaces has changed, we may need to add/remove
208 some subnets */
209 load_interfaces();
211 /* find any interfaces that need adding */
212 for (n=iface_count() - 1; n >= 0; n--) {
213 struct interface *iface = get_interface(n);
216 * We don't want to add a loopback interface, in case
217 * someone has added 127.0.0.1 for smbd, nmbd needs to
218 * ignore it here. JRA.
221 if (ip_equal(iface->ip, loopback_ip)) {
222 DEBUG(2,("reload_interfaces: Ignoring loopback interface %s\n", inet_ntoa(iface->ip)));
223 continue;
226 for (subrec=subnetlist; subrec; subrec=subrec->next) {
227 if (ip_equal(iface->ip, subrec->myip) &&
228 ip_equal(iface->nmask, subrec->mask_ip)) break;
231 if (!subrec) {
232 /* it wasn't found! add it */
233 DEBUG(2,("Found new interface %s\n",
234 inet_ntoa(iface->ip)));
235 subrec = make_normal_subnet(iface);
236 if (subrec)
237 register_my_workgroup_one_subnet(subrec);
241 /* find any interfaces that need deleting */
242 for (subrec=subnetlist; subrec; subrec=subrec->next) {
243 for (n=iface_count() - 1; n >= 0; n--) {
244 struct interface *iface = get_interface(n);
245 if (ip_equal(iface->ip, subrec->myip) &&
246 ip_equal(iface->nmask, subrec->mask_ip)) break;
248 if (n == -1) {
249 /* oops, an interface has disapeared. This is
250 tricky, we don't dare actually free the
251 interface as it could be being used, so
252 instead we just wear the memory leak and
253 remove it from the list of interfaces without
254 freeing it */
255 DEBUG(2,("Deleting dead interface %s\n",
256 inet_ntoa(subrec->myip)));
257 close_subnet(subrec);
261 rescan_listen_set = True;
263 /* We need to shutdown if there are no subnets... */
264 if (FIRST_SUBNET == NULL) {
265 DEBUG(0,("reload_interfaces: No subnets to listen to. Shutting down...\n"));
266 return True;
268 return False;
271 /**************************************************************************** **
272 Reload the services file.
273 **************************************************************************** */
275 static BOOL reload_nmbd_services(BOOL test)
277 BOOL ret;
279 set_remote_machine_name("nmbd", False);
281 if ( lp_loaded() ) {
282 pstring fname;
283 pstrcpy( fname,lp_configfile());
284 if (file_exist(fname,NULL) && !strcsequal(fname,dyn_CONFIGFILE)) {
285 pstrcpy(dyn_CONFIGFILE,fname);
286 test = False;
290 if ( test && !lp_file_list_changed() )
291 return(True);
293 ret = lp_load( dyn_CONFIGFILE, True , False, False);
295 /* perhaps the config filename is now set */
296 if ( !test ) {
297 DEBUG( 3, ( "services not loaded\n" ) );
298 reload_nmbd_services( True );
301 return(ret);
304 /**************************************************************************** **
305 * React on 'smbcontrol nmbd reload-config' in the same way as to SIGHUP
306 * We use buf here to return BOOL result to process() when reload_interfaces()
307 * detects that there are no subnets.
308 **************************************************************************** */
310 static void msg_reload_nmbd_services(int msg_type, pid_t src, void *buf, size_t len)
312 write_browse_list( 0, True );
313 dump_all_namelists();
314 reload_nmbd_services( True );
315 reopen_logs();
317 if(buf) {
318 /* We were called from process() */
319 /* If reload_interfaces() returned True */
320 /* we need to shutdown if there are no subnets... */
321 /* pass this info back to process() */
322 *((BOOL*)buf) = reload_interfaces(0);
326 static void msg_nmbd_send_packet(int msg_type, pid_t src,
327 void *buf, size_t len)
329 struct packet_struct *p = (struct packet_struct *)buf;
330 struct subnet_record *subrec;
331 struct in_addr *local_ip;
333 DEBUG(10, ("Received send_packet from %d\n", src));
335 if (len != sizeof(struct packet_struct)) {
336 DEBUG(2, ("Discarding invalid packet length from %d\n", src));
337 return;
340 if ((p->packet_type != NMB_PACKET) &&
341 (p->packet_type != DGRAM_PACKET)) {
342 DEBUG(2, ("Discarding invalid packet type from %d: %d\n",
343 src, p->packet_type));
344 return;
347 local_ip = iface_ip(p->ip);
349 if (local_ip == NULL) {
350 DEBUG(2, ("Could not find ip for packet from %d\n", src));
351 return;
354 subrec = FIRST_SUBNET;
356 p->fd = (p->packet_type == NMB_PACKET) ?
357 subrec->nmb_sock : subrec->dgram_sock;
359 for (subrec = FIRST_SUBNET; subrec != NULL;
360 subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
361 if (ip_equal(*local_ip, subrec->myip)) {
362 p->fd = (p->packet_type == NMB_PACKET) ?
363 subrec->nmb_sock : subrec->dgram_sock;
364 break;
368 if (p->packet_type == DGRAM_PACKET) {
369 p->port = 138;
370 p->packet.dgram.header.source_ip.s_addr = local_ip->s_addr;
371 p->packet.dgram.header.source_port = 138;
374 send_packet(p);
377 /**************************************************************************** **
378 The main select loop.
379 **************************************************************************** */
381 static void process(void)
383 BOOL run_election;
384 BOOL no_subnets;
386 while( True ) {
387 time_t t = time(NULL);
389 /* Check for internal messages */
391 message_dispatch();
394 * Check all broadcast subnets to see if
395 * we need to run an election on any of them.
396 * (nmbd_elections.c)
399 run_election = check_elections();
402 * Read incoming UDP packets.
403 * (nmbd_packets.c)
406 if(listen_for_packets(run_election))
407 return;
410 * Handle termination inband.
413 if (got_sig_term) {
414 got_sig_term = 0;
415 terminate();
419 * Process all incoming packets
420 * read above. This calls the success and
421 * failure functions registered when response
422 * packets arrrive, and also deals with request
423 * packets from other sources.
424 * (nmbd_packets.c)
427 run_packet_queue();
430 * Run any elections - initiate becoming
431 * a local master browser if we have won.
432 * (nmbd_elections.c)
435 run_elections(t);
438 * Send out any broadcast announcements
439 * of our server names. This also announces
440 * the workgroup name if we are a local
441 * master browser.
442 * (nmbd_sendannounce.c)
445 announce_my_server_names(t);
448 * Send out any LanMan broadcast announcements
449 * of our server names.
450 * (nmbd_sendannounce.c)
453 announce_my_lm_server_names(t);
456 * If we are a local master browser, periodically
457 * announce ourselves to the domain master browser.
458 * This also deals with syncronising the domain master
459 * browser server lists with ourselves as a local
460 * master browser.
461 * (nmbd_sendannounce.c)
464 announce_myself_to_domain_master_browser(t);
467 * Fullfill any remote announce requests.
468 * (nmbd_sendannounce.c)
471 announce_remote(t);
474 * Fullfill any remote browse sync announce requests.
475 * (nmbd_sendannounce.c)
478 browse_sync_remote(t);
481 * Scan the broadcast subnets, and WINS client
482 * namelists and refresh any that need refreshing.
483 * (nmbd_mynames.c)
486 refresh_my_names(t);
489 * Scan the subnet namelists and server lists and
490 * expire thos that have timed out.
491 * (nmbd.c)
494 expire_names_and_servers(t);
497 * Write out a snapshot of our current browse list into
498 * the browse.dat file. This is used by smbd to service
499 * incoming NetServerEnum calls - used to synchronise
500 * browse lists over subnets.
501 * (nmbd_serverlistdb.c)
504 write_browse_list(t, False);
507 * If we are a domain master browser, we have a list of
508 * local master browsers we should synchronise browse
509 * lists with (these are added by an incoming local
510 * master browser announcement packet). Expire any of
511 * these that are no longer current, and pull the server
512 * lists from each of these known local master browsers.
513 * (nmbd_browsesync.c)
516 dmb_expire_and_sync_browser_lists(t);
519 * Check that there is a local master browser for our
520 * workgroup for all our broadcast subnets. If one
521 * is not found, start an election (which we ourselves
522 * may or may not participate in, depending on the
523 * setting of the 'local master' parameter.
524 * (nmbd_elections.c)
527 check_master_browser_exists(t);
530 * If we are configured as a logon server, attempt to
531 * register the special NetBIOS names to become such
532 * (WORKGROUP<1c> name) on all broadcast subnets and
533 * with the WINS server (if used). If we are configured
534 * to become a domain master browser, attempt to register
535 * the special NetBIOS name (WORKGROUP<1b> name) to
536 * become such.
537 * (nmbd_become_dmb.c)
540 add_domain_names(t);
543 * If we are a WINS server, do any timer dependent
544 * processing required.
545 * (nmbd_winsserver.c)
548 initiate_wins_processing(t);
551 * If we are a domain master browser, attempt to contact the
552 * WINS server to get a list of all known WORKGROUPS/DOMAINS.
553 * This will only work to a Samba WINS server.
554 * (nmbd_browsesync.c)
557 if (lp_enhanced_browsing())
558 collect_all_workgroup_names_from_wins_server(t);
561 * Go through the response record queue and time out or re-transmit
562 * and expired entries.
563 * (nmbd_packets.c)
566 retransmit_or_expire_response_records(t);
569 * check to see if any remote browse sync child processes have completed
572 sync_check_completion();
575 * regularly sync with any other DMBs we know about
578 if (lp_enhanced_browsing())
579 sync_all_dmbs(t);
582 * clear the unexpected packet queue
585 clear_unexpected(t);
588 * Reload the services file if we got a sighup.
591 if(reload_after_sighup) {
592 DEBUG( 0, ( "Got SIGHUP dumping debug info.\n" ) );
593 msg_reload_nmbd_services(MSG_SMB_CONF_UPDATED, (pid_t) 0, (void*) &no_subnets, 0);
594 if(no_subnets)
595 return;
596 reload_after_sighup = 0;
599 /* check for new network interfaces */
601 if(reload_interfaces(t))
602 return;
604 /* free up temp memory */
605 lp_talloc_free();
609 /**************************************************************************** **
610 Open the socket communication.
611 **************************************************************************** */
613 static BOOL open_sockets(BOOL isdaemon, int port)
616 * The sockets opened here will be used to receive broadcast
617 * packets *only*. Interface specific sockets are opened in
618 * make_subnet() in namedbsubnet.c. Thus we bind to the
619 * address "0.0.0.0". The parameter 'socket address' is
620 * now deprecated.
623 if ( isdaemon )
624 ClientNMB = open_socket_in(SOCK_DGRAM, port,
625 0, interpret_addr(lp_socket_address()),
626 True);
627 else
628 ClientNMB = 0;
630 ClientDGRAM = open_socket_in(SOCK_DGRAM,DGRAM_PORT,3,0,True);
632 if ( ClientNMB == -1 )
633 return( False );
635 /* we are never interested in SIGPIPE */
636 BlockSignals(True,SIGPIPE);
638 set_socket_options( ClientNMB, "SO_BROADCAST" );
639 set_socket_options( ClientDGRAM, "SO_BROADCAST" );
641 DEBUG( 3, ( "open_sockets: Broadcast sockets opened.\n" ) );
642 return( True );
645 /**************************************************************************** **
646 main program
647 **************************************************************************** */
648 int main(int argc, const char *argv[])
650 pstring logfile;
651 static BOOL opt_interactive;
652 poptContext pc;
653 int opt;
654 struct poptOption long_options[] = {
655 POPT_AUTOHELP
656 {"daemon", 'D', POPT_ARG_VAL, &is_daemon, True, "Become a daemon(default)" },
657 {"interactive", 'i', POPT_ARG_VAL, &opt_interactive, True, "Run interactive (not a daemon)" },
658 {"foreground", 'F', POPT_ARG_VAL, &Fork, False, "Run daemon in foreground (for daemontools & etc)" },
659 {"log-stdout", 'S', POPT_ARG_VAL, &log_stdout, True, "Log to stdout" },
660 {"hosts", 'H', POPT_ARG_STRING, dyn_LMHOSTSFILE, 'H', "Load a netbios hosts file"},
661 {"port", 'p', POPT_ARG_INT, &global_nmb_port, NMB_PORT, "Listen on the specified port" },
662 POPT_COMMON_SAMBA
663 { NULL }
666 global_nmb_port = NMB_PORT;
668 pc = poptGetContext("nmbd", argc, argv, long_options, 0);
669 while ((opt = poptGetNextOpt(pc)) != -1) ;
670 poptFreeContext(pc);
672 global_in_nmbd = True;
674 StartupTime = time(NULL);
676 sys_srandom(time(NULL) ^ sys_getpid());
678 if (!override_logfile) {
679 slprintf(logfile, sizeof(logfile)-1, "%s/log.nmbd", dyn_LOGFILEBASE);
680 lp_set_logfile(logfile);
683 fault_setup((void (*)(void *))fault_continue );
685 /* POSIX demands that signals are inherited. If the invoking process has
686 * these signals masked, we will have problems, as we won't receive them. */
687 BlockSignals(False, SIGHUP);
688 BlockSignals(False, SIGUSR1);
689 BlockSignals(False, SIGTERM);
691 CatchSignal( SIGHUP, SIGNAL_CAST sig_hup );
692 CatchSignal( SIGTERM, SIGNAL_CAST sig_term );
694 #if defined(SIGFPE)
695 /* we are never interested in SIGFPE */
696 BlockSignals(True,SIGFPE);
697 #endif
699 /* We no longer use USR2... */
700 #if defined(SIGUSR2)
701 BlockSignals(True, SIGUSR2);
702 #endif
704 if ( opt_interactive ) {
705 Fork = False;
706 log_stdout = True;
709 if ( log_stdout && Fork ) {
710 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
711 exit(1);
714 setup_logging( argv[0], log_stdout );
716 reopen_logs();
718 DEBUG( 0, ( "Netbios nameserver version %s started.\n", SAMBA_VERSION_STRING) );
719 DEBUGADD( 0, ( "Copyright Andrew Tridgell and the Samba Team 1994-2004\n" ) );
721 if ( !reload_nmbd_services(False) )
722 return(-1);
724 if(!init_names())
725 return -1;
727 reload_nmbd_services( True );
729 if (strequal(lp_workgroup(),"*")) {
730 DEBUG(0,("ERROR: a workgroup name of * is no longer supported\n"));
731 exit(1);
734 set_samba_nb_type();
736 if (!is_daemon && !is_a_socket(0)) {
737 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
738 is_daemon = True;
741 if (is_daemon && !opt_interactive) {
742 DEBUG( 2, ( "Becoming a daemon.\n" ) );
743 become_daemon(Fork);
746 #if HAVE_SETPGID
748 * If we're interactive we want to set our own process group for
749 * signal management.
751 if (opt_interactive)
752 setpgid( (pid_t)0, (pid_t)0 );
753 #endif
755 #ifndef SYNC_DNS
756 /* Setup the async dns. We do it here so it doesn't have all the other
757 stuff initialised and thus chewing memory and sockets */
758 if(lp_we_are_a_wins_server() && lp_dns_proxy()) {
759 start_async_dns();
761 #endif
763 if (!directory_exist(lp_lockdir(), NULL)) {
764 mkdir(lp_lockdir(), 0755);
767 pidfile_create("nmbd");
768 message_init();
769 message_register(MSG_FORCE_ELECTION, nmbd_message_election);
770 message_register(MSG_WINS_NEW_ENTRY, nmbd_wins_new_entry);
771 message_register(MSG_SHUTDOWN, nmbd_terminate);
772 message_register(MSG_SMB_CONF_UPDATED, msg_reload_nmbd_services);
773 message_register(MSG_SEND_PACKET, msg_nmbd_send_packet);
775 DEBUG( 3, ( "Opening sockets %d\n", global_nmb_port ) );
777 if ( !open_sockets( is_daemon, global_nmb_port ) ) {
778 kill_async_dns_child();
779 return 1;
782 /* Determine all the IP addresses we have. */
783 load_interfaces();
785 /* Create an nmbd subnet record for each of the above. */
786 if( False == create_subnets() ) {
787 DEBUG(0,("ERROR: Failed when creating subnet lists. Exiting.\n"));
788 kill_async_dns_child();
789 exit(1);
792 /* Load in any static local names. */
793 load_lmhosts_file(dyn_LMHOSTSFILE);
794 DEBUG(3,("Loaded hosts file %s\n", dyn_LMHOSTSFILE));
796 /* If we are acting as a WINS server, initialise data structures. */
797 if( !initialise_wins() ) {
798 DEBUG( 0, ( "nmbd: Failed when initialising WINS server.\n" ) );
799 kill_async_dns_child();
800 exit(1);
804 * Register nmbd primary workgroup and nmbd names on all
805 * the broadcast subnets, and on the WINS server (if specified).
806 * Also initiate the startup of our primary workgroup (start
807 * elections if we are setup as being able to be a local
808 * master browser.
811 if( False == register_my_workgroup_and_names() ) {
812 DEBUG(0,("ERROR: Failed when creating my my workgroup. Exiting.\n"));
813 kill_async_dns_child();
814 exit(1);
817 /* We can only take signals in the select. */
818 BlockSignals( True, SIGTERM );
820 process();
822 if (dbf)
823 x_fclose(dbf);
824 kill_async_dns_child();
825 return(0);