]> jfr.im git - solanum.git/blobdiff - ircd/modules.c
Message handlers should return void.
[solanum.git] / ircd / modules.c
index 5887a014575883440d58b2772c4b2af2901a97ba..0eade506c6d494a6e634fdef33a8234000ae55a6 100644 (file)
@@ -20,8 +20,6 @@
  *  along with this program; if not, write to the Free Software
  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  *  USA
- *
- *  $Id: modules.c 3161 2007-01-25 07:23:01Z nenolod $
  */
 
 #include "stdinc.h"
@@ -37,6 +35,7 @@
 #include "ircd_defs.h"
 #include "match.h"
 #include "s_serv.h"
+#include "capability.h"
 
 #include <ltdl.h>
 
@@ -59,29 +58,31 @@ static const char *core_module_table[] = {
        NULL
 };
 
+#define MOD_WARN_DELTA (90 * 86400)    /* time in seconds, 86400 seconds in a day */
+
 #define MODS_INCREMENT 10
 int num_mods = 0;
 int max_mods = MODS_INCREMENT;
 
 static rb_dlink_list mod_paths;
 
-static int mo_modload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int mo_modlist(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int mo_modreload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int mo_modunload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int mo_modrestart(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void mo_modload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void mo_modlist(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void mo_modreload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void mo_modunload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void mo_modrestart(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
 
-static int me_modload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int me_modlist(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int me_modreload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int me_modunload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
-static int me_modrestart(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void me_modload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void me_modlist(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void me_modreload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void me_modunload(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
+static void me_modrestart(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
 
-static int do_modload(struct Client *, const char *);
-static int do_modunload(struct Client *, const char *);
-static int do_modreload(struct Client *, const char *);
-static int do_modlist(struct Client *, const char *);
-static int do_modrestart(struct Client *);
+static void do_modload(struct Client *, const char *);
+static void do_modunload(struct Client *, const char *);
+static void do_modreload(struct Client *, const char *);
+static void do_modlist(struct Client *, const char *);
+static void do_modrestart(struct Client *);
 
 struct Message modload_msgtab = {
        "MODLOAD", 0, 0, 0, 0,
@@ -244,7 +245,7 @@ load_all_modules(int warn)
                if((len > 3) && !strcmp(ldirent->d_name+len-3, ".la"))
                {
                        (void) snprintf(module_fq_name, sizeof(module_fq_name), "%s/%s", AUTOMODPATH, ldirent->d_name);
-                       (void) load_a_module(module_fq_name, warn, 0);
+                       (void) load_a_module(module_fq_name, warn, MAPI_ORIGIN_CORE, 0);
                }
 
        }
@@ -269,7 +270,7 @@ load_core_modules(int warn)
                snprintf(module_name, sizeof(module_name), "%s/%s%s", MODPATH,
                            core_module_table[i], ".la");
 
-               if(load_a_module(module_name, warn, 1) == -1)
+               if(load_a_module(module_name, warn, MAPI_ORIGIN_CORE, 1) == -1)
                {
                        ilog(L_MAIN,
                             "Error loading core module %s%s: terminating ircd",
@@ -286,7 +287,7 @@ load_core_modules(int warn)
  * side effects -
  */
 int
-load_one_module(const char *path, int coremodule)
+load_one_module(const char *path, int origin, int coremodule)
 {
        char modpath[PATH_MAX];
        rb_dlink_node *pathst;
@@ -297,6 +298,12 @@ load_one_module(const char *path, int coremodule)
        if (server_state_foreground == 1)
                inotice("loading module %s ...", path);
 
+       if(coremodule != 0)
+       {
+               coremodule = 1;
+               origin = MAPI_ORIGIN_CORE;
+       }
+
        RB_DLINK_FOREACH(pathst, mod_paths.head)
        {
                mpath = pathst->data;
@@ -309,10 +316,7 @@ load_one_module(const char *path, int coremodule)
                                if(S_ISREG(statbuf.st_mode))
                                {
                                        /* Regular files only please */
-                                       if(coremodule)
-                                               return load_a_module(modpath, 1, 1);
-                                       else
-                                               return load_a_module(modpath, 1, 0);
+                                       return load_a_module(modpath, 1, origin, coremodule);
                                }
                        }
 
@@ -325,14 +329,14 @@ load_one_module(const char *path, int coremodule)
 
 
 /* load a module .. */
-static int
+static void
 mo_modload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!IsOperAdmin(source_p))
        {
                sendto_one(source_p, form_str(ERR_NOPRIVS),
                           me.name, source_p->name, "admin");
-               return 0;
+               return;
        }
 
        if(parc > 2)
@@ -340,54 +344,35 @@ mo_modload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *sour
                sendto_match_servs(source_p, parv[2], CAP_ENCAP, NOCAPS,
                                "ENCAP %s MODLOAD %s", parv[2], parv[1]);
                if (match(parv[2], me.name) == 0)
-                       return 0;
+                       return;
        }
 
-       return do_modload(source_p, parv[1]);
+       do_modload(source_p, parv[1]);
 }
 
-static int
+static void
 me_modload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!find_shared_conf(source_p->username, source_p->host, source_p->servptr->name, SHARED_MODULE))
        {
                sendto_one_notice(source_p, ":*** You do not have an appropriate shared block "
                                "to load modules on this server.");
-               return 0;
-       }
-
-       return do_modload(source_p, parv[1]);
-}
-
-static int
-do_modload(struct Client *source_p, const char *module)
-{
-       char *m_bn = rb_basename(module);
-
-       if(findmodule_byname(m_bn) != -1)
-       {
-               sendto_one_notice(source_p, ":Module %s is already loaded", m_bn);
-               rb_free(m_bn);
-               return 0;
+               return;
        }
 
-       load_one_module(module, 0);
-
-       rb_free(m_bn);
-
-       return 0;
+       do_modload(source_p, parv[1]);
 }
 
 
 /* unload a module .. */
-static int
+static void
 mo_modunload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!IsOperAdmin(source_p))
        {
                sendto_one(source_p, form_str(ERR_NOPRIVS),
                           me.name, source_p->name, "admin");
-               return 0;
+               return;
        }
 
        if(parc > 2)
@@ -395,63 +380,34 @@ mo_modunload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *so
                sendto_match_servs(source_p, parv[2], CAP_ENCAP, NOCAPS,
                                "ENCAP %s MODUNLOAD %s", parv[2], parv[1]);
                if (match(parv[2], me.name) == 0)
-                       return 0;
+                       return;
        }
 
-       return do_modunload(source_p, parv[1]);
+       do_modunload(source_p, parv[1]);
 }
 
-static int
+static void
 me_modunload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!find_shared_conf(source_p->username, source_p->host, source_p->servptr->name, SHARED_MODULE))
        {
                sendto_one_notice(source_p, ":*** You do not have an appropriate shared block "
                                "to load modules on this server.");
-               return 0;
-       }
-
-       return do_modunload(source_p, parv[1]);
-}
-
-static int
-do_modunload(struct Client *source_p, const char *module)
-{
-       int modindex;
-       char *m_bn = rb_basename(module);
-
-       if((modindex = findmodule_byname(m_bn)) == -1)
-       {
-               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
-               rb_free(m_bn);
-               return 0;
-       }
-
-       if(modlist[modindex]->core == 1)
-       {
-               sendto_one_notice(source_p, ":Module %s is a core module and may not be unloaded", m_bn);
-               rb_free(m_bn);
-               return 0;
-       }
-
-       if(unload_one_module(m_bn, 1) == -1)
-       {
-               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
+               return;
        }
 
-       rb_free(m_bn);
-       return 0;
+       do_modunload(source_p, parv[1]);
 }
 
 /* unload and load in one! */
-static int
+static void
 mo_modreload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!IsOperAdmin(source_p))
        {
                sendto_one(source_p, form_str(ERR_NOPRIVS),
                           me.name, source_p->name, "admin");
-               return 0;
+               return;
        }
 
        if(parc > 2)
@@ -459,69 +415,34 @@ mo_modreload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *so
                sendto_match_servs(source_p, parv[2], CAP_ENCAP, NOCAPS,
                                "ENCAP %s MODRELOAD %s", parv[2], parv[1]);
                if (match(parv[2], me.name) == 0)
-                       return 0;
+                       return;
        }
 
-       return do_modreload(source_p, parv[1]);
+       do_modreload(source_p, parv[1]);
 }
 
-static int
+static void
 me_modreload(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!find_shared_conf(source_p->username, source_p->host, source_p->servptr->name, SHARED_MODULE))
        {
                sendto_one_notice(source_p, ":*** You do not have an appropriate shared block "
                                "to load modules on this server.");
-               return 0;
-       }
-
-       return do_modreload(source_p, parv[1]);
-}
-
-static int
-do_modreload(struct Client *source_p, const char *module)
-{
-       int modindex;
-       int check_core;
-       char *m_bn = rb_basename(module);
-
-       if((modindex = findmodule_byname(m_bn)) == -1)
-       {
-               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
-               rb_free(m_bn);
-               return 0;
-       }
-
-       check_core = modlist[modindex]->core;
-
-       if(unload_one_module(m_bn, 1) == -1)
-       {
-               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
-               rb_free(m_bn);
-               return 0;
-       }
-
-       if((load_one_module(m_bn, check_core) == -1) && check_core)
-       {
-               sendto_realops_snomask(SNO_GENERAL, L_NETWIDE,
-                                    "Error reloading core module: %s: terminating ircd", m_bn);
-               ilog(L_MAIN, "Error loading core module %s: terminating ircd", m_bn);
-               exit(0);
+               return;
        }
 
-       rb_free(m_bn);
-       return 0;
+       do_modreload(source_p, parv[1]);
 }
 
 /* list modules .. */
-static int
+static void
 mo_modlist(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!IsOperAdmin(source_p))
        {
                sendto_one(source_p, form_str(ERR_NOPRIVS),
                           me.name, source_p->name, "admin");
-               return 0;
+               return;
        }
 
        if(parc > 2)
@@ -529,65 +450,34 @@ mo_modlist(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *sour
                sendto_match_servs(source_p, parv[2], CAP_ENCAP, NOCAPS,
                                "ENCAP %s MODLIST %s", parv[2], parv[1]);
                if (match(parv[2], me.name) == 0)
-                       return 0;
+                       return;
        }
 
-       return do_modlist(source_p, parc > 1 ? parv[1] : 0);
+       do_modlist(source_p, parc > 1 ? parv[1] : 0);
 }
 
-static int
+static void
 me_modlist(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!find_shared_conf(source_p->username, source_p->host, source_p->servptr->name, SHARED_MODULE))
        {
                sendto_one_notice(source_p, ":*** You do not have an appropriate shared block "
                                "to load modules on this server.");
-               return 0;
-       }
-
-       return do_modlist(source_p, parv[1]);
-}
-
-static int
-do_modlist(struct Client *source_p, const char *pattern)
-{
-       int i;
-
-       for (i = 0; i < num_mods; i++)
-       {
-               if(pattern)
-               {
-                       if(match(pattern, modlist[i]->name))
-                       {
-                               sendto_one(source_p, form_str(RPL_MODLIST),
-                                          me.name, source_p->name,
-                                          modlist[i]->name,
-                                          (unsigned long)(uintptr_t)modlist[i]->address,
-                                          modlist[i]->version, modlist[i]->core ? "(core)" : "");
-                       }
-               }
-               else
-               {
-                       sendto_one(source_p, form_str(RPL_MODLIST),
-                                  me.name, source_p->name, modlist[i]->name,
-                                  (unsigned long)(uintptr_t)modlist[i]->address, modlist[i]->version,
-                                  modlist[i]->core ? "(core)" : "");
-               }
+               return;
        }
 
-       sendto_one(source_p, form_str(RPL_ENDOFMODLIST), me.name, source_p->name);
-       return 0;
+       do_modlist(source_p, parv[1]);
 }
 
 /* unload and reload all modules */
-static int
+static void
 mo_modrestart(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!IsOperAdmin(source_p))
        {
                sendto_one(source_p, form_str(ERR_NOPRIVS),
                           me.name, source_p->name, "admin");
-               return 0;
+               return;
        }
 
        if(parc > 1)
@@ -595,26 +485,107 @@ mo_modrestart(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *s
                sendto_match_servs(source_p, parv[1], CAP_ENCAP, NOCAPS,
                                "ENCAP %s MODRESTART", parv[1]);
                if (match(parv[1], me.name) == 0)
-                       return 0;
+                       return;
        }
 
-       return do_modrestart(source_p);
+       do_modrestart(source_p);
 }
 
-static int
+static void
 me_modrestart(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char **parv)
 {
        if(!find_shared_conf(source_p->username, source_p->host, source_p->servptr->name, SHARED_MODULE))
        {
                sendto_one_notice(source_p, ":*** You do not have an appropriate shared block "
                                "to load modules on this server.");
-               return 0;
+               return;
+       }
+
+       do_modrestart(source_p);
+}
+
+static void
+do_modload(struct Client *source_p, const char *module)
+{
+       char *m_bn = rb_basename(module);
+       int origin;
+
+       if(findmodule_byname(m_bn) != -1)
+       {
+               sendto_one_notice(source_p, ":Module %s is already loaded", m_bn);
+               rb_free(m_bn);
+               return;
        }
 
-       return do_modrestart(source_p);
+       origin = strcmp(module, m_bn) == 0 ? MAPI_ORIGIN_CORE : MAPI_ORIGIN_EXTENSION;
+       load_one_module(module, origin, 0);
+
+       rb_free(m_bn);
 }
 
-static int
+static void
+do_modunload(struct Client *source_p, const char *module)
+{
+       int modindex;
+       char *m_bn = rb_basename(module);
+
+       if((modindex = findmodule_byname(m_bn)) == -1)
+       {
+               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
+               rb_free(m_bn);
+               return;
+       }
+
+       if(modlist[modindex]->core == 1)
+       {
+               sendto_one_notice(source_p, ":Module %s is a core module and may not be unloaded", m_bn);
+               rb_free(m_bn);
+               return;
+       }
+
+       if(unload_one_module(m_bn, 1) == -1)
+       {
+               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
+       }
+
+       rb_free(m_bn);
+}
+
+static void
+do_modreload(struct Client *source_p, const char *module)
+{
+       int modindex;
+       int check_core;
+       char *m_bn = rb_basename(module);
+
+       if((modindex = findmodule_byname(m_bn)) == -1)
+       {
+               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
+               rb_free(m_bn);
+               return;
+       }
+
+       check_core = modlist[modindex]->core;
+
+       if(unload_one_module(m_bn, 1) == -1)
+       {
+               sendto_one_notice(source_p, ":Module %s is not loaded", m_bn);
+               rb_free(m_bn);
+               return;
+       }
+
+       if((load_one_module(m_bn, modlist[modindex]->origin, check_core) == -1) && check_core)
+       {
+               sendto_realops_snomask(SNO_GENERAL, L_NETWIDE,
+                                    "Error reloading core module: %s: terminating ircd", m_bn);
+               ilog(L_MAIN, "Error loading core module %s: terminating ircd", m_bn);
+               exit(0);
+       }
+
+       rb_free(m_bn);
+}
+
+static void
 do_modrestart(struct Client *source_p)
 {
        int modnum;
@@ -633,15 +604,58 @@ do_modrestart(struct Client *source_p)
                             "Module Restart: %d modules unloaded, %d modules loaded",
                             modnum, num_mods);
        ilog(L_MAIN, "Module Restart: %d modules unloaded, %d modules loaded", modnum, num_mods);
-       return 0;
 }
 
+static void
+do_modlist(struct Client *source_p, const char *pattern)
+{
+       int i;
+
+       for (i = 0; i < num_mods; i++)
+       {
+               const char *origin;
+               switch (modlist[i]->origin)
+               {
+               case MAPI_ORIGIN_EXTENSION:
+                       origin = "extension";
+                       break;
+               case MAPI_ORIGIN_CORE:
+                       origin = "builtin";
+                       break;
+               default:
+                       origin = "unknown";
+                       break;
+               }
+
+               if(pattern)
+               {
+                       if(match(pattern, modlist[i]->name))
+                       {
+                               sendto_one(source_p, form_str(RPL_MODLIST),
+                                          me.name, source_p->name,
+                                          modlist[i]->name,
+                                          (unsigned long)(uintptr_t)modlist[i]->address, origin,
+                                          modlist[i]->core ? " (core)" : "", modlist[i]->version, modlist[i]->description);
+                       }
+               }
+               else
+               {
+                       sendto_one(source_p, form_str(RPL_MODLIST),
+                                  me.name, source_p->name, modlist[i]->name,
+                                  (unsigned long)(uintptr_t)modlist[i]->address, origin,
+                                  modlist[i]->core ? " (core)" : "", modlist[i]->version, modlist[i]->description);
+               }
+       }
+
+       sendto_one(source_p, form_str(RPL_ENDOFMODLIST), me.name, source_p->name);
+}
 
 static void increase_modlist(void);
 
 #define MODS_INCREMENT 10
 
 static char unknown_ver[] = "<unknown>";
+static char unknown_description[] = "<none>";
 
 /* unload_one_module()
  *
@@ -695,6 +709,60 @@ unload_one_module(const char *name, int warn)
                                mheader->mapi_unregister();
                        break;
                }
+       case 2:
+               {
+                       struct mapi_mheader_av2 *mheader = modlist[modindex]->mapi_header;
+
+                       /* XXX duplicate code :( */
+                       if(mheader->mapi_command_list)
+                       {
+                               struct Message **m;
+                               for (m = mheader->mapi_command_list; *m; ++m)
+                                       mod_del_cmd(*m);
+                       }
+
+                       /* hook events are never removed, we simply lose the
+                        * ability to call them --fl
+                        */
+                       if(mheader->mapi_hfn_list)
+                       {
+                               mapi_hfn_list_av1 *m;
+                               for (m = mheader->mapi_hfn_list; m->hapi_name; ++m)
+                                       remove_hook(m->hapi_name, m->fn);
+                       }
+
+                       if(mheader->mapi_unregister)
+                               mheader->mapi_unregister();
+
+                       if(mheader->mapi_cap_list)
+                       {
+                               mapi_cap_list_av2 *m;
+                               for (m = mheader->mapi_cap_list; m->cap_name; ++m)
+                               {
+                                       struct CapabilityIndex *idx;
+
+                                       switch (m->cap_index)
+                                       {
+                                       case MAPI_CAP_CLIENT:
+                                               idx = cli_capindex;
+                                               break;
+                                       case MAPI_CAP_SERVER:
+                                               idx = serv_capindex;
+                                               break;
+                                       default:
+                                               sendto_realops_snomask(SNO_GENERAL, L_ALL,
+                                                       "Unknown/unsupported CAP index found of type %d on capability %s when unloading %s",
+                                                       m->cap_index, m->cap_name, modlist[modindex]->name);
+                                               ilog(L_MAIN,
+                                                       "Unknown/unsupported CAP index found of type %d on capability %s when unloading %s",
+                                                       m->cap_index, m->cap_name, modlist[modindex]->name);
+                                               continue;
+                                       }
+
+                                       capability_orphan(idx, m->cap_name);
+                               }
+                       }
+               }
        default:
                sendto_realops_snomask(SNO_GENERAL, L_ALL,
                                     "Unknown/unsupported MAPI version %d when unloading %s!",
@@ -723,20 +791,19 @@ unload_one_module(const char *name, int warn)
        return 0;
 }
 
-
 /*
  * load_a_module()
  *
- * inputs      - path name of module, int to notice, int of core
+ * inputs      - path name of module, int to notice, int of origin, int of core
  * output      - -1 if error 0 if success
  * side effects - loads a module if successful
  */
 int
-load_a_module(const char *path, int warn, int core)
+load_a_module(const char *path, int warn, int origin, int core)
 {
        lt_dlhandle tmpptr;
        char *mod_basename;
-       const char *ver;
+       const char *ver, *description = NULL;
 
        int *mapi_version;
 
@@ -816,7 +883,103 @@ load_a_module(const char *path, int warn, int core)
                        ver = mheader->mapi_module_version;
                        break;
                }
+       case 2:
+               {
+                       struct mapi_mheader_av2 *mheader = (struct mapi_mheader_av2 *)(void *)mapi_version;     /* see above */
+
+                       /* XXX duplicated code :( */
+                       if(mheader->mapi_register && (mheader->mapi_register() == -1))
+                       {
+                               ilog(L_MAIN, "Module %s indicated failure during load.",
+                                       mod_basename);
+                               sendto_realops_snomask(SNO_GENERAL, L_ALL,
+                                                    "Module %s indicated failure during load.",
+                                                    mod_basename);
+                               lt_dlclose(tmpptr);
+                               rb_free(mod_basename);
+                               return -1;
+                       }
 
+                       /* Basic date code checks
+                        *
+                        * Don't make them fatal, but do complain about differences within a certain time frame.
+                        * Later on if there are major API changes we can add fatal checks.
+                        * -- Elizafox
+                        */
+                       if(mheader->mapi_datecode != datecode && mheader->mapi_datecode > 0)
+                       {
+                               long int delta = labs(datecode - mheader->mapi_datecode);
+                               if (delta > MOD_WARN_DELTA)
+                               {
+                                       delta /= 86400;
+                                       iwarn(L_MAIN,
+                                               "Module %s build date is out of sync with ircd build date by %ld days, expect problems",
+                                               mod_basename, delta);
+                                       sendto_realops_snomask(SNO_GENERAL, L_ALL,
+                                               "Module %s build date is out of sync with ircd build date by %ld days, expect problems",
+                                               mod_basename, delta);
+                               }
+                       }
+
+                       if(mheader->mapi_command_list)
+                       {
+                               struct Message **m;
+                               for (m = mheader->mapi_command_list; *m; ++m)
+                                       mod_add_cmd(*m);
+                       }
+
+                       if(mheader->mapi_hook_list)
+                       {
+                               mapi_hlist_av1 *m;
+                               for (m = mheader->mapi_hook_list; m->hapi_name; ++m)
+                                       *m->hapi_id = register_hook(m->hapi_name);
+                       }
+
+                       if(mheader->mapi_hfn_list)
+                       {
+                               mapi_hfn_list_av1 *m;
+                               for (m = mheader->mapi_hfn_list; m->hapi_name; ++m)
+                                       add_hook(m->hapi_name, m->fn);
+                       }
+
+                       /* New in MAPI v2 - version replacement */
+                       ver = mheader->mapi_module_version ? mheader->mapi_module_version : ircd_version;
+                       description = mheader->mapi_module_description;
+
+                       if(mheader->mapi_cap_list)
+                       {
+                               mapi_cap_list_av2 *m;
+                               for (m = mheader->mapi_cap_list; m->cap_name; ++m)
+                               {
+                                       struct CapabilityIndex *idx;
+                                       int result;
+
+                                       switch (m->cap_index)
+                                       {
+                                       case MAPI_CAP_CLIENT:
+                                               idx = cli_capindex;
+                                               break;
+                                       case MAPI_CAP_SERVER:
+                                               idx = serv_capindex;
+                                               break;
+                                       default:
+                                               sendto_realops_snomask(SNO_GENERAL, L_ALL,
+                                                       "Unknown/unsupported CAP index found of type %d on capability %s when loading %s",
+                                                       m->cap_index, m->cap_name, mod_basename);
+                                               ilog(L_MAIN,
+                                                       "Unknown/unsupported CAP index found of type %d on capability %s when loading %s",
+                                                       m->cap_index, m->cap_name, mod_basename);
+                                               continue;
+                                       }
+
+                                       result = capability_put(idx, m->cap_name, m->cap_ownerdata);
+                                       if (m->cap_id != NULL)
+                                               *(m->cap_id) = result;
+                               }
+                       }
+               }
+
+               break;
        default:
                ilog(L_MAIN, "Module %s has unknown/unsupported MAPI version %d.",
                     mod_basename, MAPI_VERSION(*mapi_version));
@@ -831,25 +994,45 @@ load_a_module(const char *path, int warn, int core)
        if(ver == NULL)
                ver = unknown_ver;
 
+       if(description == NULL)
+               description = unknown_description;
+
        increase_modlist();
 
        modlist[num_mods] = rb_malloc(sizeof(struct module));
        modlist[num_mods]->address = tmpptr;
        modlist[num_mods]->version = ver;
+       modlist[num_mods]->description = description;
        modlist[num_mods]->core = core;
        modlist[num_mods]->name = rb_strdup(mod_basename);
        modlist[num_mods]->mapi_header = mapi_version;
        modlist[num_mods]->mapi_version = MAPI_VERSION(*mapi_version);
+       modlist[num_mods]->origin = origin;
        num_mods++;
 
        if(warn == 1)
        {
+               const char *o;
+
+               switch (origin)
+               {
+               case MAPI_ORIGIN_EXTENSION:
+                       o = "extension";
+                       break;
+               case MAPI_ORIGIN_CORE:
+                       o = "core";
+                       break;
+               default:
+                       o = "unknown";
+                       break;
+               }
+
                sendto_realops_snomask(SNO_GENERAL, L_ALL,
-                                    "Module %s [version: %s; MAPI version: %d] loaded at 0x%lx",
-                                    mod_basename, ver, MAPI_VERSION(*mapi_version),
+                                    "Module %s [version: %s; MAPI version: %d; origin: %s; description: \"%s\"] loaded at 0x%lx",
+                                    mod_basename, ver, MAPI_VERSION(*mapi_version), o, description,
                                     (unsigned long) tmpptr);
-               ilog(L_MAIN, "Module %s [version: %s; MAPI version: %d] loaded at 0x%lx",
-                    mod_basename, ver, MAPI_VERSION(*mapi_version), (unsigned long) tmpptr);
+               ilog(L_MAIN, "Module %s [version: %s; MAPI version: %d; origin: %s; description: \"%s\"] loaded at 0x%lx",
+                    mod_basename, ver, MAPI_VERSION(*mapi_version), o, description, (unsigned long) tmpptr);
        }
        rb_free(mod_basename);
        return 0;