/* +------------------------------------+ * | Inspire Internet Relay Chat Daemon | * +------------------------------------+ * * Inspire is copyright (C) 2002-2004 ChatSpike-Dev. * E-mail: * * * * Written by Craig Edwards, Craig McLure, and others. * This program is free but copyrighted software; see * the file COPYING for details. * * --------------------------------------------------- */ #include "inspircd.h" #include "inspircd_io.h" #include "inspircd_util.h" #include "inspircd_config.h" #include #include #ifdef USE_KQUEUE #include #include #include #endif #include #include #ifdef GCC3 #include #else #include #endif #include #include #include #include #include "connection.h" #include "users.h" #include "servers.h" #include "ctables.h" #include "globals.h" #include "modules.h" #include "dynamic.h" #include "wildcard.h" #include "message.h" #include "mode.h" #include "xline.h" #include "commands.h" #include "inspstring.h" #include "helperfuncs.h" #include "hashcomp.h" using namespace std; #ifdef USE_KQUEUE extern int kq; #endif extern int MODCOUNT; extern std::vector modules; extern std::vector factory; extern time_t TIME; extern int LogLevel; extern char ServerName[MAXBUF]; extern char Network[MAXBUF]; extern char ServerDesc[MAXBUF]; extern char AdminName[MAXBUF]; extern char AdminEmail[MAXBUF]; extern char AdminNick[MAXBUF]; extern char diepass[MAXBUF]; extern char restartpass[MAXBUF]; extern char motd[MAXBUF]; extern char rules[MAXBUF]; extern char list[MAXBUF]; extern char PrefixQuit[MAXBUF]; extern char DieValue[MAXBUF]; extern int debugging; extern int WHOWAS_STALE; extern int WHOWAS_MAX; extern int DieDelay; extern time_t startup_time; extern int NetBufferSize; extern int MaxWhoResults; extern time_t nb_start; extern std::vector module_names; extern int boundPortCount; extern int portCount; extern int SERVERportCount; extern int ports[MAXSOCKS]; extern int defaultRoute; extern std::vector auth_cookies; extern std::stringstream config_f; extern serverrec* me[32]; extern FILE *log_file; extern userrec* fd_ref_table[65536]; typedef nspace::hash_map, irc::StrHashComp, __single_client_alloc> user_hash; typedef nspace::hash_map, irc::StrHashComp, __single_client_alloc> chan_hash; typedef nspace::hash_map, irc::InAddr_HashComp, __single_client_alloc> address_cache; typedef nspace::hash_map, irc::StrHashComp, __single_client_alloc> whowas_hash; typedef std::deque command_table; extern user_hash clientlist; extern chan_hash chanlist; extern whowas_hash whowas; extern command_table cmdlist; extern file_cache MOTD; extern file_cache RULES; extern address_cache IP; // class type for holding an extended mode character - internal to core class ExtMode : public classbase { public: char modechar; int type; int params_when_on; int params_when_off; bool needsoper; bool list; ExtMode(char mc, int ty, bool oper, int p_on, int p_off) : modechar(mc), type(ty), needsoper(oper), params_when_on(p_on), params_when_off(p_off) { }; }; typedef std::vector ExtModeList; typedef ExtModeList::iterator ExtModeListIter; ExtModeList EMode; // returns true if an extended mode character is in use bool ModeDefined(char modechar, int type) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == type)) { return true; } } return false; } bool ModeIsListMode(char modechar, int type) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == type) && (i->list == true)) { return true; } } return false; } bool ModeDefinedOper(char modechar, int type) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == type) && (i->needsoper == true)) { return true; } } return false; } // returns number of parameters for a custom mode when it is switched on int ModeDefinedOn(char modechar, int type) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == type)) { return i->params_when_on; } } return 0; } // returns number of parameters for a custom mode when it is switched on int ModeDefinedOff(char modechar, int type) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == type)) { return i->params_when_off; } } return 0; } // returns true if an extended mode character is in use bool DoAddExtendedMode(char modechar, int type, bool requires_oper, int params_on, int params_off) { if (ModeDefined(modechar,type)) { return false; } EMode.push_back(ExtMode(modechar,type,requires_oper,params_on,params_off)); return true; } // turns a mode into a listmode void ModeMakeList(char modechar) { for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++) { if ((i->modechar == modechar) && (i->type == MT_CHANNEL)) { i->list = true; return; } } return; } // version is a simple class for holding a modules version number Version::Version(int major, int minor, int revision, int build, int flags) : Major(major), Minor(minor), Revision(revision), Build(build), Flags(flags) { }; // admin is a simple class for holding a server's administrative info Admin::Admin(std::string name, std::string email, std::string nick) : Name(name), Email(email), Nick(nick) { }; Request::Request(char* anydata, Module* src, Module* dst) : data(anydata), source(src), dest(dst) { }; char* Request::GetData() { return this->data; } Module* Request::GetSource() { return this->source; } Module* Request::GetDest() { return this->dest; } char* Request::Send() { if (this->dest) { return dest->OnRequest(this); } else { return NULL; } } Event::Event(char* anydata, Module* src, std::string eventid) : data(anydata), source(src), id(eventid) { }; char* Event::GetData() { return this->data; } Module* Event::GetSource() { return this->source; } char* Event::Send() { FOREACH_MOD OnEvent(this); return NULL; } std::string Event::GetEventID() { return this->id; } // These declarations define the behavours of the base class Module (which does nothing at all) Module::Module() { } Module::~Module() { } void Module::OnUserConnect(userrec* user) { } void Module::OnUserQuit(userrec* user) { } void Module::OnUserDisconnect(userrec* user) { } void Module::OnUserJoin(userrec* user, chanrec* channel) { } void Module::OnUserPart(userrec* user, chanrec* channel) { } void Module::OnPacketTransmit(std::string &data, std::string serv) { } void Module::OnPacketReceive(std::string &data, std::string serv) { } void Module::OnRehash() { } void Module::OnServerRaw(std::string &raw, bool inbound, userrec* user) { } int Module::OnUserPreJoin(userrec* user, chanrec* chan, const char* cname) { return 0; } int Module::OnExtendedMode(userrec* user, void* target, char modechar, int type, bool mode_on, string_list ¶ms) { return false; } Version Module::GetVersion() { return Version(1,0,0,0,VF_VENDOR); } void Module::OnOper(userrec* user) { }; void Module::OnInfo(userrec* user) { }; void Module::OnWhois(userrec* source, userrec* dest) { }; int Module::OnUserPreInvite(userrec* source,userrec* dest,chanrec* channel) { return 0; }; int Module::OnUserPreMessage(userrec* user,void* dest,int target_type, std::string &text) { return 0; }; int Module::OnUserPreNotice(userrec* user,void* dest,int target_type, std::string &text) { return 0; }; int Module::OnUserPreNick(userrec* user, std::string newnick) { return 0; }; void Module::OnUserPostNick(userrec* user, std::string oldnick) { }; int Module::OnAccessCheck(userrec* source,userrec* dest,chanrec* channel,int access_type) { return ACR_DEFAULT; }; string_list Module::OnUserSync(userrec* user) { string_list empty; return empty; } string_list Module::OnChannelSync(chanrec* chan) { string_list empty; return empty; } void Module::On005Numeric(std::string &output) { }; int Module::OnKill(userrec* source, userrec* dest, std::string reason) { return 0; }; void Module::OnLoadModule(Module* mod,std::string name) { }; void Module::OnBackgroundTimer(time_t curtime) { }; void Module::OnSendList(userrec* user, chanrec* channel, char mode) { }; int Module::OnPreCommand(std::string command, char **parameters, int pcnt, userrec *user) { return 0; }; bool Module::OnCheckReady(userrec* user) { return true; }; void Module::OnUserRegister(userrec* user) { }; int Module::OnUserPreKick(userrec* source, userrec* user, chanrec* chan, std::string reason) { return 0; }; void Module::OnUserKick(userrec* source, userrec* user, chanrec* chan, std::string reason) { }; int Module::OnRawMode(userrec* user, chanrec* chan, char mode, std::string param, bool adding, int pcnt) { return 0; }; int Module::OnCheckInvite(userrec* user, chanrec* chan) { return 0; }; int Module::OnCheckKey(userrec* user, chanrec* chan, std::string keygiven) { return 0; }; int Module::OnCheckLimit(userrec* user, chanrec* chan) { return 0; }; int Module::OnCheckBan(userrec* user, chanrec* chan) { return 0; }; void Module::OnStats(char symbol) { }; int Module::OnChangeLocalUserHost(userrec* user, std::string newhost) { return 0; }; int Module::OnChangeLocalUserGECOS(userrec* user, std::string newhost) { return 0; }; int Module::OnLocalTopicChange(userrec* user, chanrec* chan, std::string topic) { return 0; }; int Module::OnMeshToken(char token,string_list params,serverrec* source,serverrec* reply, std::string tcp_host,std::string ipaddr,int port) { return 0; }; void Module::OnEvent(Event* event) { return; }; char* Module::OnRequest(Request* request) { return NULL; }; int Module::OnOperCompare(std::string password, std::string input) { return 0; }; void Module::OnGlobalOper(userrec* user) { }; void Module::OnGlobalConnect(userrec* user) { }; int Module::OnAddBan(userrec* source, chanrec* channel,std::string banmask) { return 0; }; int Module::OnDelBan(userrec* source, chanrec* channel,std::string banmask) { return 0; }; void Module::OnRawSocketAccept(int fd, std::string ip, int localport) { }; int Module::OnRawSocketWrite(int fd, char* buffer, int count) { return 0; }; void Module::OnRawSocketClose(int fd) { }; int Module::OnRawSocketRead(int fd, char* buffer, unsigned int count, int &readresult) { return 0; }; // server is a wrapper class that provides methods to all of the C-style // exports in the core // Server::Server() { } Server::~Server() { } void Server::SendOpers(std::string s) { WriteOpers("%s",s.c_str()); } bool Server::MatchText(std::string sliteral, std::string spattern) { char literal[MAXBUF],pattern[MAXBUF]; strlcpy(literal,sliteral.c_str(),MAXBUF); strlcpy(pattern,spattern.c_str(),MAXBUF); return match(literal,pattern); } void Server::SendToModeMask(std::string modes, int flags, std::string text) { WriteMode(modes.c_str(),flags,"%s",text.c_str()); } chanrec* Server::JoinUserToChannel(userrec* user, std::string cname, std::string key) { return add_channel(user,cname.c_str(),key.c_str(),false); } chanrec* Server::PartUserFromChannel(userrec* user, std::string cname, std::string reason) { return del_channel(user,cname.c_str(),reason.c_str(),false); } chanuserlist Server::GetUsers(chanrec* chan) { chanuserlist userl; userl.clear(); std::vector *list = chan->GetUsers(); for (std::vector::iterator i = list->begin(); i != list->end(); i++) { char* o = *i; userl.push_back((userrec*)o); } return userl; } void Server::ChangeUserNick(userrec* user, std::string nickname) { force_nickchange(user,nickname.c_str()); } void Server::QuitUser(userrec* user, std::string reason) { kill_link(user,reason.c_str()); } bool Server::IsUlined(std::string server) { return is_uline(server.c_str()); } void Server::CallCommandHandler(std::string commandname, char** parameters, int pcnt, userrec* user) { call_handler(commandname.c_str(),parameters,pcnt,user); } void Server::Log(int level, std::string s) { log(level,"%s",s.c_str()); } void Server::AddCommand(char* cmd, handlerfunc f, char flags, int minparams, char* source) { createcommand(cmd,f,flags,minparams,source); } void Server::SendMode(char **parameters, int pcnt, userrec *user) { server_mode(parameters,pcnt,user); } void Server::Send(int Socket, std::string s) { Write(Socket,"%s",s.c_str()); } void Server::SendServ(int Socket, std::string s) { WriteServ(Socket,"%s",s.c_str()); } void Server::SendFrom(int Socket, userrec* User, std::string s) { WriteFrom(Socket,User,"%s",s.c_str()); } void Server::SendTo(userrec* Source, userrec* Dest, std::string s) { if (!Source) { // if source is NULL, then the message originates from the local server Write(Dest->fd,":%s %s",this->GetServerName().c_str(),s.c_str()); } else { // otherwise it comes from the user specified WriteTo(Source,Dest,"%s",s.c_str()); } } void Server::SendChannelServerNotice(std::string ServName, chanrec* Channel, std::string text) { WriteChannelWithServ((char*)ServName.c_str(), Channel, "%s", text.c_str()); } void Server::SendChannel(userrec* User, chanrec* Channel, std::string s,bool IncludeSender) { if (IncludeSender) { WriteChannel(Channel,User,"%s",s.c_str()); } else { ChanExceptSender(Channel,User,"%s",s.c_str()); } } bool Server::CommonChannels(userrec* u1, userrec* u2) { return (common_channels(u1,u2) != 0); } void Server::SendCommon(userrec* User, std::string text,bool IncludeSender) { if (IncludeSender) { WriteCommon(User,"%s",text.c_str()); } else { WriteCommonExcept(User,"%s",text.c_str()); } } void Server::SendWallops(userrec* User, std::string text) { WriteWallOps(User,false,"%s",text.c_str()); } void Server::ChangeHost(userrec* user, std::string host) { ChangeDisplayedHost(user,host.c_str()); } void Server::ChangeGECOS(userrec* user, std::string gecos) { ChangeName(user,gecos.c_str()); } bool Server::IsNick(std::string nick) { return (isnick(nick.c_str()) != 0); } userrec* Server::FindNick(std::string nick) { return Find(nick); } userrec* Server::FindDescriptor(int socket) { return (socket < 65536 ? fd_ref_table[socket] : NULL); } chanrec* Server::FindChannel(std::string channel) { return FindChan(channel.c_str()); } std::string Server::ChanMode(userrec* User, chanrec* Chan) { return cmode(User,Chan); } bool Server::IsOnChannel(userrec* User, chanrec* Chan) { return has_channel(User,Chan); } std::string Server::GetServerName() { return getservername(); } std::string Server::GetNetworkName() { return getnetworkname(); } std::string Server::GetServerDescription() { return getserverdesc(); } Admin Server::GetAdmin() { return Admin(getadminname(),getadminemail(),getadminnick()); } bool Server::AddExtendedMode(char modechar, int type, bool requires_oper, int params_when_on, int params_when_off) { if (((modechar >= 'A') && (modechar <= 'Z')) || ((modechar >= 'a') && (modechar <= 'z'))) { if (type == MT_SERVER) { log(DEBUG,"*** API ERROR *** Modes of type MT_SERVER are reserved for future expansion"); return false; } if (((params_when_on>0) || (params_when_off>0)) && (type == MT_CLIENT)) { log(DEBUG,"*** API ERROR *** Parameters on MT_CLIENT modes are not supported"); return false; } if ((params_when_on>1) || (params_when_off>1)) { log(DEBUG,"*** API ERROR *** More than one parameter for an MT_CHANNEL mode is not yet supported"); return false; } return DoAddExtendedMode(modechar,type,requires_oper,params_when_on,params_when_off); } else { log(DEBUG,"*** API ERROR *** Muppet modechar detected."); } return false; } bool Server::AddExtendedListMode(char modechar) { bool res = DoAddExtendedMode(modechar,MT_CHANNEL,false,1,1); if (res) ModeMakeList(modechar); return res; } int Server::CountUsers(chanrec* c) { return usercount(c); } bool Server::UserToPseudo(userrec* user,std::string message) { unsigned int old_fd = user->fd; user->fd = FD_MAGIC_NUMBER; user->ClearBuffer(); Write(old_fd,"ERROR :Closing link (%s@%s) [%s]",user->ident,user->host,message.c_str()); #ifdef USE_KQUEUE struct kevent ke; EV_SET(&ke, old_fd, EVFILT_READ, EV_DELETE, 0, 0, NULL); int i = kevent(kq, &ke, 1, 0, 0, NULL); if (i == -1) { log(DEBUG,"kqueue: Failed to remove user from queue!"); } #endif shutdown(old_fd,2); close(old_fd); } bool Server::PseudoToUser(userrec* alive,userrec* zombie,std::string message) { zombie->fd = alive->fd; alive->fd = FD_MAGIC_NUMBER; alive->ClearBuffer(); Write(zombie->fd,":%s!%s@%s NICK %s",alive->nick,alive->ident,alive->host,zombie->nick); kill_link(alive,message.c_str()); fd_ref_table[zombie->fd] = zombie; for (int i = 0; i != MAXCHANS; i++) { if (zombie->chans[i].channel != NULL) { if (zombie->chans[i].channel->name) { chanrec* Ptr = zombie->chans[i].channel; WriteFrom(zombie->fd,zombie,"JOIN %s",Ptr->name); if (Ptr->topicset) { WriteServ(zombie->fd,"332 %s %s :%s", zombie->nick, Ptr->name, Ptr->topic); WriteServ(zombie->fd,"333 %s %s %s %d", zombie->nick, Ptr->name, Ptr->setby, Ptr->topicset); } userlist(zombie,Ptr); WriteServ(zombie->fd,"366 %s %s :End of /NAMES list.", zombie->nick, Ptr->name); } } } } void Server::AddGLine(long duration, std::string source, std::string reason, std::string hostmask) { add_gline(duration, source.c_str(), reason.c_str(), hostmask.c_str()); } void Server::AddQLine(long duration, std::string source, std::string reason, std::string nickname) { add_qline(duration, source.c_str(), reason.c_str(), nickname.c_str()); } void Server::AddZLine(long duration, std::string source, std::string reason, std::string ipaddr) { add_zline(duration, source.c_str(), reason.c_str(), ipaddr.c_str()); } void Server::AddKLine(long duration, std::string source, std::string reason, std::string hostmask) { add_kline(duration, source.c_str(), reason.c_str(), hostmask.c_str()); } void Server::AddELine(long duration, std::string source, std::string reason, std::string hostmask) { add_eline(duration, source.c_str(), reason.c_str(), hostmask.c_str()); } bool Server::DelGLine(std::string hostmask) { del_gline(hostmask.c_str()); } bool Server::DelQLine(std::string nickname) { del_qline(nickname.c_str()); } bool Server::DelZLine(std::string ipaddr) { del_zline(ipaddr.c_str()); } bool Server::DelKLine(std::string hostmask) { del_kline(hostmask.c_str()); } bool Server::DelELine(std::string hostmask) { del_eline(hostmask.c_str()); } long Server::CalcDuration(std::string delta) { return duration(delta.c_str()); } bool Server::IsValidMask(std::string mask) { const char* dest = mask.c_str(); if (strchr(dest,'!')==0) return false; if (strchr(dest,'@')==0) return false; for (int i = 0; i < strlen(dest); i++) if (dest[i] < 32) return false; for (int i = 0; i < strlen(dest); i++) if (dest[i] > 126) return false; int c = 0; for (int i = 0; i < strlen(dest); i++) if (dest[i] == '!') c++; if (c>1) return false; c = 0; for (int i = 0; i < strlen(dest); i++) if (dest[i] == '@') c++; if (c>1) return false; return true; } void Server::MeshSendAll(std::string text) { NetSendToAll((char*)text.c_str()); } void Server::MeshSendCommon(userrec* user, std::string text) { if (user) NetSendToCommon(user,(char*)text.c_str()); } void Server::MeshSendAllAlive(std::string text) { NetSendToAllAlive((char*)text.c_str()); } void Server::MeshSendUnicast(std::string destination, std::string text) { NetSendToOne((char*)destination.c_str(),(char*)text.c_str()); } void Server::MeshSendAllExcept(std::string target, std::string text) { NetSendToAllExcept(target.c_str(),(char*)text.c_str()); } bool Server::MeshCheckChan(chanrec *c,std::string servername) { if (c) { return ChanAnyOnThisServer(c,(char*)servername.c_str()); } else return false; } bool Server::MeshCheckCommon(userrec* u,std::string servername) { if (u) { return CommonOnThisServer(u,(char*)servername.c_str()); } else return false; } Module* Server::FindModule(std::string name) { for (int i = 0; i <= MODCOUNT; i++) { if (module_names[i] == name) { return modules[i]; } } return NULL; } ConfigReader::ConfigReader() { this->cache = new std::stringstream(std::stringstream::in | std::stringstream::out); this->errorlog = new std::stringstream(std::stringstream::in | std::stringstream::out); this->readerror = LoadConf(CONFIG_FILE,this->cache,this->errorlog); if (!this->readerror) this->error = CONF_FILE_NOT_FOUND; } ConfigReader::~ConfigReader() { if (this->cache) delete this->cache; if (this->errorlog) delete this->errorlog; } ConfigReader::ConfigReader(std::string filename) { this->cache = new std::stringstream(std::stringstream::in | std::stringstream::out); this->errorlog = new std::stringstream(std::stringstream::in | std::stringstream::out); this->readerror = LoadConf(filename.c_str(),this->cache,this->errorlog); if (!this->readerror) this->error = CONF_FILE_NOT_FOUND; }; std::string ConfigReader::ReadValue(std::string tag, std::string name, int index) { char val[MAXBUF]; char t[MAXBUF]; char n[MAXBUF]; strlcpy(t,tag.c_str(),MAXBUF); strlcpy(n,name.c_str(),MAXBUF); int res = ReadConf(cache,t,n,index,val); if (!res) { this->error = CONF_VALUE_NOT_FOUND; return ""; } return val; } bool ConfigReader::ReadFlag(std::string tag, std::string name, int index) { char val[MAXBUF]; char t[MAXBUF]; char n[MAXBUF]; strlcpy(t,tag.c_str(),MAXBUF); strlcpy(n,name.c_str(),MAXBUF); int res = ReadConf(cache,t,n,index,val); if (!res) { this->error = CONF_VALUE_NOT_FOUND; return false; } std::string s = val; return ((s == "yes") || (s == "YES") || (s == "true") || (s == "TRUE") || (s == "1")); } long ConfigReader::ReadInteger(std::string tag, std::string name, int index, bool needs_unsigned) { char val[MAXBUF]; char t[MAXBUF]; char n[MAXBUF]; strlcpy(t,tag.c_str(),MAXBUF); strlcpy(n,name.c_str(),MAXBUF); int res = ReadConf(cache,t,n,index,val); if (!res) { this->error = CONF_VALUE_NOT_FOUND; return 0; } for (int i = 0; i < strlen(val); i++) { if (!isdigit(val[i])) { this->error = CONF_NOT_A_NUMBER; return 0; } } if ((needs_unsigned) && (atoi(val)<0)) { this->error = CONF_NOT_UNSIGNED; return 0; } return atoi(val); } long ConfigReader::GetError() { long olderr = this->error; this->error = 0; return olderr; } void ConfigReader::DumpErrors(bool bail, userrec* user) { if (bail) { printf("There were errors in your configuration:\n%s",errorlog->str().c_str()); exit(0); } else { char dataline[1024]; if (user) { WriteServ(user->fd,"NOTICE %s :There were errors in the configuration file:",user->nick); while (!errorlog->eof()) { errorlog->getline(dataline,1024); WriteServ(user->fd,"NOTICE %s :%s",user->nick,dataline); } } else { WriteOpers("There were errors in the configuration file:",user->nick); while (!errorlog->eof()) { errorlog->getline(dataline,1024); WriteOpers(dataline); } } return; } } int ConfigReader::Enumerate(std::string tag) { return EnumConf(cache,tag.c_str()); } int ConfigReader::EnumerateValues(std::string tag, int index) { return EnumValues(cache, tag.c_str(), index); } bool ConfigReader::Verify() { return this->readerror; } FileReader::FileReader(std::string filename) { file_cache c; readfile(c,filename.c_str()); this->fc = c; } FileReader::FileReader() { } void FileReader::LoadFile(std::string filename) { file_cache c; readfile(c,filename.c_str()); this->fc = c; } FileReader::~FileReader() { } bool FileReader::Exists() { if (fc.size() == 0) { return(false); } else { return(true); } } std::string FileReader::GetLine(int x) { if ((x<0) || (x>fc.size())) return ""; return fc[x]; } int FileReader::FileSize() { return fc.size(); } std::vector modules(255); std::vector factory(255); int MODCOUNT = -1;