src/modules/m_spanningtree/treesocket2.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 "inspircd.h"
  15 #include "commands/cmd_whois.h"
  16 #include "commands/cmd_stats.h"
  17 #include "socket.h"
  18 #include "wildcard.h"
  19 #include "xline.h"
  20 #include "transport.h"
  21 #include "socketengine.h"
  22
  23 #include "m_spanningtree/main.h"
  24 #include "m_spanningtree/utils.h"
  25 #include "m_spanningtree/treeserver.h"
  26 #include "m_spanningtree/link.h"
  27 #include "m_spanningtree/treesocket.h"
  28 #include "m_spanningtree/resolvers.h"
  29 #include "m_spanningtree/handshaketimer.h"
  30
  31 /* $ModDep: m_spanningtree/timesynctimer.h m_spanningtree/resolvers.h m_spanningtree/main.h m_spanningtree/utils.h m_spanningtree/treeserver.h m_spanningtree/link.h m_spanningtree/treesocket.h */
  32
  33 static std::map<std::string, std::string> warned;       /* Server names that have had protocol violation warnings displayed for them */
  34
  35 int TreeSocket::WriteLine(std::string line)
  36 {
  37         Instance->Log(DEBUG, "S[%d] O %s", this->GetFd(), line.c_str());
  38         line.append("\r\n");
  39         return this->Write(line);
  40 }
  41
  42
  43 /* Handle ERROR command */
  44 bool TreeSocket::Error(std::deque<std::string> &params)
  45 {
  46         if (params.size() < 1)
  47                 return false;
  48         this->Instance->SNO->WriteToSnoMask('l',"ERROR from %s: %s",(!InboundServerName.empty() ? InboundServerName.c_str() : myhost.c_str()),params[0].c_str());
  49         /* we will return false to cause the socket to close. */
  50         return false;
  51 }
  52
  53 bool TreeSocket::Modules(const std::string &prefix, std::deque<std::string> &params)
  54 {
  55         if (params.empty())
  56                 return true;
  57
  58         if (!this->Instance->MatchText(this->Instance->Config->ServerName, params[0]))
  59         {
  60                 /* Pass it on, not for us */
  61                 Utils->DoOneToOne(prefix, "MODULES", params, params[0]);
  62                 return true;
  63         }
  64
  65         char strbuf[MAXBUF];
  66         std::deque<std::string> par;
  67         par.push_back(prefix);
  68         par.push_back("");
  69
  70         User* source = this->Instance->FindNick(prefix);
  71         if (!source)
  72                 return true;
  73
  74         std::vector<std::string> module_names = Instance->Modules->GetAllModuleNames(0);
  75
  76         for (unsigned int i = 0; i < module_names.size(); i++)
  77         {
  78                 Module* m = Instance->Modules->Find(module_names[i]);
  79                 Version V = m->GetVersion();
  80                 char modulename[MAXBUF];
  81                 char flagstate[MAXBUF];
  82                 *flagstate = 0;
  83                 if (V.Flags & VF_STATIC)
  84                         strlcat(flagstate,", static",MAXBUF);
  85                 if (V.Flags & VF_VENDOR)
  86                         strlcat(flagstate,", vendor",MAXBUF);
  87                 if (V.Flags & VF_COMMON)
  88                         strlcat(flagstate,", common",MAXBUF);
  89                 if (V.Flags & VF_SERVICEPROVIDER)
  90                         strlcat(flagstate,", service provider",MAXBUF);
  91                 if (!flagstate[0])
  92                         strcpy(flagstate,"  <no flags>");
  93                 strlcpy(modulename,module_names[i].c_str(),256);
  94                 if (*source->oper)
  95                 {
  96                         snprintf(strbuf, MAXBUF, "::%s 900 %s :0x%08lx %d.%d.%d.%d %s (%s)",Instance->Config->ServerName,source->nick,(unsigned long)m,
  97                                         V.Major,V.Minor,V.Revision,V.Build,ServerConfig::CleanFilename(modulename),flagstate+2);
  98                 }
  99                 else
 100                 {
 101                         snprintf(strbuf, MAXBUF, "::%s 900 %s :%s",Instance->Config->ServerName,source->nick,ServerConfig::CleanFilename(modulename));
 102                 }
 103                 par[1] = strbuf;
 104                 Utils->DoOneToOne(Instance->Config->GetSID(), "PUSH", par, source->server);
 105         }
 106         snprintf(strbuf, MAXBUF, "::%s 901 %s :End of MODULES list", Instance->Config->ServerName, source->nick);
 107         par[1] = strbuf;
 108         Utils->DoOneToOne(Instance->Config->GetSID(), "PUSH", par, source->server);
 109         return true;
 110 }
 111
 112 /** remote MOTD. leet, huh? */
 113 bool TreeSocket::Motd(const std::string &prefix, std::deque<std::string> &params)
 114 {
 115         if (params.size() > 0)
 116         {
 117                 if (this->Instance->MatchText(this->Instance->Config->ServerName, params[0]))
 118                 {
 119                         /* It's for our server */
 120                         string_list results;
 121                         User* source = this->Instance->FindNick(prefix);
 122
 123                         if (source)
 124                         {
 125                                 std::deque<std::string> par;
 126                                 par.push_back(prefix);
 127                                 par.push_back("");
 128
 129                                 if (!Instance->Config->MOTD.size())
 130                                 {
 131                                         par[1] = std::string("::")+Instance->Config->ServerName+" 422 "+source->nick+" :Message of the day file is missing.";
 132                                         Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 133                                         return true;
 134                                 }
 135
 136                                 par[1] = std::string("::")+Instance->Config->ServerName+" 375 "+source->nick+" :"+Instance->Config->ServerName+" message of the day";
 137                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 138
 139                                 for (unsigned int i = 0; i < Instance->Config->MOTD.size(); i++)
 140                                 {
 141                                         par[1] = std::string("::")+Instance->Config->ServerName+" 372 "+source->nick+" :- "+Instance->Config->MOTD[i];
 142                                         Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 143                                 }
 144
 145                                 par[1] = std::string("::")+Instance->Config->ServerName+" 376 "+source->nick+" :End of message of the day.";
 146                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 147                         }
 148                 }
 149                 else
 150                 {
 151                         /* Pass it on */
 152                         User* source = this->Instance->FindNick(prefix);
 153                         if (source)
 154                                 Utils->DoOneToOne(prefix, "MOTD", params, params[0]);
 155                 }
 156         }
 157         return true;
 158 }
 159
 160 /** remote ADMIN. leet, huh? */
 161 bool TreeSocket::Admin(const std::string &prefix, std::deque<std::string> &params)
 162 {
 163         if (params.size() > 0)
 164         {
 165                 if (this->Instance->MatchText(this->Instance->Config->ServerName, params[0]))
 166                 {
 167                         /* It's for our server */
 168                         string_list results;
 169                         User* source = this->Instance->FindNick(prefix);
 170                         if (source)
 171                         {
 172                                 std::deque<std::string> par;
 173                                 par.push_back(prefix);
 174                                 par.push_back("");
 175                                 par[1] = std::string("::")+Instance->Config->ServerName+" 256 "+source->nick+" :Administrative info for "+Instance->Config->ServerName;
 176                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 177                                 par[1] = std::string("::")+Instance->Config->ServerName+" 257 "+source->nick+" :Name     - "+Instance->Config->AdminName;
 178                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 179                                 par[1] = std::string("::")+Instance->Config->ServerName+" 258 "+source->nick+" :Nickname - "+Instance->Config->AdminNick;
 180                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 181                                 par[1] = std::string("::")+Instance->Config->ServerName+" 258 "+source->nick+" :E-Mail   - "+Instance->Config->AdminEmail;
 182                                 Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 183                         }
 184                 }
 185                 else
 186                 {
 187                         /* Pass it on */
 188                         User* source = this->Instance->FindNick(prefix);
 189                         if (source)
 190                                 Utils->DoOneToOne(prefix, "ADMIN", params, params[0]);
 191                 }
 192         }
 193         return true;
 194 }
 195
 196 bool TreeSocket::Stats(const std::string &prefix, std::deque<std::string> &params)
 197 {
 198         /* Get the reply to a STATS query if it matches this servername,
 199          * and send it back as a load of PUSH queries
 200          */
 201         if (params.size() > 1)
 202         {
 203                 if (this->Instance->MatchText(this->Instance->Config->ServerName, params[1]))
 204                 {
 205                         /* It's for our server */
 206                         string_list results;
 207                         User* source = this->Instance->FindNick(prefix);
 208                         if (source)
 209                         {
 210                                 std::deque<std::string> par;
 211                                 par.push_back(prefix);
 212                                 par.push_back("");
 213                                 DoStats(this->Instance, *(params[0].c_str()), source, results);
 214                                 for (size_t i = 0; i < results.size(); i++)
 215                                 {
 216                                         par[1] = "::" + results[i];
 217                                         Utils->DoOneToOne(this->Instance->Config->GetSID(), "PUSH",par, source->server);
 218                                 }
 219                         }
 220                 }
 221                 else
 222                 {
 223                         /* Pass it on */
 224                         User* source = this->Instance->FindNick(prefix);
 225                         if (source)
 226                                 Utils->DoOneToOne(source->uuid, "STATS", params, params[1]);
 227                 }
 228         }
 229         return true;
 230 }
 231
 232
 233 /** Because the core won't let users or even SERVERS set +o,
 234  * we use the OPERTYPE command to do this.
 235  */
 236 bool TreeSocket::OperType(const std::string &prefix, std::deque<std::string> &params)
 237 {
 238         if (params.size() != 1)
 239                 return true;
 240         std::string opertype = params[0];
 241         User* u = this->Instance->FindNick(prefix);
 242         if (u)
 243         {
 244                 if (!u->IsModeSet('o'))
 245                         this->Instance->all_opers.push_back(u);
 246                 u->modes[UM_OPERATOR] = 1;
 247                 strlcpy(u->oper,opertype.c_str(),NICKMAX-1);
 248                 Utils->DoOneToAllButSender(u->nick,"OPERTYPE",params,u->server);
 249
 250                 TreeServer* remoteserver = Utils->FindServer(u->server);
 251                 bool dosend = true;
 252
 253                 if (this->Utils->quiet_bursts)
 254                 {
 255                         /*
 256                          * If quiet bursts are enabled, and server is bursting or silent uline (i.e. services),
 257                          * then do nothing. -- w00t
 258                          */
 259                         if (
 260                                 this->bursting ||
 261                                 Utils->FindRemoteBurstServer(remoteserver) ||
 262                                 this->Instance->SilentULine(this->Instance->FindServerNamePtr(u->server))
 263                            )
 264                         {
 265                                 dosend = false;
 266                         }
 267                 }
 268
 269                 if (dosend)
 270                         this->Instance->SNO->WriteToSnoMask('o',"From %s: User %s (%s@%s) is now an IRC operator of type %s",u->server, u->nick,u->ident,u->host,irc::Spacify(opertype.c_str()));
 271         }
 272         return true;
 273 }
 274
 275 /** Because Andy insists that services-compatible servers must
 276  * implement SVSNICK and SVSJOIN, that's exactly what we do :p
 277  */
 278 bool TreeSocket::ForceNick(const std::string &prefix, std::deque<std::string> &params)
 279 {
 280         if (params.size() < 3)
 281                 return true;
 282
 283         User* u = this->Instance->FindNick(params[0]);
 284
 285         if (u)
 286         {
 287                 Utils->DoOneToAllButSender(prefix,"SVSNICK",params,prefix);
 288
 289                 if (IS_LOCAL(u))
 290                 {
 291                         std::deque<std::string> par;
 292                         par.push_back(params[1]);
 293
 294                         if (!u->ForceNickChange(params[1].c_str()))
 295                         {
 296                                 /* buh. UID them */
 297                                 if (!u->ForceNickChange(u->uuid))
 298                                 {
 299                                         User::QuitUser(this->Instance, u, "Nickname collision");
 300                                         return true;
 301                                 }
 302                         }
 303
 304                         u->age = atoi(params[2].c_str());
 305                 }
 306         }
 307
 308         return true;
 309 }
 310
 311 bool TreeSocket::OperQuit(const std::string &prefix, std::deque<std::string> &params)
 312 {
 313         if (params.size() < 1)
 314                 return true;
 315
 316         User* u = this->Instance->FindNick(prefix);
 317
 318         if (u)
 319         {
 320                 u->SetOperQuit(params[0]);
 321                 params[0] = ":" + params[0];
 322                 Utils->DoOneToAllButSender(prefix,"OPERQUIT",params,prefix);
 323         }
 324         return true;
 325 }
 326
 327 bool TreeSocket::ServiceJoin(const std::string &prefix, std::deque<std::string> &params)
 328 {
 329         if (params.size() < 2)
 330                 return true;
 331
 332         if (!this->Instance->IsChannel(params[1].c_str()))
 333                 return true;
 334
 335         User* u = this->Instance->FindNick(params[0]);
 336
 337         if (u)
 338         {
 339                 /* only join if it's local, otherwise just pass it on! */
 340                 if (IS_LOCAL(u))
 341                         Channel::JoinUser(this->Instance, u, params[1].c_str(), false, "", false, Instance->Time());
 342                 Utils->DoOneToAllButSender(prefix,"SVSJOIN",params,prefix);
 343         }
 344         return true;
 345 }
 346
 347 bool TreeSocket::ServicePart(const std::string &prefix, std::deque<std::string> &params)
 348 {
 349         if (params.size() < 2)
 350                 return true;
 351
 352         if (!this->Instance->IsChannel(params[1].c_str()))
 353                 return true;
 354
 355         User* u = this->Instance->FindNick(params[0]);
 356         Channel* c = this->Instance->FindChan(params[1]);
 357
 358         if (u)
 359         {
 360                 /* only part if it's local, otherwise just pass it on! */
 361                 if (IS_LOCAL(u))
 362                         if (!c->PartUser(u, "Services forced part"))
 363                                 delete c;
 364                 Utils->DoOneToAllButSender(prefix,"SVSPART",params,prefix);
 365         }
 366
 367         return true;
 368 }
 369
 370 bool TreeSocket::RemoteRehash(const std::string &prefix, std::deque<std::string> &params)
 371 {
 372         if (params.size() < 1)
 373                 return false;
 374
 375         std::string servermask = params[0];
 376
 377         if (this->Instance->MatchText(this->Instance->Config->ServerName,servermask))
 378         {
 379                 this->Instance->SNO->WriteToSnoMask('l',"Remote rehash initiated by \002"+prefix+"\002.");
 380                 this->Instance->RehashServer();
 381                 Utils->ReadConfiguration(false);
 382                 InitializeDisabledCommands(Instance->Config->DisabledCommands, Instance);
 383         }
 384         Utils->DoOneToAllButSender(prefix,"REHASH",params,prefix);
 385         return true;
 386 }
 387
 388 bool TreeSocket::RemoteKill(const std::string &prefix, std::deque<std::string> &params)
 389 {
 390         if (params.size() != 2)
 391                 return true;
 392
 393         User* who = this->Instance->FindNick(params[0]);
 394
 395         if (who)
 396         {
 397                 /* Prepend kill source, if we don't have one */
 398                 if (*(params[1].c_str()) != '[')
 399                 {
 400                         params[1] = "[" + prefix + "] Killed (" + params[1] +")";
 401                 }
 402                 std::string reason = params[1];
 403                 params[1] = ":" + params[1];
 404                 Utils->DoOneToAllButSender(prefix,"KILL",params,prefix);
 405                 // NOTE: This is safe with kill hiding on, as RemoteKill is only reached if we have a server prefix.
 406                 // in short this is not executed for USERS.
 407                 who->Write(":%s KILL %s :%s (%s)", prefix.c_str(), who->nick, prefix.c_str(), reason.c_str());
 408                 User::QuitUser(this->Instance,who,reason);
 409         }
 410         return true;
 411 }
 412
 413 bool TreeSocket::LocalPong(const std::string &prefix, std::deque<std::string> &params)
 414 {
 415         if (params.size() < 1)
 416                 return true;
 417
 418         if (params.size() == 1)
 419         {
 420                 TreeServer* ServerSource = Utils->FindServer(prefix);
 421                 if (ServerSource)
 422                 {
 423                         ServerSource->SetPingFlag();
 424                         timeval t;
 425                         gettimeofday(&t, NULL);
 426                         long ts = (t.tv_sec * 1000) + (t.tv_usec / 1000);
 427                         ServerSource->rtt = ts - ServerSource->LastPingMsec;
 428                 }
 429         }
 430         else
 431         {
 432                 std::string forwardto = params[1];
 433                 if (forwardto == Instance->Config->GetSID() || forwardto == Instance->Config->ServerName)
 434                 {
 435                         /*
 436                          * this is a PONG for us
 437                          * if the prefix is a user, check theyre local, and if they are,
 438                          * dump the PONG reply back to their fd. If its a server, do nowt.
 439                          * Services might want to send these s->s, but we dont need to yet.
 440                          */
 441                         User* u = this->Instance->FindNick(prefix);
 442                         if (u)
 443                         {
 444                                 u->WriteServ("PONG %s %s",params[0].c_str(),params[1].c_str());
 445                         }
 446                 }
 447                 else
 448                 {
 449                         // not for us, pass it on :)
 450                         Utils->DoOneToOne(prefix,"PONG",params,forwardto);
 451                 }
 452         }
 453
 454         return true;
 455 }
 456
 457 bool TreeSocket::MetaData(const std::string &prefix, std::deque<std::string> &params)
 458 {
 459         if (params.size() < 2)
 460                 return true;
 461         else if (params.size() < 3)
 462                 params.push_back("");
 463         TreeServer* ServerSource = Utils->FindServer(prefix);
 464         if (ServerSource)
 465         {
 466                 Utils->SetRemoteBursting(ServerSource, false);
 467
 468                 if (params[0] == "*")
 469                 {
 470                         FOREACH_MOD_I(this->Instance,I_OnDecodeMetaData,OnDecodeMetaData(TYPE_OTHER,NULL,params[1],params[2]));
 471                 }
 472                 else if (*(params[0].c_str()) == '#')
 473                 {
 474                         Channel* c = this->Instance->FindChan(params[0]);
 475                         if (c)
 476                         {
 477                                 FOREACH_MOD_I(this->Instance,I_OnDecodeMetaData,OnDecodeMetaData(TYPE_CHANNEL,c,params[1],params[2]));
 478                         }
 479                 }
 480                 else if (*(params[0].c_str()) != '#')
 481                 {
 482                         User* u = this->Instance->FindNick(params[0]);
 483                         if (u)
 484                         {
 485                                 FOREACH_MOD_I(this->Instance,I_OnDecodeMetaData,OnDecodeMetaData(TYPE_USER,u,params[1],params[2]));
 486                         }
 487                 }
 488         }
 489
 490         params[2] = ":" + params[2];
 491         Utils->DoOneToAllButSender(prefix,"METADATA",params,prefix);
 492         return true;
 493 }
 494
 495 bool TreeSocket::ServerVersion(const std::string &prefix, std::deque<std::string> &params)
 496 {
 497         if (params.size() < 1)
 498                 return true;
 499
 500         TreeServer* ServerSource = Utils->FindServer(prefix);
 501
 502         if (ServerSource)
 503         {
 504                 ServerSource->SetVersion(params[0]);
 505         }
 506         params[0] = ":" + params[0];
 507         Utils->DoOneToAllButSender(prefix,"VERSION",params,prefix);
 508         return true;
 509 }
 510
 511 bool TreeSocket::ChangeHost(const std::string &prefix, std::deque<std::string> &params)
 512 {
 513         if (params.size() < 1)
 514                 return true;
 515         User* u = this->Instance->FindNick(prefix);
 516
 517         if (u)
 518         {
 519                 u->ChangeDisplayedHost(params[0].c_str());
 520                 Utils->DoOneToAllButSender(prefix,"FHOST",params,u->server);
 521         }
 522         return true;
 523 }
 524
 525 bool TreeSocket::AddLine(const std::string &prefix, std::deque<std::string> &params)
 526 {
 527         if (params.size() < 6)
 528                 return true;
 529
 530         XLineFactory* xlf = Instance->XLines->GetFactory(params[0]);
 531
 532         if (!xlf)
 533                 return false;
 534
 535         XLine* xl = xlf->Generate(Instance->Time(), atoi(params[4].c_str()), params[2].c_str(), params[5].c_str(), params[1].c_str());
 536         xl->SetCreateTime(atoi(params[3].c_str()));
 537         if (Instance->XLines->AddLine(xl,NULL))
 538         {
 539                 if (xl->duration)
 540                 {
 541                         this->Instance->SNO->WriteToSnoMask('x',"%s added %s%s on %s to expire on %s (%s).",prefix.c_str(),params[0].c_str(),params[0].length() == 1 ? "LINE" : "",
 542                                         params[1].c_str(),Instance->TimeString(xl->expiry).c_str(),params[5].c_str());
 543                 }
 544                 else
 545                 {
 546                         this->Instance->SNO->WriteToSnoMask('x',"%s added permenant %s%s on %s (%s).",prefix.c_str(),params[0].c_str(),params[0].length() == 1 ? "LINE" : "",
 547                                         params[1].c_str(),params[5].c_str());
 548                 }
 549                 params[5] = ":" + params[5];
 550
 551                 User* u = Instance->FindNick(prefix);
 552                 Utils->DoOneToAllButSender(prefix, "ADDLINE", params, u ? u->server : prefix);
 553         }
 554         else
 555                 delete xl;
 556
 557         if (!this->bursting)
 558         {
 559                 Instance->XLines->ApplyLines();
 560         }
 561
 562         return true;
 563 }
 564
 565 bool TreeSocket::DelLine(const std::string &prefix, std::deque<std::string> &params)
 566 {
 567         if (params.size() < 2)
 568                 return true;
 569
 570         User* user = Instance->FindNick(prefix);
 571
 572         /* NOTE: No check needed on 'user', this function safely handles NULL */
 573         if (Instance->XLines->DelLine(params[0].c_str(), params[1], user))
 574         {
 575                 this->Instance->SNO->WriteToSnoMask('x',"%s removed %s%s on %s.", prefix.c_str(),
 576                                 params[0].c_str(), params[0].length() == 1 ? "LINE" : "", params[1].c_str());
 577                 Utils->DoOneToAllButSender(prefix,"DELLINE", params, prefix);
 578         }
 579         return true;
 580 }
 581
 582 bool TreeSocket::ChangeName(const std::string &prefix, std::deque<std::string> &params)
 583 {
 584         if (params.size() < 1)
 585                 return true;
 586         User* u = this->Instance->FindNick(prefix);
 587         if (u)
 588         {
 589                 u->ChangeName(params[0].c_str());
 590                 params[0] = ":" + params[0];
 591                 Utils->DoOneToAllButSender(prefix,"FNAME",params,u->server);
 592         }
 593         return true;
 594 }
 595
 596 bool TreeSocket::Whois(const std::string &prefix, std::deque<std::string> &params)
 597 {
 598         if (params.size() < 1)
 599                 return true;
 600         User* u = this->Instance->FindNick(prefix);
 601         if (u)
 602         {
 603                 // an incoming request
 604                 if (params.size() == 1)
 605                 {
 606                         User* x = this->Instance->FindNick(params[0]);
 607                         if ((x) && (IS_LOCAL(x)))
 608                         {
 609                                 User* x = this->Instance->FindNick(params[0]);
 610                                 char signon[MAXBUF];
 611                                 char idle[MAXBUF];
 612                                 snprintf(signon, MAXBUF, "%lu", (unsigned long)x->signon);
 613                                 snprintf(idle, MAXBUF, "%lu", (unsigned long)abs((x->idle_lastmsg) - Instance->Time(true)));
 614                                 std::deque<std::string> par;
 615                                 par.push_back(prefix);
 616                                 par.push_back(signon);
 617                                 par.push_back(idle);
 618                                 // ours, we're done, pass it BACK
 619                                 Utils->DoOneToOne(params[0], "IDLE", par, u->server);
 620                         }
 621                         else
 622                         {
 623                                 // not ours pass it on
 624                                 if (x)
 625                                         Utils->DoOneToOne(prefix, "IDLE", params, x->server);
 626                         }
 627                 }
 628                 else if (params.size() == 3)
 629                 {
 630                         std::string who_did_the_whois = params[0];
 631                         User* who_to_send_to = this->Instance->FindNick(who_did_the_whois);
 632                         if ((who_to_send_to) && (IS_LOCAL(who_to_send_to)))
 633                         {
 634                                 // an incoming reply to a whois we sent out
 635                                 std::string nick_whoised = prefix;
 636                                 unsigned long signon = atoi(params[1].c_str());
 637                                 unsigned long idle = atoi(params[2].c_str());
 638                                 if ((who_to_send_to) && (IS_LOCAL(who_to_send_to)))
 639                                 {
 640                                         do_whois(this->Instance, who_to_send_to, u, signon, idle, nick_whoised.c_str());
 641                                 }
 642                         }
 643                         else
 644                         {
 645                                 // not ours, pass it on
 646                                 if (who_to_send_to)
 647                                         Utils->DoOneToOne(prefix, "IDLE", params, who_to_send_to->server);
 648                         }
 649                 }
 650         }
 651         return true;
 652 }
 653
 654 bool TreeSocket::Push(const std::string &prefix, std::deque<std::string> &params)
 655 {
 656         if (params.size() < 2)
 657                 return true;
 658         User* u = this->Instance->FindNick(params[0]);
 659         if (!u)
 660                 return true;
 661         if (IS_LOCAL(u))
 662         {
 663                 u->Write(params[1]);
 664         }
 665         else
 666         {
 667                 // continue the raw onwards
 668                 params[1] = ":" + params[1];
 669                 Utils->DoOneToOne(prefix,"PUSH",params,u->server);
 670         }
 671         return true;
 672 }
 673
 674 bool TreeSocket::HandleSetTime(const std::string &prefix, std::deque<std::string> &params)
 675 {
 676         if (!params.size() || !Utils->EnableTimeSync)
 677                 return true;
 678
 679         bool force = false;
 680
 681         if ((params.size() == 2) && (params[1] == "FORCE"))
 682                 force = true;
 683
 684         time_t them = atoi(params[0].c_str());
 685         time_t us = Instance->Time(false);
 686
 687         time_t diff = them - us;
 688
 689         Utils->DoOneToAllButSender(prefix, "TIMESET", params, prefix);
 690
 691         if (force || (them != us))
 692         {
 693                 time_t old = Instance->SetTimeDelta(diff);
 694                 Instance->Log(DEBUG, "TS (diff %d) from %s applied (old delta was %d)", diff, prefix.c_str(), old);
 695         }
 696
 697         return true;
 698 }
 699
 700 bool TreeSocket::Time(const std::string &prefix, std::deque<std::string> &params)
 701 {
 702         // :source.server TIME remote.server sendernick
 703         // :remote.server TIME source.server sendernick TS
 704         if (params.size() == 2)
 705         {
 706                 // someone querying our time?
 707                 if (this->Instance->Config->ServerName == params[0] || this->Instance->Config->GetSID() == params[0])
 708                 {
 709                         User* u = this->Instance->FindNick(params[1]);
 710                         if (u)
 711                         {
 712                                 params.push_back(ConvToStr(Instance->Time(false)));
 713                                 params[0] = prefix;
 714                                 Utils->DoOneToOne(this->Instance->Config->GetSID(),"TIME",params,params[0]);
 715                         }
 716                 }
 717                 else
 718                 {
 719                         // not us, pass it on
 720                         User* u = this->Instance->FindNick(params[1]);
 721                         if (u)
 722                                 Utils->DoOneToOne(prefix,"TIME",params,params[0]);
 723                 }
 724         }
 725         else if (params.size() == 3)
 726         {
 727                 // a response to a previous TIME
 728                 User* u = this->Instance->FindNick(params[1]);
 729                 if ((u) && (IS_LOCAL(u)))
 730                 {
 731                         time_t rawtime = atol(params[2].c_str());
 732                         struct tm * timeinfo;
 733                         timeinfo = localtime(&rawtime);
 734                         char tms[26];
 735                         snprintf(tms,26,"%s",asctime(timeinfo));
 736                         tms[24] = 0;
 737                         u->WriteServ("391 %s %s :%s",u->nick,prefix.c_str(),tms);
 738                 }
 739                 else
 740                 {
 741                         if (u)
 742                                 Utils->DoOneToOne(prefix,"TIME",params,u->server);
 743                 }
 744         }
 745         return true;
 746 }
 747
 748 bool TreeSocket::LocalPing(const std::string &prefix, std::deque<std::string> &params)
 749 {
 750         if (params.size() < 1)
 751                 return true;
 752         if (params.size() == 1)
 753         {
 754                 std::string stufftobounce = params[0];
 755                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" PONG "+stufftobounce);
 756                 return true;
 757         }
 758         else
 759         {
 760                 std::string forwardto = params[1];
 761                 if (forwardto == this->Instance->Config->ServerName || forwardto == this->Instance->Config->GetSID())
 762                 {
 763                         // this is a ping for us, send back PONG to the requesting server
 764                         params[1] = params[0];
 765                         params[0] = forwardto;
 766                         Utils->DoOneToOne(forwardto,"PONG",params,params[1]);
 767                 }
 768                 else
 769                 {
 770                         // not for us, pass it on :)
 771                         Utils->DoOneToOne(prefix,"PING",params,forwardto);
 772                 }
 773                 return true;
 774         }
 775 }
 776
 777 /** TODO: This creates a total mess of output and needs to really use irc::modestacker.
 778  */
 779 bool TreeSocket::RemoveStatus(const std::string &prefix, std::deque<std::string> &params)
 780 {
 781         if (params.size() < 1)
 782                 return true;
 783         Channel* c = Instance->FindChan(params[0]);
 784         if (c)
 785         {
 786                 for (char modeletter = 'A'; modeletter <= 'z'; modeletter++)
 787                 {
 788                         ModeHandler* mh = Instance->Modes->FindMode(modeletter, MODETYPE_CHANNEL);
 789                         if (mh)
 790                                 mh->RemoveMode(c);
 791                 }
 792         }
 793         return true;
 794 }
 795
 796 bool TreeSocket::RemoteServer(const std::string &prefix, std::deque<std::string> &params)
 797 {
 798         if (params.size() < 5)
 799         {
 800                 SendError("Protocol error - Missing SID");
 801                 return false;
 802         }
 803
 804         std::string servername = params[0];
 805         std::string password = params[1];
 806         // hopcount is not used for a remote server, we calculate this ourselves
 807         std::string sid = params[3];
 808         std::string description = params[4];
 809         TreeServer* ParentOfThis = Utils->FindServer(prefix);
 810         if (!ParentOfThis)
 811         {
 812                 this->SendError("Protocol error - Introduced remote server from unknown server "+prefix);
 813                 return false;
 814         }
 815         if (!Utils->IsSID(sid))
 816         {
 817                 this->SendError("Invalid format server ID: "+sid+"!");
 818                 return false;
 819         }
 820         TreeServer* CheckDupe = Utils->FindServer(servername);
 821         if (CheckDupe)
 822         {
 823                 this->SendError("Server "+servername+" already exists!");
 824                 this->Instance->SNO->WriteToSnoMask('l',"Server \2"+servername+"\2 being introduced from \2" + prefix + "\2 denied, already exists. Closing link with " + prefix);
 825                 return false;
 826         }
 827
 828         Link* lnk = Utils->FindLink(servername);
 829
 830         TreeServer *Node = new TreeServer(this->Utils, this->Instance, servername, description, sid, ParentOfThis,NULL, lnk ? lnk->Hidden : false);
 831
 832         if (Node->DuplicateID())
 833         {
 834                 this->SendError("Server ID "+sid+" already exists on the network!");
 835                 this->Instance->SNO->WriteToSnoMask('l',"Server \2"+servername+"\2 being introduced from \2" + prefix + "\2 denied, server ID already exists on the network. Closing link with " + prefix);
 836                 return false;
 837         }
 838
 839         ParentOfThis->AddChild(Node);
 840         params[4] = ":" + params[4];
 841         Utils->SetRemoteBursting(Node, true);
 842         Utils->DoOneToAllButSender(prefix,"SERVER",params,prefix);
 843         this->Instance->SNO->WriteToSnoMask('l',"Server \002"+prefix+"\002 introduced server \002"+servername+"\002 ("+description+")");
 844         return true;
 845 }
 846
 847 bool TreeSocket::ComparePass(const std::string &ours, const std::string &theirs)
 848 {
 849         if ((!strncmp(ours.c_str(), "HMAC-SHA256:", 12)) || (!strncmp(theirs.c_str(), "HMAC-SHA256:", 12)))
 850         {
 851                 /* One or both of us specified hmac sha256, but we don't have sha256 module loaded!
 852                  * We can't allow this password as valid.
 853                  */
 854                 if (!Instance->Modules->Find("m_sha256.so") || !Utils->ChallengeResponse)
 855                                 return false;
 856                 else
 857                         /* Straight string compare of hashes */
 858                         return ours == theirs;
 859         }
 860         else
 861                 /* Straight string compare of plaintext */
 862                 return ours == theirs;
 863 }
 864
 865 bool TreeSocket::Outbound_Reply_Server(std::deque<std::string> &params)
 866 {
 867         if (params.size() < 5)
 868         {
 869                 SendError("Protocol error - Missing SID");
 870                 return false;
 871         }
 872
 873         irc::string servername = params[0].c_str();
 874         std::string sname = params[0];
 875         std::string password = params[1];
 876         std::string sid = params[3];
 877         std::string description = params[4];
 878         int hops = atoi(params[2].c_str());
 879
 880         this->InboundServerName = sname;
 881         this->InboundDescription = description;
 882         this->InboundSID = sid;
 883
 884         if (!sentcapab)
 885                 this->SendCapabilities();
 886
 887         if (hops)
 888         {
 889                 this->SendError("Server too far away for authentication");
 890                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, server is too far away for authentication");
 891                 return false;
 892         }
 893
 894         if (!Utils->IsSID(sid))
 895         {
 896                 this->SendError("Invalid format server ID: "+sid+"!");
 897                 return false;
 898         }
 899
 900         for (std::vector<Link>::iterator x = Utils->LinkBlocks.begin(); x < Utils->LinkBlocks.end(); x++)
 901         {
 902                 if ((x->Name == servername) && ((ComparePass(this->MakePass(x->RecvPass,this->GetOurChallenge()),password)) || (x->RecvPass == password && (this->GetTheirChallenge().empty()))))
 903                 {
 904                         TreeServer* CheckDupe = Utils->FindServer(sname);
 905                         if (CheckDupe)
 906                         {
 907                                 this->SendError("Server "+sname+" already exists on server "+CheckDupe->GetParent()->GetName()+"!");
 908                                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, already exists on server "+CheckDupe->GetParent()->GetName());
 909                                 return false;
 910                         }
 911                         // Begin the sync here. this kickstarts the
 912                         // other side, waiting in WAIT_AUTH_2 state,
 913                         // into starting their burst, as it shows
 914                         // that we're happy.
 915                         this->LinkState = CONNECTED;
 916                         // we should add the details of this server now
 917                         // to the servers tree, as a child of the root
 918                         // node.
 919
 920                         TreeServer *Node = new TreeServer(this->Utils, this->Instance, sname, description, sid, Utils->TreeRoot, this, x->Hidden);
 921
 922                         if (Node->DuplicateID())
 923                         {
 924                                 this->SendError("Server ID "+sid+" already exists on the network!");
 925                                 this->Instance->SNO->WriteToSnoMask('l',"Server \2"+assign(servername)+"\2 being introduced denied, server ID already exists on the network. Closing link.");
 926                                 return false;
 927                         }
 928
 929                         Utils->TreeRoot->AddChild(Node);
 930                         params[4] = ":" + params[4];
 931                         Utils->DoOneToAllButSender(Instance->Config->GetSID(),"SERVER",params,sname);
 932                         this->bursting = true;
 933                         this->DoBurst(Node);
 934                         return true;
 935                 }
 936         }
 937         this->SendError("Invalid credentials");
 938         this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, invalid link credentials");
 939         return false;
 940 }
 941
 942 bool TreeSocket::Inbound_Server(std::deque<std::string> &params)
 943 {
 944         if (params.size() < 5)
 945         {
 946                 SendError("Protocol error - Missing SID");
 947                 return false;
 948         }
 949
 950         irc::string servername = params[0].c_str();
 951         std::string sname = params[0];
 952         std::string password = params[1];
 953         std::string sid = params[3];
 954         std::string description = params[4];
 955         int hops = atoi(params[2].c_str());
 956
 957         this->InboundServerName = sname;
 958         this->InboundDescription = description;
 959         this->InboundSID = sid;
 960
 961         if (!sentcapab)
 962                 this->SendCapabilities();
 963
 964         if (hops)
 965         {
 966                 this->SendError("Server too far away for authentication");
 967                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, server is too far away for authentication");
 968                 return false;
 969         }
 970
 971         if (!Utils->IsSID(sid))
 972         {
 973                 this->SendError("Invalid format server ID: "+sid+"!");
 974                 return false;
 975         }
 976
 977         for (std::vector<Link>::iterator x = Utils->LinkBlocks.begin(); x < Utils->LinkBlocks.end(); x++)
 978         {
 979                 if ((x->Name == servername) && ((ComparePass(this->MakePass(x->RecvPass,this->GetOurChallenge()),password) || x->RecvPass == password && (this->GetTheirChallenge().empty()))))
 980                 {
 981                         /* First check for instances of the server that are waiting between the inbound and outbound SERVER command */
 982                         TreeSocket* CheckDupeSocket = Utils->FindBurstingServer(sname);
 983                         if (CheckDupeSocket)
 984                         {
 985                                 /* If we find one, we abort the link to prevent a race condition */
 986                                 this->SendError("Negotiation collision");
 987                                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, already exists in a negotiating state.");
 988                                 CheckDupeSocket->SendError("Negotiation collision");
 989                                 Instance->SE->DelFd(CheckDupeSocket);
 990                                 CheckDupeSocket->Close();
 991                                 return false;
 992                         }
 993                         /* Check for fully initialized instances of the server by id */
 994                         Instance->Log(DEBUG,"Looking for dupe SID %s", sid.c_str());
 995                         TreeServer* CheckDupeSID = Utils->FindServerID(sid);
 996                         if (CheckDupeSID)
 997                         {
 998                                 this->SendError("Server ID "+CheckDupeSID->GetID()+" already exists on server "+CheckDupeSID->GetName()+"!");
 999                                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, server ID '"+CheckDupeSID->GetID()+
1000                                                 "' already exists on server "+CheckDupeSID->GetName());
1001                                 return false;
1002                         }
1003                         /* Now check for fully initialized instances of the server by name */
1004                         TreeServer* CheckDupe = Utils->FindServer(sname);
1005                         if (CheckDupe)
1006                         {
1007                                 this->SendError("Server "+sname+" already exists on server "+CheckDupe->GetParent()->GetName()+"!");
1008                                 this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, already exists on server "+CheckDupe->GetParent()->GetName());
1009                                 return false;
1010                         }
1011                         this->Instance->SNO->WriteToSnoMask('l',"Verified incoming server connection from \002"+sname+"\002["+(x->HiddenFromStats ? "<hidden>" : this->GetIP())+"] ("+description+")");
1012                         if (this->Hook)
1013                         {
1014                                 std::string name = BufferedSocketNameRequest((Module*)Utils->Creator, this->Hook).Send();
1015                                 this->Instance->SNO->WriteToSnoMask('l',"Connection from \2"+sname+"\2["+(x->HiddenFromStats ? "<hidden>" : this->GetIP())+"] using transport \2"+name+"\2");
1016                         }
1017
1018                         Utils->AddBurstingServer(sname,this);
1019
1020                         // this is good. Send our details: Our server name and description and hopcount of 0,
1021                         // along with the sendpass from this block.
1022                         this->WriteLine(std::string("SERVER ")+this->Instance->Config->ServerName+" "+this->MakePass(x->SendPass, this->GetTheirChallenge())+" 0 "+Instance->Config->GetSID()+" :"+this->Instance->Config->ServerDesc);
1023                         // move to the next state, we are now waiting for THEM.
1024                         this->LinkState = WAIT_AUTH_2;
1025                         return true;
1026                 }
1027         }
1028         this->SendError("Invalid credentials");
1029         this->Instance->SNO->WriteToSnoMask('l',"Server connection from \2"+sname+"\2 denied, invalid link credentials");
1030         return false;
1031 }
1032
1033 void TreeSocket::Split(const std::string &line, std::deque<std::string> &n)
1034 {
1035         n.clear();
1036         irc::tokenstream tokens(line);
1037         std::string param;
1038         while (tokens.GetToken(param))
1039         {
1040                 n.push_back(param);
1041         }
1042         return;
1043 }
1044
1045 bool TreeSocket::ProcessLine(std::string &line)
1046 {
1047         std::deque<std::string> params;
1048         irc::string command;
1049         std::string prefix;
1050
1051         line = line.substr(0, line.find_first_of("\r\n"));
1052
1053         if (line.empty())
1054                 return true;
1055
1056         Instance->Log(DEBUG, "S[%d] I %s", this->GetFd(), line.c_str());
1057
1058         this->Split(line.c_str(),params);
1059
1060         if (params.empty())
1061                 return true;
1062
1063         if ((params[0][0] == ':') && (params.size() > 1))
1064         {
1065                 prefix = params[0].substr(1);
1066                 params.pop_front();
1067         }
1068         command = params[0].c_str();
1069         params.pop_front();
1070         switch (this->LinkState)
1071         {
1072                 TreeServer* Node;
1073
1074                 case WAIT_AUTH_1:
1075                         // Waiting for SERVER command from remote server. Server initiating
1076                         // the connection sends the first SERVER command, listening server
1077                         // replies with theirs if its happy, then if the initiator is happy,
1078                         // it starts to send its net sync, which starts the merge, otherwise
1079                         // it sends an ERROR.
1080                         if (command == "PASS")
1081                         {
1082                                 /* Silently ignored */
1083                         }
1084                         else if (command == "SERVER")
1085                         {
1086                                 return this->Inbound_Server(params);
1087                         }
1088                         else if (command == "ERROR")
1089                         {
1090                                 return this->Error(params);
1091                         }
1092                         else if (command == "USER")
1093                         {
1094                                 this->SendError("Client connections to this port are prohibited.");
1095                                 return false;
1096                         }
1097                         else if (command == "CAPAB")
1098                         {
1099                                 return this->Capab(params);
1100                         }
1101                         else
1102                         {
1103                                 irc::string error = "Invalid command in negotiation phase: " + command;
1104                                 this->SendError(assign(error));
1105                                 return false;
1106                         }
1107                 break;
1108                 case WAIT_AUTH_2:
1109                         // Waiting for start of other side's netmerge to say they liked our
1110                         // password.
1111                         if (command == "SERVER")
1112                         {
1113                                 // cant do this, they sent it to us in the WAIT_AUTH_1 state!
1114                                 // silently ignore.
1115                                 return true;
1116                         }
1117                         else if (command == "BURST")
1118                         {
1119                                 if (params.size() && Utils->EnableTimeSync)
1120                                 {
1121                                         bool we_have_delta = (Instance->Time(false) != Instance->Time(true));
1122                                         time_t them = atoi(params[0].c_str());
1123                                         time_t delta = them - Instance->Time(false);
1124                                         if ((delta < -600) || (delta > 600))
1125                                         {
1126                                                 Instance->SNO->WriteToSnoMask('l',"\2ERROR\2: Your clocks are out by %d seconds (this is more than five minutes). Link aborted, \2PLEASE SYNC YOUR CLOCKS!\2",abs(delta));
1127                                                 SendError("Your clocks are out by "+ConvToStr(abs(delta))+" seconds (this is more than five minutes). Link aborted, PLEASE SYNC YOUR CLOCKS!");
1128                                                 return false;
1129                                         }
1130                                         else if ((delta < -30) || (delta > 30))
1131                                         {
1132                                                 Instance->SNO->WriteToSnoMask('l',"\2WARNING\2: Your clocks are out by %d seconds. Please consider synching your clocks.", abs(delta));
1133                                         }
1134
1135                                         if (!Utils->MasterTime && !we_have_delta)
1136                                         {
1137                                                 this->Instance->SetTimeDelta(delta);
1138                                                 // Send this new timestamp to any other servers
1139                                                 Utils->DoOneToMany(Instance->Config->GetSID(), "TIMESET", params);
1140                                         }
1141                                 }
1142                                 this->LinkState = CONNECTED;
1143                                 Link* lnk = Utils->FindLink(InboundServerName);
1144
1145                                 Node = new TreeServer(this->Utils, this->Instance, InboundServerName, InboundDescription, InboundSID, Utils->TreeRoot, this, lnk ? lnk->Hidden : false);
1146
1147                                 if (Node->DuplicateID())
1148                                 {
1149                                         this->SendError("Server ID "+InboundSID+" already exists on the network!");
1150                                         this->Instance->SNO->WriteToSnoMask('l',"Server \2"+InboundServerName+"\2 being introduced from \2" + prefix + "\2 denied, server ID already exists on the network. Closing link.");
1151                                         return false;
1152                                 }
1153                                 Utils->DelBurstingServer(this);
1154                                 Utils->TreeRoot->AddChild(Node);
1155                                 params.clear();
1156                                 params.push_back(InboundServerName);
1157                                 params.push_back("*");
1158                                 params.push_back("1");
1159                                 params.push_back(InboundSID);
1160                                 params.push_back(":"+InboundDescription);
1161                                 Utils->DoOneToAllButSender(Instance->Config->GetSID(),"SERVER",params,InboundServerName);
1162                                 this->bursting = true;
1163                                 this->DoBurst(Node);
1164                         }
1165                         else if (command == "ERROR")
1166                         {
1167                                 return this->Error(params);
1168                         }
1169                         else if (command == "CAPAB")
1170                         {
1171                                 return this->Capab(params);
1172                         }
1173
1174                 break;
1175                 case LISTENER:
1176                         this->SendError("Internal error -- listening socket accepted its own descriptor!!!");
1177                         return false;
1178                 break;
1179                 case CONNECTING:
1180                         if (command == "SERVER")
1181                         {
1182                                 // another server we connected to, which was in WAIT_AUTH_1 state,
1183                                 // has just sent us their credentials. If we get this far, theyre
1184                                 // happy with OUR credentials, and they are now in WAIT_AUTH_2 state.
1185                                 // if we're happy with this, we should send our netburst which
1186                                 // kickstarts the merge.
1187                                 return this->Outbound_Reply_Server(params);
1188                         }
1189                         else if (command == "ERROR")
1190                         {
1191                                 return this->Error(params);
1192                         }
1193                         else if (command == "CAPAB")
1194                         {
1195                                 return this->Capab(params);
1196                         }
1197                 break;
1198                 case CONNECTED:
1199                         // This is the 'authenticated' state, when all passwords
1200                         // have been exchanged and anything past this point is taken
1201                         // as gospel.
1202
1203                         if (!prefix.empty())
1204                         {
1205                                 std::string direction = prefix;
1206
1207                                 User *t = this->Instance->FindUUID(prefix);
1208                                 if (t)
1209                                 {
1210                                         direction = t->server;
1211                                 }
1212
1213                                 TreeServer* route_back_again = Utils->BestRouteTo(direction);
1214                                 if ((!route_back_again) || (route_back_again->GetSocket() != this))
1215                                 {
1216                                         if (route_back_again)
1217                                                 Instance->Log(DEBUG,"Protocol violation: Fake direction in command '%s' from connection '%s'",line.c_str(),this->GetName().c_str());
1218                                         return true;
1219                                 }
1220                                 /* Fix by brain:
1221                                  * When there is activity on the socket, reset the ping counter so
1222                                  * that we're not wasting bandwidth pinging an active server.
1223                                  */
1224                                 route_back_again->SetNextPingTime(time(NULL) + Utils->PingFreq);
1225                                 route_back_again->SetPingFlag();
1226                         }
1227                         else
1228                         {
1229                                 TreeServer* n = Utils->FindServer(GetName());
1230                                 if (n)
1231                                         prefix = n->GetID();
1232                                 else
1233                                         prefix = GetName();
1234                         }
1235
1236                         if ((command == "MODE") && (params.size() >= 2))
1237                         {
1238                                 Channel* channel = Instance->FindChan(params[0]);
1239                                 if (channel)
1240                                 {
1241                                         User* x = Instance->FindNick(prefix);
1242                                         if (x)
1243                                         {
1244                                                 if (warned.find(x->server) == warned.end())
1245                                                 {
1246                                                         Instance->Log(DEFAULT,"WARNING: I revceived modes '%s' from another server '%s'. This is not compliant with InspIRCd. Please check that server for bugs.", params[1].c_str(), x->server);
1247                                                         Instance->SNO->WriteToSnoMask('d', "WARNING: The server %s is sending nonstandard modes: '%s MODE %s' where FMODE should be used, and may cause desyncs.", x->server, x->nick, params[1].c_str());
1248                                                         warned[x->server] = x->nick;
1249                                                 }
1250                                         }
1251                                 }
1252                         }
1253
1254                         if (command == "SVSMODE")
1255                         {
1256                                 /* Services expects us to implement
1257                                  * SVSMODE. In inspircd its the same as
1258                                  * MODE anyway.
1259                                  */
1260                                 command = "MODE";
1261                         }
1262                         std::string target;
1263                         /* Yes, know, this is a mess. Its reasonably fast though as we're
1264                          * working with std::string here.
1265                          */
1266                         if (command == "UID")
1267                         {
1268                                 return this->ParseUID(prefix, params);
1269                         }
1270                         else if (command == "FJOIN")
1271                         {
1272                                 TreeServer* ServerSource = Utils->FindServer(prefix);
1273                                 if (ServerSource)
1274                                         Utils->SetRemoteBursting(ServerSource, false);
1275                                 return this->ForceJoin(prefix,params);
1276                         }
1277                         else if (command == "STATS")
1278                         {
1279                                 return this->Stats(prefix, params);
1280                         }
1281                         else if (command == "MOTD")
1282                         {
1283                                 return this->Motd(prefix, params);
1284                         }
1285                         else if (command == "KILL" && Utils->IsServer(prefix))
1286                         {
1287                                 return this->RemoteKill(prefix,params);
1288                         }
1289                         else if (command == "MODULES")
1290                         {
1291                                 return this->Modules(prefix, params);
1292                         }
1293                         else if (command == "ADMIN")
1294                         {
1295                                 return this->Admin(prefix, params);
1296                         }
1297                         else if (command == "SERVER")
1298                         {
1299                                 return this->RemoteServer(prefix,params);
1300                         }
1301                         else if (command == "ERROR")
1302                         {
1303                                 return this->Error(params);
1304                         }
1305                         else if (command == "OPERTYPE")
1306                         {
1307                                 return this->OperType(prefix,params);
1308                         }
1309                         else if (command == "FMODE")
1310                         {
1311                                 TreeServer* ServerSource = Utils->FindServer(prefix);
1312                                 if (ServerSource)
1313                                         Utils->SetRemoteBursting(ServerSource, false);
1314                                 return this->ForceMode(prefix,params);
1315                         }
1316                         else if (command == "FTOPIC")
1317                         {
1318                                 return this->ForceTopic(prefix,params);
1319                         }
1320                         else if (command == "REHASH")
1321                         {
1322                                 return this->RemoteRehash(prefix,params);
1323                         }
1324                         else if (command == "METADATA")
1325                         {
1326                                 return this->MetaData(prefix,params);
1327                         }
1328                         else if (command == "REMSTATUS")
1329                         {
1330                                 return this->RemoveStatus(prefix,params);
1331                         }
1332                         else if (command == "PING")
1333                         {
1334                                 /*
1335                                  * We just got a ping from a server that's bursting.
1336                                  * This can't be right, so set them to not bursting, and
1337                                  * apply their lines.
1338                                  */
1339                                 TreeServer* ServerSource = Utils->FindServer(prefix);
1340                                 if (ServerSource)
1341                                         Utils->SetRemoteBursting(ServerSource, false);
1342
1343                                 if (this->bursting)
1344                                 {
1345                                         this->bursting = false;
1346                                         Instance->XLines->ApplyLines();
1347                                 }
1348
1349                                 return this->LocalPing(prefix,params);
1350                         }
1351                         else if (command == "PONG")
1352                         {
1353                                 /*
1354                                  * We just got a pong from a server that's bursting.
1355                                  * This can't be right, so set them to not bursting, and
1356                                  * apply their lines.
1357                                  */
1358                                 TreeServer* ServerSource = Utils->FindServer(prefix);
1359                                 if (ServerSource)
1360                                         Utils->SetRemoteBursting(ServerSource, false);
1361
1362                                 if (this->bursting)
1363                                 {
1364                                         this->bursting = false;
1365                                         Instance->XLines->ApplyLines();
1366                                 }
1367
1368                                 return this->LocalPong(prefix,params);
1369                         }
1370                         else if (command == "VERSION")
1371                         {
1372                                 return this->ServerVersion(prefix,params);
1373                         }
1374                         else if (command == "FHOST")
1375                         {
1376                                 return this->ChangeHost(prefix,params);
1377                         }
1378                         else if (command == "FNAME")
1379                         {
1380                                 return this->ChangeName(prefix,params);
1381                         }
1382                         else if (command == "ADDLINE")
1383                         {
1384 //                              TreeServer* ServerSource = Utils->FindServer(prefix);
1385 //                              if (ServerSource)
1386 //                                      Utils->SetRemoteBursting(ServerSource, false);
1387 //                              return this->AddLine(prefix,params);
1388                         }
1389                         else if (command == "DELLINE")
1390                         {
1391                                 return this->DelLine(prefix,params);
1392                         }
1393                         else if (command == "SVSNICK")
1394                         {
1395                                 return this->ForceNick(prefix,params);
1396                         }
1397                         else if (command == "OPERQUIT")
1398                         {
1399                                 return this->OperQuit(prefix,params);
1400                         }
1401                         else if (command == "IDLE")
1402                         {
1403                                 return this->Whois(prefix,params);
1404                         }
1405                         else if (command == "PUSH")
1406                         {
1407                                 return this->Push(prefix,params);
1408                         }
1409                         else if (command == "TIMESET")
1410                         {
1411                                 return this->HandleSetTime(prefix, params);
1412                         }
1413                         else if (command == "TIME")
1414                         {
1415                                 return this->Time(prefix,params);
1416                         }
1417                         else if ((command == "KICK") && (Utils->IsServer(prefix)))
1418                         {
1419                                 std::string sourceserv = this->myhost;
1420                                 if (params.size() == 3)
1421                                 {
1422                                         User* user = this->Instance->FindNick(params[1]);
1423                                         Channel* chan = this->Instance->FindChan(params[0]);
1424                                         if (user && chan)
1425                                         {
1426                                                 if (!chan->ServerKickUser(user, params[2].c_str(), false))
1427                                                         /* Yikes, the channels gone! */
1428                                                         delete chan;
1429                                         }
1430                                 }
1431                                 if (!this->InboundServerName.empty())
1432                                 {
1433                                         sourceserv = this->InboundServerName;
1434                                 }
1435                                 return Utils->DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
1436                         }
1437                         else if (command == "SVSJOIN")
1438                         {
1439                                 return this->ServiceJoin(prefix,params);
1440                         }
1441                         else if (command == "SVSPART")
1442                         {
1443                                 return this->ServicePart(prefix,params);
1444                         }
1445                         else if (command == "SQUIT")
1446                         {
1447                                 if (params.size() == 2)
1448                                 {
1449                                         this->Squit(Utils->FindServer(params[0]),params[1]);
1450                                 }
1451                                 return true;
1452                         }
1453                         else if (command == "OPERNOTICE")
1454                         {
1455                                 std::string sourceserv = this->myhost;
1456                                 if (!this->InboundServerName.empty())
1457                                         sourceserv = this->InboundServerName;
1458                                 if (params.size() >= 1)
1459                                         Instance->WriteOpers("*** From " + prefix + ": " + params[0]);
1460                                 return Utils->DoOneToAllButSenderRaw(line, sourceserv, prefix, command, params);
1461                         }
1462                         else if (command == "MODENOTICE")
1463                         {
1464                                 std::string sourceserv = this->myhost;
1465                                 if (!this->InboundServerName.empty())
1466                                         sourceserv = this->InboundServerName;
1467                                 if (params.size() >= 2)
1468                                 {
1469                                         Instance->WriteMode(params[0].c_str(), WM_AND, "*** From %s: %s", prefix.c_str(), params[1].c_str());
1470                                 }
1471                                 return Utils->DoOneToAllButSenderRaw(line, sourceserv, prefix, command, params);
1472                         }
1473                         else if (command == "SNONOTICE")
1474                         {
1475                                 std::string sourceserv = this->myhost;
1476                                 if (!this->InboundServerName.empty())
1477                                         sourceserv = this->InboundServerName;
1478                                 if (params.size() >= 2)
1479                                 {
1480                                         Instance->SNO->WriteToSnoMask(*(params[0].c_str()), "From " + prefix + ": "+ params[1]);
1481                                 }
1482                                 return Utils->DoOneToAllButSenderRaw(line, sourceserv, prefix, command, params);
1483                         }
1484                         else if (command == "ENDBURST")
1485                         {
1486                                 this->bursting = false;
1487                                 Instance->XLines->ApplyLines();
1488                                 std::string sourceserv = this->myhost;
1489                                 if (!this->InboundServerName.empty())
1490                                         sourceserv = this->InboundServerName;
1491                                 this->Instance->SNO->WriteToSnoMask('l',"Received end of netburst from \2%s\2",sourceserv.c_str());
1492
1493                                 Event rmode((char*)sourceserv.c_str(), (Module*)Utils->Creator, "new_server");
1494                                 rmode.Send(Instance);
1495
1496                                 return true;
1497                         }
1498                         else
1499                         {
1500                                 /*
1501                                  * Not a special s2s command. Emulate the user doing it.
1502                                  * This saves us having a huge ugly command parser again.
1503                                  */
1504                                 User *who = this->Instance->FindUUID(prefix);
1505
1506                                 std::string sourceserv = this->myhost;
1507                                 if (!this->InboundServerName.empty())
1508                                 {
1509                                         sourceserv = this->InboundServerName;
1510                                 }
1511                                 if ((!who) && (command == "MODE"))
1512                                 {
1513                                         if (Utils->IsServer(prefix))
1514                                         {
1515                                                 const char* modelist[MAXPARAMETERS];
1516                                                 for (size_t i = 0; i < params.size(); i++)
1517                                                         modelist[i] = params[i].c_str();
1518                                                 this->Instance->SendMode(modelist, params.size(), this->Instance->FakeClient);
1519                                                 /* Hot potato! pass it on! */
1520                                                 return Utils->DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
1521                                         }
1522                                 }
1523                                 if (who)
1524                                 {
1525                                         if (command == "NICK")
1526                                         {
1527                                                 if (params.size() != 2)
1528                                                 {
1529                                                         SendError("Protocol violation: NICK message without TS - :"+std::string(who->uuid)+" NICK "+params[0]);
1530                                                         return false;
1531                                                 }
1532                                                 /* Update timestamp on user when they change nicks */
1533                                                 who->age = atoi(params[1].c_str());
1534
1535                                                 /* On nick messages, check that the nick doesnt
1536                                                  * already exist here. If it does, kill their copy,
1537                                                  * and our copy.
1538                                                  */
1539                                                 User* x = this->Instance->FindNickOnly(params[0]);
1540                                                 if ((x) && (x != who))
1541                                                 {
1542                                                         int collideret = 0;
1543                                                         /* x is local, who is remote */
1544                                                         collideret = this->DoCollision(x, who->age, who->ident, who->GetIPString(), who->uuid);
1545                                                         if (collideret != 1)
1546                                                         {
1547                                                                 /*
1548                                                                  * Remote client lost, or both lost,
1549                                                                  * parsing this nickchange would be
1550                                                                  * pointless, as the incoming client's
1551                                                                  * server will soon recieve SVSNICK to
1552                                                                  * change its nick to its UID. :)
1553                                                                  *   -- w00t
1554                                                                  */
1555                                                                 return true;
1556                                                         }
1557 /*
1558 Old nickname collision logic..
1559                                                         std::deque<std::string> p;
1560                                                         p.push_back(params[0]);
1561                                                         p.push_back(":Nickname collision ("+prefix+" -> "+params[0]+")");
1562                                                         Utils->DoOneToMany(this->Instance->Config->ServerName,"KILL",p);
1563                                                         p.clear();
1564                                                         p.push_back(prefix);
1565                                                         p.push_back(":Nickname collision");
1566                                                         Utils->DoOneToMany(this->Instance->Config->ServerName,"KILL",p);
1567                                                         User::QuitUser(this->Instance,x,"Nickname collision ("+prefix+" -> "+params[0]+")");
1568                                                         User* y = this->Instance->FindNick(prefix);
1569                                                         if (y)
1570                                                         {
1571                                                                 User::QuitUser(this->Instance,y,"Nickname collision");
1572                                                         }
1573                                                         return Utils->DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
1574 */
1575                                                 }
1576                                         }
1577                                         // its a user
1578                                         target = who->server;
1579                                         const char* strparams[127];
1580                                         for (unsigned int q = 0; q < params.size(); q++)
1581                                         {
1582                                                 strparams[q] = params[q].c_str();
1583                                         }
1584                                         switch (this->Instance->CallCommandHandler(command.c_str(), strparams, params.size(), who))
1585                                         {
1586                                                 case CMD_INVALID:
1587                                                         this->SendError("Unrecognised or malformed command '"+std::string(command.c_str())+"' -- possibly loaded mismatched modules");
1588                                                         return false;
1589                                                 break;
1590                                                 case CMD_FAILURE:
1591                                                         return true;
1592                                                 break;
1593                                                 default:
1594                                                         /* CMD_SUCCESS and CMD_USER_DELETED fall through here */
1595                                                 break;
1596                                         }
1597                                 }
1598                                 else
1599                                 {
1600                                         // its not a user. Its either a server, or somethings screwed up.
1601                                         if (Utils->IsServer(prefix))
1602                                                 target = this->Instance->Config->GetSID();
1603                                         else
1604                                                 return true;
1605                                 }
1606                                 return Utils->DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
1607
1608                         }
1609                         return true;
1610                 break;
1611         }
1612         return true;
1613 }
1614
1615 std::string TreeSocket::GetName()
1616 {
1617         std::string sourceserv = this->myhost;
1618         if (!this->InboundServerName.empty())
1619         {
1620                 sourceserv = this->InboundServerName;
1621         }
1622         return sourceserv;
1623 }
1624
1625 void TreeSocket::OnTimeout()
1626 {
1627         if (this->LinkState == CONNECTING)
1628         {
1629                 Utils->Creator->RemoteMessage(NULL, "CONNECT: Connection to \002%s\002 timed out.", myhost.c_str());
1630                 Link* MyLink = Utils->FindLink(myhost);
1631                 if (MyLink)
1632                         Utils->DoFailOver(MyLink);
1633         }
1634 }
1635
1636 void TreeSocket::OnClose()
1637 {
1638         if (this->LinkState == LISTENER)
1639                 return;
1640
1641         // Connection closed.
1642         // If the connection is fully up (state CONNECTED)
1643         // then propogate a netsplit to all peers.
1644         std::string quitserver = this->myhost;
1645         if (!this->InboundServerName.empty())
1646         {
1647                 quitserver = this->InboundServerName;
1648         }
1649         TreeServer* s = Utils->FindServer(quitserver);
1650         if (s)
1651         {
1652                 Squit(s,"Remote host closed the connection");
1653         }
1654
1655         if (!quitserver.empty())
1656         {
1657                 Utils->Creator->RemoteMessage(NULL,"Connection to '\2%s\2' failed.",quitserver.c_str());
1658                 time_t server_uptime = Instance->Time() - this->age;
1659                 if (server_uptime)
1660                         Utils->Creator->RemoteMessage(NULL,"Connection to '\2%s\2' was established for %s", quitserver.c_str(), Utils->Creator->TimeToStr(server_uptime).c_str());
1661         }
1662 }
1663
1664 int TreeSocket::OnIncomingConnection(int newsock, char* ip)
1665 {
1666         /* To prevent anyone from attempting to flood opers/DDoS by connecting to the server port,
1667          * or discovering if this port is the server port, we don't allow connections from any
1668          * IPs for which we don't have a link block.
1669          */
1670         bool found = false;
1671
1672         found = (std::find(Utils->ValidIPs.begin(), Utils->ValidIPs.end(), ip) != Utils->ValidIPs.end());
1673         if (!found)
1674         {
1675                 for (vector<std::string>::iterator i = Utils->ValidIPs.begin(); i != Utils->ValidIPs.end(); i++)
1676                         if (irc::sockets::MatchCIDR(ip, (*i).c_str()))
1677                                 found = true;
1678
1679                 if (!found)
1680                 {
1681                         Utils->Creator->RemoteMessage(NULL,"Server connection from %s denied (no link blocks with that IP address)", ip);
1682                         Instance->SE->Close(newsock);
1683                         return false;
1684                 }
1685         }
1686
1687         TreeSocket* s = new TreeSocket(this->Utils, this->Instance, newsock, ip, this->Hook);
1688         s = s; /* Whinge whinge whinge, thats all GCC ever does. */
1689         return true;
1690 }