r5197: moved events code to lib/events/ (suggestion from metze)
[ira/wip.git] / source4 / smbd / service.c
index 278a763657415ba75b75e4aa1756b82c70e2acbb..ab377dc29b2ea43e292ec32f3466ec9c4b9f6a01 100644 (file)
@@ -3,7 +3,7 @@
 
    SERVER SERVICE code
 
-   Copyright (C) Andrew Tridgell 2003
+   Copyright (C) Andrew Tridgell 2003-2005
    Copyright (C) Stefan (metze) Metzmacher     2004
    
    This program is free software; you can redistribute it and/or modify
 */
 
 #include "includes.h"
-
-struct server_context *server_service_startup(const char *model)
-{
-       int i;
-       const char **server_services = lp_server_services();
-       TALLOC_CTX *mem_ctx;
-       struct server_context *srv_ctx;
-       const struct model_ops *model_ops;
-
-       if (!server_services) {
-               DEBUG(0,("process_model_startup: no endpoint servers configured\n"));
-               return NULL;
-       }
-
-       model_ops = process_model_startup(model);
-       if (!model_ops) {
-               DEBUG(0,("process_model_startup('%s') failed\n", model));
-               return NULL;
-       }
-
-       mem_ctx = talloc_init("server_context");
-       if (!mem_ctx) {
-               DEBUG(0,("talloc_init(server_context) failed\n"));
-               return NULL;
-       }
-
-       srv_ctx = talloc_p(mem_ctx, struct server_context);
-       if (!srv_ctx) {
-               DEBUG(0,("talloc_p(mem_ctx, struct server_context) failed\n"));
-               return NULL;    
-       }
-
-       ZERO_STRUCTP(srv_ctx);
-       srv_ctx->mem_ctx = mem_ctx;
-
-       srv_ctx->events = event_context_init();
-       if (!srv_ctx->events) {
-               DEBUG(0,("event_context_init() failed\n"));
-               return NULL;    
-       }
-
-
-       for (i=0;server_services[i];i++) {
-               TALLOC_CTX *mem_ctx2;
-               const struct server_service_ops *service_ops;
-               struct server_service *service;
-
-               service_ops = server_service_byname(server_services[i]);
-               if (!service_ops) {
-                       DEBUG(0,("process_model_startup: failed to find server service = '%s'\n", server_services[i]));
-                       return NULL;
-               }
-
-               mem_ctx2 = talloc_init("server_service");
-
-               service = talloc_p(mem_ctx2, struct server_service);
-               if (!service) {
-                       DEBUG(0,("talloc_p(mem_ctx, struct server_service) failed\n"));
-                       return NULL;
-               }
-
-               ZERO_STRUCTP(service);
-               service->mem_ctx        = mem_ctx2;
-               service->ops            = service_ops;
-               service->model_ops      = model_ops;
-               service->srv_ctx        = srv_ctx;
-               
-               /* TODO: service_init() should return a result */
-               service->ops->service_init(service, model_ops);
-       }
-
-       return srv_ctx;
-}
+#include "dlinklist.h"
+#include "process_model.h"
 
 /*
-  setup a listen stream socket
-  if you pass *port == 0, then a port > 1024 is used
- */
-struct server_socket *service_setup_socket(struct server_service *service,
-                        const struct model_ops *model_ops,
-                        const char *sock_addr,
-                        uint16_t *port)
-{
-       NTSTATUS status;
-       struct server_socket *srv_sock;
-       struct socket_context *socket_ctx;
-       struct fd_event fde;
-       int i;
-
-       if (*port == 0) {
-               for (i=SERVER_TCP_LOW_PORT;i<= SERVER_TCP_HIGH_PORT;i++) {
-                       status = socket_create("ipv4", SOCKET_TYPE_STREAM, &socket_ctx, 0);
-                       if (NT_STATUS_IS_OK(status)) {
-                               *port = i;
-                               break;
-                       }
-               }
-       } else {
-               status = socket_create("ipv4", SOCKET_TYPE_STREAM, &socket_ctx, 0);
-       }
-
-       if (!NT_STATUS_IS_OK(status)) {
-               DEBUG(0,("Failed to open socket on %s:%u - %s\n",
-                       sock_addr, *port, nt_errstr(status)));
-               return NULL;
-       }
-
-       /* ready to listen */
-       status = socket_set_option(socket_ctx, "SO_KEEPALIVE SO_REUSEADDR=1", NULL);
-       if (!NT_STATUS_IS_OK(status)) {
-               DEBUG(0,("socket_set_option(socket_ctx, SO_KEEPALIVE, NULL): %s\n",
-                       nt_errstr(status)));
-               socket_destroy(socket_ctx);
-               return NULL;
-       }
-       status = socket_set_option(socket_ctx, lp_socket_options(), NULL);
-       if (!NT_STATUS_IS_OK(status)) {
-               DEBUG(0,("socket_set_option(socket_ctx, lp_socket_options(), NULL): %s\n",
-                       nt_errstr(status)));
-               socket_destroy(socket_ctx);
-               return NULL;
-       }
-
-       /* TODO: set socket ACL's here when they're implemented */
-
-       status = socket_listen(socket_ctx, sock_addr, *port, SERVER_LISTEN_BACKLOG, 0);
-       if (!NT_STATUS_IS_OK(status)) {
-               DEBUG(0,("Failed to listen on %s:%u - %s\n",
-                       sock_addr, *port, nt_errstr(status)));
-               socket_destroy(socket_ctx);
-               return NULL;
-       }
-
-       srv_sock = talloc_p(NULL, struct server_socket);
-       if (!srv_sock) {
-               DEBUG(0,("talloc_p(mem_ctx, struct server_socket) failed\n"));
-               socket_destroy(socket_ctx);
-               return NULL;
-       }
-
-       /* we are only interested in read events on the listen socket */
-       fde.fd          = socket_get_fd(socket_ctx);
-       fde.flags       = EVENT_FD_READ;
-       fde.private     = srv_sock;
-       fde.handler     = model_ops->accept_connection;
-
-       ZERO_STRUCTP(srv_sock);
-       srv_sock->mem_ctx       = srv_sock;
-       srv_sock->service       = service;
-       srv_sock->socket        = socket_ctx;
-       srv_sock->event.ctx     = service->srv_ctx->events;
-       srv_sock->event.fde     = event_add_fd(srv_sock->event.ctx, &fde);
-       if (!srv_sock->event.fde) {
-               DEBUG(0,("event_add_fd(srv_sock->event.ctx, &fde) failed\n"));
-               socket_destroy(socket_ctx);
-               return NULL;
-       }
-
-       DLIST_ADD(service->socket_list, srv_sock);
-
-       return srv_sock;
-}
-
-struct server_connection *server_setup_connection(struct event_context *ev, struct server_socket *server_socket, struct socket_context *sock, time_t t)
-{
-       struct fd_event fde;
-       struct timed_event idle;
-       struct server_connection *srv_conn;
-
-       srv_conn = talloc_p(NULL, struct server_connection);
-       if (!srv_conn) {
-               DEBUG(0,("talloc_p(mem_ctx, struct server_service_connection) failed\n"));
-               return NULL;
-       }
-
-       ZERO_STRUCTP(srv_conn);
-       srv_conn->mem_ctx = srv_conn;
-
-       fde.private     = srv_conn;
-       fde.fd          = socket_get_fd(sock);
-       fde.flags       = EVENT_FD_READ;
-       fde.handler     = server_io_handler;
-
-       idle.private    = srv_conn;
-       idle.next_event = t + SERVER_DEFAULT_IDLE_TIME;
-       idle.handler    = server_idle_handler;
-
-       srv_conn->event.ctx             = ev;
-       srv_conn->event.fde             = &fde;
-       srv_conn->event.idle            = &idle;
-       srv_conn->event.idle_time       = SERVER_DEFAULT_IDLE_TIME;
-
-       srv_conn->server_socket         = server_socket;
-       srv_conn->service               = server_socket->service;
-       srv_conn->socket                = sock;
-
-       /* create a smb server context and add it to out event
-          handling */
-       server_socket->service->ops->accept_connection(srv_conn);
-
-       /* accpect_connection() of the service may changed idle.next_event */
-       srv_conn->event.fde     = event_add_fd(ev,&fde);
-       srv_conn->event.idle    = event_add_timed(ev,&idle);
-
-       if (!socket_check_access(sock, "smbd", lp_hostsallow(-1), lp_hostsdeny(-1))) {
-               server_terminate_connection(srv_conn, "denied by access rules");
-               return NULL;
-       }
-
-       return srv_conn;
-}
+  a linked list of registered servers
+*/
+static struct registered_server {
+       struct registered_server *next, *prev;
+       const char *service_name;
+       NTSTATUS (*service_init)(struct event_context *, const struct model_ops *);
+} *registered_servers;
 
 /*
-  close the socket and shutdown a server_context
+  register a server service. 
 */
-void server_terminate_connection(struct server_connection *srv_conn, const char *reason)
-{
-       DEBUG(0,("server_terminate_connection\n"));
-       srv_conn->service->model_ops->terminate_connection(srv_conn, reason);
-}
-
-void server_destroy_connection(struct server_connection *srv_conn)
+NTSTATUS register_server_service(const char *name,
+                                NTSTATUS (*service_init)(struct event_context *, const struct model_ops *))
 {
-       socket_destroy(srv_conn->socket);
-
-       event_remove_fd(srv_conn->event.ctx, srv_conn->event.fde);
-       srv_conn->event.fde = NULL;
-       event_remove_timed(srv_conn->event.ctx, srv_conn->event.idle);
-       srv_conn->event.idle = NULL;
-
-       talloc_destroy(srv_conn->mem_ctx);
+       struct registered_server *srv;
+       srv = talloc(talloc_autofree_context(), struct registered_server);
+       NT_STATUS_HAVE_NO_MEMORY(srv);
+       srv->service_name = name;
+       srv->service_init = service_init;
+       DLIST_ADD_END(registered_servers, srv, struct registered_server *);
+       return NT_STATUS_OK;
 }
 
-void server_io_handler(struct event_context *ev, struct fd_event *fde, time_t t, uint16_t flags)
-{
-       struct server_connection *conn = fde->private;
-
-       conn->event.idle->next_event = t + conn->event.idle_time;
 
-       if (flags & EVENT_FD_WRITE) {
-               conn->service->ops->send_handler(conn, t, flags);
-               return;
-       }
-
-       if (flags & EVENT_FD_READ) {
-               conn->service->ops->recv_handler(conn, t, flags);
-       }
-
-}
-
-void server_idle_handler(struct event_context *ev, struct timed_event *idle, time_t t)
-{
-       struct server_connection *conn = idle->private;
-
-       conn->event.idle->next_event = t + conn->event.idle_time;
-
-       conn->service->ops->idle_handler(conn,t);
-}
 /*
-  return the operations structure for a named backend of the specified type
+  initialise a server service
 */
-const struct server_service_ops *server_service_byname(const char *name)
+static NTSTATUS server_service_init(const char *name,
+                                   struct event_context *event_ctx,
+                                   const struct model_ops *model_ops)
 {
-       if (strcmp("smb",name)==0) {
-               return smbsrv_get_ops();
-       }
-       if (strcmp("rpc",name)==0) {
-               return dcesrv_get_ops();
-       }
-       if (strcmp("ldap",name)==0) {
-               return ldapsrv_get_ops();
+       struct registered_server *srv;
+       for (srv=registered_servers; srv; srv=srv->next) {
+               if (strcasecmp(name, srv->service_name) == 0) {
+                       return srv->service_init(event_ctx, model_ops);
+               }
        }
-       return NULL;
+       return NT_STATUS_INVALID_SYSTEM_SERVICE;
 }
 
-static NTSTATUS register_server_service_ops(const void *_ops)
-{
-       return NT_STATUS_NOT_IMPLEMENTED;
-}
 
 /*
-  initialise the SERVER SERVICE subsystem
+  startup all of our server services
 */
-BOOL server_service_init(void)
+NTSTATUS server_service_startup(struct event_context *event_ctx, 
+                               const char *model, const char **server_services)
 {
-       NTSTATUS status;
+       int i;
+       const struct model_ops *model_ops;
+
+       if (!server_services) {
+               DEBUG(0,("server_service_startup: no endpoint servers configured\n"));
+               return NT_STATUS_INVALID_PARAMETER;
+       }
 
-       status = register_subsystem("service", register_server_service_ops); 
-       if (!NT_STATUS_IS_OK(status)) {
-               return False;
+       model_ops = process_model_startup(event_ctx, model);
+       if (!model_ops) {
+               DEBUG(0,("process_model_startup('%s') failed\n", model));
+               return NT_STATUS_INTERNAL_ERROR;
        }
 
-       /* FIXME: Perhaps panic if a basic endpoint server, such as EPMAPER, fails to initialise? */
-       static_init_server_service;
+       for (i=0;server_services[i];i++) {
+               NTSTATUS status;
+
+               status = server_service_init(server_services[i], event_ctx, model_ops);
+               NT_STATUS_NOT_OK_RETURN(status);
+       }
 
-       DEBUG(3,("SERVER SERVICE subsystem version %d initialised\n", SERVER_SERVICE_VERSION));
-       return True;
+       return NT_STATUS_OK;
 }