s4-smbd: minimise includes in smbd/ and smb_server
[kai/samba-autobuild/.git] / source4 / smbd / process_standard.c
index f12784bc793e1d84c107d6a6aa69caa31edbac62..49aaf8481a811361447e554834223b44dcfdf2f7 100644 (file)
@@ -1,12 +1,15 @@
 /* 
    Unix SMB/CIFS implementation.
+
    process model: standard (1 process per client connection)
-   Copyright (C) Andrew Tridgell 1992-2003
+
+   Copyright (C) Andrew Tridgell 1992-2005
    Copyright (C) James J Myers 2003 <myersjj@samba.org>
+   Copyright (C) Stefan (metze) Metzmacher 2004
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2 of the License, or
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    GNU General Public License for more details.
    
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
+#include "lib/events/events.h"
+#include "../tdb/include/tdb.h"
+#include "smbd/process_model.h"
+#include "system/filesys.h"
+#include "cluster/cluster.h"
+#include "param/param.h"
+
+#ifdef HAVE_SETPROCTITLE
+#ifdef HAVE_SETPROCTITLE_H
+#include <setproctitle.h>
+#endif
+#else
+#define setproctitle none_setproctitle
+static int none_setproctitle(const char *fmt, ...) PRINTF_ATTRIBUTE(1, 2);
+static int none_setproctitle(const char *fmt, ...)
+{
+       return 0;
+}
+#endif
+
+/* we hold a pipe open in the parent, and the any child
+   processes wait for EOF on that pipe. This ensures that
+   children die when the parent dies */
+static int child_pipe[2];
 
 /*
   called when the process model is selected
 */
-static void model_startup(void)
+static void standard_model_init(struct tevent_context *ev)
+{
+       pipe(child_pipe);
+       signal(SIGCHLD, SIG_IGN);
+}
+
+/*
+  handle EOF on the child pipe
+*/
+static void standard_pipe_handler(struct tevent_context *event_ctx, struct tevent_fd *fde, 
+                                 uint16_t flags, void *private_data)
 {
+       DEBUG(10,("Child %d exiting\n", (int)getpid()));
+       exit(0);
 }
 
 /*
-  called when a listening socket becomes readable
+  called when a listening socket becomes readable
 */
-static void accept_connection(struct event_context *ev, struct fd_event *fde, time_t t, uint16 flags)
+static void standard_accept_connection(struct tevent_context *ev, 
+                                      struct loadparm_context *lp_ctx,
+                                      struct socket_context *sock, 
+                                      void (*new_conn)(struct tevent_context *,
+                                                       struct loadparm_context *, struct socket_context *, 
+                                                       struct server_id , void *), 
+                                      void *private_data)
 {
-       int accepted_fd;
-       struct sockaddr addr;
-       socklen_t in_addrlen = sizeof(addr);
+       NTSTATUS status;
+       struct socket_context *sock2;
        pid_t pid;
-       struct model_ops *model_ops = fde->private;
+       struct tevent_context *ev2;
+       struct socket_address *c, *s;
 
-       accepted_fd = accept(fde->fd,&addr,&in_addrlen);
-       if (accepted_fd == -1) {
-               DEBUG(0,("accept_connection_standard: accept: %s\n",
-                        strerror(errno)));
+       /* accept an incoming connection. */
+       status = socket_accept(sock, &sock2);
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(0,("standard_accept_connection: accept: %s\n",
+                        nt_errstr(status)));
+               /* this looks strange, but is correct. We need to throttle things until
+                  the system clears enough resources to handle this new socket */
+               sleep(1);
                return;
        }
 
@@ -50,61 +98,164 @@ static void accept_connection(struct event_context *ev, struct fd_event *fde, ti
 
        if (pid != 0) {
                /* parent or error code ... */
-
-               close(accepted_fd);
+               talloc_free(sock2);
                /* go back to the event loop */
                return;
        }
 
-       /* Child code ... */
+       pid = getpid();
+
+       /* This is now the child code. We need a completely new event_context to work with */
+       ev2 = s4_event_context_init(NULL);
 
-       /* close all the listening sockets */
-       event_remove_fd_all_handler(ev, accept_connection);
+       /* the service has given us a private pointer that
+          encapsulates the context it needs for this new connection -
+          everything else will be freed */
+       talloc_steal(ev2, private_data);
+       talloc_steal(private_data, sock2);
+
+       /* this will free all the listening sockets and all state that
+          is not associated with this new connection */
+       talloc_free(sock);
+       talloc_free(ev);
+
+       /* we don't care if the dup fails, as its only a select()
+          speed optimisation */
+       socket_dup(sock2);
                        
        /* tdb needs special fork handling */
-       if (tdb_reopen_all() == -1) {
-               DEBUG(0,("accept_connection_standard: tdb_reopen_all failed.\n"));
+       if (tdb_reopen_all(1) == -1) {
+               DEBUG(0,("standard_accept_connection: tdb_reopen_all failed.\n"));
+       }
+
+       tevent_add_fd(ev2, ev2, child_pipe[0], TEVENT_FD_READ,
+                     standard_pipe_handler, NULL);
+       close(child_pipe[1]);
+
+       /* Ensure that the forked children do not expose identical random streams */
+       set_need_random_reseed();
+
+       /* setup the process title */
+       c = socket_get_peer_addr(sock2, ev2);
+       s = socket_get_my_addr(sock2, ev2);
+       if (s && c) {
+               setproctitle("conn c[%s:%u] s[%s:%u] server_id[%d]",
+                            c->addr, c->port, s->addr, s->port, pid);
+       }
+       talloc_free(c);
+       talloc_free(s);
+
+       /* setup this new connection.  Cluster ID is PID based for this process modal */
+       new_conn(ev2, lp_ctx, sock2, cluster_id(pid, 0), private_data);
+
+       /* we can't return to the top level here, as that event context is gone,
+          so we now process events in the new event context until there are no
+          more to process */      
+       event_loop_wait(ev2);
+
+       talloc_free(ev2);
+       exit(0);
+}
+
+/*
+  called to create a new server task
+*/
+static void standard_new_task(struct tevent_context *ev, 
+                             struct loadparm_context *lp_ctx,
+                             const char *service_name,
+                             void (*new_task)(struct tevent_context *, struct loadparm_context *lp_ctx, struct server_id , void *), 
+                             void *private_data)
+{
+       pid_t pid;
+       struct tevent_context *ev2;
+
+       pid = fork();
+
+       if (pid != 0) {
+               /* parent or error code ... go back to the event loop */
+               return;
+       }
+
+       pid = getpid();
+
+       /* This is now the child code. We need a completely new event_context to work with */
+       ev2 = s4_event_context_init(NULL);
+
+       /* the service has given us a private pointer that
+          encapsulates the context it needs for this new connection -
+          everything else will be freed */
+       talloc_steal(ev2, private_data);
+
+       /* this will free all the listening sockets and all state that
+          is not associated with this new connection */
+       talloc_free(ev);
+
+       /* tdb needs special fork handling */
+       if (tdb_reopen_all(1) == -1) {
+               DEBUG(0,("standard_accept_connection: tdb_reopen_all failed.\n"));
        }
 
-       /* Load DSO's */
-       init_modules();
-               
-       /* initialize new process */
-       smbd_process_init();
-               
-       init_smbsession(ev, model_ops, accepted_fd); 
+       tevent_add_fd(ev2, ev2, child_pipe[0], TEVENT_FD_READ,
+                     standard_pipe_handler, NULL);
+       close(child_pipe[1]);
+
+       /* Ensure that the forked children do not expose identical random streams */
+       set_need_random_reseed();
+
+       setproctitle("task %s server_id[%d]", service_name, pid);
 
-       /* return to the event loop */
+       /* setup this new task.  Cluster ID is PID based for this process modal */
+       new_task(ev2, lp_ctx, cluster_id(pid, 0), private_data);
+
+       /* we can't return to the top level here, as that event context is gone,
+          so we now process events in the new event context until there are no
+          more to process */      
+       event_loop_wait(ev2);
+
+       talloc_free(ev2);
+       exit(0);
 }
 
-/* called when a SMB connection goes down */
-static void terminate_connection(struct server_context *server, const char *reason) 
+
+/* called when a task goes down */
+_NORETURN_ static void standard_terminate(struct tevent_context *ev, struct loadparm_context *lp_ctx, 
+                                         const char *reason) 
 {
-       server_terminate(server);
+       DEBUG(2,("standard_terminate: reason[%s]\n",reason));
+
+       /* this reload_charcnv() has the effect of freeing the iconv context memory,
+          which makes leak checking easier */
+       reload_charcnv(lp_ctx);
+
+       talloc_free(ev);
+
        /* terminate this process */
        exit(0);
 }
 
-static int get_id(struct request_context *req)
+/* called to set a title of a task or connection */
+static void standard_set_title(struct tevent_context *ev, const char *title) 
 {
-       return (int)req->smb->pid;
+       if (title) {
+               setproctitle("%s", title);
+       } else {
+               setproctitle(NULL);
+       }
 }
 
+static const struct model_ops standard_ops = {
+       .name                   = "standard",
+       .model_init             = standard_model_init,
+       .accept_connection      = standard_accept_connection,
+       .new_task               = standard_new_task,
+       .terminate              = standard_terminate,
+       .set_title              = standard_set_title,
+};
+
 /*
-  initialise the standard process model, registering ourselves with the model subsystem
+  initialise the standard process model, registering ourselves with the process model subsystem
  */
-void process_model_standard_init(void)
+NTSTATUS process_model_standard_init(void)
 {
-       struct model_ops ops;
-
-       ZERO_STRUCT(ops);
-       
-       /* fill in all the operations */
-       ops.model_startup = model_startup;
-       ops.accept_connection = accept_connection;
-       ops.terminate_connection = terminate_connection;
-       ops.get_id = get_id;
-
-       /* register ourselves with the process model subsystem. We register under the name 'standard'. */
-       register_process_model("standard", &ops);
+       return register_process_model(&standard_ops);
 }