src/commands.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  Inspire is copyright (C) 2002-2004 ChatSpike-Dev.
   6  *                       E-mail:
   7  *                <brain@chatspike.net>
   8  *                <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *            the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 using namespace std;
  18
  19 #include "inspircd_config.h"
  20 #include "inspircd.h"
  21 #include "inspircd_io.h"
  22 #include "inspircd_util.h"
  23 #include <unistd.h>
  24 #include <sys/errno.h>
  25 #include <sys/ioctl.h>
  26 #include <sys/utsname.h>
  27 #include <cstdio>
  28 #include <time.h>
  29 #include <string>
  30 #ifdef GCC3
  31 #include <ext/hash_map>
  32 #else
  33 #include <hash_map>
  34 #endif
  35 #include <map>
  36 #include <sstream>
  37 #include <vector>
  38 #include <deque>
  39 #include <sys/types.h>
  40 #include <sys/time.h>
  41 #include <sys/resource.h>
  42 #ifdef THREADED_DNS
  43 #include <pthread.h>
  44 #endif
  45 #ifndef RUSAGE_SELF
  46 #define   RUSAGE_SELF     0
  47 #define   RUSAGE_CHILDREN     -1
  48 #endif
  49 #include "users.h"
  50 #include "ctables.h"
  51 #include "globals.h"
  52 #include "modules.h"
  53 #include "dynamic.h"
  54 #include "wildcard.h"
  55 #include "message.h"
  56 #include "commands.h"
  57 #include "mode.h"
  58 #include "xline.h"
  59 #include "inspstring.h"
  60 #include "dnsqueue.h"
  61 #include "helperfuncs.h"
  62 #include "hashcomp.h"
  63 #include "socketengine.h"
  64
  65 extern SocketEngine* SE;
  66
  67 extern int MODCOUNT;
  68 extern std::vector<Module*> modules;
  69 extern std::vector<ircd_module*> factory;
  70
  71 extern int LogLevel;
  72 extern char ServerName[MAXBUF];
  73 extern char Network[MAXBUF];
  74 extern char ServerDesc[MAXBUF];
  75 extern char AdminName[MAXBUF];
  76 extern char AdminEmail[MAXBUF];
  77 extern char AdminNick[MAXBUF];
  78 extern char diepass[MAXBUF];
  79 extern char restartpass[MAXBUF];
  80 extern char motd[MAXBUF];
  81 extern char rules[MAXBUF];
  82 extern char list[MAXBUF];
  83 extern char PrefixQuit[MAXBUF];
  84 extern char DieValue[MAXBUF];
  85
  86 extern int debugging;
  87 extern int WHOWAS_STALE;
  88 extern int WHOWAS_MAX;
  89 extern int DieDelay;
  90 extern time_t startup_time;
  91 extern int NetBufferSize;
  92 extern int MaxWhoResults;
  93 extern time_t nb_start;
  94
  95 extern bool nofork;
  96
  97 extern time_t TIME;
  98
  99 extern std::vector<std::string> module_names;
 100
 101 extern char MyExecutable[1024];
 102 extern int boundPortCount;
 103 extern int portCount;
 104
 105 extern int ports[MAXSOCKS];
 106
 107 extern std::stringstream config_f;
 108
 109
 110
 111 extern FILE *log_file;
 112
 113 extern ClassVector Classes;
 114
 115 const long duration_m = 60;
 116 const long duration_h = duration_m * 60;
 117 const long duration_d = duration_h * 24;
 118 const long duration_w = duration_d * 7;
 119 const long duration_y = duration_w * 52;
 120
 121 typedef nspace::hash_map<std::string, userrec*, nspace::hash<string>, irc::StrHashComp> user_hash;
 122 typedef nspace::hash_map<std::string, chanrec*, nspace::hash<string>, irc::StrHashComp> chan_hash;
 123 typedef nspace::hash_map<in_addr,string*, nspace::hash<in_addr>, irc::InAddr_HashComp> address_cache;
 124 typedef nspace::hash_map<std::string, WhoWasUser*, nspace::hash<string>, irc::StrHashComp> whowas_hash;
 125 typedef std::deque<command_t> command_table;
 126
 127
 128 extern user_hash clientlist;
 129 extern chan_hash chanlist;
 130 extern whowas_hash whowas;
 131 extern command_table cmdlist;
 132 extern file_cache MOTD;
 133 extern file_cache RULES;
 134 extern address_cache IP;
 135
 136 extern std::vector<userrec*> all_opers;
 137
 138 // This table references users by file descriptor.
 139 // its an array to make it VERY fast, as all lookups are referenced
 140 // by an integer, meaning there is no need for a scan/search operation.
 141 extern userrec* fd_ref_table[65536];
 142
 143 extern int statsAccept,statsRefused,statsUnknown,statsCollisions,statsDns,statsDnsGood,statsDnsBad,statsConnects,statsSent,statsRecv;
 144
 145 void handle_join(char **parameters, int pcnt, userrec *user)
 146 {
 147         chanrec* Ptr;
 148
 149         if (loop_call(handle_join,parameters,pcnt,user,0,0,1))
 150                 return;
 151         if (parameters[0][0] == '#')
 152         {
 153                 Ptr = add_channel(user,parameters[0],parameters[1],false);
 154         }
 155 }
 156
 157
 158 void handle_part(char **parameters, int pcnt, userrec *user)
 159 {
 160         if (pcnt > 1)
 161         {
 162                 if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-2,0))
 163                         return;
 164                 del_channel(user,parameters[0],parameters[1],false);
 165         }
 166         else
 167         {
 168                 if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-1,0))
 169                         return;
 170                 del_channel(user,parameters[0],NULL,false);
 171         }
 172 }
 173
 174 void handle_commands(char **parameters, int pcnt, userrec *user)
 175 {
 176         for (unsigned int i = 0; i < cmdlist.size(); i++)
 177         {
 178                 WriteServ(user->fd,"902 %s :%s %s %d",user->nick,cmdlist[i].command,cmdlist[i].source,cmdlist[i].min_params);
 179         }
 180         WriteServ(user->fd,"903 %s :End of COMMANDS list",user->nick);
 181 }
 182
 183 void handle_kick(char **parameters, int pcnt, userrec *user)
 184 {
 185         chanrec* Ptr = FindChan(parameters[0]);
 186         userrec* u   = Find(parameters[1]);
 187
 188         if ((!u) || (!Ptr))
 189         {
 190                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 191                 return;
 192         }
 193
 194         if ((!has_channel(user,Ptr)) && (!is_uline(user->server)))
 195         {
 196                 WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, parameters[0]);
 197                 return;
 198         }
 199
 200         char reason[MAXBUF];
 201
 202         if (pcnt > 2)
 203         {
 204                 strlcpy(reason,parameters[2],MAXBUF);
 205                 if (strlen(reason)>MAXKICK)
 206                 {
 207                         reason[MAXKICK-1] = '\0';
 208                 }
 209
 210                 kick_channel(user,u,Ptr,reason);
 211         }
 212         else
 213         {
 214                 strlcpy(reason,user->nick,MAXBUF);
 215                 kick_channel(user,u,Ptr,reason);
 216         }
 217
 218 }
 219
 220 void handle_loadmodule(char **parameters, int pcnt, userrec *user)
 221 {
 222         if (LoadModule(parameters[0]))
 223         {
 224                 WriteOpers("*** NEW MODULE: %s",parameters[0]);
 225                 WriteServ(user->fd,"975 %s %s :Module successfully loaded.",user->nick, parameters[0]);
 226         }
 227         else
 228         {
 229                 WriteServ(user->fd,"974 %s %s :Failed to load module: %s",user->nick, parameters[0],ModuleError());
 230         }
 231 }
 232
 233 void handle_unloadmodule(char **parameters, int pcnt, userrec *user)
 234 {
 235         if (UnloadModule(parameters[0]))
 236         {
 237                 WriteOpers("*** MODULE UNLOADED: %s",parameters[0]);
 238                 WriteServ(user->fd,"973 %s %s :Module successfully unloaded.",user->nick, parameters[0]);
 239         }
 240         else
 241         {
 242                 WriteServ(user->fd,"972 %s %s :Failed to unload module: %s",user->nick, parameters[0],ModuleError());
 243         }
 244 }
 245
 246 void handle_die(char **parameters, int pcnt, userrec *user)
 247 {
 248         log(DEBUG,"die: %s",user->nick);
 249         if (!strcmp(parameters[0],diepass))
 250         {
 251                 WriteOpers("*** DIE command from %s!%s@%s, terminating...",user->nick,user->ident,user->host);
 252                 sleep(DieDelay);
 253                 Exit(ERROR);
 254         }
 255         else
 256         {
 257                 WriteOpers("*** Failed DIE Command from %s!%s@%s.",user->nick,user->ident,user->host);
 258         }
 259 }
 260
 261 void handle_restart(char **parameters, int pcnt, userrec *user)
 262 {
 263         char *argv[32];
 264         log(DEFAULT,"Restart: %s",user->nick);
 265         if (!strcmp(parameters[0],restartpass))
 266         {
 267                 WriteOpers("*** RESTART command from %s!%s@%s, restarting server.",user->nick,user->ident,user->host);
 268
 269                 argv[0] = MyExecutable;
 270                 argv[1] = "-wait";
 271                 if (nofork)
 272                 {
 273                         argv[2] = "-nofork";
 274                 }
 275                 else
 276                 {
 277                         argv[2] = NULL;
 278                 }
 279                 argv[3] = NULL;
 280
 281                 // close ALL file descriptors
 282                 send_error("Server restarting.");
 283                 sleep(1);
 284                 for (int i = 0; i < 65536; i++)
 285                 {
 286                         shutdown(i,2);
 287                         close(i);
 288                 }
 289                 sleep(2);
 290
 291                 execv(MyExecutable,argv);
 292
 293                 exit(0);
 294         }
 295         else
 296         {
 297                 WriteOpers("*** Failed RESTART Command from %s!%s@%s.",user->nick,user->ident,user->host);
 298         }
 299 }
 300
 301 void handle_kill(char **parameters, int pcnt, userrec *user)
 302 {
 303         userrec *u = Find(parameters[0]);
 304         char killreason[MAXBUF];
 305
 306         log(DEBUG,"kill: %s %s",parameters[0],parameters[1]);
 307         if (u)
 308         {
 309                 log(DEBUG,"into kill mechanism");
 310                 int MOD_RESULT = 0;
 311                 FOREACH_RESULT(OnKill(user,u,parameters[1]));
 312                 if (MOD_RESULT) {
 313                         log(DEBUG,"A module prevented the kill with result %d",MOD_RESULT);
 314                         return;
 315                 }
 316
 317                 if (u->fd < 0)
 318                 {
 319                         // remote kill
 320                         WriteOpers("*** Remote kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]);
 321                         snprintf(killreason,MAXBUF,"[%s] Killed (%s (%s))",ServerName,user->nick,parameters[1]);
 322                         WriteCommonExcept(u,"QUIT :%s",killreason);
 323
 324                         FOREACH_MOD OnRemoteKill(user,u,killreason);
 325
 326                         user_hash::iterator iter = clientlist.find(u->nick);
 327                         if (iter != clientlist.end())
 328                         {
 329                                 log(DEBUG,"deleting user hash value %d",iter->second);
 330                                 clientlist.erase(iter);
 331                         }
 332                         if (u->registered == 7)
 333                         {
 334                                 purge_empty_chans(u);
 335                         }
 336                         if (u->fd > -1)
 337                                 fd_ref_table[u->fd] = NULL;
 338                         delete u;
 339                 }
 340                 else
 341                 {
 342                         // local kill
 343                         log(DEFAULT,"LOCAL KILL: %s :%s!%s!%s (%s)", u->nick, ServerName,user->dhost,user->nick,parameters[1]);
 344                         WriteTo(user, u, "KILL %s :%s!%s!%s (%s)", u->nick, ServerName,user->dhost,user->nick,parameters[1]);
 345                         WriteOpers("*** Local Kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]);
 346                         snprintf(killreason,MAXBUF,"Killed (%s (%s))",user->nick,parameters[1]);
 347                         kill_link(u,killreason);
 348                 }
 349         }
 350         else
 351         {
 352                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 353         }
 354 }
 355
 356 void handle_summon(char **parameters, int pcnt, userrec *user)
 357 {
 358         WriteServ(user->fd,"445 %s :SUMMON has been disabled (depreciated command)",user->nick);
 359 }
 360
 361 void handle_users(char **parameters, int pcnt, userrec *user)
 362 {
 363         WriteServ(user->fd,"445 %s :USERS has been disabled (depreciated command)",user->nick);
 364 }
 365
 366 void handle_pass(char **parameters, int pcnt, userrec *user)
 367 {
 368         // Check to make sure they havnt registered -- Fix by FCS
 369         if (user->registered == 7)
 370         {
 371                 WriteServ(user->fd,"462 %s :You may not reregister",user->nick);
 372                 return;
 373         }
 374         strlcpy(user->password,parameters[0],MAXBUF);
 375         if (!strcasecmp(parameters[0],Passwd(user)))
 376         {
 377                 user->haspassed = true;
 378         }
 379 }
 380
 381 void handle_invite(char **parameters, int pcnt, userrec *user)
 382 {
 383         if (pcnt == 2)
 384         {
 385                 userrec* u = Find(parameters[0]);
 386                 chanrec* c = FindChan(parameters[1]);
 387
 388                 if ((!c) || (!u))
 389                 {
 390                         if (!c)
 391                         {
 392                                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[1]);
 393                         }
 394                         else
 395                         {
 396                                 if (c->binarymodes & CM_INVITEONLY)
 397                                 {
 398                                         WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 399                                 }
 400                         }
 401
 402                         return;
 403                 }
 404
 405                 if (c->binarymodes & CM_INVITEONLY)
 406                 {
 407                         if (cstatus(user,c) < STATUS_HOP)
 408                         {
 409                                 WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, c->name);
 410                                 return;
 411                         }
 412                 }
 413                 if (has_channel(u,c))
 414                 {
 415                         WriteServ(user->fd,"443 %s %s %s :Is already on channel %s",user->nick,u->nick,c->name,c->name);
 416                         return;
 417                 }
 418                 if (!has_channel(user,c))
 419                 {
 420                         WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, c->name);
 421                         return;
 422                 }
 423
 424                 int MOD_RESULT = 0;
 425                 FOREACH_RESULT(OnUserPreInvite(user,u,c));
 426                 if (MOD_RESULT == 1) {
 427                         return;
 428                 }
 429
 430                 u->InviteTo(c->name);
 431                 WriteFrom(u->fd,user,"INVITE %s :%s",u->nick,c->name);
 432                 WriteServ(user->fd,"341 %s %s %s",user->nick,u->nick,c->name);
 433                 FOREACH_MOD OnUserInvite(user,u,c);
 434         }
 435         else
 436         {
 437                 // pinched from ircu - invite with not enough parameters shows channels
 438                 // youve been invited to but haven't joined yet.
 439                 InvitedList* il = user->GetInviteList();
 440                 for (InvitedList::iterator i = il->begin(); i != il->end(); i++)
 441                 {
 442                         if (i->channel) {
 443                                 WriteServ(user->fd,"346 %s :%s",user->nick,i->channel);
 444                         }
 445                 }
 446                 WriteServ(user->fd,"347 %s :End of INVITE list",user->nick);
 447         }
 448 }
 449
 450 void handle_topic(char **parameters, int pcnt, userrec *user)
 451 {
 452         chanrec* Ptr;
 453
 454         if (pcnt == 1)
 455         {
 456                 if (strlen(parameters[0]) <= CHANMAX)
 457                 {
 458                         Ptr = FindChan(parameters[0]);
 459                         if (Ptr)
 460                         {
 461                                 if (((Ptr) && (!has_channel(user,Ptr))) && (Ptr->binarymodes & CM_SECRET))
 462                                 {
 463                                         WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, Ptr->name);
 464                                         return;
 465                                 }
 466                                 if (Ptr->topicset)
 467                                 {
 468                                         WriteServ(user->fd,"332 %s %s :%s", user->nick, Ptr->name, Ptr->topic);
 469                                         WriteServ(user->fd,"333 %s %s %s %d", user->nick, Ptr->name, Ptr->setby, Ptr->topicset);
 470                                 }
 471                                 else
 472                                 {
 473                                         WriteServ(user->fd,"331 %s %s :No topic is set.", user->nick, Ptr->name);
 474                                 }
 475                         }
 476                         else
 477                         {
 478                                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 479                         }
 480                 }
 481                 return;
 482         }
 483         else if (pcnt>1)
 484         {
 485                 if (strlen(parameters[0]) <= CHANMAX)
 486                 {
 487                         Ptr = FindChan(parameters[0]);
 488                         if (Ptr)
 489                         {
 490                                 if ((Ptr) && (!has_channel(user,Ptr)))
 491                                 {
 492                                         WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, Ptr->name);
 493                                         return;
 494                                 }
 495                                 if ((Ptr->binarymodes & CM_TOPICLOCK) && (cstatus(user,Ptr)<STATUS_HOP))
 496                                 {
 497                                         WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel", user->nick, Ptr->name);
 498                                         return;
 499                                 }
 500
 501                                 char topic[MAXBUF];
 502                                 strlcpy(topic,parameters[1],MAXBUF);
 503                                 if (strlen(topic)>MAXTOPIC)
 504                                 {
 505                                         topic[MAXTOPIC] = '\0';
 506                                 }
 507
 508                                 if (user->fd > -1)
 509                                 {
 510                                         int MOD_RESULT = 0;
 511                                         FOREACH_RESULT(OnLocalTopicChange(user,Ptr,topic));
 512                                         if (MOD_RESULT)
 513                                                 return;
 514                                 }
 515
 516                                 strlcpy(Ptr->topic,topic,MAXTOPIC);
 517                                 strlcpy(Ptr->setby,user->nick,NICKMAX);
 518                                 Ptr->topicset = TIME;
 519                                 WriteChannel(Ptr,user,"TOPIC %s :%s",Ptr->name, Ptr->topic);
 520                                 if (user->fd > -1)
 521                                 {
 522                                         FOREACH_MOD OnPostLocalTopicChange(user,Ptr,topic);
 523                                 }
 524                         }
 525                         else
 526                         {
 527                                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 528                         }
 529                 }
 530         }
 531 }
 532
 533 void handle_names(char **parameters, int pcnt, userrec *user)
 534 {
 535         chanrec* c;
 536
 537         if (!pcnt)
 538         {
 539                 WriteServ(user->fd,"366 %s * :End of /NAMES list.",user->nick);
 540                 return;
 541         }
 542
 543         if (loop_call(handle_names,parameters,pcnt,user,0,pcnt-1,0))
 544                 return;
 545         c = FindChan(parameters[0]);
 546         if (c)
 547         {
 548                 if (((c) && (!has_channel(user,c))) && (c->binarymodes & CM_SECRET))
 549                 {
 550                       WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, c->name);
 551                       return;
 552                 }
 553                 userlist(user,c);
 554                 WriteServ(user->fd,"366 %s %s :End of /NAMES list.", user->nick, c->name);
 555         }
 556         else
 557         {
 558                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 559         }
 560 }
 561
 562 void handle_privmsg(char **parameters, int pcnt, userrec *user)
 563 {
 564         userrec *dest;
 565         chanrec *chan;
 566
 567         user->idle_lastmsg = TIME;
 568
 569         if (loop_call(handle_privmsg,parameters,pcnt,user,0,pcnt-2,0))
 570                 return;
 571         if (parameters[0][0] == '$')
 572         {
 573                 // notice to server mask
 574                 char* servermask = parameters[0];
 575                 servermask++;
 576                 if (match(ServerName,servermask))
 577                 {
 578                         ServerPrivmsgAll("%s",parameters[1]);
 579                 }
 580                 return;
 581         }
 582         else if (parameters[0][0] == '#')
 583         {
 584                 chan = FindChan(parameters[0]);
 585                 if (chan)
 586                 {
 587                         if ((chan->binarymodes & CM_NOEXTERNAL) && (!has_channel(user,chan)))
 588                         {
 589                                 WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name);
 590                                 return;
 591                         }
 592                         if ((chan->binarymodes & CM_MODERATED) && (cstatus(user,chan)<STATUS_VOICE))
 593                         {
 594                                 WriteServ(user->fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name);
 595                                 return;
 596                         }
 597
 598                         int MOD_RESULT = 0;
 599
 600                         std::string temp = parameters[1];
 601                         FOREACH_RESULT(OnUserPreMessage(user,chan,TYPE_CHANNEL,temp));
 602                         if (MOD_RESULT) {
 603                                 return;
 604                         }
 605                         parameters[1] = (char*)temp.c_str();
 606
 607                         if (temp == "")
 608                         {
 609                                 WriteServ(user->fd,"412 %s No text to send", user->nick);
 610                                 return;
 611                         }
 612
 613                         ChanExceptSender(chan, user, "PRIVMSG %s :%s", chan->name, parameters[1]);
 614                         FOREACH_MOD OnUserMessage(user,chan,TYPE_CHANNEL,parameters[1]);
 615                 }
 616                 else
 617                 {
 618                         /* no such nick/channel */
 619                         WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 620                 }
 621                 return;
 622         }
 623
 624         dest = Find(parameters[0]);
 625         if (dest)
 626         {
 627                 if (strcmp(dest->awaymsg,""))
 628                 {
 629                         /* auto respond with aweh msg */
 630                         WriteServ(user->fd,"301 %s %s :%s",user->nick,dest->nick,dest->awaymsg);
 631                 }
 632
 633                 int MOD_RESULT = 0;
 634
 635                 std::string temp = parameters[1];
 636                 FOREACH_RESULT(OnUserPreMessage(user,dest,TYPE_USER,temp));
 637                 if (MOD_RESULT) {
 638                         return;
 639                 }
 640                 parameters[1] = (char*)temp.c_str();
 641
 642                 if (dest->fd > -1)
 643                 {
 644                         // direct write, same server
 645                         WriteTo(user, dest, "PRIVMSG %s :%s", dest->nick, parameters[1]);
 646                 }
 647
 648                 FOREACH_MOD OnUserMessage(user,dest,TYPE_USER,parameters[1]);
 649         }
 650         else
 651         {
 652                 /* no such nick/channel */
 653                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 654         }
 655 }
 656
 657 void handle_notice(char **parameters, int pcnt, userrec *user)
 658 {
 659         userrec *dest;
 660         chanrec *chan;
 661
 662         user->idle_lastmsg = TIME;
 663
 664         if (loop_call(handle_notice,parameters,pcnt,user,0,pcnt-2,0))
 665                 return;
 666         if (parameters[0][0] == '$')
 667         {
 668                 // notice to server mask
 669                 char* servermask = parameters[0];
 670                 servermask++;
 671                 if (match(ServerName,servermask))
 672                 {
 673                         NoticeAll(user, true, "%s",parameters[1]);
 674                 }
 675                 return;
 676         }
 677         else if (parameters[0][0] == '#')
 678         {
 679                 chan = FindChan(parameters[0]);
 680                 if (chan)
 681                 {
 682                         if ((chan->binarymodes & CM_NOEXTERNAL) && (!has_channel(user,chan)))
 683                         {
 684                                 WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name);
 685                                 return;
 686                         }
 687                         if ((chan->binarymodes & CM_MODERATED) && (cstatus(user,chan)<STATUS_VOICE))
 688                         {
 689                                 WriteServ(user->fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name);
 690                                 return;
 691                         }
 692
 693                         int MOD_RESULT = 0;
 694
 695                         std::string temp = parameters[1];
 696                         FOREACH_RESULT(OnUserPreNotice(user,chan,TYPE_CHANNEL,temp));
 697                         if (MOD_RESULT) {
 698                                 return;
 699                         }
 700                         parameters[1] = (char*)temp.c_str();
 701
 702                         if (temp == "")
 703                         {
 704                                 WriteServ(user->fd,"412 %s No text to send", user->nick);
 705                                 return;
 706                         }
 707
 708                         ChanExceptSender(chan, user, "NOTICE %s :%s", chan->name, parameters[1]);
 709
 710                         FOREACH_MOD OnUserNotice(user,chan,TYPE_CHANNEL,parameters[1]);
 711                 }
 712                 else
 713                 {
 714                         /* no such nick/channel */
 715                         WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 716                 }
 717                 return;
 718         }
 719
 720         dest = Find(parameters[0]);
 721         if (dest)
 722         {
 723                 int MOD_RESULT = 0;
 724
 725                 std::string temp = parameters[1];
 726                 FOREACH_RESULT(OnUserPreNotice(user,dest,TYPE_USER,temp));
 727                 if (MOD_RESULT) {
 728                         return;
 729                 }
 730                 parameters[1] = (char*)temp.c_str();
 731
 732                 if (dest->fd > -1)
 733                 {
 734                         // direct write, same server
 735                         WriteTo(user, dest, "NOTICE %s :%s", dest->nick, parameters[1]);
 736                 }
 737
 738                 FOREACH_MOD OnUserNotice(user,dest,TYPE_USER,parameters[1]);
 739         }
 740         else
 741         {
 742                 /* no such nick/channel */
 743                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 744         }
 745 }
 746
 747 void handle_server(char **parameters, int pcnt, userrec *user)
 748 {
 749         WriteServ(user->fd,"666 %s :You cannot identify as a server, you are a USER. IRC Operators informed.",user->nick);
 750         WriteOpers("*** WARNING: %s attempted to issue a SERVER command and is registered as a user!",user->nick);
 751 }
 752
 753 void handle_info(char **parameters, int pcnt, userrec *user)
 754 {
 755         WriteServ(user->fd,"371 %s :. o O (The Inspire Internet Relay Chat Server) O o .",user->nick);
 756         WriteServ(user->fd,"371 %s : ",user->nick);
 757         WriteServ(user->fd,"371 %s :Core developers: Craig Edwards (Brain)",user->nick);
 758         WriteServ(user->fd,"371 %s :                 Craig McLure",user->nick);
 759         WriteServ(user->fd,"371 %s : ",user->nick);
 760         WriteServ(user->fd,"371 %s :Contributors:    typobox43",user->nick);
 761         WriteServ(user->fd,"371 %s :                 w00t",user->nick);
 762         WriteServ(user->fd,"371 %s :                 Om",user->nick);
 763         WriteServ(user->fd,"371 %s :                 Jazza",user->nick);
 764         WriteServ(user->fd,"371 %s : ",user->nick);
 765         WriteServ(user->fd,"371 %s :Testers:         CC",user->nick);
 766         WriteServ(user->fd,"371 %s :                 Om",user->nick);
 767         WriteServ(user->fd,"371 %s :                 Piggles",user->nick);
 768         WriteServ(user->fd,"371 %s :                 Foamy",user->nick);
 769         WriteServ(user->fd,"371 %s :                 Hart",user->nick);
 770         WriteServ(user->fd,"371 %s :                 RageD",user->nick);
 771         WriteServ(user->fd,"371 %s :                 [ed]",user->nick);
 772         WriteServ(user->fd,"371 %s :                 Azhrarn",user->nick);
 773         WriteServ(user->fd,"371 %s :                 nenolod",user->nick);
 774         WriteServ(user->fd,"371 %s :                 luigiman",user->nick);
 775         WriteServ(user->fd,"371 %s :                 Chu",user->nick);
 776         WriteServ(user->fd,"371 %s :                 aquanight",user->nick);
 777         WriteServ(user->fd,"371 %s :                 xptek",user->nick);
 778         WriteServ(user->fd,"371 %s :                 Grantlinks",user->nick);
 779         WriteServ(user->fd,"371 %s :                 Rob",user->nick);
 780         WriteServ(user->fd,"371 %s :                 angelic",user->nick);
 781         WriteServ(user->fd,"371 %s :                 Jason",user->nick);
 782         WriteServ(user->fd,"371 %s :                 ThaPrince",user->nick);
 783         WriteServ(user->fd,"371 %s : ",user->nick);
 784         WriteServ(user->fd,"371 %s :Thanks to irc-junkie and searchirc",user->nick);
 785         WriteServ(user->fd,"371 %s :for the nice comments and the help",user->nick);
 786         WriteServ(user->fd,"371 %s :you gave us in attracting users to",user->nick);
 787         WriteServ(user->fd,"371 %s :this software.",user->nick);
 788         WriteServ(user->fd,"371 %s : ",user->nick);
 789         WriteServ(user->fd,"371 %s :Best experienced with: An IRC client.",user->nick);
 790         FOREACH_MOD OnInfo(user);
 791         WriteServ(user->fd,"374 %s :End of /INFO list",user->nick);
 792 }
 793
 794 void handle_time(char **parameters, int pcnt, userrec *user)
 795 {
 796         time_t rawtime;
 797         struct tm * timeinfo;
 798
 799         time ( &rawtime );
 800         timeinfo = localtime ( &rawtime );
 801         WriteServ(user->fd,"391 %s %s :%s",user->nick,ServerName, asctime (timeinfo) );
 802
 803 }
 804
 805 void handle_whois(char **parameters, int pcnt, userrec *user)
 806 {
 807         userrec *dest;
 808         if (loop_call(handle_whois,parameters,pcnt,user,0,pcnt-1,0))
 809                 return;
 810         dest = Find(parameters[0]);
 811         if (dest)
 812         {
 813                 do_whois(user,dest,0,0,parameters[0]);
 814         }
 815         else
 816         {
 817                 /* no such nick/channel */
 818                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
 819                 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, parameters[0]);
 820         }
 821 }
 822
 823 void split_chlist(userrec* user, userrec* dest, std::string &cl)
 824 {
 825         std::stringstream channels(cl);
 826         std::string line = "";
 827         std::string cname = "";
 828         while (!channels.eof())
 829         {
 830                 channels >> cname;
 831                 line = line + cname + " ";
 832                 if (line.length() > 400)
 833                 {
 834                         WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, line.c_str());
 835                         line = "";
 836                 }
 837         }
 838         if (line.length())
 839         {
 840                 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, line.c_str());
 841         }
 842 }
 843
 844 void do_whois(userrec* user, userrec* dest,unsigned long signon, unsigned long idle, char* nick)
 845 {
 846         // bug found by phidjit - were able to whois an incomplete connection if it had sent a NICK or USER
 847         if (dest->registered == 7)
 848         {
 849                 WriteServ(user->fd,"311 %s %s %s %s * :%s",user->nick, dest->nick, dest->ident, dest->dhost, dest->fullname);
 850                 if ((user == dest) || (strchr(user->modes,'o')))
 851                 {
 852                         WriteServ(user->fd,"378 %s %s :is connecting from *@%s %s",user->nick, dest->nick, dest->host, dest->ip);
 853                 }
 854                 std::string cl = chlist(dest,user);
 855                 if (cl.length())
 856                 {
 857                         if (cl.length() > 400)
 858                         {
 859                                 split_chlist(user,dest,cl);
 860                         }
 861                         else
 862                         {
 863                                 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, cl.c_str());
 864                         }
 865                 }
 866                 WriteServ(user->fd,"312 %s %s %s :%s",user->nick, dest->nick, dest->server, GetServerDescription(dest->server).c_str());
 867                 if (*dest->awaymsg)
 868                 {
 869                         WriteServ(user->fd,"301 %s %s :%s",user->nick, dest->nick, dest->awaymsg);
 870                 }
 871                 if (strchr(dest->modes,'o'))
 872                 {
 873                         if (*dest->oper)
 874                         {
 875                                 WriteServ(user->fd,"313 %s %s :is %s %s on %s",user->nick, dest->nick, (strchr("aeiou",dest->oper[0]) ? "an" : "a"),dest->oper, Network);
 876                         }
 877                         else
 878                         {
 879                                 WriteServ(user->fd,"313 %s %s :is opered but has an unknown type",user->nick, dest->nick);
 880                         }
 881                 }
 882                 if ((!signon) && (!idle))
 883                 {
 884                         FOREACH_MOD OnWhois(user,dest);
 885                 }
 886                 if (!strcasecmp(user->server,dest->server))
 887                 {
 888                         // idle time and signon line can only be sent if youre on the same server (according to RFC)
 889                         WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, abs((dest->idle_lastmsg)-TIME), dest->signon);
 890                 }
 891                 else
 892                 {
 893                         if ((idle) || (signon))
 894                                 WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, idle, signon);
 895                 }
 896                 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, dest->nick);
 897         }
 898         else
 899         {
 900                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, nick);
 901                 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, nick);
 902         }
 903 }
 904
 905 void handle_quit(char **parameters, int pcnt, userrec *user)
 906 {
 907         user_hash::iterator iter = clientlist.find(user->nick);
 908         char* reason;
 909
 910         if (user->registered == 7)
 911         {
 912                 /* theres more to do here, but for now just close the socket */
 913                 if (pcnt == 1)
 914                 {
 915                         if (parameters[0][0] == ':')
 916                         {
 917                                 *parameters[0]++;
 918                         }
 919                         reason = parameters[0];
 920
 921                         if (strlen(reason)>MAXQUIT)
 922                         {
 923                                 reason[MAXQUIT-1] = '\0';
 924                         }
 925
 926                         /* We should only prefix the quit for a local user. Remote users have
 927                          * already been prefixed, where neccessary, by the upstream server.
 928                          */
 929                         if (user->fd > -1)
 930                         {
 931                                 Write(user->fd,"ERROR :Closing link (%s@%s) [%s%s]",user->ident,user->host,PrefixQuit,parameters[0]);
 932                                 WriteOpers("*** Client exiting: %s!%s@%s [%s%s]",user->nick,user->ident,user->host,PrefixQuit,parameters[0]);
 933                                 WriteCommonExcept(user,"QUIT :%s%s",PrefixQuit,parameters[0]);
 934                         }
 935                         else
 936                         {
 937                                 WriteOpers("*** Client exiting at %s: %s!%s@%s [%s]",user->server,user->nick,user->ident,user->host,parameters[0]);
 938                                 WriteCommonExcept(user,"QUIT :%s",parameters[0]);
 939                         }
 940                         FOREACH_MOD OnUserQuit(user,std::string(PrefixQuit)+std::string(parameters[0]));
 941
 942                 }
 943                 else
 944                 {
 945                         Write(user->fd,"ERROR :Closing link (%s@%s) [QUIT]",user->ident,user->host);
 946                         WriteOpers("*** Client exiting: %s!%s@%s [Client exited]",user->nick,user->ident,user->host);
 947                         WriteCommonExcept(user,"QUIT :Client exited");
 948                         FOREACH_MOD OnUserQuit(user,"Client exited");
 949
 950                 }
 951                 AddWhoWas(user);
 952         }
 953
 954         FOREACH_MOD OnUserDisconnect(user);
 955
 956         /* push the socket on a stack of sockets due to be closed at the next opportunity */
 957         if (user->fd > -1)
 958         {
 959                 SE->DelFd(user->fd);
 960                 user->CloseSocket();
 961         }
 962
 963         if (iter != clientlist.end())
 964         {
 965                 clientlist.erase(iter);
 966         }
 967
 968         if (user->registered == 7) {
 969                 purge_empty_chans(user);
 970         }
 971         if (user->fd > -1)
 972                 fd_ref_table[user->fd] = NULL;
 973         delete user;
 974 }
 975
 976 void handle_who(char **parameters, int pcnt, userrec *user)
 977 {
 978         chanrec* Ptr = NULL;
 979         char tmp[10];
 980
 981         /* theres more to do here, but for now just close the socket */
 982         if (pcnt == 1)
 983         {
 984                 if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*")))
 985                 {
 986                         if ((user->chans.size()) && (user->chans[0].channel))
 987                         {
 988                                 int n_list = 0;
 989                                 for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
 990                                 {
 991                                         Ptr = i->second->chans[0].channel;
 992                                         // suggested by phidjit and FCS
 993                                         if ((!common_channels(user,i->second)) && (isnick(i->second->nick)))
 994                                         {
 995                                                 // Bug Fix #29
 996                                                 strcpy(tmp, "");
 997                                                 if (strcmp(i->second->awaymsg, "")) {
 998                                                         strlcat(tmp, "G", 9);
 999                                                 } else {
1000                                                         strlcat(tmp, "H", 9);
1001                                                 }
1002                                                 if (strchr(i->second->modes,'o')) { strlcat(tmp, "*", 9); }
1003                                                 WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, Ptr ? Ptr->name : "*", i->second->ident, i->second->dhost, i->second->server, i->second->nick, tmp, i->second->fullname);
1004                                                 n_list++;
1005                                                 if (n_list > MaxWhoResults)
1006                                                 {
1007                                                         WriteServ(user->fd,"523 %s WHO :Command aborted: More results than configured limit",user->nick);
1008                                                         break;
1009                                                 }
1010                                         }
1011                                 }
1012                         }
1013                         if (Ptr)
1014                         {
1015                                 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick , parameters[0]);
1016                         }
1017                         else
1018                         {
1019                                 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]);
1020                         }
1021                         return;
1022                 }
1023                 if (parameters[0][0] == '#')
1024                 {
1025                         Ptr = FindChan(parameters[0]);
1026                         if (Ptr)
1027                         {
1028                                 int n_list = 0;
1029                                 for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
1030                                 {
1031                                         if ((has_channel(i->second,Ptr)) && (isnick(i->second->nick)))
1032                                         {
1033                                                 // Fix Bug #29 - Part 2..
1034                                                 strcpy(tmp, "");
1035                                                 if (strcmp(i->second->awaymsg, "")) {
1036                                                         strlcat(tmp, "G", 9);
1037                                                 } else {
1038                                                         strlcat(tmp, "H", 9);
1039                                                 }
1040                                                 if (strchr(i->second->modes,'o')) { strlcat(tmp, "*", 9); }
1041                                                 strlcat(tmp, cmode(i->second, Ptr),5);
1042                                                 WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, Ptr->name, i->second->ident, i->second->dhost, i->second->server, i->second->nick, tmp, i->second->fullname);
1043                                                 n_list++;
1044                                                 if (n_list > MaxWhoResults)
1045                                                 {
1046                                                         WriteServ(user->fd,"523 %s WHO :Command aborted: More results than configured limit",user->nick);
1047                                                         break;
1048                                                 }
1049
1050                                         }
1051                                 }
1052                                 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]);
1053                         }
1054                         else
1055                         {
1056                                 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
1057                         }
1058                 }
1059                 else
1060                 {
1061                         userrec* u = Find(parameters[0]);
1062                         if (u)
1063                         {
1064                                 // Bug Fix #29 -- Part 29..
1065                                 strcpy(tmp, "");
1066                                 if (strcmp(u->awaymsg, "")) {
1067                                         strlcat(tmp, "G" ,9);
1068                                 } else {
1069                                         strlcat(tmp, "H" ,9);
1070                                 }
1071                                 if (strchr(u->modes,'o')) { strlcat(tmp, "*" ,9); }
1072                                 WriteServ(user->fd,"352 %s %s %s %s %s %s %s :0 %s",user->nick, u->chans.size() ? u->chans[0].channel->name
1073                                 : "*", u->ident, u->dhost, u->server, u->nick, tmp, u->fullname);
1074                         }
1075                         WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]);
1076                 }
1077         }
1078         if (pcnt == 2)
1079         {
1080                 if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*")) && (!strcmp(parameters[1],"o")))
1081                 {
1082                         for (std::vector<userrec*>::iterator i = all_opers.begin(); i != all_opers.end(); i++)
1083                         {
1084                                 // If i were a rich man.. I wouldn't need to me making these bugfixes..
1085                                 // But i'm a poor bastard with nothing better to do.
1086                                 userrec* oper = *i;
1087                                 strcpy(tmp, "");
1088                                 if (strcmp(oper->awaymsg, "")) {
1089                                         strlcat(tmp, "G" ,9);
1090                                 } else {
1091                                         strlcat(tmp, "H" ,9);
1092                                 }
1093                                 WriteServ(user->fd,"352 %s %s %s %s %s %s %s* :0 %s", user->nick, oper->chans.size() ? oper->chans[0].channel->name
1094                                 : "*", oper->ident, oper->dhost, oper->server, oper->nick, tmp, oper->fullname);
1095                         }
1096                         WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]);
1097                         return;
1098                 }
1099         }
1100 }
1101
1102 void handle_wallops(char **parameters, int pcnt, userrec *user)
1103 {
1104         WriteWallOps(user,false,"%s",parameters[0]);
1105         FOREACH_MOD OnWallops(user,parameters[0]);
1106 }
1107
1108 void handle_list(char **parameters, int pcnt, userrec *user)
1109 {
1110         WriteServ(user->fd,"321 %s Channel :Users Name",user->nick);
1111         for (chan_hash::const_iterator i = chanlist.begin(); i != chanlist.end(); i++)
1112         {
1113                 // if the channel is not private/secret, OR the user is on the channel anyway
1114                 if (((!(i->second->binarymodes & CM_PRIVATE)) && (!(i->second->binarymodes & CM_SECRET))) || (has_channel(user,i->second)))
1115                 {
1116                         WriteServ(user->fd,"322 %s %s %d :[+%s] %s",user->nick,i->second->name,usercount_i(i->second),chanmodes(i->second),i->second->topic);
1117                 }
1118         }
1119         WriteServ(user->fd,"323 %s :End of channel list.",user->nick);
1120 }
1121
1122
1123 void handle_rehash(char **parameters, int pcnt, userrec *user)
1124 {
1125         WriteServ(user->fd,"382 %s %s :Rehashing",user->nick,CleanFilename(CONFIG_FILE));
1126         std::string parameter = "";
1127         if (pcnt)
1128         {
1129                 parameter = parameters[0];
1130         }
1131         else
1132         {
1133                 WriteOpers("%s is rehashing config file %s",user->nick,CleanFilename(CONFIG_FILE));
1134                 ReadConfig(false,user);
1135         }
1136         FOREACH_MOD OnRehash(parameter);
1137 }
1138
1139 void handle_lusers(char **parameters, int pcnt, userrec *user)
1140 {
1141         // this lusers command shows one server at all times because
1142         // a protocol module must override it to show those stats.
1143         WriteServ(user->fd,"251 %s :There are %d users and %d invisible on 1 server",user->nick,usercnt()-usercount_invisible(),usercount_invisible());
1144         WriteServ(user->fd,"252 %s %d :operator(s) online",user->nick,usercount_opers());
1145         WriteServ(user->fd,"253 %s %d :unknown connections",user->nick,usercount_unknown());
1146         WriteServ(user->fd,"254 %s %d :channels formed",user->nick,chancount());
1147         WriteServ(user->fd,"254 %s :I have %d clients and 0 servers",user->nick,local_count());
1148 }
1149
1150 void handle_admin(char **parameters, int pcnt, userrec *user)
1151 {
1152         WriteServ(user->fd,"256 %s :Administrative info for %s",user->nick,ServerName);
1153         WriteServ(user->fd,"257 %s :Name     - %s",user->nick,AdminName);
1154         WriteServ(user->fd,"258 %s :Nickname - %s",user->nick,AdminNick);
1155         WriteServ(user->fd,"258 %s :E-Mail   - %s",user->nick,AdminEmail);
1156 }
1157
1158 void handle_ping(char **parameters, int pcnt, userrec *user)
1159 {
1160         WriteServ(user->fd,"PONG %s :%s",ServerName,parameters[0]);
1161 }
1162
1163 void handle_pong(char **parameters, int pcnt, userrec *user)
1164 {
1165         // set the user as alive so they survive to next ping
1166         user->lastping = 1;
1167 }
1168
1169 void handle_motd(char **parameters, int pcnt, userrec *user)
1170 {
1171         ShowMOTD(user);
1172 }
1173
1174 void handle_rules(char **parameters, int pcnt, userrec *user)
1175 {
1176         ShowRULES(user);
1177 }
1178
1179 void handle_user(char **parameters, int pcnt, userrec *user)
1180 {
1181         if (user->registered < 3)
1182         {
1183                 if (isident(parameters[0]) == 0) {
1184                         // This kinda Sucks, According to the RFC thou, its either this,
1185                         // or "You have already registered" :p -- Craig
1186                         WriteServ(user->fd,"461 %s USER :Not enough parameters",user->nick);
1187                 }
1188                 else {
1189                         /* We're not checking ident, but I'm not sure I like the idea of '~' prefixing.. */
1190                         /* XXX - Should this IDENTMAX + 1 be IDENTMAX - 1? Ok, users.h has it defined as
1191                          * char ident[IDENTMAX+2]; - WTF?
1192                          */
1193                         snprintf(user->ident, IDENTMAX+1, "~%s", parameters[0]);
1194                         strlcpy(user->fullname,parameters[3],MAXGECOS);
1195                         user->registered = (user->registered | 1);
1196                 }
1197         }
1198         else
1199         {
1200                 WriteServ(user->fd,"462 %s :You may not reregister",user->nick);
1201                 return;
1202         }
1203         /* parameters 2 and 3 are local and remote hosts, ignored when sent by client connection */
1204         if (user->registered == 3)
1205         {
1206                 /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */
1207                 FOREACH_MOD OnUserRegister(user);
1208                 ConnectUser(user);
1209         }
1210 }
1211
1212 void handle_userhost(char **parameters, int pcnt, userrec *user)
1213 {
1214         char Return[MAXBUF],junk[MAXBUF];
1215         snprintf(Return,MAXBUF,"302 %s :",user->nick);
1216         for (int i = 0; i < pcnt; i++)
1217         {
1218                 userrec *u = Find(parameters[i]);
1219                 if (u)
1220                 {
1221                         if (strchr(u->modes,'o'))
1222                         {
1223                                 snprintf(junk,MAXBUF,"%s*=+%s@%s ",u->nick,u->ident,u->host);
1224                                 strlcat(Return,junk,MAXBUF);
1225                         }
1226                         else
1227                         {
1228                                 snprintf(junk,MAXBUF,"%s=+%s@%s ",u->nick,u->ident,u->host);
1229                                 strlcat(Return,junk,MAXBUF);
1230                         }
1231                 }
1232         }
1233         WriteServ(user->fd,Return);
1234 }
1235
1236
1237 void handle_ison(char **parameters, int pcnt, userrec *user)
1238 {
1239         char Return[MAXBUF];
1240         snprintf(Return,MAXBUF,"303 %s :",user->nick);
1241         for (int i = 0; i < pcnt; i++)
1242         {
1243                 userrec *u = Find(parameters[i]);
1244                 if (u)
1245                 {
1246                         strlcat(Return,u->nick,MAXBUF);
1247                         strlcat(Return," ",MAXBUF);
1248                 }
1249         }
1250         WriteServ(user->fd,Return);
1251 }
1252
1253
1254 void handle_away(char **parameters, int pcnt, userrec *user)
1255 {
1256         if (pcnt)
1257         {
1258                 strlcpy(user->awaymsg,parameters[0],MAXAWAY);
1259                 WriteServ(user->fd,"306 %s :You have been marked as being away",user->nick);
1260         }
1261         else
1262         {
1263                 strlcpy(user->awaymsg,"",MAXAWAY);
1264                 WriteServ(user->fd,"305 %s :You are no longer marked as being away",user->nick);
1265         }
1266 }
1267
1268 void handle_whowas(char **parameters, int pcnt, userrec* user)
1269 {
1270         whowas_hash::iterator i = whowas.find(parameters[0]);
1271
1272         if (i == whowas.end())
1273         {
1274                 WriteServ(user->fd,"406 %s %s :There was no such nickname",user->nick,parameters[0]);
1275                 WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]);
1276         }
1277         else
1278         {
1279                 time_t rawtime = i->second->signon;
1280                 tm *timeinfo;
1281                 char b[MAXBUF];
1282
1283                 timeinfo = localtime(&rawtime);
1284                 strlcpy(b,asctime(timeinfo),MAXBUF);
1285                 b[strlen(b)-1] = '\0';
1286
1287                 WriteServ(user->fd,"314 %s %s %s %s * :%s",user->nick,i->second->nick,i->second->ident,i->second->dhost,i->second->fullname);
1288                 WriteServ(user->fd,"312 %s %s %s :%s",user->nick,i->second->nick,i->second->server,b);
1289                 WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]);
1290         }
1291
1292 }
1293
1294 void handle_trace(char **parameters, int pcnt, userrec *user)
1295 {
1296         for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
1297         {
1298                 if (i->second)
1299                 {
1300                         if (isnick(i->second->nick))
1301                         {
1302                                 if (strchr(i->second->modes,'o'))
1303                                 {
1304                                         WriteServ(user->fd,"205 %s :Oper 0 %s",user->nick,i->second->nick);
1305                                 }
1306                                 else
1307                                 {
1308                                         WriteServ(user->fd,"204 %s :User 0 %s",user->nick,i->second->nick);
1309                                 }
1310                         }
1311                         else
1312                         {
1313                                 WriteServ(user->fd,"203 %s :???? 0 [%s]",user->nick,i->second->host);
1314                         }
1315                 }
1316         }
1317 }
1318
1319 void handle_modules(char **parameters, int pcnt, userrec *user)
1320 {
1321         for (unsigned int i = 0; i < module_names.size(); i++)
1322         {
1323                 Version V = modules[i]->GetVersion();
1324                 char modulename[MAXBUF];
1325                 char flagstate[MAXBUF];
1326                 strcpy(flagstate,"");
1327                 if (V.Flags & VF_STATIC)
1328                         strlcat(flagstate,", static",MAXBUF);
1329                 if (V.Flags & VF_VENDOR)
1330                         strlcat(flagstate,", vendor",MAXBUF);
1331                 if (V.Flags & VF_COMMON)
1332                         strlcat(flagstate,", common",MAXBUF);
1333                 if (V.Flags & VF_SERVICEPROVIDER)
1334                         strlcat(flagstate,", service provider",MAXBUF);
1335                 if (!flagstate[0])
1336                         strcpy(flagstate,"  <no flags>");
1337                 strlcpy(modulename,module_names[i].c_str(),256);
1338                 if (strchr(user->modes,'o'))
1339                 {
1340                         WriteServ(user->fd,"900 %s :0x%08lx %d.%d.%d.%d %s (%s)",user->nick,modules[i],V.Major,V.Minor,V.Revision,V.Build,CleanFilename(modulename),flagstate+2);
1341                 }
1342                 else
1343                 {
1344                         WriteServ(user->fd,"900 %s :%s",user->nick,CleanFilename(modulename));
1345                 }
1346         }
1347         WriteServ(user->fd,"901 %s :End of MODULES list",user->nick);
1348 }
1349
1350 void handle_stats(char **parameters, int pcnt, userrec *user)
1351 {
1352         if (pcnt != 1)
1353         {
1354                 return;
1355         }
1356         if (strlen(parameters[0])>1)
1357         {
1358                 /* make the stats query 1 character long */
1359                 parameters[0][1] = '\0';
1360         }
1361
1362
1363         FOREACH_MOD OnStats(*parameters[0]);
1364
1365         if (*parameters[0] == 'c')
1366         {
1367                 /* This stats symbol must be handled by a linking module */
1368         }
1369
1370         if (*parameters[0] == 'i')
1371         {
1372                 int idx = 0;
1373                 for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++)
1374                 {
1375                         WriteServ(user->fd,"215 %s I * * * %d %d %s *",user->nick,MAXCLIENTS,idx,ServerName);
1376                         idx++;
1377                 }
1378         }
1379
1380         if (*parameters[0] == 'y')
1381         {
1382                 int idx = 0;
1383                 for (ClassVector::iterator i = Classes.begin(); i != Classes.end(); i++)
1384                 {
1385                         WriteServ(user->fd,"218 %s Y %d %d 0 %d %d",user->nick,idx,120,i->flood,i->registration_timeout);
1386                         idx++;
1387                 }
1388         }
1389
1390         if (*parameters[0] == 'U')
1391         {
1392                 char ulined[MAXBUF];
1393                 for (int i = 0; i < ConfValueEnum("uline",&config_f); i++)
1394                 {
1395                         ConfValue("uline","server",i,ulined,&config_f);
1396                         WriteServ(user->fd,"248 %s U %s",user->nick,ulined);
1397                 }
1398         }
1399
1400         if (*parameters[0] == 'P')
1401         {
1402                 int idx = 0;
1403                 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
1404                 {
1405                         if (strchr(i->second->modes,'o'))
1406                         {
1407                                 WriteServ(user->fd,"249 %s :%s (%s@%s) Idle: %d",user->nick,i->second->nick,i->second->ident,i->second->dhost,(TIME - i->second->idle_lastmsg));
1408                                 idx++;
1409                         }
1410                 }
1411                 WriteServ(user->fd,"249 %s :%d OPER(s)",user->nick,idx);
1412         }
1413
1414         if (*parameters[0] == 'k')
1415         {
1416                 stats_k(user);
1417         }
1418
1419         if (*parameters[0] == 'g')
1420         {
1421                 stats_g(user);
1422         }
1423
1424         if (*parameters[0] == 'q')
1425         {
1426                 stats_q(user);
1427         }
1428
1429         if (*parameters[0] == 'Z')
1430         {
1431                 stats_z(user);
1432         }
1433
1434         if (*parameters[0] == 'e')
1435         {
1436                 stats_e(user);
1437         }
1438
1439         /* stats m (list number of times each command has been used, plus bytecount) */
1440         if (*parameters[0] == 'm')
1441         {
1442                 for (unsigned int i = 0; i < cmdlist.size(); i++)
1443                 {
1444                         if (cmdlist[i].handler_function)
1445                         {
1446                                 if (cmdlist[i].use_count)
1447                                 {
1448                                         /* RPL_STATSCOMMANDS */
1449                                         WriteServ(user->fd,"212 %s %s %d %d",user->nick,cmdlist[i].command,cmdlist[i].use_count,cmdlist[i].total_bytes);
1450                                 }
1451                         }
1452                 }
1453
1454         }
1455
1456         /* stats z (debug and memory info) */
1457         if (*parameters[0] == 'z')
1458         {
1459                 rusage R;
1460                 WriteServ(user->fd,"249 %s :Users(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,clientlist.size(),clientlist.size()*sizeof(userrec),clientlist.bucket_count());
1461                 WriteServ(user->fd,"249 %s :Channels(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,chanlist.size(),chanlist.size()*sizeof(chanrec),chanlist.bucket_count());
1462                 WriteServ(user->fd,"249 %s :Commands(VECTOR) %d (%d bytes)",user->nick,cmdlist.size(),cmdlist.size()*sizeof(command_t));
1463                 WriteServ(user->fd,"249 %s :MOTD(VECTOR) %d, RULES(VECTOR) %d",user->nick,MOTD.size(),RULES.size());
1464                 WriteServ(user->fd,"249 %s :address_cache(HASH_MAP) %d (%d buckets)",user->nick,IP.size(),IP.bucket_count());
1465                 WriteServ(user->fd,"249 %s :Modules(VECTOR) %d (%d)",user->nick,modules.size(),modules.size()*sizeof(Module));
1466                 WriteServ(user->fd,"249 %s :ClassFactories(VECTOR) %d (%d)",user->nick,factory.size(),factory.size()*sizeof(ircd_module));
1467                 WriteServ(user->fd,"249 %s :Ports(STATIC_ARRAY) %d",user->nick,boundPortCount);
1468                 if (!getrusage(RUSAGE_SELF,&R))
1469                 {
1470                         WriteServ(user->fd,"249 %s :Total allocation: %luK (0x%lx)",user->nick,R.ru_maxrss,R.ru_maxrss);
1471                         WriteServ(user->fd,"249 %s :Signals:          %lu  (0x%lx)",user->nick,R.ru_nsignals,R.ru_nsignals);
1472                         WriteServ(user->fd,"249 %s :Page faults:      %lu  (0x%lx)",user->nick,R.ru_majflt,R.ru_majflt);
1473                         WriteServ(user->fd,"249 %s :Swaps:            %lu  (0x%lx)",user->nick,R.ru_nswap,R.ru_nswap);
1474                         WriteServ(user->fd,"249 %s :Context Switches: %lu  (0x%lx)",user->nick,R.ru_nvcsw+R.ru_nivcsw,R.ru_nvcsw+R.ru_nivcsw);
1475                 }
1476         }
1477
1478         if (*parameters[0] == 'T')
1479         {
1480                 WriteServ(user->fd,"249 Brain :accepts %d refused %d",statsAccept,statsRefused);
1481                 WriteServ(user->fd,"249 Brain :unknown commands %d",statsUnknown);
1482                 WriteServ(user->fd,"249 Brain :nick collisions %d",statsCollisions);
1483                 WriteServ(user->fd,"249 Brain :dns requests %d succeeded %d failed %d",statsDns,statsDnsGood,statsDnsBad);
1484                 WriteServ(user->fd,"249 Brain :connections %d",statsConnects);
1485                 WriteServ(user->fd,"249 Brain :bytes sent %dK recv %dK",(statsSent / 1024),(statsRecv / 1024));
1486         }
1487
1488         /* stats o */
1489         if (*parameters[0] == 'o')
1490         {
1491                 for (int i = 0; i < ConfValueEnum("oper",&config_f); i++)
1492                 {
1493                         char LoginName[MAXBUF];
1494                         char HostName[MAXBUF];
1495                         char OperType[MAXBUF];
1496                         ConfValue("oper","name",i,LoginName,&config_f);
1497                         ConfValue("oper","host",i,HostName,&config_f);
1498                         ConfValue("oper","type",i,OperType,&config_f);
1499                         WriteServ(user->fd,"243 %s O %s * %s %s 0",user->nick,HostName,LoginName,OperType);
1500                 }
1501         }
1502
1503         /* stats l (show user I/O stats) */
1504         if (*parameters[0] == 'l')
1505         {
1506                 WriteServ(user->fd,"211 %s :server:port nick bytes_in cmds_in bytes_out cmds_out",user->nick);
1507                 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
1508                 {
1509                         if (isnick(i->second->nick))
1510                         {
1511                                 WriteServ(user->fd,"211 %s :%s:%d %s %d %d %d %d",user->nick,i->second->server,i->second->port,i->second->nick,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
1512                         }
1513                         else
1514                         {
1515                                 WriteServ(user->fd,"211 %s :%s:%d (unknown@%d) %d %d %d %d",user->nick,i->second->server,i->second->port,i->second->fd,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
1516                         }
1517
1518                 }
1519         }
1520
1521         /* stats u (show server uptime) */
1522         if (*parameters[0] == 'u')
1523         {
1524                 time_t current_time = 0;
1525                 current_time = TIME;
1526                 time_t server_uptime = current_time - startup_time;
1527                 struct tm* stime;
1528                 stime = gmtime(&server_uptime);
1529                 /* i dont know who the hell would have an ircd running for over a year nonstop, but
1530                  * Craig suggested this, and it seemed a good idea so in it went */
1531                 if (stime->tm_year > 70)
1532                 {
1533                         WriteServ(user->fd,"242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick,(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
1534                 }
1535                 else
1536                 {
1537                         WriteServ(user->fd,"242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick,stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
1538                 }
1539         }
1540
1541         WriteServ(user->fd,"219 %s %s :End of /STATS report",user->nick,parameters[0]);
1542         WriteOpers("*** Notice: Stats '%s' requested by %s (%s@%s)",parameters[0],user->nick,user->ident,user->host);
1543
1544 }
1545
1546
1547 void handle_connect(char **parameters, int pcnt, userrec *user)
1548 {
1549 }
1550
1551 void handle_squit(char **parameters, int pcnt, userrec *user)
1552 {
1553 }
1554
1555 void handle_links(char **parameters, int pcnt, userrec *user)
1556 {
1557         WriteServ(user->fd,"364 %s %s %s :0 %s",user->nick,ServerName,ServerName,ServerDesc);
1558         WriteServ(user->fd,"365 %s * :End of /LINKS list.",user->nick);
1559 }
1560
1561 void handle_map(char **parameters, int pcnt, userrec *user)
1562 {
1563         // as with /LUSERS this does nothing without a linking
1564         // module to override its behaviour and display something
1565         // better.
1566         WriteServ(user->fd,"006 %s :%s",user->nick,ServerName);
1567         WriteServ(user->fd,"007 %s :End of /MAP",user->nick);
1568 }
1569
1570 bool is_uline(const char* server)
1571 {
1572         char ServName[MAXBUF];
1573
1574         if (!server)
1575                 return false;
1576         if (!(*server))
1577                 return true;
1578
1579         for (int i = 0; i < ConfValueEnum("uline",&config_f); i++)
1580         {
1581                 ConfValue("uline","server",i,ServName,&config_f);
1582                 if (!strcasecmp(server,ServName))
1583                 {
1584                         return true;
1585                 }
1586         }
1587         return false;
1588 }
1589 int operstrcmp(char* data,char* input)
1590 {
1591         int MOD_RESULT = 0;
1592         FOREACH_RESULT(OnOperCompare(data,input))
1593         log(DEBUG,"operstrcmp: %d",MOD_RESULT);
1594         if (MOD_RESULT == 1)
1595                 return 0;
1596         if (MOD_RESULT == -1)
1597                 return 1;
1598         log(DEBUG,"strcmp fallback: '%s' '%s' %d",data,input,strcmp(data,input));
1599         return strcmp(data,input);
1600 }
1601
1602 void handle_oper(char **parameters, int pcnt, userrec *user)
1603 {
1604         char LoginName[MAXBUF];
1605         char Password[MAXBUF];
1606         char OperType[MAXBUF];
1607         char TypeName[MAXBUF];
1608         char HostName[MAXBUF];
1609         char TheHost[MAXBUF];
1610         int j;
1611         bool found = false;
1612         bool fail2 = false;
1613
1614         snprintf(TheHost,MAXBUF,"%s@%s",user->ident,user->host);
1615
1616         for (int i = 0; i < ConfValueEnum("oper",&config_f); i++)
1617         {
1618                 ConfValue("oper","name",i,LoginName,&config_f);
1619                 ConfValue("oper","password",i,Password,&config_f);
1620                 ConfValue("oper","type",i,OperType,&config_f);
1621                 ConfValue("oper","host",i,HostName,&config_f);
1622                 if ((!strcmp(LoginName,parameters[0])) && (!operstrcmp(Password,parameters[1])) && (match(TheHost,HostName)))
1623                 {
1624                         fail2 = true;
1625                         for (j =0; j < ConfValueEnum("type",&config_f); j++)
1626                         {
1627                                 ConfValue("type","name",j,TypeName,&config_f);
1628
1629                                 if (!strcmp(TypeName,OperType))
1630                                 {
1631                                         /* found this oper's opertype */
1632                                         ConfValue("type","host",j,HostName,&config_f);
1633                                         if (*HostName)
1634                                                 ChangeDisplayedHost(user,HostName);
1635                                         strlcpy(user->oper,TypeName,NICKMAX);
1636                                         found = true;
1637                                         fail2 = false;
1638                                         break;
1639                                 }
1640                         }
1641                 }
1642                 if (found)
1643                         break;
1644         }
1645         if (found)
1646         {
1647                 /* correct oper credentials */
1648                 WriteOpers("*** %s (%s@%s) is now an IRC operator of type %s",user->nick,user->ident,user->host,OperType);
1649                 WriteServ(user->fd,"381 %s :You are now an IRC operator of type %s",user->nick,OperType);
1650                 if (!strchr(user->modes,'o'))
1651                 {
1652                         strcat(user->modes,"o");
1653                         WriteServ(user->fd,"MODE %s :+o",user->nick);
1654                         FOREACH_MOD OnOper(user,OperType);
1655                         log(DEFAULT,"OPER: %s!%s@%s opered as type: %s",user->nick,user->ident,user->host,OperType);
1656                         AddOper(user);
1657                 }
1658         }
1659         else
1660         {
1661                 if (!fail2)
1662                 {
1663                         WriteServ(user->fd,"491 %s :Invalid oper credentials",user->nick);
1664                         WriteOpers("*** WARNING! Failed oper attempt by %s!%s@%s!",user->nick,user->ident,user->host);
1665                         log(DEFAULT,"OPER: Failed oper attempt by %s!%s@%s: user, host or password did not match.",user->nick,user->ident,user->host);
1666                 }
1667                 else
1668                 {
1669                         WriteServ(user->fd,"491 %s :Your oper block does not have a valid opertype associated with it",user->nick);
1670                         WriteOpers("*** CONFIGURATION ERROR! Oper block mismatch for OperType %s",OperType);
1671                         log(DEFAULT,"OPER: Failed oper attempt by %s!%s@%s: credentials valid, but oper type nonexistent.",user->nick,user->ident,user->host);
1672                 }
1673         }
1674         return;
1675 }
1676
1677 void handle_nick(char **parameters, int pcnt, userrec *user)
1678 {
1679         if (pcnt < 1)
1680         {
1681                 log(DEBUG,"not enough params for handle_nick");
1682                 return;
1683         }
1684         if (!parameters[0])
1685         {
1686                 log(DEBUG,"invalid parameter passed to handle_nick");
1687                 return;
1688         }
1689         if (!parameters[0][0])
1690         {
1691                 log(DEBUG,"zero length new nick passed to handle_nick");
1692                 return;
1693         }
1694         if (!user)
1695         {
1696                 log(DEBUG,"invalid user passed to handle_nick");
1697                 return;
1698         }
1699         if (!user->nick)
1700         {
1701                 log(DEBUG,"invalid old nick passed to handle_nick");
1702                 return;
1703         }
1704         if (!strcasecmp(user->nick,parameters[0]))
1705         {
1706                 log(DEBUG,"old nick is new nick, skipping");
1707                 return;
1708         }
1709         else
1710         {
1711                 if (strlen(parameters[0]) > 1)
1712                 {
1713                         if (parameters[0][0] == ':')
1714                         {
1715                                 *parameters[0]++;
1716                         }
1717                 }
1718                 if (matches_qline(parameters[0]))
1719                 {
1720                         WriteOpers("*** Q-Lined nickname %s from %s!%s@%s: %s",parameters[0],user->nick,user->ident,user->host,matches_qline(parameters[0]));
1721                         WriteServ(user->fd,"432 %s %s :Invalid nickname: %s",user->nick,parameters[0],matches_qline(parameters[0]));
1722                         return;
1723                 }
1724                 if ((Find(parameters[0])) && (Find(parameters[0]) != user))
1725                 {
1726                         WriteServ(user->fd,"433 %s %s :Nickname is already in use.",user->nick,parameters[0]);
1727                         return;
1728                 }
1729         }
1730         if (isnick(parameters[0]) == 0)
1731         {
1732                 WriteServ(user->fd,"432 %s %s :Erroneous Nickname",user->nick,parameters[0]);
1733                 return;
1734         }
1735
1736         if (user->registered == 7)
1737         {
1738                 int MOD_RESULT = 0;
1739                 FOREACH_RESULT(OnUserPreNick(user,parameters[0]));
1740                 if (MOD_RESULT) {
1741                         // if a module returns true, the nick change is silently forbidden.
1742                         return;
1743                 }
1744
1745                 WriteCommon(user,"NICK %s",parameters[0]);
1746
1747         }
1748
1749         char oldnick[NICKMAX];
1750         strlcpy(oldnick,user->nick,NICKMAX);
1751
1752         /* change the nick of the user in the users_hash */
1753         user = ReHashNick(user->nick, parameters[0]);
1754         /* actually change the nick within the record */
1755         if (!user) return;
1756         if (!user->nick) return;
1757
1758         strlcpy(user->nick, parameters[0],NICKMAX);
1759
1760         log(DEBUG,"new nick set: %s",user->nick);
1761
1762         if (user->registered < 3)
1763         {
1764                 user->registered = (user->registered | 2);
1765                 // dont attempt to look up the dns until they pick a nick... because otherwise their pointer WILL change
1766                 // and unless we're lucky we'll get a duff one later on.
1767                 //user->dns_done = (!lookup_dns(user->nick));
1768                 //if (user->dns_done)
1769                 //      log(DEBUG,"Aborting dns lookup of %s because dns server experienced a failure.",user->nick);
1770
1771 #ifdef THREADED_DNS
1772                 // initialize their dns lookup thread
1773                 if (pthread_create(&user->dnsthread, NULL, dns_task, (void *)user) != 0)
1774                 {
1775                         log(DEBUG,"Failed to create DNS lookup thread for user %s",user->nick);
1776                 }
1777 #else
1778                 user->dns_done = (!lookup_dns(user->nick));
1779                 if (user->dns_done)
1780                         log(DEBUG,"Aborting dns lookup of %s because dns server experienced a failure.",user->nick);
1781 #endif
1782
1783         }
1784         if (user->registered == 3)
1785         {
1786                 /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */
1787                 FOREACH_MOD OnUserRegister(user);
1788                 ConnectUser(user);
1789         }
1790         if (user->registered == 7)
1791         {
1792                 FOREACH_MOD OnUserPostNick(user,oldnick);
1793         }
1794 }
1795
1796 long duration(const char* str)
1797 {
1798         char n_field[MAXBUF];
1799         long total = 0;
1800         const char* str_end = str + strlen(str);
1801         n_field[0] = 0;
1802
1803         if ((!strchr(str,'s')) && (!strchr(str,'m')) && (!strchr(str,'h')) && (!strchr(str,'d')) && (!strchr(str,'w')) && (!strchr(str,'y')))
1804         {
1805                 std::string n = str;
1806                 n = n + "s";
1807                 return duration(n.c_str());
1808         }
1809
1810         for (char* i = (char*)str; i < str_end; i++)
1811         {
1812                 // if we have digits, build up a string for the value in n_field,
1813                 // up to 10 digits in size.
1814                 if ((*i >= '0') && (*i <= '9'))
1815                 {
1816                         strlcat(n_field,i,10);
1817                 }
1818                 else
1819                 {
1820                         // we dont have a digit, check for numeric tokens
1821                         switch (tolower(*i))
1822                         {
1823                                 case 's':
1824                                         total += atoi(n_field);
1825                                 break;
1826
1827                                 case 'm':
1828                                         total += (atoi(n_field)*duration_m);
1829                                 break;
1830
1831                                 case 'h':
1832                                         total += (atoi(n_field)*duration_h);
1833                                 break;
1834
1835                                 case 'd':
1836                                         total += (atoi(n_field)*duration_d);
1837                                 break;
1838
1839                                 case 'w':
1840                                         total += (atoi(n_field)*duration_w);
1841                                 break;
1842
1843                                 case 'y':
1844                                         total += (atoi(n_field)*duration_y);
1845                                 break;
1846                         }
1847                         n_field[0] = 0;
1848                 }
1849         }
1850         // add trailing seconds
1851         total += atoi(n_field);
1852
1853         return total;
1854 }
1855
1856 /* All other ircds when doing this check usually just look for a string of *@* or *. We're smarter than that, though. */
1857
1858 bool host_matches_everyone(std::string mask, userrec* user)
1859 {
1860         char insanemasks[MAXBUF];
1861         char buffer[MAXBUF];
1862         char itrigger[MAXBUF];
1863         ConfValue("insane","hostmasks",0,insanemasks,&config_f);
1864         ConfValue("insane","trigger",0,itrigger,&config_f);
1865         if (*itrigger == 0)
1866                 strlcpy(itrigger,"95.5",MAXBUF);
1867         if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
1868                 return false;
1869         long matches = 0;
1870         for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
1871         {
1872                 strlcpy(buffer,u->second->ident,MAXBUF);
1873                 strlcat(buffer,"@",MAXBUF);
1874                 strlcat(buffer,u->second->host,MAXBUF);
1875                 if (match(buffer,mask.c_str()))
1876                         matches++;
1877         }
1878         float percent = ((float)matches / (float)clientlist.size()) * 100;
1879         if (percent > (float)atof(itrigger))
1880         {
1881                 WriteOpers("*** \2WARNING\2: %s tried to set a G/K/E line mask of %s, which covers %.2f%% of the network!",user->nick,mask.c_str(),percent);
1882                 return true;
1883         }
1884         return false;
1885 }
1886
1887 bool ip_matches_everyone(std::string ip, userrec* user)
1888 {
1889         char insanemasks[MAXBUF];
1890         char itrigger[MAXBUF];
1891         ConfValue("insane","ipmasks",0,insanemasks,&config_f);
1892         ConfValue("insane","trigger",0,itrigger,&config_f);
1893         if (*itrigger == 0)
1894                 strlcpy(itrigger,"95.5",MAXBUF);
1895         if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
1896                 return false;
1897         long matches = 0;
1898         for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
1899         {
1900                 if (match(u->second->ip,ip.c_str()))
1901                         matches++;
1902         }
1903         float percent = ((float)matches / (float)clientlist.size()) * 100;
1904         if (percent > (float)atof(itrigger))
1905         {
1906                 WriteOpers("*** \2WARNING\2: %s tried to set a Z line mask of %s, which covers %.2f%% of the network!",user->nick,ip.c_str(),percent);
1907                 return true;
1908         }
1909         return false;
1910 }
1911
1912 bool nick_matches_everyone(std::string nick, userrec* user)
1913 {
1914         char insanemasks[MAXBUF];
1915         char itrigger[MAXBUF];
1916         ConfValue("insane","nickmasks",0,insanemasks,&config_f);
1917         ConfValue("insane","trigger",0,itrigger,&config_f);
1918         if (*itrigger == 0)
1919                 strlcpy(itrigger,"95.5",MAXBUF);
1920         if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
1921                 return false;
1922         long matches = 0;
1923         for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
1924         {
1925                 if (match(u->second->nick,nick.c_str()))
1926                         matches++;
1927         }
1928         float percent = ((float)matches / (float)clientlist.size()) * 100;
1929         if (percent > (float)atof(itrigger))
1930         {
1931                 WriteOpers("*** \2WARNING\2: %s tried to set a Q line mask of %s, which covers %.2f%% of the network!",user->nick,nick.c_str(),percent);
1932                 return true;
1933         }
1934         return false;
1935 }
1936
1937 void handle_kline(char **parameters, int pcnt, userrec *user)
1938 {
1939         if (pcnt >= 3)
1940         {
1941                 if (host_matches_everyone(parameters[0],user))
1942                         return;
1943                 add_kline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
1944                 FOREACH_MOD OnAddKLine(duration(parameters[1]), user, parameters[2], parameters[0]);
1945                 if (!duration(parameters[1]))
1946                 {
1947                         WriteOpers("*** %s added permenant K-line for %s.",user->nick,parameters[0]);
1948                 }
1949                 else
1950                 {
1951                         WriteOpers("*** %s added timed K-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
1952                 }
1953                 apply_lines(APPLY_KLINES);
1954         }
1955         else
1956         {
1957                 if (del_kline(parameters[0]))
1958                 {
1959                         FOREACH_MOD OnDelKLine(user, parameters[0]);
1960                         WriteOpers("*** %s Removed K-line on %s.",user->nick,parameters[0]);
1961                 }
1962                 else
1963                 {
1964                         WriteServ(user->fd,"NOTICE %s :*** K-Line %s not found in list, try /stats k.",user->nick,parameters[0]);
1965                 }
1966         }
1967 }
1968
1969 void handle_eline(char **parameters, int pcnt, userrec *user)
1970 {
1971         if (pcnt >= 3)
1972         {
1973                 if (host_matches_everyone(parameters[0],user))
1974                         return;
1975                 add_eline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
1976                 FOREACH_MOD OnAddELine(duration(parameters[1]), user, parameters[2], parameters[0]);
1977                 if (!duration(parameters[1]))
1978                 {
1979                         WriteOpers("*** %s added permenant E-line for %s.",user->nick,parameters[0]);
1980                 }
1981                 else
1982                 {
1983                         WriteOpers("*** %s added timed E-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
1984                 }
1985         }
1986         else
1987         {
1988                 if (del_eline(parameters[0]))
1989                 {
1990                         FOREACH_MOD OnDelELine(user, parameters[0]);
1991                         WriteOpers("*** %s Removed E-line on %s.",user->nick,parameters[0]);
1992                 }
1993                 else
1994                 {
1995                         WriteServ(user->fd,"NOTICE %s :*** E-Line %s not found in list, try /stats e.",user->nick,parameters[0]);
1996                 }
1997         }
1998         // no need to apply the lines for an eline
1999 }
2000
2001 void handle_gline(char **parameters, int pcnt, userrec *user)
2002 {
2003         if (pcnt >= 3)
2004         {
2005                 if (host_matches_everyone(parameters[0],user))
2006                         return;
2007                 add_gline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2008                 FOREACH_MOD OnAddGLine(duration(parameters[1]), user, parameters[2], parameters[0]);
2009                 if (!duration(parameters[1]))
2010                 {
2011                         WriteOpers("*** %s added permenant G-line for %s.",user->nick,parameters[0]);
2012                 }
2013                 else
2014                 {
2015                         WriteOpers("*** %s added timed G-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2016                 }
2017                 apply_lines(APPLY_GLINES);
2018         }
2019         else
2020         {
2021                 if (del_gline(parameters[0]))
2022                 {
2023                         FOREACH_MOD OnDelGLine(user, parameters[0]);
2024                         WriteOpers("*** %s Removed G-line on %s.",user->nick,parameters[0]);
2025                 }
2026                 else
2027                 {
2028                         WriteServ(user->fd,"NOTICE %s :*** G-Line %s not found in list, try /stats g.",user->nick,parameters[0]);
2029                 }
2030         }
2031 }
2032
2033 void handle_zline(char **parameters, int pcnt, userrec *user)
2034 {
2035         if (pcnt >= 3)
2036         {
2037                 if (strchr(parameters[0],'@'))
2038                 {
2039                         WriteServ(user->fd,"NOTICE %s :*** You cannot include a username in a zline, a zline must ban only an IP mask",user->nick);
2040                         return;
2041                 }
2042                 if (ip_matches_everyone(parameters[0],user))
2043                         return;
2044                 add_zline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2045                 FOREACH_MOD OnAddZLine(duration(parameters[1]), user, parameters[2], parameters[0]);
2046                 if (!duration(parameters[1]))
2047                 {
2048                         WriteOpers("*** %s added permenant Z-line for %s.",user->nick,parameters[0]);
2049                 }
2050                 else
2051                 {
2052                         WriteOpers("*** %s added timed Z-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2053                 }
2054                 apply_lines(APPLY_ZLINES);
2055         }
2056         else
2057         {
2058                 if (del_zline(parameters[0]))
2059                 {
2060                         FOREACH_MOD OnDelZLine(user, parameters[0]);
2061                         WriteOpers("*** %s Removed Z-line on %s.",user->nick,parameters[0]);
2062                 }
2063                 else
2064                 {
2065                         WriteServ(user->fd,"NOTICE %s :*** Z-Line %s not found in list, try /stats Z.",user->nick,parameters[0]);
2066                 }
2067         }
2068 }
2069
2070 void handle_qline(char **parameters, int pcnt, userrec *user)
2071 {
2072         if (pcnt >= 3)
2073         {
2074                 if (nick_matches_everyone(parameters[0],user))
2075                         return;
2076                 add_qline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2077                 FOREACH_MOD OnAddQLine(duration(parameters[1]), user, parameters[2], parameters[0]);
2078                 if (!duration(parameters[1]))
2079                 {
2080                         WriteOpers("*** %s added permenant Q-line for %s.",user->nick,parameters[0]);
2081                 }
2082                 else
2083                 {
2084                         WriteOpers("*** %s added timed Q-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2085                 }
2086                 apply_lines(APPLY_QLINES);
2087         }
2088         else
2089         {
2090                 if (del_qline(parameters[0]))
2091                 {
2092                         FOREACH_MOD OnDelQLine(user, parameters[0]);
2093                         WriteOpers("*** %s Removed Q-line on %s.",user->nick,parameters[0]);
2094                 }
2095                 else
2096                 {
2097                         WriteServ(user->fd,"NOTICE %s :*** Q-Line %s not found in list, try /stats k.",user->nick,parameters[0]);
2098                 }
2099         }
2100 }
2101
2102