Fix bug #8970 - Possible memory leaks in the samba master process.
[samba.git] / source3 / nmbd / nmbd.c
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)
7    
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 3 of the License, or
11    (at your option) any later version.
12    
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.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20    
21 */
22
23 #include "includes.h"
24
25 int ClientNMB       = -1;
26 int ClientDGRAM     = -1;
27 int global_nmb_port = -1;
28
29 extern bool rescan_listen_set;
30 extern bool global_in_nmbd;
31
32 extern bool override_logfile;
33
34 /* have we found LanMan clients yet? */
35 bool found_lm_clients = False;
36
37 /* what server type are we currently */
38
39 time_t StartupTime = 0;
40
41 struct event_context *nmbd_event_context(void)
42 {
43         static struct event_context *ctx;
44
45         if (!ctx && !(ctx = event_context_init(NULL))) {
46                 smb_panic("Could not init nmbd event context");
47         }
48         return ctx;
49 }
50
51 struct messaging_context *nmbd_messaging_context(void)
52 {
53         static struct messaging_context *ctx;
54
55         if (ctx == NULL) {
56                 ctx = messaging_init(NULL, server_id_self(),
57                                      nmbd_event_context());
58         }
59         if (ctx == NULL) {
60                 DEBUG(0, ("Could not init nmbd messaging context.\n"));
61         }
62         return ctx;
63 }
64
65 /**************************************************************************** **
66  Handle a SIGTERM in band.
67  **************************************************************************** */
68
69 static void terminate(void)
70 {
71         DEBUG(0,("Got SIGTERM: going down...\n"));
72   
73         /* Write out wins.dat file if samba is a WINS server */
74         wins_write_database(0,False);
75   
76         /* Remove all SELF registered names from WINS */
77         release_wins_names();
78   
79         /* Announce all server entries as 0 time-to-live, 0 type. */
80         announce_my_servers_removed();
81
82         /* If there was an async dns child - kill it. */
83         kill_async_dns_child();
84
85         gencache_stabilize();
86
87         pidfile_unlink();
88
89         exit(0);
90 }
91
92 static void nmbd_sig_term_handler(struct tevent_context *ev,
93                                   struct tevent_signal *se,
94                                   int signum,
95                                   int count,
96                                   void *siginfo,
97                                   void *private_data)
98 {
99         terminate();
100 }
101
102 static bool nmbd_setup_sig_term_handler(void)
103 {
104         struct tevent_signal *se;
105
106         se = tevent_add_signal(nmbd_event_context(),
107                                nmbd_event_context(),
108                                SIGTERM, 0,
109                                nmbd_sig_term_handler,
110                                NULL);
111         if (!se) {
112                 DEBUG(0,("failed to setup SIGTERM handler"));
113                 return false;
114         }
115
116         return true;
117 }
118
119 static void msg_reload_nmbd_services(struct messaging_context *msg,
120                                      void *private_data,
121                                      uint32_t msg_type,
122                                      struct server_id server_id,
123                                      DATA_BLOB *data);
124
125 static void nmbd_sig_hup_handler(struct tevent_context *ev,
126                                  struct tevent_signal *se,
127                                  int signum,
128                                  int count,
129                                  void *siginfo,
130                                  void *private_data)
131 {
132         DEBUG(0,("Got SIGHUP dumping debug info.\n"));
133         msg_reload_nmbd_services(nmbd_messaging_context(),
134                                  NULL, MSG_SMB_CONF_UPDATED,
135                                  procid_self(), NULL);
136 }
137
138 static bool nmbd_setup_sig_hup_handler(void)
139 {
140         struct tevent_signal *se;
141
142         se = tevent_add_signal(nmbd_event_context(),
143                                nmbd_event_context(),
144                                SIGHUP, 0,
145                                nmbd_sig_hup_handler,
146                                NULL);
147         if (!se) {
148                 DEBUG(0,("failed to setup SIGHUP handler"));
149                 return false;
150         }
151
152         return true;
153 }
154
155 /**************************************************************************** **
156  Handle a SHUTDOWN message from smbcontrol.
157  **************************************************************************** */
158
159 static void nmbd_terminate(struct messaging_context *msg,
160                            void *private_data,
161                            uint32_t msg_type,
162                            struct server_id server_id,
163                            DATA_BLOB *data)
164 {
165         terminate();
166 }
167
168 /**************************************************************************** **
169  Possibly continue after a fault.
170  **************************************************************************** */
171
172 static void fault_continue(void)
173 {
174         dump_core();
175 }
176
177 /**************************************************************************** **
178  Expire old names from the namelist and server list.
179  **************************************************************************** */
180
181 static void expire_names_and_servers(time_t t)
182 {
183         static time_t lastrun = 0;
184   
185         if ( !lastrun )
186                 lastrun = t;
187         if ( t < (lastrun + 5) )
188                 return;
189         lastrun = t;
190
191         /*
192          * Expire any timed out names on all the broadcast
193          * subnets and those registered with the WINS server.
194          * (nmbd_namelistdb.c)
195          */
196
197         expire_names(t);
198
199         /*
200          * Go through all the broadcast subnets and for each
201          * workgroup known on that subnet remove any expired
202          * server names. If a workgroup has an empty serverlist
203          * and has itself timed out then remove the workgroup.
204          * (nmbd_workgroupdb.c)
205          */
206
207         expire_workgroups_and_servers(t);
208 }
209
210 /************************************************************************** **
211  Reload the list of network interfaces.
212  Doesn't return until a network interface is up.
213  ************************************************************************** */
214
215 static void reload_interfaces(time_t t)
216 {
217         static time_t lastt;
218         int n;
219         bool print_waiting_msg = true;
220         struct subnet_record *subrec;
221
222         if (t && ((t - lastt) < NMBD_INTERFACES_RELOAD)) {
223                 return;
224         }
225
226         lastt = t;
227
228         if (!interfaces_changed()) {
229                 return;
230         }
231
232   try_again:
233
234         /* the list of probed interfaces has changed, we may need to add/remove
235            some subnets */
236         load_interfaces();
237
238         /* find any interfaces that need adding */
239         for (n=iface_count() - 1; n >= 0; n--) {
240                 char str[INET6_ADDRSTRLEN];
241                 const struct interface *iface = get_interface(n);
242                 struct in_addr ip, nmask;
243
244                 if (!iface) {
245                         DEBUG(2,("reload_interfaces: failed to get interface %d\n", n));
246                         continue;
247                 }
248
249                 /* Ensure we're only dealing with IPv4 here. */
250                 if (iface->ip.ss_family != AF_INET) {
251                         DEBUG(2,("reload_interfaces: "
252                                 "ignoring non IPv4 interface.\n"));
253                         continue;
254                 }
255
256                 ip = ((struct sockaddr_in *)&iface->ip)->sin_addr;
257                 nmask = ((struct sockaddr_in *)&iface->netmask)->sin_addr;
258
259                 /*
260                  * We don't want to add a loopback interface, in case
261                  * someone has added 127.0.0.1 for smbd, nmbd needs to
262                  * ignore it here. JRA.
263                  */
264
265                 if (is_loopback_addr((struct sockaddr *)&iface->ip)) {
266                         DEBUG(2,("reload_interfaces: Ignoring loopback "
267                                 "interface %s\n",
268                                 print_sockaddr(str, sizeof(str), &iface->ip) ));
269                         continue;
270                 }
271
272                 for (subrec=subnetlist; subrec; subrec=subrec->next) {
273                         if (ip_equal_v4(ip, subrec->myip) &&
274                             ip_equal_v4(nmask, subrec->mask_ip)) {
275                                 break;
276                         }
277                 }
278
279                 if (!subrec) {
280                         /* it wasn't found! add it */
281                         DEBUG(2,("Found new interface %s\n",
282                                  print_sockaddr(str,
283                                          sizeof(str), &iface->ip) ));
284                         subrec = make_normal_subnet(iface);
285                         if (subrec)
286                                 register_my_workgroup_one_subnet(subrec);
287                 }
288         }
289
290         /* find any interfaces that need deleting */
291         for (subrec=subnetlist; subrec; subrec=subrec->next) {
292                 for (n=iface_count() - 1; n >= 0; n--) {
293                         struct interface *iface = get_interface(n);
294                         struct in_addr ip, nmask;
295                         if (!iface) {
296                                 continue;
297                         }
298                         /* Ensure we're only dealing with IPv4 here. */
299                         if (iface->ip.ss_family != AF_INET) {
300                                 DEBUG(2,("reload_interfaces: "
301                                         "ignoring non IPv4 interface.\n"));
302                                 continue;
303                         }
304                         ip = ((struct sockaddr_in *)&iface->ip)->sin_addr;
305                         nmask = ((struct sockaddr_in *)&iface->netmask)->sin_addr;
306                         if (ip_equal_v4(ip, subrec->myip) &&
307                             ip_equal_v4(nmask, subrec->mask_ip)) {
308                                 break;
309                         }
310                 }
311                 if (n == -1) {
312                         /* oops, an interface has disapeared. This is
313                          tricky, we don't dare actually free the
314                          interface as it could be being used, so
315                          instead we just wear the memory leak and
316                          remove it from the list of interfaces without
317                          freeing it */
318                         DEBUG(2,("Deleting dead interface %s\n",
319                                  inet_ntoa(subrec->myip)));
320                         close_subnet(subrec);
321                 }
322         }
323
324         rescan_listen_set = True;
325
326         /* We need to wait if there are no subnets... */
327         if (FIRST_SUBNET == NULL) {
328                 void (*saved_handler)(int);
329
330                 if (print_waiting_msg) {
331                         DEBUG(0,("reload_interfaces: "
332                                 "No subnets to listen to. Waiting..\n"));
333                         print_waiting_msg = false;
334                 }
335
336                 /*
337                  * Whilst we're waiting for an interface, allow SIGTERM to
338                  * cause us to exit.
339                  */
340                 saved_handler = CatchSignal( SIGTERM, SIGNAL_CAST SIG_DFL );
341
342                 /* We only count IPv4, non-loopback interfaces here. */
343                 while (iface_count_v4_nl() == 0) {
344                         sleep(5);
345                         load_interfaces();
346                 }
347
348                 CatchSignal( SIGTERM, SIGNAL_CAST saved_handler );
349
350                 /*
351                  * We got an interface, go back to blocking term.
352                  */
353
354                 goto try_again;
355         }
356 }
357
358 /**************************************************************************** **
359  Reload the services file.
360  **************************************************************************** */
361
362 static bool reload_nmbd_services(bool test)
363 {
364         bool ret;
365
366         set_remote_machine_name("nmbd", False);
367
368         if ( lp_loaded() ) {
369                 char *fname = lp_configfile();
370                 if (file_exist(fname) && !strcsequal(fname,get_dyn_CONFIGFILE())) {
371                         set_dyn_CONFIGFILE(fname);
372                         test = False;
373                 }
374                 TALLOC_FREE(fname);
375         }
376
377         if ( test && !lp_file_list_changed() )
378                 return(True);
379
380         ret = lp_load(get_dyn_CONFIGFILE(), True , False, False, True);
381
382         /* perhaps the config filename is now set */
383         if ( !test ) {
384                 DEBUG( 3, ( "services not loaded\n" ) );
385                 reload_nmbd_services( True );
386         }
387
388         return(ret);
389 }
390
391 /**************************************************************************** **
392  * React on 'smbcontrol nmbd reload-config' in the same way as to SIGHUP
393  **************************************************************************** */
394
395 static void msg_reload_nmbd_services(struct messaging_context *msg,
396                                      void *private_data,
397                                      uint32_t msg_type,
398                                      struct server_id server_id,
399                                      DATA_BLOB *data)
400 {
401         write_browse_list( 0, True );
402         dump_all_namelists();
403         reload_nmbd_services( True );
404         reopen_logs();
405         reload_interfaces(0);
406 }
407
408 static void msg_nmbd_send_packet(struct messaging_context *msg,
409                                  void *private_data,
410                                  uint32_t msg_type,
411                                  struct server_id src,
412                                  DATA_BLOB *data)
413 {
414         struct packet_struct *p = (struct packet_struct *)data->data;
415         struct subnet_record *subrec;
416         struct sockaddr_storage ss;
417         const struct sockaddr_storage *pss;
418         const struct in_addr *local_ip;
419
420         DEBUG(10, ("Received send_packet from %u\n", (unsigned int)procid_to_pid(&src)));
421
422         if (data->length != sizeof(struct packet_struct)) {
423                 DEBUG(2, ("Discarding invalid packet length from %u\n",
424                           (unsigned int)procid_to_pid(&src)));
425                 return;
426         }
427
428         if ((p->packet_type != NMB_PACKET) &&
429             (p->packet_type != DGRAM_PACKET)) {
430                 DEBUG(2, ("Discarding invalid packet type from %u: %d\n",
431                           (unsigned int)procid_to_pid(&src), p->packet_type));
432                 return;
433         }
434
435         in_addr_to_sockaddr_storage(&ss, p->ip);
436         pss = iface_ip((struct sockaddr *)&ss);
437
438         if (pss == NULL) {
439                 DEBUG(2, ("Could not find ip for packet from %u\n",
440                           (unsigned int)procid_to_pid(&src)));
441                 return;
442         }
443
444         local_ip = &((const struct sockaddr_in *)pss)->sin_addr;
445         subrec = FIRST_SUBNET;
446
447         p->recv_fd = -1;
448         p->send_fd = (p->packet_type == NMB_PACKET) ?
449                 subrec->nmb_sock : subrec->dgram_sock;
450
451         for (subrec = FIRST_SUBNET; subrec != NULL;
452              subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
453                 if (ip_equal_v4(*local_ip, subrec->myip)) {
454                         p->send_fd = (p->packet_type == NMB_PACKET) ?
455                                 subrec->nmb_sock : subrec->dgram_sock;
456                         break;
457                 }
458         }
459
460         if (p->packet_type == DGRAM_PACKET) {
461                 p->port = 138;
462                 p->packet.dgram.header.source_ip.s_addr = local_ip->s_addr;
463                 p->packet.dgram.header.source_port = 138;
464         }
465
466         send_packet(p);
467 }
468
469 /**************************************************************************** **
470  The main select loop.
471  **************************************************************************** */
472
473 static void process(void)
474 {
475         bool run_election;
476
477         while( True ) {
478                 time_t t = time(NULL);
479                 TALLOC_CTX *frame = talloc_stackframe();
480
481                 /*
482                  * Check all broadcast subnets to see if
483                  * we need to run an election on any of them.
484                  * (nmbd_elections.c)
485                  */
486
487                 run_election = check_elections();
488
489                 /*
490                  * Read incoming UDP packets.
491                  * (nmbd_packets.c)
492                  */
493
494                 if(listen_for_packets(run_election)) {
495                         TALLOC_FREE(frame);
496                         return;
497                 }
498
499                 /*
500                  * Process all incoming packets
501                  * read above. This calls the success and
502                  * failure functions registered when response
503                  * packets arrrive, and also deals with request
504                  * packets from other sources.
505                  * (nmbd_packets.c)
506                  */
507
508                 run_packet_queue();
509
510                 /*
511                  * Run any elections - initiate becoming
512                  * a local master browser if we have won.
513                  * (nmbd_elections.c)
514                  */
515
516                 run_elections(t);
517
518                 /*
519                  * Send out any broadcast announcements
520                  * of our server names. This also announces
521                  * the workgroup name if we are a local
522                  * master browser.
523                  * (nmbd_sendannounce.c)
524                  */
525
526                 announce_my_server_names(t);
527
528                 /*
529                  * Send out any LanMan broadcast announcements
530                  * of our server names.
531                  * (nmbd_sendannounce.c)
532                  */
533
534                 announce_my_lm_server_names(t);
535
536                 /*
537                  * If we are a local master browser, periodically
538                  * announce ourselves to the domain master browser.
539                  * This also deals with syncronising the domain master
540                  * browser server lists with ourselves as a local
541                  * master browser.
542                  * (nmbd_sendannounce.c)
543                  */
544
545                 announce_myself_to_domain_master_browser(t);
546
547                 /*
548                  * Fullfill any remote announce requests.
549                  * (nmbd_sendannounce.c)
550                  */
551
552                 announce_remote(t);
553
554                 /*
555                  * Fullfill any remote browse sync announce requests.
556                  * (nmbd_sendannounce.c)
557                  */
558
559                 browse_sync_remote(t);
560
561                 /*
562                  * Scan the broadcast subnets, and WINS client
563                  * namelists and refresh any that need refreshing.
564                  * (nmbd_mynames.c)
565                  */
566
567                 refresh_my_names(t);
568
569                 /*
570                  * Scan the subnet namelists and server lists and
571                  * expire thos that have timed out.
572                  * (nmbd.c)
573                  */
574
575                 expire_names_and_servers(t);
576
577                 /*
578                  * Write out a snapshot of our current browse list into
579                  * the browse.dat file. This is used by smbd to service
580                  * incoming NetServerEnum calls - used to synchronise
581                  * browse lists over subnets.
582                  * (nmbd_serverlistdb.c)
583                  */
584
585                 write_browse_list(t, False);
586
587                 /*
588                  * If we are a domain master browser, we have a list of
589                  * local master browsers we should synchronise browse
590                  * lists with (these are added by an incoming local
591                  * master browser announcement packet). Expire any of
592                  * these that are no longer current, and pull the server
593                  * lists from each of these known local master browsers.
594                  * (nmbd_browsesync.c)
595                  */
596
597                 dmb_expire_and_sync_browser_lists(t);
598
599                 /*
600                  * Check that there is a local master browser for our
601                  * workgroup for all our broadcast subnets. If one
602                  * is not found, start an election (which we ourselves
603                  * may or may not participate in, depending on the
604                  * setting of the 'local master' parameter.
605                  * (nmbd_elections.c)
606                  */
607
608                 check_master_browser_exists(t);
609
610                 /*
611                  * If we are configured as a logon server, attempt to
612                  * register the special NetBIOS names to become such
613                  * (WORKGROUP<1c> name) on all broadcast subnets and
614                  * with the WINS server (if used). If we are configured
615                  * to become a domain master browser, attempt to register
616                  * the special NetBIOS name (WORKGROUP<1b> name) to
617                  * become such.
618                  * (nmbd_become_dmb.c)
619                  */
620
621                 add_domain_names(t);
622
623                 /*
624                  * If we are a WINS server, do any timer dependent
625                  * processing required.
626                  * (nmbd_winsserver.c)
627                  */
628
629                 initiate_wins_processing(t);
630
631                 /*
632                  * If we are a domain master browser, attempt to contact the
633                  * WINS server to get a list of all known WORKGROUPS/DOMAINS.
634                  * This will only work to a Samba WINS server.
635                  * (nmbd_browsesync.c)
636                  */
637
638                 if (lp_enhanced_browsing())
639                         collect_all_workgroup_names_from_wins_server(t);
640
641                 /*
642                  * Go through the response record queue and time out or re-transmit
643                  * and expired entries.
644                  * (nmbd_packets.c)
645                  */
646
647                 retransmit_or_expire_response_records(t);
648
649                 /*
650                  * check to see if any remote browse sync child processes have completed
651                  */
652
653                 sync_check_completion();
654
655                 /*
656                  * regularly sync with any other DMBs we know about 
657                  */
658
659                 if (lp_enhanced_browsing())
660                         sync_all_dmbs(t);
661
662                 /*
663                  * clear the unexpected packet queue 
664                  */
665
666                 clear_unexpected(t);
667
668                 /* check for new network interfaces */
669
670                 reload_interfaces(t);
671
672                 /* free up temp memory */
673                 TALLOC_FREE(frame);
674         }
675 }
676
677 /**************************************************************************** **
678  Open the socket communication.
679  **************************************************************************** */
680
681 static bool open_sockets(bool isdaemon, int port)
682 {
683         struct sockaddr_storage ss;
684         const char *sock_addr = lp_socket_address();
685
686         /*
687          * The sockets opened here will be used to receive broadcast
688          * packets *only*. Interface specific sockets are opened in
689          * make_subnet() in namedbsubnet.c. Thus we bind to the
690          * address "0.0.0.0". The parameter 'socket address' is
691          * now deprecated.
692          */
693
694         if (!interpret_string_addr(&ss, sock_addr,
695                                 AI_NUMERICHOST|AI_PASSIVE)) {
696                 DEBUG(0,("open_sockets: unable to get socket address "
697                         "from string %s", sock_addr));
698                 return false;
699         }
700         if (ss.ss_family != AF_INET) {
701                 DEBUG(0,("open_sockets: unable to use IPv6 socket"
702                         "%s in nmbd\n",
703                         sock_addr));
704                 return false;
705         }
706
707         if (isdaemon) {
708                 ClientNMB = open_socket_in(SOCK_DGRAM, port,
709                                            0, &ss,
710                                            true);
711         } else {
712                 ClientNMB = 0;
713         }
714
715         if (ClientNMB == -1) {
716                 return false;
717         }
718
719         ClientDGRAM = open_socket_in(SOCK_DGRAM, DGRAM_PORT,
720                                            3, &ss,
721                                            true);
722
723         if (ClientDGRAM == -1) {
724                 if (ClientNMB != 0) {
725                         close(ClientNMB);
726                 }
727                 return false;
728         }
729
730         /* we are never interested in SIGPIPE */
731         BlockSignals(True,SIGPIPE);
732
733         set_socket_options( ClientNMB,   "SO_BROADCAST" );
734         set_socket_options( ClientDGRAM, "SO_BROADCAST" );
735
736         /* Ensure we're non-blocking. */
737         set_blocking( ClientNMB, False);
738         set_blocking( ClientDGRAM, False);
739
740         DEBUG( 3, ( "open_sockets: Broadcast sockets opened.\n" ) );
741         return( True );
742 }
743
744 /**************************************************************************** **
745  main program
746  **************************************************************************** */
747
748  int main(int argc, const char *argv[])
749 {
750         static bool is_daemon;
751         static bool opt_interactive;
752         static bool Fork = true;
753         static bool no_process_group;
754         static bool log_stdout;
755         poptContext pc;
756         char *p_lmhosts = NULL;
757         int opt;
758         enum {
759                 OPT_DAEMON = 1000,
760                 OPT_INTERACTIVE,
761                 OPT_FORK,
762                 OPT_NO_PROCESS_GROUP,
763                 OPT_LOG_STDOUT
764         };
765         struct poptOption long_options[] = {
766         POPT_AUTOHELP
767         {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon(default)" },
768         {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)" },
769         {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools & etc)" },
770         {"no-process-group", 0, POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
771         {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
772         {"hosts", 'H', POPT_ARG_STRING, &p_lmhosts, 0, "Load a netbios hosts file"},
773         {"port", 'p', POPT_ARG_INT, &global_nmb_port, 0, "Listen on the specified port" },
774         POPT_COMMON_SAMBA
775         { NULL }
776         };
777         TALLOC_CTX *frame = talloc_stackframe(); /* Setup tos. */
778
779         load_case_tables();
780
781         global_nmb_port = NMB_PORT;
782
783         pc = poptGetContext("nmbd", argc, argv, long_options, 0);
784         while ((opt = poptGetNextOpt(pc)) != -1) {
785                 switch (opt) {
786                 case OPT_DAEMON:
787                         is_daemon = true;
788                         break;
789                 case OPT_INTERACTIVE:
790                         opt_interactive = true;
791                         break;
792                 case OPT_FORK:
793                         Fork = false;
794                         break;
795                 case OPT_NO_PROCESS_GROUP:
796                         no_process_group = true;
797                         break;
798                 case OPT_LOG_STDOUT:
799                         log_stdout = true;
800                         break;
801                 default:
802                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
803                                   poptBadOption(pc, 0), poptStrerror(opt));
804                         poptPrintUsage(pc, stderr, 0);
805                         exit(1);
806                 }
807         };
808         poptFreeContext(pc);
809
810         global_in_nmbd = true;
811         
812         StartupTime = time(NULL);
813         
814         sys_srandom(time(NULL) ^ sys_getpid());
815         
816         if (!override_logfile) {
817                 char *lfile = NULL;
818                 if (asprintf(&lfile, "%s/log.nmbd", get_dyn_LOGFILEBASE()) < 0) {
819                         exit(1);
820                 }
821                 lp_set_logfile(lfile);
822                 SAFE_FREE(lfile);
823         }
824         
825         fault_setup((void (*)(void *))fault_continue );
826         dump_core_setup("nmbd");
827         
828         /* POSIX demands that signals are inherited. If the invoking process has
829          * these signals masked, we will have problems, as we won't receive them. */
830         BlockSignals(False, SIGHUP);
831         BlockSignals(False, SIGUSR1);
832         BlockSignals(False, SIGTERM);
833
834 #if defined(SIGFPE)
835         /* we are never interested in SIGFPE */
836         BlockSignals(True,SIGFPE);
837 #endif
838
839         /* We no longer use USR2... */
840 #if defined(SIGUSR2)
841         BlockSignals(True, SIGUSR2);
842 #endif
843
844         if ( opt_interactive ) {
845                 Fork = False;
846                 log_stdout = True;
847         }
848
849         if ( log_stdout && Fork ) {
850                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
851                 exit(1);
852         }
853
854         setup_logging( argv[0], log_stdout );
855
856         reopen_logs();
857
858         DEBUG(0,("nmbd version %s started.\n", samba_version_string()));
859         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
860
861         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
862                 DEBUG(0, ("error opening config file\n"));
863                 exit(1);
864         }
865
866         if (nmbd_messaging_context() == NULL) {
867                 return 1;
868         }
869
870         if ( !reload_nmbd_services(False) )
871                 return(-1);
872
873         if(!init_names())
874                 return -1;
875
876         reload_nmbd_services( True );
877
878         if (strequal(lp_workgroup(),"*")) {
879                 DEBUG(0,("ERROR: a workgroup name of * is no longer supported\n"));
880                 exit(1);
881         }
882
883         set_samba_nb_type();
884
885         if (!is_daemon && !is_a_socket(0)) {
886                 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
887                 is_daemon = True;
888         }
889   
890         if (is_daemon && !opt_interactive) {
891                 DEBUG( 2, ( "Becoming a daemon.\n" ) );
892                 become_daemon(Fork, no_process_group);
893         }
894
895 #if HAVE_SETPGID
896         /*
897          * If we're interactive we want to set our own process group for 
898          * signal management.
899          */
900         if (opt_interactive && !no_process_group)
901                 setpgid( (pid_t)0, (pid_t)0 );
902 #endif
903
904         if (nmbd_messaging_context() == NULL) {
905                 return 1;
906         }
907
908 #ifndef SYNC_DNS
909         /* Setup the async dns. We do it here so it doesn't have all the other
910                 stuff initialised and thus chewing memory and sockets */
911         if(lp_we_are_a_wins_server() && lp_dns_proxy()) {
912                 start_async_dns();
913         }
914 #endif
915
916         if (!directory_exist(lp_lockdir())) {
917                 mkdir(lp_lockdir(), 0755);
918         }
919
920         pidfile_create("nmbd");
921
922         if (!NT_STATUS_IS_OK(reinit_after_fork(nmbd_messaging_context(),
923                                                nmbd_event_context(), false))) {
924                 DEBUG(0,("reinit_after_fork() failed\n"));
925                 exit(1);
926         }
927
928         if (!nmbd_setup_sig_term_handler())
929                 exit(1);
930         if (!nmbd_setup_sig_hup_handler())
931                 exit(1);
932
933         /* get broadcast messages */
934         claim_connection(NULL,"",FLAG_MSG_GENERAL|FLAG_MSG_DBWRAP);
935
936         messaging_register(nmbd_messaging_context(), NULL,
937                            MSG_FORCE_ELECTION, nmbd_message_election);
938 #if 0
939         /* Until winsrepl is done. */
940         messaging_register(nmbd_messaging_context(), NULL,
941                            MSG_WINS_NEW_ENTRY, nmbd_wins_new_entry);
942 #endif
943         messaging_register(nmbd_messaging_context(), NULL,
944                            MSG_SHUTDOWN, nmbd_terminate);
945         messaging_register(nmbd_messaging_context(), NULL,
946                            MSG_SMB_CONF_UPDATED, msg_reload_nmbd_services);
947         messaging_register(nmbd_messaging_context(), NULL,
948                            MSG_SEND_PACKET, msg_nmbd_send_packet);
949
950         TimeInit();
951
952         DEBUG( 3, ( "Opening sockets %d\n", global_nmb_port ) );
953
954         if ( !open_sockets( is_daemon, global_nmb_port ) ) {
955                 kill_async_dns_child();
956                 return 1;
957         }
958
959         /* Determine all the IP addresses we have. */
960         load_interfaces();
961
962         /* Create an nmbd subnet record for each of the above. */
963         if( False == create_subnets() ) {
964                 DEBUG(0,("ERROR: Failed when creating subnet lists. Exiting.\n"));
965                 kill_async_dns_child();
966                 exit(1);
967         }
968
969         /* Load in any static local names. */ 
970         if (p_lmhosts) {
971                 set_dyn_LMHOSTSFILE(p_lmhosts);
972         }
973         load_lmhosts_file(get_dyn_LMHOSTSFILE());
974         DEBUG(3,("Loaded hosts file %s\n", get_dyn_LMHOSTSFILE()));
975
976         /* If we are acting as a WINS server, initialise data structures. */
977         if( !initialise_wins() ) {
978                 DEBUG( 0, ( "nmbd: Failed when initialising WINS server.\n" ) );
979                 kill_async_dns_child();
980                 exit(1);
981         }
982
983         /* 
984          * Register nmbd primary workgroup and nmbd names on all
985          * the broadcast subnets, and on the WINS server (if specified).
986          * Also initiate the startup of our primary workgroup (start
987          * elections if we are setup as being able to be a local
988          * master browser.
989          */
990
991         if( False == register_my_workgroup_and_names() ) {
992                 DEBUG(0,("ERROR: Failed when creating my my workgroup. Exiting.\n"));
993                 kill_async_dns_child();
994                 exit(1);
995         }
996
997         if (!initialize_nmbd_proxy_logon()) {
998                 DEBUG(0,("ERROR: Failed setup nmbd_proxy_logon.\n"));
999                 kill_async_dns_child();
1000                 exit(1);
1001         }
1002
1003         TALLOC_FREE(frame);
1004         process();
1005
1006         if (dbf)
1007                 x_fclose(dbf);
1008         kill_async_dns_child();
1009         return(0);
1010 }