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