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