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