#include <errno.h>
#include <deque>
#include <errno.h>
+#include <unistd.h>
+#include <sched.h>
#include "connection.h"
#include "users.h"
#include "servers.h"
#include "modules.h"
#include "dynamic.h"
#include "wildcard.h"
+#include "message.h"
+#include "mode.h"
#ifdef GCC3
#define nspace __gnu_cxx
std::vector<long> auth_cookies;
std::stringstream config_f(stringstream::in | stringstream::out);
-void safedelete(userrec *p)
-{
- if (p)
- {
- log(DEBUG,"deleting %s %s %s %s",p->nick,p->ident,p->dhost,p->fullname);
- log(DEBUG,"safedelete(userrec*): pointer is safe to delete");
- delete p;
- p = NULL;
- }
- else
- {
- log(DEBUG,"safedelete(userrec*): unsafe pointer operation squished");
- }
-}
-
-void safedelete(chanrec *p)
-{
- if (p)
- {
- delete p;
- p = NULL;
- log(DEBUG,"safedelete(chanrec*): pointer is safe to delete");
- }
- else
- {
- log(DEBUG,"safedelete(chanrec*): unsafe pointer operation squished");
- }
-}
-
-
-void tidystring(char* str)
-{
- // strips out double spaces before a : parameter
-
- char temp[MAXBUF];
- bool go_again = true;
-
- if (!str)
- {
- return;
- }
-
- while ((str[0] == ' ') && (strlen(str)>0))
- {
- str++;
- }
-
- while (go_again)
- {
- bool noparse = false;
- int t = 0, a = 0;
- go_again = false;
- while (a < strlen(str))
- {
- if ((a<strlen(str)-1) && (noparse==false))
- {
- if ((str[a] == ' ') && (str[a+1] == ' '))
- {
- log(DEBUG,"Tidied extra space out of string: %s",str);
- go_again = true;
- a++;
- }
- }
-
- if (a<strlen(str)-1)
- {
- if ((str[a] == ' ') && (str[a+1] == ':'))
- {
- noparse = true;
- }
- }
-
- temp[t++] = str[a++];
- }
- temp[t] = '\0';
- strncpy(str,temp,MAXBUF);
- }
-}
-/* chop a string down to 512 characters and preserve linefeed (irc max
- * line length) */
-void chop(char* str)
+long GetRevision()
{
- if (!str)
- {
- log(DEBUG,"ERROR! Null string passed to chop()!");
- return;
- }
- string temp = str;
- FOREACH_MOD OnServerRaw(temp,false);
- const char* str2 = temp.c_str();
- sprintf(str,"%s",str2);
-
-
- if (strlen(str) >= 512)
- {
- str[509] = '\r';
- str[510] = '\n';
- str[511] = '\0';
- }
+ char Revision[] = "$Revision$";
+ char *s1 = Revision;
+ char *savept;
+ char *v1 = strtok_r(s1," ",&savept);
+ s1 = savept;
+ char *v2 = strtok_r(s1," ",&savept);
+ s1 = savept;
+ return (long)(atof(v2)*10000);
}
}
}
-void Blocking(int s)
-{
- int flags;
- log(DEBUG,"Blocking: %d",s);
- flags = fcntl(s, F_GETFL, 0);
- fcntl(s, F_SETFL, flags ^ O_NONBLOCK);
-}
-
-void NonBlocking(int s)
-{
- int flags;
- log(DEBUG,"NonBlocking: %d",s);
- flags = fcntl(s, F_GETFL, 0);
- //fcntl(s, F_SETFL, O_NONBLOCK);
- fcntl(s, F_SETFL, flags | O_NONBLOCK);
-}
-
-
-int CleanAndResolve (char *resolvedHost, const char *unresolvedHost)
-{
- struct hostent *hostPtr = NULL;
- struct in_addr addr;
-
- memset (resolvedHost, '\0',MAXBUF);
- if(unresolvedHost == NULL)
- return(ERROR);
- if ((inet_aton(unresolvedHost,&addr)) == 0)
- return(ERROR);
- hostPtr = gethostbyaddr ((char *)&addr.s_addr,sizeof(addr.s_addr),AF_INET);
- if (hostPtr != NULL)
- snprintf(resolvedHost,MAXBUF,"%s",hostPtr->h_name);
- else
- snprintf(resolvedHost,MAXBUF,"%s",unresolvedHost);
- return (TRUE);
-}
-
/* write formatted text to a socket, in same format as printf */
void Write(int sock,char *text, ...)
}
}
-int c_count(userrec* u)
-{
- int z = 0;
- for (int i =0; i != MAXCHANS; i++)
- if (u->chans[i].channel != NULL)
- z++;
- return z;
-
-}
-
-/* return 0 or 1 depending if users u and u2 share one or more common channels
- * (used by QUIT, NICK etc which arent channel specific notices) */
-int common_channels(userrec *u, userrec *u2)
+std::string GetServerDescription(char* servername)
{
- int i = 0;
- int z = 0;
-
- if ((!u) || (!u2))
- {
- log(DEFAULT,"*** BUG *** common_channels was given an invalid parameter");
- return 0;
- }
- for (int i = 0; i != MAXCHANS; i++)
+ for (int j = 0; j < 32; j++)
{
- for (z = 0; z != MAXCHANS; z++)
+ if (me[j] != NULL)
{
- if ((u->chans[i].channel != NULL) && (u2->chans[z].channel != NULL))
+ for (int k = 0; k < me[j]->connectors.size(); k++)
{
- if ((u->chans[i].channel == u2->chans[z].channel) && (u->chans[i].channel) && (u2->chans[z].channel) && (u->registered == 7) && (u2->registered == 7))
+ if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),servername))
{
- if ((c_count(u)) && (c_count(u2)))
- {
- return 1;
- }
+ return me[j]->connectors[k].GetDescription();
}
}
}
+ return ServerDesc; // not a remote server that can be found, it must be me.
}
- return 0;
}
+
/* write a formatted string to all users who share at least one common
* channel, including the source user e.g. for use in NICK */
}
}
+void NetSendToAllAlive(char* s)
+{
+ char buffer[MAXBUF];
+ snprintf(buffer,MAXBUF,"%s",s);
+
+ log(DEBUG,"NetSendToAllAlive: '%s'",s);
+
+ for (int j = 0; j < 32; j++)
+ {
+ if (me[j] != NULL)
+ {
+ for (int k = 0; k < me[j]->connectors.size(); k++)
+ {
+ if (me[j]->connectors[k].GetState() != STATE_DISCONNECTED)
+ {
+ me[j]->SendPacket(buffer,me[j]->connectors[k].GetServerName().c_str());
+ }
+ else
+ {
+ log(DEBUG,"%s is dead, not sending to it.",me[j]->connectors[k].GetServerName().c_str());
+ }
+ }
+ }
+ }
+}
+
void NetSendToOne(char* target,char* s)
{
}
}
-void NetSendToAllExcept(char* target,char* s)
+void NetSendToAllExcept(const char* target,char* s)
{
char buffer[MAXBUF];
snprintf(buffer,MAXBUF,"%s",s);
}
-bool hasumode(userrec* user, char mode)
-{
- if (user)
- {
- return (strchr(user->modes,mode)>0);
- }
- else return false;
-}
-
void WriteMode(const char* modes, int flags, const char* text, ...)
{
if ((!text) || (!modes) || (!flags))
}
}
-void ChangeName(userrec* user, const char* gecos)
-{
- strncpy(user->fullname,gecos,MAXBUF);
-
- // TODO: replace these with functions:
- // NetSendToAll - to all
- // NetSendToCommon - to all that hold users sharing a common channel with another user
- // NetSendToOne - to one server
- // NetSendToAllExcept - send to all but one
- // all by servername
-
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"a %s :%s",user->nick,gecos);
- NetSendToAll(buffer);
-}
-
-void ChangeDisplayedHost(userrec* user, const char* host)
-{
- strncpy(user->dhost,host,160);
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"b %s :%s",user->nick,host);
- NetSendToAll(buffer);
-}
void WriteWallOps(userrec *source, bool local_only, char* text, ...)
{
}
}
-/* verify that a user's ident and nickname is valid */
-
-int isident(const char* n)
-{
- char v[MAXBUF];
- if (!n)
-
- {
- return 0;
- }
- if (!strcmp(n,""))
- {
- return 0;
- }
- for (int i = 0; i != strlen(n); i++)
- {
- if ((n[i] < 33) || (n[i] > 125))
- {
- return 0;
- }
- /* can't occur ANYWHERE in an Ident! */
- if (strchr("<>,./?:;@'~#=+()*&%$£ \"!",n[i]))
- {
- return 0;
- }
- }
- return 1;
-}
-
-int isnick(const char* n)
-{
- int i = 0;
- char v[MAXBUF];
- if (!n)
- {
- return 0;
- }
- if (!strcmp(n,""))
- {
- return 0;
- }
- if (strlen(n) > NICKMAX-1)
- {
- return 0;
- }
- for (int i = 0; i != strlen(n); i++)
- {
- if ((n[i] < 33) || (n[i] > 125))
- {
- return 0;
- }
- /* can't occur ANYWHERE in a nickname! */
- if (strchr("<>,./?:;@'~#=+()*&%$£ \"!",n[i]))
- {
- return 0;
- }
- /* can't occur as the first char of a nickname... */
- if ((strchr("0123456789",n[i])) && (!i))
- {
- return 0;
- }
- }
- return 1;
-}
/* Find a user record by nickname and return a pointer to it */
log(DEBUG,"completed channel purge, killed %d",purge);
}
-/* returns the status character for a given user on a channel, e.g. @ for op,
- * % for halfop etc. If the user has several modes set, the highest mode
- * the user has must be returned. */
-
-char* cmode(userrec *user, chanrec *chan)
-{
- if ((!user) || (!chan))
- {
- log(DEFAULT,"*** BUG *** cmode was given an invalid parameter");
- return "";
- }
-
- int i;
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((user->chans[i].channel == chan) && (chan != NULL))
- {
- if ((user->chans[i].uc_modes & UCMODE_OP) > 0)
- {
- return "@";
- }
- if ((user->chans[i].uc_modes & UCMODE_HOP) > 0)
- {
- return "%";
- }
- if ((user->chans[i].uc_modes & UCMODE_VOICE) > 0)
- {
- return "+";
- }
- return "";
- }
- }
-}
char scratch[MAXBUF];
char sparam[MAXBUF];
return scratch;
}
-/* returns the status value for a given user on a channel, e.g. STATUS_OP for
- * op, STATUS_VOICE for voice etc. If the user has several modes set, the
- * highest mode the user has must be returned. */
-
-int cstatus(userrec *user, chanrec *chan)
-{
- if ((!chan) || (!user))
- {
- log(DEFAULT,"*** BUG *** cstatus was given an invalid parameter");
- return 0;
- }
-
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((user->chans[i].channel == chan) && (chan != NULL))
- {
- if ((user->chans[i].uc_modes & UCMODE_OP) > 0)
- {
- return STATUS_OP;
- }
- if ((user->chans[i].uc_modes & UCMODE_HOP) > 0)
- {
- return STATUS_HOP;
- }
- if ((user->chans[i].uc_modes & UCMODE_VOICE) > 0)
- {
- return STATUS_VOICE;
- }
- return STATUS_NORMAL;
- }
- }
-}
-
/* compile a userlist of a channel into a string, each nick seperated by
* spaces and op, voice etc status shown as @ and + */
}
-/* returns 1 if user u has channel c in their record, 0 if not */
-int has_channel(userrec *u, chanrec *c)
+
+/* This function pokes and hacks at a parameter list like the following:
+ *
+ * PART #winbot, #darkgalaxy :m00!
+ *
+ * to turn it into a series of individual calls like this:
+ *
+ * PART #winbot :m00!
+ * PART #darkgalaxy :m00!
+ *
+ * The seperate calls are sent to a callback function provided by the caller
+ * (the caller will usually call itself recursively). The callback function
+ * must be a command handler. Calling this function on a line with no list causes
+ * no action to be taken. You must provide a starting and ending parameter number
+ * where the range of the list can be found, useful if you have a terminating
+ * parameter as above which is actually not part of the list, or parameters
+ * before the actual list as well. This code is used by many functions which
+ * can function as "one to list" (see the RFC) */
+
+int loop_call(handlerfunc fn, char **parameters, int pcnt, userrec *u, int start, int end, int joins)
{
- if ((!u) || (!c))
+ char plist[MAXBUF];
+ char *param;
+ char *pars[32];
+ char blog[32][MAXBUF];
+ char blog2[32][MAXBUF];
+ int i = 0, j = 0, q = 0, total = 0, t = 0, t2 = 0, total2 = 0;
+ char keystr[MAXBUF];
+ char moo[MAXBUF];
+
+ for (int i = 0; i <32; i++)
+ strcpy(blog[i],"");
+
+ for (int i = 0; i <32; i++)
+ strcpy(blog2[i],"");
+
+ strcpy(moo,"");
+ for (int i = 0; i <10; i++)
{
- log(DEFAULT,"*** BUG *** has_channel was given an invalid parameter");
- return 0;
+ if (!parameters[i])
+ {
+ parameters[i] = moo;
+ }
}
- for (int i =0; i != MAXCHANS; i++)
+ if (joins)
{
- if (u->chans[i].channel == c)
+ if (pcnt > 1) /* we have a key to copy */
{
- return 1;
+ strcpy(keystr,parameters[1]);
}
}
- return 0;
-}
-int give_ops(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
+ if (!parameters[start])
{
- log(DEFAULT,"*** BUG *** give_ops was given an invalid parameter");
return 0;
}
- if (status < STATUS_OP)
+ if (!strchr(parameters[start],','))
{
- log(DEBUG,"%s cant give ops to %s because they nave status %d and needs %d",user->nick,dest,status,STATUS_OP);
- WriteServ(user->fd,"482 %s %s :You're not a channel operator",user->nick, chan->name);
return 0;
}
- else
+ strcpy(plist,"");
+ for (int i = start; i <= end; i++)
{
- if (!isnick(dest))
- {
- log(DEFAULT,"the target nickname given to give_ops was invalid");
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- d = Find(dest);
- if (!d)
+ if (parameters[i])
{
- log(DEFAULT,"the target nickname given to give_ops couldnt be found");
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if (d->chans[i].uc_modes & UCMODE_OP)
- {
- /* mode already set on user, dont allow multiple */
- log(DEFAULT,"The target user given to give_ops was already opped on the channel");
- return 0;
- }
- d->chans[i].uc_modes = d->chans[i].uc_modes | UCMODE_OP;
- log(DEBUG,"gave ops: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- log(DEFAULT,"The target channel given to give_ops was not in the users mode list");
- }
- }
- return 1;
-}
-
-int give_hops(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
- {
- log(DEFAULT,"*** BUG *** give_hops was given an invalid parameter");
- return 0;
- }
- if (status != STATUS_OP)
- {
- WriteServ(user->fd,"482 %s %s :You're not a channel operator",user->nick, chan->name);
- return 0;
- }
- else
- {
- d = Find(dest);
- if (!isnick(dest))
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- if (!d)
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if (d->chans[i].uc_modes & UCMODE_HOP)
- {
- /* mode already set on user, dont allow multiple */
- return 0;
- }
- d->chans[i].uc_modes = d->chans[i].uc_modes | UCMODE_HOP;
- log(DEBUG,"gave h-ops: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- }
- }
- return 1;
-}
-
-int give_voice(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
- {
- log(DEFAULT,"*** BUG *** give_voice was given an invalid parameter");
- return 0;
- }
- if (status < STATUS_HOP)
- {
- WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, chan->name);
- return 0;
- }
- else
- {
- d = Find(dest);
- if (!isnick(dest))
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- if (!d)
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if (d->chans[i].uc_modes & UCMODE_VOICE)
- {
- /* mode already set on user, dont allow multiple */
- return 0;
- }
- d->chans[i].uc_modes = d->chans[i].uc_modes | UCMODE_VOICE;
- log(DEBUG,"gave voice: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- }
- }
- return 1;
-}
-
-int take_ops(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
- {
- log(DEFAULT,"*** BUG *** take_ops was given an invalid parameter");
- return 0;
- }
- if (status < STATUS_OP)
- {
- log(DEBUG,"%s cant give ops to %s because they have status %d and needs %d",user->nick,dest,status,STATUS_OP);
- WriteServ(user->fd,"482 %s %s :You're not a channel operator",user->nick, chan->name);
- return 0;
- }
- else
- {
- d = Find(dest);
- if (!isnick(dest))
- {
- log(DEBUG,"take_ops was given an invalid target nickname of %s",dest);
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- if (!d)
- {
- log(DEBUG,"take_ops couldnt resolve the target nickname: %s",dest);
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if ((d->chans[i].uc_modes & UCMODE_OP) == 0)
- {
- /* mode already set on user, dont allow multiple */
- return 0;
- }
- d->chans[i].uc_modes ^= UCMODE_OP;
- log(DEBUG,"took ops: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- log(DEBUG,"take_ops couldnt locate the target channel in the target users list");
- }
- }
- return 1;
-}
-
-int take_hops(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
- {
- log(DEFAULT,"*** BUG *** take_hops was given an invalid parameter");
- return 0;
- }
- if (status != STATUS_OP)
- {
- WriteServ(user->fd,"482 %s %s :You're not a channel operator",user->nick, chan->name);
- return 0;
- }
- else
- {
- d = Find(dest);
- if (!isnick(dest))
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- if (!d)
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if ((d->chans[i].uc_modes & UCMODE_HOP) == 0)
- {
- /* mode already set on user, dont allow multiple */
- return 0;
- }
- d->chans[i].uc_modes ^= UCMODE_HOP;
- log(DEBUG,"took h-ops: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- }
- }
- return 1;
-}
-
-int take_voice(userrec *user,char *dest,chanrec *chan,int status)
-{
- userrec *d;
- int i;
-
- if ((!user) || (!dest) || (!chan))
- {
- log(DEFAULT,"*** BUG *** take_voice was given an invalid parameter");
- return 0;
- }
- if (status < STATUS_HOP)
- {
- WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, chan->name);
- return 0;
- }
- else
- {
- d = Find(dest);
- if (!isnick(dest))
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- if (!d)
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, dest);
- return 0;
- }
- else
- {
- for (int i = 0; i != MAXCHANS; i++)
- {
- if ((d->chans[i].channel != NULL) && (chan != NULL))
- if (!strcasecmp(d->chans[i].channel->name,chan->name))
- {
- if ((d->chans[i].uc_modes & UCMODE_VOICE) == 0)
- {
- /* mode already set on user, dont allow multiple */
- return 0;
- }
- d->chans[i].uc_modes ^= UCMODE_VOICE;
- log(DEBUG,"took voice: %s %s",d->chans[i].channel->name,d->nick);
- return 1;
- }
- }
- }
- }
- return 1;
-}
-
-void TidyBan(char *ban)
-{
- if (!ban) {
- log(DEFAULT,"*** BUG *** TidyBan was given an invalid parameter");
- return;
- }
-
- char temp[MAXBUF],NICK[MAXBUF],IDENT[MAXBUF],HOST[MAXBUF];
-
- strcpy(temp,ban);
-
- char* pos_of_pling = strchr(temp,'!');
- char* pos_of_at = strchr(temp,'@');
-
- pos_of_pling[0] = '\0';
- pos_of_at[0] = '\0';
- pos_of_pling++;
- pos_of_at++;
-
- strncpy(NICK,temp,NICKMAX);
- strncpy(IDENT,pos_of_pling,IDENTMAX+1);
- strncpy(HOST,pos_of_at,160);
-
- sprintf(ban,"%s!%s@%s",NICK,IDENT,HOST);
-}
-
-int add_ban(userrec *user,char *dest,chanrec *chan,int status)
-{
- if ((!user) || (!dest) || (!chan)) {
- log(DEFAULT,"*** BUG *** add_ban was given an invalid parameter");
- return 0;
- }
-
- BanItem b;
- if ((!user) || (!dest) || (!chan))
- return 0;
- if (strchr(dest,'!')==0)
- return 0;
- if (strchr(dest,'@')==0)
- return 0;
- for (int i = 0; i < strlen(dest); i++)
- if (dest[i] < 32)
- return 0;
- for (int i = 0; i < strlen(dest); i++)
- if (dest[i] > 126)
- return 0;
- int c = 0;
- for (int i = 0; i < strlen(dest); i++)
- if (dest[i] == '!')
- c++;
- if (c>1)
- return 0;
- c = 0;
- for (int i = 0; i < strlen(dest); i++)
- if (dest[i] == '@')
- c++;
- if (c>1)
- return 0;
- log(DEBUG,"add_ban: %s %s",chan->name,user->nick);
-
- TidyBan(dest);
- for (BanList::iterator i = chan->bans.begin(); i != chan->bans.end(); i++)
- {
- if (!strcasecmp(i->data,dest))
- {
- // dont allow a user to set the same ban twice
- return 0;
- }
- }
-
- b.set_time = time(NULL);
- strncpy(b.data,dest,MAXBUF);
- strncpy(b.set_by,user->nick,NICKMAX);
- chan->bans.push_back(b);
- return 1;
-}
-
-int take_ban(userrec *user,char *dest,chanrec *chan,int status)
-{
- if ((!user) || (!dest) || (!chan)) {
- log(DEFAULT,"*** BUG *** take_ban was given an invalid parameter");
- return 0;
- }
-
- log(DEBUG,"del_ban: %s %s",chan->name,user->nick);
- for (BanList::iterator i = chan->bans.begin(); i != chan->bans.end(); i++)
- {
- if (!strcasecmp(i->data,dest))
- {
- chan->bans.erase(i);
- return 1;
- }
- }
- return 0;
-}
-
-void process_modes(char **parameters,userrec* user,chanrec *chan,int status, int pcnt, bool servermode, bool silent, bool local)
-{
- if (!parameters) {
- log(DEFAULT,"*** BUG *** process_modes was given an invalid parameter");
- return;
- }
-
- char modelist[MAXBUF];
- char outlist[MAXBUF];
- char outstr[MAXBUF];
- char outpars[32][MAXBUF];
- int param = 2;
- int pc = 0;
- int ptr = 0;
- int mdir = 1;
- int r = 0;
- bool k_set = false, l_set = false;
-
- if (pcnt < 2)
- {
- return;
- }
-
- log(DEBUG,"process_modes: start: parameters=%d",pcnt);
-
- strcpy(modelist,parameters[1]); /* mode list, e.g. +oo-o */
- /* parameters[2] onwards are parameters for
- * modes that require them :) */
- strcpy(outlist,"+");
- mdir = 1;
-
- log(DEBUG,"process_modes: modelist: %s",modelist);
-
- for (ptr = 0; ptr < strlen(modelist); ptr++)
- {
- r = 0;
-
- {
- log(DEBUG,"process_modes: modechar: %c",modelist[ptr]);
- char modechar = modelist[ptr];
- switch (modelist[ptr])
- {
- case '-':
- if (mdir != 0)
- {
- if ((outlist[strlen(outlist)-1] == '+') || (outlist[strlen(outlist)-1] == '-'))
- {
- outlist[strlen(outlist)-1] = '-';
- }
- else
- {
- strcat(outlist,"-");
- }
- }
- mdir = 0;
-
- break;
-
- case '+':
- if (mdir != 1)
- {
- if ((outlist[strlen(outlist)-1] == '+') || (outlist[strlen(outlist)-1] == '-'))
- {
- outlist[strlen(outlist)-1] = '+';
- }
- else
- {
- strcat(outlist,"+");
- }
- }
- mdir = 1;
- break;
-
- case 'o':
- log(DEBUG,"Ops");
- if ((param >= pcnt)) break;
- log(DEBUG,"Enough parameters left");
- if (mdir == 1)
- {
- log(DEBUG,"calling give_ops");
- r = give_ops(user,parameters[param++],chan,status);
- }
- else
- {
- log(DEBUG,"calling take_ops");
- r = take_ops(user,parameters[param++],chan,status);
- }
- if (r)
- {
- strcat(outlist,"o");
- strcpy(outpars[pc++],parameters[param-1]);
- }
- break;
-
- case 'h':
- if ((param >= pcnt)) break;
- if (mdir == 1)
- {
- r = give_hops(user,parameters[param++],chan,status);
- }
- else
- {
- r = take_hops(user,parameters[param++],chan,status);
- }
- if (r)
- {
- strcat(outlist,"h");
- strcpy(outpars[pc++],parameters[param-1]);
- }
- break;
-
-
- case 'v':
- if ((param >= pcnt)) break;
- if (mdir == 1)
- {
- r = give_voice(user,parameters[param++],chan,status);
- }
- else
- {
- r = take_voice(user,parameters[param++],chan,status);
- }
- if (r)
- {
- strcat(outlist,"v");
- strcpy(outpars[pc++],parameters[param-1]);
- }
- break;
-
- case 'b':
- if ((param >= pcnt)) break;
- if (mdir == 1)
- {
- r = add_ban(user,parameters[param++],chan,status);
- }
- else
- {
- r = take_ban(user,parameters[param++],chan,status);
- }
- if (r)
- {
- strcat(outlist,"b");
- strcpy(outpars[pc++],parameters[param-1]);
- }
- break;
-
-
- case 'k':
- if ((param >= pcnt))
- break;
-
- if (mdir == 1)
- {
- if (k_set)
- break;
-
- if (!strcmp(chan->key,""))
- {
- strcat(outlist,"k");
- char key[MAXBUF];
- strcpy(key,parameters[param++]);
- if (strlen(key)>32) {
- key[31] = '\0';
- }
- strcpy(outpars[pc++],key);
- strcpy(chan->key,key);
- k_set = true;
- }
- }
- else
- {
- /* checks on -k are case sensitive and only accurate to the
- first 32 characters */
- char key[MAXBUF];
- strcpy(key,parameters[param++]);
- if (strlen(key)>32) {
- key[31] = '\0';
- }
- /* only allow -k if correct key given */
- if (!strcmp(chan->key,key))
- {
- strcat(outlist,"k");
- strcpy(chan->key,"");
- strcpy(outpars[pc++],key);
- }
- }
- break;
-
- case 'l':
- if (mdir == 0)
- {
- if (chan->limit)
- {
- strcat(outlist,"l");
- chan->limit = 0;
- }
- }
-
- if ((param >= pcnt)) break;
- if (mdir == 1)
- {
- if (l_set)
- break;
-
- bool invalid = false;
- for (int i = 0; i < strlen(parameters[param]); i++)
- {
- if ((parameters[param][i] < '0') || (parameters[param][i] > '9'))
- {
- invalid = true;
- }
- }
- if (atoi(parameters[param]) < 1)
- {
- invalid = true;
- }
-
- if (invalid)
- break;
-
- chan->limit = atoi(parameters[param]);
- if (chan->limit)
- {
- strcat(outlist,"l");
- strcpy(outpars[pc++],parameters[param++]);
- l_set = true;
- }
- }
- break;
-
- case 'i':
- if (chan->inviteonly != mdir)
- {
- strcat(outlist,"i");
- }
- chan->inviteonly = mdir;
- break;
-
- case 't':
- if (chan->topiclock != mdir)
- {
- strcat(outlist,"t");
- }
- chan->topiclock = mdir;
- break;
-
- case 'n':
- if (chan->noexternal != mdir)
- {
- strcat(outlist,"n");
- }
- chan->noexternal = mdir;
- break;
-
- case 'm':
- if (chan->moderated != mdir)
- {
- strcat(outlist,"m");
- }
- chan->moderated = mdir;
- break;
-
- case 's':
- if (chan->secret != mdir)
- {
- strcat(outlist,"s");
- if (chan->c_private)
- {
- chan->c_private = 0;
- if (mdir)
- {
- strcat(outlist,"-p+");
- }
- else
- {
- strcat(outlist,"+p-");
- }
- }
- }
- chan->secret = mdir;
- break;
-
- case 'p':
- if (chan->c_private != mdir)
- {
- strcat(outlist,"p");
- if (chan->secret)
- {
- chan->secret = 0;
- if (mdir)
- {
- strcat(outlist,"-s+");
- }
- else
- {
- strcat(outlist,"+s-");
- }
- }
- }
- chan->c_private = mdir;
- break;
-
- default:
- log(DEBUG,"Preprocessing custom mode %c",modechar);
- string_list p;
- p.clear();
- if (((!strchr(chan->custom_modes,modechar)) && (!mdir)) || ((strchr(chan->custom_modes,modechar)) && (mdir)))
- {
- log(DEBUG,"Mode %c isnt set on %s but trying to remove!",modechar,chan->name);
- break;
- }
- if (ModeDefined(modechar,MT_CHANNEL))
- {
- log(DEBUG,"A module has claimed this mode");
- if (param<pcnt)
- {
- if ((ModeDefinedOn(modechar,MT_CHANNEL)>0) && (mdir))
- {
- p.push_back(parameters[param]);
- }
- if ((ModeDefinedOff(modechar,MT_CHANNEL)>0) && (!mdir))
- {
- p.push_back(parameters[param]);
- }
- }
- bool handled = false;
- if (param>=pcnt)
- {
- log(DEBUG,"Not enough parameters for module-mode %c",modechar);
- // we're supposed to have a parameter, but none was given... so dont handle the mode.
- if (((ModeDefinedOn(modechar,MT_CHANNEL)>0) && (mdir)) || ((ModeDefinedOff(modechar,MT_CHANNEL)>0) && (!mdir)))
- {
- handled = true;
- param++;
- }
- }
- for (int i = 0; i <= MODCOUNT; i++)
- {
- if (!handled)
- {
- if (modules[i]->OnExtendedMode(user,chan,modechar,MT_CHANNEL,mdir,p))
- {
- log(DEBUG,"OnExtendedMode returned nonzero for a module");
- char app[] = {modechar, 0};
- if (ptr>0)
- {
- if ((modelist[ptr-1] == '+') || (modelist[ptr-1] == '-'))
- {
- strcat(outlist, app);
- }
- else if (!strchr(outlist,modechar))
- {
- strcat(outlist, app);
- }
- }
- chan->SetCustomMode(modechar,mdir);
- // include parameters in output if mode has them
- if ((ModeDefinedOn(modechar,MT_CHANNEL)>0) && (mdir))
- {
- chan->SetCustomModeParam(modelist[ptr],parameters[param],mdir);
- strcpy(outpars[pc++],parameters[param++]);
- }
- // break, because only one module can handle the mode.
- handled = true;
- }
- }
- }
- }
- break;
-
- }
- }
- }
-
- /* this ensures only the *valid* modes are sent out onto the network */
- while ((outlist[strlen(outlist)-1] == '-') || (outlist[strlen(outlist)-1] == '+'))
- {
- outlist[strlen(outlist)-1] = '\0';
- }
- if (strcmp(outlist,""))
- {
- strcpy(outstr,outlist);
- for (ptr = 0; ptr < pc; ptr++)
- {
- strcat(outstr," ");
- strcat(outstr,outpars[ptr]);
- }
- if (local)
- {
- log(DEBUG,"Local mode change");
- WriteChannelLocal(chan, user, "MODE %s %s",chan->name,outstr);
- }
- else
- {
- if (servermode)
- {
- if (!silent)
- {
- WriteChannelWithServ(ServerName,chan,user,"MODE %s %s",chan->name,outstr);
- // M token for a usermode must go to all servers
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"M %s %s",chan->name, outstr);
- NetSendToAll(buffer);
- }
-
- }
- else
- {
- if (!silent)
- {
- WriteChannel(chan,user,"MODE %s %s",chan->name,outstr);
- // M token for a usermode must go to all servers
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"m %s %s %s",user->nick,chan->name, outstr);
- NetSendToAll(buffer);
- }
- }
- }
- }
-}
-
-// based on sourcemodes, return true or false to determine if umode is a valid mode a user may set on themselves or others.
-
-bool allowed_umode(char umode, char* sourcemodes,bool adding)
-{
- log(DEBUG,"Allowed_umode: %c %s",umode,sourcemodes);
- // RFC1459 specified modes
- if ((umode == 'w') || (umode == 's') || (umode == 'i'))
- {
- log(DEBUG,"umode %c allowed by RFC1459 scemantics",umode);
- return true;
- }
-
- // user may not +o themselves or others, but an oper may de-oper other opers or themselves
- if ((strchr(sourcemodes,'o')) && (!adding))
- {
- log(DEBUG,"umode %c allowed by RFC1459 scemantics",umode);
- return true;
- }
- else if (umode == 'o')
- {
- log(DEBUG,"umode %c allowed by RFC1459 scemantics",umode);
- return false;
- }
-
- // process any module-defined modes that need oper
- if ((ModeDefinedOper(umode,MT_CLIENT)) && (strchr(sourcemodes,'o')))
- {
- log(DEBUG,"umode %c allowed by module handler (oper only mode)",umode);
- return true;
- }
- else
- if (ModeDefined(umode,MT_CLIENT))
- {
- // process any module-defined modes that don't need oper
- log(DEBUG,"umode %c allowed by module handler (non-oper mode)",umode);
- if ((ModeDefinedOper(umode,MT_CLIENT)) && (!strchr(sourcemodes,'o')))
- {
- // no, this mode needs oper, and this user 'aint got what it takes!
- return false;
- }
- return true;
- }
-
- // anything else - return false.
- log(DEBUG,"umode %c not known by any ruleset",umode);
- return false;
-}
-
-bool process_module_umode(char umode, userrec* source, void* dest, bool adding)
-{
- userrec* s2;
- bool faked = false;
- if (!source)
- {
- s2 = new userrec;
- strncpy(s2->nick,ServerName,NICKMAX);
- strcpy(s2->modes,"o");
- s2->fd = -1;
- source = s2;
- faked = true;
- }
- string_list p;
- p.clear();
- if (ModeDefined(umode,MT_CLIENT))
- {
- for (int i = 0; i <= MODCOUNT; i++)
- {
- if (modules[i]->OnExtendedMode(source,(void*)dest,umode,MT_CLIENT,adding,p))
- {
- log(DEBUG,"Module claims umode %c",umode);
- return true;
- }
- }
- log(DEBUG,"No module claims umode %c",umode);
- if (faked)
- {
- delete s2;
- source = NULL;
- }
- return false;
- }
- else
- {
- log(DEBUG,"*** BUG *** Non-module umode passed to process_module_umode!");
- if (faked)
- {
- delete s2;
- source = NULL;
- }
- return false;
- }
-}
-
-void handle_mode(char **parameters, int pcnt, userrec *user)
-{
- chanrec* Ptr;
- userrec* dest;
- int can_change,i;
- int direction = 1;
- char outpars[MAXBUF];
-
- dest = Find(parameters[0]);
-
- if (!user)
- {
- return;
- }
-
- if ((dest) && (pcnt == 1))
- {
- WriteServ(user->fd,"221 %s :+%s",user->nick,user->modes);
- return;
- }
-
- if ((dest) && (pcnt > 1))
- {
- char dmodes[MAXBUF];
- strncpy(dmodes,dest->modes,MAXBUF);
- log(DEBUG,"pulled up dest user modes: %s",dmodes);
-
- can_change = 0;
- if (user != dest)
- {
- if (strchr(user->modes,'o'))
- {
- can_change = 1;
- }
- }
- else
- {
- can_change = 1;
- }
- if (!can_change)
- {
- WriteServ(user->fd,"482 %s :Can't change mode for other users",user->nick);
- return;
- }
-
- strcpy(outpars,"+");
- direction = 1;
-
- if ((parameters[1][0] != '+') && (parameters[1][0] != '-'))
- return;
-
- for (int i = 0; i < strlen(parameters[1]); i++)
- {
- if (parameters[1][i] == '+')
- {
- if (direction != 1)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '+';
- }
- else
- {
- strcat(outpars,"+");
- }
- }
- direction = 1;
- }
- else
- if (parameters[1][i] == '-')
- {
- if (direction != 0)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '-';
- }
- else
- {
- strcat(outpars,"-");
- }
- }
- direction = 0;
- }
- else
- {
- can_change = 0;
- if (strchr(user->modes,'o'))
- {
- can_change = 1;
- }
- else
- {
- if ((parameters[1][i] == 'i') || (parameters[1][i] == 'w') || (parameters[1][i] == 's') || (allowed_umode(parameters[1][i],user->modes,direction)))
- {
- can_change = 1;
- }
- }
- if (can_change)
- {
- if (direction == 1)
- {
- if ((!strchr(dmodes,parameters[1][i])) && (allowed_umode(parameters[1][i],user->modes,true)))
- {
- char umode = parameters[1][i];
- if ((process_module_umode(umode, user, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- dmodes[strlen(dmodes)+1]='\0';
- dmodes[strlen(dmodes)] = parameters[1][i];
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
- }
- }
- }
- else
- {
- if ((allowed_umode(parameters[1][i],user->modes,false)) && (strchr(dmodes,parameters[1][i])))
- {
- char umode = parameters[1][i];
- if ((process_module_umode(umode, user, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- int q = 0;
- char temp[MAXBUF];
- char moo[MAXBUF];
-
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
-
- strcpy(temp,"");
- for (q = 0; q < strlen(dmodes); q++)
- {
- if (dmodes[q] != parameters[1][i])
- {
- moo[0] = dmodes[q];
- moo[1] = '\0';
- strcat(temp,moo);
- }
- }
- strcpy(dmodes,temp);
- }
- }
- }
- }
- }
- }
- if (strlen(outpars))
- {
- char b[MAXBUF];
- strcpy(b,"");
- int z = 0;
- int i = 0;
- while (i < strlen (outpars))
- {
- b[z++] = outpars[i++];
- b[z] = '\0';
- if (i<strlen(outpars)-1)
- {
- if (((outpars[i] == '-') || (outpars[i] == '+')) && ((outpars[i+1] == '-') || (outpars[i+1] == '+')))
- {
- // someones playing silly buggers and trying
- // to put a +- or -+ into the line...
- i++;
- }
- }
- if (i == strlen(outpars)-1)
- {
- if ((outpars[i] == '-') || (outpars[i] == '+'))
- {
- i++;
- }
- }
- }
-
- z = strlen(b)-1;
- if ((b[z] == '-') || (b[z] == '+'))
- b[z] == '\0';
-
- if ((!strcmp(b,"+")) || (!strcmp(b,"-")))
- return;
-
- WriteTo(user, dest, "MODE %s :%s", dest->nick, b);
-
- // M token for a usermode must go to all servers
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"m %s %s %s",user->nick, dest->nick, b);
- NetSendToAll(buffer);
-
- if (strlen(dmodes)>MAXMODES)
- {
- dmodes[MAXMODES-1] = '\0';
- }
- log(DEBUG,"Stripped mode line");
- log(DEBUG,"Line dest is now %s",dmodes);
- strncpy(dest->modes,dmodes,MAXMODES);
-
- }
-
- return;
- }
-
- Ptr = FindChan(parameters[0]);
- if (Ptr)
- {
- if (pcnt == 1)
- {
- /* just /modes #channel */
- WriteServ(user->fd,"324 %s %s +%s",user->nick, Ptr->name, chanmodes(Ptr));
- WriteServ(user->fd,"329 %s %s %d", user->nick, Ptr->name, Ptr->created);
- return;
- }
- else
- if (pcnt == 2)
- {
- if ((!strcmp(parameters[1],"+b")) || (!strcmp(parameters[1],"b")))
- {
-
- for (BanList::iterator i = Ptr->bans.begin(); i != Ptr->bans.end(); i++)
- {
- WriteServ(user->fd,"367 %s %s %s %s %d",user->nick, Ptr->name, i->data, i->set_by, i->set_time);
- }
- WriteServ(user->fd,"368 %s %s :End of channel ban list",user->nick, Ptr->name);
- return;
- }
- }
-
- if ((cstatus(user,Ptr) < STATUS_HOP) && (Ptr))
- {
- WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, Ptr->name);
- return;
- }
-
- process_modes(parameters,user,Ptr,cstatus(user,Ptr),pcnt,false,false,false);
- }
- else
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
- }
-}
-
-
-
-
-void server_mode(char **parameters, int pcnt, userrec *user)
-{
- chanrec* Ptr;
- userrec* dest;
- int can_change,i;
- int direction = 1;
- char outpars[MAXBUF];
-
- dest = Find(parameters[0]);
-
- // fix: ChroNiCk found this - we cant use this as debug if its null!
- if (dest)
- {
- log(DEBUG,"server_mode on %s",dest->nick);
- }
-
- if ((dest) && (pcnt > 1))
- {
- log(DEBUG,"params > 1");
-
- char dmodes[MAXBUF];
- strncpy(dmodes,dest->modes,MAXBUF);
-
- strcpy(outpars,"+");
- direction = 1;
-
- if ((parameters[1][0] != '+') && (parameters[1][0] != '-'))
- return;
-
- for (int i = 0; i < strlen(parameters[1]); i++)
- {
- if (parameters[1][i] == '+')
- {
- if (direction != 1)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '+';
- }
- else
- {
- strcat(outpars,"+");
- }
- }
- direction = 1;
- }
- else
- if (parameters[1][i] == '-')
- {
- if (direction != 0)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '-';
- }
- else
- {
- strcat(outpars,"-");
- }
- }
- direction = 0;
- }
- else
- {
- log(DEBUG,"begin mode processing entry");
- can_change = 1;
- if (can_change)
- {
- if (direction == 1)
- {
- log(DEBUG,"umode %c being added",parameters[1][i]);
- if ((!strchr(dmodes,parameters[1][i])) && (allowed_umode(parameters[1][i],user->modes,true)))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, user, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- dmodes[strlen(dmodes)+1]='\0';
- dmodes[strlen(dmodes)] = parameters[1][i];
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
- }
- }
- }
- else
- {
- // can only remove a mode they already have
- log(DEBUG,"umode %c being removed",parameters[1][i]);
- if ((allowed_umode(parameters[1][i],user->modes,false)) && (strchr(dmodes,parameters[1][i])))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, user, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- int q = 0;
- char temp[MAXBUF];
- char moo[MAXBUF];
-
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
-
- strcpy(temp,"");
- for (q = 0; q < strlen(dmodes); q++)
- {
- if (dmodes[q] != parameters[1][i])
- {
- moo[0] = dmodes[q];
- moo[1] = '\0';
- strcat(temp,moo);
- }
- }
- strcpy(dmodes,temp);
- }
- }
- }
- }
- }
- }
- if (strlen(outpars))
- {
- char b[MAXBUF];
- strcpy(b,"");
- int z = 0;
- int i = 0;
- while (i < strlen (outpars))
- {
- b[z++] = outpars[i++];
- b[z] = '\0';
- if (i<strlen(outpars)-1)
- {
- if (((outpars[i] == '-') || (outpars[i] == '+')) && ((outpars[i+1] == '-') || (outpars[i+1] == '+')))
- {
- // someones playing silly buggers and trying
- // to put a +- or -+ into the line...
- i++;
- }
- }
- if (i == strlen(outpars)-1)
- {
- if ((outpars[i] == '-') || (outpars[i] == '+'))
- {
- i++;
- }
- }
- }
-
- z = strlen(b)-1;
- if ((b[z] == '-') || (b[z] == '+'))
- b[z] == '\0';
-
- if ((!strcmp(b,"+")) || (!strcmp(b,"-")))
- return;
-
- WriteTo(user, dest, "MODE %s :%s", dest->nick, b);
-
- // M token for a usermode must go to all servers
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"m %s %s %s",user->nick, dest->nick, b);
- NetSendToAll(buffer);
-
- if (strlen(dmodes)>MAXMODES)
- {
- dmodes[MAXMODES-1] = '\0';
- }
- log(DEBUG,"Stripped mode line");
- log(DEBUG,"Line dest is now %s",dmodes);
- strncpy(dest->modes,dmodes,MAXMODES);
-
- }
-
- return;
- }
-
- Ptr = FindChan(parameters[0]);
- if (Ptr)
- {
- process_modes(parameters,user,Ptr,STATUS_OP,pcnt,true,false,false);
- }
- else
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
- }
-}
-
-
-
-void merge_mode(char **parameters, int pcnt)
-{
- chanrec* Ptr;
- userrec* dest;
- int can_change,i;
- int direction = 1;
- char outpars[MAXBUF];
-
- dest = Find(parameters[0]);
-
- // fix: ChroNiCk found this - we cant use this as debug if its null!
- if (dest)
- {
- log(DEBUG,"merge_mode on %s",dest->nick);
- }
-
- if ((dest) && (pcnt > 1))
- {
- log(DEBUG,"params > 1");
-
- char dmodes[MAXBUF];
- strncpy(dmodes,dest->modes,MAXBUF);
-
- strcpy(outpars,"+");
- direction = 1;
-
- if ((parameters[1][0] != '+') && (parameters[1][0] != '-'))
- return;
-
- for (int i = 0; i < strlen(parameters[1]); i++)
- {
- if (parameters[1][i] == '+')
- {
- if (direction != 1)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '+';
- }
- else
- {
- strcat(outpars,"+");
- }
- }
- direction = 1;
- }
- else
- if (parameters[1][i] == '-')
- {
- if (direction != 0)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '-';
- }
- else
- {
- strcat(outpars,"-");
- }
- }
- direction = 0;
- }
- else
- {
- log(DEBUG,"begin mode processing entry");
- can_change = 1;
- if (can_change)
- {
- if (direction == 1)
- {
- log(DEBUG,"umode %c being added",parameters[1][i]);
- if ((!strchr(dmodes,parameters[1][i])) && (allowed_umode(parameters[1][i],"o",true)))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, NULL, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- dmodes[strlen(dmodes)+1]='\0';
- dmodes[strlen(dmodes)] = parameters[1][i];
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
- }
- }
- }
- else
- {
- // can only remove a mode they already have
- log(DEBUG,"umode %c being removed",parameters[1][i]);
- if ((allowed_umode(parameters[1][i],"o",false)) && (strchr(dmodes,parameters[1][i])))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, NULL, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- int q = 0;
- char temp[MAXBUF];
- char moo[MAXBUF];
-
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
-
- strcpy(temp,"");
- for (q = 0; q < strlen(dmodes); q++)
- {
- if (dmodes[q] != parameters[1][i])
- {
- moo[0] = dmodes[q];
- moo[1] = '\0';
- strcat(temp,moo);
- }
- }
- strcpy(dmodes,temp);
- }
- }
- }
- }
- }
- }
- if (strlen(outpars))
- {
- char b[MAXBUF];
- strcpy(b,"");
- int z = 0;
- int i = 0;
- while (i < strlen (outpars))
- {
- b[z++] = outpars[i++];
- b[z] = '\0';
- if (i<strlen(outpars)-1)
- {
- if (((outpars[i] == '-') || (outpars[i] == '+')) && ((outpars[i+1] == '-') || (outpars[i+1] == '+')))
- {
- // someones playing silly buggers and trying
- // to put a +- or -+ into the line...
- i++;
- }
- }
- if (i == strlen(outpars)-1)
- {
- if ((outpars[i] == '-') || (outpars[i] == '+'))
- {
- i++;
- }
- }
- }
-
- z = strlen(b)-1;
- if ((b[z] == '-') || (b[z] == '+'))
- b[z] == '\0';
-
- if ((!strcmp(b,"+")) || (!strcmp(b,"-")))
- return;
-
- if (strlen(dmodes)>MAXMODES)
- {
- dmodes[MAXMODES-1] = '\0';
- }
- log(DEBUG,"Stripped mode line");
- log(DEBUG,"Line dest is now %s",dmodes);
- strncpy(dest->modes,dmodes,MAXMODES);
-
- }
-
- return;
- }
-
- Ptr = FindChan(parameters[0]);
- if (Ptr)
- {
- userrec s2;
- strncpy(s2.nick,ServerName,NICKMAX);
- strcpy(s2.modes,"o");
- s2.fd = -1;
- process_modes(parameters,&s2,Ptr,STATUS_OP,pcnt,true,true,false);
- }
-}
-
-
-void merge_mode2(char **parameters, int pcnt, userrec* user)
-{
- chanrec* Ptr;
- userrec* dest;
- int can_change,i;
- int direction = 1;
- char outpars[MAXBUF];
-
- dest = Find(parameters[0]);
-
- // fix: ChroNiCk found this - we cant use this as debug if its null!
- if (dest)
- {
- log(DEBUG,"merge_mode on %s",dest->nick);
- }
-
- if ((dest) && (pcnt > 1))
- {
- log(DEBUG,"params > 1");
-
- char dmodes[MAXBUF];
- strncpy(dmodes,dest->modes,MAXBUF);
-
- strcpy(outpars,"+");
- direction = 1;
-
- if ((parameters[1][0] != '+') && (parameters[1][0] != '-'))
- return;
-
- for (int i = 0; i < strlen(parameters[1]); i++)
- {
- if (parameters[1][i] == '+')
- {
- if (direction != 1)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '+';
- }
- else
- {
- strcat(outpars,"+");
- }
- }
- direction = 1;
- }
- else
- if (parameters[1][i] == '-')
- {
- if (direction != 0)
- {
- if ((outpars[strlen(outpars)-1] == '+') || (outpars[strlen(outpars)-1] == '-'))
- {
- outpars[strlen(outpars)-1] = '-';
- }
- else
- {
- strcat(outpars,"-");
- }
- }
- direction = 0;
- }
- else
- {
- log(DEBUG,"begin mode processing entry");
- can_change = 1;
- if (can_change)
- {
- if (direction == 1)
- {
- log(DEBUG,"umode %c being added",parameters[1][i]);
- if ((!strchr(dmodes,parameters[1][i])) && (allowed_umode(parameters[1][i],user->modes,true)))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, NULL, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- dmodes[strlen(dmodes)+1]='\0';
- dmodes[strlen(dmodes)] = parameters[1][i];
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
- }
- }
- }
- else
- {
- // can only remove a mode they already have
- log(DEBUG,"umode %c being removed",parameters[1][i]);
- if ((allowed_umode(parameters[1][i],user->modes,false)) && (strchr(dmodes,parameters[1][i])))
- {
- char umode = parameters[1][i];
- log(DEBUG,"umode %c is an allowed umode",umode);
- if ((process_module_umode(umode, NULL, dest, direction)) || (umode == 'i') || (umode == 's') || (umode == 'w') || (umode == 'o'))
- {
- int q = 0;
- char temp[MAXBUF];
- char moo[MAXBUF];
-
- outpars[strlen(outpars)+1]='\0';
- outpars[strlen(outpars)] = parameters[1][i];
-
- strcpy(temp,"");
- for (q = 0; q < strlen(dmodes); q++)
- {
- if (dmodes[q] != parameters[1][i])
- {
- moo[0] = dmodes[q];
- moo[1] = '\0';
- strcat(temp,moo);
- }
- }
- strcpy(dmodes,temp);
- }
- }
- }
- }
- }
- }
- if (strlen(outpars))
- {
- char b[MAXBUF];
- strcpy(b,"");
- int z = 0;
- int i = 0;
- while (i < strlen (outpars))
- {
- b[z++] = outpars[i++];
- b[z] = '\0';
- if (i<strlen(outpars)-1)
- {
- if (((outpars[i] == '-') || (outpars[i] == '+')) && ((outpars[i+1] == '-') || (outpars[i+1] == '+')))
- {
- // someones playing silly buggers and trying
- // to put a +- or -+ into the line...
- i++;
- }
- }
- if (i == strlen(outpars)-1)
- {
- if ((outpars[i] == '-') || (outpars[i] == '+'))
- {
- i++;
- }
- }
- }
-
- z = strlen(b)-1;
- if ((b[z] == '-') || (b[z] == '+'))
- b[z] == '\0';
-
- if ((!strcmp(b,"+")) || (!strcmp(b,"-")))
- return;
-
- WriteTo(user,dest,"MODE :%s",b);
-
- if (strlen(dmodes)>MAXMODES)
- {
- dmodes[MAXMODES-1] = '\0';
- }
- log(DEBUG,"Stripped mode line");
- log(DEBUG,"Line dest is now %s",dmodes);
- strncpy(dest->modes,dmodes,MAXMODES);
-
- }
-
- return;
- }
-
- Ptr = FindChan(parameters[0]);
- if (Ptr)
- {
- if ((cstatus(user,Ptr) < STATUS_HOP) && (Ptr))
- {
- return;
- }
-
- process_modes(parameters,user,Ptr,cstatus(user,Ptr),pcnt,false,false,true);
- }
-}
-
-
-
-/* This function pokes and hacks at a parameter list like the following:
- *
- * PART #winbot, #darkgalaxy :m00!
- *
- * to turn it into a series of individual calls like this:
- *
- * PART #winbot :m00!
- * PART #darkgalaxy :m00!
- *
- * The seperate calls are sent to a callback function provided by the caller
- * (the caller will usually call itself recursively). The callback function
- * must be a command handler. Calling this function on a line with no list causes
- * no action to be taken. You must provide a starting and ending parameter number
- * where the range of the list can be found, useful if you have a terminating
- * parameter as above which is actually not part of the list, or parameters
- * before the actual list as well. This code is used by many functions which
- * can function as "one to list" (see the RFC) */
-
-int loop_call(handlerfunc fn, char **parameters, int pcnt, userrec *u, int start, int end, int joins)
-{
- char plist[MAXBUF];
- char *param;
- char *pars[32];
- char blog[32][MAXBUF];
- char blog2[32][MAXBUF];
- int i = 0, j = 0, q = 0, total = 0, t = 0, t2 = 0, total2 = 0;
- char keystr[MAXBUF];
- char moo[MAXBUF];
-
- for (int i = 0; i <32; i++)
- strcpy(blog[i],"");
-
- for (int i = 0; i <32; i++)
- strcpy(blog2[i],"");
-
- strcpy(moo,"");
- for (int i = 0; i <10; i++)
- {
- if (!parameters[i])
- {
- parameters[i] = moo;
- }
- }
- if (joins)
- {
- if (pcnt > 1) /* we have a key to copy */
- {
- strcpy(keystr,parameters[1]);
- }
- }
-
- if (!parameters[start])
- {
- return 0;
- }
- if (!strchr(parameters[start],','))
- {
- return 0;
- }
- strcpy(plist,"");
- for (int i = start; i <= end; i++)
- {
- if (parameters[i])
- {
- strcat(plist,parameters[i]);
+ strcat(plist,parameters[i]);
}
}
// 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]);
- }
-}
-
-char lst[MAXBUF];
-
-char* chlist(userrec *user)
-{
- int i = 0;
- char cmp[MAXBUF];
-
- log(DEBUG,"chlist: %s",user->nick);
- strcpy(lst,"");
- if (!user)
- {
- return lst;
- }
- for (int i = 0; i != MAXCHANS; i++)
- {
- if (user->chans[i].channel != NULL)
+ else
{
- if (user->chans[i].channel->name)
- {
- strcpy(cmp,user->chans[i].channel->name);
- strcat(cmp," ");
- if (!strstr(lst,cmp))
- {
- if ((!user->chans[i].channel->c_private) && (!user->chans[i].channel->secret))
- {
- strcat(lst,cmode(user,user->chans[i].channel));
- strcat(lst,user->chans[i].channel->name);
- strcat(lst," ");
- }
- }
- }
+ char buffer[MAXBUF];
+ snprintf(buffer,MAXBUF,"V %s %s :%s",user->nick,dest->nick,parameters[1]);
+ NetSendToOne(dest->server,buffer);
}
}
- if (strlen(lst))
+ else
{
- lst[strlen(lst)-1] = '\0'; // chop trailing space
+ /* no such nick/channel */
+ WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
}
- return lst;
}
+
void handle_info(char **parameters, int pcnt, userrec *user)
{
WriteServ(user->fd,"371 %s :The Inspire IRCd Project Has been brought to you by the following people..",user->nick);
{
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, ServerDesc);
+ 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);
WriteServ(user->fd,"313 %s %s :is an IRC operator",user->nick, dest->nick);
}
FOREACH_MOD OnWhois(user,dest);
- //WriteServ(user->fd,"310 %s %s :is available for help.",user->nick, dest->nick);
- WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, abs((dest->idle_lastmsg)-time(NULL)), dest->signon);
+ 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(NULL)), dest->signon);
+ }
WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, dest->nick);
}
}
}
-void send_network_quit(const char* nick, const char* reason)
-{
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"Q %s :%s",nick,reason);
- NetSendToAll(buffer);
-}
-
void handle_quit(char **parameters, int pcnt, userrec *user)
{
user_hash::iterator iter = clientlist.find(user->nick);
else
{
userrec* u = Find(parameters[0]);
- WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, u->nick, u->ident, u->dhost, u->server, u->nick, u->fullname);
+ if (u)
+ {
+ WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, u->nick, u->ident, u->dhost, u->server, u->nick, 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")))
{
- Ptr = user->chans[0].channel;
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'))
{
- WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, Ptr->name, i->second->ident, i->second->dhost, i->second->server, i->second->nick, i->second->fullname);
+ WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, user->nick, i->second->ident, i->second->dhost, i->second->server, i->second->nick, i->second->fullname);
}
}
}
- WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, Ptr->name);
+ WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, user->nick);
return;
}
}
void handle_version(char **parameters, int pcnt, userrec *user)
{
- WriteServ(user->fd,"351 %s :%s %s %s :%s",user->nick,VERSION,"$Revision$ $Date$",ServerName,SYSTEM);
+ char Revision[] = "$Revision$";
+
+ char *s1 = Revision;
+ char *savept;
+ char *v1 = strtok_r(s1," ",&savept);
+ s1 = savept;
+ char *v2 = strtok_r(s1," ",&savept);
+ s1 = savept;
+
+ WriteServ(user->fd,"351 %s :%s Rev. %s %s :%s (O=%d)",user->nick,VERSION,v2,ServerName,SYSTEM,OPTIMISATION);
}
void handle_ping(char **parameters, int pcnt, userrec *user)
if (me[defaultRoute])
{
- me[defaultRoute]->BeginLink(Link_IPAddr,LinkPort,Link_Pass,Link_ServerName);
+ me[defaultRoute]->BeginLink(Link_IPAddr,LinkPort,Link_Pass,Link_ServerName,me[defaultRoute]->port);
return;
}
else
}
}
+void DoSplitEveryone()
+{
+ bool go_again = true;
+ while (go_again)
+ {
+ go_again = false;
+ for (int i = 0; i < 32; i++)
+ {
+ if (me[i] != NULL)
+ {
+ for (vector<ircd_connector>::iterator j = me[i]->connectors.begin(); j != me[i]->connectors.end(); j++)
+ {
+ if (strcasecmp(j->GetServerName().c_str(),ServerName))
+ {
+ 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];
+ while (go_again)
+ {
+ go_again = false;
+ for (user_hash::const_iterator u = clientlist.begin(); u != clientlist.end(); u++)
+ {
+ if (strcasecmp(u->second->server,ServerName))
+ {
+ snprintf(reason,MAXBUF,"%s %s",ServerName,u->second->server);
+ kill_link(u->second,reason);
+ go_again = true;
+ break;
+ }
+ }
+ }
+}
+
+
+
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.");
+ }
}
-char islast(serverrec* s)
+char islast(const char* s)
{
char c = '`';
- /*for (int j = 0; j < 255; j++)
+ for (int j = 0; j < 32; j++)
{
- if (servers[j] != NULL)
- {
- c = '|';
- }
- if (servers[j] == s)
- {
- c = '`';
+ if (me[j] != NULL)
+ {
+ for (int k = 0; k < me[j]->connectors.size(); k++)
+ {
+ if (strcasecmp(me[j]->connectors[k].GetServerName().c_str(),s))
+ {
+ c = '|';
+ }
+ if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),s))
+ {
+ c = '`';
+ }
+ }
}
- }*/
+ }
return c;
}
-long map_count(serverrec* s)
+long map_count(const char* s)
{
int c = 0;
for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
{
- if ((i->second->fd) && (isnick(i->second->nick)) && (!strcasecmp(i->second->server,s->name))) c++;
+ if ((i->second->fd) && (isnick(i->second->nick)) && (!strcasecmp(i->second->server,s))) c++;
}
return c;
}
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 < 255; j++)
+ for (int j = 0; j < 32; j++)
{
- // if (servers[j] != NULL)
- // {
- // WriteServ(user->fd,"364 %s %s %s :1 %s",user->nick,servers[j]->name,ServerName,servers[j]->description);
- // }
+ 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);
}
while (strlen(line) < 50)
strcat(line," ");
WriteServ(user->fd,"%s%d (%.2f%%)",line,local_count(),(float)(((float)local_count()/(float)usercnt())*100));
- for (int j = 0; j < 255; j++)
+ for (int j = 0; j < 32; j++)
{
- // if (servers[j] != NULL)
- // {
- // snprintf(line,MAXBUF,"006 %s :%c-%s",user->nick,islast(servers[j]),servers[j]->name);
- // while (strlen(line) < 50)
- // strcat(line," ");
- // WriteServ(user->fd,"%s%d (%.2f%%)",line,map_count(servers[j]),(float)(((float)map_count(servers[j])/(float)usercnt())*100));
- // }
+ 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)usercnt())*100));
+ }
+ }
}
WriteServ(user->fd,"007 %s :End of /MAP",user->nick);
}
{
/* found this oper's opertype */
ConfValue("type","host",j,Hostname,&config_f);
- strncpy(user->dhost,Hostname,256);
+ ChangeDisplayedHost(user,Hostname);
}
}
if (!strchr(user->modes,'o'))
{
if (((command[x] < '0') || (command[x]> '9')) && (command[x] != '-'))
{
- if (strchr("@!\"$%^&*(){}[]_-=+;:'#~,.<>/?\\|`",command[x]))
+ if (!strchr("@!\"$%^&*(){}[]_-=+;:'#~,.<>/?\\|`",command[x]))
{
kill_link(user,"Protocol violation (3)");
return;
createcommand("TRACE",handle_trace,'o',0);
createcommand("WHOWAS",handle_whowas,0,1);
createcommand("CONNECT",handle_connect,'o',1);
- createcommand("SQUIT",handle_squit,'o',1);
+ createcommand("SQUIT",handle_squit,'o',0);
createcommand("MODULES",handle_modules,'o',0);
createcommand("LINKS",handle_links,0,0);
createcommand("MAP",handle_map,0,0);
{
// nick collision
WriteOpers("Nickname collision: %s@%s != %s@%s",nick,server,iter->second->nick,iter->second->server);
- if (TS >= iter->second->age)
- {
- 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);
- // client on remote server is older than the local user, kill the local user
- kill_link(iter->second,str);
- }
+ 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
void handle_b(char token,char* params,serverrec* source,serverrec* reply, char* udp_host)
{
- char* nick = strtok(params," :");
- char* host = strtok(NULL,"\r\n");
+ char* nick = strtok(params," ");
+ char* host = strtok(NULL," ");
userrec* user = Find(nick);
char* ipaddr = strtok(NULL," ");
char* ipport = strtok(NULL," ");
char* cookie = strtok(NULL," ");
- log(DEBUG," ");
- log(DEBUG," ");
log(DEBUG,"*** Connecting back to %s:%d",ipaddr,atoi(ipport));
- me[defaultRoute]->MeshCookie(ipaddr,atoi(ipport),atoi(cookie),servername);
- log(DEBUG," ");
+
+
+ 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* udp_host)
+{
+ char* server = strtok(params," ");
+ char* data = strtok(NULL,"\r\n");
+ log(DEBUG,"Forwarded packet '%s' to '%s'",data,server);
+ NetSendToOne(server,data);
+}
void handle_J(char token,char* params,serverrec* source,serverrec* reply, char* udp_host)
{
}
}
+void NetSendMyRoutingTable()
+{
+ // send out a line saying what is reachable to us.
+ // E.g. if A is linked to B C and D, send out:
+ // $ A B C D
+ // if its only linked to B and D send out:
+ // $ A B D
+ // if it has no links, dont even send out the line at all.
+ char buffer[MAXBUF];
+ sprintf(buffer,"$ %s",ServerName);
+ bool sendit = false;
+ for (int i = 0; i < 32; i++)
+ {
+ if (me[i] != NULL)
+ {
+ for (int j = 0; j < me[i]->connectors.size(); j++)
+ {
+ if (me[i]->connectors[j].GetState() != STATE_DISCONNECTED)
+ {
+ strncat(buffer," ",MAXBUF);
+ strncat(buffer,me[i]->connectors[j].GetServerName().c_str(),MAXBUF);
+ sendit = true;
+ }
+ }
+ }
+ }
+ if (sendit)
+ NetSendToAll(buffer);
+}
+
+void handle_dollar(char token,char* params,serverrec* source,serverrec* reply, char* udp_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 DoSplit(const char* params)
+{
+ bool go_again = true;
+ while (go_again)
+ {
+ go_again = false;
+ for (int i = 0; i < 32; i++)
+ {
+ if (me[i] != NULL)
+ {
+ for (vector<ircd_connector>::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;
+ }
+ }
+ }
+}
+
+// removes a server. Will NOT remove its users!
+
+void RemoveServer(const char* name)
+{
+ bool go_again = true;
+ while (go_again)
+ {
+ go_again = false;
+ for (int i = 0; i < 32; i++)
+ {
+ if (me[i] != NULL)
+ {
+ for (vector<ircd_connector>::iterator j = me[i]->connectors.begin(); j != me[i]->connectors.end(); j++)
+ {
+ if (!strcasecmp(j->GetServerName().c_str(),name))
+ {
+ j->routes.clear();
+ j->CloseConnection();
+ me[i]->connectors.erase(j);
+ go_again = true;
+ break;
+ }
+ }
+ }
+ }
+ }
+}
+
+void handle_amp(char token,char* params,serverrec* source,serverrec* reply, char* udp_host)
+{
+ log(DEBUG,"Netsplit! %s split from mesh, removing!",params);
+ bool go_again = true;
+ while (go_again)
+ {
+ go_again = false;
+ for (int i = 0; i < 32; i++)
+ {
+ if (me[i] != NULL)
+ {
+ for (vector<ircd_connector>::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 process_restricted_commands(char token,char* params,serverrec* source,serverrec* reply, char* udp_host,char* ipaddr,int port)
{
- long authcookie = rand()*rand();
char buffer[MAXBUF];
switch(token)
WriteOpers("Server %s is starting netburst.",udp_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.
-
- // give the server its authcookie.
+ authcookie = rand()*rand();
snprintf(buffer,MAXBUF,"~ %d",authcookie);
- source->SendPacket(buffer,udp_host);
- // 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",udp_host,ipaddr,port,authcookie);
- NetSendToAllExcept(udp_host,buffer);
+ NetSendToAll(buffer);
break;
// ~
// Store authcookie
case '+':
handle_plus(token,params,source,reply,udp_host);
break;
+ // routing table
+ case '$':
+ handle_dollar(token,params,source,reply,udp_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,udp_host);
+ break;
+ // R <server> <data>
+ // redirect token, send all of <data> 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,udp_host);
+ break;
// ?
// ping
case '?':
WriteOpers("Server %s has completed netburst. (%d secs)",udp_host,time(NULL)-nb_start);
handle_F(token,params,source,reply,udp_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",udp_host,ipaddr,port,authcookie);
+ NetSendToAllExcept(udp_host,buffer);
break;
// X <reserved>
// Send netburst now
WriteOpers("Sending my netburst to %s",udp_host);
DoSync(source,udp_host);
WriteOpers("Send of netburst to %s completed",udp_host);
-
+ NetSendMyRoutingTable();
break;
// anything else
default:
char* params = udp_msg + 2;
char finalparam[1024];
strcpy(finalparam," :xxxx");
- if (strstr(params," :")) {
- strncpy(finalparam,strstr(params," :"),1024);
+ if (strstr(udp_msg," :")) {
+ strncpy(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,udp_host);
+
for (int u = 0; u < auth_cookies.size(); u++)
{
if (auth_cookies[u] == atoi(cookie))
if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),udp_host))
{
me[j]->connectors[k].SetServerName(servername);
+ me[j]->connectors[k].SetDescription(serverdesc);
+ me[j]->connectors[k].SetState(STATE_CONNECTED);
+ NetSendMyRoutingTable();
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 :ChatSpike InspIRCd test server
+ // 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)",servername,udp_host);
+
+ WriteOpers("CONNECT from %s (%s) (their port: %d)",servername,udp_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];
+ sprintf(buffer,"E :Server %s already exists!",servername);
+ serv->SendPacket(buffer,udp_host);
+ RemoveServer(udp_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,udp_host);
+ RemoveServer(udp_host);
+ RemoveServer(servername);
+ return;
+ }
+
for (int j = 0; j < serv->connectors.size(); j++)
{
if (!strcasecmp(serv->connectors[j].GetServerName().c_str(),udp_host))
{
serv->connectors[j].SetServerName(servername);
+ serv->connectors[j].SetDescription(serverdesc);
+ serv->connectors[j].SetServerPort(atoi(myport));
}
}
// 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;
}
}
sprintf(buffer,"E :Access is denied (no matching link block)");
serv->SendPacket(buffer,udp_host);
WriteOpers("CONNECT from %s denied, no matching link block",servername);
+ RemoveServer(udp_host);
+ RemoveServer(servername);
return;
}
else
// 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);
// 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(),udp_host))
{
char buffer[MAXBUF];
+ me[j]->connectors[k].SetDescription(serverdesc);
+ me[j]->connectors[k].SetState(STATE_CONNECTED);
sprintf(buffer,"X 0");
serv->SendPacket(buffer,udp_host);
DoSync(me[j],udp_host);
+ NetSendMyRoutingTable();
return;
}
}
sprintf(buffer,"E :Access is denied (no matching link block)");
serv->SendPacket(buffer,udp_host);
WriteOpers("CONNECT from %s denied, no matching link block",servername);
+ RemoveServer(udp_host);
+ RemoveServer(servername);
return;
}
else
if (token == 'E') {
char* error_message = finalparam+2;
WriteOpers("ERROR from %s: %s",udp_host,error_message);
- // remove this server from any lists
return;
}
else {
log(DEBUG,"Servers are: '%s' '%s'",udp_host,me[j]->connectors[x].GetServerName().c_str());
if (!strcasecmp(me[j]->connectors[x].GetServerName().c_str(),udp_host))
{
- log(DEBUG,"match! process restricted stuff here");
- // found a valid ircd_connector.
- // TODO: Fix this so it only lets servers in that are in the
- // STATE_CONNECTED state!!!
- process_restricted_commands(token,params,me[j],serv,udp_host,me[j]->connectors[x].GetServerIP(),me[j]->connectors[x].GetServerPort());
- return;
+ if (me[j]->connectors[x].GetState() == STATE_CONNECTED)
+ {
+ // found a valid ircd_connector.
+ process_restricted_commands(token,params,me[j],serv,udp_host,me[j]->connectors[x].GetServerIP(),me[j]->connectors[x].GetServerPort());
+ return;
+ }
}
}
}
/* main loop, this never returns */
for (;;)
{
+#ifdef _POSIX_PRIORITY_SCHEDULING
+ sched_yield();
+#endif
fd_set sfd;
timeval tval;
// *FIX* Instead of closing sockets in kill_link when they receive the ERROR :blah line, we should queue
// them in a list, then reap the list every second or so.
- if (reap_counter>5000)
+ if (reap_counter>300)
{
if (fd_reap.size() > 0)
{
fd_reap.clear();
reap_counter=0;
}
+ reap_counter++;
fd_set serverfds;
FD_ZERO(&serverfds);
{
strncpy(resolved,remotehost,MAXBUF);
}
- log(DEBUG," ");
- log(DEBUG," ");
- log(DEBUG,"Resolved: '%s'",resolved);
- log(DEBUG," ");
// add to this connections ircd_connector vector
- me[x]->AddIncoming(incomingSockfd,resolved,ntohs(client.sin_port));
+ // *FIX* - we need the LOCAL port not the remote port in &client!
+ me[x]->AddIncoming(incomingSockfd,resolved,me[x]->port);
}
}
}
char udp_msg[MAXBUF];
strncpy(udp_msg,msgs[ctr].c_str(),MAXBUF);
if (strlen(udp_msg)<1)
- {
+ {
log(DEBUG,"Invalid string from %s [route%d]",udp_host,x);
break;
}
//if (selectResult2 > 0)
for (user_hash::iterator count2a = xcount; count2a != endingiter; count2a++)
{
+
+#ifdef _POSIX_PRIORITY_SCHEDULING
+ sched_yield();
+#endif
+
result = EAGAIN;
if ((count2a->second->fd != -1) && (FD_ISSET (count2a->second->fd, &sfd)))
{
if (result)
{
- log(DEBUG,"Read %d characters from socket",result);
+ if (result > 0)
+ log(DEBUG,"Read %d characters from socket",result);
userrec* current = count2a->second;
int currfd = current->fd;
char* l = strtok(data,"\n");
FD_SET (openSockfd[count], &selectFds);
}
- reap_counter++;
tv.tv_usec = 1;
selectResult = select(MAXSOCKS, &selectFds, NULL, NULL, &tv);