53d615e4804f2e82472c4b1d256373ef7ddabf72
[samba.git] / source3 / 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    Copyright (C) Volker Lendecke                1993-2007
8    Copyright (C) Jeremy Allison                 1993-2007
9
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "includes.h"
25 #include "system/filesys.h"
26 #include "popt_common.h"
27 #include "smbd/smbd.h"
28 #include "smbd/globals.h"
29 #include "registry/reg_init_full.h"
30 #include "libcli/auth/schannel.h"
31 #include "secrets.h"
32 #include "memcache.h"
33 #include "ctdbd_conn.h"
34 #include "util_cluster.h"
35 #include "printing/queue_process.h"
36 #include "rpc_server/rpc_service_setup.h"
37 #include "rpc_server/rpc_config.h"
38 #include "serverid.h"
39 #include "passdb.h"
40 #include "auth.h"
41 #include "messages.h"
42 #include "smbprofile.h"
43 #include "lib/id_cache.h"
44 #include "lib/param/param.h"
45 #include "lib/background.h"
46 #include "lib/conn_tdb.h"
47 #include "../lib/util/pidfile.h"
48 #include "lib/smbd_shim.h"
49 #include "scavenger.h"
50
51 struct smbd_open_socket;
52 struct smbd_child_pid;
53
54 struct smbd_parent_context {
55         bool interactive;
56
57         struct tevent_context *ev_ctx;
58         struct messaging_context *msg_ctx;
59
60         /* the list of listening sockets */
61         struct smbd_open_socket *sockets;
62
63         /* the list of current child processes */
64         struct smbd_child_pid *children;
65         size_t num_children;
66
67         struct tevent_timer *cleanup_te;
68 };
69
70 struct smbd_open_socket {
71         struct smbd_open_socket *prev, *next;
72         struct smbd_parent_context *parent;
73         int fd;
74         struct tevent_fd *fde;
75 };
76
77 struct smbd_child_pid {
78         struct smbd_child_pid *prev, *next;
79         pid_t pid;
80 };
81
82 extern void start_epmd(struct tevent_context *ev_ctx,
83                        struct messaging_context *msg_ctx);
84
85 extern void start_lsasd(struct tevent_context *ev_ctx,
86                         struct messaging_context *msg_ctx);
87
88 #ifdef WITH_DFS
89 extern int dcelogin_atmost_once;
90 #endif /* WITH_DFS */
91
92 /*******************************************************************
93  What to do when smb.conf is updated.
94  ********************************************************************/
95
96 static void smbd_parent_conf_updated(struct messaging_context *msg,
97                                      void *private_data,
98                                      uint32_t msg_type,
99                                      struct server_id server_id,
100                                      DATA_BLOB *data)
101 {
102         struct tevent_context *ev_ctx =
103                 talloc_get_type_abort(private_data, struct tevent_context);
104
105         DEBUG(10,("smbd_parent_conf_updated: Got message saying smb.conf was "
106                   "updated. Reloading.\n"));
107         change_to_root_user();
108         reload_services(NULL, NULL, false);
109         printing_subsystem_update(ev_ctx, msg, false);
110 }
111
112 /*******************************************************************
113  What to do when printcap is updated.
114  ********************************************************************/
115
116 static void smb_pcap_updated(struct messaging_context *msg,
117                              void *private_data,
118                              uint32_t msg_type,
119                              struct server_id server_id,
120                              DATA_BLOB *data)
121 {
122         struct tevent_context *ev_ctx =
123                 talloc_get_type_abort(private_data, struct tevent_context);
124
125         DEBUG(10,("Got message saying pcap was updated. Reloading.\n"));
126         change_to_root_user();
127         delete_and_reload_printers(ev_ctx, msg);
128 }
129
130 /*******************************************************************
131  Delete a statcache entry.
132  ********************************************************************/
133
134 static void smb_stat_cache_delete(struct messaging_context *msg,
135                                   void *private_data,
136                                   uint32_t msg_tnype,
137                                   struct server_id server_id,
138                                   DATA_BLOB *data)
139 {
140         const char *name = (const char *)data->data;
141         DEBUG(10,("smb_stat_cache_delete: delete name %s\n", name));
142         stat_cache_delete(name);
143 }
144
145 /****************************************************************************
146   Send a SIGTERM to our process group.
147 *****************************************************************************/
148
149 static void  killkids(void)
150 {
151         if(am_parent) kill(0,SIGTERM);
152 }
153
154 static void msg_exit_server(struct messaging_context *msg,
155                             void *private_data,
156                             uint32_t msg_type,
157                             struct server_id server_id,
158                             DATA_BLOB *data)
159 {
160         DEBUG(3, ("got a SHUTDOWN message\n"));
161         exit_server_cleanly(NULL);
162 }
163
164 #ifdef DEVELOPER
165 static void msg_inject_fault(struct messaging_context *msg,
166                              void *private_data,
167                              uint32_t msg_type,
168                              struct server_id src,
169                              DATA_BLOB *data)
170 {
171         int sig;
172
173         if (data->length != sizeof(sig)) {
174                 DEBUG(0, ("Process %s sent bogus signal injection request\n",
175                           procid_str_static(&src)));
176                 return;
177         }
178
179         sig = *(int *)data->data;
180         if (sig == -1) {
181                 exit_server("internal error injected");
182                 return;
183         }
184
185 #if HAVE_STRSIGNAL
186         DEBUG(0, ("Process %s requested injection of signal %d (%s)\n",
187                   procid_str_static(&src), sig, strsignal(sig)));
188 #else
189         DEBUG(0, ("Process %s requested injection of signal %d\n",
190                   procid_str_static(&src), sig));
191 #endif
192
193         kill(getpid(), sig);
194 }
195 #endif /* DEVELOPER */
196
197 NTSTATUS messaging_send_to_children(struct messaging_context *msg_ctx,
198                                     uint32_t msg_type, DATA_BLOB* data)
199 {
200         NTSTATUS status;
201         struct smbd_parent_context *parent = am_parent;
202         struct smbd_child_pid *child;
203
204         if (parent == NULL) {
205                 return NT_STATUS_INTERNAL_ERROR;
206         }
207
208         for (child = parent->children; child != NULL; child = child->next) {
209                 status = messaging_send(parent->msg_ctx,
210                                         pid_to_procid(child->pid),
211                                         msg_type, data);
212                 if (!NT_STATUS_IS_OK(status)) {
213                         return status;
214                 }
215         }
216         return NT_STATUS_OK;
217 }
218
219 /*
220  * Parent smbd process sets its own debug level first and then
221  * sends a message to all the smbd children to adjust their debug
222  * level to that of the parent.
223  */
224
225 static void smbd_msg_debug(struct messaging_context *msg_ctx,
226                            void *private_data,
227                            uint32_t msg_type,
228                            struct server_id server_id,
229                            DATA_BLOB *data)
230 {
231         debug_message(msg_ctx, private_data, MSG_DEBUG, server_id, data);
232
233         messaging_send_to_children(msg_ctx, MSG_DEBUG, data);
234 }
235
236 static void smbd_parent_id_cache_kill(struct messaging_context *msg_ctx,
237                                       void *private_data,
238                                       uint32_t msg_type,
239                                       struct server_id server_id,
240                                       DATA_BLOB* data)
241 {
242         const char *msg = (data && data->data)
243                 ? (const char *)data->data : "<NULL>";
244         struct id_cache_ref id;
245
246         if (!id_cache_ref_parse(msg, &id)) {
247                 DEBUG(0, ("Invalid ?ID: %s\n", msg));
248                 return;
249         }
250
251         id_cache_delete_from_cache(&id);
252
253         messaging_send_to_children(msg_ctx, msg_type, data);
254 }
255
256 static void smbd_parent_id_cache_delete(struct messaging_context *ctx,
257                                         void* data,
258                                         uint32_t msg_type,
259                                         struct server_id srv_id,
260                                         DATA_BLOB* msg_data)
261 {
262         id_cache_delete_message(ctx, data, msg_type, srv_id, msg_data);
263
264         messaging_send_to_children(ctx, msg_type, msg_data);
265 }
266
267 struct smbd_parent_notify_state {
268         struct tevent_context *ev;
269         struct messaging_context *msg;
270         uint32_t msgtype;
271         struct notify_context *notify;
272 };
273
274 static int smbd_parent_notify_cleanup(void *private_data);
275 static void smbd_parent_notify_cleanup_done(struct tevent_req *req);
276 static void smbd_parent_notify_proxy_done(struct tevent_req *req);
277
278 static bool smbd_parent_notify_init(TALLOC_CTX *mem_ctx,
279                                     struct messaging_context *msg,
280                                     struct tevent_context *ev)
281 {
282         struct smbd_parent_notify_state *state;
283         struct tevent_req *req;
284
285         state = talloc(mem_ctx, struct smbd_parent_notify_state);
286         if (state == NULL) {
287                 return false;
288         }
289         state->msg = msg;
290         state->ev = ev;
291         state->msgtype = MSG_SMB_NOTIFY_CLEANUP;
292
293         state->notify = notify_init(state, msg, ev);
294         if (state->notify == NULL) {
295                 goto fail;
296         }
297         req = background_job_send(
298                 state, state->ev, state->msg, &state->msgtype, 1,
299                 lp_parm_int(-1, "smbd", "notify cleanup interval", 60),
300                 smbd_parent_notify_cleanup, state->notify);
301         if (req == NULL) {
302                 goto fail;
303         }
304         tevent_req_set_callback(req, smbd_parent_notify_cleanup_done, state);
305
306         if (!lp_clustering()) {
307                 return true;
308         }
309
310         req = notify_cluster_proxy_send(state, ev, state->notify);
311         if (req == NULL) {
312                 goto fail;
313         }
314         tevent_req_set_callback(req, smbd_parent_notify_proxy_done, state);
315
316         return true;
317 fail:
318         TALLOC_FREE(state);
319         return false;
320 }
321
322 static int smbd_parent_notify_cleanup(void *private_data)
323 {
324         struct notify_context *notify = talloc_get_type_abort(
325                 private_data, struct notify_context);
326         notify_cleanup(notify);
327         return lp_parm_int(-1, "smbd", "notify cleanup interval", 60);
328 }
329
330 static void smbd_parent_notify_cleanup_done(struct tevent_req *req)
331 {
332         struct smbd_parent_notify_state *state = tevent_req_callback_data(
333                 req, struct smbd_parent_notify_state);
334         NTSTATUS status;
335
336         status = background_job_recv(req);
337         TALLOC_FREE(req);
338         DEBUG(1, ("notify cleanup job ended with %s\n", nt_errstr(status)));
339
340         /*
341          * Provide self-healing: Whatever the error condition was, it
342          * will have printed it into log.smbd. Just retrying and
343          * spamming log.smbd once a minute should be fine.
344          */
345         req = background_job_send(
346                 state, state->ev, state->msg, &state->msgtype, 1, 60,
347                 smbd_parent_notify_cleanup, state->notify);
348         if (req == NULL) {
349                 DEBUG(1, ("background_job_send failed\n"));
350                 return;
351         }
352         tevent_req_set_callback(req, smbd_parent_notify_cleanup_done, state);
353 }
354
355 static void smbd_parent_notify_proxy_done(struct tevent_req *req)
356 {
357         int ret;
358
359         ret = notify_cluster_proxy_recv(req);
360         TALLOC_FREE(req);
361         DEBUG(1, ("notify proxy job ended with %s\n", strerror(ret)));
362 }
363
364 static void smb_parent_force_tdis(struct messaging_context *ctx,
365                                   void* data,
366                                   uint32_t msg_type,
367                                   struct server_id srv_id,
368                                   DATA_BLOB* msg_data)
369 {
370         messaging_send_to_children(ctx, msg_type, msg_data);
371 }
372
373 static void smb_parent_kill_client_by_ip(struct messaging_context *ctx,
374                                          void *data,
375                                          uint32_t msg_type,
376                                          struct server_id srv_id,
377                                          DATA_BLOB* msg_data)
378 {
379         if (am_parent) {
380                 messaging_send_to_children(ctx, msg_type, msg_data);
381         }
382 }
383
384 static void add_child_pid(struct smbd_parent_context *parent,
385                           pid_t pid)
386 {
387         struct smbd_child_pid *child;
388
389         child = talloc_zero(parent, struct smbd_child_pid);
390         if (child == NULL) {
391                 DEBUG(0, ("Could not add child struct -- malloc failed\n"));
392                 return;
393         }
394         child->pid = pid;
395         DLIST_ADD(parent->children, child);
396         parent->num_children += 1;
397 }
398
399 static void smb_tell_num_children(struct messaging_context *ctx, void *data,
400                                   uint32_t msg_type, struct server_id srv_id,
401                                   DATA_BLOB *msg_data)
402 {
403         uint8_t buf[sizeof(uint32_t)];
404
405         if (am_parent) {
406                 SIVAL(buf, 0, am_parent->num_children);
407                 messaging_send_buf(ctx, srv_id, MSG_SMB_NUM_CHILDREN,
408                                    buf, sizeof(buf));
409         }
410 }
411
412
413 /*
414   at most every smbd:cleanuptime seconds (default 20), we scan the BRL
415   and locking database for entries to cleanup. As a side effect this
416   also cleans up dead entries in the connections database (due to the
417   traversal in message_send_all()
418
419   Using a timer for this prevents a flood of traversals when a large
420   number of clients disconnect at the same time (perhaps due to a
421   network outage).  
422 */
423
424 static void cleanup_timeout_fn(struct tevent_context *event_ctx,
425                                 struct tevent_timer *te,
426                                 struct timeval now,
427                                 void *private_data)
428 {
429         struct smbd_parent_context *parent =
430                 talloc_get_type_abort(private_data,
431                 struct smbd_parent_context);
432
433         parent->cleanup_te = NULL;
434
435         DEBUG(1,("Cleaning up brl and lock database after unclean shutdown\n"));
436         message_send_all(parent->msg_ctx, MSG_SMB_UNLOCK, NULL, 0, NULL);
437         messaging_send_buf(parent->msg_ctx,
438                            messaging_server_id(parent->msg_ctx),
439                            MSG_SMB_BRL_VALIDATE, NULL, 0);
440 }
441
442 static void remove_child_pid(struct smbd_parent_context *parent,
443                              pid_t pid,
444                              bool unclean_shutdown)
445 {
446         struct smbd_child_pid *child;
447         struct server_id child_id;
448         NTSTATUS status;
449
450         child_id = pid_to_procid(pid);
451
452         status = messaging_dgm_cleanup(parent->msg_ctx, pid);
453         DEBUG(10, ("%s: messaging_dgm_cleanup returned %s\n",
454                    __func__, nt_errstr(status)));
455
456         for (child = parent->children; child != NULL; child = child->next) {
457                 if (child->pid == pid) {
458                         struct smbd_child_pid *tmp = child;
459                         DLIST_REMOVE(parent->children, child);
460                         TALLOC_FREE(tmp);
461                         parent->num_children -= 1;
462                         break;
463                 }
464         }
465
466         if (child == NULL) {
467                 /* not all forked child processes are added to the children list */
468                 DEBUG(2, ("Could not find child %d -- ignoring\n", (int)pid));
469                 return;
470         }
471
472         if (unclean_shutdown) {
473                 /* a child terminated uncleanly so tickle all
474                    processes to see if they can grab any of the
475                    pending locks
476                 */
477                 DEBUG(3,(__location__ " Unclean shutdown of pid %u\n",
478                         (unsigned int)pid));
479                 if (parent->cleanup_te == NULL) {
480                         /* call the cleanup timer, but not too often */
481                         int cleanup_time = lp_parm_int(-1, "smbd", "cleanuptime", 20);
482                         parent->cleanup_te = tevent_add_timer(parent->ev_ctx,
483                                                 parent,
484                                                 timeval_current_ofs(cleanup_time, 0),
485                                                 cleanup_timeout_fn,
486                                                 parent);
487                         DEBUG(1,("Scheduled cleanup of brl and lock database after unclean shutdown\n"));
488                 }
489         }
490
491         if (!serverid_deregister(child_id)) {
492                 DEBUG(1, ("Could not remove pid %d from serverid.tdb\n",
493                           (int)pid));
494         }
495 }
496
497 /****************************************************************************
498  Have we reached the process limit ?
499 ****************************************************************************/
500
501 static bool allowable_number_of_smbd_processes(struct smbd_parent_context *parent)
502 {
503         int max_processes = lp_max_smbd_processes();
504
505         if (!max_processes)
506                 return True;
507
508         return parent->num_children < max_processes;
509 }
510
511 static void smbd_sig_chld_handler(struct tevent_context *ev,
512                                   struct tevent_signal *se,
513                                   int signum,
514                                   int count,
515                                   void *siginfo,
516                                   void *private_data)
517 {
518         pid_t pid;
519         int status;
520         struct smbd_parent_context *parent =
521                 talloc_get_type_abort(private_data,
522                 struct smbd_parent_context);
523
524         while ((pid = sys_waitpid(-1, &status, WNOHANG)) > 0) {
525                 bool unclean_shutdown = False;
526
527                 /* If the child terminated normally, assume
528                    it was an unclean shutdown unless the
529                    status is 0
530                 */
531                 if (WIFEXITED(status)) {
532                         unclean_shutdown = WEXITSTATUS(status);
533                 }
534                 /* If the child terminated due to a signal
535                    we always assume it was unclean.
536                 */
537                 if (WIFSIGNALED(status)) {
538                         unclean_shutdown = True;
539                 }
540                 remove_child_pid(parent, pid, unclean_shutdown);
541         }
542 }
543
544 static void smbd_setup_sig_chld_handler(struct smbd_parent_context *parent)
545 {
546         struct tevent_signal *se;
547
548         se = tevent_add_signal(parent->ev_ctx,
549                                parent, /* mem_ctx */
550                                SIGCHLD, 0,
551                                smbd_sig_chld_handler,
552                                parent);
553         if (!se) {
554                 exit_server("failed to setup SIGCHLD handler");
555         }
556 }
557
558 static void smbd_open_socket_close_fn(struct tevent_context *ev,
559                                       struct tevent_fd *fde,
560                                       int fd,
561                                       void *private_data)
562 {
563         /* this might be the socket_wrapper swrap_close() */
564         close(fd);
565 }
566
567 static void smbd_accept_connection(struct tevent_context *ev,
568                                    struct tevent_fd *fde,
569                                    uint16_t flags,
570                                    void *private_data)
571 {
572         struct smbd_open_socket *s = talloc_get_type_abort(private_data,
573                                      struct smbd_open_socket);
574         struct messaging_context *msg_ctx = s->parent->msg_ctx;
575         struct sockaddr_storage addr;
576         socklen_t in_addrlen = sizeof(addr);
577         int fd;
578         pid_t pid = 0;
579         uint64_t unique_id;
580
581         fd = accept(s->fd, (struct sockaddr *)(void *)&addr,&in_addrlen);
582         if (fd == -1 && errno == EINTR)
583                 return;
584
585         if (fd == -1) {
586                 DEBUG(0,("accept: %s\n",
587                          strerror(errno)));
588                 return;
589         }
590
591         if (s->parent->interactive) {
592                 reinit_after_fork(msg_ctx, ev, true);
593                 smbd_process(ev, msg_ctx, fd, true);
594                 exit_server_cleanly("end of interactive mode");
595                 return;
596         }
597
598         if (!allowable_number_of_smbd_processes(s->parent)) {
599                 close(fd);
600                 return;
601         }
602
603         /*
604          * Generate a unique id in the parent process so that we use
605          * the global random state in the parent.
606          */
607         unique_id = serverid_get_random_unique_id();
608
609         pid = fork();
610         if (pid == 0) {
611                 NTSTATUS status = NT_STATUS_OK;
612
613                 /* Child code ... */
614                 am_parent = NULL;
615
616                 /*
617                  * Can't use TALLOC_FREE here. Nulling out the argument to it
618                  * would overwrite memory we've just freed.
619                  */
620                 talloc_free(s->parent);
621                 s = NULL;
622
623                 set_my_unique_id(unique_id);
624
625                 /* Stop zombies, the parent explicitly handles
626                  * them, counting worker smbds. */
627                 CatchChild();
628
629                 status = reinit_after_fork(msg_ctx,
630                                            ev,
631                                            true);
632                 if (!NT_STATUS_IS_OK(status)) {
633                         if (NT_STATUS_EQUAL(status,
634                                             NT_STATUS_TOO_MANY_OPENED_FILES)) {
635                                 DEBUG(0,("child process cannot initialize "
636                                          "because too many files are open\n"));
637                                 goto exit;
638                         }
639                         if (lp_clustering() &&
640                             NT_STATUS_EQUAL(status,
641                             NT_STATUS_INTERNAL_DB_ERROR)) {
642                                 DEBUG(1,("child process cannot initialize "
643                                          "because connection to CTDB "
644                                          "has failed\n"));
645                                 goto exit;
646                         }
647
648                         DEBUG(0,("reinit_after_fork() failed\n"));
649                         smb_panic("reinit_after_fork() failed");
650                 }
651
652                 smbd_process(ev, msg_ctx, fd, false);
653          exit:
654                 exit_server_cleanly("end of child");
655                 return;
656         }
657
658         if (pid < 0) {
659                 DEBUG(0,("smbd_accept_connection: fork() failed: %s\n",
660                          strerror(errno)));
661         }
662
663         /* The parent doesn't need this socket */
664         close(fd);
665
666         /* Sun May 6 18:56:14 2001 ackley@cs.unm.edu:
667                 Clear the closed fd info out of server_fd --
668                 and more importantly, out of client_fd in
669                 util_sock.c, to avoid a possible
670                 getpeername failure if we reopen the logs
671                 and use %I in the filename.
672         */
673
674         if (pid != 0) {
675                 add_child_pid(s->parent, pid);
676         }
677
678         /* Force parent to check log size after
679          * spawning child.  Fix from
680          * klausr@ITAP.Physik.Uni-Stuttgart.De.  The
681          * parent smbd will log to logserver.smb.  It
682          * writes only two messages for each child
683          * started/finished. But each child writes,
684          * say, 50 messages also in logserver.smb,
685          * begining with the debug_count of the
686          * parent, before the child opens its own log
687          * file logserver.client. In a worst case
688          * scenario the size of logserver.smb would be
689          * checked after about 50*50=2500 messages
690          * (ca. 100kb).
691          * */
692         force_check_log_size();
693 }
694
695 static bool smbd_open_one_socket(struct smbd_parent_context *parent,
696                                  struct tevent_context *ev_ctx,
697                                  const struct sockaddr_storage *ifss,
698                                  uint16_t port)
699 {
700         struct smbd_open_socket *s;
701
702         s = talloc(parent, struct smbd_open_socket);
703         if (!s) {
704                 return false;
705         }
706
707         s->parent = parent;
708         s->fd = open_socket_in(SOCK_STREAM,
709                                port,
710                                parent->sockets == NULL ? 0 : 2,
711                                ifss,
712                                true);
713         if (s->fd == -1) {
714                 DEBUG(0,("smbd_open_once_socket: open_socket_in: "
715                         "%s\n", strerror(errno)));
716                 TALLOC_FREE(s);
717                 /*
718                  * We ignore an error here, as we've done before
719                  */
720                 return true;
721         }
722
723         /* ready to listen */
724         set_socket_options(s->fd, "SO_KEEPALIVE");
725         set_socket_options(s->fd, lp_socket_options());
726
727         /* Set server socket to
728          * non-blocking for the accept. */
729         set_blocking(s->fd, False);
730
731         if (listen(s->fd, SMBD_LISTEN_BACKLOG) == -1) {
732                 DEBUG(0,("open_sockets_smbd: listen: "
733                         "%s\n", strerror(errno)));
734                         close(s->fd);
735                 TALLOC_FREE(s);
736                 return false;
737         }
738
739         s->fde = tevent_add_fd(ev_ctx,
740                                s,
741                                s->fd, TEVENT_FD_READ,
742                                smbd_accept_connection,
743                                s);
744         if (!s->fde) {
745                 DEBUG(0,("open_sockets_smbd: "
746                          "tevent_add_fd: %s\n",
747                          strerror(errno)));
748                 close(s->fd);
749                 TALLOC_FREE(s);
750                 return false;
751         }
752         tevent_fd_set_close_fn(s->fde, smbd_open_socket_close_fn);
753
754         DLIST_ADD_END(parent->sockets, s, struct smbd_open_socket *);
755
756         return true;
757 }
758
759 /****************************************************************************
760  Open the socket communication.
761 ****************************************************************************/
762
763 static bool open_sockets_smbd(struct smbd_parent_context *parent,
764                               struct tevent_context *ev_ctx,
765                               struct messaging_context *msg_ctx,
766                               const char *smb_ports)
767 {
768         int num_interfaces = iface_count();
769         int i,j;
770         const char **ports;
771         unsigned dns_port = 0;
772
773 #ifdef HAVE_ATEXIT
774         atexit(killkids);
775 #endif
776
777         /* Stop zombies */
778         smbd_setup_sig_chld_handler(parent);
779
780         ports = lp_smb_ports();
781
782         /* use a reasonable default set of ports - listing on 445 and 139 */
783         if (smb_ports) {
784                 ports = (const char **)str_list_make_v3(talloc_tos(), smb_ports, NULL);
785         }
786
787         for (j = 0; ports && ports[j]; j++) {
788                 unsigned port = atoi(ports[j]);
789
790                 if (port == 0 || port > 0xffff) {
791                         exit_server_cleanly("Invalid port in the config or on "
792                                             "the commandline specified!");
793                 }
794         }
795
796         if (lp_interfaces() && lp_bind_interfaces_only()) {
797                 /* We have been given an interfaces line, and been
798                    told to only bind to those interfaces. Create a
799                    socket per interface and bind to only these.
800                 */
801
802                 /* Now open a listen socket for each of the
803                    interfaces. */
804                 for(i = 0; i < num_interfaces; i++) {
805                         const struct sockaddr_storage *ifss =
806                                         iface_n_sockaddr_storage(i);
807                         if (ifss == NULL) {
808                                 DEBUG(0,("open_sockets_smbd: "
809                                         "interface %d has NULL IP address !\n",
810                                         i));
811                                 continue;
812                         }
813
814                         for (j = 0; ports && ports[j]; j++) {
815                                 unsigned port = atoi(ports[j]);
816
817                                 /* Keep the first port for mDNS service
818                                  * registration.
819                                  */
820                                 if (dns_port == 0) {
821                                         dns_port = port;
822                                 }
823
824                                 if (!smbd_open_one_socket(parent,
825                                                           ev_ctx,
826                                                           ifss,
827                                                           port)) {
828                                         return false;
829                                 }
830                         }
831                 }
832         } else {
833                 /* Just bind to 0.0.0.0 - accept connections
834                    from anywhere. */
835
836                 const char *sock_addr;
837                 char *sock_tok;
838                 const char *sock_ptr;
839
840 #if HAVE_IPV6
841                 sock_addr = "::,0.0.0.0";
842 #else
843                 sock_addr = "0.0.0.0";
844 #endif
845
846                 for (sock_ptr=sock_addr;
847                      next_token_talloc(talloc_tos(), &sock_ptr, &sock_tok, " \t,"); ) {
848                         for (j = 0; ports && ports[j]; j++) {
849                                 struct sockaddr_storage ss;
850                                 unsigned port = atoi(ports[j]);
851
852                                 /* Keep the first port for mDNS service
853                                  * registration.
854                                  */
855                                 if (dns_port == 0) {
856                                         dns_port = port;
857                                 }
858
859                                 /* open an incoming socket */
860                                 if (!interpret_string_addr(&ss, sock_tok,
861                                                 AI_NUMERICHOST|AI_PASSIVE)) {
862                                         continue;
863                                 }
864
865                                 /*
866                                  * If we fail to open any sockets
867                                  * in this loop the parent-sockets == NULL
868                                  * case below will prevent us from starting.
869                                  */
870
871                                 (void)smbd_open_one_socket(parent,
872                                                   ev_ctx,
873                                                   &ss,
874                                                   port);
875                         }
876                 }
877         }
878
879         if (parent->sockets == NULL) {
880                 DEBUG(0,("open_sockets_smbd: No "
881                         "sockets available to bind to.\n"));
882                 return false;
883         }
884
885         /* Setup the main smbd so that we can get messages. Note that
886            do this after starting listening. This is needed as when in
887            clustered mode, ctdb won't allow us to start doing database
888            operations until it has gone thru a full startup, which
889            includes checking to see that smbd is listening. */
890
891         if (!serverid_register(messaging_server_id(msg_ctx),
892                                FLAG_MSG_GENERAL|FLAG_MSG_SMBD
893                                |FLAG_MSG_PRINT_GENERAL
894                                |FLAG_MSG_DBWRAP)) {
895                 DEBUG(0, ("open_sockets_smbd: Failed to register "
896                           "myself in serverid.tdb\n"));
897                 return false;
898         }
899
900         /* Listen to messages */
901
902         messaging_register(msg_ctx, NULL, MSG_SHUTDOWN, msg_exit_server);
903         messaging_register(msg_ctx, ev_ctx, MSG_SMB_CONF_UPDATED,
904                            smbd_parent_conf_updated);
905         messaging_register(msg_ctx, NULL, MSG_SMB_STAT_CACHE_DELETE,
906                            smb_stat_cache_delete);
907         messaging_register(msg_ctx, NULL, MSG_DEBUG, smbd_msg_debug);
908         messaging_register(msg_ctx, ev_ctx, MSG_PRINTER_PCAP,
909                            smb_pcap_updated);
910         messaging_register(msg_ctx, NULL, MSG_SMB_BRL_VALIDATE,
911                            brl_revalidate);
912         messaging_register(msg_ctx, NULL, MSG_SMB_FORCE_TDIS,
913                            smb_parent_force_tdis);
914         messaging_register(msg_ctx, NULL, MSG_SMB_KILL_CLIENT_IP,
915                            smb_parent_kill_client_by_ip);
916         messaging_register(msg_ctx, NULL, MSG_SMB_TELL_NUM_CHILDREN,
917                            smb_tell_num_children);
918
919         messaging_register(msg_ctx, NULL,
920                            ID_CACHE_DELETE, smbd_parent_id_cache_delete);
921         messaging_register(msg_ctx, NULL,
922                            ID_CACHE_KILL, smbd_parent_id_cache_kill);
923
924         if (lp_clustering()) {
925                 ctdbd_register_reconfigure(messaging_ctdbd_connection());
926         }
927
928 #ifdef DEVELOPER
929         messaging_register(msg_ctx, NULL, MSG_SMB_INJECT_FAULT,
930                            msg_inject_fault);
931 #endif
932
933         if (lp_multicast_dns_register() && (dns_port != 0)) {
934 #ifdef WITH_DNSSD_SUPPORT
935                 smbd_setup_mdns_registration(ev_ctx,
936                                              parent, dns_port);
937 #endif
938 #ifdef WITH_AVAHI_SUPPORT
939                 void *avahi_conn;
940
941                 avahi_conn = avahi_start_register(ev_ctx,
942                                                   ev_ctx,
943                                                   dns_port);
944                 if (avahi_conn == NULL) {
945                         DEBUG(10, ("avahi_start_register failed\n"));
946                 }
947 #endif
948         }
949
950         return true;
951 }
952
953
954 /*
955   handle stdin becoming readable when we are in --foreground mode
956  */
957 static void smbd_stdin_handler(struct tevent_context *ev,
958                                struct tevent_fd *fde,
959                                uint16_t flags,
960                                void *private_data)
961 {
962         char c;
963         if (read(0, &c, 1) != 1) {
964                 /* we have reached EOF on stdin, which means the
965                    parent has exited. Shutdown the server */
966                 exit_server_cleanly("EOF on stdin");
967         }
968 }
969
970 static void smbd_parent_loop(struct tevent_context *ev_ctx,
971                              struct smbd_parent_context *parent)
972 {
973         /* now accept incoming connections - forking a new process
974            for each incoming connection */
975         DEBUG(2,("waiting for connections\n"));
976         while (1) {
977                 int ret;
978                 TALLOC_CTX *frame = talloc_stackframe();
979
980                 ret = tevent_loop_once(ev_ctx);
981                 if (ret != 0) {
982                         exit_server_cleanly("tevent_loop_once() error");
983                 }
984
985                 TALLOC_FREE(frame);
986         } /* end while 1 */
987
988 /* NOTREACHED   return True; */
989 }
990
991
992 /****************************************************************************
993  Initialise connect, service and file structs.
994 ****************************************************************************/
995
996 static bool init_structs(void )
997 {
998         /*
999          * Set the machine NETBIOS name if not already
1000          * set from the config file.
1001          */
1002
1003         if (!init_names())
1004                 return False;
1005
1006         if (!secrets_init())
1007                 return False;
1008
1009         return True;
1010 }
1011
1012 static void smbd_parent_sig_term_handler(struct tevent_context *ev,
1013                                          struct tevent_signal *se,
1014                                          int signum,
1015                                          int count,
1016                                          void *siginfo,
1017                                          void *private_data)
1018 {
1019         exit_server_cleanly("termination signal");
1020 }
1021
1022 static void smbd_parent_sig_hup_handler(struct tevent_context *ev,
1023                                         struct tevent_signal *se,
1024                                         int signum,
1025                                         int count,
1026                                         void *siginfo,
1027                                         void *private_data)
1028 {
1029         struct smbd_parent_context *parent =
1030                 talloc_get_type_abort(private_data,
1031                 struct smbd_parent_context);
1032
1033         change_to_root_user();
1034         DEBUG(1,("parent: Reloading services after SIGHUP\n"));
1035         reload_services(NULL, NULL, false);
1036
1037         printing_subsystem_update(parent->ev_ctx, parent->msg_ctx, true);
1038 }
1039
1040 /****************************************************************************
1041  main program.
1042 ****************************************************************************/
1043
1044 /* Declare prototype for build_options() to avoid having to run it through
1045    mkproto.h.  Mixing $(builddir) and $(srcdir) source files in the current
1046    prototype generation system is too complicated. */
1047
1048 extern void build_options(bool screen);
1049
1050  int main(int argc,const char *argv[])
1051 {
1052         /* shall I run as a daemon */
1053         bool is_daemon = false;
1054         bool interactive = false;
1055         bool Fork = true;
1056         bool no_process_group = false;
1057         bool log_stdout = false;
1058         char *ports = NULL;
1059         char *profile_level = NULL;
1060         int opt;
1061         poptContext pc;
1062         bool print_build_options = False;
1063         enum {
1064                 OPT_DAEMON = 1000,
1065                 OPT_INTERACTIVE,
1066                 OPT_FORK,
1067                 OPT_NO_PROCESS_GROUP,
1068                 OPT_LOG_STDOUT
1069         };
1070         struct poptOption long_options[] = {
1071         POPT_AUTOHELP
1072         {"daemon", 'D', POPT_ARG_NONE, NULL, OPT_DAEMON, "Become a daemon (default)" },
1073         {"interactive", 'i', POPT_ARG_NONE, NULL, OPT_INTERACTIVE, "Run interactive (not a daemon)"},
1074         {"foreground", 'F', POPT_ARG_NONE, NULL, OPT_FORK, "Run daemon in foreground (for daemontools, etc.)" },
1075         {"no-process-group", '\0', POPT_ARG_NONE, NULL, OPT_NO_PROCESS_GROUP, "Don't create a new process group" },
1076         {"log-stdout", 'S', POPT_ARG_NONE, NULL, OPT_LOG_STDOUT, "Log to stdout" },
1077         {"build-options", 'b', POPT_ARG_NONE, NULL, 'b', "Print build options" },
1078         {"port", 'p', POPT_ARG_STRING, &ports, 0, "Listen on the specified ports"},
1079         {"profiling-level", 'P', POPT_ARG_STRING, &profile_level, 0, "Set profiling level","PROFILE_LEVEL"},
1080         POPT_COMMON_SAMBA
1081         POPT_TABLEEND
1082         };
1083         struct smbd_parent_context *parent = NULL;
1084         TALLOC_CTX *frame;
1085         NTSTATUS status;
1086         struct tevent_context *ev_ctx;
1087         struct messaging_context *msg_ctx;
1088         struct server_id server_id;
1089         struct tevent_signal *se;
1090         char *np_dir = NULL;
1091         static const struct smbd_shim smbd_shim_fns =
1092         {
1093                 .cancel_pending_lock_requests_by_fid = smbd_cancel_pending_lock_requests_by_fid,
1094                 .send_stat_cache_delete_message = smbd_send_stat_cache_delete_message,
1095                 .change_to_root_user = smbd_change_to_root_user,
1096                 .become_authenticated_pipe_user = smbd_become_authenticated_pipe_user,
1097                 .unbecome_authenticated_pipe_user = smbd_unbecome_authenticated_pipe_user,
1098
1099                 .contend_level2_oplocks_begin = smbd_contend_level2_oplocks_begin,
1100                 .contend_level2_oplocks_end = smbd_contend_level2_oplocks_end,
1101
1102                 .become_root = smbd_become_root,
1103                 .unbecome_root = smbd_unbecome_root,
1104
1105                 .exit_server = smbd_exit_server,
1106                 .exit_server_cleanly = smbd_exit_server_cleanly,
1107         };
1108
1109         /*
1110          * Do this before any other talloc operation
1111          */
1112         talloc_enable_null_tracking();
1113         frame = talloc_stackframe();
1114
1115         setup_logging(argv[0], DEBUG_DEFAULT_STDOUT);
1116
1117         load_case_tables();
1118
1119         set_smbd_shim(&smbd_shim_fns);
1120
1121         smbd_init_globals();
1122
1123         TimeInit();
1124
1125 #ifdef HAVE_SET_AUTH_PARAMETERS
1126         set_auth_parameters(argc,argv);
1127 #endif
1128
1129         pc = poptGetContext("smbd", argc, argv, long_options, 0);
1130         while((opt = poptGetNextOpt(pc)) != -1) {
1131                 switch (opt)  {
1132                 case OPT_DAEMON:
1133                         is_daemon = true;
1134                         break;
1135                 case OPT_INTERACTIVE:
1136                         interactive = true;
1137                         break;
1138                 case OPT_FORK:
1139                         Fork = false;
1140                         break;
1141                 case OPT_NO_PROCESS_GROUP:
1142                         no_process_group = true;
1143                         break;
1144                 case OPT_LOG_STDOUT:
1145                         log_stdout = true;
1146                         break;
1147                 case 'b':
1148                         print_build_options = True;
1149                         break;
1150                 default:
1151                         d_fprintf(stderr, "\nInvalid option %s: %s\n\n",
1152                                   poptBadOption(pc, 0), poptStrerror(opt));
1153                         poptPrintUsage(pc, stderr, 0);
1154                         exit(1);
1155                 }
1156         }
1157         poptFreeContext(pc);
1158
1159         if (interactive) {
1160                 Fork = False;
1161                 log_stdout = True;
1162         }
1163
1164         if (log_stdout) {
1165                 setup_logging(argv[0], DEBUG_STDOUT);
1166         } else {
1167                 setup_logging(argv[0], DEBUG_FILE);
1168         }
1169
1170         if (print_build_options) {
1171                 build_options(True); /* Display output to screen as well as debug */
1172                 exit(0);
1173         }
1174
1175 #ifdef HAVE_SETLUID
1176         /* needed for SecureWare on SCO */
1177         setluid(0);
1178 #endif
1179
1180         set_remote_machine_name("smbd", False);
1181
1182         if (interactive && (DEBUGLEVEL >= 9)) {
1183                 talloc_enable_leak_report();
1184         }
1185
1186         if (log_stdout && Fork) {
1187                 DEBUG(0,("ERROR: Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n"));
1188                 exit(1);
1189         }
1190
1191         /* we want to re-seed early to prevent time delays causing
1192            client problems at a later date. (tridge) */
1193         generate_random_buffer(NULL, 0);
1194
1195         /* get initial effective uid and gid */
1196         sec_init();
1197
1198         /* make absolutely sure we run as root - to handle cases where people
1199            are crazy enough to have it setuid */
1200         gain_root_privilege();
1201         gain_root_group_privilege();
1202
1203         fault_setup();
1204         dump_core_setup("smbd", lp_logfile(talloc_tos()));
1205
1206         /* we are never interested in SIGPIPE */
1207         BlockSignals(True,SIGPIPE);
1208
1209 #if defined(SIGFPE)
1210         /* we are never interested in SIGFPE */
1211         BlockSignals(True,SIGFPE);
1212 #endif
1213
1214 #if defined(SIGUSR2)
1215         /* We are no longer interested in USR2 */
1216         BlockSignals(True,SIGUSR2);
1217 #endif
1218
1219         /* POSIX demands that signals are inherited. If the invoking process has
1220          * these signals masked, we will have problems, as we won't recieve them. */
1221         BlockSignals(False, SIGHUP);
1222         BlockSignals(False, SIGUSR1);
1223         BlockSignals(False, SIGTERM);
1224
1225         /* Ensure we leave no zombies until we
1226          * correctly set up child handling below. */
1227
1228         CatchChild();
1229
1230         /* we want total control over the permissions on created files,
1231            so set our umask to 0 */
1232         umask(0);
1233
1234         reopen_logs();
1235
1236         DEBUG(0,("smbd version %s started.\n", samba_version_string()));
1237         DEBUGADD(0,("%s\n", COPYRIGHT_STARTUP_MESSAGE));
1238
1239         DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
1240                  (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
1241
1242         /* Output the build options to the debug log */ 
1243         build_options(False);
1244
1245         if (sizeof(uint16) < 2 || sizeof(uint32) < 4) {
1246                 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
1247                 exit(1);
1248         }
1249
1250         if (!lp_load_initial_only(get_dyn_CONFIGFILE())) {
1251                 DEBUG(0, ("error opening config file '%s'\n", get_dyn_CONFIGFILE()));
1252                 exit(1);
1253         }
1254
1255         if (!cluster_probe_ok()) {
1256                 exit(1);
1257         }
1258
1259         /* Init the security context and global current_user */
1260         init_sec_ctx();
1261
1262         /*
1263          * Initialize the event context. The event context needs to be
1264          * initialized before the messaging context, cause the messaging
1265          * context holds an event context.
1266          * FIXME: This should be s3_tevent_context_init()
1267          */
1268         ev_ctx = server_event_context();
1269         if (ev_ctx == NULL) {
1270                 exit(1);
1271         }
1272
1273         /*
1274          * Init the messaging context
1275          * FIXME: This should only call messaging_init()
1276          */
1277         msg_ctx = server_messaging_context();
1278         if (msg_ctx == NULL) {
1279                 exit(1);
1280         }
1281
1282         /*
1283          * Reloading of the printers will not work here as we don't have a
1284          * server info and rpc services set up. It will be called later.
1285          */
1286         if (!reload_services(NULL, NULL, false)) {
1287                 exit(1);
1288         }
1289
1290         if (lp_server_role() == ROLE_ACTIVE_DIRECTORY_DC
1291             && !lp_parm_bool(-1, "server role check", "inhibit", false)) {
1292                 DEBUG(0, ("server role = 'active directory domain controller' not compatible with running smbd standalone. \n"));
1293                 DEBUGADD(0, ("You should start 'samba' instead, and it will control starting smbd if required\n"));
1294                 exit(1);
1295         }
1296
1297         /* ...NOTE... Log files are working from this point! */
1298
1299         DEBUG(3,("loaded services\n"));
1300
1301         init_structs();
1302
1303 #ifdef WITH_PROFILE
1304         if (!profile_setup(msg_ctx, False)) {
1305                 DEBUG(0,("ERROR: failed to setup profiling\n"));
1306                 return -1;
1307         }
1308         if (profile_level != NULL) {
1309                 int pl = atoi(profile_level);
1310                 struct server_id src;
1311
1312                 DEBUG(1, ("setting profiling level: %s\n",profile_level));
1313                 src.pid = getpid();
1314                 set_profile_level(pl, src);
1315         }
1316 #endif
1317
1318         if (!is_daemon && !is_a_socket(0)) {
1319                 if (!interactive) {
1320                         DEBUG(3, ("Standard input is not a socket, "
1321                                   "assuming -D option\n"));
1322                 }
1323
1324                 /*
1325                  * Setting is_daemon here prevents us from eventually calling
1326                  * the open_sockets_inetd()
1327                  */
1328
1329                 is_daemon = True;
1330         }
1331
1332         if (is_daemon && !interactive) {
1333                 DEBUG(3, ("Becoming a daemon.\n"));
1334                 become_daemon(Fork, no_process_group, log_stdout);
1335         }
1336
1337         set_my_unique_id(serverid_get_random_unique_id());
1338
1339 #if HAVE_SETPGID
1340         /*
1341          * If we're interactive we want to set our own process group for
1342          * signal management.
1343          */
1344         if (interactive && !no_process_group)
1345                 setpgid( (pid_t)0, (pid_t)0);
1346 #endif
1347
1348         if (!directory_exist(lp_lock_directory()))
1349                 mkdir(lp_lock_directory(), 0755);
1350
1351         if (!directory_exist(lp_pid_directory()))
1352                 mkdir(lp_pid_directory(), 0755);
1353
1354         if (is_daemon)
1355                 pidfile_create(lp_pid_directory(), "smbd");
1356
1357         status = reinit_after_fork(msg_ctx,
1358                                    ev_ctx,
1359                                    false);
1360         if (!NT_STATUS_IS_OK(status)) {
1361                 exit_daemon("reinit_after_fork() failed", map_errno_from_nt_status(status));
1362         }
1363
1364         if (!interactive) {
1365                 /*
1366                  * Do not initialize the parent-child-pipe before becoming a
1367                  * daemon: this is used to detect a died parent in the child
1368                  * process.
1369                  */
1370                 status = init_before_fork();
1371                 if (!NT_STATUS_IS_OK(status)) {
1372                         exit_daemon(nt_errstr(status), map_errno_from_nt_status(status));
1373                 }
1374         }
1375
1376         parent = talloc_zero(ev_ctx, struct smbd_parent_context);
1377         if (!parent) {
1378                 exit_server("talloc(struct smbd_parent_context) failed");
1379         }
1380         parent->interactive = interactive;
1381         parent->ev_ctx = ev_ctx;
1382         parent->msg_ctx = msg_ctx;
1383         am_parent = parent;
1384
1385         se = tevent_add_signal(parent->ev_ctx,
1386                                parent,
1387                                SIGTERM, 0,
1388                                smbd_parent_sig_term_handler,
1389                                parent);
1390         if (!se) {
1391                 exit_server("failed to setup SIGTERM handler");
1392         }
1393         se = tevent_add_signal(parent->ev_ctx,
1394                                parent,
1395                                SIGHUP, 0,
1396                                smbd_parent_sig_hup_handler,
1397                                parent);
1398         if (!se) {
1399                 exit_server("failed to setup SIGHUP handler");
1400         }
1401
1402         /* Setup all the TDB's - including CLEAR_IF_FIRST tdb's. */
1403
1404         if (smbd_memcache() == NULL) {
1405                 exit_daemon("no memcache available", EACCES);
1406         }
1407
1408         memcache_set_global(smbd_memcache());
1409
1410         /* Initialise the password backed before the global_sam_sid
1411            to ensure that we fetch from ldap before we make a domain sid up */
1412
1413         if(!initialize_password_db(false, ev_ctx))
1414                 exit(1);
1415
1416         if (!secrets_init()) {
1417                 exit_daemon("smbd can not open secrets.tdb", EACCES);
1418         }
1419
1420         if (lp_server_role() == ROLE_DOMAIN_BDC || lp_server_role() == ROLE_DOMAIN_PDC) {
1421                 struct loadparm_context *lp_ctx = loadparm_init_s3(NULL, loadparm_s3_helpers());
1422                 if (!open_schannel_session_store(NULL, lp_ctx)) {
1423                         exit_daemon("ERROR: Samba cannot open schannel store for secured NETLOGON operations.", EACCES);
1424                 }
1425                 TALLOC_FREE(lp_ctx);
1426         }
1427
1428         if(!get_global_sam_sid()) {
1429                 exit_daemon("Samba cannot create a SAM SID", EACCES);
1430         }
1431
1432         server_id = messaging_server_id(msg_ctx);
1433         status = smbXsrv_version_global_init(&server_id);
1434         if (!NT_STATUS_IS_OK(status)) {
1435                 exit_daemon("Samba cannot init server context", EACCES);
1436         }
1437
1438         status = smbXsrv_session_global_init();
1439         if (!NT_STATUS_IS_OK(status)) {
1440                 exit_daemon("Samba cannot init session context", EACCES);
1441         }
1442
1443         status = smbXsrv_tcon_global_init();
1444         if (!NT_STATUS_IS_OK(status)) {
1445                 exit_daemon("Samba cannot init tcon context", EACCES);
1446         }
1447
1448         if (!locking_init())
1449                 exit_daemon("Samba cannot init locking", EACCES);
1450
1451         if (!smbd_parent_notify_init(NULL, msg_ctx, ev_ctx)) {
1452                 exit_daemon("Samba cannot init notification", EACCES);
1453         }
1454
1455         if (!messaging_parent_dgm_cleanup_init(msg_ctx)) {
1456                 exit(1);
1457         }
1458
1459         if (!smbd_scavenger_init(NULL, msg_ctx, ev_ctx)) {
1460                 exit_daemon("Samba cannot init scavenging", EACCES);
1461         }
1462
1463         if (!serverid_parent_init(ev_ctx)) {
1464                 exit_daemon("Samba cannot init server id", EACCES);
1465         }
1466
1467         if (!W_ERROR_IS_OK(registry_init_full()))
1468                 exit_daemon("Samba cannot init registry", EACCES);
1469
1470         /* Open the share_info.tdb here, so we don't have to open
1471            after the fork on every single connection.  This is a small
1472            performance improvment and reduces the total number of system
1473            fds used. */
1474         if (!share_info_db_init()) {
1475                 exit_daemon("ERROR: failed to load share info db.", EACCES);
1476         }
1477
1478         status = init_system_session_info();
1479         if (!NT_STATUS_IS_OK(status)) {
1480                 DEBUG(1, ("ERROR: failed to setup system user info: %s.\n",
1481                           nt_errstr(status)));
1482                 return -1;
1483         }
1484
1485         if (!init_guest_info()) {
1486                 DEBUG(0,("ERROR: failed to setup guest info.\n"));
1487                 return -1;
1488         }
1489
1490         if (!file_init_global()) {
1491                 DEBUG(0, ("ERROR: file_init_global() failed\n"));
1492                 return -1;
1493         }
1494         status = smbXsrv_open_global_init();
1495         if (!NT_STATUS_IS_OK(status)) {
1496                 exit_daemon("Samba cannot init global open", map_errno_from_nt_status(status));
1497         }
1498
1499         /* This MUST be done before start_epmd() because otherwise
1500          * start_epmd() forks and races against dcesrv_ep_setup() to
1501          * call directory_create_or_exist() */
1502         if (!directory_create_or_exist(lp_ncalrpc_dir(), geteuid(), 0755)) {
1503                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1504                           lp_ncalrpc_dir(), strerror(errno)));
1505                 return -1;
1506         }
1507
1508         np_dir = talloc_asprintf(talloc_tos(), "%s/np", lp_ncalrpc_dir());
1509         if (!np_dir) {
1510                 DEBUG(0, ("%s: Out of memory\n", __location__));
1511                 return -1;
1512         }
1513
1514         if (!directory_create_or_exist_strict(np_dir, geteuid(), 0700)) {
1515                 DEBUG(0, ("Failed to create pipe directory %s - %s\n",
1516                           np_dir, strerror(errno)));
1517                 return -1;
1518         }
1519
1520         if (is_daemon && !interactive) {
1521                 if (rpc_epmapper_daemon() == RPC_DAEMON_FORK) {
1522                         start_epmd(ev_ctx, msg_ctx);
1523                 }
1524         }
1525
1526         if (!dcesrv_ep_setup(ev_ctx, msg_ctx)) {
1527                 exit_daemon("Samba cannot setup ep pipe", EACCES);
1528         }
1529
1530         if (is_daemon && !interactive) {
1531                 daemon_ready("smbd");
1532         }
1533
1534         /* only start other daemons if we are running as a daemon
1535          * -- bad things will happen if smbd is launched via inetd
1536          *  and we fork a copy of ourselves here */
1537         if (is_daemon && !interactive) {
1538
1539                 if (rpc_lsasd_daemon() == RPC_DAEMON_FORK) {
1540                         start_lsasd(ev_ctx, msg_ctx);
1541                 }
1542
1543                 if (!lp__disable_spoolss() &&
1544                     (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1545                         bool bgq = lp_parm_bool(-1, "smbd", "backgroundqueue", true);
1546
1547                         if (!printing_subsystem_init(ev_ctx, msg_ctx, true, bgq)) {
1548                                 exit_daemon("Samba failed to init printing subsystem", EACCES);
1549                         }
1550                 }
1551         } else if (!lp__disable_spoolss() &&
1552                    (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1553                 if (!printing_subsystem_init(ev_ctx, msg_ctx, false, false)) {
1554                         exit(1);
1555                 }
1556         }
1557
1558         if (!is_daemon) {
1559                 int sock;
1560
1561                 /* inetd mode */
1562                 TALLOC_FREE(frame);
1563
1564                 /* Started from inetd. fd 0 is the socket. */
1565                 /* We will abort gracefully when the client or remote system
1566                    goes away */
1567                 sock = dup(0);
1568
1569                 /* close stdin, stdout (if not logging to it), but not stderr */
1570                 close_low_fds(true, !debug_get_output_is_stdout(), false);
1571
1572 #ifdef HAVE_ATEXIT
1573                 atexit(killkids);
1574 #endif
1575
1576                 /* Stop zombies */
1577                 smbd_setup_sig_chld_handler(parent);
1578
1579                 smbd_process(ev_ctx, msg_ctx, sock, true);
1580
1581                 exit_server_cleanly(NULL);
1582                 return(0);
1583         }
1584
1585         if (!open_sockets_smbd(parent, ev_ctx, msg_ctx, ports))
1586                 exit_server("open_sockets_smbd() failed");
1587
1588         /* do a printer update now that all messaging has been set up,
1589          * before we allow clients to start connecting */
1590         if (!lp__disable_spoolss() &&
1591             (rpc_spoolss_daemon() != RPC_DAEMON_DISABLED)) {
1592                 printing_subsystem_update(ev_ctx, msg_ctx, false);
1593         }
1594
1595         TALLOC_FREE(frame);
1596         /* make sure we always have a valid stackframe */
1597         frame = talloc_stackframe();
1598
1599         if (!Fork) {
1600                 /* if we are running in the foreground then look for
1601                    EOF on stdin, and exit if it happens. This allows
1602                    us to die if the parent process dies
1603                    Only do this on a pipe or socket, no other device.
1604                 */
1605                 struct stat st;
1606                 if (fstat(0, &st) != 0) {
1607                         return false;
1608                 }
1609                 if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode)) {
1610                         tevent_add_fd(ev_ctx,
1611                                         parent,
1612                                         0,
1613                                         TEVENT_FD_READ,
1614                                         smbd_stdin_handler,
1615                                         NULL);
1616                 }
1617         }
1618
1619         smbd_parent_loop(ev_ctx, parent);
1620
1621         exit_server_cleanly(NULL);
1622         TALLOC_FREE(frame);
1623         return(0);
1624 }