src/commands.cpp

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