X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=src%2Fhelperfuncs.cpp;h=e7ecb56a14f5594712219440d9242ec1868af511;hb=6ab1d0dffb8084bf6a2ad8a446a3836fa3760c8a;hp=059f89be632b150382988bff552d91f40f588762;hpb=9826d2ee0a26234a4f5421ae686b0068f3f64c57;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/src/helperfuncs.cpp b/src/helperfuncs.cpp index 059f89be6..e7ecb56a1 100644 --- a/src/helperfuncs.cpp +++ b/src/helperfuncs.cpp @@ -2,37 +2,32 @@ * | Inspire Internet Relay Chat Daemon | * +------------------------------------+ * - * Inspire is copyright (C) 2002-2004 ChatSpike-Dev. - * E-mail: - * - * + * InspIRCd is copyright (C) 2002-2006 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. + * the file COPYING for details. * * --------------------------------------------------- */ -using namespace std; - +#include #include "inspircd_config.h" #include "inspircd.h" -#include "inspircd_io.h" +#include "configreader.h" #include #include #include +#include #include #include -#ifdef GCC3 -#include -#else -#include -#endif #include -#include -#include -#include +#ifdef HAS_EXECINFO +#include +#endif #include "connection.h" #include "users.h" #include "ctables.h" @@ -50,92 +45,136 @@ using namespace std; #include "typedefs.h" extern int MODCOUNT; -extern std::vector modules; +extern ModuleList modules; extern ServerConfig *Config; extern InspIRCd* ServerInstance; extern time_t TIME; extern char lowermap[255]; -static char list[MAXBUF]; extern userrec* fd_ref_table[MAX_DESCRIPTORS]; -static char already_sent[MAX_DESCRIPTORS]; +static unsigned long already_sent[MAX_DESCRIPTORS] = {0}; extern std::vector all_opers; extern user_hash clientlist; extern chan_hash chanlist; +char LOG_FILE[MAXBUF]; + extern std::vector local_users; -void log(int level,char *text, ...) +static char TIMESTR[26]; +static time_t LAST = 0; + +/* XXX: Used for speeding up WriteCommon operations */ +unsigned long uniq_id = 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 do_log(int level, const char *text, ...) { - va_list argsPtr; - struct tm * timeinfo; - if (level < Config->LogLevel) - return; + va_list argsPtr; char textbuffer[MAXBUF]; - timeinfo = localtime(&TIME); - - if (Config->log_file) - { - char b[26]; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - strlcpy(b,asctime(timeinfo),26); - b[24] = ':'; // we know this is the end of the time string - if (Config->log_file) - fprintf(Config->log_file,"%s %s\n",b,textbuffer); - if (Config->nofork) - { - // nofork enabled? display it on terminal too - printf("%s %s\n",b,textbuffer); - } - } + + /* 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); + fflush(Config->log_file); + } + } + + 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'. + * + * 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()); + 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) { - if ((sock < 0) || (!text)) + char tb[MAXBUF]; + int bytes; + + if ((sock < 0) || (!text) || (sock > MAX_DESCRIPTORS)) return; - char tb[MAXBUF]; - int bytes = snprintf(tb,MAXBUF,"%s\r\n",text); - chop(tb); if (fd_ref_table[sock]) { - if (Config->GetIOHook(fd_ref_table[sock]->port)) + bytes = snprintf(tb,MAXBUF,"%s\r\n",text); + + if (Config->GetIOHook(fd_ref_table[sock]->GetPort())) { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); + try + { + Config->GetIOHook(fd_ref_table[sock]->GetPort())->OnRawSocketWrite(sock,tb,bytes); + } + catch (ModuleException& modexcept) + { + log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); + } } else { @@ -143,52 +182,83 @@ void Write_NoFormat(int sock, const char *text) } ServerInstance->stats->statsSent += bytes; } - else log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); + else + log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); } -void Write(int sock,char *text, ...) +/** Write() + * Same as Write_NoFormat(), but formatted printf() style first. + */ +void Write(int sock, char *text, ...) { - if (sock < 0) - return; - if (!text) - { - log(DEFAULT,"*** BUG *** Write was given an invalid parameter"); - return; - } - va_list argsPtr; - char textbuffer[MAXBUF],tb[MAXBUF]; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - int bytes = snprintf(tb,MAXBUF,"%s\r\n",textbuffer); - chop(tb); - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) + 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; + } + + if (fd_ref_table[sock]) + { + + va_start(argsPtr, text); + vsnprintf(textbuffer, MAXBUF, text, argsPtr); + va_end(argsPtr); + bytes = snprintf(tb,MAXBUF,"%s\r\n",textbuffer); + + if (Config->GetIOHook(fd_ref_table[sock]->GetPort())) { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); + try + { + Config->GetIOHook(fd_ref_table[sock]->GetPort())->OnRawSocketWrite(sock,tb,bytes); + } + catch (ModuleException& modexcept) + { + log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); + } } else { - fd_ref_table[sock]->AddWriteBuf(tb); + 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!!!"); + } + 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) { - if ((sock < 0) || (!text)) - return; char tb[MAXBUF]; - int bytes = snprintf(tb,MAXBUF,":%s %s\r\n",Config->ServerName,text); - chop(tb); + int bytes; + + if ((sock < 0) || (!text) || (sock > MAX_DESCRIPTORS)) + return; + if (fd_ref_table[sock]) { - if (Config->GetIOHook(fd_ref_table[sock]->port)) + bytes = snprintf(tb,MAXBUF,":%s %s\r\n",Config->ServerName,text); + + if (Config->GetIOHook(fd_ref_table[sock]->GetPort())) { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); + try + { + Config->GetIOHook(fd_ref_table[sock]->GetPort())->OnRawSocketWrite(sock,tb,bytes); + } + catch (ModuleException& modexcept) + { + log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); + } } else { @@ -196,54 +266,63 @@ void WriteServ_NoFormat(int sock, const char* text) } ServerInstance->stats->statsSent += bytes; } - else log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); + else + log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); } -/* write a server formatted numeric response to a single socket */ - +/** WriteServ() + * Same as Write(), except `text' is prefixed with `:server.name '. + */ void WriteServ(int sock, char* text, ...) { - if (sock < 0) - return; - if (!text) - { - log(DEFAULT,"*** BUG *** WriteServ was given an invalid parameter"); - return; - } - va_list argsPtr; - va_start (argsPtr, text); - char textbuffer[MAXBUF],tb[MAXBUF]; - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - int bytes = snprintf(tb,MAXBUF,":%s %s\r\n",Config->ServerName,textbuffer); - chop(tb); - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) - { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); - } - 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!!!"); + 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; + } + + if (!fd_ref_table[sock]) + 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) { - if ((sock < 0) || (!text) || (!user)) - return; char tb[MAXBUF]; - int bytes = snprintf(tb,MAXBUF,":%s!%s@%s %s\r\n",user->nick,user->ident,user->dhost,text); - chop(tb); + int bytes; + + if ((sock < 0) || (!text) || (!user) || (sock > MAX_DESCRIPTORS)) + return; + if (fd_ref_table[sock]) { - if (Config->GetIOHook(fd_ref_table[sock]->port)) + bytes = snprintf(tb,MAXBUF,":%s %s\r\n",user->GetFullHost(),text); + + if (Config->GetIOHook(fd_ref_table[sock]->GetPort())) { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); + try + { + Config->GetIOHook(fd_ref_table[sock]->GetPort())->OnRawSocketWrite(sock,tb,bytes); + } + catch (ModuleException& modexcept) + { + log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); + } } else { @@ -251,298 +330,118 @@ void WriteFrom_NoFormat(int sock, userrec *user, const char* text) } ServerInstance->stats->statsSent += bytes; } - else log(DEFAULT,"ERROR! attempted write to a user with no fd_ref_table entry!!!"); + 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, ...) { - if (sock < 0) - return; - if ((!text) || (!user)) - { - log(DEFAULT,"*** BUG *** WriteFrom was given an invalid parameter"); - return; - } - va_list argsPtr; - va_start (argsPtr, text); - char textbuffer[MAXBUF],tb[MAXBUF]; - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - int bytes = snprintf(tb,MAXBUF,":%s!%s@%s %s\r\n",user->nick,user->ident,user->dhost,textbuffer); - chop(tb); - if (fd_ref_table[sock]) - { - if (Config->GetIOHook(fd_ref_table[sock]->port)) + 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; + } + + if (fd_ref_table[sock]) + { + + va_start(argsPtr, text); + vsnprintf(textbuffer, MAXBUF, text, argsPtr); + va_end(argsPtr); + bytes = snprintf(tb,MAXBUF,":%s %s\r\n",user->GetFullHost(),textbuffer); + + if (Config->GetIOHook(fd_ref_table[sock]->GetPort())) { - Config->GetIOHook(fd_ref_table[sock]->port)->OnRawSocketWrite(sock,tb,bytes); + try + { + Config->GetIOHook(fd_ref_table[sock]->GetPort())->OnRawSocketWrite(sock,tb,bytes); + } + catch (ModuleException& modexcept) + { + log(DEBUG,"Module exception caught: %s",modexcept.GetReason()); + } } else { - fd_ref_table[sock]->AddWriteBuf(tb); + 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!!!"); + + 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, ...) { - if ((!dest) || (!data)) - { - log(DEFAULT,"*** BUG *** WriteTo was given an invalid parameter"); - return; - } - if (!IS_LOCAL(dest)) - return; - char textbuffer[MAXBUF],tb[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, data); - vsnprintf(textbuffer, MAXBUF, data, argsPtr); - va_end(argsPtr); - chop(tb); - - // if no source given send it from the server. - if (!source) - { - WriteServ(dest->fd,":%s %s",Config->ServerName,textbuffer); - } - else - { - WriteFrom_NoFormat(dest->fd,source,textbuffer); - } -} + char textbuffer[MAXBUF]; + va_list argsPtr; -void WriteTo_NoFormat(userrec *source, userrec *dest, const char *data) -{ 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); + + // if no source given send it from the server. if (!source) { - WriteServ(dest->fd,":%s %s",Config->ServerName,data); + WriteServ_NoFormat(dest->fd,textbuffer); } else { - WriteFrom_NoFormat(dest->fd,source,data); + WriteFrom_NoFormat(dest->fd,source,textbuffer); } } -/* 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, ...) -{ - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (otheruser->fd != FD_MAGIC_NUMBER) - WriteTo_NoFormat(user,otheruser,textbuffer); - } -} - -void WriteChannel_NoFormat(chanrec* Ptr, userrec* user, const char* text) -{ - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (otheruser->fd != FD_MAGIC_NUMBER) - WriteTo_NoFormat(user,otheruser,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, ...) -{ - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((otheruser->fd != FD_MAGIC_NUMBER) && (otheruser != user)) - { - if (!user) - { - WriteServ_NoFormat(otheruser->fd,textbuffer); - } - else - { - WriteTo_NoFormat(user,otheruser,textbuffer); - } - } - } -} - -void WriteChannelLocal_NoFormat(chanrec* Ptr, userrec* user, const char* text) -{ - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannel was given an invalid parameter"); - return; - } - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((otheruser->fd != FD_MAGIC_NUMBER) && (otheruser != user)) - { - if (!user) - { - WriteServ_NoFormat(otheruser->fd,text); - } - else - { - WriteTo_NoFormat(user,otheruser,text); - } - } - } -} - - - -void WriteChannelWithServ(char* ServName, chanrec* Ptr, char* text, ...) -{ - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannelWithServ was given an invalid parameter"); - return; - } - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (IS_LOCAL(otheruser)) - WriteServ_NoFormat(otheruser->fd,textbuffer); - } -} - -void WriteChannelWithServ_NoFormat(char* ServName, chanrec* Ptr, const char* text) -{ - if ((!Ptr) || (!text)) - { - log(DEFAULT,"*** BUG *** WriteChannelWithServ was given an invalid parameter"); - return; - } - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (IS_LOCAL(otheruser)) - WriteServ_NoFormat(otheruser->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* text, ...) +void WriteTo_NoFormat(userrec *source, userrec *dest, const char *data) { - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** ChanExceptSender was given an invalid parameter"); - return; - } - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((IS_LOCAL(otheruser)) && (user != otheruser)) - WriteFrom_NoFormat(otheruser->fd,user,textbuffer); - } -} + if ((!dest) || (!data)) + return; -void ChanExceptSender_NoFormat(chanrec* Ptr, userrec* user, const char* text) -{ - if ((!Ptr) || (!user) || (!text)) - { - log(DEFAULT,"*** BUG *** ChanExceptSender was given an invalid parameter"); - return; - } - std::vector *ulist = Ptr->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((IS_LOCAL(otheruser)) && (user != otheruser)) - WriteFrom_NoFormat(otheruser->fd,user,text); - } + if (!source) + { + WriteServ_NoFormat(dest->fd,data); + } + else + { + WriteFrom_NoFormat(dest->fd,source,data); + } } -std::string GetServerDescription(char* servername) +std::string GetServerDescription(const char* servername) { std::string description = ""; + FOREACH_MOD(I_OnGetServerDescription,OnGetServerDescription(servername,description)); + if (description != "") { return description; } else { - return Config->ServerDesc; // not a remote server that can be found, it must be me. + // not a remote server that can be found, it must be me. + return Config->ServerDesc; } } @@ -551,351 +450,440 @@ std::string GetServerDescription(char* servername) void WriteCommon(userrec *u, 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; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - 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); - - bool sent_to_at_least_one = false; - - unsigned int y = u->chans.size(); - for (unsigned int i = 0; i < y; i++) - { - if (u->chans[i].channel) - { - std::vector *ulist = u->chans[i].channel->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((otheruser->fd > -1) && (!already_sent[otheruser->fd])) - { - already_sent[otheruser->fd] = 1; - WriteFrom_NoFormat(otheruser->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); - } -} + char textbuffer[MAXBUF]; + va_list argsPtr; + bool sent_to_at_least_one = false; -void WriteCommon_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; - } - // FIX: Stops a message going to the same person more than once - memset(&already_sent,0,MAX_DESCRIPTORS); - - bool sent_to_at_least_one = false; - - unsigned int y = u->chans.size(); - for (unsigned int i = 0; i < y; i++) - { - if (u->chans[i].channel) - { - std::vector *ulist = u->chans[i].channel->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if ((otheruser->fd > -1) && (!already_sent[otheruser->fd])) - { - already_sent[otheruser->fd] = 1; - WriteFrom_NoFormat(otheruser->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); - } -} + if (!u) + { + log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); + return; + } + + if (u->registered != REG_ALL) + { + log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); + return; + } + va_start(argsPtr, text); + vsnprintf(textbuffer, MAXBUF, text, argsPtr); + va_end(argsPtr); + // XXX: Save on memset calls by using an ID. This clever trick thought of during discussion with nazzy and w00t. + uniq_id++; -/* 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 */ + 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 ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id)) + { + already_sent[i->second->fd] = uniq_id; + WriteFrom_NoFormat(i->second->fd,u,textbuffer); + sent_to_at_least_one = true; + } + } + } + } -void WriteCommonExcept(userrec *u, 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; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - memset(&already_sent,0,MAX_DESCRIPTORS); - - unsigned int y = u->chans.size(); - for (unsigned int i = 0; i < y; i++) - { - if (u->chans[i].channel) - { - std::vector *ulist = u->chans[i].channel->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (u != otheruser) - { - if ((otheruser->fd > -1) && (!already_sent[otheruser->fd])) - { - already_sent[otheruser->fd] = 1; - WriteFrom_NoFormat(otheruser->fd,u,textbuffer); - } - } - } - } - } + /* + * 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 WriteCommonExcept_NoFormat(userrec *u, const char* text) +void WriteCommon_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); - - unsigned int y = u->chans.size(); - for (unsigned int i = 0; i < y; i++) - { - if (u->chans[i].channel) - { - std::vector *ulist = u->chans[i].channel->GetUsers(); - unsigned int x = ulist->size(); - for (unsigned int j = 0; j < x; j++) - { - char* o = (*ulist)[j]; - userrec* otheruser = (userrec*)o; - if (u != otheruser) - { - if ((otheruser->fd > -1) && (!already_sent[otheruser->fd])) - { - already_sent[otheruser->fd] = 1; - WriteFrom_NoFormat(otheruser->fd,u,text); - } - } - } - } - } -} + bool sent_to_at_least_one = false; + + if (!u) + { + log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); + return; + } + if (u->registered != REG_ALL) + { + log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); + return; + } + // XXX: See comment in WriteCommon + uniq_id++; -void WriteOpers(char* text, ...) -{ - if (!text) - { - log(DEFAULT,"*** BUG *** WriteOpers was given an invalid parameter"); - return; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - for (std::vector::iterator i = all_opers.begin(); i != all_opers.end(); i++) - { - userrec* a = *i; - if (IS_LOCAL(a)) - { - if (strchr(a->modes,'s')) - { - // send server notices to all with +s - WriteServ(a->fd,"NOTICE %s :%s",a->nick,textbuffer); - } - } - } + 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 ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id)) + { + already_sent[i->second->fd] = uniq_id; + 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); + } } -void ServerNoticeAll(char* text, ...) -{ - if (!text) - return; +/* 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 + */ + +void WriteCommonExcept(userrec *u, char* text, ...) +{ char textbuffer[MAXBUF]; + char oper_quit[MAXBUF]; + bool quit_munge = false; va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); + int total; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + if (!u) { - userrec* t = (userrec*)(*i); - WriteServ(t->fd,"NOTICE $%s :%s",Config->ServerName,textbuffer); + log(DEFAULT,"*** BUG *** WriteCommon was given an invalid parameter"); + return; } -} -void ServerPrivmsgAll(char* text, ...) -{ - if (!text) + if (u->registered != REG_ALL) + { + log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); return; + } - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); + va_start(argsPtr, text); + total = vsnprintf(textbuffer, MAXBUF, text, argsPtr); va_end(argsPtr); - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + if ((Config->HideSplits) && (total > 6)) { - userrec* t = (userrec*)(*i); - WriteServ(t->fd,"PRIVMSG $%s :%s",Config->ServerName,textbuffer); - } -} + /* Yeah yeah, this is ugly. But its fast, live with it. */ + char* check = textbuffer; -void WriteMode(const char* modes, int flags, const char* text, ...) -{ - if ((!text) || (!modes) || (!flags)) - { - log(DEFAULT,"*** BUG *** WriteMode was given an invalid parameter"); - return; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - int 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); - } - } -} + 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; + } + } + } -void NoticeAll(userrec *source, bool local_only, char* text, ...) -{ - if ((!text) || (!source)) - { - log(DEFAULT,"*** BUG *** NoticeAll was given an invalid parameter"); - return; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { - userrec* t = (userrec*)(*i); - WriteFrom(t->fd,source,"NOTICE $* :%s",textbuffer); - } + 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; + } + } + } + uniq_id++; -void WriteWallOps(userrec *source, bool local_only, char* text, ...) + 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 ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id)) + { + already_sent[i->second->fd] = uniq_id; + + 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 != REG_ALL) + { + log(DEFAULT,"*** BUG *** WriteCommon on an unregistered user"); + return; + } + + uniq_id++; + + 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 ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id)) + { + already_sent[i->second->fd] = uniq_id; + 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->modes[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 (!t->modes[modes[n]-65]) + { + send_to_user = false; + break; + } + } + } + else if (flags == WM_OR) + { + send_to_user = false; + + for (int n = 0; n < modelen; n++) + { + if (t->modes[modes[n]-65]) + { + 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, ...) { - if ((!text) || (!source)) - { - log(DEFAULT,"*** BUG *** WriteOpers was given an invalid parameter"); - return; - } - - char textbuffer[MAXBUF]; - va_list argsPtr; - va_start (argsPtr, text); - vsnprintf(textbuffer, MAXBUF, text, argsPtr); - va_end(argsPtr); - - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { + 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); - if ((IS_LOCAL(t)) && (strchr(t->modes,'w'))) - { - WriteTo(source,t,"WALLOPS :%s",textbuffer); - } - } + 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); + + if ((IS_LOCAL(t)) && (t->modes[UM_WALLOPS])) + { + WriteTo_NoFormat(source,t,formatbuffer); + } + } } /* convert a string to lowercase. Note following special circumstances @@ -907,165 +895,173 @@ void WriteWallOps(userrec *source, bool local_only, char* text, ...) * respectively. This is a critical issue when determining the * equivalence of two nicknames. */ - void strlower(char *n) { - if (n) - { - for (char* t = n; *t; t++) - *t = lowermap[(unsigned)*t]; - } + if (n) + { + for (char* t = n; *t; t++) + *t = lowermap[(unsigned char)*t]; + } } /* Find a user record by nickname and return a pointer to it */ -userrec* Find(std::string nick) +userrec* Find(const std::string &nick) { - user_hash::iterator iter = clientlist.find(nick); + user_hash::iterator iter = clientlist.find(nick); - if (iter == clientlist.end()) - /* Couldn't find it */ - return NULL; + if (iter == clientlist.end()) + /* Couldn't find it */ + return NULL; - return iter->second; + return iter->second; +} + +userrec* Find(const char* nick) +{ + user_hash::iterator iter; + + if (!nick) + return NULL; + + iter = clientlist.find(nick); + + if (iter == clientlist.end()) + return NULL; + + return iter->second; } /* find a channel record by channel name and return a pointer to it */ chanrec* FindChan(const char* chan) { - if (!chan) - { - log(DEFAULT,"*** BUG *** Findchan was given an invalid parameter"); - return NULL; - } + chan_hash::iterator iter; - chan_hash::iterator iter = chanlist.find(chan); + if (!chan) + { + log(DEFAULT,"*** BUG *** Findchan was given an invalid parameter"); + return NULL; + } - if (iter == chanlist.end()) - /* Couldn't find it */ - return NULL; + iter = chanlist.find(chan); - return iter->second; + if (iter == chanlist.end()) + /* Couldn't find it */ + return NULL; + + return iter->second; } long GetMaxBans(char* name) { - char CM[MAXBUF]; - for (int count = 0; count < Config->ConfValueEnum("banlist",&Config->config_f); count++) - { - Config->ConfValue("banlist","chan",count,CM,&Config->config_f); - if (match(name,CM)) - { - Config->ConfValue("banlist","limit",count,CM,&Config->config_f); - return atoi(CM); - } - } - return 64; + std::string x; + for (std::map::iterator n = Config->maxbans.begin(); n != Config->maxbans.end(); n++) + { + x = n->first; + if (match(name,x.c_str())) + { + return n->second; + } + } + 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++) + { + ucrec* uc = (ucrec*)(*f); + if (uc->channel) + { + if (uc->channel->DelUser(u) == 0) + { + /* No users left in here, mark it for deletion */ + to_delete.push_back(uc->channel); + uc->channel = NULL; + } + } + } + + log(DEBUG,"purge_empty_chans: %d channels to delete",to_delete.size()); - int purge = 0; - - // firstly decrement the count on each channel - for (unsigned int f = 0; f < u->chans.size(); f++) - { - if (u->chans[f].channel) - { - u->chans[f].channel->DelUser((char*)u); - } - } - - for (unsigned int i = 0; i < u->chans.size(); i++) - { - if (u->chans[i].channel) - { - if (!usercount(u->chans[i].channel)) - { - chan_hash::iterator i2 = chanlist.find(u->chans[i].channel->name); - /* kill the record */ - if (i2 != chanlist.end()) - { - log(DEBUG,"del_channel: destroyed: %s",i2->second->name); - if (i2->second) - delete i2->second; - chanlist.erase(i2); - purge++; - u->chans[i].channel = NULL; - } - } - else - { - log(DEBUG,"skipped purge for %s",u->chans[i].channel->name); - } - } - } - log(DEBUG,"completed channel purge, killed %lu",(unsigned long)purge); - - DeleteOper(u); + 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 (*u->oper) + DeleteOper(u); } -char* chanmodes(chanrec *chan) +char* chanmodes(chanrec *chan, bool showkey) { 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'; + + /* This was still iterating up to 190, chanrec::custom_modes is only 64 elements -- Om */ + for(int n = 0; n < 64; n++) + { + if(chan->modes[n]) + { + *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); + } + } + } - if (!chan) - { - log(DEFAULT,"*** BUG *** chanmodes was given an invalid parameter"); - *scratch = '\0'; - return scratch; - } - - *scratch = '\0'; - *sparam = '\0'; - if (chan->binarymodes & CM_NOEXTERNAL) - *offset++ = 'n'; - if (chan->binarymodes & CM_TOPICLOCK) - *offset++ = 't'; - if (*chan->key) - *offset++ = 'k'; - if (chan->limit) - *offset++ = 'l'; - if (chan->binarymodes & CM_INVITEONLY) - *offset++ = 'i'; - if (chan->binarymodes & CM_MODERATED) - *offset++ = 'm'; - if (chan->binarymodes & CM_SECRET) - *offset++ = 's'; - if (chan->binarymodes & CM_PRIVATE) - *offset++ = 'p'; - if (*chan->key) - snprintf(sparam,MAXBUF," %s",chan->key); - if (chan->limit) - { - char foo[24]; - sprintf(foo," %lu",(unsigned long)chan->limit); - strlcat(sparam,foo,MAXBUF); - } - if (*chan->custom_modes) - { - for (char* t = chan->custom_modes; *t; t++) - *offset++ = *t; - for (int z = 0; chan->custom_modes[z]; z++) - { - std::string extparam = chan->GetModeParameter(chan->custom_modes[z]); - if (extparam != "") - { - strlcat(sparam," ",MAXBUF); - strlcat(sparam,extparam.c_str(),MAXBUF); - } - } - } /* Null terminate scratch */ *offset = '\0'; - strlcat(scratch,sparam,MAXMODES); - return scratch; + strlcat(scratch,sparam,MAXBUF); + return scratch; } @@ -1074,232 +1070,273 @@ char* chanmodes(chanrec *chan) void userlist(userrec *user,chanrec *c) { - if ((!c) || (!user)) - { - log(DEFAULT,"*** BUG *** userlist was given an invalid parameter"); - return; - } - - snprintf(list,MAXBUF,"353 %s = %s :", user->nick, c->name); - - std::vector *ulist = c->GetUsers(); - for (unsigned int i = 0; i < ulist->size(); i++) - { - char* o = (*ulist)[i]; - userrec* otheruser = (userrec*)o; - if ((!has_channel(user,c)) && (strchr(otheruser->modes,'i'))) - { - /* user is +i, and source not on the channel, does not show - * nick in NAMES list */ - continue; - } - strlcat(list,cmode(otheruser,c),MAXBUF); - strlcat(list,otheruser->nick,MAXBUF); - strlcat(list," ",MAXBUF); - if (strlen(list)>(480-NICKMAX)) - { - /* list overflowed into - * multiple numerics */ - WriteServ_NoFormat(user->fd,list); - snprintf(list,MAXBUF,"353 %s = %s :", user->nick, c->name); - } - } - /* if whats left in the list isnt empty, send it */ - if (list[strlen(list)-1] != ':') - { - WriteServ_NoFormat(user->fd,list); - } -} + 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? + */ + bool has_user = c->HasUser(user); + + for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) + { + if ((!has_user) && (i->second->modes[UM_INVISIBLE])) + { + /* + * user is +i, and source not on the channel, does not show + * nick in NAMES list + */ + continue; + } + + size_t ptrlen = snprintf(ptr, MAXBUF, "%s%s ", cmode(i->second, c), i->second->nick); + + curlen += ptrlen; + ptr += ptrlen; + + numusers++; + + if (curlen > (480-NICKMAX)) + { + /* list overflowed into multiple numerics */ + 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 */ + /* reset our lengths */ + dlen = curlen = snprintf(list,MAXBUF,"353 %s = %s :", user->nick, c->name); + ptr = list + dlen; + ptrlen = 0; + numusers = 0; + } + } + + /* 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) - { - log(DEFAULT,"*** BUG *** usercount_i was given an invalid parameter"); - return 0; - } - - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (has_channel(i->second,c)) - { - if (i->second->registered == 7) - { - if ((!has_channel(i->second,c)) && (strchr(i->second->modes,'i'))) - { - /* user is +i, and source not on the channel, does not show - * nick in NAMES list */ - continue; - } - count++; - } - } - } - log(DEBUG,"usercount_i: %s %lu",c->name,(unsigned long)count); - return count; -} + int count = 0; + + if (!c) + return 0; + + CUList *ulist= c->GetUsers(); + for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++) + { + if (!(i->second->modes[UM_INVISIBLE])) + count++; + } + return count; +} int usercount(chanrec *c) { - return (c ? c->GetUserCounter() : 0); + return (c ? c->GetUserCounter() : 0); } -// looks up a users password for their connection class (/ tags) - +/* looks up a users password for their connection class (/ tags) + * NOTE: If the or tag specifies an ip, and this user resolves, + * then their ip will be taken as 'priority' anyway, so for example, + * will match joe!bloggs@localhost + */ ConnectClass GetClass(userrec *user) { - for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++) - { - if (match(user->host,i->host.c_str())) - { - return *i; - } - } - return *(Config->Classes.begin()); -} + for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++) + { + if ((match(user->GetIPString(),i->host.c_str(),true)) || (match(user->host,i->host.c_str()))) + { + return *i; + } + } -/* sends out an error notice to all connected clients (not to be used - * lightly!) */ + return *(Config->Classes.begin()); +} +/* + * sends out an error notice to all connected clients (not to be used + * lightly!) + */ void send_error(char *s) { - log(DEBUG,"send_error: %s",s); - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { + log(DEBUG,"send_error: %s",s); + + for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + { userrec* t = (userrec*)(*i); - if (t->registered == 7) - { - WriteServ(t->fd,"NOTICE %s :%s",t->nick,s); - } - else - { - // fix - unregistered connections receive ERROR, not NOTICE - Write(t->fd,"ERROR :%s",s); - } - } + if (t->registered == REG_ALL) + { + WriteServ(t->fd,"NOTICE %s :%s",t->nick,s); + } + else + { + // fix - unregistered connections receive ERROR, not NOTICE + Write(t->fd,"ERROR :%s",s); + } + } } void Error(int status) { - 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 ***"); - send_error("Error! Segmentation fault! save meeeeeeeeeeeeee *splat!*"); - Exit(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 (size_t i = 0; i < size; i++) { + log(DEFAULT,"[%d] %s", i, strings[i]); + } + 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."); + signal(SIGSEGV, SIG_DFL); + if (raise(SIGSEGV) == -1) + { + log(DEFAULT,"What the hell, i couldnt re-raise SIGSEGV! Error: %s",strerror(errno)); + } + Exit(status); } // this function counts all users connected, wether they are registered or NOT. int usercnt(void) { - return clientlist.size(); + return clientlist.size(); } // 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) { - int c = 0; - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (i->second->registered == 7) c++; - } - return c; + int c = 0; + + for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) + { + c += (i->second->registered == REG_ALL); + } + + return c; } int usercount_invisible(void) { - int c = 0; - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if ((i->second->registered == 7) && (strchr(i->second->modes,'i'))) c++; - } - return c; + int c = 0; + + for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) + { + c += ((i->second->registered == REG_ALL) && (i->second->modes[UM_INVISIBLE])); + } + + return c; } int usercount_opers(void) { - return all_opers.size(); + int c = 0; + + for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) + { + if (*(i->second->oper)) + c++; + } + return c; } int usercount_unknown(void) { - int c = 0; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { + int c = 0; + + for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + { userrec* t = (userrec*)(*i); - if (t->registered != 7) - c++; - } - return c; + if (t->registered != REG_ALL) + c++; + } + + return c; } long chancount(void) { - return chanlist.size(); + return chanlist.size(); } long local_count() { - int c = 0; - for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) - { + int c = 0; + + for (std::vector::const_iterator i = local_users.begin(); i != local_users.end(); i++) + { userrec* t = (userrec*)(*i); - if (t->registered == 7) c++; - } - return c; + if (t->registered == REG_ALL) + c++; + } + + return c; } void ShowMOTD(userrec *user) { - static char mbuf[MAXBUF]; - static char crud[MAXBUF]; - std::string WholeMOTD = ""; - if (!Config->MOTD.size()) - { - WriteServ(user->fd,"422 %s :Message of the day file is missing.",user->nick); - return; - } - 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; - for (unsigned int i = 0; i < Config->MOTD.size(); i++) - WholeMOTD = WholeMOTD + std::string(crud) + Config->MOTD[i].c_str() + std::string("\r\n"); - snprintf(mbuf,MAXBUF,":%s 376 %s :End of message of the day.\r\n", Config->ServerName, user->nick); - WholeMOTD = WholeMOTD + mbuf; - // only one write operation - if (Config->GetIOHook(user->port)) - { - Config->GetIOHook(user->port)->OnRawSocketWrite(user->fd,(char*)WholeMOTD.c_str(),WholeMOTD.length()); - } - else + if (!Config->MOTD.size()) { - user->AddWriteBuf(WholeMOTD); + WriteServ(user->fd,"422 %s :Message of the day file is missing.",user->nick); + return; } - ServerInstance->stats->statsSent += WholeMOTD.length(); + WriteServ(user->fd,"375 %s :%s message of the day", user->nick, Config->ServerName); + + for (unsigned int i = 0; i < Config->MOTD.size(); i++) + WriteServ(user->fd,"372 %s :- %s",user->nick,Config->MOTD[i].c_str()); + + WriteServ(user->fd,"376 %s :End of message of the day.", user->nick); } void ShowRULES(userrec *user) { - 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); + 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); } // this returns 1 when all modules are satisfied that the user should be allowed onto the irc server @@ -1309,76 +1346,298 @@ bool AllModulesReportReady(userrec* user) { if (!Config->global_implementation[I_OnCheckReady]) return true; - for (int i = 0; i <= MODCOUNT; i++) - { + + for (int i = 0; i <= MODCOUNT; i++) + { if (Config->implement_lists[i][I_OnCheckReady]) { int res = modules[i]->OnCheckReady(user); if (!res) - return false; + return false; } - } - return true; + } + + 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 + */ + +/* XXX - Needed? */ +bool FileExists (const char* file) +{ + FILE *input; + if ((input = fopen (file, "r")) == NULL) + { + return(false); + } + else + { + fclose (input); + return(true); + } +} + +char* CleanFilename(char* name) +{ + char* p = name + strlen(name); + while ((p != name) && (*p != '/')) p--; + return (p != name ? ++p : p); } bool DirValid(char* dirandfile) { - char work[MAXBUF]; - char buffer[MAXBUF], otherdir[MAXBUF]; - strlcpy(work,dirandfile,MAXBUF); - int 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); - if (strlen(otherdir) >= strlen(work)) - { - otherdir[strlen(work)] = '\0'; - if (!strcmp(otherdir,work)) - { - return true; - } - return false; - } - else return false; + 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) + { + otherdir[t] = '\0'; + + if (!strcmp(otherdir,work)) + { + return true; + } + + return false; + } + else + { + return false; + } } std::string GetFullProgDir(char** argv, int argc) { - char work[MAXBUF]; - char buffer[MAXBUF], otherdir[MAXBUF]; - strlcpy(work,argv[0],MAXBUF); - int 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 ""; - chdir(work); - if( getcwd( otherdir, MAXBUF ) == NULL ) - return ""; - chdir(buffer); - return otherdir; + 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'; + } + + // Get the current working directory + if (getcwd(buffer, MAXBUF) == NULL) + return ""; + + chdir(work); + + if (getcwd(otherdir, MAXBUF) == NULL) + return ""; + + 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; } +bool IsValidChannelName(const char *chname) +{ + char *c; + + /* check for no name - don't check for !*chname, as if it is empty, it won't be '#'! */ + if (!chname || *chname != '#') + { + return false; + } + + c = (char *)chname + 1; + while (*c) + { + switch (*c) + { + case ' ': + case ',': + case 7: + return false; + } + + c++; + } + + /* too long a name - note funky pointer arithmetic here. */ + if ((c - chname) > CHANMAX) + { + return false; + } + + return true; +} + +inline int charlcat(char* x,char y,int z) +{ + char* x__n = x; + int v = 0; + + while(*x__n++) + v++; + + if (v < z - 1) + { + *--x__n = y; + *++x__n = 0; + } + + return v; +} + +bool charremove(char* mp, char remove) +{ + char* mptr = mp; + bool shift_down = false; + + while (*mptr) + { + if (*mptr == remove) + shift_down = true; + + if (shift_down) + *mptr = *(mptr+1); + + mptr++; + } + + 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 (!Config->log_file) + { + printf("ERROR: Could not write to logfile %s, bailing!\n\n",Config->logpath.c_str()); + Exit(ERROR); + } + + return; + } + + Config->log_file = fopen(Config->logpath.c_str(),"a+"); + + if (!Config->log_file) + { + printf("ERROR: Could not write to logfile %s, bailing!\n\n",Config->logpath.c_str()); + Exit(ERROR); + } +} + +void CheckRoot() +{ + 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); + } +} + +void CheckDie() +{ + 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); + } +} + +/* We must load the modules AFTER initializing the socket engine, now */ +void LoadAllModules(InspIRCd* ServerInstance) +{ + char configToken[MAXBUF]; + Config->module_names.clear(); + MODCOUNT = -1; + + for (int count = 0; count < Config->ConfValueEnum(Config->config_data, "module"); count++) + { + 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); + } + } + + log(DEFAULT,"Total loaded modules: %lu",(unsigned long)MODCOUNT+1); +}