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