- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent M token");
- }
- }
- }
- }
-
- }
- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent m token");
- }
- }
- }
- }
- }
- }
- }
-}
-
-// 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent m token");
- }
- }
- }
-
- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent m token");
- }
- }
- }
-
- 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]);
- }
- }
-
- j = 0;
- param = plist;
-
- t = strlen(plist);
- for (int i = 0; i < t; i++)
- {
- if (plist[i] == ',')
- {
- plist[i] = '\0';
- strcpy(blog[j++],param);
- param = plist+i+1;
- if (j>20)
- {
- WriteServ(u->fd,"407 %s %s :Too many targets in list, message not delivered.",u->nick,blog[j-1]);
- return 1;
- }
- }
- }
- strcpy(blog[j++],param);
- total = j;
-
- if ((joins) && (keystr) && (total>0)) // more than one channel and is joining
- {
- strcat(keystr,",");
- }
-
- if ((joins) && (keystr))
- {
- if (strchr(keystr,','))
- {
- j = 0;
- param = keystr;
- t2 = strlen(keystr);
- for (int i = 0; i < t2; i++)
- {
- if (keystr[i] == ',')
- {
- keystr[i] = '\0';
- strcpy(blog2[j++],param);
- param = keystr+i+1;
- }
- }
- strcpy(blog2[j++],param);
- total2 = j;
- }
- }
-
- for (j = 0; j < total; j++)
- {
- if (blog[j])
- {
- pars[0] = blog[j];
- }
- for (q = end; q < pcnt-1; q++)
- {
- if (parameters[q+1])
- {
- pars[q-end+1] = parameters[q+1];
- }
- }
- if ((joins) && (parameters[1]))
- {
- if (pcnt > 1)
- {
- pars[1] = blog2[j];
- }
- else
- {
- pars[1] = NULL;
- }
- }
- /* repeatedly call the function with the hacked parameter list */
- if ((joins) && (pcnt > 1))
- {
- if (pars[1])
- {
- // pars[1] already set up and containing key from blog2[j]
- fn(pars,2,u);
- }
- else
- {
- pars[1] = parameters[1];
- fn(pars,2,u);
- }
- }
- else
- {
- fn(pars,pcnt-(end-start),u);
- }
- }
-
- return 1;
-}
-
-
-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(u,Ptr))
- {
- WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, parameters[0]);
- return;
- }
-
- char reason[MAXBUF];
-
- if (pcnt > 2)
- {
- strncpy(reason,parameters[2],MAXBUF);
- if (strlen(reason)>MAXKICK)
- {
- reason[MAXKICK-1] = '\0';
- }
-
- kick_channel(user,u,Ptr,reason);
- }
- else
- {
- strcpy(reason,user->nick);
- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent k token");
- }
- }
-
-}
-
-
-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)
-{
- log(DEBUG,"restart: %s",user->nick);
- if (!strcmp(parameters[0],restartpass))
- {
- WriteOpers("*** RESTART command from %s!%s@%s, Pretending to restart till this is finished :D",user->nick,user->ident,user->host);
- sleep(DieDelay);
- Exit(ERROR);
- /* Will finish this later when i can be arsed :) */
- }
- else
- {
- WriteOpers("*** Failed RESTART Command from %s!%s@%s.",user->nick,user->ident,user->host);
- }
-}
-
-
-void kill_link(userrec *user,const char* r)
-{
- user_hash::iterator iter = clientlist.find(user->nick);
-
- char reason[MAXBUF];
-
- strncpy(reason,r,MAXBUF);
-
- if (strlen(reason)>MAXQUIT)
- {
- reason[MAXQUIT-1] = '\0';
- }
-
- log(DEBUG,"kill_link: %s '%s'",user->nick,reason);
- Write(user->fd,"ERROR :Closing link (%s@%s) [%s]",user->ident,user->host,reason);
- log(DEBUG,"closing fd %d",user->fd);
-
- /* bugfix, cant close() a nonblocking socket (sux!) */
- if (user->registered == 7) {
- FOREACH_MOD OnUserQuit(user);
- WriteCommonExcept(user,"QUIT :%s",reason);
-
- // Q token must go to ALL servers!!!
- char buffer[MAXBUF];
- snprintf(buffer,MAXBUF,"Q %s :%s",user->nick,reason);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent Q token");
- }
- }
- }
- }
-
- /* push the socket on a stack of sockets due to be closed at the next opportunity
- * 'Client exited' is an exception to this as it means the client side has already
- * closed the socket, we don't need to do it.
- */
- fd_reap.push_back(user->fd);
-
- bool do_purge = false;
-
- if (user->registered == 7) {
- WriteOpers("*** Client exiting: %s!%s@%s [%s]",user->nick,user->ident,user->host,reason);
- AddWhoWas(user);
- }
-
- 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);
- }
-
- if (user->registered == 7) {
- purge_empty_chans();
- }
-}
-
-
-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)
- {
- 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]);
- sprintf(killreason,"[%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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent K token");
- }
- }
- }
- 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
- 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]);
- sprintf(killreason,"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);
-}
-
-
-// looks up a users password for their connection class (<ALLOW>/<DENY> tags)
-
-char* Passwd(userrec *user)
-{
- for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++)
- {
- if (match(user->host,i->host) && (i->type == CC_ALLOW))
- {
- return i->pass;
- }
- }
- return "";
-}
-
-bool IsDenied(userrec *user)
-{
- for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++)
- {
- if (match(user->host,i->host) && (i->type == CC_DENY))
- {
- return true;
- }
- }
- return false;
-}
-
-
-
-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;
- }
- 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;
- }
- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent i token");
- }
- }
- }
-}
-
-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->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->topiclock) && (cstatus(user,Ptr)<STATUS_HOP))
- {
- 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;
- }
-
- char topic[MAXBUF];
- strncpy(topic,parameters[1],MAXBUF);
- if (strlen(topic)>MAXTOPIC)
- {
- topic[MAXTOPIC-1] = '\0';
- }
-
- strcpy(Ptr->topic,topic);
- strcpy(Ptr->setby,user->nick);
- Ptr->topicset = time(NULL);
- 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);
- for (int j = 0; j < 255; j++)
- {
- if (servers[j] != NULL)
- {
- if (strcmp(servers[j]->name,ServerName))
- {
- me[defaultRoute]->SendPacket(buffer,servers[j]->name);
- log(DEBUG,"Sent t token");
- }
- }
- }
- }
- else
- {
- WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
- }
- }
- }
-}
-
-/* sends out an error notice to all connected clients (not to be used
- * lightly!) */
-
-void send_error(char *s)
-{
- log(DEBUG,"send_error: %s",s);
- for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
- {
- if (isnick(i->second->nick))
- {
- WriteServ(i->second->fd,"NOTICE %s :%s",i->second->nick,s);
- }
- else
- {
- // fix - unregistered connections receive ERROR, not NOTICE
- Write(i->second->fd,"ERROR :%s",s);
- }
- }
-}
-
-void Error(int status)
-{
- signal (SIGALRM, SIG_IGN);
- signal (SIGPIPE, SIG_IGN);
- signal (SIGTERM, SIG_IGN);
- signal (SIGABRT, SIG_IGN);
- signal (SIGSEGV, SIG_IGN);
- signal (SIGURG, SIG_IGN);
- signal (SIGKILL, SIG_IGN);
- log(DEBUG,"*** fell down a pothole in the road to perfection ***");
- send_error("Error! Segmentation fault! save meeeeeeeeeeeeee *splat!*");
- exit(status);
-}
-
-
-int main (int argc, char *argv[])
-{
- Start();
- log(DEBUG,"*** InspIRCd starting up!");
- if (!FileExists(CONFIG_FILE))
- {
- printf("ERROR: Cannot open config file: %s\nExiting...\n",CONFIG_FILE);
- log(DEBUG,"main: no config");
- printf("ERROR: Your config file is missing, this IRCd will self destruct in 10 seconds!\n");
- Exit(ERROR);
- }
- if (argc > 1) {
- if (!strcmp(argv[1],"-nofork")) {
- nofork = true;
- }
- }
- if (InspIRCd() == ERROR)
- {
- log(DEBUG,"main: daemon function bailed");
- printf("ERROR: could not initialise. Shutting down.\n");
- Exit(ERROR);