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         muted = 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         user->muted = true;
 806         Instance->GlobalCulls.AddItem(user, quitreason.c_str());
 807 }
 808
 809
 810 /* adds or updates an entry in the whowas list */
 811 void userrec::AddToWhoWas()
 812 {
 813         command_t* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
 814         if (whowas_command)
 815         {
 816                 std::deque<classbase*> params;
 817                 params.push_back(this);
 818                 whowas_command->HandleInternal(WHOWAS_ADD, params);
 819         }
 820 }
 821
 822 /* add a client connection to the sockets list */
 823 void userrec::AddClient(InspIRCd* Instance, int socket, int port, bool iscached, int socketfamily, sockaddr* ip)
 824 {
 825         std::string tempnick = ConvToStr(socket) + "-unknown";
 826         user_hash::iterator iter = Instance->clientlist->find(tempnick);
 827         char ipaddr[MAXBUF];
 828 #ifdef IPV6
 829         if (socketfamily == AF_INET6)
 830                 inet_ntop(AF_INET6, &((const sockaddr_in6*)ip)->sin6_addr, ipaddr, sizeof(ipaddr));
 831         else
 832                 inet_ntop(AF_INET, &((const sockaddr_in*)ip)->sin_addr, ipaddr, sizeof(ipaddr));
 833 #else
 834         inet_ntop(AF_INET, &((const sockaddr_in*)ip)->sin_addr, ipaddr, sizeof(ipaddr));
 835 #endif
 836         userrec* New;
 837         int j = 0;
 838
 839         Instance->unregistered_count++;
 840
 841         /*
 842          * fix by brain.
 843          * as these nicknames are 'RFC impossible', we can be sure nobody is going to be
 844          * using one as a registered connection. As they are per fd, we can also safely assume
 845          * that we wont have collisions. Therefore, if the nick exists in the list, its only
 846          * used by a dead socket, erase the iterator so that the new client may reclaim it.
 847          * this was probably the cause of 'server ignores me when i hammer it with reconnects'
 848          * issue in earlier alphas/betas
 849          */
 850         if (iter != Instance->clientlist->end())
 851         {
 852                 userrec* goner = iter->second;
 853                 DELETE(goner);
 854                 Instance->clientlist->erase(iter);
 855         }
 856
 857         New = new userrec(Instance);
 858         (*(Instance->clientlist))[tempnick] = New;
 859         New->fd = socket;
 860         strlcpy(New->nick,tempnick.c_str(),NICKMAX-1);
 861
 862         New->server = Instance->FindServerNamePtr(Instance->Config->ServerName);
 863         /* We don't need range checking here, we KNOW 'unknown\0' will fit into the ident field. */
 864         strcpy(New->ident, "unknown");
 865
 866         New->registered = REG_NONE;
 867         New->signon = Instance->Time() + Instance->Config->dns_timeout;
 868         New->lastping = 1;
 869
 870         New->SetSockAddr(socketfamily, ipaddr, port);
 871
 872         /* Smarter than your average bear^H^H^H^Hset of strlcpys. */
 873         for (const char* temp = New->GetIPString(); *temp && j < 64; temp++, j++)
 874                 New->dhost[j] = New->host[j] = *temp;
 875         New->dhost[j] = New->host[j] = 0;
 876
 877         Instance->AddLocalClone(New);
 878         Instance->AddGlobalClone(New);
 879
 880         ConnectClass* i = New->GetClass();
 881
 882         if ((!i) || (i->GetType() == CC_DENY))
 883         {
 884                 userrec::QuitUser(Instance, New,"Unauthorised connection");
 885                 return;
 886         }
 887
 888         New->pingmax = i->GetPingTime();
 889         New->nping = Instance->Time() + i->GetPingTime() + Instance->Config->dns_timeout;
 890         New->timeout = Instance->Time() + i->GetRegTimeout();
 891         New->flood = i->GetFlood();
 892         New->threshold = i->GetThreshold();
 893         New->sendqmax = i->GetSendqMax();
 894         New->recvqmax = i->GetRecvqMax();
 895
 896         Instance->local_users.push_back(New);
 897
 898         if ((Instance->local_users.size() > Instance->Config->SoftLimit) || (Instance->local_users.size() >= MAXCLIENTS))
 899         {
 900                 Instance->WriteOpers("*** Warning: softlimit value has been reached: %d clients", Instance->Config->SoftLimit);
 901                 userrec::QuitUser(Instance, New,"No more connections allowed");
 902                 return;
 903         }
 904
 905         /*
 906          * XXX -
 907          * this is done as a safety check to keep the file descriptors within range of fd_ref_table.
 908          * its a pretty big but for the moment valid assumption:
 909          * file descriptors are handed out starting at 0, and are recycled as theyre freed.
 910          * therefore if there is ever an fd over 65535, 65536 clients must be connected to the
 911          * irc server at once (or the irc server otherwise initiating this many connections, files etc)
 912          * which for the time being is a physical impossibility (even the largest networks dont have more
 913          * than about 10,000 users on ONE server!)
 914          */
 915         if ((unsigned int)socket >= MAX_DESCRIPTORS)
 916         {
 917                 userrec::QuitUser(Instance, New, "Server is full");
 918                 return;
 919         }
 920
 921         New->exempt = (Instance->XLines->matches_exception(New) != NULL);
 922         if (!New->exempt)
 923         {
 924                 ZLine* r = Instance->XLines->matches_zline(ipaddr);
 925                 if (r)
 926                 {
 927                         char reason[MAXBUF];
 928                         snprintf(reason,MAXBUF,"Z-Lined: %s",r->reason);
 929                         userrec::QuitUser(Instance, New, reason);
 930                         return;
 931                 }
 932         }
 933
 934         if (socket > -1)
 935         {
 936                 if (!Instance->SE->AddFd(New))
 937                 {
 938                         userrec::QuitUser(Instance, New, "Internal error handling connection");
 939                         return;
 940                 }
 941         }
 942
 943         /* NOTE: even if dns lookups are *off*, we still need to display this.
 944          * BOPM and other stuff requires it.
 945          */
 946         New->WriteServ("NOTICE Auth :*** Looking up your hostname...");
 947 }
 948
 949 unsigned long userrec::GlobalCloneCount()
 950 {
 951         clonemap::iterator x = ServerInstance->global_clones.find(this->GetIPString());
 952         if (x != ServerInstance->global_clones.end())
 953                 return x->second;
 954         else
 955                 return 0;
 956 }
 957
 958 unsigned long userrec::LocalCloneCount()
 959 {
 960         clonemap::iterator x = ServerInstance->local_clones.find(this->GetIPString());
 961         if (x != ServerInstance->local_clones.end())
 962                 return x->second;
 963         else
 964                 return 0;
 965 }
 966
 967 void userrec::FullConnect()
 968 {
 969         ServerInstance->stats->statsConnects++;
 970         this->idle_lastmsg = ServerInstance->Time();
 971
 972         ConnectClass* a = this->GetClass();
 973
 974         if ((!a) || (a->GetType() == CC_DENY))
 975         {
 976                 this->muted = true;
 977                 ServerInstance->GlobalCulls.AddItem(this,"Unauthorised connection");
 978                 return;
 979         }
 980
 981         if ((!a->GetPass().empty()) && (!this->haspassed))
 982         {
 983                 this->muted = true;
 984                 ServerInstance->GlobalCulls.AddItem(this,"Invalid password");
 985                 return;
 986         }
 987
 988         if (this->LocalCloneCount() > a->GetMaxLocal())
 989         {
 990                 this->muted = true;
 991                 ServerInstance->GlobalCulls.AddItem(this, "No more connections allowed from your host via this connect class (local)");
 992                 ServerInstance->WriteOpers("*** WARNING: maximum LOCAL connections (%ld) exceeded for IP %s", a->GetMaxLocal(), this->GetIPString());
 993                 return;
 994         }
 995         else if (this->GlobalCloneCount() > a->GetMaxGlobal())
 996         {
 997                 this->muted = true;
 998                 ServerInstance->GlobalCulls.AddItem(this, "No more connections allowed from your host via this connect class (global)");
 999                 ServerInstance->WriteOpers("*** WARNING: maximum GLOBAL connections (%ld) exceeded for IP %s",a->GetMaxGlobal(), this->GetIPString());
1000                 return;
1001         }
1002
1003         if (!this->exempt)
1004         {
1005                 GLine* r = ServerInstance->XLines->matches_gline(this);
1006
1007                 if (r)
1008                 {
1009                         this->muted = true;
1010                         char reason[MAXBUF];
1011                         snprintf(reason,MAXBUF,"G-Lined: %s",r->reason);
1012                         ServerInstance->GlobalCulls.AddItem(this, reason);
1013                         return;
1014                 }
1015
1016                 KLine* n = ServerInstance->XLines->matches_kline(this);
1017
1018                 if (n)
1019                 {
1020                         this->muted = true;
1021                         char reason[MAXBUF];
1022                         snprintf(reason,MAXBUF,"K-Lined: %s",n->reason);
1023                         ServerInstance->GlobalCulls.AddItem(this, reason);
1024                         return;
1025                 }
1026
1027         }
1028
1029         this->WriteServ("NOTICE Auth :Welcome to \002%s\002!",ServerInstance->Config->Network);
1030         this->WriteServ("001 %s :Welcome to the %s IRC Network %s!%s@%s",this->nick, ServerInstance->Config->Network, this->nick, this->ident, this->host);
1031         this->WriteServ("002 %s :Your host is %s, running version %s",this->nick,ServerInstance->Config->ServerName,VERSION);
1032         this->WriteServ("003 %s :This server was created %s %s", this->nick, __TIME__, __DATE__);
1033         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());
1034
1035         ServerInstance->Config->Send005(this);
1036
1037         this->ShowMOTD();
1038
1039         /* Now registered */
1040         if (ServerInstance->unregistered_count)
1041                 ServerInstance->unregistered_count--;
1042
1043         /*
1044          * fix 3 by brain, move registered = 7 below these so that spurious modes and host
1045          * changes dont go out onto the network and produce 'fake direction'.
1046          */
1047         FOREACH_MOD(I_OnUserConnect,OnUserConnect(this));
1048
1049         this->registered = REG_ALL;
1050
1051         FOREACH_MOD(I_OnPostConnect,OnPostConnect(this));
1052
1053         ServerInstance->SNO->WriteToSnoMask('c',"Client connecting on port %d: %s!%s@%s [%s]", this->GetPort(), this->nick, this->ident, this->host, this->GetIPString());
1054 }
1055
1056 /** userrec::UpdateNick()
1057  * re-allocates a nick in the user_hash after they change nicknames,
1058  * returns a pointer to the new user as it may have moved
1059  */
1060 userrec* userrec::UpdateNickHash(const char* New)
1061 {
1062         try
1063         {
1064                 //user_hash::iterator newnick;
1065                 user_hash::iterator oldnick = ServerInstance->clientlist->find(this->nick);
1066
1067                 if (!strcasecmp(this->nick,New))
1068                         return oldnick->second;
1069
1070                 if (oldnick == ServerInstance->clientlist->end())
1071                         return NULL; /* doesnt exist */
1072
1073                 userrec* olduser = oldnick->second;
1074                 (*(ServerInstance->clientlist))[New] = olduser;
1075                 ServerInstance->clientlist->erase(oldnick);
1076                 return olduser;
1077         }
1078
1079         catch (...)
1080         {
1081                 ServerInstance->Log(DEBUG,"Exception in userrec::UpdateNickHash()");
1082                 return NULL;
1083         }
1084 }
1085
1086 void userrec::InvalidateCache()
1087 {
1088         /* Invalidate cache */
1089         if (cached_fullhost)
1090                 free(cached_fullhost);
1091         if (cached_hostip)
1092                 free(cached_hostip);
1093         if (cached_makehost)
1094                 free(cached_makehost);
1095         if (cached_fullrealhost)
1096                 free(cached_fullrealhost);
1097         cached_fullhost = cached_hostip = cached_makehost = cached_fullrealhost = NULL;
1098 }
1099
1100 bool userrec::ForceNickChange(const char* newnick)
1101 {
1102         try
1103         {
1104                 int MOD_RESULT = 0;
1105
1106                 this->InvalidateCache();
1107
1108                 FOREACH_RESULT(I_OnUserPreNick,OnUserPreNick(this, newnick));
1109
1110                 if (MOD_RESULT)
1111                 {
1112                         ServerInstance->stats->statsCollisions++;
1113                         return false;
1114                 }
1115
1116                 if (ServerInstance->XLines->matches_qline(newnick))
1117                 {
1118                         ServerInstance->stats->statsCollisions++;
1119                         return false;
1120                 }
1121
1122                 if (this->registered == REG_ALL)
1123                 {
1124                         const char* pars[1];
1125                         pars[0] = newnick;
1126                         std::string cmd = "NICK";
1127                         return (ServerInstance->Parser->CallHandler(cmd, pars, 1, this) == CMD_SUCCESS);
1128                 }
1129                 return false;
1130         }
1131
1132         catch (...)
1133         {
1134                 ServerInstance->Log(DEBUG,"Exception in userrec::ForceNickChange()");
1135                 return false;
1136         }
1137 }
1138
1139 void userrec::SetSockAddr(int protocol_family, const char* ip, int port)
1140 {
1141         switch (protocol_family)
1142         {
1143 #ifdef SUPPORT_IP6LINKS
1144                 case AF_INET6:
1145                 {
1146                         sockaddr_in6* sin = new sockaddr_in6;
1147                         sin->sin6_family = AF_INET6;
1148                         sin->sin6_port = port;
1149                         inet_pton(AF_INET6, ip, &sin->sin6_addr);
1150                         this->ip = (sockaddr*)sin;
1151                 }
1152                 break;
1153 #endif
1154                 case AF_INET:
1155                 {
1156                         sockaddr_in* sin = new sockaddr_in;
1157                         sin->sin_family = AF_INET;
1158                         sin->sin_port = port;
1159                         inet_pton(AF_INET, ip, &sin->sin_addr);
1160                         this->ip = (sockaddr*)sin;
1161                 }
1162                 break;
1163                 default:
1164                         ServerInstance->Log(DEBUG,"Ut oh, I dont know protocol %d to be set on '%s'!", protocol_family, this->nick);
1165                 break;
1166         }
1167 }
1168
1169 int userrec::GetPort()
1170 {
1171         if (this->ip == NULL)
1172                 return 0;
1173
1174         switch (this->GetProtocolFamily())
1175         {
1176 #ifdef SUPPORT_IP6LINKS
1177                 case AF_INET6:
1178                 {
1179                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1180                         return sin->sin6_port;
1181                 }
1182                 break;
1183 #endif
1184                 case AF_INET:
1185                 {
1186                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1187                         return sin->sin_port;
1188                 }
1189                 break;
1190                 default:
1191                 break;
1192         }
1193         return 0;
1194 }
1195
1196 int userrec::GetProtocolFamily()
1197 {
1198         if (this->ip == NULL)
1199                 return 0;
1200
1201         sockaddr_in* sin = (sockaddr_in*)this->ip;
1202         return sin->sin_family;
1203 }
1204
1205 const char* userrec::GetIPString()
1206 {
1207         static char buf[1024];
1208
1209         if (this->ip == NULL)
1210                 return "";
1211
1212         switch (this->GetProtocolFamily())
1213         {
1214 #ifdef SUPPORT_IP6LINKS
1215                 case AF_INET6:
1216                 {
1217                         static char temp[1024];
1218
1219                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1220                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1221                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1222                         if (*buf == ':')
1223                         {
1224                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1225                                 *temp = '0';
1226                                 return temp;
1227                         }
1228                         return buf;
1229                 }
1230                 break;
1231 #endif
1232                 case AF_INET:
1233                 {
1234                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1235                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1236                         return buf;
1237                 }
1238                 break;
1239                 default:
1240                 break;
1241         }
1242         return "";
1243 }
1244
1245 const char* userrec::GetIPString(char* buf)
1246 {
1247         if (this->ip == NULL)
1248         {
1249                 *buf = 0;
1250                 return buf;
1251         }
1252
1253         switch (this->GetProtocolFamily())
1254         {
1255 #ifdef SUPPORT_IP6LINKS
1256                 case AF_INET6:
1257                 {
1258                         static char temp[1024];
1259
1260                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1261                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1262                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1263                         if (*buf == ':')
1264                         {
1265                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1266                                 *temp = '0';
1267                                 strlcpy(buf, temp, sizeof(temp));
1268                         }
1269                         return buf;
1270                 }
1271                 break;
1272 #endif
1273                 case AF_INET:
1274                 {
1275                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1276                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1277                         return buf;
1278                 }
1279                 break;
1280
1281                 default:
1282                 break;
1283         }
1284         return "";
1285 }
1286
1287 /** NOTE: We cannot pass a const reference to this method.
1288  * The string is changed by the workings of the method,
1289  * so that if we pass const ref, we end up copying it to
1290  * something we can change anyway. Makes sense to just let
1291  * the compiler do that copy for us.
1292  */
1293 void userrec::Write(std::string text)
1294 {
1295         if ((this->fd < 0) || (this->fd > MAX_DESCRIPTORS))
1296                 return;
1297
1298         try
1299         {
1300                 /* ServerInstance->Log(DEBUG,"<- %s", text.c_str());
1301                  * WARNING: The above debug line is VERY loud, do NOT
1302                  * enable it till we have a good way of filtering it
1303                  * out of the logs (e.g. 1.2 would be good).
1304                  */
1305                 text.append("\r\n");
1306         }
1307         catch (...)
1308         {
1309                 ServerInstance->Log(DEBUG,"Exception in userrec::Write() std::string::append");
1310                 return;
1311         }
1312
1313         if (ServerInstance->Config->GetIOHook(this->GetPort()))
1314         {
1315                 try
1316                 {
1317                         ServerInstance->Config->GetIOHook(this->GetPort())->OnRawSocketWrite(this->fd, text.data(), text.length());
1318                 }
1319                 catch (CoreException& modexcept)
1320                 {
1321                         ServerInstance->Log(DEBUG, "%s threw an exception: %s", modexcept.GetSource(), modexcept.GetReason());
1322                 }
1323         }
1324         else
1325         {
1326                 this->AddWriteBuf(text);
1327         }
1328         ServerInstance->stats->statsSent += text.length();
1329         this->ServerInstance->SE->WantWrite(this);
1330 }
1331
1332 /** Write()
1333  */
1334 void userrec::Write(const char *text, ...)
1335 {
1336         va_list argsPtr;
1337         char textbuffer[MAXBUF];
1338
1339         va_start(argsPtr, text);
1340         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1341         va_end(argsPtr);
1342
1343         this->Write(std::string(textbuffer));
1344 }
1345
1346 void userrec::WriteServ(const std::string& text)
1347 {
1348         char textbuffer[MAXBUF];
1349
1350         snprintf(textbuffer,MAXBUF,":%s %s",ServerInstance->Config->ServerName,text.c_str());
1351         this->Write(std::string(textbuffer));
1352 }
1353
1354 /** WriteServ()
1355  *  Same as Write(), except `text' is prefixed with `:server.name '.
1356  */
1357 void userrec::WriteServ(const char* text, ...)
1358 {
1359         va_list argsPtr;
1360         char textbuffer[MAXBUF];
1361
1362         va_start(argsPtr, text);
1363         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1364         va_end(argsPtr);
1365
1366         this->WriteServ(std::string(textbuffer));
1367 }
1368
1369
1370 void userrec::WriteFrom(userrec *user, const std::string &text)
1371 {
1372         char tb[MAXBUF];
1373
1374         snprintf(tb,MAXBUF,":%s %s",user->GetFullHost(),text.c_str());
1375
1376         this->Write(std::string(tb));
1377 }
1378
1379
1380 /* write text from an originating user to originating user */
1381
1382 void userrec::WriteFrom(userrec *user, const char* text, ...)
1383 {
1384         va_list argsPtr;
1385         char textbuffer[MAXBUF];
1386
1387         va_start(argsPtr, text);
1388         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1389         va_end(argsPtr);
1390
1391         this->WriteFrom(user, std::string(textbuffer));
1392 }
1393
1394
1395 /* write text to an destination user from a source user (e.g. user privmsg) */
1396
1397 void userrec::WriteTo(userrec *dest, const char *data, ...)
1398 {
1399         char textbuffer[MAXBUF];
1400         va_list argsPtr;
1401
1402         va_start(argsPtr, data);
1403         vsnprintf(textbuffer, MAXBUF, data, argsPtr);
1404         va_end(argsPtr);
1405
1406         this->WriteTo(dest, std::string(textbuffer));
1407 }
1408
1409 void userrec::WriteTo(userrec *dest, const std::string &data)
1410 {
1411         dest->WriteFrom(this, data);
1412 }
1413
1414
1415 void userrec::WriteCommon(const char* text, ...)
1416 {
1417         char textbuffer[MAXBUF];
1418         va_list argsPtr;
1419
1420         if (this->registered != REG_ALL)
1421                 return;
1422
1423         va_start(argsPtr, text);
1424         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1425         va_end(argsPtr);
1426
1427         this->WriteCommon(std::string(textbuffer));
1428 }
1429
1430 void userrec::WriteCommon(const std::string &text)
1431 {
1432         try
1433         {
1434                 bool sent_to_at_least_one = false;
1435                 char tb[MAXBUF];
1436
1437                 if (this->registered != REG_ALL)
1438                         return;
1439
1440                 uniq_id++;
1441
1442                 /* We dont want to be doing this n times, just once */
1443                 snprintf(tb,MAXBUF,":%s %s",this->GetFullHost(),text.c_str());
1444                 std::string out = tb;
1445
1446                 for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1447                 {
1448                         CUList* ulist = v->first->GetUsers();
1449                         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1450                         {
1451                                 if ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id))
1452                                 {
1453                                         already_sent[i->second->fd] = uniq_id;
1454                                         i->second->Write(out);
1455                                         sent_to_at_least_one = true;
1456                                 }
1457                         }
1458                 }
1459
1460                 /*
1461                  * if the user was not in any channels, no users will receive the text. Make sure the user
1462                  * receives their OWN message for WriteCommon
1463                  */
1464                 if (!sent_to_at_least_one)
1465                 {
1466                         this->Write(std::string(tb));
1467                 }
1468         }
1469
1470         catch (...)
1471         {
1472                 ServerInstance->Log(DEBUG,"Exception in userrec::WriteCommon()");
1473         }
1474 }
1475
1476
1477 /* write a formatted string to all users who share at least one common
1478  * channel, NOT including the source user e.g. for use in QUIT
1479  */
1480
1481 void userrec::WriteCommonExcept(const char* text, ...)
1482 {
1483         char textbuffer[MAXBUF];
1484         va_list argsPtr;
1485
1486         va_start(argsPtr, text);
1487         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1488         va_end(argsPtr);
1489
1490         this->WriteCommonExcept(std::string(textbuffer));
1491 }
1492
1493 void userrec::WriteCommonExcept(const std::string &text)
1494 {
1495         bool quit_munge = false;
1496         char oper_quit[MAXBUF];
1497         char textbuffer[MAXBUF];
1498         char tb1[MAXBUF];
1499         char tb2[MAXBUF];
1500         std::string out1;
1501         std::string out2;
1502
1503         strlcpy(textbuffer, text.c_str(), MAXBUF);
1504
1505         if (this->registered != REG_ALL)
1506                 return;
1507
1508         uniq_id++;
1509
1510         snprintf(tb1,MAXBUF,":%s %s",this->GetFullHost(),textbuffer);
1511
1512         /* TODO: We need some form of WriteCommonExcept that will send two lines, one line to
1513          * opers and the other line to non-opers, then all this hidebans and hidesplits gunk
1514          * can go byebye.
1515          */
1516         if (ServerInstance->Config->HideSplits)
1517         {
1518                 char* check = textbuffer + 6;
1519
1520                 if (!strncasecmp(textbuffer, "QUIT :",6))
1521                 {
1522                         std::stringstream split(check);
1523                         std::string server_one;
1524                         std::string server_two;
1525
1526                         split >> server_one;
1527                         split >> server_two;
1528
1529                         if ((ServerInstance->FindServerName(server_one)) && (ServerInstance->FindServerName(server_two)))
1530                         {
1531                                 strlcpy(oper_quit,textbuffer,MAXQUIT);
1532                                 strlcpy(check,"*.net *.split",MAXQUIT);
1533                                 quit_munge = true;
1534                                 snprintf(tb2,MAXBUF,":%s %s",this->GetFullHost(),oper_quit);
1535                                 out2 = tb2;
1536                         }
1537                 }
1538         }
1539
1540         if ((ServerInstance->Config->HideBans) && (!quit_munge))
1541         {
1542                 if ((!strncasecmp(textbuffer, "QUIT :G-Lined:",14)) || (!strncasecmp(textbuffer, "QUIT :K-Lined:",14))
1543                 || (!strncasecmp(textbuffer, "QUIT :Q-Lined:",14)) || (!strncasecmp(textbuffer, "QUIT :Z-Lined:",14)))
1544                 {
1545                         char* check = textbuffer + 13;
1546                         strlcpy(oper_quit,textbuffer,MAXQUIT);
1547                         *check = 0;  // We don't need to strlcpy, we just chop it from the :
1548                         quit_munge = true;
1549                         snprintf(tb2,MAXBUF,":%s %s",this->GetFullHost(),oper_quit);
1550                         out2 = tb2;
1551                 }
1552         }
1553
1554         out1 = tb1;
1555
1556         for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1557         {
1558                 CUList *ulist = v->first->GetUsers();
1559                 for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1560                 {
1561                         if (this != i->second)
1562                         {
1563                                 if ((IS_LOCAL(i->second)) && (already_sent[i->second->fd] != uniq_id))
1564                                 {
1565                                         already_sent[i->second->fd] = uniq_id;
1566                                         if (quit_munge)
1567                                                 i->second->Write(*i->second->oper ? out2 : out1);
1568                                         else
1569                                                 i->second->Write(out1);
1570                                 }
1571                         }
1572                 }
1573         }
1574
1575 }
1576
1577 void userrec::WriteWallOps(const std::string &text)
1578 {
1579         /* Does nothing if theyre not opered */
1580         if ((!*this->oper) && (IS_LOCAL(this)))
1581                 return;
1582
1583         std::string wallop = "WALLOPS :";
1584
1585         try
1586         {
1587                 wallop.append(text);
1588         }
1589         catch (...)
1590         {
1591                 ServerInstance->Log(DEBUG,"Exception in userrec::Write() std::string::append");
1592                 return;
1593         }
1594
1595         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1596         {
1597                 userrec* t = *i;
1598                 if ((IS_LOCAL(t)) && (t->modes[UM_WALLOPS]))
1599                         this->WriteTo(t,wallop);
1600         }
1601 }
1602
1603 void userrec::WriteWallOps(const char* text, ...)
1604 {
1605         char textbuffer[MAXBUF];
1606         va_list argsPtr;
1607
1608         va_start(argsPtr, text);
1609         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1610         va_end(argsPtr);
1611
1612         this->WriteWallOps(std::string(textbuffer));
1613 }
1614
1615 /* return 0 or 1 depending if users u and u2 share one or more common channels
1616  * (used by QUIT, NICK etc which arent channel specific notices)
1617  *
1618  * The old algorithm in 1.0 for this was relatively inefficient, iterating over
1619  * the first users channels then the second users channels within the outer loop,
1620  * therefore it was a maximum of x*y iterations (upon returning 0 and checking
1621  * all possible iterations). However this new function instead checks against the
1622  * channel's userlist in the inner loop which is a std::map<userrec*,userrec*>
1623  * and saves us time as we already know what pointer value we are after.
1624  * Don't quote me on the maths as i am not a mathematician or computer scientist,
1625  * but i believe this algorithm is now x+(log y) maximum iterations instead.
1626  */
1627 bool userrec::SharesChannelWith(userrec *other)
1628 {
1629         if ((!other) || (this->registered != REG_ALL) || (other->registered != REG_ALL))
1630                 return false;
1631
1632         /* Outer loop */
1633         for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1634         {
1635                 /* Eliminate the inner loop (which used to be ~equal in size to the outer loop)
1636                  * by replacing it with a map::find which *should* be more efficient
1637                  */
1638                 if (i->first->HasUser(other))
1639                         return true;
1640         }
1641         return false;
1642 }
1643
1644 bool userrec::ChangeName(const char* gecos)
1645 {
1646         if (!strcmp(gecos, this->fullname))
1647                 return true;
1648
1649         if (IS_LOCAL(this))
1650         {
1651                 int MOD_RESULT = 0;
1652                 FOREACH_RESULT(I_OnChangeLocalUserGECOS,OnChangeLocalUserGECOS(this,gecos));
1653                 if (MOD_RESULT)
1654                         return false;
1655                 FOREACH_MOD(I_OnChangeName,OnChangeName(this,gecos));
1656         }
1657         strlcpy(this->fullname,gecos,MAXGECOS+1);
1658
1659         return true;
1660 }
1661
1662 bool userrec::ChangeDisplayedHost(const char* host)
1663 {
1664         if (!strcmp(host, this->dhost))
1665                 return true;
1666
1667         if (IS_LOCAL(this))
1668         {
1669                 int MOD_RESULT = 0;
1670                 FOREACH_RESULT(I_OnChangeLocalUserHost,OnChangeLocalUserHost(this,host));
1671                 if (MOD_RESULT)
1672                         return false;
1673                 FOREACH_MOD(I_OnChangeHost,OnChangeHost(this,host));
1674         }
1675         if (this->ServerInstance->Config->CycleHosts)
1676                 this->WriteCommonExcept("QUIT :Changing hosts");
1677
1678         /* Fix by Om: userrec::dhost is 65 long, this was truncating some long hosts */
1679         strlcpy(this->dhost,host,64);
1680
1681         this->InvalidateCache();
1682
1683         if (this->ServerInstance->Config->CycleHosts)
1684         {
1685                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1686                 {
1687                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1688                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1689                         if (n.length() > 0)
1690                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1691                 }
1692         }
1693
1694         if (IS_LOCAL(this))
1695                 this->WriteServ("396 %s %s :is now your displayed host",this->nick,this->dhost);
1696
1697         return true;
1698 }
1699
1700 bool userrec::ChangeIdent(const char* newident)
1701 {
1702         if (!strcmp(newident, this->ident))
1703                 return true;
1704
1705         if (this->ServerInstance->Config->CycleHosts)
1706                 this->WriteCommonExcept("%s","QUIT :Changing ident");
1707
1708         strlcpy(this->ident, newident, IDENTMAX+2);
1709
1710         this->InvalidateCache();
1711
1712         if (this->ServerInstance->Config->CycleHosts)
1713         {
1714                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1715                 {
1716                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1717                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1718                         if (n.length() > 0)
1719                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1720                 }
1721         }
1722
1723         return true;
1724 }
1725
1726 void userrec::SendAll(const char* command, char* text, ...)
1727 {
1728         char textbuffer[MAXBUF];
1729         char formatbuffer[MAXBUF];
1730         va_list argsPtr;
1731
1732         va_start(argsPtr, text);
1733         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1734         va_end(argsPtr);
1735
1736         snprintf(formatbuffer,MAXBUF,":%s %s $* :%s", this->GetFullHost(), command, textbuffer);
1737         std::string fmt = formatbuffer;
1738
1739         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1740         {
1741                 (*i)->Write(fmt);
1742         }
1743 }
1744
1745
1746 std::string userrec::ChannelList(userrec* source)
1747 {
1748         try
1749         {
1750                 std::string list;
1751                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1752                 {
1753                         /* If the target is the same as the sender, let them see all their channels.
1754                          * If the channel is NOT private/secret OR the user shares a common channel
1755                          * If the user is an oper, and the <options:operspywhois> option is set.
1756                          */
1757                         if ((source == this) || (*source->oper && ServerInstance->Config->OperSpyWhois) || (((!i->first->modes[CM_PRIVATE]) && (!i->first->modes[CM_SECRET])) || (i->first->HasUser(source))))
1758                         {
1759                                 list.append(i->first->GetPrefixChar(this)).append(i->first->name).append(" ");
1760                         }
1761                 }
1762                 return list;
1763         }
1764         catch (...)
1765         {
1766                 ServerInstance->Log(DEBUG,"Exception in userrec::ChannelList()");
1767                 return "";
1768         }
1769 }
1770
1771 void userrec::SplitChanList(userrec* dest, const std::string &cl)
1772 {
1773         std::string line;
1774         std::ostringstream prefix;
1775         std::string::size_type start, pos, length;
1776
1777         try
1778         {
1779                 prefix << this->nick << " " << dest->nick << " :";
1780                 line = prefix.str();
1781                 int namelen = strlen(ServerInstance->Config->ServerName) + 6;
1782
1783                 for (start = 0; (pos = cl.find(' ', start)) != std::string::npos; start = pos+1)
1784                 {
1785                         length = (pos == std::string::npos) ? cl.length() : pos;
1786
1787                         if (line.length() + namelen + length - start > 510)
1788                         {
1789                                 ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1790                                 line = prefix.str();
1791                         }
1792
1793                         if(pos == std::string::npos)
1794                         {
1795                                 line.append(cl.substr(start, length - start));
1796                                 break;
1797                         }
1798                         else
1799                         {
1800                                 line.append(cl.substr(start, length - start + 1));
1801                         }
1802                 }
1803
1804                 if (line.length())
1805                 {
1806                         ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1807                 }
1808         }
1809
1810         catch (...)
1811         {
1812                 ServerInstance->Log(DEBUG,"Exception in userrec::SplitChanList()");
1813         }
1814 }
1815
1816
1817 /* looks up a users password for their connection class (<ALLOW>/<DENY> tags)
1818  * NOTE: If the <ALLOW> or <DENY> tag specifies an ip, and this user resolves,
1819  * then their ip will be taken as 'priority' anyway, so for example,
1820  * <connect allow="127.0.0.1"> will match joe!bloggs@localhost
1821  */
1822 ConnectClass* userrec::GetClass()
1823 {
1824         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
1825         {
1826                 if ((match(this->GetIPString(),i->GetHost().c_str(),true)) || (match(this->host,i->GetHost().c_str())))
1827                         return &(*i);
1828         }
1829         return NULL;
1830 }
1831
1832 void userrec::PurgeEmptyChannels()
1833 {
1834         std::vector<chanrec*> to_delete;
1835
1836         // firstly decrement the count on each channel
1837         for (UCListIter f = this->chans.begin(); f != this->chans.end(); f++)
1838         {
1839                 f->first->RemoveAllPrefixes(this);
1840                 if (f->first->DelUser(this) == 0)
1841                 {
1842                         /* No users left in here, mark it for deletion */
1843                         try
1844                         {
1845                                 to_delete.push_back(f->first);
1846                         }
1847                         catch (...)
1848                         {
1849                                 ServerInstance->Log(DEBUG,"Exception in userrec::PurgeEmptyChannels to_delete.push_back()");
1850                         }
1851                 }
1852         }
1853
1854         for (std::vector<chanrec*>::iterator n = to_delete.begin(); n != to_delete.end(); n++)
1855         {
1856                 chanrec* thischan = *n;
1857                 chan_hash::iterator i2 = ServerInstance->chanlist->find(thischan->name);
1858                 if (i2 != ServerInstance->chanlist->end())
1859                 {
1860                         FOREACH_MOD(I_OnChannelDelete,OnChannelDelete(i2->second));
1861                         DELETE(i2->second);
1862                         ServerInstance->chanlist->erase(i2);
1863                         this->chans.erase(*n);
1864                 }
1865         }
1866
1867         this->UnOper();
1868 }
1869
1870 void userrec::ShowMOTD()
1871 {
1872         if (!ServerInstance->Config->MOTD.size())
1873         {
1874                 this->WriteServ("422 %s :Message of the day file is missing.",this->nick);
1875                 return;
1876         }
1877         this->WriteServ("375 %s :%s message of the day", this->nick, ServerInstance->Config->ServerName);
1878
1879         for (file_cache::iterator i = ServerInstance->Config->MOTD.begin(); i != ServerInstance->Config->MOTD.end(); i++)
1880                 this->WriteServ("372 %s :- %s",this->nick,i->c_str());
1881
1882         this->WriteServ("376 %s :End of message of the day.", this->nick);
1883 }
1884
1885 void userrec::ShowRULES()
1886 {
1887         if (!ServerInstance->Config->RULES.size())
1888         {
1889                 this->WriteServ("NOTICE %s :Rules file is missing.",this->nick);
1890                 return;
1891         }
1892         this->WriteServ("NOTICE %s :%s rules",this->nick,ServerInstance->Config->ServerName);
1893
1894         for (file_cache::iterator i = ServerInstance->Config->RULES.begin(); i != ServerInstance->Config->RULES.end(); i++)
1895                 this->WriteServ("NOTICE %s :%s",this->nick,i->c_str());
1896
1897         this->WriteServ("NOTICE %s :End of %s rules.",this->nick,ServerInstance->Config->ServerName);
1898 }
1899
1900 void userrec::HandleEvent(EventType et, int errornum)
1901 {
1902         /* WARNING: May delete this user! */
1903         int thisfd = this->GetFd();
1904
1905         try
1906         {
1907                 switch (et)
1908                 {
1909                         case EVENT_READ:
1910                                 ServerInstance->ProcessUser(this);
1911                         break;
1912                         case EVENT_WRITE:
1913                                 this->FlushWriteBuf();
1914                         break;
1915                         case EVENT_ERROR:
1916                                 /** This should be safe, but dont DARE do anything after it -- Brain */
1917                                 this->SetWriteError(errornum ? strerror(errornum) : "EOF from client");
1918                         break;
1919                 }
1920         }
1921         catch (...)
1922         {
1923                 ServerInstance->Log(DEBUG,"Exception in userrec::HandleEvent intercepted");
1924         }
1925
1926         /* If the user has raised an error whilst being processed, quit them now we're safe to */
1927         if ((ServerInstance->SE->GetRef(thisfd) == this))
1928         {
1929                 if (!WriteError.empty())
1930                 {
1931                         userrec::QuitUser(ServerInstance, this, GetWriteError());
1932                 }
1933         }
1934 }
1935