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.
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 */
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();
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
)
84 /**************************************************************************** **
85 Catch a SIGTERM signal.
86 **************************************************************************** */
88 static SIG_ATOMIC_T got_sig_term
;
90 static void sig_term(int sig
)
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;
109 /**************************************************************************** **
110 Prepare to dump a core file - carefully!
111 **************************************************************************** */
113 static BOOL
dump_core(void)
117 pstrcpy( dname
, lp_logfile() );
118 if ((p
=strrchr_m(dname
,'/')))
120 pstrcat( dname
, "/corefiles" );
121 mkdir( dname
, 0700 );
122 sys_chown( dname
, getuid(), getgid() );
123 chmod( dname
, 0700 );
128 #ifdef HAVE_GETRLIMIT
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
) );
142 DEBUG(0,("Dumping core in %s\n",dname
));
148 /**************************************************************************** **
149 Possibly continue after a fault.
150 **************************************************************************** */
152 static void fault_continue(void)
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;
169 if ( t
< (lastrun
+ 5) )
174 * Expire any timed out names on all the broadcast
175 * subnets and those registered with the WINS server.
176 * (nmbd_namelistdb.c)
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
)
200 struct subnet_record
*subrec
;
202 if (t
&& ((t
- lastt
) < NMBD_INTERFACES_RELOAD
)) return False
;
205 if (!interfaces_changed()) return False
;
207 /* the list of probed interfaces has changed, we may need to add/remove
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
)));
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;
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
);
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;
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
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"));
271 /**************************************************************************** **
272 Reload the services file.
273 **************************************************************************** */
275 static BOOL
reload_nmbd_services(BOOL test
)
279 set_remote_machine_name("nmbd", False
);
283 pstrcpy( fname
,lp_configfile());
284 if (file_exist(fname
,NULL
) && !strcsequal(fname
,dyn_CONFIGFILE
)) {
285 pstrcpy(dyn_CONFIGFILE
,fname
);
290 if ( test
&& !lp_file_list_changed() )
293 ret
= lp_load( dyn_CONFIGFILE
, True
, False
, False
);
295 /* perhaps the config filename is now set */
297 DEBUG( 3, ( "services not loaded\n" ) );
298 reload_nmbd_services( True
);
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
);
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
));
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
));
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
));
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
;
368 if (p
->packet_type
== DGRAM_PACKET
) {
370 p
->packet
.dgram
.header
.source_ip
.s_addr
= local_ip
->s_addr
;
371 p
->packet
.dgram
.header
.source_port
= 138;
377 /**************************************************************************** **
378 The main select loop.
379 **************************************************************************** */
381 static void process(void)
387 time_t t
= time(NULL
);
389 /* Check for internal messages */
394 * Check all broadcast subnets to see if
395 * we need to run an election on any of them.
399 run_election
= check_elections();
402 * Read incoming UDP packets.
406 if(listen_for_packets(run_election
))
410 * Handle termination inband.
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.
430 * Run any elections - initiate becoming
431 * a local master browser if we have won.
438 * Send out any broadcast announcements
439 * of our server names. This also announces
440 * the workgroup name if we are a local
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
461 * (nmbd_sendannounce.c)
464 announce_myself_to_domain_master_browser(t
);
467 * Fullfill any remote announce requests.
468 * (nmbd_sendannounce.c)
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.
489 * Scan the subnet namelists and server lists and
490 * expire thos that have timed out.
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.
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
537 * (nmbd_become_dmb.c)
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.
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())
582 * clear the unexpected packet queue
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);
596 reload_after_sighup
= 0;
599 /* check for new network interfaces */
601 if(reload_interfaces(t
))
604 /* free up temp memory */
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
624 ClientNMB
= open_socket_in(SOCK_DGRAM
, port
,
625 0, interpret_addr(lp_socket_address()),
630 ClientDGRAM
= open_socket_in(SOCK_DGRAM
,DGRAM_PORT
,3,0,True
);
632 if ( ClientNMB
== -1 )
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" ) );
645 /**************************************************************************** **
647 **************************************************************************** */
648 int main(int argc
, const char *argv
[])
651 static BOOL opt_interactive
;
654 struct poptOption long_options
[] = {
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" },
666 global_nmb_port
= NMB_PORT
;
668 pc
= poptGetContext("nmbd", argc
, argv
, long_options
, 0);
669 while ((opt
= poptGetNextOpt(pc
)) != -1) ;
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
);
695 /* we are never interested in SIGFPE */
696 BlockSignals(True
,SIGFPE
);
699 /* We no longer use USR2... */
701 BlockSignals(True
, SIGUSR2
);
704 if ( opt_interactive
) {
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"));
714 setup_logging( argv
[0], log_stdout
);
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
) )
727 reload_nmbd_services( True
);
729 if (strequal(lp_workgroup(),"*")) {
730 DEBUG(0,("ERROR: a workgroup name of * is no longer supported\n"));
736 if (!is_daemon
&& !is_a_socket(0)) {
737 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
741 if (is_daemon
&& !opt_interactive
) {
742 DEBUG( 2, ( "Becoming a daemon.\n" ) );
748 * If we're interactive we want to set our own process group for
752 setpgid( (pid_t
)0, (pid_t
)0 );
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()) {
763 if (!directory_exist(lp_lockdir(), NULL
)) {
764 mkdir(lp_lockdir(), 0755);
767 pidfile_create("nmbd");
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();
782 /* Determine all the IP addresses we have. */
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();
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();
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
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();
817 /* We can only take signals in the select. */
818 BlockSignals( True
, SIGTERM
);
824 kill_async_dns_child();