X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=src%2Fhelperfuncs.cpp;h=f8ee0d1a65f568d5ddc9629be5a0366b51817bee;hb=f3f2388a81b6463e1229fa5bf2b8c427440bf406;hp=354e16bc9e73cc70b3ff4263bf709f4a3ee57245;hpb=3e80f82a1bacc75753dbb4df1e4089ae5f5eb134;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/src/helperfuncs.cpp b/src/helperfuncs.cpp index 354e16bc9..f8ee0d1a6 100644 --- a/src/helperfuncs.cpp +++ b/src/helperfuncs.cpp @@ -1,1184 +1,75 @@ -/* +------------------------------------+ - * | Inspire Internet Relay Chat Daemon | - * +------------------------------------+ +/* + * InspIRCd -- Internet Relay Chat Daemon * - * InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev. - * E-mail: - * - * + * Copyright (C) 2019-2020 Matt Schatz + * Copyright (C) 2018 linuxdaemon + * Copyright (C) 2013 Daniel Vassdal + * Copyright (C) 2013 Adam + * Copyright (C) 2012-2015 Attila Molnar + * Copyright (C) 2012-2014, 2017-2018, 2020 Sadie Powell + * Copyright (C) 2012, 2018 Robby + * Copyright (C) 2012 ChrisTX + * Copyright (C) 2009-2010 Daniel De Graaf + * Copyright (C) 2007, 2010 Craig Edwards + * Copyright (C) 2007 Dennis Friis + * Copyright (C) 2006-2008 Robin Burchell * - * Written by Craig Edwards, Craig McLure, and others. - * This program is free but copyrighted software; see - * the file COPYING for details. + * This file is part of InspIRCd. InspIRCd is free software: you can + * redistribute it and/or modify it under the terms of the GNU General Public + * License as published by the Free Software Foundation, version 2. * - * --------------------------------------------------- - */ - -#include -#include "inspircd_config.h" -#include "inspircd.h" -#include "configreader.h" -#include -#include -#include -#include -#include -#include -#include -#ifdef HAS_EXECINFO -#include -#endif -#include "connection.h" -#include "users.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" -#include "typedefs.h" - -extern int MODCOUNT; -extern ModuleList modules; -extern ServerConfig *Config; -extern InspIRCd* ServerInstance; -extern time_t TIME; -extern char lowermap[255]; -extern userrec* fd_ref_table[MAX_DESCRIPTORS]; -static char already_sent[MAX_DESCRIPTORS]; -extern std::vector all_opers; -extern user_hash clientlist; -extern chan_hash chanlist; - -char LOG_FILE[MAXBUF]; - -extern std::vector local_users; - -static char TIMESTR[26]; -static time_t LAST = 0; - -/** log() - * Write a line of text `text' to the logfile (and stdout, if in nofork) if the level `level' - * is greater than the configured loglevel. - */ -void log(int level, char *text, ...) -{ - va_list argsPtr; - char textbuffer[MAXBUF]; - - /* If we were given -debug we output all messages, regardless of configured loglevel */ - if ((level < Config->LogLevel) && !Config->forcedebug) - return; - - if (TIME != LAST) - { - struct tm *timeinfo = localtime(&TIME); - - strlcpy(TIMESTR,asctime(timeinfo),26); - TIMESTR[24] = ':'; - LAST = TIME; - } - - if (Config->log_file) - { - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - if (Config->writelog) - fprintf(Config->log_file,"%s %s\n",TIMESTR,textbuffer); - } - - if (Config->nofork) - { - printf("%s %s\n", TIMESTR, textbuffer); - } -} - -/** readfile() - * Read the contents of a file located by `fname' into a file_cache pointed at by `F'. + * This program is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS + * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more + * details. * - * XXX - we may want to consider returning a file_cache or pointer to one, less confusing. - */ -void readfile(file_cache &F, const char* fname) -{ - FILE* file; - char linebuf[MAXBUF]; - - log(DEBUG,"readfile: loading %s",fname); - F.clear(); - file = fopen(fname,"r"); - - if (file) - { - while (!feof(file)) - { - fgets(linebuf,sizeof(linebuf),file); - linebuf[strlen(linebuf)-1]='\0'; - - if (!*linebuf) - { - strcpy(linebuf," "); - } - - if (!feof(file)) - { - F.push_back(linebuf); - } - } - - fclose(file); - } - else - { - log(DEBUG,"readfile: failed to load file: %s",fname); - } - - log(DEBUG,"readfile: loaded %s, %lu lines",fname,(unsigned long)F.size()); -} - -/** Write_NoFormat() - * Writes a given string in `text' to the socket on fd `sock' - only if the socket - * is a valid entry in the local FD table. - */ -void Write_NoFormat(int sock, const char *text) -{ - char tb[MAXBUF]; - int bytes; - - if ((sock < 0) || (!text) || (sock > MAX_DESCRIPTORS)) - return; - - bytes = snprintf(tb,MAXBUF,"%s\r\n",text); - chop(tb); - - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - try - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - fd_ref_table[sock]->AddWriteBuf(tb); - } - ServerInstance->stats->statsSent += bytes; - } - else - log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); -} - -/** Write() - * Same as Write_NoFormat(), but formatted printf() style first. - */ -void Write(int sock, char *text, ...) -{ - va_list argsPtr; - char textbuffer[MAXBUF]; - char tb[MAXBUF]; - int bytes; - - if ((sock < 0) || (sock > MAX_DESCRIPTORS)) - return; - - if (!text) - { - log(DEFAULT,"*** BUG *** Write was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - bytes = snprintf(tb,MAXBUF,"%s\r\n",textbuffer); - chop(tb); - - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - try - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - fd_ref_table[sock]->AddWriteBuf(tb); - } - ServerInstance->stats->statsSent += bytes; - } - else - log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); -} - -/** WriteServ_NoFormat() - * Same as Write_NoFormat(), except prefixes `text' with `:server.name '. - */ -void WriteServ_NoFormat(int sock, const char* text) -{ - char tb[MAXBUF]; - int bytes; - - if ((sock < 0) || (!text) || (sock > MAX_DESCRIPTORS)) - return; - - bytes = snprintf(tb,MAXBUF,":%s %s\r\n",Config->ServerName,text); - chop(tb); - - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - try - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - fd_ref_table[sock]->AddWriteBuf(tb); - } - ServerInstance->stats->statsSent += bytes; - } - else - log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); -} - -/** WriteServ() - * Same as Write(), except `text' is prefixed with `:server.name '. - */ -void WriteServ(int sock, char* text, ...) -{ - va_list argsPtr; - char textbuffer[MAXBUF]; - - if ((sock < 0) || (sock > MAX_DESCRIPTORS)) - return; - - if (!text) - { - log(DEFAULT,"*** BUG *** WriteServ was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - WriteServ_NoFormat(sock, textbuffer); -} - -/** WriteFrom_NoFormat() - * Write `text' to a socket with fd `sock' prefixed with `:n!u@h' - taken from - * the nick, user, and host of `user'. - */ -void WriteFrom_NoFormat(int sock, userrec *user, const char* text) -{ - char tb[MAXBUF]; - int bytes; - - if ((sock < 0) || (!text) || (!user) || (sock > MAX_DESCRIPTORS)) - return; - - bytes = snprintf(tb,MAXBUF,":%s %s\r\n",user->GetFullHost(),text); - chop(tb); - - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - try - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - fd_ref_table[sock]->AddWriteBuf(tb); - } - ServerInstance->stats->statsSent += bytes; - } - else - log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); -} - -/* write text from an originating user to originating user */ - -void WriteFrom(int sock, userrec *user,char* text, ...) -{ - va_list argsPtr; - char textbuffer[MAXBUF]; - char tb[MAXBUF]; - int bytes; - - if ((sock < 0) || (sock > MAX_DESCRIPTORS)) - return; - - if ((!text) || (!user)) - { - log(DEFAULT,"*** BUG *** WriteFrom was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - bytes = snprintf(tb,MAXBUF,":%s %s\r\n",user->GetFullHost(),textbuffer); - chop(tb); - - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - try - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - fd_ref_table[sock]->AddWriteBuf(tb); - } - - ServerInstance->stats->statsSent += bytes; - } - else - log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); -} - -/* write text to an destination user from a source user (e.g. user privmsg) */ - -void WriteTo(userrec *source, userrec *dest,char *data, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - - if ((!dest) || (!data)) - { - log(DEFAULT,"*** BUG *** WriteTo was given an invalid parameter"); - return; - } - - if (!IS_LOCAL(dest)) - return; - - va_start(argsPtr, data); - vsnprintf(textbuffer, MAXBUF, data, argsPtr); - va_end(argsPtr); - chop(textbuffer); - - // if no source given send it from the server. - if (!source) - { - WriteServ_NoFormat(dest->fd,textbuffer); - } - else - { - WriteFrom_NoFormat(dest->fd,source,textbuffer); - } -} - -void WriteTo_NoFormat(userrec *source, userrec *dest, const char *data) -{ - if ((!dest) || (!data)) - return; - - if (!source) - { - WriteServ_NoFormat(dest->fd,data); - } - else - { - WriteFrom_NoFormat(dest->fd,source,data); - } -} - -/* write formatted text from a source user to all users on a channel - * including the sender (NOT for privmsg, notice etc!) */ - -void WriteChannel(chanrec* Ptr, userrec* user, char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - CUList *ulist; - - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (i->second->fd != FD_MAGIC_NUMBER) - WriteTo_NoFormat(user,i->second,textbuffer); - } -} - -void WriteChannel_NoFormat(chanrec* Ptr, userrec* user, const char* text) -{ - CUList *ulist; - - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (i->second->fd != FD_MAGIC_NUMBER) - WriteTo_NoFormat(user,i->second,text); - } -} - - -/* write formatted text from a source user to all users on a channel - * including the sender (NOT for privmsg, notice etc!) doesnt send to - * users on remote servers */ - -void WriteChannelLocal(chanrec* Ptr, userrec* user, char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - CUList *ulist; - - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((i->second->fd != FD_MAGIC_NUMBER) && (i->second != user)) - { - if (!user) - { - WriteServ_NoFormat(i->second->fd,textbuffer); - } - else - { - WriteTo_NoFormat(user,i->second,textbuffer); - } - } - } -} - -void WriteChannelLocal_NoFormat(chanrec* Ptr, userrec* user, const char* text) -{ - CUList *ulist; - - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((i->second->fd != FD_MAGIC_NUMBER) && (i->second != user)) - { - if (!user) - { - WriteServ_NoFormat(i->second->fd,text); - } - else - { - WriteTo_NoFormat(user,i->second,text); - } - } - } -} - - - -void WriteChannelWithServ(char* ServName, chanrec* Ptr, char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - CUList *ulist; - - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannelWithServ was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (IS_LOCAL(i->second)) - WriteServ_NoFormat(i->second->fd,textbuffer); - } -} - -void WriteChannelWithServ_NoFormat(char* ServName, chanrec* Ptr, const char* text) -{ - CUList *ulist; - - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannelWithServ was given an invalid parameter"); - return; - } - - ulist = Ptr->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (IS_LOCAL(i->second)) - WriteServ_NoFormat(i->second->fd,text); - } -} - - - -/* write formatted text from a source user to all users on a channel except - * for the sender (for privmsg etc) */ - -void ChanExceptSender(chanrec* Ptr, userrec* user, char status, char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - CUList *ulist; - - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** ChanExceptSender was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - switch (status) - { - case '@': - ulist = Ptr->GetOppedUsers(); - break; - case '%': - ulist = Ptr->GetHalfoppedUsers(); - break; - case '+': - ulist = Ptr->GetVoicedUsers(); - break; - default: - ulist = Ptr->GetUsers(); - break; - } - - log(DEBUG,"%d users to write to",ulist->size()); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((IS_LOCAL(i->second)) && (user != i->second)) - WriteFrom_NoFormat(i->second->fd,user,textbuffer); - } -} - -void ChanExceptSender_NoFormat(chanrec* Ptr, userrec* user, char status, const char* text) -{ - CUList *ulist; - - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** ChanExceptSender was given an invalid parameter"); - return; - } - - switch (status) - { - case '@': - ulist = Ptr->GetOppedUsers(); - break; - case '%': - ulist = Ptr->GetHalfoppedUsers(); - break; - case '+': - ulist = Ptr->GetVoicedUsers(); - break; - default: - ulist = Ptr->GetUsers(); - break; - } - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((IS_LOCAL(i->second)) && (user != i->second)) - WriteFrom_NoFormat(i->second->fd,user,text); - } -} - -std::string GetServerDescription(char* servername) -{ - std::string description = ""; - - FOREACH_MOD(I_OnGetServerDescription,OnGetServerDescription(servername,description)); - - if (description != "") - { - return description; - } - else - { - // not a remote server that can be found, it must be me. - return Config->ServerDesc; - } -} - -/* write a formatted string to all users who share at least one common - * channel, including the source user e.g. for use in NICK */ - -void WriteCommon(userrec *u, char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - bool sent_to_at_least_one = false; - - if (!u) - { - log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); - return; - } - - if (u->registered != 7) - { - log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - // FIX: Stops a message going to the same person more than once - memset(&already_sent,0,MAX_DESCRIPTORS); - - for (std::vector::const_iterator v = u->chans.begin(); v != u->chans.end(); v++) - { - if (((ucrec*)(*v))->channel) - { - CUList *ulist= ((ucrec*)(*v))->channel->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((i->second->fd > -1) && (!already_sent[i->second->fd])) - { - already_sent[i->second->fd] = 1; - WriteFrom_NoFormat(i->second->fd,u,textbuffer); - sent_to_at_least_one = true; - } - } - } - } - - /* - * if the user was not in any channels, no users will receive the text. Make sure the user - * receives their OWN message for WriteCommon - */ - if (!sent_to_at_least_one) - { - WriteFrom_NoFormat(u->fd,u,textbuffer); - } -} - -void WriteCommon_NoFormat(userrec *u, const char* text) -{ - bool sent_to_at_least_one = false; - - if (!u) - { - log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); - return; - } - - if (u->registered != 7) - { - log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); - return; - } - - // FIX: Stops a message going to the same person more than once - memset(&already_sent,0,MAX_DESCRIPTORS); - - for (std::vector::const_iterator v = u->chans.begin(); v != u->chans.end(); v++) - { - if (((ucrec*)(*v))->channel) - { - CUList *ulist= ((ucrec*)(*v))->channel->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if ((i->second->fd > -1) && (!already_sent[i->second->fd])) - { - already_sent[i->second->fd] = 1; - WriteFrom_NoFormat(i->second->fd,u,text); - sent_to_at_least_one = true; - } - } - } - } - - /* - * if the user was not in any channels, no users will receive the text. Make sure the user - * receives their OWN message for WriteCommon - */ - if (!sent_to_at_least_one) - { - WriteFrom_NoFormat(u->fd,u,text); - } -} - - -/* write a formatted string to all users who share at least one common - * channel, NOT including the source user e.g. for use in QUIT + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . */ -void WriteCommonExcept(userrec *u, char* text, ...) -{ - char textbuffer[MAXBUF]; - char oper_quit[MAXBUF]; - bool quit_munge = false; - va_list argsPtr; - int total; - - if (!u) - { - log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); - return; - } - if (u->registered != 7) - { - log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); - return; - } - - va_start(argsPtr, text); - total = vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - if ((Config->HideSplits) && (total > 6)) - { - /* Yeah yeah, this is ugly. But its fast, live with it. */ - char* check = textbuffer; - - if ((*check++ == 'Q') && (*check++ == 'U') && (*check++ == 'I') && (*check++ == 'T') && (*check++ == ' ') && (*check++ == ':')) - { - std::stringstream split(check); - std::string server_one; - std::string server_two; - - split >> server_one; - split >> server_two; - - if ((FindServerName(server_one)) && (FindServerName(server_two))) - { - strlcpy(oper_quit,textbuffer,MAXQUIT); - strlcpy(check,"*.net *.split",MAXQUIT); - quit_munge = true; - } - } - } - - if ((Config->HideBans) && (total > 13) && (!quit_munge)) - { - char* check = textbuffer; - - /* XXX - as above */ - if ((*check++ == 'Q') && (*check++ == 'U') && (*check++ == 'I') && (*check++ == 'T') && (*check++ == ' ') && (*check++ == ':')) - { - check++; - - if ((*check++ == '-') && (*check++ == 'L') && (*check++ == 'i') && (*check++ == 'n') && (*check++ == 'e') && (*check++ == 'd') && (*check++ == ':')) - { - strlcpy(oper_quit,textbuffer,MAXQUIT); - *(--check) = 0; // We don't need to strlcpy, we just chop it from the : - quit_munge = true; - } - } - } - - memset(&already_sent,0,MAX_DESCRIPTORS); - - for (std::vector::const_iterator v = u->chans.begin(); v != u->chans.end(); v++) - { - if (((ucrec*)(*v))->channel) - { - CUList *ulist= ((ucrec*)(*v))->channel->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (u != i->second) - { - if ((i->second->fd > -1) && (!already_sent[i->second->fd])) - { - already_sent[i->second->fd] = 1; - - if (quit_munge) - { - WriteFrom_NoFormat(i->second->fd,u,*i->second->oper ? oper_quit : textbuffer); - } - else - WriteFrom_NoFormat(i->second->fd,u,textbuffer); - } - } - } - } - } -} - -void WriteCommonExcept_NoFormat(userrec *u, const char* text) -{ - if (!u) - { - log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); - return; - } - - if (u->registered != 7) - { - log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); - return; - } - - memset(&already_sent,0,MAX_DESCRIPTORS); - - for (std::vector::const_iterator v = u->chans.begin(); v != u->chans.end(); v++) - { - if (((ucrec*)(*v))->channel) - { - CUList *ulist= ((ucrec*)(*v))->channel->GetUsers(); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (u != i->second) - { - if ((i->second->fd > -1) && (!already_sent[i->second->fd])) - { - already_sent[i->second->fd] = 1; - WriteFrom_NoFormat(i->second->fd,u,text); - } - } - } - } - } -} - - -/* XXX - We don't use WriteMode for this because WriteMode is very slow and - * this isnt. Basically WriteMode has to iterate ALL the users 'n' times for - * the number of modes provided, e.g. if you send WriteMode 'og' to write to - * opers with globops, and you have 2000 users, thats 4000 iterations. WriteOpers - * uses the oper list, which means if you have 2000 users but only 5 opers, - * it iterates 5 times. - */ -void WriteOpers(const char* text, ...) -{ - char textbuffer[MAXBUF]; - va_list argsPtr; - - if (!text) - { - log(DEFAULT,"*** BUG *** WriteOpers was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - WriteOpers_NoFormat(textbuffer); -} - -void WriteOpers_NoFormat(const char* text) -{ - if (!text) - { - log(DEFAULT,"*** BUG *** WriteOpers_NoFormat was given an invalid parameter"); - return; - } - - for (std::vector::iterator i = all_opers.begin(); i != all_opers.end(); i++) - { - userrec* a = *i; - - if (IS_LOCAL(a)) - { - if (a->modebits & UM_SERVERNOTICE) - { - // send server notices to all with +s - WriteServ(a->fd,"NOTICE %s :%s",a->nick,text); - } - } - } -} - -void ServerNoticeAll(char* text, ...) -{ - if (!text) - return; - - char textbuffer[MAXBUF]; - char formatbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - snprintf(formatbuffer,MAXBUF,"NOTICE $%s :%s",Config->ServerName,textbuffer); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - WriteServ_NoFormat(t->fd,formatbuffer); - } -} - -void ServerPrivmsgAll(char* text, ...) -{ - if (!text) - return; - - char textbuffer[MAXBUF]; - char formatbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - snprintf(formatbuffer,MAXBUF,"PRIVMSG $%s :%s",Config->ServerName,textbuffer); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - WriteServ_NoFormat(t->fd,formatbuffer); - } -} - -void WriteMode(const char* modes, int flags, const char* text, ...) -{ - char textbuffer[MAXBUF]; - int modelen; - va_list argsPtr; - - if ((!text) || (!modes) || (!flags)) - { - log(DEFAULT,"*** BUG *** WriteMode was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - modelen = strlen(modes); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - bool send_to_user = false; - - if (flags == WM_AND) - { - send_to_user = true; - - for (int n = 0; n < modelen; n++) - { - if (!hasumode(t,modes[n])) - { - send_to_user = false; - break; - } - } - } - else if (flags == WM_OR) - { - send_to_user = false; - - for (int n = 0; n < modelen; n++) - { - if (hasumode(t,modes[n])) - { - send_to_user = true; - break; - } - } - } - - if (send_to_user) - { - WriteServ(t->fd,"NOTICE %s :%s",t->nick,textbuffer); - } - } -} - -void NoticeAll(userrec *source, bool local_only, char* text, ...) -{ - char textbuffer[MAXBUF]; - char formatbuffer[MAXBUF]; - va_list argsPtr; - - if ((!text) || (!source)) - { - log(DEFAULT,"*** BUG *** NoticeAll was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - snprintf(formatbuffer,MAXBUF,"NOTICE $* :%s",textbuffer); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - WriteFrom_NoFormat(t->fd,source,formatbuffer); - } -} - - -void WriteWallOps(userrec *source, bool local_only, char* text, ...) -{ - char textbuffer[MAXBUF]; - char formatbuffer[MAXBUF]; - va_list argsPtr; - - if ((!text) || (!source)) - { - log(DEFAULT,"*** BUG *** WriteOpers was given an invalid parameter"); - return; - } - - va_start(argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - snprintf(formatbuffer,MAXBUF,"WALLOPS :%s",textbuffer); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); +#ifdef _WIN32 +#define _CRT_RAND_S +#include +#endif - if ((IS_LOCAL(t)) && (t->modebits & UM_WALLOPS)) - { - WriteTo_NoFormat(source,t,formatbuffer); - } - } -} +#include "inspircd.h" +#include "xline.h" +#include "exitcodes.h" +#include -/* convert a string to lowercase. Note following special circumstances - * taken from RFC 1459. Many "official" server branches still hold to this - * rule so i will too; - * - * Because of IRC's scandanavian origin, the characters {}| are - * considered to be the lower case equivalents of the characters []\, - * respectively. This is a critical issue when determining the - * equivalence of two nicknames. - */ -void strlower(char *n) +/* Find a user record by nickname and return a pointer to it */ +User* InspIRCd::FindNick(const std::string &nick) { - if (n) - { - for (char* t = n; *t; t++) - *t = lowermap[(unsigned char)*t]; - } + if (!nick.empty() && isdigit(*nick.begin())) + return FindUUID(nick); + return FindNickOnly(nick); } -/* Find a user record by nickname and return a pointer to it */ - -userrec* Find(const std::string &nick) +User* InspIRCd::FindNickOnly(const std::string &nick) { - user_hash::iterator iter = clientlist.find(nick); + user_hash::iterator iter = this->Users->clientlist.find(nick); - if (iter == clientlist.end()) - /* Couldn't find it */ + if (iter == this->Users->clientlist.end()) return NULL; return iter->second; } -userrec* Find(const char* nick) +User *InspIRCd::FindUUID(const std::string &uid) { - user_hash::iterator iter; - - if (!nick) - return NULL; + user_hash::iterator finduuid = this->Users->uuidlist.find(uid); - iter = clientlist.find(nick); - - if (iter == clientlist.end()) + if (finduuid == this->Users->uuidlist.end()) return NULL; - return iter->second; + return finduuid->second; } - /* find a channel record by channel name and return a pointer to it */ -chanrec* FindChan(const char* chan) +Channel* InspIRCd::FindChan(const std::string &chan) { - chan_hash::iterator iter; - - if (!chan) - { - log(DEFAULT,"*** BUG *** Findchan was given an invalid parameter"); - return NULL; - } - - iter = chanlist.find(chan); + chan_hash::iterator iter = chanlist.find(chan); if (iter == chanlist.end()) /* Couldn't find it */ @@ -1187,709 +78,479 @@ chanrec* FindChan(const char* chan) return iter->second; } - -long GetMaxBans(char* name) +bool InspIRCd::IsValidMask(const std::string &mask) { - std::string x; - for (std::map::iterator n = Config->maxbans.begin(); n != Config->maxbans.end(); n++) + const char* dest = mask.c_str(); + int exclamation = 0; + int atsign = 0; + + for (const char* i = dest; *i; i++) { - x = n->first; - if (match(name,x.c_str())) + /* out of range character, bad mask */ + if (*i < 32 || *i > 126) { - return n->second; + return false; } - } - return 64; -} - -void purge_empty_chans(userrec* u) -{ - std::vector to_delete; - // firstly decrement the count on each channel - for (std::vector::iterator f = u->chans.begin(); f != u->chans.end(); f++) - { - if (((ucrec*)(*f))->channel) + switch (*i) { - if (((ucrec*)(*f))->channel->DelUser(u) == 0) - { - /* No users left in here, mark it for deletion */ - to_delete.push_back(((ucrec*)(*f))->channel); - ((ucrec*)(*f))->channel = NULL; - } + case '!': + exclamation++; + break; + case '@': + atsign++; + break; } } - log(DEBUG,"purge_empty_chans: %d channels to delete",to_delete.size()); + /* valid masks only have 1 ! and @ */ + if (exclamation != 1 || atsign != 1) + return false; - for (std::vector::iterator n = to_delete.begin(); n != to_delete.end(); n++) - { - chanrec* thischan = (chanrec*)*n; - chan_hash::iterator i2 = chanlist.find(thischan->name); - if (i2 != chanlist.end()) - { - FOREACH_MOD(I_OnChannelDelete,OnChannelDelete(i2->second)); - delete i2->second; - chanlist.erase(i2); - } - } + if (mask.length() > ServerInstance->Config->Limits.GetMaxMask()) + return false; - if (*u->oper) - DeleteOper(u); + return true; } - -char* chanmodes(chanrec *chan, bool showkey) +void InspIRCd::StripColor(std::string &sentence) { - static char scratch[MAXBUF]; - static char sparam[MAXBUF]; - char* offset = scratch; - std::string extparam = ""; - - if (!chan) - { - log(DEFAULT,"*** BUG *** chanmodes was given an invalid parameter"); - *scratch = '\0'; - return scratch; - } - - *scratch = '\0'; - *sparam = '\0'; + /* refactor this completely due to SQUIT bug since the old code would strip last char and replace with \0 --peavey */ + int seq = 0; - /* This was still iterating up to 190, chanrec::custom_modes is only 64 elements -- Om */ - for(int n = 0; n < 64; n++) + for (std::string::iterator i = sentence.begin(); i != sentence.end();) { - if(chan->modes[n]) + if (*i == 3) + seq = 1; + else if (seq && (( ((*i >= '0') && (*i <= '9')) || (*i == ',') ) )) { - *offset++ = n+65; - extparam = ""; - switch (n) - { - case CM_KEY: - extparam = (showkey ? chan->key : ""); - break; - case CM_LIMIT: - extparam = ConvToStr(chan->limit); - break; - case CM_NOEXTERNAL: - case CM_TOPICLOCK: - case CM_INVITEONLY: - case CM_MODERATED: - case CM_SECRET: - case CM_PRIVATE: - /* We know these have no parameters */ - break; - default: - extparam = chan->GetModeParameter(n+65); - break; - } - if (extparam != "") - { - charlcat(sparam,' ',MAXBUF); - strlcat(sparam,extparam.c_str(),MAXBUF); - } + seq++; + if ( (seq <= 4) && (*i == ',') ) + seq = 1; + else if (seq > 3) + seq = 0; } - } + else + seq = 0; - /* Null terminate scratch */ - *offset = '\0'; - strlcat(scratch,sparam,MAXMODES); - return scratch; + // Strip all control codes too except \001 for CTCP + if (seq || ((*i >= 0) && (*i < 32) && (*i != 1))) + i = sentence.erase(i); + else + ++i; + } } - -/* compile a userlist of a channel into a string, each nick seperated by - * spaces and op, voice etc status shown as @ and + */ - -void userlist(userrec *user,chanrec *c) +void InspIRCd::ProcessColors(file_cache& input) { - if ((!c) || (!user)) - { - log(DEFAULT,"*** BUG *** userlist was given an invalid parameter"); - return; - } - - char list[MAXBUF]; - size_t dlen, curlen; - - dlen = curlen = snprintf(list,MAXBUF,"353 %s = %s :", user->nick, c->name); - - int numusers = 0; - char* ptr = list + dlen; - - CUList *ulist= c->GetUsers(); - - /* Improvement by Brain - this doesnt change in value, so why was it inside - * the loop? + /* + * Replace all color codes from the special[] array to actual + * color code chars using C++ style escape sequences. You + * can append other chars to replace if you like -- Justasic */ - bool has_user = c->HasUser(user); - - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) + static struct special_chars { - if ((!has_user) && (i->second->modebits & UM_INVISIBLE)) + std::string character; + std::string replace; + special_chars(const std::string& c, const std::string& r) + : character(c) + , replace(r) { - /* - * user is +i, and source not on the channel, does not show - * nick in NAMES list - */ - continue; } + } special[] = { + special_chars("\\b", "\x02"), // Bold + special_chars("\\c", "\x03"), // Color + special_chars("\\i", "\x1D"), // Italic + special_chars("\\m", "\x11"), // Monospace + special_chars("\\r", "\x16"), // Reverse + special_chars("\\s", "\x1E"), // Strikethrough + special_chars("\\u", "\x1F"), // Underline + special_chars("\\x", "\x0F"), // Reset + special_chars("", "") + }; - size_t ptrlen = snprintf(ptr, MAXBUF, "%s%s ", cmode(i->second, c), i->second->nick); - - curlen += ptrlen; - ptr += ptrlen; - - numusers++; - - if (curlen > (480-NICKMAX)) + for(file_cache::iterator it = input.begin(), it_end = input.end(); it != it_end; it++) + { + std::string ret = *it; + for(int i = 0; special[i].character.empty() == false; ++i) { - /* list overflowed into multiple numerics */ - WriteServ_NoFormat(user->fd,list); + std::string::size_type pos = ret.find(special[i].character); + if(pos == std::string::npos) // Couldn't find the character, skip this line + continue; - /* reset our lengths */ - dlen = curlen = snprintf(list,MAXBUF,"353 %s = %s :", user->nick, c->name); - ptr = list + dlen; + if((pos > 0) && (ret[pos-1] == '\\') && (ret[pos] == '\\')) + continue; // Skip double slashes. - ptrlen = 0; - numusers = 0; + // Replace all our characters in the array + while(pos != std::string::npos) + { + ret = ret.substr(0, pos) + special[i].replace + ret.substr(pos + special[i].character.size()); + pos = ret.find(special[i].character, pos + special[i].replace.size()); + } } - } - - /* if whats left in the list isnt empty, send it */ - if (numusers) - { - WriteServ_NoFormat(user->fd,list); - } -} - -/* - * return a count of the users on a specific channel accounting for - * invisible users who won't increase the count. e.g. for /LIST - */ -int usercount_i(chanrec *c) -{ - int count = 0; - if (!c) - return 0; - - CUList *ulist= c->GetUsers(); - for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) - { - if (!(i->second->modebits & UM_INVISIBLE)) - count++; + // Replace double slashes with a single slash before we return + std::string::size_type pos = ret.find("\\\\"); + while(pos != std::string::npos) + { + ret = ret.substr(0, pos) + "\\" + ret.substr(pos + 2); + pos = ret.find("\\\\", pos + 1); + } + *it = ret; } - - return count; } -int usercount(chanrec *c) +/* true for valid channel name, false else */ +bool InspIRCd::DefaultIsChannel(const std::string& chname) { - return (c ? c->GetUserCounter() : 0); -} + if (chname.empty() || chname.length() > ServerInstance->Config->Limits.ChanMax) + return false; + if (chname[0] != '#') + return false; -/* looks up a users password for their connection class (/ tags) */ -ConnectClass GetClass(userrec *user) -{ - for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++) + for (std::string::const_iterator i = chname.begin()+1; i != chname.end(); ++i) { - if (match(user->host,i->host.c_str())) + switch (*i) { - return *i; + case ' ': + case ',': + case 7: + return false; } } - return *(Config->Classes.begin()); + return true; } -/* - * sends out an error notice to all connected clients (not to be used - * lightly!) - */ -void send_error(char *s) +/* true for valid nickname, false else */ +bool InspIRCd::DefaultIsNick(const std::string& n) { - log(DEBUG,"send_error: %s",s); + if (n.empty() || n.length() > ServerInstance->Config->Limits.NickMax) + return false; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + for (std::string::const_iterator i = n.begin(); i != n.end(); ++i) { - userrec* t = (userrec*)(*i); - if (t->registered == 7) + if ((*i >= 'A') && (*i <= '}')) { - WriteServ(t->fd,"NOTICE %s :%s",t->nick,s); - } - else + /* "A"-"}" can occur anywhere in a nickname */ + continue; + } + + if ((((*i >= '0') && (*i <= '9')) || (*i == '-')) && (i != n.begin())) { - // fix - unregistered connections receive ERROR, not NOTICE - Write(t->fd,"ERROR :%s",s); + /* "0"-"9", "-" can occur anywhere BUT the first char of a nickname */ + continue; } - } -} -void Error(int status) -{ - void *array[300]; - size_t size; - char **strings; - - signal(SIGALRM, SIG_IGN); - signal(SIGPIPE, SIG_IGN); - signal(SIGTERM, SIG_IGN); - signal(SIGABRT, SIG_IGN); - signal(SIGSEGV, SIG_IGN); - signal(SIGURG, SIG_IGN); - signal(SIGKILL, SIG_IGN); - log(DEFAULT,"*** fell down a pothole in the road to perfection ***"); -#ifdef HAS_EXECINFO - log(DEFAULT,"Please report the backtrace lines shown below with any bugreport to the bugtracker at http://www.inspircd.org/bugtrack/"); - size = backtrace(array, 30); - strings = backtrace_symbols(array, size); - for (int i = 0; i < size; i++) { - log(DEFAULT,"[%d] %s", i, strings[i]); + /* invalid character! abort */ + return false; } - free(strings); - WriteOpers("*** SIGSEGV: Please see the ircd.log for backtrace and report the error to http://www.inspircd.org/bugtrack/"); -#else - log(DEFAULT,"You do not have execinfo.h so i could not backtrace -- on FreeBSD, please install the libexecinfo port."); -#endif - send_error("Somebody screwed up... Whoops. IRC Server terminating."); - Exit(status); -} -// this function counts all users connected, wether they are registered or NOT. -int usercnt(void) -{ - return clientlist.size(); + return true; } -// this counts only registered users, so that the percentages in /MAP don't mess up when users are sitting in an unregistered state -int registered_usercount(void) +/* return true for good ident, false else */ +bool InspIRCd::DefaultIsIdent(const std::string& n) { - int c = 0; + if (n.empty()) + return false; - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) + for (std::string::const_iterator i = n.begin(); i != n.end(); ++i) { - if (i->second->registered == 7) c++; - } - - return c; -} + if ((*i >= 'A') && (*i <= '}')) + { + continue; + } -int usercount_invisible(void) -{ - int c = 0; + if (((*i >= '0') && (*i <= '9')) || (*i == '-') || (*i == '.')) + { + continue; + } - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if ((i->second->registered == 7) && (i->second->modebits & UM_INVISIBLE)) - c++; + return false; } - return c; -} - -int usercount_opers(void) -{ - int c = 0; - - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (*(i->second->oper)) - c++; - } - return c; + return true; } -int usercount_unknown(void) +bool InspIRCd::IsHost(const std::string& host) { - int c = 0; + // Hostnames must be non-empty and shorter than the maximum hostname length. + if (host.empty() || host.length() > ServerInstance->Config->Limits.MaxHost) + return false; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + unsigned int numdashes = 0; + unsigned int numdots = 0; + bool seendot = false; + const std::string::const_iterator hostend = host.end() - 1; + for (std::string::const_iterator iter = host.begin(); iter != host.end(); ++iter) { - userrec* t = (userrec*)(*i); - if (t->registered != 7) - c++; - } - - return c; -} - -long chancount(void) -{ - return chanlist.size(); -} + unsigned char chr = static_cast(*iter); -long local_count() -{ - int c = 0; + // If the current character is a label separator. + if (chr == '.') + { + numdots++; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - if (t->registered == 7) - c++; - } + // Consecutive separators are not allowed and dashes can not exist at the start or end + // of labels and separators must only exist between labels. + if (seendot || numdashes || iter == host.begin() || iter == hostend) + return false; - return c; -} + seendot = true; + continue; + } -void ShowMOTD(userrec *user) -{ - static char mbuf[MAXBUF]; - static char crud[MAXBUF]; - std::string WholeMOTD = ""; + // If this point is reached then the character is not a dot. + seendot = false; - if (!Config->MOTD.size()) - { - WriteServ(user->fd,"422 %s :Message of the day file is missing.",user->nick); - return; - } + // If the current character is a dash. + if (chr == '-') + { + // Consecutive separators are not allowed and dashes can not exist at the start or end + // of labels and separators must only exist between labels. + if (seendot || numdashes >= 2 || iter == host.begin() || iter == hostend) + return false; - snprintf(crud,MAXBUF,":%s 372 %s :- ", Config->ServerName, user->nick); - snprintf(mbuf,MAXBUF,":%s 375 %s :- %s message of the day\r\n", Config->ServerName, user->nick, Config->ServerName); - WholeMOTD = WholeMOTD + mbuf; + numdashes += 1; + continue; + } - for (unsigned int i = 0; i < Config->MOTD.size(); i++) - WholeMOTD = WholeMOTD + std::string(crud) + Config->MOTD[i].c_str() + std::string("\r\n"); + // If this point is reached then the character is not a dash. + numdashes = 0; - snprintf(mbuf,MAXBUF,":%s 376 %s :End of message of the day.\r\n", Config->ServerName, user->nick); - WholeMOTD = WholeMOTD + mbuf; + // Alphanumeric characters are allowed at any position. + if ((chr >= '0' && chr <= '9') || (chr >= 'A' && chr <= 'Z') || (chr >= 'a' && chr <= 'z')) + continue; - // only one write operation - if (Config->GetIOHook(user->port)) - { - try - { - Config->GetIOHook(user->port)->OnRawSocketWrite(user->fd,(char*)WholeMOTD.c_str(),WholeMOTD.length()); - } - catch (ModuleException& modexcept) - { - log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); - } - } - else - { - user->AddWriteBuf(WholeMOTD); + return false; } - ServerInstance->stats->statsSent += WholeMOTD.length(); + // Whilst simple hostnames (e.g. localhost) are valid we do not allow the server to use + // them to prevent issues with clients that differentiate between short client and server + // prefixes by checking whether the nickname contains a dot. + return numdots; } -void ShowRULES(userrec *user) +bool InspIRCd::IsSID(const std::string &str) { - if (!Config->RULES.size()) - { - WriteServ(user->fd,"NOTICE %s :Rules file is missing.",user->nick); - return; - } - WriteServ(user->fd,"NOTICE %s :%s rules",user->nick,Config->ServerName); - - for (unsigned int i = 0; i < Config->RULES.size(); i++) - WriteServ(user->fd,"NOTICE %s :%s",user->nick,Config->RULES[i].c_str()); - - WriteServ(user->fd,"NOTICE %s :End of %s rules.",user->nick,Config->ServerName); + /* Returns true if the string given is exactly 3 characters long, + * starts with a digit, and the other two characters are A-Z or digits + */ + return ((str.length() == 3) && isdigit(str[0]) && + ((str[1] >= 'A' && str[1] <= 'Z') || isdigit(str[1])) && + ((str[2] >= 'A' && str[2] <= 'Z') || isdigit(str[2]))); } -// this returns 1 when all modules are satisfied that the user should be allowed onto the irc server -// (until this returns true, a user will block in the waiting state, waiting to connect up to the -// registration timeout maximum seconds) -bool AllModulesReportReady(userrec* user) -{ - if (!Config->global_implementation[I_OnCheckReady]) - return true; - - for (int i = 0; i <= MODCOUNT; i++) - { - if (Config->implement_lists[i][I_OnCheckReady]) +/** A lookup table of values for multiplier characters used by + * InspIRCd::Duration(). In this lookup table, the indexes for + * the ascii values 'm' and 'M' have the value '60', the indexes + * for the ascii values 'D' and 'd' have a value of '86400', etc. + */ +static const unsigned int duration_multi[] = +{ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 86400, 0, 0, 0, 3600, 0, 0, 0, 0, 60, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 604800, 0, 31557600, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 86400, 0, 0, 0, 3600, 0, 0, 0, 0, 60, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 604800, 0, 31557600, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, +}; + +bool InspIRCd::Duration(const std::string& str, unsigned long& duration) +{ + unsigned long total = 0; + unsigned long subtotal = 0; + + /* Iterate each item in the string, looking for number or multiplier */ + for (std::string::const_iterator i = str.begin(); i != str.end(); ++i) + { + /* Found a number, queue it onto the current number */ + if ((*i >= '0') && (*i <= '9')) + { + subtotal = (subtotal * 10) + (*i - '0'); + } + else { - int res = modules[i]->OnCheckReady(user); - if (!res) + /* Found something that's not a number, find out how much + * it multiplies the built up number by, multiply the total + * and reset the built up number. + */ + unsigned int multiplier = duration_multi[static_cast(*i)]; + if (multiplier == 0) return false; - } - } - return true; -} - -/* Make Sure Modules Are Avaliable! - * (BugFix By Craig.. See? I do work! :p) - * Modified by brain, requires const char* - * to work with other API functions - */ + total += subtotal * multiplier; -/* XXX - Needed? */ -bool FileExists (const char* file) -{ - FILE *input; - if ((input = fopen (file, "r")) == NULL) - { - return(false); - } - else - { - fclose (input); - return(true); + /* Next subtotal please */ + subtotal = 0; + } } + /* Any trailing values built up are treated as raw seconds */ + duration = total + subtotal; + return true; } -char* CleanFilename(char* name) +unsigned long InspIRCd::Duration(const std::string& str) { - char* p = name + strlen(name); - while ((p != name) && (*p != '/')) p--; - return (p != name ? ++p : p); + unsigned long out = 0; + InspIRCd::Duration(str, out); + return out; } -bool DirValid(char* dirandfile) +bool InspIRCd::IsValidDuration(const std::string& duration) { - char work[MAXBUF]; - char buffer[MAXBUF]; - char otherdir[MAXBUF]; - int p; - - strlcpy(work, dirandfile, MAXBUF); - p = strlen(work); - - // we just want the dir - while (*work) - { - if (work[p] == '/') - { - work[p] = '\0'; - break; - } - - work[p--] = '\0'; - } - - // Get the current working directory - if (getcwd(buffer, MAXBUF ) == NULL ) - return false; - - chdir(work); - - if (getcwd(otherdir, MAXBUF ) == NULL ) - return false; - - chdir(buffer); - - size_t t = strlen(work); - - if (strlen(otherdir) >= t) + for (std::string::const_iterator i = duration.begin(); i != duration.end(); ++i) { - otherdir[t] = '\0'; - - if (!strcmp(otherdir,work)) - { - return true; - } + unsigned char c = *i; + if (((c >= '0') && (c <= '9'))) + continue; - return false; - } - else - { - return false; + if (!duration_multi[c]) + return false; } + return true; } -std::string GetFullProgDir(char** argv, int argc) +std::string InspIRCd::DurationString(time_t duration) { - char work[MAXBUF]; - char buffer[MAXBUF]; - char otherdir[MAXBUF]; - int p; - - strlcpy(work,argv[0],MAXBUF); - p = strlen(work); - - // we just want the dir - while (*work) - { - if (work[p] == '/') - { - work[p] = '\0'; - break; - } - - work[p--] = '\0'; - } + if (duration == 0) + return "0s"; - // Get the current working directory - if (getcwd(buffer, MAXBUF) == NULL) - return ""; + time_t years = duration / 31449600; + time_t weeks = (duration / 604800) % 52; + time_t days = (duration / 86400) % 7; + time_t hours = (duration / 3600) % 24; + time_t minutes = (duration / 60) % 60; + time_t seconds = duration % 60; - chdir(work); + std::string ret; - if (getcwd(otherdir, MAXBUF) == NULL) - return ""; + if (years) + ret = ConvToStr(years) + "y"; + if (weeks) + ret += ConvToStr(weeks) + "w"; + if (days) + ret += ConvToStr(days) + "d"; + if (hours) + ret += ConvToStr(hours) + "h"; + if (minutes) + ret += ConvToStr(minutes) + "m"; + if (seconds) + ret += ConvToStr(seconds) + "s"; - chdir(buffer); - return otherdir; -} - -int InsertMode(std::string &output, const char* mode, unsigned short section) -{ - unsigned short currsection = 1; - unsigned int pos = output.find("CHANMODES=", 0) + 10; // +10 for the length of "CHANMODES=" - - if(section > 4 || section == 0) - { - log(DEBUG, "InsertMode: CHANMODES doesn't have a section %dh :/", section); - return 0; - } - - for(; pos < output.size(); pos++) - { - if(section == currsection) - break; - - if(output[pos] == ',') - currsection++; - } - - output.insert(pos, mode); - return 1; + return ret; } -bool IsValidChannelName(const char *chname) +std::string InspIRCd::Format(va_list& vaList, const char* formatString) { - char *c; + static std::vector formatBuffer(1024); - /* check for no name - don't check for !*chname, as if it is empty, it won't be '#'! */ - if (!chname || *chname != '#') + while (true) { - return false; - } + va_list dst; + va_copy(dst, vaList); - c = (char *)chname + 1; - while (*c) - { - switch (*c) + int vsnret = vsnprintf(&formatBuffer[0], formatBuffer.size(), formatString, dst); + va_end(dst); + + if (vsnret > 0 && static_cast(vsnret) < formatBuffer.size()) { - case ' ': - case ',': - case 7: - return false; + break; } - c++; - } - - /* too long a name - note funky pointer arithmetic here. */ - if ((c - chname) > CHANMAX) - { - return false; + formatBuffer.resize(formatBuffer.size() * 2); } - return true; + return std::string(&formatBuffer[0]); } -inline int charlcat(char* x,char y,int z) +std::string InspIRCd::Format(const char* formatString, ...) { - char* x__n = x; - int v = 0; - - while(*x__n++) - v++; - - if (v < z - 1) - { - *--x__n = y; - *++x__n = 0; - } - - return v; + std::string ret; + VAFORMAT(ret, formatString, formatString); + return ret; } -bool charremove(char* mp, char remove) +std::string InspIRCd::TimeString(time_t curtime, const char* format, bool utc) { - char* mptr = mp; - bool shift_down = false; +#ifdef _WIN32 + if (curtime < 0) + curtime = 0; +#endif - while (*mptr) + struct tm* timeinfo = utc ? gmtime(&curtime) : localtime(&curtime); + if (!timeinfo) { - if (*mptr == remove) - shift_down = true; - - if (shift_down) - *mptr = *(mptr+1); - - mptr++; + curtime = 0; + timeinfo = localtime(&curtime); } - return shift_down; -} - -void OpenLog(char** argv, int argc) -{ - if (!*LOG_FILE) - { - if (Config->logpath == "") - { - Config->logpath = GetFullProgDir(argv,argc) + "/ircd.log"; - } - } - else - { - Config->log_file = fopen(LOG_FILE,"a+"); + // If the calculated year exceeds four digits or is less than the year 1000, + // the behavior of asctime() is undefined + if (timeinfo->tm_year + 1900 > 9999) + timeinfo->tm_year = 9999 - 1900; + else if (timeinfo->tm_year + 1900 < 1000) + timeinfo->tm_year = 0; - if (!Config->log_file) - { - printf("ERROR: Could not write to logfile %s, bailing!\n\n",Config->logpath.c_str()); - Exit(ERROR); - } - - return; - } + // This is the default format used by asctime without the terminating new line. + if (!format) + format = "%a %b %d %Y %H:%M:%S"; - Config->log_file = fopen(Config->logpath.c_str(),"a+"); + char buffer[512]; + if (!strftime(buffer, sizeof(buffer), format, timeinfo)) + buffer[0] = '\0'; - if (!Config->log_file) - { - printf("ERROR: Could not write to logfile %s, bailing!\n\n",Config->logpath.c_str()); - Exit(ERROR); - } + return buffer; } -void CheckRoot() +std::string InspIRCd::GenRandomStr(unsigned int length, bool printable) { - if (geteuid() == 0) - { - printf("WARNING!!! You are running an irc server as ROOT!!! DO NOT DO THIS!!!\n\n"); - log(DEFAULT,"InspIRCd: startup: not starting with UID 0!"); - Exit(ERROR); - } + std::vector str(length); + GenRandom(&str[0], length); + if (printable) + for (size_t i = 0; i < length; i++) + str[i] = 0x3F + (str[i] & 0x3F); + return std::string(&str[0], str.size()); } -void CheckDie() +// NOTE: this has a slight bias for lower values if max is not a power of 2. +// Don't use it if that matters. +unsigned long InspIRCd::GenRandomInt(unsigned long max) { - if (*Config->DieValue) - { - printf("WARNING: %s\n\n",Config->DieValue); - log(DEFAULT,"Uh-Oh, somebody didn't read their config file: '%s'",Config->DieValue); - Exit(ERROR); - } + unsigned long rv; + GenRandom((char*)&rv, sizeof(rv)); + return rv % max; } -/* We must load the modules AFTER initializing the socket engine, now */ -void LoadAllModules(InspIRCd* ServerInstance) +// This is overridden by a higher-quality algorithm when TLS (SSL) support is loaded +void InspIRCd::DefaultGenRandom(char* output, size_t max) { - char configToken[MAXBUF]; - Config->module_names.clear(); - MODCOUNT = -1; - - for (int count = 0; count < Config->ConfValueEnum(Config->config_data, "module"); count++) +#if defined HAS_ARC4RANDOM_BUF + arc4random_buf(output, max); +#else + for (unsigned int i = 0; i < max; ++i) +# ifdef _WIN32 { - Config->ConfValue(Config->config_data, "module","name",count,configToken,MAXBUF); - printf("[\033[1;32m*\033[0m] Loading module:\t\033[1;32m%s\033[0m\n",configToken); - - if (!ServerInstance->LoadModule(configToken)) - { - log(DEFAULT,"Exiting due to a module loader error."); - printf("\nThere was an error loading a module: %s\n\n",ServerInstance->ModuleError()); - Exit(0); - } + unsigned int uTemp; + if(rand_s(&uTemp) != 0) + output[i] = rand(); + else + output[i] = uTemp; } - - log(DEFAULT,"Total loaded modules: %lu",(unsigned long)MODCOUNT+1); +# else + output[i] = random(); +# endif +#endif }