s3: Fix a long-standing problem with recycled PIDs
[sfrench/samba-autobuild/.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, procid_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         serverid_deregister_self();
87
88         pidfile_unlink();
89
90         exit(0);
91 }
92
93 static void nmbd_sig_term_handler(struct tevent_context *ev,
94                                   struct tevent_signal *se,
95                                   int signum,
96                                   int count,
97                                   void *siginfo,
98                                   void *private_data)
99 {
100         terminate();
101 }
102
103 static bool nmbd_setup_sig_term_handler(void)
104 {
105         struct tevent_signal *se;
106
107         se = tevent_add_signal(nmbd_event_context(),
108                                nmbd_event_context(),
109                                SIGTERM, 0,
110                                nmbd_sig_term_handler,
111                                NULL);
112         if (!se) {
113                 DEBUG(0,("failed to setup SIGTERM handler"));
114                 return false;
115         }
116
117         return true;
118 }
119
120 static void msg_reload_nmbd_services(struct messaging_context *msg,
121                                      void *private_data,
122                                      uint32_t msg_type,
123                                      struct server_id server_id,
124                                      DATA_BLOB *data);
125
126 static void nmbd_sig_hup_handler(struct tevent_context *ev,
127                                  struct tevent_signal *se,
128                                  int signum,
129                                  int count,
130                                  void *siginfo,
131                                  void *private_data)
132 {
133         DEBUG(0,("Got SIGHUP dumping debug info.\n"));
134         msg_reload_nmbd_services(nmbd_messaging_context(),
135                                  NULL, MSG_SMB_CONF_UPDATED,
136                                  procid_self(), NULL);
137 }
138
139 static bool nmbd_setup_sig_hup_handler(void)
140 {
141         struct tevent_signal *se;
142
143         se = tevent_add_signal(nmbd_event_context(),
144                                nmbd_event_context(),
145                                SIGHUP, 0,
146                                nmbd_sig_hup_handler,
147                                NULL);
148         if (!se) {
149                 DEBUG(0,("failed to setup SIGHUP handler"));
150                 return false;
151         }
152
153         return true;
154 }
155
156 /**************************************************************************** **
157  Handle a SHUTDOWN message from smbcontrol.
158  **************************************************************************** */
159
160 static void nmbd_terminate(struct messaging_context *msg,
161                            void *private_data,
162                            uint32_t msg_type,
163                            struct server_id server_id,
164                            DATA_BLOB *data)
165 {
166         terminate();
167 }
168
169 /**************************************************************************** **
170  Possibly continue after a fault.
171  **************************************************************************** */
172
173 static void fault_continue(void)
174 {
175         dump_core();
176 }
177
178 /**************************************************************************** **
179  Expire old names from the namelist and server list.
180  **************************************************************************** */
181
182 static void expire_names_and_servers(time_t t)
183 {
184         static time_t lastrun = 0;
185   
186         if ( !lastrun )
187                 lastrun = t;
188         if ( t < (lastrun + 5) )
189                 return;
190         lastrun = t;
191
192         /*
193          * Expire any timed out names on all the broadcast
194          * subnets and those registered with the WINS server.
195          * (nmbd_namelistdb.c)
196          */
197
198         expire_names(t);
199
200         /*
201          * Go through all the broadcast subnets and for each
202          * workgroup known on that subnet remove any expired
203          * server names. If a workgroup has an empty serverlist
204          * and has itself timed out then remove the workgroup.
205          * (nmbd_workgroupdb.c)
206          */
207
208         expire_workgroups_and_servers(t);
209 }
210
211 /************************************************************************** **
212  Reload the list of network interfaces.
213  Doesn't return until a network interface is up.
214  ************************************************************************** */
215
216 static void reload_interfaces(time_t t)
217 {
218         static time_t lastt;
219         int n;
220         bool print_waiting_msg = true;
221         struct subnet_record *subrec;
222
223         if (t && ((t - lastt) < NMBD_INTERFACES_RELOAD)) {
224                 return;
225         }
226
227         lastt = t;
228
229         if (!interfaces_changed()) {
230                 return;
231         }
232
233   try_again:
234
235         /* the list of probed interfaces has changed, we may need to add/remove
236            some subnets */
237         load_interfaces();
238
239         /* find any interfaces that need adding */
240         for (n=iface_count() - 1; n >= 0; n--) {
241                 char str[INET6_ADDRSTRLEN];
242                 const struct interface *iface = get_interface(n);
243                 struct in_addr ip, nmask;
244
245                 if (!iface) {
246                         DEBUG(2,("reload_interfaces: failed to get interface %d\n", n));
247                         continue;
248                 }
249
250                 /* Ensure we're only dealing with IPv4 here. */
251                 if (iface->ip.ss_family != AF_INET) {
252                         DEBUG(2,("reload_interfaces: "
253                                 "ignoring non IPv4 interface.\n"));
254                         continue;
255                 }
256
257                 ip = ((struct sockaddr_in *)&iface->ip)->sin_addr;
258                 nmask = ((struct sockaddr_in *)&iface->netmask)->sin_addr;
259
260                 /*
261                  * We don't want to add a loopback interface, in case
262                  * someone has added 127.0.0.1 for smbd, nmbd needs to
263                  * ignore it here. JRA.
264                  */
265
266                 if (is_loopback_addr((struct sockaddr *)&iface->ip)) {
267                         DEBUG(2,("reload_interfaces: Ignoring loopback "
268                                 "interface %s\n",
269                                 print_sockaddr(str, sizeof(str), &iface->ip) ));
270                         continue;
271                 }
272
273                 for (subrec=subnetlist; subrec; subrec=subrec->next) {
274                         if (ip_equal_v4(ip, subrec->myip) &&
275                             ip_equal_v4(nmask, subrec->mask_ip)) {
276                                 break;
277                         }
278                 }
279
280                 if (!subrec) {
281                         /* it wasn't found! add it */
282                         DEBUG(2,("Found new interface %s\n",
283                                  print_sockaddr(str,
284                                          sizeof(str), &iface->ip) ));
285                         subrec = make_normal_subnet(iface);
286                         if (subrec)
287                                 register_my_workgroup_one_subnet(subrec);
288                 }
289         }
290
291         /* find any interfaces that need deleting */
292         for (subrec=subnetlist; subrec; subrec=subrec->next) {
293                 for (n=iface_count() - 1; n >= 0; n--) {
294                         struct interface *iface = get_interface(n);
295                         struct in_addr ip, nmask;
296                         if (!iface) {
297                                 continue;
298                         }
299                         /* Ensure we're only dealing with IPv4 here. */
300                         if (iface->ip.ss_family != AF_INET) {
301                                 DEBUG(2,("reload_interfaces: "
302                                         "ignoring non IPv4 interface.\n"));
303                                 continue;
304                         }
305                         ip = ((struct sockaddr_in *)&iface->ip)->sin_addr;
306                         nmask = ((struct sockaddr_in *)&iface->netmask)->sin_addr;
307                         if (ip_equal_v4(ip, subrec->myip) &&
308                             ip_equal_v4(nmask, subrec->mask_ip)) {
309                                 break;
310                         }
311                 }
312                 if (n == -1) {
313                         /* oops, an interface has disapeared. This is
314                          tricky, we don't dare actually free the
315                          interface as it could be being used, so
316                          instead we just wear the memory leak and
317                          remove it from the list of interfaces without
318                          freeing it */
319                         DEBUG(2,("Deleting dead interface %s\n",
320                                  inet_ntoa(subrec->myip)));
321                         close_subnet(subrec);
322                 }
323         }
324
325         rescan_listen_set = True;
326
327         /* We need to wait if there are no subnets... */
328         if (FIRST_SUBNET == NULL) {
329                 void (*saved_handler)(int);
330
331                 if (print_waiting_msg) {
332                         DEBUG(0,("reload_interfaces: "
333                                 "No subnets to listen to. Waiting..\n"));
334                         print_waiting_msg = false;
335                 }
336
337                 /*
338                  * Whilst we're waiting for an interface, allow SIGTERM to
339                  * cause us to exit.
340                  */
341                 saved_handler = CatchSignal(SIGTERM, SIG_DFL);
342
343                 /* We only count IPv4, non-loopback interfaces here. */
344                 while (iface_count_v4_nl() == 0) {
345                         sleep(5);
346                         load_interfaces();
347                 }
348
349                 CatchSignal(SIGTERM, saved_handler);
350
351                 /*
352                  * We got an interface, go back to blocking term.
353                  */
354
355                 goto try_again;
356         }
357 }
358
359 /**************************************************************************** **
360  Reload the services file.
361  **************************************************************************** */
362
363 static bool reload_nmbd_services(bool test)
364 {
365         bool ret;
366
367         set_remote_machine_name("nmbd", False);
368
369         if ( lp_loaded() ) {
370                 const char *fname = lp_configfile();
371                 if (file_exist(fname) && !strcsequal(fname,get_dyn_CONFIGFILE())) {
372                         set_dyn_CONFIGFILE(fname);
373                         test = False;
374                 }
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, 'H', "Load a netbios hosts file"},
773         {"port", 'p', POPT_ARG_INT, &global_nmb_port, NMB_PORT, "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
935         if (!serverid_register_self(FLAG_MSG_GENERAL|FLAG_MSG_DBWRAP)) {
936                 DEBUG(1, ("Could not register myself in serverid.tdb\n"));
937                 exit(1);
938         }
939
940         messaging_register(nmbd_messaging_context(), NULL,
941                            MSG_FORCE_ELECTION, nmbd_message_election);
942 #if 0
943         /* Until winsrepl is done. */
944         messaging_register(nmbd_messaging_context(), NULL,
945                            MSG_WINS_NEW_ENTRY, nmbd_wins_new_entry);
946 #endif
947         messaging_register(nmbd_messaging_context(), NULL,
948                            MSG_SHUTDOWN, nmbd_terminate);
949         messaging_register(nmbd_messaging_context(), NULL,
950                            MSG_SMB_CONF_UPDATED, msg_reload_nmbd_services);
951         messaging_register(nmbd_messaging_context(), NULL,
952                            MSG_SEND_PACKET, msg_nmbd_send_packet);
953
954         TimeInit();
955
956         DEBUG( 3, ( "Opening sockets %d\n", global_nmb_port ) );
957
958         if ( !open_sockets( is_daemon, global_nmb_port ) ) {
959                 kill_async_dns_child();
960                 return 1;
961         }
962
963         /* Determine all the IP addresses we have. */
964         load_interfaces();
965
966         /* Create an nmbd subnet record for each of the above. */
967         if( False == create_subnets() ) {
968                 DEBUG(0,("ERROR: Failed when creating subnet lists. Exiting.\n"));
969                 kill_async_dns_child();
970                 exit(1);
971         }
972
973         /* Load in any static local names. */ 
974         if (p_lmhosts) {
975                 set_dyn_LMHOSTSFILE(p_lmhosts);
976         }
977         load_lmhosts_file(get_dyn_LMHOSTSFILE());
978         DEBUG(3,("Loaded hosts file %s\n", get_dyn_LMHOSTSFILE()));
979
980         /* If we are acting as a WINS server, initialise data structures. */
981         if( !initialise_wins() ) {
982                 DEBUG( 0, ( "nmbd: Failed when initialising WINS server.\n" ) );
983                 kill_async_dns_child();
984                 exit(1);
985         }
986
987         /* 
988          * Register nmbd primary workgroup and nmbd names on all
989          * the broadcast subnets, and on the WINS server (if specified).
990          * Also initiate the startup of our primary workgroup (start
991          * elections if we are setup as being able to be a local
992          * master browser.
993          */
994
995         if( False == register_my_workgroup_and_names() ) {
996                 DEBUG(0,("ERROR: Failed when creating my my workgroup. Exiting.\n"));
997                 kill_async_dns_child();
998                 exit(1);
999         }
1000
1001         if (!initialize_nmbd_proxy_logon()) {
1002                 DEBUG(0,("ERROR: Failed setup nmbd_proxy_logon.\n"));
1003                 kill_async_dns_child();
1004                 exit(1);
1005         }
1006
1007         TALLOC_FREE(frame);
1008         process();
1009
1010         if (dbf)
1011                 x_fclose(dbf);
1012         kill_async_dns_child();
1013         return(0);
1014 }