source/smbd/server.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Main SMB server routines
   4    Copyright (C) Andrew Tridgell                1992-1998
   5    Copyright (C) Martin Pool                    2002
   6    Copyright (C) Jelmer Vernooij                2002-2003
   7
   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.
  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, write to the Free Software
  20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21 */
  22
  23 #include "includes.h"
  24
  25 static_decl_rpc;
  26
  27 static int am_parent = 1;
  28
  29 /* the last message the was processed */
  30 int last_message = -1;
  31
  32 /* a useful macro to debug the last message processed */
  33 #define LAST_MESSAGE() (last_message != -1 ? smb_fn_name(last_message) : "")
  34
  35 extern struct auth_context *negprot_global_auth_context;
  36 extern pstring user_socket_options;
  37 extern SIG_ATOMIC_T got_sig_term;
  38 extern SIG_ATOMIC_T reload_after_sighup;
  39 static SIG_ATOMIC_T got_sig_cld;
  40
  41 #ifdef WITH_DFS
  42 extern int dcelogin_atmost_once;
  43 #endif /* WITH_DFS */
  44
  45 /* really we should have a top level context structure that has the
  46    client file descriptor as an element. That would require a major rewrite :(
  47
  48    the following 2 functions are an alternative - they make the file
  49    descriptor private to smbd
  50  */
  51 static int server_fd = -1;
  52
  53 int smbd_server_fd(void)
  54 {
  55         return server_fd;
  56 }
  57
  58 static void smbd_set_server_fd(int fd)
  59 {
  60         server_fd = fd;
  61         client_setfd(fd);
  62 }
  63
  64 struct event_context *smbd_event_context(void)
  65 {
  66         static struct event_context *ctx;
  67
  68         if (!ctx && !(ctx = event_context_init(NULL))) {
  69                 smb_panic("Could not init smbd event context\n");
  70         }
  71         return ctx;
  72 }
  73
  74 struct messaging_context *smbd_messaging_context(void)
  75 {
  76         static struct messaging_context *ctx;
  77
  78         if (!ctx && !(ctx = messaging_init(NULL, server_id_self(),
  79                                            smbd_event_context()))) {
  80                 smb_panic("Could not init smbd messaging context\n");
  81         }
  82         return ctx;
  83 }
  84
  85 /*******************************************************************
  86  What to do when smb.conf is updated.
  87  ********************************************************************/
  88
  89 static void smb_conf_updated(int msg_type, struct process_id src,
  90                              void *buf, size_t len, void *private_data)
  91 {
  92         DEBUG(10,("smb_conf_updated: Got message saying smb.conf was updated. Reloading.\n"));
  93         reload_services(False);
  94 }
  95
  96
  97 /*******************************************************************
  98  Delete a statcache entry.
  99  ********************************************************************/
 100
 101 static void smb_stat_cache_delete(int msg_type, struct process_id src,
 102                                   void *buf, size_t len, void *private_data)
 103 {
 104         const char *name = (const char *)buf;
 105         DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
 106         stat_cache_delete(name);
 107 }
 108
 109 /****************************************************************************
 110  Terminate signal.
 111 ****************************************************************************/
 112
 113 static void sig_term(void)
 114 {
 115         got_sig_term = 1;
 116         sys_select_signal(SIGTERM);
 117 }
 118
 119 /****************************************************************************
 120  Catch a sighup.
 121 ****************************************************************************/
 122
 123 static void sig_hup(int sig)
 124 {
 125         reload_after_sighup = 1;
 126         sys_select_signal(SIGHUP);
 127 }
 128
 129 /****************************************************************************
 130  Catch a sigcld
 131 ****************************************************************************/
 132 static void sig_cld(int sig)
 133 {
 134         got_sig_cld = 1;
 135         sys_select_signal(SIGCLD);
 136 }
 137
 138 /****************************************************************************
 139   Send a SIGTERM to our process group.
 140 *****************************************************************************/
 141
 142 static void  killkids(void)
 143 {
 144         if(am_parent) kill(0,SIGTERM);
 145 }
 146
 147 /****************************************************************************
 148  Process a sam sync message - not sure whether to do this here or
 149  somewhere else.
 150 ****************************************************************************/
 151
 152 static void msg_sam_sync(int UNUSED(msg_type), struct process_id UNUSED(pid),
 153                          void *UNUSED(buf), size_t UNUSED(len),
 154                          void *private_data)
 155 {
 156         DEBUG(10, ("** sam sync message received, ignoring\n"));
 157 }
 158
 159 /****************************************************************************
 160  Process a sam sync replicate message - not sure whether to do this here or
 161  somewhere else.
 162 ****************************************************************************/
 163
 164 static void msg_sam_repl(int msg_type, struct process_id pid,
 165                          void *buf, size_t len, void *private_data)
 166 {
 167         uint32 low_serial;
 168
 169         if (len != sizeof(uint32))
 170                 return;
 171
 172         low_serial = *((uint32 *)buf);
 173
 174         DEBUG(3, ("received sam replication message, serial = 0x%04x\n",
 175                   low_serial));
 176 }
 177
 178 /****************************************************************************
 179  Open the socket communication - inetd.
 180 ****************************************************************************/
 181
 182 static BOOL open_sockets_inetd(void)
 183 {
 184         /* Started from inetd. fd 0 is the socket. */
 185         /* We will abort gracefully when the client or remote system
 186            goes away */
 187         smbd_set_server_fd(dup(0));
 188
 189         /* close our standard file descriptors */
 190         close_low_fds(False); /* Don't close stderr */
 191
 192         set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
 193         set_socket_options(smbd_server_fd(), user_socket_options);
 194
 195         return True;
 196 }
 197
 198 static void msg_exit_server(int msg_type, struct process_id src,
 199                             void *buf, size_t len, void *private_data)
 200 {
 201         DEBUG(3, ("got a SHUTDOWN message\n"));
 202         exit_server_cleanly(NULL);
 203 }
 204
 205 #ifdef DEVELOPER
 206 static void msg_inject_fault(int msg_type, struct process_id src,
 207                             void *buf, size_t len, void *private_data)
 208 {
 209         int sig;
 210
 211         if (len != sizeof(int)) {
 212
 213                 DEBUG(0, ("Process %llu sent bogus signal injection request\n",
 214                         (unsigned long long)src.pid));
 215                 return;
 216         }
 217
 218         sig = *(int *)buf;
 219         if (sig == -1) {
 220                 exit_server("internal error injected");
 221                 return;
 222         }
 223
 224 #if HAVE_STRSIGNAL
 225         DEBUG(0, ("Process %llu requested injection of signal %d (%s)\n",
 226                     (unsigned long long)src.pid, sig, strsignal(sig)));
 227 #else
 228         DEBUG(0, ("Process %llu requested injection of signal %d\n",
 229                     (unsigned long long)src.pid, sig));
 230 #endif
 231
 232         kill(sys_getpid(), sig);
 233 }
 234 #endif /* DEVELOPER */
 235
 236 struct child_pid {
 237         struct child_pid *prev, *next;
 238         pid_t pid;
 239 };
 240
 241 static struct child_pid *children;
 242 static int num_children;
 243
 244 static void add_child_pid(pid_t pid)
 245 {
 246         struct child_pid *child;
 247
 248         if (lp_max_smbd_processes() == 0) {
 249                 /* Don't bother with the child list if we don't care anyway */
 250                 return;
 251         }
 252
 253         child = SMB_MALLOC_P(struct child_pid);
 254         if (child == NULL) {
 255                 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
 256                 return;
 257         }
 258         child->pid = pid;
 259         DLIST_ADD(children, child);
 260         num_children += 1;
 261 }
 262
 263 static void remove_child_pid(pid_t pid)
 264 {
 265         struct child_pid *child;
 266
 267         if (lp_max_smbd_processes() == 0) {
 268                 /* Don't bother with the child list if we don't care anyway */
 269                 return;
 270         }
 271
 272         for (child = children; child != NULL; child = child->next) {
 273                 if (child->pid == pid) {
 274                         struct child_pid *tmp = child;
 275                         DLIST_REMOVE(children, child);
 276                         SAFE_FREE(tmp);
 277                         num_children -= 1;
 278                         return;
 279                 }
 280         }
 281
 282         DEBUG(0, ("Could not find child %d -- ignoring\n", (int)pid));
 283 }
 284
 285 /****************************************************************************
 286  Have we reached the process limit ?
 287 ****************************************************************************/
 288
 289 static BOOL allowable_number_of_smbd_processes(void)
 290 {
 291         int max_processes = lp_max_smbd_processes();
 292
 293         if (!max_processes)
 294                 return True;
 295
 296         return num_children < max_processes;
 297 }
 298
 299 /****************************************************************************
 300  Open the socket communication.
 301 ****************************************************************************/
 302
 303 bool reinit_after_fork(struct messaging_context *msg_ctx,
 304                         struct event_context *ev_ctx,
 305                         bool parent_longlived);
 306
 307 static BOOL open_sockets_smbd(BOOL is_daemon, BOOL interactive, const char *smb_ports)
 308 {
 309         int num_interfaces = iface_count();
 310         int num_sockets = 0;
 311         int fd_listenset[FD_SETSIZE];
 312         fd_set listen_set;
 313         int s;
 314         int maxfd = 0;
 315         int i;
 316         char *ports;
 317
 318         if (!is_daemon) {
 319                 return open_sockets_inetd();
 320         }
 321
 322
 323 #ifdef HAVE_ATEXIT
 324         {
 325                 static int atexit_set;
 326                 if(atexit_set == 0) {
 327                         atexit_set=1;
 328                         atexit(killkids);
 329                 }
 330         }
 331 #endif
 332
 333         /* Stop zombies */
 334         CatchSignal(SIGCLD, sig_cld);
 335
 336         FD_ZERO(&listen_set);
 337
 338         /* use a reasonable default set of ports - listing on 445 and 139 */
 339         if (!smb_ports) {
 340                 ports = lp_smb_ports();
 341                 if (!ports || !*ports) {
 342                         ports = smb_xstrdup(SMB_PORTS);
 343                 } else {
 344                         ports = smb_xstrdup(ports);
 345                 }
 346         } else {
 347                 ports = smb_xstrdup(smb_ports);
 348         }
 349
 350         if (lp_interfaces() && lp_bind_interfaces_only()) {
 351                 /* We have been given an interfaces line, and been
 352                    told to only bind to those interfaces. Create a
 353                    socket per interface and bind to only these.
 354                 */
 355
 356                 /* Now open a listen socket for each of the
 357                    interfaces. */
 358                 for(i = 0; i < num_interfaces; i++) {
 359                         struct in_addr *ifip = iface_n_ip(i);
 360                         fstring tok;
 361                         const char *ptr;
 362
 363                         if(ifip == NULL) {
 364                                 DEBUG(0,("open_sockets_smbd: interface %d has NULL IP address !\n", i));
 365                                 continue;
 366                         }
 367
 368                         for (ptr=ports; next_token(&ptr, tok, " \t,", sizeof(tok)); ) {
 369                                 unsigned port = atoi(tok);
 370                                 if (port == 0 || port > 0xffff) {
 371                                         continue;
 372                                 }
 373                                 s = fd_listenset[num_sockets] = open_socket_in(SOCK_STREAM, port, 0, ifip->s_addr, True);
 374                                 if(s == -1)
 375                                         return False;
 376
 377                                 /* ready to listen */
 378                                 set_socket_options(s,"SO_KEEPALIVE");
 379                                 set_socket_options(s,user_socket_options);
 380
 381                                 /* Set server socket to non-blocking for the accept. */
 382                                 set_blocking(s,False);
 383
 384                                 if (listen(s, SMBD_LISTEN_BACKLOG) == -1) {
 385                                         DEBUG(0,("listen: %s\n",strerror(errno)));
 386                                         close(s);
 387                                         return False;
 388                                 }
 389                                 FD_SET(s,&listen_set);
 390                                 maxfd = MAX( maxfd, s);
 391
 392                                 num_sockets++;
 393                                 if (num_sockets >= FD_SETSIZE) {
 394                                         DEBUG(0,("open_sockets_smbd: Too many sockets to bind to\n"));
 395                                         return False;
 396                                 }
 397                         }
 398                 }
 399         } else {
 400                 /* Just bind to 0.0.0.0 - accept connections
 401                    from anywhere. */
 402
 403                 fstring tok;
 404                 const char *ptr;
 405
 406                 num_interfaces = 1;
 407
 408                 for (ptr=ports; next_token(&ptr, tok, " \t,", sizeof(tok)); ) {
 409                         unsigned port = atoi(tok);
 410                         if (port == 0 || port > 0xffff) continue;
 411                         /* open an incoming socket */
 412                         s = open_socket_in(SOCK_STREAM, port, 0,
 413                                            interpret_addr(lp_socket_address()),True);
 414                         if (s == -1)
 415                                 return(False);
 416
 417                         /* ready to listen */
 418                         set_socket_options(s,"SO_KEEPALIVE");
 419                         set_socket_options(s,user_socket_options);
 420
 421                         /* Set server socket to non-blocking for the accept. */
 422                         set_blocking(s,False);
 423
 424                         if (listen(s, SMBD_LISTEN_BACKLOG) == -1) {
 425                                 DEBUG(0,("open_sockets_smbd: listen: %s\n",
 426                                          strerror(errno)));
 427                                 close(s);
 428                                 return False;
 429                         }
 430
 431                         fd_listenset[num_sockets] = s;
 432                         FD_SET(s,&listen_set);
 433                         maxfd = MAX( maxfd, s);
 434
 435                         num_sockets++;
 436
 437                         if (num_sockets >= FD_SETSIZE) {
 438                                 DEBUG(0,("open_sockets_smbd: Too many sockets to bind to\n"));
 439                                 return False;
 440                         }
 441                 }
 442         }
 443
 444         SAFE_FREE(ports);
 445
 446         /* Listen to messages */
 447
 448         message_register(MSG_SMB_SAM_SYNC, msg_sam_sync, NULL);
 449         message_register(MSG_SMB_SAM_REPL, msg_sam_repl, NULL);
 450         message_register(MSG_SHUTDOWN, msg_exit_server, NULL);
 451         message_register(MSG_SMB_FILE_RENAME, msg_file_was_renamed, NULL);
 452         message_register(MSG_SMB_CONF_UPDATED, smb_conf_updated, NULL);
 453         message_register(MSG_SMB_STAT_CACHE_DELETE, smb_stat_cache_delete,
 454                          NULL);
 455
 456 #ifdef DEVELOPER
 457         message_register(MSG_SMB_INJECT_FAULT, msg_inject_fault, NULL);
 458 #endif
 459
 460         /* now accept incoming connections - forking a new process
 461            for each incoming connection */
 462         DEBUG(2,("waiting for a connection\n"));
 463         while (1) {
 464                 fd_set lfds;
 465                 int num;
 466
 467                 /* Free up temporary memory from the main smbd. */
 468                 lp_TALLOC_FREE();
 469
 470                 /* Ensure we respond to PING and DEBUG messages from the main smbd. */
 471                 message_dispatch();
 472
 473                 if (got_sig_cld) {
 474                         pid_t pid;
 475                         got_sig_cld = False;
 476
 477                         while ((pid = sys_waitpid(-1, NULL, WNOHANG)) > 0) {
 478                                 remove_child_pid(pid);
 479                         }
 480                 }
 481
 482                 memcpy((char *)&lfds, (char *)&listen_set,
 483                        sizeof(listen_set));
 484
 485                 num = sys_select(maxfd+1,&lfds,NULL,NULL,NULL);
 486
 487                 if (num == -1 && errno == EINTR) {
 488                         if (got_sig_term) {
 489                                 exit_server_cleanly(NULL);
 490                         }
 491
 492                         /* check for sighup processing */
 493                         if (reload_after_sighup) {
 494                                 change_to_root_user();
 495                                 DEBUG(1,("Reloading services after SIGHUP\n"));
 496                                 reload_services(False);
 497                                 reload_after_sighup = 0;
 498                         }
 499
 500                         continue;
 501                 }
 502
 503                 /* check if we need to reload services */
 504                 check_reload(time(NULL));
 505
 506                 /* Find the sockets that are read-ready -
 507                    accept on these. */
 508                 for( ; num > 0; num--) {
 509                         struct sockaddr addr;
 510                         socklen_t in_addrlen = sizeof(addr);
 511                         pid_t child = 0;
 512
 513                         s = -1;
 514                         for(i = 0; i < num_sockets; i++) {
 515                                 if(FD_ISSET(fd_listenset[i],&lfds)) {
 516                                         s = fd_listenset[i];
 517                                         /* Clear this so we don't look
 518                                            at it again. */
 519                                         FD_CLR(fd_listenset[i],&lfds);
 520                                         break;
 521                                 }
 522                         }
 523
 524                         smbd_set_server_fd(accept(s,&addr,&in_addrlen));
 525
 526                         if (smbd_server_fd() == -1 && errno == EINTR)
 527                                 continue;
 528
 529                         if (smbd_server_fd() == -1) {
 530                                 DEBUG(0,("open_sockets_smbd: accept: %s\n",
 531                                          strerror(errno)));
 532                                 continue;
 533                         }
 534
 535                         /* Ensure child is set to blocking mode */
 536                         set_blocking(smbd_server_fd(),True);
 537
 538                         if (smbd_server_fd() != -1 && interactive)
 539                                 return True;
 540
 541                         if (allowable_number_of_smbd_processes() &&
 542                             smbd_server_fd() != -1 &&
 543                             ((child = sys_fork())==0)) {
 544                                 /* Child code ... */
 545
 546                                 /* Stop zombies, the parent explicitly handles
 547                                  * them, counting worker smbds. */
 548                                 CatchChild();
 549
 550                                 /* close the listening socket(s) */
 551                                 for(i = 0; i < num_sockets; i++)
 552                                         close(fd_listenset[i]);
 553
 554                                 /* close our standard file
 555                                    descriptors */
 556                                 close_low_fds(False);
 557                                 am_parent = 0;
 558
 559                                 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
 560                                 set_socket_options(smbd_server_fd(),user_socket_options);
 561
 562                                 /* this is needed so that we get decent entries
 563                                    in smbstatus for port 445 connects */
 564                                 set_remote_machine_name(get_peer_addr(smbd_server_fd()),
 565                                                         False);
 566
 567                                 if (!reinit_after_fork(smbd_messaging_context(),
 568                                                        smbd_event_context(),
 569                                                        true)) {
 570                                         DEBUG(0, ("reinit_after_fork failed.\n"));
 571                                         smb_panic("reinit_after_fork failed.\n");
 572                                 }
 573
 574                                 return True;
 575                         }
 576                         /* The parent doesn't need this socket */
 577                         close(smbd_server_fd());
 578
 579                         /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
 580                                 Clear the closed fd info out of server_fd --
 581                                 and more importantly, out of client_fd in
 582                                 util_sock.c, to avoid a possible
 583                                 getpeername failure if we reopen the logs
 584                                 and use %I in the filename.
 585                         */
 586
 587                         smbd_set_server_fd(-1);
 588
 589                         if (child != 0) {
 590                                 add_child_pid(child);
 591                         }
 592
 593                         /* Force parent to check log size after
 594                          * spawning child.  Fix from
 595                          * klausr@ITAP.Physik.Uni-Stuttgart.De.  The
 596                          * parent smbd will log to logserver.smb.  It
 597                          * writes only two messages for each child
 598                          * started/finished. But each child writes,
 599                          * say, 50 messages also in logserver.smb,
 600                          * begining with the debug_count of the
 601                          * parent, before the child opens its own log
 602                          * file logserver.client. In a worst case
 603                          * scenario the size of logserver.smb would be
 604                          * checked after about 50*50=2500 messages
 605                          * (ca. 100kb).
 606                          * */
 607                         force_check_log_size();
 608
 609                 } /* end for num */
 610         } /* end while 1 */
 611
 612 /* NOTREACHED   return True; */
 613 }
 614
 615 /****************************************************************************
 616  Reload printers
 617 **************************************************************************/
 618 void reload_printers(void)
 619 {
 620         int snum;
 621         int n_services = lp_numservices();
 622         int pnum = lp_servicenumber(PRINTERS_NAME);
 623         const char *pname;
 624
 625         pcap_cache_reload();
 626
 627         /* remove stale printers */
 628         for (snum = 0; snum < n_services; snum++) {
 629                 /* avoid removing PRINTERS_NAME or non-autoloaded printers */
 630                 if (snum == pnum || !(lp_snum_ok(snum) && lp_print_ok(snum) &&
 631                                       lp_autoloaded(snum)))
 632                         continue;
 633
 634                 pname = lp_printername(snum);
 635                 if (!pcap_printername_ok(pname)) {
 636                         DEBUG(3, ("removing stale printer %s\n", pname));
 637
 638                         if (is_printer_published(NULL, snum, NULL))
 639                                 nt_printer_publish(NULL, snum, SPOOL_DS_UNPUBLISH);
 640                         del_a_printer(pname);
 641                         lp_killservice(snum);
 642                 }
 643         }
 644
 645         load_printers();
 646 }
 647
 648 /****************************************************************************
 649  Reload the services file.
 650 **************************************************************************/
 651
 652 BOOL reload_services(BOOL test)
 653 {
 654         BOOL ret;
 655
 656         if (lp_loaded()) {
 657                 pstring fname;
 658                 pstrcpy(fname,lp_configfile());
 659                 if (file_exist(fname, NULL) &&
 660                     !strcsequal(fname, dyn_CONFIGFILE)) {
 661                         pstrcpy(dyn_CONFIGFILE, fname);
 662                         test = False;
 663                 }
 664         }
 665
 666         reopen_logs();
 667
 668         if (test && !lp_file_list_changed())
 669                 return(True);
 670
 671         lp_killunused(conn_snum_used);
 672
 673         ret = lp_load(dyn_CONFIGFILE, False, False, True, True);
 674
 675         reload_printers();
 676
 677         /* perhaps the config filename is now set */
 678         if (!test)
 679                 reload_services(True);
 680
 681         reopen_logs();
 682
 683         load_interfaces();
 684
 685         if (smbd_server_fd() != -1) {
 686                 set_socket_options(smbd_server_fd(),"SO_KEEPALIVE");
 687                 set_socket_options(smbd_server_fd(), user_socket_options);
 688         }
 689
 690         mangle_reset_cache();
 691         reset_stat_cache();
 692
 693         /* this forces service parameters to be flushed */
 694         set_current_service(NULL,0,True);
 695
 696         return(ret);
 697 }
 698
 699 /****************************************************************************
 700  Exit the server.
 701 ****************************************************************************/
 702
 703 /* Reasons for shutting down a server process. */
 704 enum server_exit_reason { SERVER_EXIT_NORMAL, SERVER_EXIT_ABNORMAL };
 705
 706 static void exit_server_common(enum server_exit_reason how,
 707         const char *const reason) NORETURN_ATTRIBUTE;
 708
 709 static void exit_server_common(enum server_exit_reason how,
 710         const char *const reason)
 711 {
 712         static int firsttime=1;
 713
 714         if (!firsttime)
 715                 exit(0);
 716         firsttime = 0;
 717
 718         change_to_root_user();
 719
 720         if (negprot_global_auth_context) {
 721                 (negprot_global_auth_context->free)(&negprot_global_auth_context);
 722         }
 723
 724         conn_close_all();
 725
 726         invalidate_all_vuids();
 727
 728         print_notify_send_messages(3); /* 3 second timeout. */
 729
 730         /* delete our entry in the connections database. */
 731         yield_connection(NULL,"");
 732
 733         respond_to_all_remaining_local_messages();
 734
 735 #ifdef WITH_DFS
 736         if (dcelogin_atmost_once) {
 737                 dfs_unlogin();
 738         }
 739 #endif
 740
 741         locking_end();
 742         printing_end();
 743
 744         if (how != SERVER_EXIT_NORMAL) {
 745                 int oldlevel = DEBUGLEVEL;
 746                 char *last_inbuf = get_InBuffer();
 747
 748                 DEBUGLEVEL = 10;
 749
 750                 DEBUGSEP(0);
 751                 DEBUG(0,("Abnormal server exit: %s\n",
 752                         reason ? reason : "no explanation provided"));
 753                 DEBUGSEP(0);
 754
 755                 log_stack_trace();
 756                 if (last_inbuf) {
 757                         DEBUG(0,("Last message was %s\n", LAST_MESSAGE()));
 758                         show_msg(last_inbuf);
 759                 }
 760
 761                 DEBUGLEVEL = oldlevel;
 762                 dump_core();
 763
 764         } else {
 765                 DEBUG(3,("Server exit (%s)\n",
 766                         (reason ? reason : "normal exit")));
 767         }
 768
 769         exit(0);
 770 }
 771
 772 void exit_server(const char *const explanation)
 773 {
 774         exit_server_common(SERVER_EXIT_ABNORMAL, explanation);
 775 }
 776
 777 void exit_server_cleanly(const char *const explanation)
 778 {
 779         exit_server_common(SERVER_EXIT_NORMAL, explanation);
 780 }
 781
 782 void exit_server_fault(void)
 783 {
 784         exit_server("critical server fault");
 785 }
 786
 787 /****************************************************************************
 788  Initialise connect, service and file structs.
 789 ****************************************************************************/
 790
 791 static BOOL init_structs(void )
 792 {
 793         /*
 794          * Set the machine NETBIOS name if not already
 795          * set from the config file.
 796          */
 797
 798         if (!init_names())
 799                 return False;
 800
 801         conn_init();
 802
 803         file_init();
 804
 805         /* for RPC pipes */
 806         init_rpc_pipe_hnd();
 807
 808         init_dptrs();
 809
 810         secrets_init();
 811
 812         return True;
 813 }
 814
 815 /****************************************************************************
 816  main program.
 817 ****************************************************************************/
 818
 819 /* Declare prototype for build_options() to avoid having to run it through
 820    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
 821    prototype generation system is too complicated. */
 822
 823 extern void build_options(BOOL screen);
 824
 825  int main(int argc,const char *argv[])
 826 {
 827         /* shall I run as a daemon */
 828         static BOOL is_daemon = False;
 829         static BOOL interactive = False;
 830         static BOOL Fork = True;
 831         static BOOL no_process_group = False;
 832         static BOOL log_stdout = False;
 833         static char *ports = NULL;
 834         static char *profile_level = NULL;
 835         int opt;
 836         poptContext pc;
 837
 838         struct poptOption long_options[] = {
 839         POPT_AUTOHELP
 840         {"daemon", 'D', POPT_ARG_VAL, &is_daemon, True, "Become a daemon (default)" },
 841         {"interactive", 'i', POPT_ARG_VAL, &interactive, True, "Run interactive (not a daemon)"},
 842         {"foreground", 'F', POPT_ARG_VAL, &Fork, False, "Run daemon in foreground (for daemontools, etc.)" },
 843         {"no-process-group", '\0', POPT_ARG_VAL, &no_process_group, True, "Don't create a new process group" },
 844         {"log-stdout", 'S', POPT_ARG_VAL, &log_stdout, True, "Log to stdout" },
 845         {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
 846         {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
 847         {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
 848         POPT_COMMON_SAMBA
 849         POPT_COMMON_DYNCONFIG
 850         POPT_TABLEEND
 851         };
 852
 853         load_case_tables();
 854
 855         TimeInit();
 856
 857 #ifdef HAVE_SET_AUTH_PARAMETERS
 858         set_auth_parameters(argc,argv);
 859 #endif
 860
 861         pc = poptGetContext("smbd", argc, argv, long_options, 0);
 862
 863         while((opt = poptGetNextOpt(pc)) != -1) {
 864                 switch (opt)  {
 865                 case 'b':
 866                         build_options(True); /* Display output to screen as well as debug */
 867                         exit(0);
 868                         break;
 869                 }
 870         }
 871
 872         poptFreeContext(pc);
 873
 874 #ifdef HAVE_SETLUID
 875         /* needed for SecureWare on SCO */
 876         setluid(0);
 877 #endif
 878
 879         sec_init();
 880
 881         set_remote_machine_name("smbd", False);
 882
 883         if (interactive) {
 884                 Fork = False;
 885                 log_stdout = True;
 886         }
 887
 888         if (interactive && (DEBUGLEVEL >= 9)) {
 889                 talloc_enable_leak_report();
 890         }
 891
 892         if (log_stdout && Fork) {
 893                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
 894                 exit(1);
 895         }
 896
 897         setup_logging(argv[0],log_stdout);
 898
 899         /* we want to re-seed early to prevent time delays causing
 900            client problems at a later date. (tridge) */
 901         generate_random_buffer(NULL, 0);
 902
 903         /* make absolutely sure we run as root - to handle cases where people
 904            are crazy enough to have it setuid */
 905
 906         gain_root_privilege();
 907         gain_root_group_privilege();
 908
 909         fault_setup((void (*)(void *))exit_server_fault);
 910         dump_core_setup("smbd");
 911
 912         CatchSignal(SIGTERM , SIGNAL_CAST sig_term);
 913         CatchSignal(SIGHUP,SIGNAL_CAST sig_hup);
 914
 915         /* we are never interested in SIGPIPE */
 916         BlockSignals(True,SIGPIPE);
 917
 918 #if defined(SIGFPE)
 919         /* we are never interested in SIGFPE */
 920         BlockSignals(True,SIGFPE);
 921 #endif
 922
 923 #if defined(SIGUSR2)
 924         /* We are no longer interested in USR2 */
 925         BlockSignals(True,SIGUSR2);
 926 #endif
 927
 928         /* POSIX demands that signals are inherited. If the invoking process has
 929          * these signals masked, we will have problems, as we won't recieve them. */
 930         BlockSignals(False, SIGHUP);
 931         BlockSignals(False, SIGUSR1);
 932         BlockSignals(False, SIGTERM);
 933
 934         /* we want total control over the permissions on created files,
 935            so set our umask to 0 */
 936         umask(0);
 937
 938         init_sec_ctx();
 939
 940         reopen_logs();
 941
 942         DEBUG(0,( "smbd version %s started.\n", SAMBA_VERSION_STRING));
 943         DEBUGADD( 0, ( "%s\n", COPYRIGHT_STARTUP_MESSAGE ) );
 944
 945         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
 946                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
 947
 948         /* Output the build options to the debug log */
 949         build_options(False);
 950
 951         if (sizeof(uint16) < 2 || sizeof(uint32) < 4) {
 952                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
 953                 exit(1);
 954         }
 955
 956         /*
 957          * Do this before reload_services.
 958          */
 959
 960         if (!reload_services(False))
 961                 return(-1);
 962
 963         init_structs();
 964
 965 #ifdef WITH_PROFILE
 966         if (!profile_setup(False)) {
 967                 DEBUG(0,("ERROR: failed to setup profiling\n"));
 968                 return -1;
 969         }
 970         if (profile_level != NULL) {
 971                 int pl = atoi(profile_level);
 972                 struct process_id src;
 973
 974                 DEBUG(1, ("setting profiling level: %s\n",profile_level));
 975                 src.pid = getpid();
 976                 set_profile_level(pl, src);
 977         }
 978 #endif
 979
 980         DEBUG(3,( "loaded services\n"));
 981
 982         if (!is_daemon && !is_a_socket(0)) {
 983                 if (!interactive)
 984                         DEBUG(0,("standard input is not a socket, assuming -D option\n"));
 985
 986                 /*
 987                  * Setting is_daemon here prevents us from eventually calling
 988                  * the open_sockets_inetd()
 989                  */
 990
 991                 is_daemon = True;
 992         }
 993
 994         if (is_daemon && !interactive) {
 995                 DEBUG( 3, ( "Becoming a daemon.\n" ) );
 996                 become_daemon(Fork, no_process_group);
 997         }
 998
 999 #if HAVE_SETPGID
1000         /*
1001          * If we're interactive we want to set our own process group for
1002          * signal management.
1003          */
1004         if (interactive && !no_process_group)
1005                 setpgid( (pid_t)0, (pid_t)0);
1006 #endif
1007
1008         if (!directory_exist(lp_lockdir(), NULL))
1009                 mkdir(lp_lockdir(), 0755);
1010
1011         if (is_daemon)
1012                 pidfile_create("smbd");
1013
1014         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1015         if (!message_init())
1016                 exit(1);
1017
1018         /* Initialise the password backed before the global_sam_sid
1019            to ensure that we fetch from ldap before we make a domain sid up */
1020
1021         if(!initialize_password_db(False))
1022                 exit(1);
1023
1024         if (!secrets_init()) {
1025                 DEBUG(0, ("ERROR: smbd can not open secrets.tdb\n"));
1026                 exit(1);
1027         }
1028
1029         if(!get_global_sam_sid()) {
1030                 DEBUG(0,("ERROR: Samba cannot create a SAM SID.\n"));
1031                 exit(1);
1032         }
1033
1034         if (!session_init())
1035                 exit(1);
1036
1037         if (conn_tdb_ctx() == NULL)
1038                 exit(1);
1039
1040         if (!locking_init(0))
1041                 exit(1);
1042
1043         namecache_enable();
1044
1045         if (!init_registry())
1046                 exit(1);
1047
1048 #if 0
1049         if (!init_svcctl_db())
1050                 exit(1);
1051 #endif
1052
1053         if (!print_backend_init())
1054                 exit(1);
1055
1056         if (!init_guest_info()) {
1057                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1058                 return -1;
1059         }
1060
1061         /* Setup the main smbd so that we can get messages. */
1062         /* don't worry about general printing messages here */
1063
1064         claim_connection(NULL,"",0,True,FLAG_MSG_GENERAL|FLAG_MSG_SMBD);
1065
1066         /* only start the background queue daemon if we are
1067            running as a daemon -- bad things will happen if
1068            smbd is launched via inetd and we fork a copy of
1069            ourselves here */
1070
1071         if ( is_daemon && !interactive )
1072                 start_background_queue();
1073
1074         /* Always attempt to initialize DMAPI. We will only use it later if
1075          * lp_dmapi_support is set on the share, but we need a single global
1076          * session to work with.
1077          */
1078         dmapi_init_session();
1079
1080         if (!open_sockets_smbd(is_daemon, interactive, ports))
1081                 exit(1);
1082
1083         /*
1084          * everything after this point is run after the fork()
1085          */
1086
1087         static_init_rpc;
1088
1089         init_modules();
1090
1091         /* Possibly reload the services file. Only worth doing in
1092          * daemon mode. In inetd mode, we know we only just loaded this.
1093          */
1094         if (is_daemon) {
1095                 reload_services(True);
1096         }
1097
1098         if (!init_account_policy()) {
1099                 DEBUG(0,("Could not open account policy tdb.\n"));
1100                 exit(1);
1101         }
1102
1103         if (*lp_rootdir()) {
1104                 if (sys_chroot(lp_rootdir()) == 0)
1105                         DEBUG(2,("Changed root to %s\n", lp_rootdir()));
1106         }
1107
1108         /* Setup oplocks */
1109         if (!init_oplocks())
1110                 exit(1);
1111
1112         /* Setup aio signal handler. */
1113         initialize_async_io_handler();
1114
1115         /* register our message handlers */
1116         message_register(MSG_SMB_FORCE_TDIS, msg_force_tdis, NULL);
1117
1118         smbd_process();
1119
1120         namecache_shutdown();
1121
1122         exit_server_cleanly(NULL);
1123         return(0);
1124 }