]> jfr.im git - solanum.git/blobdiff - authd/provider.c
wsockd: implement reading of small and large frames (but not huge frames)
[solanum.git] / authd / provider.c
index 9c3ba81ff0c8fd960a68ac1b1e79ec002ae29438..8288f295f4fafa61d39d5fe137cf034f4dc68be6 100644 (file)
  * POSSIBILITY OF SUCH DAMAGE.
  */
 
-/* So the basic design here is to have "authentication providers" that do
- * things like query ident and blacklists and even open proxies.
+/* The basic design here is to have "authentication providers" that do things
+ * like query ident and blacklists and even open proxies.
  *
- * Providers are registered statically in the struct auth_providers array. You will
- * probably want to add an item to the provider_t enum also.
+ * Providers are registered in the auth_providers linked list. It is planned to
+ * use a bitmap to store provider ID's later.
  *
- * Providers can either return failure immediately, immediate acceptance, or
- * do work in the background (calling set_provider to signal this).
+ * Providers can either return failure immediately, immediate acceptance, or do
+ * work in the background (calling set_provider to signal this).
  *
- * It is up to providers to keep their own state on clients if they need to.
+ * Provider-specific data for each client can be kept in an index of the data
+ * struct member (using the provider's ID).
  *
  * All providers must implement at a minimum a perform_provider function. You
  * don't have to implement the others if you don't need them.
  * should call provider_done. Do NOT call this if you have accepted or rejected
  * the client.
  *
+ * Eventually, stuff like *:line handling will be moved here, but that means we
+ * have to talk to bandb directly first.
+ *
  * --Elizafox, 9 March 2016
  */
 
+#include "stdinc.h"
+#include "rb_dictionary.h"
 #include "authd.h"
 #include "provider.h"
+#include "notice.h"
+
+static EVH provider_timeout_event;
 
 rb_dlink_list auth_providers;
 
 /* Clients waiting */
-struct auth_client auth_clients[MAX_CLIENTS];
+rb_dictionary *auth_clients;
+
+static struct ev_entry *timeout_ev;
 
 /* Load a provider */
-void load_provider(struct auth_provider *provider)
+void
+load_provider(struct auth_provider *provider)
 {
-       provider->init();
-       rb_dlinkAdd(provider, &provider->node, &auth_providers);
+       if(rb_dlink_list_length(&auth_providers) >= MAX_PROVIDERS)
+       {
+               warn_opers(L_WARN, "provider: cannot load provider with id %d: maximum reached (%d)",
+                               provider->id, MAX_PROVIDERS);
+               return;
+       }
+
+       if(provider->opt_handlers != NULL)
+       {
+               struct auth_opts_handler *handler;
+
+               for(handler = provider->opt_handlers; handler->option != NULL; handler++)
+                       rb_dictionary_add(authd_option_handlers, handler->option, handler);
+       }
+
+       if(provider->stats_handler.letter != '\0')
+               authd_stat_handlers[provider->stats_handler.letter] = provider->stats_handler.handler;
+
+       if(provider->init != NULL)
+               provider->init();
+
+       rb_dlinkAddTail(provider, &provider->node, &auth_providers);
 }
 
-void unload_provider(struct auth_provider *provider)
+void
+unload_provider(struct auth_provider *provider)
 {
-       provider->destroy();
+       if(provider->opt_handlers != NULL)
+       {
+               struct auth_opts_handler *handler;
+
+               for(handler = provider->opt_handlers; handler->option != NULL; handler++)
+                       rb_dictionary_delete(authd_option_handlers, handler->option);
+       }
+
+       if(provider->stats_handler.letter != '\0')
+               authd_stat_handlers[provider->stats_handler.letter] = NULL;
+
+       if(provider->destroy != NULL)
+               provider->destroy();
+
        rb_dlinkDelete(&provider->node, &auth_providers);
 }
 
 /* Initalise all providers */
-void init_providers(void)
+void
+init_providers(void)
 {
+       auth_clients = rb_dictionary_create("pending auth clients", rb_uint32cmp);
+       timeout_ev = rb_event_addish("provider_timeout_event", provider_timeout_event, NULL, 1);
        load_provider(&rdns_provider);
        load_provider(&ident_provider);
+       load_provider(&blacklist_provider);
+       load_provider(&opm_provider);
 }
 
 /* Terminate all providers */
-void destroy_providers(void)
+void
+destroy_providers(void)
 {
        rb_dlink_node *ptr;
+       rb_dictionary_iter iter;
+       struct auth_client *auth;
        struct auth_provider *provider;
 
        /* Cancel outstanding connections */
-       for (size_t i = 0; i < MAX_CLIENTS; i++)
+       RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
        {
-               if(auth_clients[i].cid)
-               {
-                       /* TBD - is this the right thing?
-                        * (NOTE - this error message is designed for morons) */
-                       reject_client(&auth_clients[i], 0,
-                                       "IRC server reloading... try reconnecting in a few seconds");
-               }
+               /* TBD - is this the right thing? */
+               reject_client(auth, -1, "destroy", "Authentication system is down... try reconnecting in a few seconds");
        }
 
        RB_DLINK_FOREACH(ptr, auth_providers.head)
@@ -95,10 +144,13 @@ void destroy_providers(void)
                if(provider->destroy)
                        provider->destroy();
        }
+
+       rb_event_delete(timeout_ev);
 }
 
 /* Cancel outstanding providers for a client */
-void cancel_providers(struct auth_client *auth)
+void
+cancel_providers(struct auth_client *auth)
 {
        rb_dlink_node *ptr;
        struct auth_provider *provider;
@@ -107,24 +159,30 @@ void cancel_providers(struct auth_client *auth)
        {
                provider = ptr->data;
 
-               if(provider->cancel && is_provider(auth, provider->id))
+               if(provider->cancel && is_provider_on(auth, provider->id))
                        /* Cancel if required */
                        provider->cancel(auth);
        }
+
+       rb_dictionary_delete(auth_clients, RB_UINT_TO_POINTER(auth->cid));
+       rb_free(auth);
 }
 
-/* Provider is done */
-void provider_done(struct auth_client *auth, provider_t id)
+/* Provider is done - WARNING: do not use auth instance after calling! */
+void
+provider_done(struct auth_client *auth, provider_t id)
 {
        rb_dlink_node *ptr;
        struct auth_provider *provider;
 
-       unset_provider(auth, id);
+       set_provider_off(auth, id);
+       set_provider_done(auth, id);
 
        if(!auth->providers)
        {
-               /* No more providers, done */
-               accept_client(auth, 0);
+               if(!auth->providers_starting)
+                       /* Only do this when there are no providers left */
+                       accept_client(auth, -1);
                return;
        }
 
@@ -132,87 +190,110 @@ void provider_done(struct auth_client *auth, provider_t id)
        {
                provider = ptr->data;
 
-               if(provider->completed && is_provider(auth, provider->id))
+               if(provider->completed != NULL && is_provider_on(auth, provider->id))
                        /* Notify pending clients who asked for it */
                        provider->completed(auth, id);
        }
 }
 
-/* Reject a client, cancel outstanding providers if any */
-void reject_client(struct auth_client *auth, provider_t id, const char *reason)
+/* Reject a client - WARNING: do not use auth instance after calling! */
+void
+reject_client(struct auth_client *auth, provider_t id, const char *data, const char *fmt, ...)
 {
-       uint16_t cid = auth->cid;
+       char reject;
+       char buf[BUFSIZE];
+       va_list args;
+
+       switch(id)
+       {
+       case PROVIDER_RDNS:
+               reject = 'D';
+               break;
+       case PROVIDER_IDENT:
+               reject = 'I';
+               break;
+       case PROVIDER_BLACKLIST:
+               reject = 'B';
+               break;
+       case PROVIDER_OPM:
+               reject = 'O';
+               break;
+       default:
+               reject = 'N';
+               break;
+       }
 
-       rb_helper_write(authd_helper, "R %x :%s", auth->cid, reason);
+       if(data == NULL)
+               data = "*";
 
-       unset_provider(auth, id);
+       va_start(args, fmt);
+       vsnprintf(buf, sizeof(buf), fmt, args);
+       va_end(args);
 
-       if(auth->providers)
-               cancel_providers(auth);
+       /* We send back username and hostname in case ircd wants to overrule our decision.
+        * In the future this may not be the case.
+        * --Elizafox
+        */
+       rb_helper_write(authd_helper, "R %x %c %s %s %s :%s", auth->cid, reject, auth->username, auth->hostname, data, buf);
 
-       memset(&auth_clients[cid], 0, sizeof(struct auth_client));
+       set_provider_off(auth, id);
+       cancel_providers(auth);
 }
 
-/* Accept a client, cancel outstanding providers if any */
-void accept_client(struct auth_client *auth, provider_t id)
+/* Accept a client, cancel outstanding providers if any - WARNING: do nto use auth instance after calling! */
+void
+accept_client(struct auth_client *auth, provider_t id)
 {
-       uint16_t cid = auth->cid;
-
        rb_helper_write(authd_helper, "A %x %s %s", auth->cid, auth->username, auth->hostname);
 
-       unset_provider(auth, id);
-
-       if(auth->providers)
-               cancel_providers(auth);
-
-       memset(&auth_clients[cid], 0, sizeof(struct auth_client));
-}
-
-/* Send a notice to a client */
-void notice_client(struct auth_client *auth, const char *notice)
-{
-       rb_helper_write(authd_helper, "N %x :%s", auth->cid, notice);
+       set_provider_off(auth, id);
+       cancel_providers(auth);
 }
 
 /* Begin authenticating user */
-static void start_auth(const char *cid, const char *l_ip, const char *l_port, const char *c_ip, const char *c_port)
+static void
+start_auth(const char *cid, const char *l_ip, const char *l_port, const char *c_ip, const char *c_port)
 {
-       rb_dlink_node *ptr;
        struct auth_provider *provider;
-       struct auth_client *auth;
+       struct auth_client *auth = rb_malloc(sizeof(struct auth_client));
        long lcid = strtol(cid, NULL, 16);
+       rb_dlink_node *ptr;
 
-       if(lcid >= MAX_CLIENTS)
-               return;
-
-       auth = &auth_clients[lcid];
-       if(auth->cid != 0)
-               /* Shouldn't get here */
+       if(lcid >= UINT32_MAX)
                return;
 
-       auth->cid = (uint16_t)lcid;
+       auth->cid = (uint32_t)lcid;
 
-       (void)rb_inet_pton_sock(l_ip, (struct sockaddr *)&auth->l_addr);
-#ifdef RB_IPV6
-       if(GET_SS_FAMILY(&auth->l_addr) == AF_INET6)
-               ((struct sockaddr_in6 *)&auth->l_addr)->sin6_port = htons(atoi(l_ip));
+       if(rb_dictionary_find(auth_clients, RB_UINT_TO_POINTER(auth->cid)) == NULL)
+               rb_dictionary_add(auth_clients, RB_UINT_TO_POINTER(auth->cid), auth);
        else
-#endif
-               ((struct sockaddr_in *)&auth->l_addr)->sin_port = htons(atoi(l_ip));
+       {
+               warn_opers(L_CRIT, "provider: duplicate client added via start_auth: %x", auth->cid);
+               exit(EX_PROVIDER_ERROR);
+       }
 
-       (void)rb_inet_pton_sock(c_ip, (struct sockaddr *)&auth->c_addr);
-#ifdef RB_IPV6
-       if(GET_SS_FAMILY(&auth->c_addr) == AF_INET6)
-               ((struct sockaddr_in6 *)&auth->c_addr)->sin6_port = htons(atoi(c_ip));
-       else
-#endif
-               ((struct sockaddr_in *)&auth->c_addr)->sin_port = htons(atoi(c_ip));
+       rb_strlcpy(auth->l_ip, l_ip, sizeof(auth->l_ip));
+       auth->l_port = (uint16_t)atoi(l_port);  /* should be safe */
+       (void) rb_inet_pton_sock(l_ip, (struct sockaddr *)&auth->l_addr);
+       SET_SS_PORT(&auth->l_addr, htons(auth->l_port));
 
+       rb_strlcpy(auth->c_ip, c_ip, sizeof(auth->c_ip));
+       auth->c_port = (uint16_t)atoi(c_port);
+       (void) rb_inet_pton_sock(c_ip, (struct sockaddr *)&auth->c_addr);
+       SET_SS_PORT(&auth->c_addr, htons(auth->c_port));
 
+       rb_strlcpy(auth->hostname, "*", sizeof(auth->hostname));
+       rb_strlcpy(auth->username, "*", sizeof(auth->username));
+
+       memset(auth->data, 0, sizeof(auth->data));
+
+       auth->providers_starting = true;
        RB_DLINK_FOREACH(ptr, auth_providers.head)
        {
                provider = ptr->data;
 
+               lrb_assert(provider->start != NULL);
+
                /* Execute providers */
                if(!provider->start(auth))
                {
@@ -221,17 +302,75 @@ static void start_auth(const char *cid, const char *l_ip, const char *l_port, co
                        return;
                }
        }
+       auth->providers_starting = false;
 
        /* If no providers are running, accept the client */
        if(!auth->providers)
-               accept_client(auth, 0);
+               accept_client(auth, -1);
 }
 
 /* Callback for the initiation */
-void handle_new_connection(int parc, char *parv[])
+void
+handle_new_connection(int parc, char *parv[])
 {
-       if(parc < 7)
-               return;
+       if(parc < 6)
+       {
+               warn_opers(L_CRIT, "provider: received too few params for new connection (6 expected, got %d)", parc);
+               exit(EX_PROVIDER_ERROR);
+       }
 
        start_auth(parv[1], parv[2], parv[3], parv[4], parv[5]);
 }
+
+void
+handle_cancel_connection(int parc, char *parv[])
+{
+       struct auth_client *auth;
+       long lcid;
+
+       if(parc < 2)
+       {
+               warn_opers(L_CRIT, "provider: received too few params for new connection (2 expected, got %d)", parc);
+               exit(EX_PROVIDER_ERROR);
+       }
+
+       if((lcid = strtol(parv[1], NULL, 16)) > UINT32_MAX)
+       {
+               warn_opers(L_CRIT, "provider: got a request to cancel a connection that can't exist: %lx", lcid);
+               exit(EX_PROVIDER_ERROR);
+       }
+
+       if((auth = rb_dictionary_retrieve(auth_clients, RB_UINT_TO_POINTER((uint32_t)lcid))) == NULL)
+       {
+               /* This could happen as a race if we've accepted/rejected but they cancel, so don't die here.
+                * --Elizafox */
+               return;
+       }
+
+       cancel_providers(auth);
+}
+
+static void
+provider_timeout_event(void *notused __unused)
+{
+       struct auth_client *auth;
+       rb_dictionary_iter iter;
+       const time_t curtime = rb_current_time();
+
+       RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
+       {
+               rb_dlink_node *ptr;
+
+               RB_DLINK_FOREACH(ptr, auth_providers.head)
+               {
+                       struct auth_provider *provider = ptr->data;
+                       const time_t timeout = auth->timeout[provider->id];
+
+                       if(is_provider_on(auth, provider->id) && provider->timeout != NULL &&
+                               timeout > 0 && timeout < curtime)
+                       {
+                               provider->timeout(auth);
+                       }
+               }
+       }
+}