src/cmd_modules.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
   6  *                       E-mail:
   7  *                <brain@chatspike.net>
   8  *                <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *            the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 #include <time.h>
  18 #include <string>
  19 #include <map>
  20 #include <sstream>
  21 #include <vector>
  22 #include <deque>
  23 #include "inspircd_config.h"
  24 #include "inspircd.h"
  25 #include "configreader.h"
  26 #include "hash_map.h"
  27 #include "users.h"
  28 #include "modules.h"
  29 #include "commands.h"
  30 #include "helperfuncs.h"
  31 #include "wildcard.h"
  32 #include "commands/cmd_modules.h"
  33
  34 extern InspIRCd* ServerInstance;
  35 extern int MODCOUNT;
  36 extern std::vector<Module*> modules;
  37 extern std::vector<ircd_module*> factory;
  38
  39 char* itab[] = {
  40         "OnUserConnect", "OnUserQuit", "OnUserDisconnect", "OnUserJoin", "OnUserPart", "OnRehash", "OnServerRaw",
  41         "OnExtendedMode", "OnUserPreJoin", "OnUserPreKick", "OnUserKick", "OnOper", "OnInfo", "OnWhois", "OnUserPreInvite",
  42         "OnUserInvite", "OnUserPreMessage", "OnUserPreNotice", "OnUserPreNick", "OnUserMessage", "OnUserNotice", "OnMode",
  43         "OnGetServerDescription", "OnSyncUser", "OnSyncChannel", "OnSyncChannelMetaData", "OnSyncUserMetaData",
  44         "OnDecodeMetaData", "ProtoSendMode", "ProtoSendMetaData", "OnWallops", "OnChangeHost", "OnChangeName", "OnAddGLine",
  45         "OnAddZLine", "OnAddQLine", "OnAddKLine", "OnAddELine", "OnDelGLine", "OnDelZLine", "OnDelKLine", "OnDelELine", "OnDelQLine",
  46         "OnCleanup", "OnUserPostNick", "OnAccessCheck", "On005Numeric", "OnKill", "OnRemoteKill", "OnLoadModule", "OnUnloadModule",
  47         "OnBackgroundTimer", "OnSendList", "OnPreCommand", "OnCheckReady", "OnUserRrgister", "OnRawMode", "OnCheckInvite",
  48         "OnCheckKey", "OnCheckLimit", "OnCheckBan", "OnStats", "OnChangeLocalUserHost", "OnChangeLocalUserGecos", "OnLocalTopicChange",
  49         "OnPostLocalTopicChange", "OnEvent", "OnRequest", "OnOperCompre", "OnGlobalOper", "OnGlobalConnect", "OnAddBan", "OnDelBan",
  50         "OnRawSocketAccept", "OnRawSocketClose", "OnRawSocketWrite", "OnRawSocketRead", "OnChangeLocalUserGECOS", "OnUserRegister",
  51         "OnOperCompare", "OnChannelDelete", "OnPostOper", "OnSyncOtherMetaData", "OnSetAway", "OnCancelAway", NULL
  52 };
  53
  54 void cmd_modules::Handle (const char** parameters, int pcnt, userrec *user)
  55 {
  56         for (unsigned int i = 0; i < ServerInstance->Config->module_names.size(); i++)
  57         {
  58                 Version V = modules[i]->GetVersion();
  59                 char modulename[MAXBUF];
  60                 char flagstate[MAXBUF];
  61                 *flagstate = 0;
  62                 if (V.Flags & VF_STATIC)
  63                         strlcat(flagstate,", static",MAXBUF);
  64                 if (V.Flags & VF_VENDOR)
  65                         strlcat(flagstate,", vendor",MAXBUF);
  66                 if (V.Flags & VF_COMMON)
  67                         strlcat(flagstate,", common",MAXBUF);
  68                 if (V.Flags & VF_SERVICEPROVIDER)
  69                         strlcat(flagstate,", service provider",MAXBUF);
  70                 if (!flagstate[0])
  71                         strcpy(flagstate,"  <no flags>");
  72                 strlcpy(modulename,ServerInstance->Config->module_names[i].c_str(),256);
  73                 if (*user->oper)
  74                 {
  75                         if ((pcnt >= 2) && (!strcasecmp(parameters[0],"debug")))
  76                         {
  77                                 if (match(ServerInstance->Config->module_names[i].c_str(),parameters[1]))
  78                                 {
  79                                         user->WriteServ("900 %s :0x%08lx %d.%d.%d.%d %s (%s)",user->nick,modules[i],V.Major,V.Minor,V.Revision,V.Build,ServerConfig::CleanFilename(modulename),flagstate+2);
  80                                         for (int it = 0; itab[it];)
  81                                         {
  82                                                 char data[MAXBUF];
  83                                                 char dlist[MAXBUF];
  84                                                 *dlist = 0;
  85                                                 for (int v = 0; v < 4; v++)
  86                                                 {
  87                                                         if (itab[it])
  88                                                         {
  89                                                                 if (ServerInstance->Config->implement_lists[i][it])
  90                                                                 {
  91                                                                         snprintf(data,MAXBUF,"%s=>%c ",itab[it],(ServerInstance->Config->implement_lists[i][it] ? '1' : '0'));
  92                                                                         strncat(dlist,data,MAXBUF);
  93                                                                 }
  94                                                                 it++;
  95                                                         }
  96                                                 }
  97                                                 if (*dlist)
  98                                                         user->WriteServ("900 %s :%s [ %s]",user->nick,ServerConfig::CleanFilename(modulename),dlist);
  99                                         }
 100                                         user->WriteServ("900 %s :=== DEBUG: Implementation counts ===",user->nick);
 101                                         for (int it = 0; itab[it]; it++)
 102                                         {
 103                                                 if (ServerInstance->Config->global_implementation[it])
 104                                                         user->WriteServ("900 %s :%s: %d times",user->nick, itab[it],(int)ServerInstance->Config->global_implementation[it]);
 105                                         }
 106                                 }
 107                         }
 108                         else
 109                         {
 110                                 user->WriteServ("900 %s :0x%08lx %d.%d.%d.%d %s (%s)",user->nick,modules[i],V.Major,V.Minor,V.Revision,V.Build,ServerConfig::CleanFilename(modulename),flagstate+2);
 111                         }
 112                 }
 113                 else
 114                 {
 115                         user->WriteServ("900 %s :%s",user->nick,ServerConfig::CleanFilename(modulename));
 116                 }
 117         }
 118         user->WriteServ("901 %s :End of MODULES list",user->nick);
 119 }