Merge branch 'master' of git://git.samba.org/samba
[kai/samba-autobuild/.git] / source4 / smbd / process_standard.c
index 22e47d1b1f67a820fc0cd3cb4efa82b55e80434d..49aaf8481a811361447e554834223b44dcfdf2f7 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 "../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 standard_model_startup(void)
+static void standard_model_init(struct tevent_context *ev)
 {
+       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_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 event_context *ev, struct fd_event *srv_fde, time_t t, uint16_t 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)
 {
        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 tevent_context *ev2;
+       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,("accept_connection_single: accept: %s\n",
+               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,95 +98,164 @@ 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 */
+       ev2 = s4_event_context_init(NULL);
 
-       /* close all the listening sockets */
-       event_remove_fd_all_handler(ev, standard_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) {
+       if (tdb_reopen_all(1) == -1) {
                DEBUG(0,("standard_accept_connection: tdb_reopen_all failed.\n"));
        }
 
-       /* Ensure that the forked children do not expose identical random streams */
+       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();
 
-       conn = server_setup_connection(ev, server_socket, sock, t);
-       if (!conn) {
-               DEBUG(0,("server_setup_connection(ev, server_socket, sock, t) failed\n"));
-               return;
+       /* 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);
 
-       DLIST_ADD(server_socket->connection_list,conn);
+       /* 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);
 
-       /* return to the event loop */
-}
+       /* 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 standard_terminate_connection(struct server_connection *conn, const char *reason) 
+/*
+  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)
 {
-       DEBUG(2,("single_terminate_connection: reason[%s]\n",reason));
+       pid_t pid;
+       struct tevent_context *ev2;
 
-       if (conn) {
-               if (conn->service) {
-                       conn->service->ops->close_connection(conn,reason);
-               }
+       pid = fork();
 
-               if (conn->server_socket) {
-                       DLIST_REMOVE(conn->server_socket->connection_list,conn);
-               }
+       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);
 
-               server_destroy_connection(conn);
+       /* 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"));
        }
 
-       /* terminate this process */
+       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);
+
+       /* 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);
 }
 
-static int standard_get_id(struct smbsrv_request *req)
+
+/* called when a task goes down */
+_NORETURN_ static void standard_terminate(struct tevent_context *ev, struct loadparm_context *lp_ctx, 
+                                         const char *reason) 
 {
-       return (int)req->smb_conn->pid;
+       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 void standard_exit_server(struct server_context *srv_ctx, const char *reason)
+/* called to set a title of a task or connection */
+static void standard_set_title(struct tevent_context *ev, const char *title) 
 {
-       DEBUG(1,("standard_exit_server: reason[%s]\n",reason));
+       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 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);
 }