dns: Use new DNS debugclass in DNS server
[kai/samba.git] / source4 / smbd / process_standard.c
index 122c6581b0ce541b95e69eb28c8153f4d596218a..c5377b34e08516a7d2209b40ec5f2648d269cfae 100644 (file)
@@ -1,13 +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 "smbd/process_model.h"
+#include "system/filesys.h"
+#include "cluster/cluster.h"
+#include "param/param.h"
+#include "ldb_wrap.h"
+
+NTSTATUS process_model_standard_init(void);
+
+/* 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 standard_model_startup(void)
+static void standard_model_init(void)
 {
+       pipe(child_pipe);
        signal(SIGCHLD, SIG_IGN);
-       smbd_process_init();
 }
 
 /*
-  called when a listening socket becomes readable
+  handle EOF on the child pipe
 */
-static void standard_accept_connection(struct event_context *ev, struct fd_event *srv_fde, time_t t, uint16_t flags)
+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. 
+*/
+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)
 {
        NTSTATUS status;
-       struct socket_context *sock;
-       struct server_socket *server_socket = srv_fde->private;
-       struct server_connection *conn;
+       struct socket_context *sock2;
        pid_t pid;
+       struct socket_address *c, *s;
 
        /* accept an incoming connection. */
-       status = socket_accept(server_socket->socket, &sock, 0);
+       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;
        }
 
@@ -54,93 +86,149 @@ static void standard_accept_connection(struct event_context *ev, struct fd_event
 
        if (pid != 0) {
                /* parent or error code ... */
-
-               socket_destroy(sock);
+               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 */
 
-       /* close all the listening sockets */
-       event_remove_fd_all_handler(ev, standard_accept_connection);
+       if (tevent_re_initialise(ev) != 0) {
+               smb_panic("Failed to re-initialise tevent after fork");
+       }
+
+       /* this will free all the listening sockets and all state that
+          is not associated with this new connection */
+       talloc_free(sock);
+
+       /* 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,("standard_accept_connection: tdb_reopen_all failed.\n"));
-       }
+       ldb_wrap_fork_hook();
 
-       /* Ensure that the forked children do not expose identical random streams */
+       tevent_add_fd(ev, ev, 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();
 
-       conn = server_setup_connection(ev, server_socket, sock, t);
-       if (!conn) {
-               DEBUG(0,("server_setup_connection(ev, server_socket, sock, t) failed\n"));
+       /* setup the process title */
+       c = socket_get_peer_addr(sock2, ev);
+       s = socket_get_my_addr(sock2, ev);
+       if (s && c) {
+               setproctitle("conn c[%s:%u] s[%s:%u] server_id[%d]",
+                            c->addr, c->port, s->addr, s->port, (int)pid);
+       }
+       talloc_free(c);
+       talloc_free(s);
+
+       /* setup this new connection.  Cluster ID is PID based for this process model */
+       new_conn(ev, 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 */      
+       tevent_loop_wait(ev);
+
+       talloc_free(ev);
+       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;
+
+       pid = fork();
+
+       if (pid != 0) {
+               /* parent or error code ... go back to the event loop */
                return;
        }
 
-       talloc_steal(conn, sock);
+       pid = getpid();
+
+       /* this will free all the listening sockets and all state that
+          is not associated with this new connection */
+       if (tevent_re_initialise(ev) != 0) {
+               smb_panic("Failed to re-initialise tevent after fork");
+       }
+
+       /* ldb/tdb need special fork handling */
+       ldb_wrap_fork_hook();
+
+       tevent_add_fd(ev, ev, child_pipe[0], TEVENT_FD_READ,
+                     standard_pipe_handler, NULL);
+       close(child_pipe[1]);
 
-       DLIST_ADD(server_socket->connection_list,conn);
+       /* Ensure that the forked children do not expose identical random streams */
+       set_need_random_reseed();
+
+       setproctitle("task %s server_id[%d]", service_name, (int)pid);
 
-       /* return to the event loop */
+       /* setup this new task.  Cluster ID is PID based for this process model */
+       new_task(ev, 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 */      
+       tevent_loop_wait(ev);
+
+       talloc_free(ev);
+       exit(0);
 }
 
 
-/* called when a SMB connection goes down */
-static void standard_terminate_connection(struct server_connection *conn, 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) 
 {
-       DEBUG(2,("standard_terminate_connection: reason[%s]\n",reason));
+       DEBUG(2,("standard_terminate: reason[%s]\n",reason));
 
-       if (conn) {
-               talloc_free(conn->service->srv_ctx);
-       }
+       talloc_free(ev);
 
-       /* this init_iconv() has the effect of freeing the iconv context memory,
+       /* this reload_charcnv() has the effect of freeing the iconv context memory,
           which makes leak checking easier */
-       init_iconv();
+       reload_charcnv(lp_ctx);
 
        /* terminate this process */
        exit(0);
 }
 
-static int standard_get_id(struct smbsrv_request *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_conn->pid;
+       if (title) {
+               setproctitle("%s", title);
+       } else {
+               setproctitle(NULL);
+       }
 }
 
-static void standard_exit_server(struct server_context *srv_ctx, const char *reason)
-{
-       DEBUG(1,("standard_exit_server: reason[%s]\n",reason));
-}
+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 process model subsystem
  */
 NTSTATUS process_model_standard_init(void)
 {
-       NTSTATUS ret;
-       struct model_ops ops;
-
-       ZERO_STRUCT(ops);
-
-       /* fill in our name */
-       ops.name = "standard";
-
-       /* fill in all the operations */
-       ops.model_startup = standard_model_startup;
-       ops.accept_connection = standard_accept_connection;
-       ops.terminate_connection = standard_terminate_connection;
-       ops.exit_server = standard_exit_server;
-       ops.get_id = standard_get_id;
-
-       /* register ourselves with the PROCESS_MODEL subsystem. */
-       ret = register_backend("process_model", &ops);
-       if (!NT_STATUS_IS_OK(ret)) {
-               DEBUG(0,("Failed to register process_model 'standard'!\n"));
-               return ret;
-       }
-
-       return ret;
+       return register_process_model(&standard_ops);
 }