src/modules/extra/m_sqloper.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd is copyright (C) 2002-2004 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 using namespace std;
  18
  19 #include <stdio.h>
  20 #include <string>
  21 #include <stdlib.h>
  22 #include <time.h>
  23 #include <sys/types.h>
  24 #include <sys/socket.h>
  25 #include <sys/time.h>
  26 #include <string.h>
  27 #include <unistd.h>
  28 #include <errno.h>
  29 #include <fcntl.h>
  30 #include <poll.h>
  31 #include "users.h"
  32 #include "channels.h"
  33 #include "modules.h"
  34 #include "inspircd.h"
  35 #include "helperfuncs.h"
  36 #include "m_sql.h"
  37
  38 /* $ModDesc: Allows storage of oper credentials in an SQL table */
  39
  40 /* Required for the FOREACH_MOD alias (OnOper event) */
  41 extern int MODCOUNT;
  42 extern ServerConfig* Config;
  43 extern std::vector<Module*> modules;
  44 extern std::vector<ircd_module*> factory;
  45
  46 Server *Srv;
  47
  48 class ModuleSQLOper : public Module
  49 {
  50         ConfigReader* Conf;
  51         unsigned long dbid;
  52         Module* SQLModule;
  53
  54  public:
  55         bool ReadConfig()
  56         {
  57                 dbid = Conf->ReadInteger("sqloper","dbid",0,true);      // database id of a database configured in m_sql (see m_sql config)
  58                 SQLModule = Srv->FindModule("m_sql.so");
  59                 if (!SQLModule)
  60                         Srv->Log(DEFAULT,"WARNING: m_sqloper.so could not initialize because m_sql.so is not loaded. Load the module and rehash your server.");
  61                 return (SQLModule);
  62         }
  63
  64         ModuleSQLOper(Server* Me)
  65                 : Module::Module(Me)
  66         {
  67                 Srv = Me;
  68                 Conf = new ConfigReader();
  69                 ReadConfig();
  70         }
  71
  72         virtual void OnRehash(std::string parameter)
  73         {
  74                 delete Conf;
  75                 Conf = new ConfigReader();
  76                 ReadConfig();
  77         }
  78
  79         void Implements(char* List)
  80         {
  81                 List[I_OnRehash] = List[I_OnPreCommand] = 1;
  82         }
  83
  84         virtual int OnPreCommand(std::string command, char **parameters, int pcnt, userrec *user, bool validated)
  85         {
  86                 if ((command == "OPER") && (validated))
  87                 {
  88                         if (LookupOper(parameters[0],parameters[1],user))
  89                                 return 1;
  90                 }
  91                 return 0;
  92         }
  93
  94         bool LookupOper(std::string username, std::string password, userrec* user)
  95         {
  96                 bool found = false;
  97
  98                 // is the sql module loaded? If not, we don't attempt to do anything.
  99                 if (!SQLModule)
 100                         return false;
 101
 102                 // sanitize the password (we dont want any mysql insertion exploits!)
 103                 std::string temp = "";
 104                 for (unsigned int q = 0; q < password.length(); q++)
 105                 {
 106                         if (password[q] == '\'')
 107                         {
 108                                 temp = temp + "\'";
 109                         }
 110                         else if (password[q] == '"')
 111                         {
 112                                 temp = temp + "\\\"";
 113                         }
 114                         else temp = temp + password[q];
 115                 }
 116                 password = temp;
 117                 temp = "";
 118                 for (unsigned int v = 0; v < username.length(); v++)
 119                 {
 120                         if (username[v] == '\'')
 121                         {
 122                                 temp = temp + "\'";
 123                         }
 124                         if (username[v] == '"')
 125                         {
 126                                 temp = temp + "\\\"";
 127                         }
 128                         else temp = temp + username[v];
 129                 }
 130                 username = temp;
 131
 132                 // Create a request containing the SQL query and send it to m_sql.so
 133                 SQLRequest* query = new SQLRequest(SQL_RESULT,dbid,"SELECT username,password,hostname,type FROM ircd_opers WHERE username='"+username+"' AND password=md5('"+password+"')");
 134                 Request queryrequest((char*)query, this, SQLModule);
 135                 SQLResult* result = (SQLResult*)queryrequest.Send();
 136
 137                 // Did we get "OK" as a result?
 138                 if (result->GetType() == SQL_OK)
 139                 {
 140                         Srv->Log(DEBUG,"An SQL based oper exists");
 141                         // if we did, this means we may now request a row... there should be only one row for each user, so,
 142                         // we don't need to loop to fetch multiple rows.
 143                         SQLRequest* rowrequest = new SQLRequest(SQL_ROW,dbid,"");
 144                         Request rowquery((char*)rowrequest, this, SQLModule);
 145                         SQLResult* rowresult = (SQLResult*)rowquery.Send();
 146
 147                         // did we get a row? If we did, we can now do something with the fields
 148                         if (rowresult->GetType() == SQL_ROW)
 149                         {
 150                                 if (rowresult->GetField("username") == username)
 151                                 {
 152                                         found = true;
 153                                         // oper up the user.
 154                                         for (int j =0; j < Conf->Enumerate("type"); j++)
 155                                         {
 156                                                 std::string TypeName = Conf->ReadValue("type","name",j);
 157                                                 Srv->Log(DEBUG,"Scanning opertype: "+TypeName);
 158                                                 std::string pattern = std::string(user->ident) + "@" + std::string(user->host);
 159                                                 if ((TypeName == rowresult->GetField("type")) && (Srv->MatchText(pattern,rowresult->GetField("hostname"))))
 160                                                 {
 161                                                         Srv->Log(DEBUG,"Host and type match: "+TypeName+" "+rowresult->GetField("type"));
 162                                                         /* found this oper's opertype */
 163                                                         std::string HostName = Conf->ReadValue("type","host",j);
 164                                                         if (HostName != "")
 165                                                                 Srv->ChangeHost(user,HostName);
 166                                                         strlcpy(user->oper,rowresult->GetField("type").c_str(),NICKMAX);
 167                                                         WriteOpers("*** %s (%s@%s) is now an IRC operator of type %s",user->nick,user->ident,user->host,rowresult->GetField("type").c_str());
 168                                                         WriteServ(user->fd,"381 %s :You are now an IRC operator of type %s",user->nick,rowresult->GetField("type").c_str());
 169                                                         if (!strchr(user->modes,'o'))
 170                                                         {
 171                                                                 strcat(user->modes,"o");
 172                                                                 WriteServ(user->fd,"MODE %s :+o",user->nick);
 173                                                                 FOREACH_MOD(I_OnOper,OnOper(user,rowresult->GetField("type")));
 174                                                                 AddOper(user);
 175                                                                 FOREACH_MOD(I_OnPostOper,OnPostOper(user,rowresult->GetField("type")));
 176                                                                 log(DEFAULT,"OPER: %s!%s@%s opered as type: %s",user->nick,user->ident,user->host,rowresult->GetField("type").c_str());
 177                                                         }
 178                                                         break;
 179                                                 }
 180                                         }
 181
 182                                 }
 183                                 delete rowresult;
 184                         }
 185                         else
 186                         {
 187                                 // we didn't have a row.
 188                                 found = false;
 189                         }
 190                         delete rowrequest;
 191                         delete result;
 192                 }
 193                 else
 194                 {
 195                         // the query was bad
 196                         found = false;
 197                 }
 198                 query->SetQueryType(SQL_DONE);
 199                 query->SetConnID(dbid);
 200                 Request donerequest((char*)query, this, SQLModule);
 201                 donerequest.Send();
 202                 delete query;
 203                 return found;
 204         }
 205
 206         virtual ~ModuleSQLOper()
 207         {
 208                 delete Conf;
 209         }
 210
 211         virtual Version GetVersion()
 212         {
 213                 return Version(1,0,0,1,VF_VENDOR);
 214         }
 215
 216 };
 217
 218 class ModuleSQLOperFactory : public ModuleFactory
 219 {
 220  public:
 221         ModuleSQLOperFactory()
 222         {
 223         }
 224
 225         ~ModuleSQLOperFactory()
 226         {
 227         }
 228
 229         virtual Module * CreateModule(Server* Me)
 230         {
 231                 return new ModuleSQLOper(Me);
 232         }
 233
 234 };
 235
 236
 237 extern "C" void * init_module( void )
 238 {
 239         return new ModuleSQLOperFactory;
 240 }
 241