X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=src%2Fcommands.cpp;h=f855c7b6c91d9afd234a8f4366b6ded8f72711da;hb=ba501ffb59ec5b147bfdcdc89a20b6ed2acaba70;hp=2727be7772f310d14d3b6990fab8e060b9bc139d;hpb=fd8514f21d31ed03a973b4f5c43bb15696ce7d4a;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/src/commands.cpp b/src/commands.cpp index 2727be777..f855c7b6c 100644 --- a/src/commands.cpp +++ b/src/commands.cpp @@ -1,3493 +1,118 @@ -/* +------------------------------------+ - * | Inspire Internet Relay Chat Daemon | - * +------------------------------------+ +/* + * InspIRCd -- Internet Relay Chat Daemon * - * Inspire is copyright (C) 2002-2004 ChatSpike-Dev. - * E-mail: - * - * - * - * Written by Craig Edwards, Craig McLure, and others. - * This program is free but copyrighted software; see - * the file COPYING for details. + * Copyright (C) 2018, 2020 Sadie Powell + * Copyright (C) 2012 Robby + * Copyright (C) 2009 Robin Burchell + * Copyright (C) 2009 Daniel De Graaf + * Copyright (C) 2007 Dennis Friis + * Copyright (C) 2006, 2010 Craig Edwards * - * --------------------------------------------------- + * 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. + * + * 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. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . */ -#include "inspircd.h" -#include "inspircd_io.h" -#include "inspircd_util.h" -#include "inspircd_config.h" -#include -#include -#include -#include -#include -#include -#include -#include -#ifdef GCC3 -#include -#else -#include -#endif -#include -#include -#include -#include -#include -#include -#include -#include -#include "connection.h" -#include "users.h" -#include "servers.h" -#include "ctables.h" -#include "globals.h" -#include "modules.h" -#include "dynamic.h" -#include "wildcard.h" -#include "message.h" -#include "mode.h" -#include "xline.h" -#include "inspstring.h" -#include "dnsqueue.h" - -#ifdef GCC3 -#define nspace __gnu_cxx -#else -#define nspace std -#endif - -using namespace std; - -extern int MODCOUNT; -extern std::vector modules; -extern std::vector factory; - -extern int LogLevel; -extern char ServerName[MAXBUF]; -extern char Network[MAXBUF]; -extern char ServerDesc[MAXBUF]; -extern char AdminName[MAXBUF]; -extern char AdminEmail[MAXBUF]; -extern char AdminNick[MAXBUF]; -extern char diepass[MAXBUF]; -extern char restartpass[MAXBUF]; -extern char motd[MAXBUF]; -extern char rules[MAXBUF]; -extern char list[MAXBUF]; -extern char PrefixQuit[MAXBUF]; -extern char DieValue[MAXBUF]; - -extern int debugging; -extern int WHOWAS_STALE; -extern int WHOWAS_MAX; -extern int DieDelay; -extern time_t startup_time; -extern int NetBufferSize; -extern int MaxWhoResults; -extern time_t nb_start; - -extern bool nofork; - -extern time_t TIME; - -extern std::vector module_names; - -extern char MyExecutable[1024]; -extern int boundPortCount; -extern int portCount; -extern int UDPportCount; -extern int ports[MAXSOCKS]; -extern int defaultRoute; - -extern std::vector auth_cookies; -extern std::stringstream config_f; - -extern serverrec* me[32]; - -extern FILE *log_file; - -extern ClassVector Classes; - -const long duration_m = 60; -const long duration_h = duration_m * 60; -const long duration_d = duration_h * 24; -const long duration_w = duration_d * 7; -const long duration_y = duration_w * 52; - -namespace nspace -{ -#ifdef GCC34 - template<> struct hash -#else - template<> struct nspace::hash -#endif - { - size_t operator()(const struct in_addr &a) const - { - size_t q; - memcpy(&q,&a,sizeof(size_t)); - return q; - } - }; -#ifdef GCC34 - template<> struct hash -#else - template<> struct nspace::hash -#endif - { - size_t operator()(const string &s) const - { - char a[MAXBUF]; - static struct hash strhash; - strlcpy(a,s.c_str(),MAXBUF); - strlower(a); - return strhash(a); - } - }; -} - - -struct StrHashComp -{ - - bool operator()(const string& s1, const string& s2) const - { - char a[MAXBUF],b[MAXBUF]; - strlcpy(a,s1.c_str(),MAXBUF); - strlcpy(b,s2.c_str(),MAXBUF); - strlower(a); - strlower(b); - return (strcasecmp(a,b) == 0); - } - -}; - -struct InAddr_HashComp -{ - - bool operator()(const in_addr &s1, const in_addr &s2) const - { - size_t q; - size_t p; - - memcpy(&q,&s1,sizeof(size_t)); - memcpy(&p,&s2,sizeof(size_t)); - - return (q == p); - } - -}; - - -typedef nspace::hash_map, StrHashComp> user_hash; -typedef nspace::hash_map, StrHashComp> chan_hash; -typedef nspace::hash_map, InAddr_HashComp> address_cache; -typedef std::deque command_table; - - -extern user_hash clientlist; -extern chan_hash chanlist; -extern user_hash whowas; -extern command_table cmdlist; -extern file_cache MOTD; -extern file_cache RULES; -extern address_cache IP; - - -void handle_join(char **parameters, int pcnt, userrec *user) -{ - chanrec* Ptr; - int i = 0; - - if (loop_call(handle_join,parameters,pcnt,user,0,0,1)) - return; - if (parameters[0][0] == '#') - { - Ptr = add_channel(user,parameters[0],parameters[1],false); - } -} - - -void handle_part(char **parameters, int pcnt, userrec *user) -{ - chanrec* Ptr; - - if (pcnt > 1) - { - if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-2,0)) - return; - del_channel(user,parameters[0],parameters[1],false); - } - else - { - if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-1,0)) - return; - del_channel(user,parameters[0],NULL,false); - } -} - -void handle_kick(char **parameters, int pcnt, userrec *user) -{ - chanrec* Ptr = FindChan(parameters[0]); - userrec* u = Find(parameters[1]); - - if ((!u) || (!Ptr)) - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - return; - } - - if (!has_channel(user,Ptr)) - { - WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, parameters[0]); - return; - } - - char reason[MAXBUF]; - - if (pcnt > 2) - { - strlcpy(reason,parameters[2],MAXBUF); - if (strlen(reason)>MAXKICK) - { - reason[MAXKICK-1] = '\0'; - } - - kick_channel(user,u,Ptr,reason); - } - else - { - strlcpy(reason,user->nick,MAXBUF); - kick_channel(user,u,Ptr,reason); - } - - // this must be propogated so that channel membership is kept in step network-wide - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"k %s %s %s :%s",user->nick,u->nick,Ptr->name,reason); - NetSendToAll(buffer); -} - -void handle_loadmodule(char **parameters, int pcnt, userrec *user) -{ - if (LoadModule(parameters[0])) - { - WriteOpers("*** NEW MODULE: %s",parameters[0]); - WriteServ(user->fd,"975 %s %s :Module successfully loaded.",user->nick, parameters[0]); - } - else - { - WriteServ(user->fd,"974 %s %s :Failed to load module: %s",user->nick, parameters[0],ModuleError()); - } -} - -void handle_unloadmodule(char **parameters, int pcnt, userrec *user) -{ - if (UnloadModule(parameters[0])) - { - WriteOpers("*** MODULE UNLOADED: %s",parameters[0]); - WriteServ(user->fd,"973 %s %s :Module successfully unloaded.",user->nick, parameters[0]); - } - else - { - WriteServ(user->fd,"972 %s %s :Failed to unload module: %s",user->nick, parameters[0],ModuleError()); - } -} - -void handle_die(char **parameters, int pcnt, userrec *user) -{ - log(DEBUG,"die: %s",user->nick); - if (!strcmp(parameters[0],diepass)) - { - WriteOpers("*** DIE command from %s!%s@%s, terminating...",user->nick,user->ident,user->host); - sleep(DieDelay); - Exit(ERROR); - } - else - { - WriteOpers("*** Failed DIE Command from %s!%s@%s.",user->nick,user->ident,user->host); - } -} - -void handle_restart(char **parameters, int pcnt, userrec *user) -{ - char restart[1024]; - char *argv[32]; - log(DEFAULT,"Restart: %s",user->nick); - if (!strcmp(parameters[0],restartpass)) - { - WriteOpers("*** RESTART command from %s!%s@%s, restarting server.",user->nick,user->ident,user->host); - - argv[0] = MyExecutable; - argv[1] = "-wait"; - if (nofork) - { - argv[2] = "-nofork"; - } - else - { - argv[2] = NULL; - } - argv[3] = NULL; - - // close ALL file descriptors - send_error("Server restarting."); - sleep(1); - for (int i = 0; i < 65536; i++) - { - int on = 1; - struct linger linger = { 0 }; - setsockopt(i, SOL_SOCKET, SO_REUSEADDR, (const char*)&on, sizeof(on)); - linger.l_onoff = 1; - linger.l_linger = 1; - setsockopt(i, SOL_SOCKET, SO_LINGER, (const char*)&linger,sizeof(linger)); - Blocking(i); - close(i); - } - sleep(2); - - execv(MyExecutable,argv); - - exit(0); - } - else - { - WriteOpers("*** Failed RESTART Command from %s!%s@%s.",user->nick,user->ident,user->host); - } -} - -void handle_kill(char **parameters, int pcnt, userrec *user) -{ - userrec *u = Find(parameters[0]); - char killreason[MAXBUF]; - - log(DEBUG,"kill: %s %s",parameters[0],parameters[1]); - if (u) - { - log(DEBUG,"into kill mechanism"); - int MOD_RESULT = 0; - FOREACH_RESULT(OnKill(user,u,parameters[1])); - if (MOD_RESULT) { - log(DEBUG,"A module prevented the kill with result %d",MOD_RESULT); - return; - } - - if (strcmp(ServerName,u->server)) - { - // remote kill - WriteOpers("*** Remote kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]); - snprintf(killreason,MAXBUF,"[%s] Killed (%s (%s))",ServerName,user->nick,parameters[1]); - WriteCommonExcept(u,"QUIT :%s",killreason); - // K token must go to ALL servers!!! - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"K %s %s :%s",user->nick,u->nick,killreason); - NetSendToAll(buffer); - - user_hash::iterator iter = clientlist.find(u->nick); - if (iter != clientlist.end()) - { - log(DEBUG,"deleting user hash value %d",iter->second); - if ((iter->second) && (user->registered == 7)) { - delete iter->second; - } - clientlist.erase(iter); - } - purge_empty_chans(); - } - else - { - // local kill - log(DEFAULT,"LOCAL KILL: %s :%s!%s!%s (%s)", u->nick, ServerName,user->dhost,user->nick,parameters[1]); - WriteTo(user, u, "KILL %s :%s!%s!%s (%s)", u->nick, ServerName,user->dhost,user->nick,parameters[1]); - WriteOpers("*** Local Kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]); - snprintf(killreason,MAXBUF,"Killed (%s (%s))",user->nick,parameters[1]); - kill_link(u,killreason); - } - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } -} - -void handle_summon(char **parameters, int pcnt, userrec *user) -{ - WriteServ(user->fd,"445 %s :SUMMON has been disabled (depreciated command)",user->nick); -} - -void handle_users(char **parameters, int pcnt, userrec *user) -{ - WriteServ(user->fd,"445 %s :USERS has been disabled (depreciated command)",user->nick); -} - -void handle_pass(char **parameters, int pcnt, userrec *user) -{ - // Check to make sure they havnt registered -- Fix by FCS - if (user->registered == 7) - { - WriteServ(user->fd,"462 %s :You may not reregister",user->nick); - return; - } - strlcpy(user->password,parameters[0],MAXBUF); - if (!strcasecmp(parameters[0],Passwd(user))) - { - user->haspassed = true; - } -} - -void handle_invite(char **parameters, int pcnt, userrec *user) -{ - userrec* u = Find(parameters[0]); - chanrec* c = FindChan(parameters[1]); - - if ((!c) || (!u)) - { - if (!c) - { - WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[1]); - } - else - { - if (c->inviteonly) - { - WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]); - } - } - - return; - } - - if (c->inviteonly) - { - if (cstatus(user,c) < STATUS_HOP) - { - WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, c->name); - return; - } - } - if (has_channel(u,c)) - { - WriteServ(user->fd,"443 %s %s %s :Is already on channel %s",user->nick,u->nick,c->name,c->name); - return; - } - if (!has_channel(user,c)) - { - WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, c->name); - return; - } - - int MOD_RESULT = 0; - FOREACH_RESULT(OnUserPreInvite(user,u,c)); - if (MOD_RESULT == 1) { - return; - } - - u->InviteTo(c->name); - WriteFrom(u->fd,user,"INVITE %s :%s",u->nick,c->name); - WriteServ(user->fd,"341 %s %s %s",user->nick,u->nick,c->name); - - // i token must go to ALL servers!!! - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"i %s %s %s",u->nick,user->nick,c->name); - NetSendToAll(buffer); -} - -void handle_topic(char **parameters, int pcnt, userrec *user) -{ - chanrec* Ptr; - - if (pcnt == 1) - { - if (strlen(parameters[0]) <= CHANMAX) - { - Ptr = FindChan(parameters[0]); - if (Ptr) - { - if (((Ptr) && (!has_channel(user,Ptr))) && (Ptr->secret)) - { - WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, Ptr->name); - return; - } - if (Ptr->topicset) - { - WriteServ(user->fd,"332 %s %s :%s", user->nick, Ptr->name, Ptr->topic); - WriteServ(user->fd,"333 %s %s %s %d", user->nick, Ptr->name, Ptr->setby, Ptr->topicset); - } - else - { - WriteServ(user->fd,"331 %s %s :No topic is set.", user->nick, Ptr->name); - } - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - } - return; - } - else if (pcnt>1) - { - if (strlen(parameters[0]) <= CHANMAX) - { - Ptr = FindChan(parameters[0]); - if (Ptr) - { - if ((Ptr) && (!has_channel(user,Ptr))) - { - WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, Ptr->name); - return; - } - if ((Ptr->topiclock) && (cstatus(user,Ptr)fd,"482 %s %s :You must be at least a half-operator to change modes on this channel", user->nick, Ptr->name); - return; - } - - char topic[MAXBUF]; - strlcpy(topic,parameters[1],MAXBUF); - if (strlen(topic)>MAXTOPIC) - { - topic[MAXTOPIC-1] = '\0'; - } - - if (!strcasecmp(user->server,ServerName)) - { - int MOD_RESULT = 0; - FOREACH_RESULT(OnLocalTopicChange(user,Ptr,topic)); - if (MOD_RESULT) - return; - } - - strlcpy(Ptr->topic,topic,MAXBUF); - strlcpy(Ptr->setby,user->nick,NICKMAX); - Ptr->topicset = TIME; - WriteChannel(Ptr,user,"TOPIC %s :%s",Ptr->name, Ptr->topic); - - // t token must go to ALL servers!!! - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"t %s %s :%s",user->nick,Ptr->name,topic); - NetSendToAll(buffer); - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - } - } -} - -void handle_names(char **parameters, int pcnt, userrec *user) -{ - chanrec* c; - - if (!pcnt) - { - WriteServ(user->fd,"366 %s * :End of /NAMES list.",user->nick); - return; - } - - if (loop_call(handle_names,parameters,pcnt,user,0,pcnt-1,0)) - return; - c = FindChan(parameters[0]); - if (c) - { - if (((c) && (!has_channel(user,c))) && (c->secret)) - { - WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, c->name); - return; - } - userlist(user,c); - WriteServ(user->fd,"366 %s %s :End of /NAMES list.", user->nick, c->name); - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } -} - -void handle_privmsg(char **parameters, int pcnt, userrec *user) -{ - userrec *dest; - chanrec *chan; - - user->idle_lastmsg = TIME; - - if (loop_call(handle_privmsg,parameters,pcnt,user,0,pcnt-2,0)) - return; - if (parameters[0][0] == '#') - { - chan = FindChan(parameters[0]); - if (chan) - { - if ((chan->noexternal) && (!has_channel(user,chan))) - { - WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name); - return; - } - if ((chan->moderated) && (cstatus(user,chan)fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name); - return; - } - - int MOD_RESULT = 0; - - std::string temp = parameters[1]; - FOREACH_RESULT(OnUserPreMessage(user,chan,TYPE_CHANNEL,temp)); - if (MOD_RESULT) { - return; - } - parameters[1] = (char*)temp.c_str(); - - ChanExceptSender(chan, user, "PRIVMSG %s :%s", chan->name, parameters[1]); - - // if any users of this channel are on remote servers, broadcast the packet - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"P %s %s :%s",user->nick,chan->name,parameters[1]); - NetSendToCommon(user,buffer); - } - else - { - /* no such nick/channel */ - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - return; - } - - dest = Find(parameters[0]); - if (dest) - { - if (strcmp(dest->awaymsg,"")) - { - /* auto respond with aweh msg */ - WriteServ(user->fd,"301 %s %s :%s",user->nick,dest->nick,dest->awaymsg); - } - - int MOD_RESULT = 0; - - std::string temp = parameters[1]; - FOREACH_RESULT(OnUserPreMessage(user,dest,TYPE_USER,temp)); - if (MOD_RESULT) { - return; - } - parameters[1] = (char*)temp.c_str(); - - - - if (!strcmp(dest->server,user->server)) - { - // direct write, same server - WriteTo(user, dest, "PRIVMSG %s :%s", dest->nick, parameters[1]); - } - else - { - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"P %s %s :%s",user->nick,dest->nick,parameters[1]); - NetSendToOne(dest->server,buffer); - } - } - else - { - /* no such nick/channel */ - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } -} - -void handle_notice(char **parameters, int pcnt, userrec *user) -{ - userrec *dest; - chanrec *chan; - - user->idle_lastmsg = TIME; - - if (loop_call(handle_notice,parameters,pcnt,user,0,pcnt-2,0)) - return; - if (parameters[0][0] == '#') - { - chan = FindChan(parameters[0]); - if (chan) - { - if ((chan->noexternal) && (!has_channel(user,chan))) - { - WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name); - return; - } - if ((chan->moderated) && (cstatus(user,chan)fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name); - return; - } - - int MOD_RESULT = 0; - - std::string temp = parameters[1]; - FOREACH_RESULT(OnUserPreNotice(user,chan,TYPE_CHANNEL,temp)); - if (MOD_RESULT) { - return; - } - parameters[1] = (char*)temp.c_str(); - - ChanExceptSender(chan, user, "NOTICE %s :%s", chan->name, parameters[1]); - - // if any users of this channel are on remote servers, broadcast the packet - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"V %s %s :%s",user->nick,chan->name,parameters[1]); - NetSendToCommon(user,buffer); - } - else - { - /* no such nick/channel */ - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - return; - } - - dest = Find(parameters[0]); - if (dest) - { - int MOD_RESULT = 0; - - std::string temp = parameters[1]; - FOREACH_RESULT(OnUserPreNotice(user,dest,TYPE_USER,temp)); - if (MOD_RESULT) { - return; - } - parameters[1] = (char*)temp.c_str(); - - if (!strcmp(dest->server,user->server)) - { - // direct write, same server - WriteTo(user, dest, "NOTICE %s :%s", dest->nick, parameters[1]); - } - else - { - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"V %s %s :%s",user->nick,dest->nick,parameters[1]); - NetSendToOne(dest->server,buffer); - } - } - else - { - /* no such nick/channel */ - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } -} - -void handle_server(char **parameters, int pcnt, userrec *user) -{ - WriteServ(user->fd,"666 %s :You cannot identify as a server, you are a USER. IRC Operators informed.",user->nick); - WriteOpers("*** WARNING: %s attempted to issue a SERVER command and is registered as a user!",user->nick); -} - -void handle_info(char **parameters, int pcnt, userrec *user) -{ - WriteServ(user->fd,"371 %s :. o O (The Inspire Internet Relay Chat Server) O o .",user->nick); - WriteServ(user->fd,"371 %s : ",user->nick); - WriteServ(user->fd,"371 %s :Core developers: Craig Edwards (Brain)",user->nick); - WriteServ(user->fd,"371 %s : Craig McLure",user->nick); - WriteServ(user->fd,"371 %s : ",user->nick); - WriteServ(user->fd,"371 %s :Contributors: typobox43",user->nick); - WriteServ(user->fd,"371 %s : w00t",user->nick); - WriteServ(user->fd,"371 %s : Om",user->nick); - WriteServ(user->fd,"371 %s : Jazza",user->nick); - WriteServ(user->fd,"371 %s : ",user->nick); - WriteServ(user->fd,"371 %s :Testers: CC",user->nick); - WriteServ(user->fd,"371 %s : Piggles",user->nick); - WriteServ(user->fd,"371 %s : Foamy",user->nick); - WriteServ(user->fd,"371 %s : Hart",user->nick); - WriteServ(user->fd,"371 %s : RageD",user->nick); - WriteServ(user->fd,"371 %s : [ed]",user->nick); - WriteServ(user->fd,"371 %s : Azhrarn",user->nick); - WriteServ(user->fd,"371 %s : nenolod",user->nick); - WriteServ(user->fd,"371 %s : luigiman",user->nick); - WriteServ(user->fd,"371 %s : Chu",user->nick); - WriteServ(user->fd,"371 %s : aquanight",user->nick); - WriteServ(user->fd,"371 %s : xptek",user->nick); - WriteServ(user->fd,"371 %s : Grantlinks",user->nick); - WriteServ(user->fd,"371 %s : Rob",user->nick); - WriteServ(user->fd,"371 %s : angelic",user->nick); - WriteServ(user->fd,"371 %s : Jason",user->nick); - WriteServ(user->fd,"371 %s : ",user->nick); - WriteServ(user->fd,"371 %s :Thanks to irc-junkie and searchirc",user->nick); - WriteServ(user->fd,"371 %s :for the nice comments and the help",user->nick); - WriteServ(user->fd,"371 %s :you gave us in attracting users to",user->nick); - WriteServ(user->fd,"371 %s :this software.",user->nick); - WriteServ(user->fd,"371 %s : ",user->nick); - WriteServ(user->fd,"371 %s :Best experienced with: An IRC client.",user->nick); - FOREACH_MOD OnInfo(user); - WriteServ(user->fd,"374 %s :End of /INFO list",user->nick); -} - -void handle_time(char **parameters, int pcnt, userrec *user) -{ - time_t rawtime; - struct tm * timeinfo; - - time ( &rawtime ); - timeinfo = localtime ( &rawtime ); - WriteServ(user->fd,"391 %s %s :%s",user->nick,ServerName, asctime (timeinfo) ); - -} - -void handle_whois(char **parameters, int pcnt, userrec *user) -{ - userrec *dest; - char *t; - - if (loop_call(handle_whois,parameters,pcnt,user,0,pcnt-1,0)) - return; - dest = Find(parameters[0]); - if (dest) - { - // bug found by phidjit - were able to whois an incomplete connection if it had sent a NICK or USER - if (dest->registered == 7) - { - WriteServ(user->fd,"311 %s %s %s %s * :%s",user->nick, dest->nick, dest->ident, dest->dhost, dest->fullname); - if ((user == dest) || (strchr(user->modes,'o'))) - { - WriteServ(user->fd,"378 %s %s :is connecting from *@%s",user->nick, dest->nick, dest->host); - } - if (strcmp(chlist(dest),"")) - { - WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, chlist(dest)); - } - WriteServ(user->fd,"312 %s %s %s :%s",user->nick, dest->nick, dest->server, GetServerDescription(dest->server).c_str()); - if (strcmp(dest->awaymsg,"")) - { - WriteServ(user->fd,"301 %s %s :%s",user->nick, dest->nick, dest->awaymsg); - } - if ((strchr(dest->modes,'o')) && (strcmp(dest->oper,""))) - { - WriteServ(user->fd,"313 %s %s :is %s %s on %s",user->nick, dest->nick, - (strchr("aeiou",dest->oper[0]) ? "an" : "a"),dest->oper, Network); - } - FOREACH_MOD OnWhois(user,dest); - if (!strcasecmp(user->server,dest->server)) - { - // idle time and signon line can only be sent if youre on the same server (according to RFC) - WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, abs((dest->idle_lastmsg)-TIME), dest->signon); - } - - WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, dest->nick); - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - } - else - { - /* no such nick/channel */ - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } -} - -void handle_quit(char **parameters, int pcnt, userrec *user) -{ - user_hash::iterator iter = clientlist.find(user->nick); - char* reason; - - if (user->registered == 7) - { - /* theres more to do here, but for now just close the socket */ - if (pcnt == 1) - { - if (parameters[0][0] == ':') - { - *parameters[0]++; - } - reason = parameters[0]; - - if (strlen(reason)>MAXQUIT) - { - reason[MAXQUIT-1] = '\0'; - } - - Write(user->fd,"ERROR :Closing link (%s@%s) [%s%s]",user->ident,user->host,PrefixQuit,parameters[0]); - WriteOpers("*** Client exiting: %s!%s@%s [%s%s]",user->nick,user->ident,user->host,PrefixQuit,parameters[0]); - WriteCommonExcept(user,"QUIT :%s%s",PrefixQuit,parameters[0]); - - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"Q %s :%s%s",user->nick,PrefixQuit,parameters[0]); - NetSendToAll(buffer); - } - else - { - Write(user->fd,"ERROR :Closing link (%s@%s) [QUIT]",user->ident,user->host); - WriteOpers("*** Client exiting: %s!%s@%s [Client exited]",user->nick,user->ident,user->host); - WriteCommonExcept(user,"QUIT :Client exited"); - - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"Q %s :Client exited",user->nick); - NetSendToAll(buffer); - } - FOREACH_MOD OnUserQuit(user); - AddWhoWas(user); - } - FOREACH_MOD OnUserDisconnect(user); - - /* push the socket on a stack of sockets due to be closed at the next opportunity */ - if (user->fd > -1) - { - shutdown(user->fd,2); - close(user->fd); - } - - if (iter != clientlist.end()) - { - clientlist.erase(iter); - log(DEBUG,"deleting user hash value %d",iter->second); - //if ((user) && (user->registered == 7)) { - //delete user; - //} - } - - if (user->registered == 7) { - purge_empty_chans(); - } -} - -void handle_who(char **parameters, int pcnt, userrec *user) -{ - chanrec* Ptr = NULL; - char tmp[10]; - - /* theres more to do here, but for now just close the socket */ - if (pcnt == 1) - { - if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*"))) - { - if (user->chans[0].channel) - { - int n_list = 0; - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - Ptr = i->second->chans[0].channel; - // suggested by phidjit and FCS - if ((!common_channels(user,i->second)) && (isnick(i->second->nick))) - { - // Bug Fix #29 - strcpy(tmp, ""); - if (strcmp(i->second->awaymsg, "")) { - strncat(tmp, "G", 9); - } else { - strncat(tmp, "H", 9); - } - if (strchr(i->second->modes,'o')) { strncat(tmp, "*", 9); } - WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, Ptr ? Ptr->name : "*", i->second->ident, i->second->dhost, i->second->server, i->second->nick, tmp, i->second->fullname); - n_list++; - if (n_list > MaxWhoResults) - break; - } - } - } - if (Ptr) - { - WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick , parameters[0]); - } - else - { - WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]); - } - return; - } - if (parameters[0][0] == '#') - { - Ptr = FindChan(parameters[0]); - if (Ptr) - { - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if ((has_channel(i->second,Ptr)) && (isnick(i->second->nick))) - { - // Fix Bug #29 - Part 2.. - strcpy(tmp, ""); - if (strcmp(i->second->awaymsg, "")) { - strncat(tmp, "G", 9); - } else { - strncat(tmp, "H", 9); - } - if (strchr(i->second->modes,'o')) { strncat(tmp, "*", 9); } - strcat(tmp, cmode(i->second, Ptr)); - WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, Ptr->name, i->second->ident, i->second->dhost, i->second->server, i->second->nick, tmp, i->second->fullname); - } - } - WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]); - } - else - { - WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]); - } - } - else - { - userrec* u = Find(parameters[0]); - if (u) - { - // Bug Fix #29 -- Part 29.. - strcpy(tmp, ""); - if (strcmp(u->awaymsg, "")) { - strncat(tmp, "G" ,9); - } else { - strncat(tmp, "H" ,9); - } - if (strchr(u->modes,'o')) { strncat(tmp, "*" ,9); } - WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, u->nick, u->ident, u->dhost, u->server, u->nick, tmp, u->fullname); - } - WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]); - } - } - if (pcnt == 2) - { - if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*")) && (!strcmp(parameters[1],"o"))) - { - for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if ((common_channels(user,i->second)) && (isnick(i->second->nick))) - { - if (strchr(i->second->modes,'o')) - { - // If i were a rich man.. I wouldn't need to me making these bugfixes.. - // But i'm a poor bastard with nothing better to do. - strcpy(tmp, ""); - if (strcmp(i->second->awaymsg, "")) { - strncat(tmp, "G" ,9); - } else { - strncat(tmp, "H" ,9); - } - - WriteServ(user->fd,"352 %s %s %s %s %s %s %s* :0 %s",user->nick, user->nick, i->second->ident, i->second->dhost, i->second->server, i->second->nick, tmp, i->second->fullname); - } - } - } - WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]); - return; - } - } -} +#include "inspircd.h" -void handle_wallops(char **parameters, int pcnt, userrec *user) +CommandBase::CommandBase(Module* mod, const std::string& cmd, unsigned int minpara, unsigned int maxpara) + : ServiceProvider(mod, cmd, SERVICE_COMMAND) + , min_params(minpara) + , max_params(maxpara) + , allow_empty_last_param(true) { - WriteWallOps(user,false,"%s",parameters[0]); } -void handle_list(char **parameters, int pcnt, userrec *user) +CommandBase::~CommandBase() { - chanrec* Ptr; - - WriteServ(user->fd,"321 %s Channel :Users Name",user->nick); - for (chan_hash::const_iterator i = chanlist.begin(); i != chanlist.end(); i++) - { - if ((!i->second->c_private) && (!i->second->secret)) - { - WriteServ(user->fd,"322 %s %s %d :[+%s] %s",user->nick,i->second->name,usercount_i(i->second),chanmodes(i->second),i->second->topic); - } - } - WriteServ(user->fd,"323 %s :End of channel list.",user->nick); } - -void handle_rehash(char **parameters, int pcnt, userrec *user) +void CommandBase::EncodeParameter(std::string& parameter, unsigned int index) { - WriteServ(user->fd,"382 %s %s :Rehashing",user->nick,CleanFilename(CONFIG_FILE)); - ReadConfig(false,user); - FOREACH_MOD OnRehash(); - WriteOpers("%s is rehashing config file %s",user->nick,CleanFilename(CONFIG_FILE)); } -void handle_lusers(char **parameters, int pcnt, userrec *user) +RouteDescriptor CommandBase::GetRouting(User* user, const Params& parameters) { - WriteServ(user->fd,"251 %s :There are %d users and %d invisible on %d servers",user->nick,usercnt()-usercount_invisible(),usercount_invisible(),servercount()); - WriteServ(user->fd,"252 %s %d :operator(s) online",user->nick,usercount_opers()); - WriteServ(user->fd,"253 %s %d :unknown connections",user->nick,usercount_unknown()); - WriteServ(user->fd,"254 %s %d :channels formed",user->nick,chancount()); - WriteServ(user->fd,"254 %s :I have %d clients and %d servers",user->nick,local_count(),count_servs()); + return ROUTE_LOCALONLY; } -void handle_admin(char **parameters, int pcnt, userrec *user) +Command::Command(Module* mod, const std::string& cmd, unsigned int minpara, unsigned int maxpara) + : CommandBase(mod, cmd, minpara, maxpara) + , flags_needed(0) + , force_manual_route(false) + , Penalty(1) + , use_count(0) + , works_before_reg(false) { - WriteServ(user->fd,"256 %s :Administrative info for %s",user->nick,ServerName); - WriteServ(user->fd,"257 %s :Name - %s",user->nick,AdminName); - WriteServ(user->fd,"258 %s :Nickname - %s",user->nick,AdminNick); - WriteServ(user->fd,"258 %s :E-Mail - %s",user->nick,AdminEmail); } -void handle_ping(char **parameters, int pcnt, userrec *user) +Command::~Command() { - WriteServ(user->fd,"PONG %s :%s",ServerName,parameters[0]); + ServerInstance->Parser.RemoveCommand(this); } -void handle_pong(char **parameters, int pcnt, userrec *user) +void Command::RegisterService() { - // set the user as alive so they survive to next ping - user->lastping = 1; + if (!ServerInstance->Parser.AddCommand(this)) + throw ModuleException("Command already exists: " + name); } -void handle_motd(char **parameters, int pcnt, userrec *user) +void Command::TellNotEnoughParameters(LocalUser* user, const Params& parameters) { - ShowMOTD(user); + user->WriteNumeric(ERR_NEEDMOREPARAMS, name, "Not enough parameters."); + if (ServerInstance->Config->SyntaxHints && user->registered == REG_ALL && syntax.length()) + user->WriteNumeric(RPL_SYNTAX, name, syntax); } -void handle_rules(char **parameters, int pcnt, userrec *user) +void Command::TellNotRegistered(LocalUser* user, const Params& parameters) { - ShowRULES(user); + user->WriteNumeric(ERR_NOTREGISTERED, name, "You have not registered."); } -void handle_user(char **parameters, int pcnt, userrec *user) +SplitCommand::SplitCommand(Module* me, const std::string& cmd, unsigned int minpara, unsigned int maxpara) + : Command(me, cmd, minpara, maxpara) { - if (user->registered < 3) - { - if (isident(parameters[0]) == 0) { - // This kinda Sucks, According to the RFC thou, its either this, - // or "You have already registered" :p -- Craig - WriteServ(user->fd,"461 %s USER :Not enough parameters",user->nick); - } - else { - strcpy(user->ident,"~"); /* we arent checking ident... but these days why bother anyway? */ - strlcat(user->ident,parameters[0],IDENTMAX); - strlcpy(user->fullname,parameters[3],128); - user->registered = (user->registered | 1); - } - } - else - { - WriteServ(user->fd,"462 %s :You may not reregister",user->nick); - return; - } - /* parameters 2 and 3 are local and remote hosts, ignored when sent by client connection */ - if (user->registered == 3) - { - /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */ - FOREACH_MOD OnUserRegister(user); - ConnectUser(user); - } } -void handle_userhost(char **parameters, int pcnt, userrec *user) +CmdResult SplitCommand::Handle(User* user, const Params& parameters) { - char Return[MAXBUF],junk[MAXBUF]; - snprintf(Return,MAXBUF,"302 %s :",user->nick); - for (int i = 0; i < pcnt; i++) + switch (user->usertype) { - userrec *u = Find(parameters[i]); - if (u) - { - if (strchr(u->modes,'o')) - { - snprintf(junk,MAXBUF,"%s*=+%s@%s ",u->nick,u->ident,u->host); - strlcat(Return,junk,MAXBUF); - } - else - { - snprintf(junk,MAXBUF,"%s=+%s@%s ",u->nick,u->ident,u->host); - strlcat(Return,junk,MAXBUF); - } - } - } - WriteServ(user->fd,Return); -} + case USERTYPE_LOCAL: + return HandleLocal(static_cast(user), parameters); + case USERTYPE_REMOTE: + return HandleRemote(static_cast(user), parameters); -void handle_ison(char **parameters, int pcnt, userrec *user) -{ - char Return[MAXBUF]; - snprintf(Return,MAXBUF,"303 %s :",user->nick); - for (int i = 0; i < pcnt; i++) - { - userrec *u = Find(parameters[i]); - if (u) - { - strlcat(Return,u->nick,MAXBUF); - strlcat(Return," ",MAXBUF); - } + case USERTYPE_SERVER: + return HandleServer(static_cast(user), parameters); } - WriteServ(user->fd,Return); -} - -void handle_away(char **parameters, int pcnt, userrec *user) -{ - if (pcnt) - { - strlcpy(user->awaymsg,parameters[0],512); - WriteServ(user->fd,"306 %s :You have been marked as being away",user->nick); - } - else - { - strlcpy(user->awaymsg,"",512); - WriteServ(user->fd,"305 %s :You are no longer marked as being away",user->nick); - } + ServerInstance->Logs->Log("COMMAND", LOG_DEFAULT, "Unknown user type %d in command (uuid=%s)!", + user->usertype, user->uuid.c_str()); + return CMD_INVALID; } -void handle_whowas(char **parameters, int pcnt, userrec* user) +CmdResult SplitCommand::HandleLocal(LocalUser* user, const Params& parameters) { - user_hash::iterator i = whowas.find(parameters[0]); - - if (i == whowas.end()) - { - WriteServ(user->fd,"406 %s %s :There was no such nickname",user->nick,parameters[0]); - WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]); - } - else - { - time_t rawtime = i->second->signon; - tm *timeinfo; - char b[MAXBUF]; - - timeinfo = localtime(&rawtime); - strlcpy(b,asctime(timeinfo),MAXBUF); - b[strlen(b)-1] = '\0'; - - WriteServ(user->fd,"314 %s %s %s %s * :%s",user->nick,i->second->nick,i->second->ident,i->second->dhost,i->second->fullname); - WriteServ(user->fd,"312 %s %s %s :%s",user->nick,i->second->nick,i->second->server,b); - WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]); - } - + return CMD_INVALID; } -void handle_trace(char **parameters, int pcnt, userrec *user) +CmdResult SplitCommand::HandleRemote(RemoteUser* user, const Params& parameters) { - for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (i->second) - { - if (isnick(i->second->nick)) - { - if (strchr(i->second->modes,'o')) - { - WriteServ(user->fd,"205 %s :Oper 0 %s",user->nick,i->second->nick); - } - else - { - WriteServ(user->fd,"204 %s :User 0 %s",user->nick,i->second->nick); - } - } - else - { - WriteServ(user->fd,"203 %s :???? 0 [%s]",user->nick,i->second->host); - } - } - } + return CMD_INVALID; } -void handle_modules(char **parameters, int pcnt, userrec *user) +CmdResult SplitCommand::HandleServer(FakeUser* user, const Params& parameters) { - for (int i = 0; i < module_names.size(); i++) - { - Version V = modules[i]->GetVersion(); - char modulename[MAXBUF]; - char flagstate[MAXBUF]; - strcpy(flagstate,""); - if (V.Flags & VF_STATIC) - strlcat(flagstate,", static",MAXBUF); - if (V.Flags & VF_VENDOR) - strlcat(flagstate,", vendor",MAXBUF); - if (V.Flags & VF_COMMON) - strlcat(flagstate,", common",MAXBUF); - if (V.Flags & VF_SERVICEPROVIDER) - strlcat(flagstate,", service provider",MAXBUF); - if (!strlen(flagstate)) - strcpy(flagstate," "); - strlcpy(modulename,module_names[i].c_str(),256); - if (strchr(user->modes,'o')) - { - WriteServ(user->fd,"900 %s :0x%08lx %d.%d.%d.%d %s (%s)",user->nick,modules[i],V.Major,V.Minor,V.Revision,V.Build,CleanFilename(modulename),flagstate+2); - } - else - { - WriteServ(user->fd,"900 %s :%s",user->nick,CleanFilename(modulename)); - } - } + return CMD_INVALID; } - -void handle_stats(char **parameters, int pcnt, userrec *user) -{ - char Link_ServerName[MAXBUF],Link_IPAddr[MAXBUF],Link_Port[MAXBUF]; - if (pcnt != 1) - { - return; - } - if (strlen(parameters[0])>1) - { - /* make the stats query 1 character long */ - parameters[0][1] = '\0'; - } - - - FOREACH_MOD OnStats(*parameters[0]); - - if (!strcasecmp(parameters[0],"c")) - { - for (int i = 0; i < ConfValueEnum("link",&config_f); i++) - { - ConfValue("link","name",i,Link_ServerName,&config_f); - ConfValue("link","ipaddr",i,Link_IPAddr,&config_f); - ConfValue("link","port",i,Link_Port,&config_f); - WriteServ(user->fd,"213 %s C *@%s * %s %s 0 M",user->nick,Link_IPAddr,Link_ServerName,Link_Port); - WriteServ(user->fd,"244 %s H * * %s",user->nick,Link_ServerName); - } - } - - if (!strcasecmp(parameters[0],"i")) - { - int idx = 0; - for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++) - { - WriteServ(user->fd,"215 %s I * * * %d %d %s *",user->nick,MAXCLIENTS,idx,ServerName); - idx++; - } - } - - if (!strcasecmp(parameters[0],"y")) - { - int idx = 0; - for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++) - { - WriteServ(user->fd,"218 %s Y %d %d 0 %d %d",user->nick,idx,120,i->flood,i->registration_timeout); - idx++; - } - } - - if (!strcmp(parameters[0],"U")) - { - for (int i = 0; i < ConfValueEnum("uline",&config_f); i++) - { - ConfValue("uline","server",i,Link_ServerName,&config_f); - WriteServ(user->fd,"248 %s U %s",user->nick,Link_ServerName); - } - } - - if (!strcmp(parameters[0],"P")) - { - int idx = 0; - for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (strchr(i->second->modes,'o')) - { - WriteServ(user->fd,"249 %s :%s (%s@%s) Idle: %d",user->nick,i->second->nick,i->second->ident,i->second->dhost,(TIME - i->second->idle_lastmsg)); - idx++; - } - } - WriteServ(user->fd,"249 %s :%d OPER(s)",user->nick,idx); - //249 [Brain] :bwoadway-monitor (~wgmon@204.152.186.58) Idle: 18 - } - - if (!strcmp(parameters[0],"k")) - { - stats_k(user); - } - - if (!strcmp(parameters[0],"g")) - { - stats_g(user); - } - - if (!strcmp(parameters[0],"q")) - { - stats_q(user); - } - - if (!strcmp(parameters[0],"Z")) - { - stats_z(user); - } - - if (!strcmp(parameters[0],"e")) - { - stats_e(user); - } - - /* stats m (list number of times each command has been used, plus bytecount) */ - if (!strcmp(parameters[0],"m")) - { - for (int i = 0; i < cmdlist.size(); i++) - { - if (cmdlist[i].handler_function) - { - if (cmdlist[i].use_count) - { - /* RPL_STATSCOMMANDS */ - WriteServ(user->fd,"212 %s %s %d %d",user->nick,cmdlist[i].command,cmdlist[i].use_count,cmdlist[i].total_bytes); - } - } - } - - } - - /* stats z (debug and memory info) */ - if (!strcmp(parameters[0],"z")) - { - WriteServ(user->fd,"249 %s :Users(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,clientlist.size(),clientlist.size()*sizeof(userrec),clientlist.bucket_count()); - WriteServ(user->fd,"249 %s :Channels(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,chanlist.size(),chanlist.size()*sizeof(chanrec),chanlist.bucket_count()); - WriteServ(user->fd,"249 %s :Commands(VECTOR) %d (%d bytes)",user->nick,cmdlist.size(),cmdlist.size()*sizeof(command_t)); - WriteServ(user->fd,"249 %s :MOTD(VECTOR) %d, RULES(VECTOR) %d",user->nick,MOTD.size(),RULES.size()); - WriteServ(user->fd,"249 %s :address_cache(HASH_MAP) %d (%d buckets)",user->nick,IP.size(),IP.bucket_count()); - WriteServ(user->fd,"249 %s :Modules(VECTOR) %d (%d)",user->nick,modules.size(),modules.size()*sizeof(Module)); - WriteServ(user->fd,"249 %s :ClassFactories(VECTOR) %d (%d)",user->nick,factory.size(),factory.size()*sizeof(ircd_module)); - WriteServ(user->fd,"249 %s :Ports(STATIC_ARRAY) %d",user->nick,boundPortCount); - } - - /* stats o */ - if (!strcmp(parameters[0],"o")) - { - for (int i = 0; i < ConfValueEnum("oper",&config_f); i++) - { - char LoginName[MAXBUF]; - char HostName[MAXBUF]; - char OperType[MAXBUF]; - ConfValue("oper","name",i,LoginName,&config_f); - ConfValue("oper","host",i,HostName,&config_f); - ConfValue("oper","type",i,OperType,&config_f); - WriteServ(user->fd,"243 %s O %s * %s %s 0",user->nick,HostName,LoginName,OperType); - } - } - - /* stats l (show user I/O stats) */ - if (!strcmp(parameters[0],"l")) - { - WriteServ(user->fd,"211 %s :server:port nick bytes_in cmds_in bytes_out cmds_out",user->nick); - for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++) - { - if (isnick(i->second->nick)) - { - WriteServ(user->fd,"211 %s :%s:%d %s %d %d %d %d",user->nick,ServerName,i->second->port,i->second->nick,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out); - } - else - { - WriteServ(user->fd,"211 %s :%s:%d (unknown@%d) %d %d %d %d",user->nick,ServerName,i->second->port,i->second->fd,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out); - } - - } - } - - /* stats u (show server uptime) */ - if (!strcmp(parameters[0],"u")) - { - time_t current_time = 0; - current_time = TIME; - time_t server_uptime = current_time - startup_time; - struct tm* stime; - stime = gmtime(&server_uptime); - /* i dont know who the hell would have an ircd running for over a year nonstop, but - * Craig suggested this, and it seemed a good idea so in it went */ - if (stime->tm_year > 70) - { - WriteServ(user->fd,"242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick,(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec); - } - else - { - WriteServ(user->fd,"242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick,stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec); - } - } - - WriteServ(user->fd,"219 %s %s :End of /STATS report",user->nick,parameters[0]); - WriteOpers("*** Notice: Stats '%s' requested by %s (%s@%s)",parameters[0],user->nick,user->ident,user->host); - -} - -void handle_connect(char **parameters, int pcnt, userrec *user) -{ - char Link_ServerName[1024]; - char Link_IPAddr[1024]; - char Link_Port[1024]; - char Link_Pass[1024]; - int LinkPort; - bool found = false; - - for (int i = 0; i < ConfValueEnum("link",&config_f); i++) - { - if (!found) - { - ConfValue("link","name",i,Link_ServerName,&config_f); - ConfValue("link","ipaddr",i,Link_IPAddr,&config_f); - ConfValue("link","port",i,Link_Port,&config_f); - ConfValue("link","sendpass",i,Link_Pass,&config_f); - log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass); - LinkPort = atoi(Link_Port); - if (match(Link_ServerName,parameters[0])) { - found = true; - break; - } - } - } - - if (!found) { - WriteServ(user->fd,"NOTICE %s :*** Failed to connect to %s: No servers matching this pattern are configured for linking.",user->nick,parameters[0]); - return; - } - - // TODO: Perform a check here to stop a server being linked twice! - - WriteServ(user->fd,"NOTICE %s :*** Connecting to %s (%s) port %s...",user->nick,Link_ServerName,Link_IPAddr,Link_Port); - - if (me[defaultRoute]) - { - me[defaultRoute]->BeginLink(Link_IPAddr,LinkPort,Link_Pass,Link_ServerName,me[defaultRoute]->port); - return; - } - else - { - WriteServ(user->fd,"NOTICE %s :No default route is defined for server connections on this server. You must define a server connection to be default route so that sockets can be bound to it.",user->nick); - } -} - -void handle_squit(char **parameters, int pcnt, userrec *user) -{ - // send out an squit across the mesh and then clear the server list (for local squit) - if (!pcnt) - { - WriteOpers("SQUIT command issued by %s",user->nick); - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"& %s",ServerName); - NetSendToAll(buffer); - DoSplitEveryone(); - } - else - { - WriteServ(user->fd,"NOTICE :*** Remote SQUIT not supported yet."); - } -} - -void handle_links(char **parameters, int pcnt, userrec *user) -{ - WriteServ(user->fd,"364 %s %s %s :0 %s",user->nick,ServerName,ServerName,ServerDesc); - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - WriteServ(user->fd,"364 %s %s %s :1 %s",user->nick,me[j]->connectors[k].GetServerName().c_str(),ServerName,me[j]->connectors[k].GetDescription().c_str()); - } - } - } - WriteServ(user->fd,"365 %s * :End of /LINKS list.",user->nick); -} - -void handle_map(char **parameters, int pcnt, userrec *user) -{ - char line[MAXBUF]; - snprintf(line,MAXBUF,"006 %s :%s",user->nick,ServerName); - while (strlen(line) < 50) - strcat(line," "); - WriteServ(user->fd,"%s%d (%.2f%%)",line,local_count(),(float)(((float)local_count()/(float)registered_usercount())*100)); - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - snprintf(line,MAXBUF,"006 %s :%c-%s",user->nick,islast(me[j]->connectors[k].GetServerName().c_str()),me[j]->connectors[k].GetServerName().c_str()); - while (strlen(line) < 50) - strcat(line," "); - WriteServ(user->fd,"%s%d (%.2f%%)",line,map_count(me[j]->connectors[k].GetServerName().c_str()),(float)(((float)map_count(me[j]->connectors[k].GetServerName().c_str())/(float)registered_usercount())*100)); - } - } - } - WriteServ(user->fd,"007 %s :End of /MAP",user->nick); -} - -bool is_uline(const char* server) -{ - char ServName[MAXBUF]; - int i,j; - - for (int i = 0; i < ConfValueEnum("uline",&config_f); i++) - { - ConfValue("uline","server",i,ServName,&config_f); - if (!strcasecmp(server,ServName)) - { - return true; - } - } - return false; -} -int operstrcmp(char* data,char* input) -{ - int MOD_RESULT = 0; - FOREACH_RESULT(OnOperCompare(data,input)) - if (MOD_RESULT == 1) - return 0; - if (MOD_RESULT == -1) - return 1; - return strcmp(data,input); -} - -void handle_oper(char **parameters, int pcnt, userrec *user) -{ - char LoginName[MAXBUF]; - char Password[MAXBUF]; - char OperType[MAXBUF]; - char TypeName[MAXBUF]; - char HostName[MAXBUF]; - char TheHost[MAXBUF]; - int i,j; - bool found = false; - bool fail2 = false; - char global[MAXBUF]; - - snprintf(TheHost,MAXBUF,"%s@%s",user->ident,user->host); - - for (int i = 0; i < ConfValueEnum("oper",&config_f); i++) - { - ConfValue("oper","name",i,LoginName,&config_f); - ConfValue("oper","password",i,Password,&config_f); - ConfValue("oper","type",i,OperType,&config_f); - ConfValue("oper","host",i,HostName,&config_f); - if ((!strcmp(LoginName,parameters[0])) && (!operstrcmp(Password,parameters[1])) && (match(TheHost,HostName))) - { - fail2 = true; - for (j =0; j < ConfValueEnum("type",&config_f); j++) - { - ConfValue("type","name",j,TypeName,&config_f); - - if (!strcmp(TypeName,OperType)) - { - /* found this oper's opertype */ - snprintf(global,MAXBUF,"| %s %s",user->nick,TypeName); - NetSendToAll(global); - ConfValue("type","host",j,HostName,&config_f); - ChangeDisplayedHost(user,HostName); - strlcpy(user->oper,TypeName,NICKMAX); - found = true; - fail2 = false; - break; - } - } - } - if (found) - break; - } - if (found) - { - /* correct oper credentials */ - WriteOpers("*** %s (%s@%s) is now an IRC operator of type %s",user->nick,user->ident,user->host,OperType); - WriteServ(user->fd,"381 %s :You are now an IRC operator of type %s",user->nick,OperType); - if (!strchr(user->modes,'o')) - { - strcat(user->modes,"o"); - WriteServ(user->fd,"MODE %s :+o",user->nick); - snprintf(global,MAXBUF,"M %s +o",user->nick); - NetSendToAll(global); - FOREACH_MOD OnOper(user); - log(DEFAULT,"OPER: %s!%s@%s opered as type: %s",user->nick,user->ident,user->host,OperType); - } - } - else - { - if (!fail2) - { - WriteServ(user->fd,"491 %s :Invalid oper credentials",user->nick); - WriteOpers("*** WARNING! Failed oper attempt by %s!%s@%s!",user->nick,user->ident,user->host); - log(DEFAULT,"OPER: Failed oper attempt by %s!%s@%s: user, host or password did not match.",user->nick,user->ident,user->host); - } - else - { - WriteServ(user->fd,"491 %s :Your oper block does not have a valid opertype associated with it",user->nick); - WriteOpers("*** CONFIGURATION ERROR! Oper block mismatch for OperType %s",OperType); - log(DEFAULT,"OPER: Failed oper attempt by %s!%s@%s: credentials valid, but oper type nonexistent.",user->nick,user->ident,user->host); - } - } - return; -} - -void handle_nick(char **parameters, int pcnt, userrec *user) -{ - if (pcnt < 1) - { - log(DEBUG,"not enough params for handle_nick"); - return; - } - if (!parameters[0]) - { - log(DEBUG,"invalid parameter passed to handle_nick"); - return; - } - if (!strlen(parameters[0])) - { - log(DEBUG,"zero length new nick passed to handle_nick"); - return; - } - if (!user) - { - log(DEBUG,"invalid user passed to handle_nick"); - return; - } - if (!user->nick) - { - log(DEBUG,"invalid old nick passed to handle_nick"); - return; - } - if (!strcasecmp(user->nick,parameters[0])) - { - log(DEBUG,"old nick is new nick, skipping"); - return; - } - else - { - if (strlen(parameters[0]) > 1) - { - if (parameters[0][0] == ':') - { - *parameters[0]++; - } - } - if (matches_qline(parameters[0])) - { - WriteOpers("*** Q-Lined nickname %s from %s!%s@%s: %s",parameters[0],user->nick,user->ident,user->host,matches_qline(parameters[0])); - WriteServ(user->fd,"432 %s %s :Invalid nickname: %s",user->nick,parameters[0],matches_qline(parameters[0])); - return; - } - if ((Find(parameters[0])) && (Find(parameters[0]) != user)) - { - WriteServ(user->fd,"433 %s %s :Nickname is already in use.",user->nick,parameters[0]); - return; - } - } - if (isnick(parameters[0]) == 0) - { - WriteServ(user->fd,"432 %s %s :Erroneous Nickname",user->nick,parameters[0]); - return; - } - - if (user->registered == 7) - { - int MOD_RESULT = 0; - FOREACH_RESULT(OnUserPreNick(user,parameters[0])); - if (MOD_RESULT) { - // if a module returns true, the nick change is silently forbidden. - return; - } - - WriteCommon(user,"NICK %s",parameters[0]); - - // Q token must go to ALL servers!!! - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"n %s %s",user->nick,parameters[0]); - NetSendToAll(buffer); - } - - char oldnick[NICKMAX]; - strlcpy(oldnick,user->nick,NICKMAX); - - /* change the nick of the user in the users_hash */ - user = ReHashNick(user->nick, parameters[0]); - /* actually change the nick within the record */ - if (!user) return; - if (!user->nick) return; - - strlcpy(user->nick, parameters[0],NICKMAX); - - log(DEBUG,"new nick set: %s",user->nick); - - if (user->registered < 3) - { - user->registered = (user->registered | 2); - // dont attempt to look up the dns until they pick a nick... because otherwise their pointer WILL change - // and unless we're lucky we'll get a duff one later on. - user->dns_done = (!lookup_dns(user->nick)); - if (user->dns_done) - log(DEBUG,"Aborting dns lookup of %s because dns server experienced a failure.",user->nick); - } - if (user->registered == 3) - { - /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */ - FOREACH_MOD OnUserRegister(user); - ConnectUser(user); - } - if (user->registered == 7) - { - FOREACH_MOD OnUserPostNick(user,oldnick); - } -} - - - -void handle_V(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* src = strtok(params," "); - char* dest = strtok(NULL," :"); - char* text = strtok(NULL,"\r\n"); - text++; - - userrec* user = Find(src); - if (user) - { - userrec* dst = Find(dest); - - if (dst) - { - WriteTo(user, dst, "NOTICE %s :%s", dst->nick, text); - } - else - { - chanrec* d = FindChan(dest); - if (d) - { - ChanExceptSender(d, user, "NOTICE %s :%s", d->name, text); - } - } - } - -} - - -void handle_P(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* src = strtok(params," "); - char* dest = strtok(NULL," :"); - char* text = strtok(NULL,"\r\n"); - text++; - - userrec* user = Find(src); - if (user) - { - userrec* dst = Find(dest); - - if (dst) - { - WriteTo(user, dst, "PRIVMSG %s :%s", dst->nick, text); - } - else - { - chanrec* d = FindChan(dest); - if (d) - { - ChanExceptSender(d, user, "PRIVMSG %s :%s", d->name, text); - } - } - } - -} - -void handle_i(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = strtok(params," "); - char* from = strtok(NULL," "); - char* channel = strtok(NULL," "); - userrec* u = Find(nick); - userrec* user = Find(from); - chanrec* c = FindChan(channel); - if ((c) && (u) && (user)) - { - u->InviteTo(c->name); - WriteFrom(u->fd,user,"INVITE %s :%s",u->nick,c->name); - } -} - -void handle_t(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* setby = strtok(params," "); - char* channel = strtok(NULL," :"); - char* topic = strtok(NULL,"\r\n"); - topic++; - userrec* u = Find(setby); - chanrec* c = FindChan(channel); - if ((c) && (u)) - { - WriteChannelLocal(c,u,"TOPIC %s :%s",c->name,topic); - strlcpy(c->topic,topic,MAXTOPIC); - strlcpy(c->setby,u->nick,NICKMAX); - c->topicset = TIME; - } -} - - -void handle_T(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* tm = strtok(params," "); - char* setby = strtok(NULL," "); - char* channel = strtok(NULL," :"); - char* topic = strtok(NULL,"\r\n"); - topic++; - time_t TS = atoi(tm); - chanrec* c = FindChan(channel); - if (c) - { - // in the case of topics and TS, the *NEWER* - if (TS <= c->topicset) - { - WriteChannelLocal(c,NULL,"TOPIC %s :%s",c->name,topic); - strlcpy(c->topic,topic,MAXTOPIC); - strlcpy(c->setby,setby,NICKMAX); - } - } -} - -void handle_M(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* pars[128]; - char original[MAXBUF],target[MAXBUF]; - strlcpy(original,params,MAXBUF); - int index = 0; - char* parameter = strtok(params," "); - strlcpy(target,parameter,MAXBUF); - while (parameter) - { - if (parameter[0] == ':') - parameter++; - pars[index++] = parameter; - parameter = strtok(NULL," "); - } - log(DEBUG,"*** MODE: %s %s",pars[0],pars[1]); - merge_mode(pars,index); - if (FindChan(target)) - { - WriteChannelLocal(FindChan(target), NULL, "MODE %s",original); - } - if (Find(target)) - { - Write(Find(target)->fd,":%s MODE %s",ServerName,original); - } -} - -// m is modes set by users only (not servers) valid targets are channels or users. - -void handle_m(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // m blah #chatspike +b *!test@*4 - char* pars[128]; - char original[MAXBUF]; - strlcpy(original,params,MAXBUF); - - if (!strchr(params,' ')) - { - WriteOpers("WARNING! 'm' token in data stream without any parameters! Something fishy is going on!"); - return; - } - - int index = 0; - - char* src = strtok(params," "); - userrec* user = Find(src); - - if (user) - { - log(DEBUG,"Found user: %s",user->nick); - char* parameter = strtok(NULL," "); - while (parameter) - { - pars[index++] = parameter; - parameter = strtok(NULL," "); - } - - log(DEBUG,"Calling merge_mode2"); - merge_mode2(pars,index,user); - } -} - - -void handle_L(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = NULL; - char* channel = NULL; - char* reason = NULL; - log(DEBUG,"L TOKEN PARS: '%s'",params); - if (strstr(params,":#")) - { - nick = strtok(params," "); - channel = strtok(NULL,"\r\n"); - channel++; - reason = ""; - } - else - { - nick = strtok(params," "); - channel = strtok(NULL," :"); - reason = strtok(NULL,"\r\n"); - reason++; - } - userrec* user = Find(nick); - if ((user) && (channel) && (reason)) - { - if ((!reason) && (*reason != '\0')) - { - del_channel(user,channel,reason,true); - } - else - { - del_channel(user,channel,NULL,true); - } - } -} - -void handle_K(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* src = strtok(params," "); - char* nick = strtok(NULL," :"); - char* reason = strtok(NULL,"\r\n"); - char kreason[MAXBUF]; - reason++; - - userrec* u = Find(nick); - userrec* user = Find(src); - - if ((user) && (u)) - { - WriteTo(user, u, "KILL %s :%s!%s!%s!%s (%s)", u->nick, source->name, ServerName, user->dhost,user->nick,reason); - WriteOpers("*** Remote kill from %s by %s: %s!%s@%s (%s)",source->name,user->nick,u->nick,u->ident,u->host,reason); - snprintf(kreason,MAXBUF,"[%s] Killed (%s (%s))",source->name,user->nick,reason); - kill_link(u,kreason); - } -} - -void handle_Q(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = strtok(params," :"); - char* reason = strtok(NULL,"\r\n"); - reason++; - - userrec* user = Find(nick); - - if (user) - { - if (strlen(reason)>MAXQUIT) - { - reason[MAXQUIT-1] = '\0'; - } - - - WriteCommonExcept(user,"QUIT :%s",reason); - - user_hash::iterator iter = clientlist.find(user->nick); - - if (iter != clientlist.end()) - { - log(DEBUG,"deleting user hash value %d",iter->second); - if ((iter->second) && (user->registered == 7)) { - delete iter->second; - } - clientlist.erase(iter); - } - - purge_empty_chans(); - } -} - -void handle_n(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* oldnick = strtok(params," "); - char* newnick = strtok(NULL," "); - - userrec* user = Find(oldnick); - - if (user) - { - WriteCommon(user,"NICK %s",newnick); - if (is_uline(tcp_host)) - { - int MOD_RESULT = 0; - FOREACH_RESULT(OnUserPreNick(user,newnick)); - if (MOD_RESULT) { - // if a module returns true, the nick change couldnt be allowed - kill_link(user,"Nickname collision"); - return; - } - if (matches_qline(newnick)) - { - kill_link(user,"Nickname collision"); - return; - } - - // broadcast this because its a services thingy - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"n %s %s",user->nick,newnick); - NetSendToAll(buffer); - } - user = ReHashNick(user->nick, newnick); - if (!user) return; - if (!user->nick) return; - strlcpy(user->nick, newnick,NICKMAX); - log(DEBUG,"new nick set: %s",user->nick); - } -} - -// k : -void handle_k(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* src = strtok(params," "); - char* dest = strtok(NULL," "); - char* channel = strtok(NULL," :"); - char* reason = strtok(NULL,"\r\n"); - reason++; - userrec* s = Find(src); - userrec* d = Find(dest); - chanrec* c = FindChan(channel); - if ((s) && (d) && (c)) - { - kick_channel(s,d,c,reason); - return; - } - d = Find(channel); - c = FindChan(dest); - if ((s) && (d) && (c)) - { - kick_channel(s,d,c,reason); - return; - } -} - -void handle_AT(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* who = strtok(params," :"); - char* text = strtok(NULL,"\r\n"); - text++; - userrec* s = Find(who); - if (s) - { - WriteWallOps(s,true,text); - } -} - -void handle_H(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Adding ULined server %s to my map",params); - ircd_connector s; - s.SetState(STATE_DISCONNECTED); - s.SetServerName(params); - - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),params)) - { - // dont allow a server to be added twice - log(DEBUG,"ULined server %s already in the map!",params); - return; - } - } - } - } - - source->connectors.push_back(s); - WriteOpers("Non-Mesh server %s has joined the network",params); -} - -void handle_N(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* tm = strtok(params," "); - char* nick = strtok(NULL," "); - char* host = strtok(NULL," "); - char* dhost = strtok(NULL," "); - char* ident = strtok(NULL," "); - char* modes = strtok(NULL," "); - char* ipaddr = strtok(NULL," "); - char* server = strtok(NULL," :"); - char* gecos = strtok(NULL,"\r\n"); - gecos++; - modes++; - time_t TS = atoi(tm); - user_hash::iterator iter = clientlist.find(nick); - if (iter != clientlist.end()) - { - // nick collision - WriteOpers("Nickname collision: %s@%s != %s@%s",nick,server,iter->second->nick,iter->second->server); - char str[MAXBUF]; - snprintf(str,MAXBUF,"Killed (Nick Collision (%s@%s < %s@%s))",nick,server,iter->second->nick,iter->second->server); - WriteServ(iter->second->fd, "KILL %s :%s",iter->second->nick,str); - kill_link(iter->second,str); - } - clientlist[nick] = new userrec(); - // remote users have an fd of -1. This is so that our Write abstraction - // routines know to route any messages to this record away to whatever server - // theyre on. - clientlist[nick]->fd = -1; - strlcpy(clientlist[nick]->nick, nick,NICKMAX); - strlcpy(clientlist[nick]->host, host,160); - strlcpy(clientlist[nick]->dhost, dhost,160); - strlcpy(clientlist[nick]->server, server,256); - strlcpy(clientlist[nick]->ident, ident,10); // +1 char to compensate for tilde - strlcpy(clientlist[nick]->fullname, gecos,128); - clientlist[nick]->signon = TS; - clientlist[nick]->nping = 0; // this is ignored for a remote user anyway. - clientlist[nick]->lastping = 1; - clientlist[nick]->port = 0; // so is this... - clientlist[nick]->registered = 7; // this however we need to set for them to receive messages and appear online - clientlist[nick]->idle_lastmsg = TIME; // this is unrealiable and wont actually be used locally - for (int i = 0; i < MAXCHANS; i++) - { - clientlist[nick]->chans[i].channel = NULL; - clientlist[nick]->chans[i].uc_modes = 0; - } - FOREACH_MOD OnGlobalConnect(clientlist[nick]); - if (strchr(clientlist[nick]->modes,'o')) - { - FOREACH_MOD OnGlobalOper(clientlist[nick]); - } -} - -void handle_F(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - long tdiff = TIME - atoi(params); - if (tdiff) - WriteOpers("TS split for %s -> %s: %d",source->name,reply->name,tdiff); -} - -void handle_a(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = strtok(params," :"); - char* gecos = strtok(NULL,"\r\n"); - - userrec* user = Find(nick); - - if (user) - strlcpy(user->fullname,gecos,MAXBUF); -} - -void handle_b(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = strtok(params," "); - char* host = strtok(NULL," "); - - userrec* user = Find(nick); - - if (user) - strlcpy(user->dhost,host,160); -} - -void handle_plus(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // %s %s %d %d - // + test3.chatspike.net 7010 -2016508415 - char* servername = strtok(params," "); - char* ipaddr = strtok(NULL," "); - char* ipport = strtok(NULL," "); - char* cookie = strtok(NULL," "); - log(DEBUG,"*** Connecting back to %s:%d",ipaddr,atoi(ipport)); - - - bool conn_already = false; - for (int i = 0; i < 32; i++) - { - if (me[i] != NULL) - { - for (int j = 0; j < me[i]->connectors.size(); j++) - { - if (!strcasecmp(me[i]->connectors[j].GetServerName().c_str(),servername)) - { - if (me[i]->connectors[j].GetServerPort() == atoi(ipport)) - { - log(DEBUG,"Already got a connection to %s:%d, ignoring +",ipaddr,atoi(ipport)); - conn_already = true; - } - } - } - } - } - if (!conn_already) - me[defaultRoute]->MeshCookie(ipaddr,atoi(ipport),atoi(cookie),servername); -} - -void handle_R(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* server = strtok(params," "); - char* data = strtok(NULL,"\r\n"); - if ((!data) || (!server)) - { - log(DEBUG,"Someones playing silly buggers, attempting to send to a null server or send a null message (BUG?)"); - return; - } - - log(DEBUG,"Forwarded packet '%s' to '%s'",data,server); - NetSendToOne(server,data); -} - -void handle_J(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // IMPORTANT NOTE - // The J token currently has no timestamp - this needs looking at - // because it will allow splitriding. - char* nick = strtok(params," "); - char* channel = strtok(NULL," "); - userrec* user = Find(nick); - while (channel) - { - if ((user != NULL) && (strcmp(channel,""))) - { - char privilage = '\0'; - if (channel[0] != '#') - { - privilage = channel[0]; - channel++; - } - add_channel(user,channel,"",true); - - // now work out the privilages they should have on each channel - // and send the appropriate servermodes. - for (int i = 0; i != MAXCHANS; i++) - { - if (user->chans[i].channel) - { - if (!strcasecmp(user->chans[i].channel->name,channel)) - { - if (privilage == '@') - { - user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_OP; - WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +o %s",channel,user->nick); - } - if (privilage == '%') - { - user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_HOP; - WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +h %s",channel,user->nick); - } - if (privilage == '+') - { - user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_VOICE; - WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +v %s",channel,user->nick); - } - } - } - } - - } - channel = strtok(NULL," "); - } -} - -void handle_dollar(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Storing routing table..."); - char* sourceserver = strtok(params," "); - char* server = strtok(NULL," "); - for (int i = 0; i < 32; i++) - { - if (me[i] != NULL) - { - for (int j = 0; j < me[i]->connectors.size(); j++) - { - if (!strcasecmp(me[i]->connectors[j].GetServerName().c_str(),sourceserver)) - { - me[i]->connectors[j].routes.clear(); - log(DEBUG,"Found entry for source server."); - while (server) - { - // store each route - me[i]->connectors[j].routes.push_back(server); - log(DEBUG,"*** Stored route: %s -> %s -> %s",ServerName,sourceserver,server); - server = strtok(NULL," "); - } - return; - } - } - } - } - log(DEBUG,"Warning! routing table received from nonexistent server!"); -} - -void handle_amp(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Netsplit! %s split from mesh, removing!",params); - WriteOpers("*** NOTICE - Controlled netsplit: %s split from %s",params,ServerName); - bool go_again = true; - while (go_again) - { - go_again = false; - for (int i = 0; i < 32; i++) - { - if (me[i] != NULL) - { - for (vector::iterator j = me[i]->connectors.begin(); j != me[i]->connectors.end(); j++) - { - if (!strcasecmp(j->GetServerName().c_str(),params)) - { - j->routes.clear(); - j->CloseConnection(); - me[i]->connectors.erase(j); - go_again = true; - break; - } - } - } - } - } - log(DEBUG,"Removed server. Will remove clients..."); - // iterate through the userlist and remove all users on this server. - // because we're dealing with a mesh, we dont have to deal with anything - // "down-route" from this server (nice huh) - go_again = true; - char reason[MAXBUF]; - snprintf(reason,MAXBUF,"%s %s",ServerName,params); - while (go_again) - { - go_again = false; - for (user_hash::const_iterator u = clientlist.begin(); u != clientlist.end(); u++) - { - if (!strcasecmp(u->second->server,params)) - { - kill_link(u->second,reason); - go_again = true; - break; - } - } - } -} - -long authcookie; - -void handle_hash(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // # : - log(DEBUG,"Adding G-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - char* create_time = strtok(NULL," "); - char* duration = strtok(NULL," :"); - char* reason = strtok(NULL,"\r\n"); - reason++; - add_gline(atoi(duration),(const char*)who,(const char*)reason,(const char*)mask); - // we must update the creation time on this gline - // now that we've added it, or it wont expire at the right time. - gline_set_creation_time(mask,atoi(create_time)); - if (!atoi(duration)) - { - WriteOpers("*** %s Added permenant G-Line on %s.",who,mask); - } - else - { - WriteOpers("*** %s Added timed G-Line on %s to expire in %d seconds.",who,mask,atoi(duration)); - } - apply_lines(); -} - -void handle_dot(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Removing G-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - if (mask) - { - if (del_gline((const char*)mask)) - { - if (who) - { - WriteOpers("*** %s Removed G-line on %s.",who,mask); - } - } - } -} - -void handle_add_sqline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // { : - log(DEBUG,"Adding Q-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - char* create_time = strtok(NULL," "); - char* duration = strtok(NULL," :"); - char* reason = strtok(NULL,"\r\n"); - reason++; - add_qline(atoi(duration),(const char*)who,(const char*)reason,(const char*)mask); - // we must update the creation time on this gline - // now that we've added it, or it wont expire at the right time. - qline_set_creation_time(mask,atoi(create_time)); - qline_make_global(mask); - if (!atoi(duration)) - { - WriteOpers("*** %s Added permenant Q-Line on %s.",who,mask); - } - else - { - WriteOpers("*** %s Added timed Q-Line on %s to expire in %d seconds.",who,mask,atoi(duration)); - } - apply_lines(); -} - -void handle_del_sqline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Removing Q-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - if (mask) - { - if (del_qline((const char*)mask)) - { - if (who) - { - WriteOpers("*** %s Removed Q-line on %s.",who,mask); - } - } - } -} - -void handle_add_szline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - // } : - log(DEBUG,"Adding Z-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - char* create_time = strtok(NULL," "); - char* duration = strtok(NULL," :"); - char* reason = strtok(NULL,"\r\n"); - reason++; - add_zline(atoi(duration),(const char*)who,(const char*)reason,(const char*)mask); - // we must update the creation time on this gline - // now that we've added it, or it wont expire at the right time. - zline_set_creation_time(mask,atoi(create_time)); - zline_make_global(mask); - if (!atoi(duration)) - { - WriteOpers("*** %s Added permenant Z-Line on %s.",who,mask); - } - else - { - WriteOpers("*** %s Added timed Z-Line on %s to expire in %d seconds.",who,mask,atoi(duration)); - } - apply_lines(); -} - -void handle_del_szline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - log(DEBUG,"Removing Z-line"); - char* mask = strtok(params," "); - char* who = strtok(NULL," "); - if (mask) - { - if (del_zline((const char*)mask)) - { - if (who) - { - WriteOpers("*** %s Removed Q-line on %s.",who,mask); - } - } - } -} - -void handle_pipe(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host) -{ - char* nick = strtok(params," "); - char* type = strtok(params," "); - userrec* u = Find(nick); - if (u) - { - strlcpy(u->oper,type,NICKMAX); - } -} - - -void process_restricted_commands(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host,char* ipaddr,int port) -{ - char buffer[MAXBUF]; - int MOD_RESULT = 0; - - switch(token) - { - // Y - // start netburst - case 'Y': - nb_start = TIME; - WriteOpers("Server %s is starting netburst.",tcp_host); - // now broadcast this new servers address out to all servers that are linked to us, - // except the newcomer. They'll all attempt to connect back to it. - authcookie = rand()*rand(); - snprintf(buffer,MAXBUF,"~ %d",authcookie); - NetSendToAll(buffer); - break; - // ~ - // Store authcookie - // once stored, this authcookie permits other servers to log in - // without user or password, using it. - case '~': - auth_cookies.push_back(atoi(params)); - log(DEBUG,"*** Stored auth cookie, will permit servers with auth-cookie %d",atoi(params)); - break; - // connect back to a server using an authcookie - case '+': - handle_plus(token,params,source,reply,tcp_host); - break; - // routing table - case '$': - handle_dollar(token,params,source,reply,tcp_host); - break; - // node unreachable - we cant route to a server, sooooo we slit it off. - // servers can generate these for themselves for an squit. - case '&': - handle_amp(token,params,source,reply,tcp_host); - break; - // R - // redirect token, send all of along to the given - // server as this server has been found to still have a route to it - case 'R': - handle_R(token,params,source,reply,tcp_host); - break; - // ? - // ping - case '?': - reply->SendPacket("!",tcp_host); - break; - // ? - // pong - case '!': - break; - // * - // no operation - case '*': - break; - // N : - // introduce remote client - case 'N': - handle_N(token,params,source,reply,tcp_host); - break; - // a : - // change GECOS (SETNAME) - case 'a': - handle_a(token,params,source,reply,tcp_host); - break; - // b : - // change displayed host (SETHOST) - case 'b': - handle_b(token,params,source,reply,tcp_host); - break; - // t : - // change a channel topic - case 't': - handle_t(token,params,source,reply,tcp_host); - break; - // i - // invite a user to a channel - case 'i': - handle_i(token,params,source,reply,tcp_host); - break; - // k : - // kick a user from a channel - case 'k': - handle_k(token,params,source,reply,tcp_host); - break; - // n - // change nickname of client -- a server should only be able to - // change the nicknames of clients that reside on it unless - // they are ulined. - case 'n': - handle_n(token,params,source,reply,tcp_host); - break; - // J - // Join user to channel list, merge channel permissions - case 'J': - handle_J(token,params,source,reply,tcp_host); - break; - // T : - // change channel topic (netburst only) - case 'T': - handle_T(token,params,source,reply,tcp_host); - break; - // M [MODE-PARAMETERS] - // Server setting modes on an object - case 'M': - handle_M(token,params,source,reply,tcp_host); - break; - // m [MODE-PARAMETERS] - // User setting modes on an object - case 'm': - handle_m(token,params,source,reply,tcp_host); - break; - // P : - // Send a private/channel message - case 'P': - handle_P(token,params,source,reply,tcp_host); - break; - // V : - // Send a private/channel notice - case 'V': - handle_V(token,params,source,reply,tcp_host); - break; - // L : - // User parting a channel - case 'L': - handle_L(token,params,source,reply,tcp_host); - break; - // Q : - // user quitting - case 'Q': - handle_Q(token,params,source,reply,tcp_host); - break; - // H - // introduce non-meshable server (such as a services server) - case 'H': - handle_H(token,params,source,reply,tcp_host); - break; - // K : - // remote kill - case 'K': - handle_K(token,params,source,reply,tcp_host); - break; - // @ : - // wallops - case '@': - handle_AT(token,params,source,reply,tcp_host); - break; - // # : - // add gline - case '#': - handle_hash(token,params,source,reply,tcp_host); - break; - // . - // remove gline - case '.': - handle_dot(token,params,source,reply,tcp_host); - break; - // # : - // add gline - case '{': - handle_add_sqline(token,params,source,reply,tcp_host); - break; - // . - // remove gline - case '[': - handle_del_sqline(token,params,source,reply,tcp_host); - break; - // # : - // add gline - case '}': - handle_add_szline(token,params,source,reply,tcp_host); - break; - // . - // remove gline - case ']': - handle_del_szline(token,params,source,reply,tcp_host); - break; - // | - // set opertype - case '|': - handle_pipe(token,params,source,reply,tcp_host); - break; - // F - // end netburst - case 'F': - WriteOpers("Server %s has completed netburst. (%d secs)",tcp_host,TIME-nb_start); - handle_F(token,params,source,reply,tcp_host); - nb_start = 0; - // tell all the other servers to use this authcookie to connect back again - // got '+ test3.chatspike.net 7010 -2016508415' from test.chatspike.net - snprintf(buffer,MAXBUF,"+ %s %s %d %d",tcp_host,ipaddr,port,authcookie); - NetSendToAllExcept(tcp_host,buffer); - break; - case '/': - WriteOpers("Server %s is IRCServices-based server (assumes-SVSMODE) - Nickname Services: %s",tcp_host,params); - strlcpy(source->nickserv,params,NICKMAX); - break; - // F - // end netburst with no mesh creation - case 'f': - WriteOpers("Server %s has completed netburst. (%d secs)",tcp_host,TIME-nb_start); - handle_F(token,params,source,reply,tcp_host); - nb_start = 0; - // tell everyone else about the new server name so they just add it in the disconnected - // state - snprintf(buffer,MAXBUF,"u %s :%s",tcp_host,GetServerDescription(tcp_host).c_str()); - NetSendToAllExcept(tcp_host,buffer); - break; - // X - // Send netburst now - case 'X': - WriteOpers("Sending my netburst to %s",tcp_host); - DoSync(source,tcp_host); - WriteOpers("Send of netburst to %s completed",tcp_host); - NetSendMyRoutingTable(); - break; - // anything else - default: - MOD_RESULT = 0; - string_list s; - char* data = strtok(params," "); - while (data) - { - if (*data == ':') - { - // the last item is a special case - data++; - char datalast[MAXBUF]; - strlcpy(datalast,data,MAXBUF); - data = strtok(NULL," "); - while (data) - { - strlcpy(datalast," ",MAXBUF); - strlcpy(datalast,data,MAXBUF); - data = strtok(NULL," "); - } - s.push_back(data); - break; - } - s.push_back(data); - data = strtok(NULL," "); - } - FOREACH_RESULT(OnMeshToken(token,s,source,reply,tcp_host,ipaddr,port)); - if (!MOD_RESULT) - WriteOpers("WARNING! Unknown datagram type '%c'",token); - break; - } -} - - -void handle_link_packet(char* udp_msg, char* tcp_host, serverrec *serv) -{ - if ((!strncmp(udp_msg,"USER ",5)) || (!strncmp(udp_msg,"NICK ",5))) - { - // a user on a server port, just close their connection. - RemoveServer(tcp_host); - return; - } - - char response[10240]; - char old2[MAXBUF]; - char token = udp_msg[0]; - char* old = udp_msg; - - if ((token != ':') && (strlen(udp_msg)>1) && (udp_msg[1] != ' ')) - { - WriteOpers("*** Discarded %d chars illegal data from %s",strlen(udp_msg),tcp_host); - } - - if (token == ':') // leading :servername or details - strip them off (services does this, sucky) - { - char* src = udp_msg+1; - while (udp_msg[0] != ' ') - udp_msg++; - udp_msg[0] = 0; - udp_msg++; - char* comd = udp_msg; - while (udp_msg[0] != ' ') - udp_msg++; - udp_msg[0] = 0; - udp_msg++; - char data[MAXBUF]; - char source[MAXBUF]; - char command[MAXBUF]; - strlcpy(data,udp_msg,512); - strlcpy(source,src,MAXBUF); - strlcpy(command,comd,MAXBUF); - udp_msg = old; - - // unused numeric: - // :services-dev.chatspike.net 433 Craig Craig :Nickname is registered to someone else - if (!strcmp(command,"433")) - { - token = '*'; - } - if (!strcmp(command,"432")) - { - token = '*'; - } - if (!strcmp(command,"PING")) - { - token = '*'; - } - if (!strcmp(command,"NOTICE")) - { - snprintf(udp_msg,MAXBUF,"V %s %s",source,data); - log(DEBUG,"Rewrote NOTICE from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"QUIT")) - { - if ((!udp_msg) || (!strcmp(data,"")) || (strcmp(data,":"))) - { - strcpy(data,":No reason"); - } - if (!strcmp(data,":")) - { - strcpy(data,":No reason"); - } - snprintf(udp_msg,MAXBUF,"Q %s %s",source,data); - log(DEBUG,"Rewrote QUIT from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"SQUIT")) - { - snprintf(udp_msg,MAXBUF,"& %s",source); - log(DEBUG,"Rewrote SQUIT from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"SVSMODE")) - { - snprintf(udp_msg,MAXBUF,"m %s %s",source,data); - log(DEBUG,"Rewrote SVSMODE from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"SVS2MODE")) - { - snprintf(udp_msg,MAXBUF,"m %s %s",source,data); - log(DEBUG,"Rewrote SVS2MODE from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - // todo: this wont work without u:lines - // in give_ops etc allow nick on a u:lined serv to do just about anything - if (!strcmp(command,"MODE")) - { - snprintf(udp_msg,MAXBUF,"m %s %s",source,data); - log(DEBUG,"Rewrote MODE from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"KICK")) - { - snprintf(udp_msg,MAXBUF,"k %s %s",source,data); - log(DEBUG,"Rewrote KICK from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"KILL")) - { - snprintf(udp_msg,MAXBUF,"K %s %s",source,data); - log(DEBUG,"Rewrote KILL from services to: '%s'",udp_msg); - token = udp_msg[0]; - } - if (!strcmp(command,"SVSJOIN")) - { - snprintf(udp_msg,MAXBUF,"J %s",data); - NetSendToOne(tcp_host,udp_msg); - char* nick = strtok(data," "); - char* chan = strtok(NULL," "); - log(DEBUG,"Rewrote SVSJOIN from services to: '%s'",udp_msg); - userrec* u = Find(nick); - if (u) - { - add_channel(u,chan,"",true); - } - token = udp_msg[0]; - } - - } - - char* params = udp_msg + 2; - char finalparam[1024]; - strcpy(finalparam," :xxxx"); - if (strstr(udp_msg," :")) { - strlcpy(finalparam,strstr(udp_msg," :"),1024); - } - - - if (token == '-') { - char* cookie = strtok(params," "); - char* servername = strtok(NULL," "); - char* serverdesc = finalparam+2; - - WriteOpers("AuthCookie CONNECT from %s (%s)",servername,tcp_host); - - for (int u = 0; u < auth_cookies.size(); u++) - { - if (auth_cookies[u] == atoi(cookie)) - { - WriteOpers("Allowed cookie from %s, is now part of the mesh",servername); - - - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host)) - { - me[j]->connectors[k].SetServerName(servername); - me[j]->connectors[k].SetDescription(serverdesc); - me[j]->connectors[k].SetState(STATE_CONNECTED); - NetSendMyRoutingTable(); - return; - } - } - } - WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right now! Possible intrusion attempt!",tcp_host); - return; - } - - - return; - } - } - // bad cookie, bad bad! go sit in the corner! - WriteOpers("Bad cookie from %s!",servername); - return; - } - else - if (token == 'S') { - // S test.chatspike.net password portn :ChatSpike InspIRCd test server - char* servername = strtok(params," "); - char* password = strtok(NULL," "); - char* myport = strtok(NULL," "); - char* revision = strtok(NULL," "); - char* serverdesc = finalparam+2; - - WriteOpers("CONNECT from %s (%s) (their port: %d)",servername,tcp_host,atoi(myport)); - - ircd_connector* cn = serv->FindHost(servername); - - if (cn) - { - WriteOpers("CONNECT aborted: Server %s already exists from %s",servername,ServerName); - char buffer[MAXBUF]; - snprintf(buffer,MAXBUF,"E :Server %s already exists!",servername); - serv->SendPacket(buffer,tcp_host); - RemoveServer(tcp_host); - return; - } - - if (atoi(revision) != GetRevision()) - { - WriteOpers("CONNECT aborted: Could not link to %s, is an incompatible version %s, our version is %d",servername,revision,GetRevision()); - char buffer[MAXBUF]; - sprintf(buffer,"E :Version number mismatch"); - serv->SendPacket(buffer,tcp_host); - RemoveServer(tcp_host); - RemoveServer(servername); - return; - } - - for (int j = 0; j < serv->connectors.size(); j++) - { - if (!strcasecmp(serv->connectors[j].GetServerName().c_str(),tcp_host)) - { - serv->connectors[j].SetServerName(servername); - serv->connectors[j].SetDescription(serverdesc); - serv->connectors[j].SetServerPort(atoi(myport)); - } - } - - - char Link_ServerName[1024]; - char Link_IPAddr[1024]; - char Link_Port[1024]; - char Link_Pass[1024]; - char Link_SendPass[1024]; - int LinkPort = 0; - - // search for a corresponding block in the config files - for (int i = 0; i < ConfValueEnum("link",&config_f); i++) - { - ConfValue("link","name",i,Link_ServerName,&config_f); - ConfValue("link","ipaddr",i,Link_IPAddr,&config_f); - ConfValue("link","port",i,Link_Port,&config_f); - ConfValue("link","recvpass",i,Link_Pass,&config_f); - ConfValue("link","sendpass",i,Link_SendPass,&config_f); - log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass); - LinkPort = atoi(Link_Port); - if ((!strcasecmp(Link_ServerName,servername)) && (!strcmp(Link_Pass,password))) - { - // we have a matching link line - - // send a 'diminutive' server message back... - snprintf(response,10240,"s %s %s :%s",ServerName,Link_SendPass,ServerDesc); - serv->SendPacket(response,servername); - - for (int t = 0; t < serv->connectors.size(); t++) - { - if (!strcasecmp(serv->connectors[t].GetServerName().c_str(),servername)) - { - serv->connectors[t].SetState(STATE_CONNECTED); - } - } - - return; - } - } - char buffer[MAXBUF]; - sprintf(buffer,"E :Access is denied (no matching link block)"); - serv->SendPacket(buffer,tcp_host); - WriteOpers("CONNECT from %s denied, no matching link block",servername); - RemoveServer(tcp_host); - RemoveServer(servername); - return; - } - else - if (token == 's') { - // S test.chatspike.net password :ChatSpike InspIRCd test server - char* servername = strtok(params," "); - char* password = strtok(NULL," "); - char* serverdesc = finalparam+2; - - // TODO: we should do a check here to ensure that this server is one we recently initiated a - // link with, and didnt hear an 's' or 'E' back from yet (these are the only two valid responses - // to an 'S' command. If we didn't recently send an 'S' to this server, theyre trying to spoof - // a connect, so put out an oper alert! - - // for now, just accept all, we'll fix that later. - WriteOpers("%s accepted our link credentials ",servername); - - char Link_ServerName[1024]; - char Link_IPAddr[1024]; - char Link_Port[1024]; - char Link_Pass[1024]; - char Link_SendPass[1024]; - int LinkPort = 0; - - // search for a corresponding block in the config files - for (int i = 0; i < ConfValueEnum("link",&config_f); i++) - { - ConfValue("link","name",i,Link_ServerName,&config_f); - ConfValue("link","ipaddr",i,Link_IPAddr,&config_f); - ConfValue("link","port",i,Link_Port,&config_f); - ConfValue("link","recvpass",i,Link_Pass,&config_f); - ConfValue("link","sendpass",i,Link_SendPass,&config_f); - log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass); - LinkPort = atoi(Link_Port); - if (!strcasecmp(Link_ServerName,servername)) - { - // matching link at this end too, we're all done! - // at this point we must begin key exchange and insert this - // server into our 'active' table. - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host)) - { - char buffer[MAXBUF]; - me[j]->connectors[k].SetDescription(serverdesc); - me[j]->connectors[k].SetState(STATE_CONNECTED); - sprintf(buffer,"X 0"); - serv->SendPacket(buffer,tcp_host); - DoSync(me[j],tcp_host); - NetSendMyRoutingTable(); - return; - } - } - } - WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right noe! Possible intrusion attempt!",tcp_host); - return; - } - } - else { - log(DEBUG,"Server names '%s' and '%s' don't match",Link_ServerName,servername); - } - } - char buffer[MAXBUF]; - sprintf(buffer,"E :Access is denied (no matching link block)"); - serv->SendPacket(buffer,tcp_host); - WriteOpers("CONNECT from %s denied, no matching link block",servername); - RemoveServer(tcp_host); - RemoveServer(servername); - return; - } - else - if (token == 'U') { - // U services.chatspike.net password :ChatSpike Services - // - // non-meshed link, used by services. Everything coming from a non-meshed link is auto broadcasted. - char* servername = strtok(params," "); - char* password = strtok(NULL," "); - char* serverdesc = finalparam+2; - - char Link_ServerName[1024]; - char Link_IPAddr[1024]; - char Link_Port[1024]; - char Link_Pass[1024]; - char Link_SendPass[1024]; - int LinkPort = 0; - - log(DEBUG,"U-token linked server detected."); - - - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),servername)) - { - char buffer[MAXBUF]; - sprintf(buffer,"E :Access is denied (Server exists in the mesh)"); - serv->SendPacket(buffer,tcp_host); - WriteOpers("CONNECT from %s denied, \"%s\" already exists!",tcp_host,servername); - RemoveServer(tcp_host); - return; - } - } - } - } - - // search for a corresponding block in the config files - for (int i = 0; i < ConfValueEnum("link",&config_f); i++) - { - ConfValue("link","name",i,Link_ServerName,&config_f); - ConfValue("link","ipaddr",i,Link_IPAddr,&config_f); - ConfValue("link","port",i,Link_Port,&config_f); - ConfValue("link","recvpass",i,Link_Pass,&config_f); - ConfValue("link","sendpass",i,Link_SendPass,&config_f); - log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass); - LinkPort = atoi(Link_Port); - if ((!strcasecmp(Link_ServerName,servername)) && (!strcmp(Link_Pass,password))) - { - // matching link at this end too, we're all done! - // at this point we must begin key exchange and insert this - // server into our 'active' table. - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int k = 0; k < me[j]->connectors.size(); k++) - { - if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host)) - { - char buffer[MAXBUF]; - me[j]->connectors[k].SetDescription(serverdesc); - me[j]->connectors[k].SetServerName(servername); - me[j]->connectors[k].SetState(STATE_SERVICES); - sprintf(buffer,"X 0"); - serv->SendPacket(buffer,servername); - sprintf(buffer,"s %s %s %lu :%s",ServerName,Link_SendPass,LinkPort,ServerDesc); - serv->SendPacket(buffer,servername); - DoSync(me[j],servername); - snprintf(buffer,MAXBUF,"H %s",servername); - NetSendToAllExcept(servername,buffer); - WriteOpers("Non-Mesh server %s has joined the network",servername); - log(DEBUG,"******** SENDING MY ROUTING TABLE! *******"); - NetSendMyRoutingTable(); - return; - } - } - } - WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right noe! Possible intrusion attempt!",tcp_host); - return; - } - } - else { - log(DEBUG,"Server names '%s' and '%s' don't match",Link_ServerName,servername); - } - } - char buffer[MAXBUF]; - sprintf(buffer,"E :Access is denied (no matching link block)"); - serv->SendPacket(buffer,tcp_host); - WriteOpers("CONNECT from %s denied, no matching link block",servername); - RemoveServer(tcp_host); - RemoveServer(servername); - return; - } - else - if (token == 'E') { - char* error_message = finalparam+2; - WriteOpers("ERROR from %s: %s",tcp_host,error_message); - return; - } - else { - - serverrec* source_server = NULL; - - for (int j = 0; j < 32; j++) - { - if (me[j] != NULL) - { - for (int x = 0; x < me[j]->connectors.size(); x++) - { - log(DEBUG,"Servers are: '%s' '%s'",tcp_host,me[j]->connectors[x].GetServerName().c_str()); - if (!strcasecmp(me[j]->connectors[x].GetServerName().c_str(),tcp_host)) - { - if ((me[j]->connectors[x].GetState() == STATE_CONNECTED) || (me[j]->connectors[x].GetState() == STATE_SERVICES)) - { - // found a valid ircd_connector. - process_restricted_commands(token,params,me[j],serv,tcp_host,me[j]->connectors[x].GetServerIP(),me[j]->connectors[x].GetServerPort()); - return; - } - } - } - } - } - - log(DEBUG,"Unrecognised token or unauthenticated host in datagram from %s: %c",tcp_host,token); - } -} - -long duration(const char* str) -{ - char n_field[MAXBUF]; - long total = 0; - const char* str_end = str + strlen(str); - n_field[0] = 0; - - for (char* i = (char*)str; i < str_end; i++) - { - // if we have digits, build up a string for the value in n_field, - // up to 10 digits in size. - if ((*i >= '0') && (*i <= '9')) - { - strlcat(n_field,i,10); - } - else - { - // we dont have a digit, check for numeric tokens - switch (tolower(*i)) - { - case 's': - total += atoi(n_field); - break; - - case 'm': - total += (atoi(n_field)*duration_m); - break; - - case 'h': - total += (atoi(n_field)*duration_h); - break; - - case 'd': - total += (atoi(n_field)*duration_d); - break; - - case 'w': - total += (atoi(n_field)*duration_w); - break; - - case 'y': - total += (atoi(n_field)*duration_y); - break; - } - n_field[0] = 0; - } - } - // add trailing seconds - total += atoi(n_field); - - return total; -} - - -void handle_kline(char **parameters, int pcnt, userrec *user) -{ - if (pcnt >= 3) - { - add_kline(duration(parameters[1]),user->nick,parameters[2],parameters[0]); - if (!duration(parameters[1])) - { - WriteOpers("*** %s added permenant K-line for %s.",user->nick,parameters[0]); - } - else - { - WriteOpers("*** %s added timed K-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1])); - } - } - else - { - if (del_kline(parameters[0])) - { - WriteOpers("*** %s Removed K-line on %s.",user->nick,parameters[0]); - } - else - { - WriteServ(user->fd,"NOTICE %s :*** K-Line %s not found in list, try /stats k.",user->nick,parameters[0]); - } - } - apply_lines(); -} - -void handle_eline(char **parameters, int pcnt, userrec *user) -{ - if (pcnt >= 3) - { - add_eline(duration(parameters[1]),user->nick,parameters[2],parameters[0]); - if (!duration(parameters[1])) - { - WriteOpers("*** %s added permenant E-line for %s.",user->nick,parameters[0]); - } - else - { - WriteOpers("*** %s added timed E-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1])); - } - } - else - { - if (del_eline(parameters[0])) - { - WriteOpers("*** %s Removed E-line on %s.",user->nick,parameters[0]); - } - else - { - WriteServ(user->fd,"NOTICE %s :*** E-Line %s not found in list, try /stats e.",user->nick,parameters[0]); - } - } - // no need to apply the lines for an eline -} - -void handle_gline(char **parameters, int pcnt, userrec *user) -{ - char netdata[MAXBUF]; - if (pcnt >= 3) - { - add_gline(duration(parameters[1]),user->nick,parameters[2],parameters[0]); - // # : - snprintf(netdata,MAXBUF,"# %s %s %ld %ld :%s",parameters[0],user->nick,TIME,duration(parameters[1]),parameters[2]); - NetSendToAll(netdata); - if (!duration(parameters[1])) - { - WriteOpers("*** %s added permenant G-line for %s.",user->nick,parameters[0]); - } - else - { - WriteOpers("*** %s added timed G-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1])); - } - } - else - { - if (del_gline(parameters[0])) - { - // . - snprintf(netdata,MAXBUF,". %s %s",parameters[0],user->nick); - WriteOpers("*** %s Removed G-line on %s.",user->nick,parameters[0]); - } - else - { - WriteServ(user->fd,"NOTICE %s :*** G-Line %s not found in list, try /stats g.",user->nick,parameters[0]); - } - } - apply_lines(); -} - -void handle_zline(char **parameters, int pcnt, userrec *user) -{ - if (pcnt >= 3) - { - add_zline(duration(parameters[1]),user->nick,parameters[2],parameters[0]); - if (!duration(parameters[1])) - { - WriteOpers("*** %s added permenant Z-line for %s.",user->nick,parameters[0]); - } - else - { - WriteOpers("*** %s added timed Z-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1])); - } - } - else - { - if (del_zline(parameters[0])) - { - WriteOpers("*** %s Removed Z-line on %s.",user->nick,parameters[0]); - } - else - { - WriteServ(user->fd,"NOTICE %s :*** Z-Line %s not found in list, try /stats Z.",user->nick,parameters[0]); - } - } - apply_lines(); -} - -void handle_qline(char **parameters, int pcnt, userrec *user) -{ - if (pcnt >= 3) - { - add_qline(duration(parameters[1]),user->nick,parameters[2],parameters[0]); - if (!duration(parameters[1])) - { - WriteOpers("*** %s added permenant Q-line for %s.",user->nick,parameters[0]); - } - else - { - WriteOpers("*** %s added timed Q-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1])); - } - } - else - { - if (del_qline(parameters[0])) - { - WriteOpers("*** %s Removed Q-line on %s.",user->nick,parameters[0]); - } - else - { - WriteServ(user->fd,"NOTICE %s :*** Q-Line %s not found in list, try /stats k.",user->nick,parameters[0]); - } - } - apply_lines(); -} - -