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