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