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