src/users.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2007 InspIRCd Development Team
   6  * See: http://www.inspircd.org/wiki/index.php/Credits
   7  *
   8  * This program is free but copyrighted software; see
   9  *            the file COPYING for details.
  10  *
  11  * ---------------------------------------------------
  12  */
  13
  14 #include "configreader.h"
  15 #include "channels.h"
  16 #include "users.h"
  17 #include "inspircd.h"
  18 #include <stdarg.h>
  19 #include "socketengine.h"
  20 #include "wildcard.h"
  21 #include "xline.h"
  22 #include "commands/cmd_whowas.h"
  23
  24 static unsigned long already_sent[MAX_DESCRIPTORS] = {0};
  25
  26 /* XXX: Used for speeding up WriteCommon operations */
  27 unsigned long uniq_id = 0;
  28
  29 bool InitTypes(ServerConfig* conf, const char* tag)
  30 {
  31         if (conf->opertypes.size())
  32         {
  33                 for (opertype_t::iterator n = conf->opertypes.begin(); n != conf->opertypes.end(); n++)
  34                 {
  35                         if (n->second)
  36                                 delete[] n->second;
  37                 }
  38         }
  39
  40         conf->opertypes.clear();
  41         return true;
  42 }
  43
  44 bool InitClasses(ServerConfig* conf, const char* tag)
  45 {
  46         if (conf->operclass.size())
  47         {
  48                 for (operclass_t::iterator n = conf->operclass.begin(); n != conf->operclass.end(); n++)
  49                 {
  50                         if (n->second)
  51                                 delete[] n->second;
  52                 }
  53         }
  54
  55         conf->operclass.clear();
  56         return true;
  57 }
  58
  59 bool DoType(ServerConfig* conf, const char* tag, char** entries, ValueList &values, int* types)
  60 {
  61         const char* TypeName = values[0].GetString();
  62         const char* Classes = values[1].GetString();
  63
  64         conf->opertypes[TypeName] = strdup(Classes);
  65         return true;
  66 }
  67
  68 bool DoClass(ServerConfig* conf, const char* tag, char** entries, ValueList &values, int* types)
  69 {
  70         const char* ClassName = values[0].GetString();
  71         const char* CommandList = values[1].GetString();
  72
  73         conf->operclass[ClassName] = strdup(CommandList);
  74         return true;
  75 }
  76
  77 bool DoneClassesAndTypes(ServerConfig* conf, const char* tag)
  78 {
  79         return true;
  80 }
  81
  82 std::string userrec::ProcessNoticeMasks(const char *sm)
  83 {
  84         bool adding = true, oldadding = false;
  85         const char *c = sm;
  86         std::string output;
  87
  88         while (c && *c)
  89         {
  90                 switch (*c)
  91                 {
  92                         case '+':
  93                                 adding = true;
  94                         break;
  95                         case '-':
  96                                 adding = false;
  97                         break;
  98                         case '*':
  99                                 for (unsigned char d = 'A'; d <= 'z'; d++)
 100                                 {
 101                                         if (ServerInstance->SNO->IsEnabled(d))
 102                                         {
 103                                                 if ((!IsNoticeMaskSet(d) && adding) || (IsNoticeMaskSet(d) && !adding))
 104                                                 {
 105                                                         if ((oldadding != adding) || (!output.length()))
 106                                                                 output += (adding ? '+' : '-');
 107
 108                                                         this->SetNoticeMask(d, adding);
 109
 110                                                         output += d;
 111                                                 }
 112                                         }
 113                                         oldadding = adding;
 114                                 }
 115                         break;
 116                         default:
 117                                 if ((*c >= 'A') && (*c <= 'z') && (ServerInstance->SNO->IsEnabled(*c)))
 118                                 {
 119                                         if ((!IsNoticeMaskSet(*c) && adding) || (IsNoticeMaskSet(*c) && !adding))
 120                                         {
 121                                                 if ((oldadding != adding) || (!output.length()))
 122                                                         output += (adding ? '+' : '-');
 123
 124                                                 this->SetNoticeMask(*c, adding);
 125
 126                                                 output += *c;
 127                                         }
 128                                 }
 129                                 oldadding = adding;
 130                         break;
 131                 }
 132
 133                 *c++;
 134         }
 135
 136         return output;
 137 }
 138
 139 void userrec::StartDNSLookup()
 140 {
 141         try
 142         {
 143                 bool cached;
 144                 const char* ip = this->GetIPString();
 145
 146                 /* Special case for 4in6 (Have i mentioned i HATE 4in6?) */
 147                 if (!strncmp(ip, "0::ffff:", 8))
 148                         res_reverse = new UserResolver(this->ServerInstance, this, ip + 8, DNS_QUERY_PTR4, cached);
 149                 else
 150                         res_reverse = new UserResolver(this->ServerInstance, this, ip, this->GetProtocolFamily() == AF_INET ? DNS_QUERY_PTR4 : DNS_QUERY_PTR6, cached);
 151
 152                 this->ServerInstance->AddResolver(res_reverse, cached);
 153         }
 154         catch (CoreException& e)
 155         {
 156                 ServerInstance->Log(DEBUG,"Error in resolver: %s",e.GetReason());
 157         }
 158 }
 159
 160 UserResolver::UserResolver(InspIRCd* Instance, userrec* user, std::string to_resolve, QueryType qt, bool &cache) :
 161         Resolver(Instance, to_resolve, qt, cache), bound_user(user)
 162 {
 163         this->fwd = (qt == DNS_QUERY_A || qt == DNS_QUERY_AAAA);
 164         this->bound_fd = user->GetFd();
 165 }
 166
 167 void UserResolver::OnLookupComplete(const std::string &result, unsigned int ttl, bool cached)
 168 {
 169         if ((!this->fwd) && (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user))
 170         {
 171                 this->bound_user->stored_host = result;
 172                 try
 173                 {
 174                         /* Check we didnt time out */
 175                         if (this->bound_user->registered != REG_ALL)
 176                         {
 177                                 bool cached;
 178 #ifdef IPV6
 179                                 if (this->bound_user->GetProtocolFamily() == AF_INET6)
 180                                 {
 181                                         /* IPV6 forward lookup (with possibility of 4in6) */
 182                                         const char* ip = this->bound_user->GetIPString();
 183                                         bound_user->res_forward = new UserResolver(this->ServerInstance, this->bound_user, result, (!strncmp(ip, "0::ffff:", 8) ? DNS_QUERY_A : DNS_QUERY_AAAA), cached);
 184                                 }
 185                                 else
 186                                 {
 187                                         /* IPV4 lookup (mixed protocol mode) */
 188                                         bound_user->res_forward = new UserResolver(this->ServerInstance, this->bound_user, result, DNS_QUERY_A, cached);
 189                                 }
 190 #else
 191                                 /* IPV4 lookup (ipv4 only mode) */
 192                                 bound_user->res_forward = new UserResolver(this->ServerInstance, this->bound_user, result, DNS_QUERY_A, cached);
 193 #endif
 194                                 this->ServerInstance->AddResolver(bound_user->res_forward, cached);
 195                         }
 196                 }
 197                 catch (CoreException& e)
 198                 {
 199                         ServerInstance->Log(DEBUG,"Error in resolver: %s",e.GetReason());
 200                 }
 201         }
 202         else if ((this->fwd) && (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user))
 203         {
 204                 /* Both lookups completed */
 205                 std::string result2 = "0::ffff:";
 206                 result2.append(result);
 207                 if (this->bound_user->GetIPString() == result || this->bound_user->GetIPString() == result2)
 208                 {
 209                         std::string hostname = this->bound_user->stored_host;
 210                         if (hostname.length() < 65)
 211                         {
 212                                 /* Check we didnt time out */
 213                                 if (this->bound_user->registered != REG_ALL)
 214                                 {
 215                                         /* Hostnames starting with : are not a good thing (tm) */
 216                                         if (*(hostname.c_str()) == ':')
 217                                                 hostname = "0" + hostname;
 218
 219                                         this->bound_user->WriteServ("NOTICE Auth :*** Found your hostname (%s)%s", hostname.c_str(), (cached ? " -- cached" : ""));
 220                                         this->bound_user->dns_done = true;
 221                                         strlcpy(this->bound_user->dhost, hostname.c_str(),64);
 222                                         strlcpy(this->bound_user->host, hostname.c_str(),64);
 223                                         /* Invalidate cache */
 224                                         this->bound_user->InvalidateCache();
 225                                 }
 226                         }
 227                         else
 228                         {
 229                                 this->bound_user->WriteServ("NOTICE Auth :*** Your hostname is longer than the maximum of 64 characters, using your IP address (%s) instead.", this->bound_user->GetIPString());
 230                         }
 231                 }
 232                 else
 233                 {
 234                         this->bound_user->WriteServ("NOTICE Auth :*** Your hostname does not match up with your IP address. Sorry, using your IP address (%s) instead.", this->bound_user->GetIPString());
 235                 }
 236         }
 237 }
 238
 239 void UserResolver::OnError(ResolverError e, const std::string &errormessage)
 240 {
 241         if (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user)
 242         {
 243                 /* Error message here */
 244                 this->bound_user->WriteServ("NOTICE Auth :*** Could not resolve your hostname: %s; using your IP address (%s) instead.", errormessage.c_str(), this->bound_user->GetIPString());
 245                 this->bound_user->dns_done = true;
 246         }
 247 }
 248
 249
 250 bool userrec::IsNoticeMaskSet(unsigned char sm)
 251 {
 252         return (snomasks[sm-65]);
 253 }
 254
 255 void userrec::SetNoticeMask(unsigned char sm, bool value)
 256 {
 257         snomasks[sm-65] = value;
 258 }
 259
 260 const char* userrec::FormatNoticeMasks()
 261 {
 262         static char data[MAXBUF];
 263         int offset = 0;
 264
 265         for (int n = 0; n < 64; n++)
 266         {
 267                 if (snomasks[n])
 268                         data[offset++] = n+65;
 269         }
 270
 271         data[offset] = 0;
 272         return data;
 273 }
 274
 275
 276
 277 bool userrec::IsModeSet(unsigned char m)
 278 {
 279         return (modes[m-65]);
 280 }
 281
 282 void userrec::SetMode(unsigned char m, bool value)
 283 {
 284         modes[m-65] = value;
 285 }
 286
 287 const char* userrec::FormatModes()
 288 {
 289         static char data[MAXBUF];
 290         int offset = 0;
 291         for (int n = 0; n < 64; n++)
 292         {
 293                 if (modes[n])
 294                         data[offset++] = n+65;
 295         }
 296         data[offset] = 0;
 297         return data;
 298 }
 299
 300 void userrec::DecrementModes()
 301 {
 302         for (int n = 0; n < 64; n++)
 303         {
 304                 if (modes[n])
 305                 {
 306                         ModeHandler* mh = ServerInstance->Modes->FindMode(n+65, MODETYPE_USER);
 307                         if (mh)
 308                                 mh->ChangeCount(-1);
 309                 }
 310         }
 311 }
 312
 313 userrec::userrec(InspIRCd* Instance) : ServerInstance(Instance)
 314 {
 315         // the PROPER way to do it, AVOID bzero at *ALL* costs
 316         *password = *nick = *ident = *host = *dhost = *fullname = *awaymsg = *oper = 0;
 317         server = (char*)Instance->FindServerNamePtr(Instance->Config->ServerName);
 318         reset_due = ServerInstance->Time();
 319         age = ServerInstance->Time(true);
 320         lines_in = lastping = signon = idle_lastmsg = nping = registered = 0;
 321         ChannelCount = timeout = flood = bytes_in = bytes_out = cmds_in = cmds_out = 0;
 322         exempt = haspassed = dns_done = false;
 323         fd = -1;
 324         recvq = "";
 325         sendq = "";
 326         WriteError = "";
 327         res_forward = res_reverse = NULL;
 328         ip = NULL;
 329         chans.clear();
 330         invites.clear();
 331         memset(modes,0,sizeof(modes));
 332         memset(snomasks,0,sizeof(snomasks));
 333         /* Invalidate cache */
 334         cached_fullhost = cached_hostip = cached_makehost = cached_fullrealhost = NULL;
 335 }
 336
 337 userrec::~userrec()
 338 {
 339         this->InvalidateCache();
 340         this->DecrementModes();
 341         if (ip)
 342         {
 343                 clonemap::iterator x = ServerInstance->local_clones.find(this->GetIPString());
 344                 if (x != ServerInstance->local_clones.end())
 345                 {
 346                         x->second--;
 347                         if (!x->second)
 348                         {
 349                                 ServerInstance->local_clones.erase(x);
 350                         }
 351                 }
 352
 353                 clonemap::iterator y = ServerInstance->global_clones.find(this->GetIPString());
 354                 if (y != ServerInstance->global_clones.end())
 355                 {
 356                         y->second--;
 357                         if (!y->second)
 358                         {
 359                                 ServerInstance->global_clones.erase(y);
 360                         }
 361                 }
 362
 363                 if (this->GetProtocolFamily() == AF_INET)
 364                 {
 365                         delete (sockaddr_in*)ip;
 366                 }
 367 #ifdef SUPPORT_IP6LINKS
 368                 else
 369                 {
 370                         delete (sockaddr_in6*)ip;
 371                 }
 372 #endif
 373         }
 374 }
 375
 376 char* userrec::MakeHost()
 377 {
 378         if (this->cached_makehost)
 379                 return this->cached_makehost;
 380
 381         char nhost[MAXBUF];
 382         /* This is much faster than snprintf */
 383         char* t = nhost;
 384         for(char* n = ident; *n; n++)
 385                 *t++ = *n;
 386         *t++ = '@';
 387         for(char* n = host; *n; n++)
 388                 *t++ = *n;
 389         *t = 0;
 390
 391         this->cached_makehost = strdup(nhost);
 392
 393         return this->cached_makehost;
 394 }
 395
 396 char* userrec::MakeHostIP()
 397 {
 398         if (this->cached_hostip)
 399                 return this->cached_hostip;
 400
 401         char ihost[MAXBUF];
 402         /* This is much faster than snprintf */
 403         char* t = ihost;
 404         for(char* n = ident; *n; n++)
 405                 *t++ = *n;
 406         *t++ = '@';
 407         for(const char* n = this->GetIPString(); *n; n++)
 408                 *t++ = *n;
 409         *t = 0;
 410
 411         this->cached_hostip = strdup(ihost);
 412
 413         return this->cached_hostip;
 414 }
 415
 416 void userrec::CloseSocket()
 417 {
 418         shutdown(this->fd,2);
 419         close(this->fd);
 420 }
 421
 422 char* userrec::GetFullHost()
 423 {
 424         if (this->cached_fullhost)
 425                 return this->cached_fullhost;
 426
 427         char result[MAXBUF];
 428         char* t = result;
 429         for(char* n = nick; *n; n++)
 430                 *t++ = *n;
 431         *t++ = '!';
 432         for(char* n = ident; *n; n++)
 433                 *t++ = *n;
 434         *t++ = '@';
 435         for(char* n = dhost; *n; n++)
 436                 *t++ = *n;
 437         *t = 0;
 438
 439         this->cached_fullhost = strdup(result);
 440
 441         return this->cached_fullhost;
 442 }
 443
 444 char* userrec::MakeWildHost()
 445 {
 446         static char nresult[MAXBUF];
 447         char* t = nresult;
 448         *t++ = '*';     *t++ = '!';
 449         *t++ = '*';     *t++ = '@';
 450         for(char* n = dhost; *n; n++)
 451                 *t++ = *n;
 452         *t = 0;
 453         return nresult;
 454 }
 455
 456 int userrec::ReadData(void* buffer, size_t size)
 457 {
 458         if (IS_LOCAL(this))
 459         {
 460                 return read(this->fd, buffer, size);
 461         }
 462         else
 463                 return 0;
 464 }
 465
 466
 467 char* userrec::GetFullRealHost()
 468 {
 469         if (this->cached_fullrealhost)
 470                 return this->cached_fullrealhost;
 471
 472         char fresult[MAXBUF];
 473         char* t = fresult;
 474         for(char* n = nick; *n; n++)
 475                 *t++ = *n;
 476         *t++ = '!';
 477         for(char* n = ident; *n; n++)
 478                 *t++ = *n;
 479         *t++ = '@';
 480         for(char* n = host; *n; n++)
 481                 *t++ = *n;
 482         *t = 0;
 483
 484         this->cached_fullrealhost = strdup(fresult);
 485
 486         return this->cached_fullrealhost;
 487 }
 488
 489 bool userrec::IsInvited(const irc::string &channel)
 490 {
 491         for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
 492         {
 493                 if (channel == *i)
 494                 {
 495                         return true;
 496                 }
 497         }
 498         return false;
 499 }
 500
 501 InvitedList* userrec::GetInviteList()
 502 {
 503         return &invites;
 504 }
 505
 506 void userrec::InviteTo(const irc::string &channel)
 507 {
 508         invites.push_back(channel);
 509 }
 510
 511 void userrec::RemoveInvite(const irc::string &channel)
 512 {
 513         for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
 514         {
 515                 if (channel == *i)
 516                 {
 517                         invites.erase(i);
 518                         return;
 519                 }
 520         }
 521 }
 522
 523 bool userrec::HasPermission(const std::string &command)
 524 {
 525         char* mycmd;
 526         char* savept;
 527         char* savept2;
 528
 529         /*
 530          * users on remote servers can completely bypass all permissions based checks.
 531          * This prevents desyncs when one server has different type/class tags to another.
 532          * That having been said, this does open things up to the possibility of source changes
 533          * allowing remote kills, etc - but if they have access to the src, they most likely have
 534          * access to the conf - so it's an end to a means either way.
 535          */
 536         if (!IS_LOCAL(this))
 537                 return true;
 538
 539         // are they even an oper at all?
 540         if (*this->oper)
 541         {
 542                 opertype_t::iterator iter_opertype = ServerInstance->Config->opertypes.find(this->oper);
 543                 if (iter_opertype != ServerInstance->Config->opertypes.end())
 544                 {
 545                         char* Classes = strdup(iter_opertype->second);
 546                         char* myclass = strtok_r(Classes," ",&savept);
 547                         while (myclass)
 548                         {
 549                                 operclass_t::iterator iter_operclass = ServerInstance->Config->operclass.find(myclass);
 550                                 if (iter_operclass != ServerInstance->Config->operclass.end())
 551                                 {
 552                                         char* CommandList = strdup(iter_operclass->second);
 553                                         mycmd = strtok_r(CommandList," ",&savept2);
 554                                         while (mycmd)
 555                                         {
 556                                                 if ((!strcasecmp(mycmd,command.c_str())) || (*mycmd == '*'))
 557                                                 {
 558                                                         free(Classes);
 559                                                         free(CommandList);
 560                                                         return true;
 561                                                 }
 562                                                 mycmd = strtok_r(NULL," ",&savept2);
 563                                         }
 564                                         free(CommandList);
 565                                 }
 566                                 myclass = strtok_r(NULL," ",&savept);
 567                         }
 568                         free(Classes);
 569                 }
 570         }
 571         return false;
 572 }
 573
 574 /** NOTE: We cannot pass a const reference to this method.
 575  * The string is changed by the workings of the method,
 576  * so that if we pass const ref, we end up copying it to
 577  * something we can change anyway. Makes sense to just let
 578  * the compiler do that copy for us.
 579  */
 580 bool userrec::AddBuffer(std::string a)
 581 {
 582         try
 583         {
 584                 std::string::size_type i = a.rfind('\r');
 585
 586                 while (i != std::string::npos)
 587                 {
 588                         a.erase(i, 1);
 589                         i = a.rfind('\r');
 590                 }
 591
 592                 if (a.length())
 593                         recvq.append(a);
 594
 595                 if (recvq.length() > (unsigned)this->recvqmax)
 596                 {
 597                         this->SetWriteError("RecvQ exceeded");
 598                         ServerInstance->WriteOpers("*** User %s RecvQ of %d exceeds connect class maximum of %d",this->nick,recvq.length(),this->recvqmax);
 599                         return false;
 600                 }
 601
 602                 return true;
 603         }
 604
 605         catch (...)
 606         {
 607                 ServerInstance->Log(DEBUG,"Exception in userrec::AddBuffer()");
 608                 return false;
 609         }
 610 }
 611
 612 bool userrec::BufferIsReady()
 613 {
 614         return (recvq.find('\n') != std::string::npos);
 615 }
 616
 617 void userrec::ClearBuffer()
 618 {
 619         recvq = "";
 620 }
 621
 622 std::string userrec::GetBuffer()
 623 {
 624         try
 625         {
 626                 if (!recvq.length())
 627                         return "";
 628
 629                 /* Strip any leading \r or \n off the string.
 630                  * Usually there are only one or two of these,
 631                  * so its is computationally cheap to do.
 632                  */
 633                 while ((*recvq.begin() == '\r') || (*recvq.begin() == '\n'))
 634                         recvq.erase(recvq.begin());
 635
 636                 for (std::string::iterator x = recvq.begin(); x != recvq.end(); x++)
 637                 {
 638                         /* Find the first complete line, return it as the
 639                          * result, and leave the recvq as whats left
 640                          */
 641                         if (*x == '\n')
 642                         {
 643                                 std::string ret = std::string(recvq.begin(), x);
 644                                 recvq.erase(recvq.begin(), x + 1);
 645                                 return ret;
 646                         }
 647                 }
 648                 return "";
 649         }
 650
 651         catch (...)
 652         {
 653                 ServerInstance->Log(DEBUG,"Exception in userrec::GetBuffer()");
 654                 return "";
 655         }
 656 }
 657
 658 void userrec::AddWriteBuf(const std::string &data)
 659 {
 660         if (*this->GetWriteError())
 661                 return;
 662
 663         if (sendq.length() + data.length() > (unsigned)this->sendqmax)
 664         {
 665                 /*
 666                  * Fix by brain - Set the error text BEFORE calling writeopers, because
 667                  * if we dont it'll recursively  call here over and over again trying
 668                  * to repeatedly add the text to the sendq!
 669                  */
 670                 this->SetWriteError("SendQ exceeded");
 671                 ServerInstance->WriteOpers("*** User %s SendQ of %d exceeds connect class maximum of %d",this->nick,sendq.length() + data.length(),this->sendqmax);
 672                 return;
 673         }
 674
 675         try
 676         {
 677                 if (data.length() > 512)
 678                         sendq.append(data.substr(0,510)).append("\r\n");
 679                 else
 680                         sendq.append(data);
 681         }
 682         catch (...)
 683         {
 684                 this->SetWriteError("SendQ exceeded");
 685                 ServerInstance->WriteOpers("*** User %s SendQ got an exception",this->nick);
 686         }
 687 }
 688
 689 // send AS MUCH OF THE USERS SENDQ as we are able to (might not be all of it)
 690 void userrec::FlushWriteBuf()
 691 {
 692         try
 693         {
 694                 if ((this->fd == FD_MAGIC_NUMBER) || (*this->GetWriteError()))
 695                 {
 696                         sendq = "";
 697                 }
 698                 if ((sendq.length()) && (this->fd != FD_MAGIC_NUMBER))
 699                 {
 700                         int old_sendq_length = sendq.length();
 701                         int n_sent = write(this->fd, this->sendq.data(), this->sendq.length());
 702                         if (n_sent == -1)
 703                         {
 704                                 if (errno == EAGAIN)
 705                                 {
 706                                         /* The socket buffer is full. This isnt fatal,
 707                                          * try again later.
 708                                          */
 709                                         this->ServerInstance->SE->WantWrite(this);
 710                                 }
 711                                 else
 712                                 {
 713                                         /* Fatal error, set write error and bail
 714                                          */
 715                                         this->SetWriteError(strerror(errno));
 716                                         return;
 717                                 }
 718                         }
 719                         else
 720                         {
 721                                 /* advance the queue */
 722                                 if (n_sent)
 723                                         this->sendq = this->sendq.substr(n_sent);
 724                                 /* update the user's stats counters */
 725                                 this->bytes_out += n_sent;
 726                                 this->cmds_out++;
 727                                 if (n_sent != old_sendq_length)
 728                                         this->ServerInstance->SE->WantWrite(this);
 729                         }
 730                 }
 731         }
 732
 733         catch (...)
 734         {
 735                 ServerInstance->Log(DEBUG,"Exception in userrec::FlushWriteBuf()");
 736         }
 737 }
 738
 739 void userrec::SetWriteError(const std::string &error)
 740 {
 741         try
 742         {
 743                 // don't try to set the error twice, its already set take the first string.
 744                 if (this->WriteError.empty())
 745                         this->WriteError = error;
 746         }
 747
 748         catch (...)
 749         {
 750                 ServerInstance->Log(DEBUG,"Exception in userrec::SetWriteError()");
 751         }
 752 }
 753
 754 const char* userrec::GetWriteError()
 755 {
 756         return this->WriteError.c_str();
 757 }
 758
 759 void userrec::Oper(const std::string &opertype)
 760 {
 761         try
 762         {
 763                 this->modes[UM_OPERATOR] = 1;
 764                 this->WriteServ("MODE %s :+o", this->nick);
 765                 FOREACH_MOD(I_OnOper, OnOper(this, opertype));
 766                 ServerInstance->Log(DEFAULT,"OPER: %s!%s@%s opered as type: %s", this->nick, this->ident, this->host, opertype.c_str());
 767                 strlcpy(this->oper, opertype.c_str(), NICKMAX - 1);
 768                 ServerInstance->all_opers.push_back(this);
 769                 FOREACH_MOD(I_OnPostOper,OnPostOper(this, opertype));
 770         }
 771
 772         catch (...)
 773         {
 774                 ServerInstance->Log(DEBUG,"Exception in userrec::Oper()");
 775         }
 776 }
 777
 778 void userrec::UnOper()
 779 {
 780         try
 781         {
 782                 if (*this->oper)
 783                 {
 784                         *this->oper = 0;
 785                         this->modes[UM_OPERATOR] = 0;
 786                         for (std::vector<userrec*>::iterator a = ServerInstance->all_opers.begin(); a < ServerInstance->all_opers.end(); a++)
 787                         {
 788                                 if (*a == this)
 789                                 {
 790                                         ServerInstance->all_opers.erase(a);
 791                                         return;
 792                                 }
 793                         }
 794                 }
 795         }
 796
 797         catch (...)
 798         {
 799                 ServerInstance->Log(DEBUG,"Exception in userrec::UnOper()");
 800         }
 801 }
 802
 803 void userrec::QuitUser(InspIRCd* Instance, userrec *user, const std::string &quitreason)
 804 {
 805         Instance->GlobalCulls.AddItem(user, quitreason.c_str());
 806 }
 807
 808
 809 /* adds or updates an entry in the whowas list */
 810 void userrec::AddToWhoWas()
 811 {
 812         command_t* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
 813         if (whowas_command)
 814         {
 815                 std::deque<classbase*> params;
 816                 params.push_back(this);
 817                 whowas_command->HandleInternal(WHOWAS_ADD, params);
 818         }
 819 }
 820
 821 /* add a client connection to the sockets list */
 822 void userrec::AddClient(InspIRCd* Instance, int socket, int port, bool iscached, int socketfamily, sockaddr* ip)
 823 {
 824         std::string tempnick = ConvToStr(socket) + "-unknown";
 825         user_hash::iterator iter = Instance->clientlist->find(tempnick);
 826         char ipaddr[MAXBUF];
 827 #ifdef IPV6
 828         if (socketfamily == AF_INET6)
 829                 inet_ntop(AF_INET6, &((const sockaddr_in6*)ip)->sin6_addr, ipaddr, sizeof(ipaddr));
 830         else
 831                 inet_ntop(AF_INET, &((const sockaddr_in*)ip)->sin_addr, ipaddr, sizeof(ipaddr));
 832 #else
 833         inet_ntop(AF_INET, &((const sockaddr_in*)ip)->sin_addr, ipaddr, sizeof(ipaddr));
 834 #endif
 835         userrec* New;
 836         int j = 0;
 837
 838         Instance->unregistered_count++;
 839
 840         /*
 841          * fix by brain.
 842          * as these nicknames are 'RFC impossible', we can be sure nobody is going to be
 843          * using one as a registered connection. As they are per fd, we can also safely assume
 844          * that we wont have collisions. Therefore, if the nick exists in the list, its only
 845          * used by a dead socket, erase the iterator so that the new client may reclaim it.
 846          * this was probably the cause of 'server ignores me when i hammer it with reconnects'
 847          * issue in earlier alphas/betas
 848          */
 849         if (iter != Instance->clientlist->end())
 850         {
 851                 userrec* goner = iter->second;
 852                 DELETE(goner);
 853                 Instance->clientlist->erase(iter);
 854         }
 855
 856         New = new userrec(Instance);
 857         (*(Instance->clientlist))[tempnick] = New;
 858         New->fd = socket;
 859         strlcpy(New->nick,tempnick.c_str(),NICKMAX-1);
 860
 861         New->server = Instance->FindServerNamePtr(Instance->Config->ServerName);
 862         /* We don't need range checking here, we KNOW 'unknown\0' will fit into the ident field. */
 863         strcpy(New->ident, "unknown");
 864
 865         New->registered = REG_NONE;
 866         New->signon = Instance->Time() + Instance->Config->dns_timeout;
 867         New->lastping = 1;
 868
 869         New->SetSockAddr(socketfamily, ipaddr, port);
 870
 871         /* Smarter than your average bear^H^H^H^Hset of strlcpys. */
 872         for (const char* temp = New->GetIPString(); *temp && j < 64; temp++, j++)
 873                 New->dhost[j] = New->host[j] = *temp;
 874         New->dhost[j] = New->host[j] = 0;
 875
 876         Instance->AddLocalClone(New);
 877         Instance->AddGlobalClone(New);
 878
 879         ConnectClass* i = New->GetClass();
 880
 881         if ((!i) || (i->GetType() == CC_DENY))
 882         {
 883                 userrec::QuitUser(Instance, New,"Unauthorised connection");
 884                 return;
 885         }
 886
 887         New->pingmax = i->GetPingTime();
 888         New->nping = Instance->Time() + i->GetPingTime() + Instance->Config->dns_timeout;
 889         New->timeout = Instance->Time() + i->GetRegTimeout();
 890         New->flood = i->GetFlood();
 891         New->threshold = i->GetThreshold();
 892         New->sendqmax = i->GetSendqMax();
 893         New->recvqmax = i->GetRecvqMax();
 894
 895         Instance->local_users.push_back(New);
 896
 897         if ((Instance->local_users.size() > Instance->Config->SoftLimit) || (Instance->local_users.size() >= MAXCLIENTS))
 898         {
 899                 Instance->WriteOpers("*** Warning: softlimit value has been reached: %d clients", Instance->Config->SoftLimit);
 900                 userrec::QuitUser(Instance, New,"No more connections allowed");
 901                 return;
 902         }
 903
 904         /*
 905          * XXX -
 906          * this is done as a safety check to keep the file descriptors within range of fd_ref_table.
 907          * its a pretty big but for the moment valid assumption:
 908          * file descriptors are handed out starting at 0, and are recycled as theyre freed.
 909          * therefore if there is ever an fd over 65535, 65536 clients must be connected to the
 910          * irc server at once (or the irc server otherwise initiating this many connections, files etc)
 911          * which for the time being is a physical impossibility (even the largest networks dont have more
 912          * than about 10,000 users on ONE server!)
 913          */
 914         if ((unsigned int)socket >= MAX_DESCRIPTORS)
 915         {
 916                 userrec::QuitUser(Instance, New, "Server is full");
 917                 return;
 918         }
 919
 920         New->exempt = (Instance->XLines->matches_exception(New) != NULL);
 921         if (!New->exempt)
 922         {
 923                 ZLine* r = Instance->XLines->matches_zline(ipaddr);
 924                 if (r)
 925                 {
 926                         char reason[MAXBUF];
 927                         snprintf(reason,MAXBUF,"Z-Lined: %s",r->reason);
 928                         userrec::QuitUser(Instance, New, reason);
 929                         return;
 930                 }
 931         }
 932
 933         if (socket > -1)
 934         {
 935                 if (!Instance->SE->AddFd(New))
 936                 {
 937                         userrec::QuitUser(Instance, New, "Internal error handling connection");
 938                         return;
 939                 }
 940         }
 941
 942         /* NOTE: even if dns lookups are *off*, we still need to display this.
 943          * BOPM and other stuff requires it.
 944          */
 945         New->WriteServ("NOTICE Auth :*** Looking up your hostname...");
 946 }
 947
 948 unsigned long userrec::GlobalCloneCount()
 949 {
 950         clonemap::iterator x = ServerInstance->global_clones.find(this->GetIPString());
 951         if (x != ServerInstance->global_clones.end())
 952                 return x->second;
 953         else
 954                 return 0;
 955 }
 956
 957 unsigned long userrec::LocalCloneCount()
 958 {
 959         clonemap::iterator x = ServerInstance->local_clones.find(this->GetIPString());
 960         if (x != ServerInstance->local_clones.end())
 961                 return x->second;
 962         else
 963                 return 0;
 964 }
 965
 966 void userrec::FullConnect()
 967 {
 968         ServerInstance->stats->statsConnects++;
 969         this->idle_lastmsg = ServerInstance->Time();
 970
 971         ConnectClass* a = this->GetClass();
 972
 973         if ((!a) || (a->GetType() == CC_DENY))
 974         {
 975                 ServerInstance->GlobalCulls.AddItem(this,"Unauthorised connection");
 976                 return;
 977         }
 978
 979         if ((!a->GetPass().empty()) && (!this->haspassed))
 980         {
 981                 ServerInstance->GlobalCulls.AddItem(this,"Invalid password");
 982                 return;
 983         }
 984
 985         if (this->LocalCloneCount() > a->GetMaxLocal())
 986         {
 987                 ServerInstance->GlobalCulls.AddItem(this, "No more connections allowed from your host via this connect class (local)");
 988                 ServerInstance->WriteOpers("*** WARNING: maximum LOCAL connections (%ld) exceeded for IP %s", a->GetMaxLocal(), this->GetIPString());
 989                 return;
 990         }
 991         else if (this->GlobalCloneCount() > a->GetMaxGlobal())
 992         {
 993                 ServerInstance->GlobalCulls.AddItem(this, "No more connections allowed from your host via this connect class (global)");
 994                 ServerInstance->WriteOpers("*** WARNING: maximum GLOBAL connections (%ld) exceeded for IP %s",a->GetMaxGlobal(), this->GetIPString());
 995                 return;
 996         }
 997
 998         if (!this->exempt)
 999         {
1000                 GLine* r = ServerInstance->XLines->matches_gline(this);
1001
1002                 if (r)
1003                 {
1004                         char reason[MAXBUF];
1005                         snprintf(reason,MAXBUF,"G-Lined: %s",r->reason);
1006                         ServerInstance->GlobalCulls.AddItem(this, reason);
1007                         return;
1008                 }
1009
1010                 KLine* n = ServerInstance->XLines->matches_kline(this);
1011
1012                 if (n)
1013                 {
1014                         char reason[MAXBUF];
1015                         snprintf(reason,MAXBUF,"K-Lined: %s",n->reason);
1016                         ServerInstance->GlobalCulls.AddItem(this, reason);
1017                         return;
1018                 }
1019
1020         }
1021
1022         this->WriteServ("NOTICE Auth :Welcome to \002%s\002!",ServerInstance->Config->Network);
1023         this->WriteServ("001 %s :Welcome to the %s IRC Network %s!%s@%s",this->nick, ServerInstance->Config->Network, this->nick, this->ident, this->host);
1024         this->WriteServ("002 %s :Your host is %s, running version %s",this->nick,ServerInstance->Config->ServerName,VERSION);
1025         this->WriteServ("003 %s :This server was created %s %s", this->nick, __TIME__, __DATE__);
1026         this->WriteServ("004 %s %s %s %s %s %s", this->nick, ServerInstance->Config->ServerName, VERSION, ServerInstance->Modes->UserModeList().c_str(), ServerInstance->Modes->ChannelModeList().c_str(), ServerInstance->Modes->ParaModeList().c_str());
1027
1028         ServerInstance->Config->Send005(this);
1029
1030         this->ShowMOTD();
1031
1032         /* Now registered */
1033         if (ServerInstance->unregistered_count)
1034                 ServerInstance->unregistered_count--;
1035
1036         /*
1037          * fix 3 by brain, move registered = 7 below these so that spurious modes and host
1038          * changes dont go out onto the network and produce 'fake direction'.
1039          */
1040         FOREACH_MOD(I_OnUserConnect,OnUserConnect(this));
1041
1042         this->registered = REG_ALL;
1043
1044         FOREACH_MOD(I_OnPostConnect,OnPostConnect(this));
1045
1046         ServerInstance->SNO->WriteToSnoMask('c',"Client connecting on port %d: %s!%s@%s [%s]", this->GetPort(), this->nick, this->ident, this->host, this->GetIPString());
1047 }
1048
1049 /** userrec::UpdateNick()
1050  * re-allocates a nick in the user_hash after they change nicknames,
1051  * returns a pointer to the new user as it may have moved
1052  */
1053 userrec* userrec::UpdateNickHash(const char* New)
1054 {
1055         try
1056         {
1057                 //user_hash::iterator newnick;
1058                 user_hash::iterator oldnick = ServerInstance->clientlist->find(this->nick);
1059
1060                 if (!strcasecmp(this->nick,New))
1061                         return oldnick->second;
1062
1063                 if (oldnick == ServerInstance->clientlist->end())
1064                         return NULL; /* doesnt exist */
1065
1066                 userrec* olduser = oldnick->second;
1067                 (*(ServerInstance->clientlist))[New] = olduser;
1068                 ServerInstance->clientlist->erase(oldnick);
1069                 return olduser;
1070         }
1071
1072         catch (...)
1073         {
1074                 ServerInstance->Log(DEBUG,"Exception in userrec::UpdateNickHash()");
1075                 return NULL;
1076         }
1077 }
1078
1079 void userrec::InvalidateCache()
1080 {
1081         /* Invalidate cache */
1082         if (cached_fullhost)
1083                 free(cached_fullhost);
1084         if (cached_hostip)
1085                 free(cached_hostip);
1086         if (cached_makehost)
1087                 free(cached_makehost);
1088         if (cached_fullrealhost)
1089                 free(cached_fullrealhost);
1090         cached_fullhost = cached_hostip = cached_makehost = cached_fullrealhost = NULL;
1091 }
1092
1093 bool userrec::ForceNickChange(const char* newnick)
1094 {
1095         try
1096         {
1097                 int MOD_RESULT = 0;
1098
1099                 this->InvalidateCache();
1100
1101                 FOREACH_RESULT(I_OnUserPreNick,OnUserPreNick(this, newnick));
1102
1103                 if (MOD_RESULT)
1104                 {
1105                         ServerInstance->stats->statsCollisions++;
1106                         return false;
1107                 }
1108
1109                 if (ServerInstance->XLines->matches_qline(newnick))
1110                 {
1111                         ServerInstance->stats->statsCollisions++;
1112                         return false;
1113                 }
1114
1115                 if (this->registered == REG_ALL)
1116                 {
1117                         const char* pars[1];
1118                         pars[0] = newnick;
1119                         std::string cmd = "NICK";
1120                         return (ServerInstance->Parser->CallHandler(cmd, pars, 1, this) == CMD_SUCCESS);
1121                 }
1122                 return false;
1123         }
1124
1125         catch (...)
1126         {
1127                 ServerInstance->Log(DEBUG,"Exception in userrec::ForceNickChange()");
1128                 return false;
1129         }
1130 }
1131
1132 void userrec::SetSockAddr(int protocol_family, const char* ip, int port)
1133 {
1134         switch (protocol_family)
1135         {
1136 #ifdef SUPPORT_IP6LINKS
1137                 case AF_INET6:
1138                 {
1139                         sockaddr_in6* sin = new sockaddr_in6;
1140                         sin->sin6_family = AF_INET6;
1141                         sin->sin6_port = port;
1142                         inet_pton(AF_INET6, ip, &sin->sin6_addr);
1143                         this->ip = (sockaddr*)sin;
1144                 }
1145                 break;
1146 #endif
1147                 case AF_INET:
1148                 {
1149                         sockaddr_in* sin = new sockaddr_in;
1150                         sin->sin_family = AF_INET;
1151                         sin->sin_port = port;
1152                         inet_pton(AF_INET, ip, &sin->sin_addr);
1153                         this->ip = (sockaddr*)sin;
1154                 }
1155                 break;
1156                 default:
1157                         ServerInstance->Log(DEBUG,"Ut oh, I dont know protocol %d to be set on '%s'!", protocol_family, this->nick);
1158                 break;
1159         }
1160 }
1161
1162 int userrec::GetPort()
1163 {
1164         if (this->ip == NULL)
1165                 return 0;
1166
1167         switch (this->GetProtocolFamily())
1168         {
1169 #ifdef SUPPORT_IP6LINKS
1170                 case AF_INET6:
1171                 {
1172                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1173                         return sin->sin6_port;
1174                 }
1175                 break;
1176 #endif
1177                 case AF_INET:
1178                 {
1179                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1180                         return sin->sin_port;
1181                 }
1182                 break;
1183                 default:
1184                 break;
1185         }
1186         return 0;
1187 }
1188
1189 int userrec::GetProtocolFamily()
1190 {
1191         if (this->ip == NULL)
1192                 return 0;
1193
1194         sockaddr_in* sin = (sockaddr_in*)this->ip;
1195         return sin->sin_family;
1196 }
1197
1198 const char* userrec::GetIPString()
1199 {
1200         static char buf[1024];
1201
1202         if (this->ip == NULL)
1203                 return "";
1204
1205         switch (this->GetProtocolFamily())
1206         {
1207 #ifdef SUPPORT_IP6LINKS
1208                 case AF_INET6:
1209                 {
1210                         static char temp[1024];
1211
1212                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1213                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1214                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1215                         if (*buf == ':')
1216                         {
1217                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1218                                 *temp = '0';
1219                                 return temp;
1220                         }
1221                         return buf;
1222                 }
1223                 break;
1224 #endif
1225                 case AF_INET:
1226                 {
1227                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1228                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1229                         return buf;
1230                 }
1231                 break;
1232                 default:
1233                 break;
1234         }
1235         return "";
1236 }
1237
1238 const char* userrec::GetIPString(char* buf)
1239 {
1240         if (this->ip == NULL)
1241         {
1242                 *buf = 0;
1243                 return buf;
1244         }
1245
1246         switch (this->GetProtocolFamily())
1247         {
1248 #ifdef SUPPORT_IP6LINKS
1249                 case AF_INET6:
1250                 {
1251                         static char temp[1024];
1252
1253                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1254                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1255                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1256                         if (*buf == ':')
1257                         {
1258                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1259                                 *temp = '0';
1260                                 strlcpy(buf, temp, sizeof(temp));
1261                         }
1262                         return buf;
1263                 }
1264                 break;
1265 #endif
1266                 case AF_INET:
1267                 {
1268                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1269                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1270                         return buf;
1271                 }
1272                 break;
1273
1274                 default:
1275                 break;
1276         }
1277         return "";
1278 }
1279
1280 /** NOTE: We cannot pass a const reference to this method.
1281  * The string is changed by the workings of the method,
1282  * so that if we pass const ref, we end up copying it to
1283  * something we can change anyway. Makes sense to just let
1284  * the compiler do that copy for us.
1285  */
1286 void userrec::Write(std::string text)
1287 {
1288         if ((this->fd < 0) || (this->fd > MAX_DESCRIPTORS))
1289                 return;
1290
1291         try
1292         {
1293                 /* ServerInstance->Log(DEBUG,"<- %s", text.c_str());
1294                  * WARNING: The above debug line is VERY loud, do NOT
1295                  * enable it till we have a good way of filtering it
1296                  * out of the logs (e.g. 1.2 would be good).
1297                  */
1298                 text.append("\r\n");
1299         }
1300         catch (...)
1301         {
1302                 ServerInstance->Log(DEBUG,"Exception in userrec::Write() std::string::append");
1303                 return;
1304         }
1305
1306         if (ServerInstance->Config->GetIOHook(this->GetPort()))
1307         {
1308                 try
1309                 {
1310                         ServerInstance->Config->GetIOHook(this->GetPort())->OnRawSocketWrite(this->fd, text.data(), text.length());
1311                 }
1312                 catch (CoreException& modexcept)
1313                 {
1314                         ServerInstance->Log(DEBUG, "%s threw an exception: %s", modexcept.GetSource(), modexcept.GetReason());
1315                 }
1316         }
1317         else
1318         {
1319                 this->AddWriteBuf(text);
1320         }
1321         ServerInstance->stats->statsSent += text.length();
1322         this->ServerInstance->SE->WantWrite(this);
1323 }
1324
1325 /** Write()
1326  */
1327 void userrec::Write(const char *text, ...)
1328 {
1329         va_list argsPtr;
1330         char textbuffer[MAXBUF];
1331
1332         va_start(argsPtr, text);
1333         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1334         va_end(argsPtr);
1335
1336         this->Write(std::string(textbuffer));
1337 }
1338
1339 void userrec::WriteServ(const std::string& text)
1340 {
1341         char textbuffer[MAXBUF];
1342
1343         snprintf(textbuffer,MAXBUF,":%s %s",ServerInstance->Config->ServerName,text.c_str());
1344         this->Write(std::string(textbuffer));
1345 }
1346
1347 /** WriteServ()
1348  *  Same as Write(), except `text' is prefixed with `:server.name '.
1349  */
1350 void userrec::WriteServ(const char* text, ...)
1351 {
1352         va_list argsPtr;
1353         char textbuffer[MAXBUF];
1354
1355         va_start(argsPtr, text);
1356         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1357         va_end(argsPtr);
1358
1359         this->WriteServ(std::string(textbuffer));
1360 }
1361
1362
1363 void userrec::WriteFrom(userrec *user, const std::string &text)
1364 {
1365         char tb[MAXBUF];
1366
1367         snprintf(tb,MAXBUF,":%s %s",user->GetFullHost(),text.c_str());
1368
1369         this->Write(std::string(tb));
1370 }
1371
1372
1373 /* write text from an originating user to originating user */
1374
1375 void userrec::WriteFrom(userrec *user, const char* text, ...)
1376 {
1377         va_list argsPtr;
1378         char textbuffer[MAXBUF];
1379
1380         va_start(argsPtr, text);
1381         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1382         va_end(argsPtr);
1383
1384         this->WriteFrom(user, std::string(textbuffer));
1385 }
1386
1387
1388 /* write text to an destination user from a source user (e.g. user privmsg) */
1389
1390 void userrec::WriteTo(userrec *dest, const char *data, ...)
1391 {
1392         char textbuffer[MAXBUF];
1393         va_list argsPtr;
1394
1395         va_start(argsPtr, data);
1396         vsnprintf(textbuffer, MAXBUF, data, argsPtr);
1397         va_end(argsPtr);
1398
1399         this->WriteTo(dest, std::string(textbuffer));
1400 }
1401
1402 void userrec::WriteTo(userrec *dest, const std::string &data)
1403 {
1404         dest->WriteFrom(this, data);
1405 }
1406
1407
1408 void userrec::WriteCommon(const char* text, ...)
1409 {
1410         char textbuffer[MAXBUF];
1411         va_list argsPtr;
1412
1413         if (this->registered != REG_ALL)
1414                 return;
1415
1416         va_start(argsPtr, text);
1417         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1418         va_end(argsPtr);
1419
1420         this->WriteCommon(std::string(textbuffer));
1421 }
1422
1423 void userrec::WriteCommon(const std::string &text)
1424 {
1425         try
1426         {
1427                 bool sent_to_at_least_one = false;
1428                 char tb[MAXBUF];
1429
1430                 if (this->registered != REG_ALL)
1431                         return;
1432
1433                 uniq_id++;
1434
1435                 /* We dont want to be doing this n times, just once */
1436                 snprintf(tb,MAXBUF,":%s %s",this->GetFullHost(),text.c_str());
1437                 std::string out = tb;
1438
1439                 for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1440                 {
1441                         CUList* ulist = v->first->GetUsers();
1442                         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1443                         {
1444                                 if ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id))
1445                                 {
1446                                         already_sent[i->second->fd] = uniq_id;
1447                                         i->second->Write(out);
1448                                         sent_to_at_least_one = true;
1449                                 }
1450                         }
1451                 }
1452
1453                 /*
1454                  * if the user was not in any channels, no users will receive the text. Make sure the user
1455                  * receives their OWN message for WriteCommon
1456                  */
1457                 if (!sent_to_at_least_one)
1458                 {
1459                         this->Write(std::string(tb));
1460                 }
1461         }
1462
1463         catch (...)
1464         {
1465                 ServerInstance->Log(DEBUG,"Exception in userrec::WriteCommon()");
1466         }
1467 }
1468
1469
1470 /* write a formatted string to all users who share at least one common
1471  * channel, NOT including the source user e.g. for use in QUIT
1472  */
1473
1474 void userrec::WriteCommonExcept(const char* text, ...)
1475 {
1476         char textbuffer[MAXBUF];
1477         va_list argsPtr;
1478
1479         va_start(argsPtr, text);
1480         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1481         va_end(argsPtr);
1482
1483         this->WriteCommonExcept(std::string(textbuffer));
1484 }
1485
1486 void userrec::WriteCommonExcept(const std::string &text)
1487 {
1488         bool quit_munge = false;
1489         char oper_quit[MAXBUF];
1490         char textbuffer[MAXBUF];
1491         char tb1[MAXBUF];
1492         char tb2[MAXBUF];
1493         std::string out1;
1494         std::string out2;
1495
1496         strlcpy(textbuffer, text.c_str(), MAXBUF);
1497
1498         if (this->registered != REG_ALL)
1499                 return;
1500
1501         uniq_id++;
1502
1503         snprintf(tb1,MAXBUF,":%s %s",this->GetFullHost(),textbuffer);
1504
1505         /* TODO: We need some form of WriteCommonExcept that will send two lines, one line to
1506          * opers and the other line to non-opers, then all this hidebans and hidesplits gunk
1507          * can go byebye.
1508          */
1509         if (ServerInstance->Config->HideSplits)
1510         {
1511                 char* check = textbuffer + 6;
1512
1513                 if (!strncasecmp(textbuffer, "QUIT :",6))
1514                 {
1515                         std::stringstream split(check);
1516                         std::string server_one;
1517                         std::string server_two;
1518
1519                         split >> server_one;
1520                         split >> server_two;
1521
1522                         if ((ServerInstance->FindServerName(server_one)) && (ServerInstance->FindServerName(server_two)))
1523                         {
1524                                 strlcpy(oper_quit,textbuffer,MAXQUIT);
1525                                 strlcpy(check,"*.net *.split",MAXQUIT);
1526                                 quit_munge = true;
1527                                 snprintf(tb2,MAXBUF,":%s %s",this->GetFullHost(),oper_quit);
1528                                 out2 = tb2;
1529                         }
1530                 }
1531         }
1532
1533         if ((ServerInstance->Config->HideBans) && (!quit_munge))
1534         {
1535                 if ((!strncasecmp(textbuffer, "QUIT :G-Lined:",14)) || (!strncasecmp(textbuffer, "QUIT :K-Lined:",14))
1536                 || (!strncasecmp(textbuffer, "QUIT :Q-Lined:",14)) || (!strncasecmp(textbuffer, "QUIT :Z-Lined:",14)))
1537                 {
1538                         char* check = textbuffer + 13;
1539                         strlcpy(oper_quit,textbuffer,MAXQUIT);
1540                         *check = 0;  // We don't need to strlcpy, we just chop it from the :
1541                         quit_munge = true;
1542                         snprintf(tb2,MAXBUF,":%s %s",this->GetFullHost(),oper_quit);
1543                         out2 = tb2;
1544                 }
1545         }
1546
1547         out1 = tb1;
1548
1549         for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1550         {
1551                 CUList *ulist = v->first->GetUsers();
1552                 for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1553                 {
1554                         if (this != i->second)
1555                         {
1556                                 if ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id))
1557                                 {
1558                                         already_sent[i->second->fd] = uniq_id;
1559                                         if (quit_munge)
1560                                                 i->second->Write(*i->second->oper ? out2 : out1);
1561                                         else
1562                                                 i->second->Write(out1);
1563                                 }
1564                         }
1565                 }
1566         }
1567
1568 }
1569
1570 void userrec::WriteWallOps(const std::string &text)
1571 {
1572         /* Does nothing if theyre not opered */
1573         if ((!*this->oper) && (IS_LOCAL(this)))
1574                 return;
1575
1576         std::string wallop = "WALLOPS :";
1577
1578         try
1579         {
1580                 wallop.append(text);
1581         }
1582         catch (...)
1583         {
1584                 ServerInstance->Log(DEBUG,"Exception in userrec::Write() std::string::append");
1585                 return;
1586         }
1587
1588         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1589         {
1590                 userrec* t = *i;
1591                 if ((IS_LOCAL(t)) && (t->modes[UM_WALLOPS]))
1592                         this->WriteTo(t,wallop);
1593         }
1594 }
1595
1596 void userrec::WriteWallOps(const char* text, ...)
1597 {
1598         char textbuffer[MAXBUF];
1599         va_list argsPtr;
1600
1601         va_start(argsPtr, text);
1602         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1603         va_end(argsPtr);
1604
1605         this->WriteWallOps(std::string(textbuffer));
1606 }
1607
1608 /* return 0 or 1 depending if users u and u2 share one or more common channels
1609  * (used by QUIT, NICK etc which arent channel specific notices)
1610  *
1611  * The old algorithm in 1.0 for this was relatively inefficient, iterating over
1612  * the first users channels then the second users channels within the outer loop,
1613  * therefore it was a maximum of x*y iterations (upon returning 0 and checking
1614  * all possible iterations). However this new function instead checks against the
1615  * channel's userlist in the inner loop which is a std::map<userrec*,userrec*>
1616  * and saves us time as we already know what pointer value we are after.
1617  * Don't quote me on the maths as i am not a mathematician or computer scientist,
1618  * but i believe this algorithm is now x+(log y) maximum iterations instead.
1619  */
1620 bool userrec::SharesChannelWith(userrec *other)
1621 {
1622         if ((!other) || (this->registered != REG_ALL) || (other->registered != REG_ALL))
1623                 return false;
1624
1625         /* Outer loop */
1626         for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1627         {
1628                 /* Eliminate the inner loop (which used to be ~equal in size to the outer loop)
1629                  * by replacing it with a map::find which *should* be more efficient
1630                  */
1631                 if (i->first->HasUser(other))
1632                         return true;
1633         }
1634         return false;
1635 }
1636
1637 bool userrec::ChangeName(const char* gecos)
1638 {
1639         if (!strcmp(gecos, this->fullname))
1640                 return true;
1641
1642         if (IS_LOCAL(this))
1643         {
1644                 int MOD_RESULT = 0;
1645                 FOREACH_RESULT(I_OnChangeLocalUserGECOS,OnChangeLocalUserGECOS(this,gecos));
1646                 if (MOD_RESULT)
1647                         return false;
1648                 FOREACH_MOD(I_OnChangeName,OnChangeName(this,gecos));
1649         }
1650         strlcpy(this->fullname,gecos,MAXGECOS+1);
1651
1652         return true;
1653 }
1654
1655 bool userrec::ChangeDisplayedHost(const char* host)
1656 {
1657         if (!strcmp(host, this->dhost))
1658                 return true;
1659
1660         if (IS_LOCAL(this))
1661         {
1662                 int MOD_RESULT = 0;
1663                 FOREACH_RESULT(I_OnChangeLocalUserHost,OnChangeLocalUserHost(this,host));
1664                 if (MOD_RESULT)
1665                         return false;
1666                 FOREACH_MOD(I_OnChangeHost,OnChangeHost(this,host));
1667         }
1668         if (this->ServerInstance->Config->CycleHosts)
1669                 this->WriteCommonExcept("QUIT :Changing hosts");
1670
1671         /* Fix by Om: userrec::dhost is 65 long, this was truncating some long hosts */
1672         strlcpy(this->dhost,host,64);
1673
1674         this->InvalidateCache();
1675
1676         if (this->ServerInstance->Config->CycleHosts)
1677         {
1678                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1679                 {
1680                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1681                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1682                         if (n.length() > 0)
1683                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1684                 }
1685         }
1686
1687         if (IS_LOCAL(this))
1688                 this->WriteServ("396 %s %s :is now your displayed host",this->nick,this->dhost);
1689
1690         return true;
1691 }
1692
1693 bool userrec::ChangeIdent(const char* newident)
1694 {
1695         if (!strcmp(newident, this->ident))
1696                 return true;
1697
1698         if (this->ServerInstance->Config->CycleHosts)
1699                 this->WriteCommonExcept("%s","QUIT :Changing ident");
1700
1701         strlcpy(this->ident, newident, IDENTMAX+2);
1702
1703         this->InvalidateCache();
1704
1705         if (this->ServerInstance->Config->CycleHosts)
1706         {
1707                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1708                 {
1709                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1710                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1711                         if (n.length() > 0)
1712                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1713                 }
1714         }
1715
1716         return true;
1717 }
1718
1719 void userrec::NoticeAll(char* text, ...)
1720 {
1721         char textbuffer[MAXBUF];
1722         char formatbuffer[MAXBUF];
1723         va_list argsPtr;
1724
1725         va_start(argsPtr, text);
1726         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1727         va_end(argsPtr);
1728
1729         snprintf(formatbuffer,MAXBUF,":%s NOTICE $* :%s", this->GetFullHost(), textbuffer);
1730         std::string fmt = formatbuffer;
1731
1732         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1733         {
1734                 (*i)->Write(fmt);
1735         }
1736 }
1737
1738
1739 std::string userrec::ChannelList(userrec* source)
1740 {
1741         try
1742         {
1743                 std::string list;
1744                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1745                 {
1746                         /* If the target is the same as the sender, let them see all their channels.
1747                          * If the channel is NOT private/secret OR the user shares a common channel
1748                          * If the user is an oper, and the <options:operspywhois> option is set.
1749                          */
1750                         if ((source == this) || (*source->oper && ServerInstance->Config->OperSpyWhois) || (((!i->first->modes[CM_PRIVATE]) && (!i->first->modes[CM_SECRET])) || (i->first->HasUser(source))))
1751                         {
1752                                 list.append(i->first->GetPrefixChar(this)).append(i->first->name).append(" ");
1753                         }
1754                 }
1755                 return list;
1756         }
1757         catch (...)
1758         {
1759                 ServerInstance->Log(DEBUG,"Exception in userrec::ChannelList()");
1760                 return "";
1761         }
1762 }
1763
1764 void userrec::SplitChanList(userrec* dest, const std::string &cl)
1765 {
1766         std::string line;
1767         std::ostringstream prefix;
1768         std::string::size_type start, pos, length;
1769
1770         try
1771         {
1772                 prefix << this->nick << " " << dest->nick << " :";
1773                 line = prefix.str();
1774                 int namelen = strlen(ServerInstance->Config->ServerName) + 6;
1775
1776                 for (start = 0; (pos = cl.find(' ', start)) != std::string::npos; start = pos+1)
1777                 {
1778                         length = (pos == std::string::npos) ? cl.length() : pos;
1779
1780                         if (line.length() + namelen + length - start > 510)
1781                         {
1782                                 ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1783                                 line = prefix.str();
1784                         }
1785
1786                         if(pos == std::string::npos)
1787                         {
1788                                 line.append(cl.substr(start, length - start));
1789                                 break;
1790                         }
1791                         else
1792                         {
1793                                 line.append(cl.substr(start, length - start + 1));
1794                         }
1795                 }
1796
1797                 if (line.length())
1798                 {
1799                         ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1800                 }
1801         }
1802
1803         catch (...)
1804         {
1805                 ServerInstance->Log(DEBUG,"Exception in userrec::SplitChanList()");
1806         }
1807 }
1808
1809
1810 /* looks up a users password for their connection class (<ALLOW>/<DENY> tags)
1811  * NOTE: If the <ALLOW> or <DENY> tag specifies an ip, and this user resolves,
1812  * then their ip will be taken as 'priority' anyway, so for example,
1813  * <connect allow="127.0.0.1"> will match joe!bloggs@localhost
1814  */
1815 ConnectClass* userrec::GetClass()
1816 {
1817         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
1818         {
1819                 if ((match(this->GetIPString(),i->GetHost().c_str(),true)) || (match(this->host,i->GetHost().c_str())))
1820                         return &(*i);
1821         }
1822         return NULL;
1823 }
1824
1825 void userrec::PurgeEmptyChannels()
1826 {
1827         std::vector<chanrec*> to_delete;
1828
1829         // firstly decrement the count on each channel
1830         for (UCListIter f = this->chans.begin(); f != this->chans.end(); f++)
1831         {
1832                 f->first->RemoveAllPrefixes(this);
1833                 if (f->first->DelUser(this) == 0)
1834                 {
1835                         /* No users left in here, mark it for deletion */
1836                         try
1837                         {
1838                                 to_delete.push_back(f->first);
1839                         }
1840                         catch (...)
1841                         {
1842                                 ServerInstance->Log(DEBUG,"Exception in userrec::PurgeEmptyChannels to_delete.push_back()");
1843                         }
1844                 }
1845         }
1846
1847         for (std::vector<chanrec*>::iterator n = to_delete.begin(); n != to_delete.end(); n++)
1848         {
1849                 chanrec* thischan = *n;
1850                 chan_hash::iterator i2 = ServerInstance->chanlist->find(thischan->name);
1851                 if (i2 != ServerInstance->chanlist->end())
1852                 {
1853                         FOREACH_MOD(I_OnChannelDelete,OnChannelDelete(i2->second));
1854                         DELETE(i2->second);
1855                         ServerInstance->chanlist->erase(i2);
1856                         this->chans.erase(*n);
1857                 }
1858         }
1859
1860         this->UnOper();
1861 }
1862
1863 void userrec::ShowMOTD()
1864 {
1865         if (!ServerInstance->Config->MOTD.size())
1866         {
1867                 this->WriteServ("422 %s :Message of the day file is missing.",this->nick);
1868                 return;
1869         }
1870         this->WriteServ("375 %s :%s message of the day", this->nick, ServerInstance->Config->ServerName);
1871
1872         for (file_cache::iterator i = ServerInstance->Config->MOTD.begin(); i != ServerInstance->Config->MOTD.end(); i++)
1873                 this->WriteServ("372 %s :- %s",this->nick,i->c_str());
1874
1875         this->WriteServ("376 %s :End of message of the day.", this->nick);
1876 }
1877
1878 void userrec::ShowRULES()
1879 {
1880         if (!ServerInstance->Config->RULES.size())
1881         {
1882                 this->WriteServ("NOTICE %s :Rules file is missing.",this->nick);
1883                 return;
1884         }
1885         this->WriteServ("NOTICE %s :%s rules",this->nick,ServerInstance->Config->ServerName);
1886
1887         for (file_cache::iterator i = ServerInstance->Config->RULES.begin(); i != ServerInstance->Config->RULES.end(); i++)
1888                 this->WriteServ("NOTICE %s :%s",this->nick,i->c_str());
1889
1890         this->WriteServ("NOTICE %s :End of %s rules.",this->nick,ServerInstance->Config->ServerName);
1891 }
1892
1893 void userrec::HandleEvent(EventType et, int errornum)
1894 {
1895         /* WARNING: May delete this user! */
1896         int thisfd = this->GetFd();
1897
1898         try
1899         {
1900                 switch (et)
1901                 {
1902                         case EVENT_READ:
1903                                 ServerInstance->ProcessUser(this);
1904                         break;
1905                         case EVENT_WRITE:
1906                                 this->FlushWriteBuf();
1907                         break;
1908                         case EVENT_ERROR:
1909                                 /** This should be safe, but dont DARE do anything after it -- Brain */
1910                                 this->SetWriteError(errornum ? strerror(errornum) : "EOF from client");
1911                         break;
1912                 }
1913         }
1914         catch (...)
1915         {
1916                 ServerInstance->Log(DEBUG,"Exception in userrec::HandleEvent intercepted");
1917         }
1918
1919         /* If the user has raised an error whilst being processed, quit them now we're safe to */
1920         if ((ServerInstance->SE->GetRef(thisfd) == this))
1921         {
1922                 if (!WriteError.empty())
1923                 {
1924                         userrec::QuitUser(ServerInstance, this, GetWriteError());
1925                 }
1926         }
1927 }
1928