]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/modules/m_spanningtree/treesocket1.cpp
743b34c8d7181654efb206c2e4f788cec428d818
[user/henk/code/inspircd.git] / src / modules / m_spanningtree / treesocket1.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  InspIRCd: (C) 2002-2008 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 "m_hash.h"
22 #include "socketengine.h"
23
24 #include "m_spanningtree/main.h"
25 #include "m_spanningtree/utils.h"
26 #include "m_spanningtree/treeserver.h"
27 #include "m_spanningtree/link.h"
28 #include "m_spanningtree/treesocket.h"
29 #include "m_spanningtree/resolvers.h"
30 #include "m_spanningtree/handshaketimer.h"
31
32 /* $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 m_hash.h */
33
34
35 /** Because most of the I/O gubbins are encapsulated within
36  * BufferedSocket, we just call the superclass constructor for
37  * most of the action, and append a few of our own values
38  * to it.
39  */
40 TreeSocket::TreeSocket(SpanningTreeUtilities* Util, InspIRCd* SI, std::string host, int port, bool listening, unsigned long maxtime, Module* HookMod)
41         : BufferedSocket(SI, host, port, listening, maxtime), Utils(Util), Hook(HookMod)
42 {
43         myhost = host;
44         this->LinkState = LISTENER;
45         theirchallenge.clear();
46         ourchallenge.clear();
47         if (listening && Hook)
48                 BufferedSocketHookRequest(this, (Module*)Utils->Creator, Hook).Send();
49 }
50
51 TreeSocket::TreeSocket(SpanningTreeUtilities* Util, InspIRCd* SI, std::string host, int port, bool listening, unsigned long maxtime, const std::string &ServerName, const std::string &bindto, Module* HookMod)
52         : BufferedSocket(SI, host, port, listening, maxtime, bindto), Utils(Util), Hook(HookMod)
53 {
54         myhost = ServerName;
55         theirchallenge.clear();
56         ourchallenge.clear();
57         this->LinkState = CONNECTING;
58         if (Hook)
59                 BufferedSocketHookRequest(this, (Module*)Utils->Creator, Hook).Send();
60 }
61
62 /** When a listening socket gives us a new file descriptor,
63  * we must associate it with a socket without creating a new
64  * connection. This constructor is used for this purpose.
65  */
66 TreeSocket::TreeSocket(SpanningTreeUtilities* Util, InspIRCd* SI, int newfd, char* ip, Module* HookMod)
67         : BufferedSocket(SI, newfd, ip), Utils(Util), Hook(HookMod)
68 {
69         this->LinkState = WAIT_AUTH_1;
70         theirchallenge.clear();
71         ourchallenge.clear();
72         sentcapab = false;
73         /* If we have a transport module hooked to the parent, hook the same module to this
74          * socket, and set a timer waiting for handshake before we send CAPAB etc.
75          */
76         if (Hook)
77                 BufferedSocketHookRequest(this, (Module*)Utils->Creator, Hook).Send();
78
79         Instance->Timers->AddTimer(new HandshakeTimer(Instance, this, &(Utils->LinkBlocks[0]), this->Utils, 1));
80 }
81
82 ServerState TreeSocket::GetLinkState()
83 {
84         return this->LinkState;
85 }
86
87 Module* TreeSocket::GetHook()
88 {
89         return this->Hook;
90 }
91
92 TreeSocket::~TreeSocket()
93 {
94         if (Hook)
95                 BufferedSocketUnhookRequest(this, (Module*)Utils->Creator, Hook).Send();
96 }
97
98 const std::string& TreeSocket::GetOurChallenge()
99 {
100         return this->ourchallenge;
101 }
102
103 void TreeSocket::SetOurChallenge(const std::string &c)
104 {
105         this->ourchallenge = c;
106 }
107
108 const std::string& TreeSocket::GetTheirChallenge()
109 {
110         return this->theirchallenge;
111 }
112
113 void TreeSocket::SetTheirChallenge(const std::string &c)
114 {
115         this->theirchallenge = c;
116 }
117
118 std::string TreeSocket::MakePass(const std::string &password, const std::string &challenge)
119 {
120         /* This is a simple (maybe a bit hacky?) HMAC algorithm, thanks to jilles for
121          * suggesting the use of HMAC to secure the password against various attacks.
122          *
123          * Note: If m_sha256.so is not loaded, we MUST fall back to plaintext with no
124          *       HMAC challenge/response.
125          */
126         Module* sha256 = Instance->Modules->Find("m_sha256.so");
127         if (Utils->ChallengeResponse && sha256 && !challenge.empty())
128         {
129                 /* XXX: This is how HMAC is supposed to be done:
130                  *
131                  * sha256( (pass xor 0x5c) + sha256((pass xor 0x36) + m) )
132                  *
133                  * Note that we are encoding the hex hash, not the binary
134                  * output of the hash which is slightly different to standard.
135                  *
136                  * Don't ask me why its always 0x5c and 0x36... it just is.
137                  */
138                 std::string hmac1, hmac2;
139
140                 for (size_t n = 0; n < password.length(); n++)
141                 {
142                         hmac1 += static_cast<char>(password[n] ^ 0x5C);
143                         hmac2 += static_cast<char>(password[n] ^ 0x36);
144                 }
145
146                 hmac2 += challenge;
147                 HashResetRequest(Utils->Creator, sha256).Send();
148                 hmac2 = HashSumRequest(Utils->Creator, sha256, hmac2).Send();
149
150                 HashResetRequest(Utils->Creator, sha256).Send();
151                 std::string hmac = hmac1 + hmac2;
152                 hmac = HashSumRequest(Utils->Creator, sha256, hmac).Send();
153
154                 return "HMAC-SHA256:"+ hmac;
155         }
156         else if (!challenge.empty() && !sha256)
157                 Instance->Log(DEFAULT,"Not authenticating to server using SHA256/HMAC because we don't have m_sha256 loaded!");
158
159         return password;
160 }
161
162 /** When an outbound connection finishes connecting, we receive
163  * this event, and must send our SERVER string to the other
164  * side. If the other side is happy, as outlined in the server
165  * to server docs on the inspircd.org site, the other side
166  * will then send back its own server string.
167  */
168 bool TreeSocket::OnConnected()
169 {
170         if (this->LinkState == CONNECTING)
171         {
172                 /* we do not need to change state here. */
173                 for (std::vector<Link>::iterator x = Utils->LinkBlocks.begin(); x < Utils->LinkBlocks.end(); x++)
174                 {
175                         if (x->Name == this->myhost)
176                         {
177                                 Utils->Creator->RemoteMessage(NULL,"Connection to \2%s\2[%s] started.", myhost.c_str(), (x->HiddenFromStats ? "<hidden>" : this->GetIP().c_str()));
178                                 if (Hook)
179                                 {
180                                         BufferedSocketHookRequest(this, (Module*)Utils->Creator, Hook).Send();
181                                         Utils->Creator->RemoteMessage(NULL,"Connection to \2%s\2[%s] using transport \2%s\2", myhost.c_str(), (x->HiddenFromStats ? "<hidden>" : this->GetIP().c_str()),
182                                                         x->Hook.c_str());
183                                 }
184                                 this->OutboundPass = x->SendPass;
185                                 sentcapab = false;
186
187                                 /* found who we're supposed to be connecting to, send the neccessary gubbins. */
188                                 if (this->GetHook())
189                                         Instance->Timers->AddTimer(new HandshakeTimer(Instance, this, &(*x), this->Utils, 1));
190                                 else
191                                         this->SendCapabilities();
192
193                                 return true;
194                         }
195                 }
196         }
197         /* There is a (remote) chance that between the /CONNECT and the connection
198          * being accepted, some muppet has removed the <link> block and rehashed.
199          * If that happens the connection hangs here until it's closed. Unlikely
200          * and rather harmless.
201          */
202         this->Utils->Creator->RemoteMessage(NULL,"Connection to \2%s\2 lost link tag(!)", myhost.c_str());
203         return true;
204 }
205
206 void TreeSocket::OnError(BufferedSocketError e)
207 {
208         Link* MyLink;
209
210         if (this->LinkState == LISTENER)
211                 return;
212
213         switch (e)
214         {
215                 case I_ERR_CONNECT:
216                         Utils->Creator->RemoteMessage(NULL,"Connection failed: Connection to \002%s\002 refused", myhost.c_str());
217                         MyLink = Utils->FindLink(myhost);
218                         if (MyLink)
219                                 Utils->DoFailOver(MyLink);
220                 break;
221                 case I_ERR_SOCKET:
222                         Utils->Creator->RemoteMessage(NULL,"Connection failed: Could not create socket");
223                 break;
224                 case I_ERR_BIND:
225                         Utils->Creator->RemoteMessage(NULL,"Connection failed: Error binding socket to address or port");
226                 break;
227                 case I_ERR_WRITE:
228                         Utils->Creator->RemoteMessage(NULL,"Connection failed: I/O error on connection");
229                 break;
230                 case I_ERR_NOMOREFDS:
231                         Utils->Creator->RemoteMessage(NULL,"Connection failed: Operating system is out of file descriptors!");
232                 break;
233                 default:
234                         if ((errno) && (errno != EINPROGRESS) && (errno != EAGAIN))
235                                 Utils->Creator->RemoteMessage(NULL,"Connection to \002%s\002 failed with OS error: %s", myhost.c_str(), strerror(errno));
236                 break;
237         }
238 }
239
240 int TreeSocket::OnDisconnect()
241 {
242         /* For the same reason as above, we don't
243          * handle OnDisconnect()
244          */
245         return true;
246 }
247
248 /** Recursively send the server tree with distances as hops.
249  * This is used during network burst to inform the other server
250  * (and any of ITS servers too) of what servers we know about.
251  * If at any point any of these servers already exist on the other
252  * end, our connection may be terminated. The hopcounts given
253  * by this function are relative, this doesn't matter so long as
254  * they are all >1, as all the remote servers re-calculate them
255  * to be relative too, with themselves as hop 0.
256  */
257 void TreeSocket::SendServers(TreeServer* Current, TreeServer* s, int hops)
258 {
259         char command[1024];
260         for (unsigned int q = 0; q < Current->ChildCount(); q++)
261         {
262                 TreeServer* recursive_server = Current->GetChild(q);
263                 if (recursive_server != s)
264                 {
265                         snprintf(command,1024,":%s SERVER %s * %d %s :%s",Current->GetName().c_str(),recursive_server->GetName().c_str(),hops,
266                                         recursive_server->GetID().c_str(),
267                                         recursive_server->GetDesc().c_str());
268                         this->WriteLine(command);
269                         this->WriteLine(":"+recursive_server->GetName()+" VERSION :"+recursive_server->GetVersion());
270                         /* down to next level */
271                         this->SendServers(recursive_server, s, hops+1);
272                 }
273         }
274 }
275
276 std::string TreeSocket::MyCapabilities()
277 {
278         std::vector<std::string> modlist = this->Instance->Modules->GetAllModuleNames(VF_COMMON);
279         std::string capabilities;
280         sort(modlist.begin(),modlist.end());
281         for (unsigned int i = 0; i < modlist.size(); i++)
282         {
283                 if (i)
284                         capabilities = capabilities + ",";
285                 capabilities = capabilities + modlist[i];
286         }
287         return capabilities;
288 }
289
290 std::string TreeSocket::RandString(unsigned int length)
291 {
292         char* randombuf = new char[length+1];
293         std::string out;
294 #ifdef WINDOWS
295         int fd = -1;
296 #else
297         int fd = open("/dev/urandom", O_RDONLY, 0);
298 #endif
299
300         if (fd >= 0)
301         {
302 #ifndef WINDOWS
303                 read(fd, randombuf, length);
304                 close(fd);
305 #endif
306         }
307         else
308         {
309                 for (unsigned int i = 0; i < length; i++)
310                         randombuf[i] = rand();
311         }
312
313         for (unsigned int i = 0; i < length; i++)
314         {
315                 char randchar = static_cast<char>((randombuf[i] & 0x7F) | 0x21);
316                 out += (randchar == '=' ? '_' : randchar);
317         }
318
319         delete[] randombuf;
320         return out;
321 }
322
323 void TreeSocket::SendCapabilities()
324 {
325         if (sentcapab)
326                 return;
327
328         sentcapab = true;
329         irc::commasepstream modulelist(MyCapabilities());
330         this->WriteLine("CAPAB START");
331
332         /* Send module names, split at 509 length */
333         std::string item;
334         std::string line = "CAPAB MODULES ";
335         while (modulelist.GetToken(item))
336         {
337                 if (line.length() + item.length() + 1 > 509)
338                 {
339                         this->WriteLine(line);
340                         line = "CAPAB MODULES ";
341                 }
342
343                 if (line != "CAPAB MODULES ")
344                         line.append(",");
345
346                 line.append(item);
347         }
348         if (line != "CAPAB MODULES ")
349                 this->WriteLine(line);
350
351         int ip6 = 0;
352         int ip6support = 0;
353 #ifdef IPV6
354         ip6 = 1;
355 #endif
356 #ifdef SUPPORT_IP6LINKS
357         ip6support = 1;
358 #endif
359         std::string extra;
360         /* Do we have sha256 available? If so, we send a challenge */
361         if (Utils->ChallengeResponse && (Instance->Modules->Find("m_sha256.so")))
362         {
363                 this->SetOurChallenge(RandString(20));
364                 extra = " CHALLENGE=" + this->GetOurChallenge();
365         }
366
367         this->WriteLine("CAPAB CAPABILITIES :NICKMAX="+ConvToStr(NICKMAX)+" HALFOP="+ConvToStr(this->Instance->Config->AllowHalfop)+" CHANMAX="+ConvToStr(CHANMAX)+" MAXMODES="+ConvToStr(MAXMODES)+" IDENTMAX="+ConvToStr(IDENTMAX)+" MAXQUIT="+ConvToStr(MAXQUIT)+" MAXTOPIC="+ConvToStr(MAXTOPIC)+" MAXKICK="+ConvToStr(MAXKICK)+" MAXGECOS="+ConvToStr(MAXGECOS)+" MAXAWAY="+ConvToStr(MAXAWAY)+" IP6NATIVE="+ConvToStr(ip6)+" IP6SUPPORT="+ConvToStr(ip6support)+" PROTOCOL="+ConvToStr(ProtocolVersion)+extra+" PREFIX="+Instance->Modes->BuildPrefixes()+" CHANMODES="+Instance->Modes->ChanModes()+" SVSPART=1");
368
369         this->WriteLine("CAPAB END");
370 }
371
372 /* Check a comma seperated list for an item */
373 bool TreeSocket::HasItem(const std::string &list, const std::string &item)
374 {
375         irc::commasepstream seplist(list);
376         std::string item2;
377
378         while (seplist.GetToken(item2))
379         {
380                 if (item2 == item)
381                         return true;
382         }
383         return false;
384 }
385
386 /* Isolate and return the elements that are different between two comma seperated lists */
387 std::string TreeSocket::ListDifference(const std::string &one, const std::string &two)
388 {
389         irc::commasepstream list_one(one);
390         std::string item;
391         std::string result;
392         while (list_one.GetToken(item))
393         {
394                 if (!HasItem(two, item))
395                 {
396                         result.append(" ");
397                         result.append(item);
398                 }
399         }
400         return result;
401 }
402
403 void TreeSocket::SendError(const std::string &errormessage)
404 {
405         /* Display the error locally as well as sending it remotely */
406         Utils->Creator->RemoteMessage(NULL, "Sent \2ERROR\2 to %s: %s", (this->InboundServerName.empty() ? "<unknown>" : this->InboundServerName.c_str()), errormessage.c_str());
407         this->WriteLine("ERROR :"+errormessage);
408         /* One last attempt to make sure the error reaches its target */
409         this->FlushWriteBuffer();
410 }
411
412 bool TreeSocket::Capab(const std::deque<std::string> &params)
413 {
414         if (params.size() < 1)
415         {
416                 this->SendError("Invalid number of parameters for CAPAB - Mismatched version");
417                 return false;
418         }
419         if (params[0] == "START")
420         {
421                 this->ModuleList.clear();
422                 this->CapKeys.clear();
423         }
424         else if (params[0] == "END")
425         {
426                 std::string reason;
427                 int ip6support = 0;
428 #ifdef SUPPORT_IP6LINKS
429                 ip6support = 1;
430 #endif
431                 /* Compare ModuleList and check CapKeys...
432                  * Maybe this could be tidier? -- Brain
433                  */
434                 if ((this->ModuleList != this->MyCapabilities()) && (this->ModuleList.length()))
435                 {
436                         std::string diff = ListDifference(this->ModuleList, this->MyCapabilities());
437                         if (!diff.length())
438                         {
439                                 diff = "your server:" + ListDifference(this->MyCapabilities(), this->ModuleList);
440                         }
441                         else
442                         {
443                                 diff = "this server:" + diff;
444                         }
445                         if (diff.length() == 12)
446                                 reason = "Module list in CAPAB is not alphabetically ordered, cannot compare lists.";
447                         else
448                                 reason = "Modules loaded on these servers are not correctly matched, these modules are not loaded on " + diff;
449                 }
450
451                 cap_validation valid_capab[] = { 
452                         {"Maximum nickname lengths differ or remote nickname length not specified", "NICKMAX", NICKMAX},
453                         {"Maximum ident lengths differ or remote ident length not specified", "IDENTMAX", IDENTMAX},
454                         {"Maximum channel lengths differ or remote channel length not specified", "CHANMAX", CHANMAX},
455                         {"Maximum modes per line differ or remote modes per line not specified", "MAXMODES", MAXMODES},
456                         {"Maximum quit lengths differ or remote quit length not specified", "MAXQUIT", MAXQUIT},
457                         {"Maximum topic lengths differ or remote topic length not specified", "MAXTOPIC", MAXTOPIC},
458                         {"Maximum kick lengths differ or remote kick length not specified", "MAXKICK", MAXKICK},
459                         {"Maximum GECOS (fullname) lengths differ or remote GECOS length not specified", "MAXGECOS", MAXGECOS},
460                         {"Maximum awaymessage lengths differ or remote awaymessage length not specified", "MAXAWAY", MAXAWAY},
461                         {"", "", 0}
462                 };
463
464                 if (((this->CapKeys.find("IP6SUPPORT") == this->CapKeys.end()) && (ip6support)) || ((this->CapKeys.find("IP6SUPPORT") != this->CapKeys.end()) && (this->CapKeys.find("IP6SUPPORT")->second != ConvToStr(ip6support))))
465                         reason = "We don't both support linking to IPV6 servers";
466                 if (((this->CapKeys.find("IP6NATIVE") != this->CapKeys.end()) && (this->CapKeys.find("IP6NATIVE")->second == "1")) && (!ip6support))
467                         reason = "The remote server is IPV6 native, and we don't support linking to IPV6 servers";
468                 if (((this->CapKeys.find("PROTOCOL") == this->CapKeys.end()) || ((this->CapKeys.find("PROTOCOL") != this->CapKeys.end()) && (this->CapKeys.find("PROTOCOL")->second != ConvToStr(ProtocolVersion)))))
469                 {
470                         if (this->CapKeys.find("PROTOCOL") != this->CapKeys.end())
471                                 reason = "Mismatched protocol versions "+this->CapKeys.find("PROTOCOL")->second+" and "+ConvToStr(ProtocolVersion);
472                         else
473                                 reason = "Protocol version not specified";
474                 }
475
476                 if(this->CapKeys.find("PREFIX") != this->CapKeys.end() && this->CapKeys.find("PREFIX")->second != this->Instance->Modes->BuildPrefixes())
477                         reason = "One or more of the prefixes on the remote server are invalid on this server.";
478
479                 if (((this->CapKeys.find("HALFOP") == this->CapKeys.end()) && (Instance->Config->AllowHalfop)) || ((this->CapKeys.find("HALFOP") != this->CapKeys.end()) && (this->CapKeys.find("HALFOP")->second != ConvToStr(Instance->Config->AllowHalfop))))
480                         reason = "We don't both have halfop support enabled/disabled identically";
481
482                 for (int x = 0; valid_capab[x].size; ++x)
483                 {
484                         if (((this->CapKeys.find(valid_capab[x].key) == this->CapKeys.end()) || ((this->CapKeys.find(valid_capab[x].key) != this->CapKeys.end()) &&
485                                                  (this->CapKeys.find(valid_capab[x].key)->second != ConvToStr(valid_capab[x].size)))))
486                                 reason = valid_capab[x].reason;
487                 }
488         
489                 /* Challenge response, store their challenge for our password */
490                 std::map<std::string,std::string>::iterator n = this->CapKeys.find("CHALLENGE");
491                 if (Utils->ChallengeResponse && (n != this->CapKeys.end()) && (Instance->Modules->Find("m_sha256.so")))
492                 {
493                         /* Challenge-response is on now */
494                         this->SetTheirChallenge(n->second);
495                         if (!this->GetTheirChallenge().empty() && (this->LinkState == CONNECTING))
496                         {
497                                 this->WriteLine(std::string("SERVER ")+this->Instance->Config->ServerName+" "+this->MakePass(OutboundPass, this->GetTheirChallenge())+" 0 "+
498                                                 Instance->Config->GetSID()+" :"+this->Instance->Config->ServerDesc);
499                         }
500                 }
501                 else
502                 {
503                         /* They didnt specify a challenge or we don't have m_sha256.so, we use plaintext */
504                         if (this->LinkState == CONNECTING)
505                                 this->WriteLine(std::string("SERVER ")+this->Instance->Config->ServerName+" "+OutboundPass+" 0 "+Instance->Config->GetSID()+" :"+this->Instance->Config->ServerDesc);
506                 }
507
508                 if (reason.length())
509                 {
510                         this->SendError("CAPAB negotiation failed: "+reason);
511                         return false;
512                 }
513         }
514         else if ((params[0] == "MODULES") && (params.size() == 2))
515         {
516                 if (!this->ModuleList.length())
517                 {
518                         this->ModuleList.append(params[1]);
519                 }
520                 else
521                 {
522                         this->ModuleList.append(",");
523                         this->ModuleList.append(params[1]);
524                 }
525         }
526
527         else if ((params[0] == "CAPABILITIES") && (params.size() == 2))
528         {
529                 irc::tokenstream capabs(params[1]);
530                 std::string item;
531                 bool more = true;
532                 while ((more = capabs.GetToken(item)))
533                 {
534                         /* Process each key/value pair */
535                         std::string::size_type equals = item.rfind('=');
536                         if (equals != std::string::npos)
537                         {
538                                 std::string var = item.substr(0, equals);
539                                 std::string value = item.substr(equals+1, item.length());
540                                 CapKeys[var] = value;
541                         }
542                 }
543         }
544         return true;
545 }
546
547 /** This function forces this server to quit, removing this server
548  * and any users on it (and servers and users below that, etc etc).
549  * It's very slow and pretty clunky, but luckily unless your network
550  * is having a REAL bad hair day, this function shouldnt be called
551  * too many times a month ;-)
552  */
553 void TreeSocket::SquitServer(std::string &from, TreeServer* Current)
554 {
555         /* recursively squit the servers attached to 'Current'.
556          * We're going backwards so we don't remove users
557          * while we still need them ;)
558          */
559         for (unsigned int q = 0; q < Current->ChildCount(); q++)
560         {
561                 TreeServer* recursive_server = Current->GetChild(q);
562                 this->SquitServer(from,recursive_server);
563         }
564         /* Now we've whacked the kids, whack self */
565         num_lost_servers++;
566         num_lost_users += Current->QuitUsers(from);
567 }
568
569 /** This is a wrapper function for SquitServer above, which
570  * does some validation first and passes on the SQUIT to all
571  * other remaining servers.
572  */
573 void TreeSocket::Squit(TreeServer* Current, const std::string &reason)
574 {
575         if ((Current) && (Current != Utils->TreeRoot))
576         {
577                 Event rmode((char*)Current->GetName().c_str(), (Module*)Utils->Creator, "lost_server");
578                 rmode.Send(Instance);
579
580                 std::deque<std::string> params;
581                 params.push_back(Current->GetName());
582                 params.push_back(":"+reason);
583                 Utils->DoOneToAllButSender(Current->GetParent()->GetName(),"SQUIT",params,Current->GetName());
584                 if (Current->GetParent() == Utils->TreeRoot)
585                 {
586                         this->Instance->SNO->WriteToSnoMask('l',"Server \002"+Current->GetName()+"\002 split: "+reason);
587                 }
588                 else
589                 {
590                         this->Instance->SNO->WriteToSnoMask('l',"Server \002"+Current->GetName()+"\002 split from server \002"+Current->GetParent()->GetName()+"\002 with reason: "+reason);
591                 }
592                 num_lost_servers = 0;
593                 num_lost_users = 0;
594                 std::string from = Current->GetParent()->GetName()+" "+Current->GetName();
595                 SquitServer(from, Current);
596                 Current->Tidy();
597                 Current->GetParent()->DelChild(Current);
598                 delete Current;
599                 this->Instance->SNO->WriteToSnoMask('l',"Netsplit complete, lost \002%d\002 users on \002%d\002 servers.", num_lost_users, num_lost_servers);
600         }
601         else
602                 Instance->Log(DEFAULT,"Squit from unknown server");
603 }
604
605 /** FMODE command - server mode with timestamp checks */
606 bool TreeSocket::ForceMode(const std::string &source, std::deque<std::string> &params)
607 {
608         /* Chances are this is a 1.0 FMODE without TS */
609         if (params.size() < 3)
610         {
611                 /* No modes were in the command, probably a channel with no modes set on it */
612                 return true;
613         }
614
615         bool smode = false;
616         std::string sourceserv;
617         /* Are we dealing with an FMODE from a user, or from a server? */
618         User* who = this->Instance->FindNick(source);
619         if (who)
620         {
621                 /* FMODE from a user, set sourceserv to the users server name */
622                 sourceserv = who->server;
623         }
624         else
625         {
626                 /* FMODE from a server, use a fake user to receive mode feedback */
627                 who = this->Instance->FakeClient;
628                 smode = true;      /* Setting this flag tells us we should free the User later */
629                 sourceserv = source;    /* Set sourceserv to the actual source string */
630         }
631         const char* modelist[64];
632         time_t TS = 0;
633         int n = 0;
634         memset(&modelist,0,sizeof(modelist));
635         for (unsigned int q = 0; (q < params.size()) && (q < 64); q++)
636         {
637                 if (q == 1)
638                 {
639                         /* The timestamp is in this position.
640                          * We don't want to pass that up to the
641                          * server->client protocol!
642                          */
643                         TS = atoi(params[q].c_str());
644                 }
645                 else
646                 {
647                         /* Everything else is fine to append to the modelist */
648                         modelist[n++] = params[q].c_str();
649                 }
650
651         }
652         /* Extract the TS value of the object, either User or Channel */
653         User* dst = this->Instance->FindNick(params[0]);
654         Channel* chan = NULL;
655         time_t ourTS = 0;
656         if (dst)
657         {
658                 ourTS = dst->age;
659         }
660         else
661         {
662                 chan = this->Instance->FindChan(params[0]);
663                 if (chan)
664                 {
665                         ourTS = chan->age;
666                 }
667                 else
668                         /* Oops, channel doesnt exist! */
669                         return true;
670         }
671
672         if (!TS)
673         {
674                 Instance->Log(DEFAULT,"*** BUG? *** TS of 0 sent to FMODE. Are some services authors smoking craq, or is it 1970 again?. Dropped.");
675                 Instance->SNO->WriteToSnoMask('d', "WARNING: The server %s is sending FMODE with a TS of zero. Total craq. Mode was dropped.", sourceserv.c_str());
676                 return true;
677         }
678
679         /* TS is equal or less: Merge the mode changes into ours and pass on.
680          */
681         if (TS <= ourTS)
682         {
683                 if ((TS < ourTS) && (!dst))
684                         Instance->Log(DEFAULT,"*** BUG *** Channel TS sent in FMODE to %s is %lu which is not equal to %lu!", params[0].c_str(), TS, ourTS);
685
686                 if (smode)
687                 {
688                         this->Instance->SendMode(modelist, n, who);
689                 }
690                 else
691                 {
692                         this->Instance->CallCommandHandler("MODE", modelist, n, who);
693                 }
694                 /* HOT POTATO! PASS IT ON! */
695                 Utils->DoOneToAllButSender(source,"FMODE",params,sourceserv);
696         }
697         /* If the TS is greater than ours, we drop the mode and dont pass it anywhere.
698          */
699         return true;
700 }
701
702 /** FTOPIC command */
703 bool TreeSocket::ForceTopic(const std::string &source, std::deque<std::string> &params)
704 {
705         if (params.size() != 4)
706                 return true;
707         time_t ts = atoi(params[1].c_str());
708         std::string nsource = source;
709         Channel* c = this->Instance->FindChan(params[0]);
710         if (c)
711         {
712                 if ((ts >= c->topicset) || (!*c->topic))
713                 {
714                         std::string oldtopic = c->topic;
715                         strlcpy(c->topic,params[3].c_str(),MAXTOPIC);
716                         strlcpy(c->setby,params[2].c_str(),127);
717                         c->topicset = ts;
718                         /* if the topic text is the same as the current topic,
719                          * dont bother to send the TOPIC command out, just silently
720                          * update the set time and set nick.
721                          */
722                         if (oldtopic != params[3])
723                         {
724                                 User* user = this->Instance->FindNick(source);
725                                 if (!user)
726                                 {
727                                         c->WriteChannelWithServ(Instance->Config->ServerName, "TOPIC %s :%s", c->name, c->topic);
728                                 }
729                                 else
730                                 {
731                                         c->WriteChannel(user, "TOPIC %s :%s", c->name, c->topic);
732                                         nsource = user->server;
733                                 }
734                                 /* all done, send it on its way */
735                                 params[3] = ":" + params[3];
736                                 Utils->DoOneToAllButSender(source,"FTOPIC",params,nsource);
737                         }
738                 }
739
740         }
741         return true;
742 }
743
744 /** FJOIN, similar to TS6 SJOIN, but not quite. */
745 bool TreeSocket::ForceJoin(const std::string &source, std::deque<std::string> &params)
746 {
747         /* 1.1 FJOIN works as follows:
748          *
749          * Each FJOIN is sent along with a timestamp, and the side with the lowest
750          * timestamp 'wins'. From this point on we will refer to this side as the
751          * winner. The side with the higher timestamp loses, from this point on we
752          * will call this side the loser or losing side. This should be familiar to
753          * anyone who's dealt with dreamforge or TS6 before.
754          *
755          * When two sides of a split heal and this occurs, the following things
756          * will happen:
757          *
758          * If the timestamps are exactly equal, both sides merge their privilages
759          * and users, as in InspIRCd 1.0 and ircd2.8. The channels have not been
760          * re-created during a split, this is safe to do.
761          *
762          * If the timestamps are NOT equal, the losing side removes all of its
763          * modes from the channel, before introducing new users into the channel
764          * which are listed in the FJOIN command's parameters. The losing side then
765          * LOWERS its timestamp value of the channel to match that of the winning
766          * side, and the modes of the users of the winning side are merged in with
767          * the losing side.
768          *
769          * The winning side on the other hand will ignore all user modes from the
770          * losing side, so only its own modes get applied. Life is simple for those
771          * who succeed at internets. :-)
772          *
773          * NOTE: Unlike TS6 and dreamforge and other protocols which have SJOIN,
774          * FJOIN does not contain the simple-modes such as +iklmnsp. Why not,
775          * you ask? Well, quite simply because we don't need to. They'll be sent
776          * after the FJOIN by FMODE, and FMODE is timestamped, so in the event
777          * the losing side sends any modes for the channel which shouldnt win,
778          * they wont as their timestamp will be too high :-)
779          */
780
781         if (params.size() < 2)
782                 return true;
783
784         irc::modestacker modestack(true);                               /* Modes to apply from the users in the user list */
785         User* who = NULL;                                               /* User we are currently checking */
786         std::string channel = params[0];                                /* Channel name, as a string */
787         time_t TS = atoi(params[1].c_str());                            /* Timestamp given to us for remote side */
788         irc::tokenstream users((params.size() > 2) ? params[2] : "");   /* users from the user list */
789         bool apply_other_sides_modes = true;                            /* True if we are accepting the other side's modes */
790         Channel* chan = this->Instance->FindChan(channel);              /* The channel we're sending joins to */
791         time_t ourTS = chan ? chan->age : Instance->Time(true)+600;     /* The TS of our side of the link */
792         bool created = !chan;                                           /* True if the channel doesnt exist here yet */
793         std::string item;                                               /* One item in the list of nicks */
794
795         if (params.size() > 2)
796                 params[2] = ":" + params[2];
797                 
798         Utils->DoOneToAllButSender(source,"FJOIN",params,source);
799
800         if (!TS)
801         {
802                 Instance->Log(DEFAULT,"*** BUG? *** TS of 0 sent to FJOIN. Are some services authors smoking craq, or is it 1970 again?. Dropped.");
803                 Instance->SNO->WriteToSnoMask('d', "WARNING: The server %s is sending FJOIN with a TS of zero. Total craq. Command was dropped.", source.c_str());
804                 return true;
805         }
806
807         if (created)
808                 chan = new Channel(Instance, channel, ourTS);
809
810         /* If our TS is less than theirs, we dont accept their modes */
811         if (ourTS < TS)
812                 apply_other_sides_modes = false;
813
814         /* Our TS greater than theirs, clear all our modes from the channel, accept theirs. */
815         if (ourTS > TS)
816         {
817                 std::deque<std::string> param_list;
818                 if (Utils->AnnounceTSChange && chan)
819                         chan->WriteChannelWithServ(Instance->Config->ServerName, "NOTICE %s :TS for %s changed from %lu to %lu", chan->name, chan->name, ourTS, TS);
820                 ourTS = TS;
821                 if (!created)
822                 {
823                         chan->age = TS;
824                         param_list.push_back(channel);
825                         this->RemoveStatus(Instance->Config->GetSID(), param_list);
826                 }
827         }
828
829         /* Now, process every 'prefixes,nick' pair */
830         while (users.GetToken(item))
831         {
832                 const char* usr = item.c_str();
833                 if (usr && *usr)
834                 {
835                         const char* permissions = usr;
836                         /* Iterate through all the prefix values, convert them from prefixes to mode letters */
837                         std::string modes;
838                         while ((*permissions) && (*permissions != ','))
839                         {
840                                 ModeHandler* mh = Instance->Modes->FindPrefix(*permissions);
841                                 if (mh)
842                                         modes = modes + mh->GetModeChar();
843                                 else
844                                 {
845                                         this->SendError(std::string("Invalid prefix '")+(*permissions)+"' in FJOIN");
846                                         return false;
847                                 }
848                                 usr++;
849                                 permissions++;
850                         }
851                         /* Advance past the comma, to the nick */
852                         usr++;
853                         
854                         /* Check the user actually exists */
855                         who = this->Instance->FindUUID(usr);
856                         if (who)
857                         {
858                                 /* Check that the user's 'direction' is correct */
859                                 TreeServer* route_back_again = Utils->BestRouteTo(who->server);
860                                 if ((!route_back_again) || (route_back_again->GetSocket() != this))
861                                         continue;
862
863                                 /* Add any permissions this user had to the mode stack */
864                                 for (std::string::iterator x = modes.begin(); x != modes.end(); ++x)
865                                         modestack.Push(*x, who->nick);
866
867                                 Channel::JoinUser(this->Instance, who, channel.c_str(), true, "", true, TS);
868                         }
869                         else
870                         {
871                                 Instance->Log(SPARSE,"Warning! Invalid user %s in FJOIN to channel %s IGNORED", usr, channel.c_str());
872                                 continue;
873                         }
874                 }
875         }
876
877         /* Flush mode stacker if we lost the FJOIN or had equal TS */
878         if (apply_other_sides_modes)
879         {
880                 std::deque<std::string> stackresult;
881                 const char* mode_junk[MAXMODES+2];
882                 mode_junk[0] = channel.c_str();
883
884                 while (modestack.GetStackedLine(stackresult))
885                 {
886                         for (size_t j = 0; j < stackresult.size(); j++)
887                         {
888                                 mode_junk[j+1] = stackresult[j].c_str();
889                         }
890                         Instance->SendMode(mode_junk, stackresult.size() + 1, Instance->FakeClient);
891                 }
892         }
893
894         return true;
895 }
896
897 /*
898  * Yes, this function looks a little ugly.
899  * However, in some circumstances we may not have a User, so we need to do things this way.
900  * Returns 1 if colliding local client, 2 if colliding remote, 3 if colliding both.
901  * Sends SVSNICKs as appropriate and forces nickchanges too.
902  */
903 int TreeSocket::DoCollision(User *u, time_t remotets, const char *remoteident, const char *remoteip, const char *remoteuid)
904 {
905         /*
906          *  Under old protocol rules, we would have had to kill both clients.
907          *  Really, this sucks.
908          * These days, we have UID. And, so what we do is, force nick change client(s)
909          * involved according to timestamp rules.
910          *
911          * RULES:        
912          *  user@ip equal:       
913          *   Force nick change on OLDER timestamped client       
914          *  user@ip differ:      
915          *   Force nick change on NEWER timestamped client       
916          *  TS EQUAL:    
917          *   FNC both.   
918          *       
919          * This stops abusive use of collisions, simplifies problems with loops, and so on.      
920          *   -- w00t
921          */
922         bool bChangeLocal = true;
923         bool bChangeRemote = true;
924
925         /* for brevity, don't use the User */
926         time_t localts = u->age;
927         const char *localident = u->ident;
928         const char *localip = u->GetIPString();
929
930         /* mmk. let's do this again. */
931         if (remotets == localts)
932         {
933                 /* equal. fuck them both! do nada, let the handler at the bottom figure this out. */
934         }
935         else
936         {
937                 /* fuck. now it gets complex. */
938
939                 /* first, let's see if ident@host matches. */
940                 bool SamePerson = !strcmp(localident, remoteident)
941                                 && !strcmp(localip, remoteip);
942
943                 /*
944                  * if ident@ip is equal, and theirs is newer, or
945                  * ident@ip differ, and ours is newer
946                  */
947                 if((SamePerson && remotets < localts) ||
948                    (!SamePerson && remotets > localts))
949                 {
950                         /* remote needs to change */
951                         bChangeLocal = false;
952                 }
953                 else
954                 {
955                         /* ours needs to change */
956                         bChangeRemote = false;
957                 }
958         }
959
960
961         if (bChangeLocal)
962         {
963                 u->ForceNickChange(u->uuid);
964
965                 if (!bChangeRemote)
966                         return 1;
967         }
968         if (bChangeRemote)
969         {
970                 /*
971                  * Cheat a little here. Instead of a dedicated command to change UID,
972                  * use SVSNICK and accept their client with it's UID (as we know the SVSNICK will
973                  * not fail under any circumstances -- UIDs are netwide exclusive).
974                  *
975                  * This means that each side of a collide will generate one extra NICK back to where
976                  * they have just linked (and where it got the SVSNICK from), however, it will
977                  * be dropped harmlessly as it will come in as :928AAAB NICK 928AAAB, and we already
978                  * have 928AAAB's nick set to that.
979                  *   -- w00t
980                  */
981                 User *remote = this->Instance->FindUUID(remoteuid);
982
983                 if (remote)
984                 {
985                         /* buh.. nick change collide. force change their nick. */
986                         remote->ForceNickChange(remote->uuid);
987                 }
988                 else
989                 {
990                         /* user has not been introduced yet, just inform their server */
991                         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" SVSNICK "+remoteuid+" " + remoteuid + " " + ConvToStr(remotets));
992                 }
993
994                 if (!bChangeLocal)
995                         return 2;
996         }
997
998         return 3;
999 }
1000
1001 bool TreeSocket::ParseUID(const std::string &source, std::deque<std::string> &params)
1002 {
1003         /** Do we have enough parameters:
1004          * UID uuid age nick host dhost ident +modestr ip.string :gecos
1005          */
1006         if (params.size() != 10)
1007         {
1008                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction ("+params[0]+" with only "+
1009                                 ConvToStr(params.size())+" of 10 parameters?)");
1010                 return true;
1011         }
1012
1013         time_t age = ConvToInt(params[1]);
1014         time_t signon = ConvToInt(params[8]);
1015         const char* tempnick = params[2].c_str();
1016         std::string empty;
1017
1018         /* XXX probably validate UID length too -- w00t */
1019         cmd_validation valid[] = { {"Nickname", 2, NICKMAX}, {"Hostname", 3, 64}, {"Displayed hostname", 4, 64}, {"Ident", 5, IDENTMAX}, {"GECOS", 9, MAXGECOS}, {"", 0, 0} };
1020
1021         TreeServer* remoteserver = Utils->FindServer(source);
1022
1023         if (!remoteserver)
1024         {
1025                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (Unknown server "+source+")");
1026                 return true;
1027         }
1028
1029         /* Check parameters for validity before introducing the client, discovered by dmb */
1030         if (!age)
1031         {
1032                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (Invalid TS?)");
1033                 return true;
1034         }
1035
1036         for (size_t x = 0; valid[x].length; ++x)
1037         {
1038                 if (params[valid[x].param].length() > valid[x].length)
1039                 {
1040                         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (" + valid[x].item + " > " + ConvToStr(valid[x].length) + ")");
1041                         return true;
1042                 }
1043         }
1044
1045
1046         /* check for collision */
1047         user_hash::iterator iter = this->Instance->Users->clientlist->find(tempnick);
1048
1049         if (iter != this->Instance->Users->clientlist->end())
1050         {
1051                 /*
1052                  * Nick collision.
1053                  */
1054                 Instance->Log(DEBUG,"*** Collision on %s", tempnick);
1055                 int collide = this->DoCollision(iter->second, age, params[5].c_str(), params[7].c_str(), params[0].c_str());
1056
1057                 if (collide == 2)
1058                 {
1059                         /* remote client changed, make sure we change their nick for the hash too */
1060                         tempnick = params[0].c_str();
1061                 }
1062         }
1063
1064         /* IMPORTANT NOTE: For remote users, we pass the UUID in the constructor. This automatically
1065          * sets it up in the UUID hash for us.
1066          */
1067         User* _new = NULL;
1068         try
1069         {
1070                 _new = new User(this->Instance, params[0]);
1071         }
1072         catch (...)
1073         {
1074                 SendError("Protocol violation - Duplicate UUID '" + params[0] + "' on introduction of new user");
1075                 return false;
1076         }
1077         (*(this->Instance->Users->clientlist))[tempnick] = _new;
1078         _new->SetFd(FD_MAGIC_NUMBER);
1079         strlcpy(_new->nick, tempnick, NICKMAX - 1);
1080         strlcpy(_new->host, params[3].c_str(),64);
1081         strlcpy(_new->dhost, params[4].c_str(),64);
1082         _new->server = this->Instance->FindServerNamePtr(remoteserver->GetName().c_str());
1083         strlcpy(_new->ident, params[5].c_str(),IDENTMAX);
1084         strlcpy(_new->fullname, params[9].c_str(),MAXGECOS);
1085         _new->registered = REG_ALL;
1086         _new->signon = signon;
1087         _new->age = age;
1088
1089         /* we need to remove the + from the modestring, so we can do our stuff */
1090         std::string::size_type pos_after_plus = params[6].find_first_not_of('+');
1091         if (pos_after_plus != std::string::npos)
1092         params[6] = params[6].substr(pos_after_plus);
1093
1094         for (std::string::iterator v = params[6].begin(); v != params[6].end(); v++)
1095         {
1096                 /* For each mode thats set, increase counter */
1097                 ModeHandler* mh = Instance->Modes->FindMode(*v, MODETYPE_USER);
1098
1099                 if (mh)
1100                 {
1101                         mh->OnModeChange(_new, _new, NULL, empty, true);
1102                         _new->SetMode(*v, true);
1103                         mh->ChangeCount(1);
1104                 }
1105         }
1106
1107         /* now we've done with modes processing, put the + back for remote servers */
1108         params[6] = "+" + params[6];
1109
1110 #ifdef SUPPORT_IP6LINKS
1111         if (params[7].find_first_of(":") != std::string::npos)
1112                 _new->SetSockAddr(AF_INET6, params[7].c_str(), 0);
1113         else
1114 #endif
1115                 _new->SetSockAddr(AF_INET, params[7].c_str(), 0);
1116
1117         Instance->Users->AddGlobalClone(_new);
1118
1119         bool dosend = true;
1120         
1121         if ((this->Utils->quiet_bursts && remoteserver->bursting) || this->Instance->SilentULine(_new->server))
1122                 dosend = false;
1123         
1124         if (dosend)
1125                 this->Instance->SNO->WriteToSnoMask('C',"Client connecting at %s: %s!%s@%s [%s] [%s]",_new->server,_new->nick,_new->ident,_new->host, _new->GetIPString(), _new->fullname);
1126
1127         params[9] = ":" + params[9];
1128         Utils->DoOneToAllButSender(source, "UID", params, source);
1129
1130         FOREACH_MOD_I(Instance,I_OnPostConnect,OnPostConnect(_new));
1131
1132         return true;
1133 }
1134
1135 /** Send one or more FJOINs for a channel of users.
1136  * If the length of a single line is more than 480-NICKMAX
1137  * in length, it is split over multiple lines.
1138  */
1139 void TreeSocket::SendFJoins(TreeServer* Current, Channel* c)
1140 {
1141         std::string buffer;
1142         char list[MAXBUF];
1143         std::string individual_halfops = std::string(":")+this->Instance->Config->GetSID()+" FMODE "+c->name+" "+ConvToStr(c->age);
1144
1145         size_t dlen, curlen;
1146         dlen = curlen = snprintf(list,MAXBUF,":%s FJOIN %s %lu",this->Instance->Config->GetSID().c_str(),c->name,(unsigned long)c->age);
1147         int numusers = 1;
1148         char* ptr = list + dlen;
1149
1150         CUList *ulist = c->GetUsers();
1151         std::string modes;
1152         std::string params;
1153
1154         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1155         {
1156                 // The first parameter gets a : before it
1157                 size_t ptrlen = snprintf(ptr, MAXBUF, " %s%s,%s", !numusers ? ":" : "", c->GetAllPrefixChars(i->first), i->first->uuid);
1158
1159                 curlen += ptrlen;
1160                 ptr += ptrlen;
1161
1162                 numusers++;
1163
1164                 if (curlen > (480-NICKMAX))
1165                 {
1166                         buffer.append(list).append("\r\n");
1167                         dlen = curlen = snprintf(list,MAXBUF,":%s FJOIN %s %lu",this->Instance->Config->GetSID().c_str(),c->name,(unsigned long)c->age);
1168                         ptr = list + dlen;
1169                         ptrlen = 0;
1170                         numusers = 0;
1171                 }
1172         }
1173
1174         if (numusers)
1175                 buffer.append(list).append("\r\n");
1176
1177         buffer.append(":").append(this->Instance->Config->GetSID()).append(" FMODE ").append(c->name).append(" ").append(ConvToStr(c->age)).append(" +").append(c->ChanModes(true)).append("\r\n");
1178
1179         int linesize = 1;
1180         for (BanList::iterator b = c->bans.begin(); b != c->bans.end(); b++)
1181         {
1182                 int size = strlen(b->data) + 2;
1183                 int currsize = linesize + size;
1184                 if (currsize <= 350)
1185                 {
1186                         modes.append("b");
1187                         params.append(" ").append(b->data);
1188                         linesize += size; 
1189                 }
1190                 if ((params.length() >= MAXMODES) || (currsize > 350))
1191                 {
1192                         /* Wrap at MAXMODES */
1193                         buffer.append(":").append(this->Instance->Config->GetSID()).append(" FMODE ").append(c->name).append(" ").append(ConvToStr(c->age)).append(" +").append(modes).append(params).append("\r\n");
1194                         modes.clear();
1195                         params.clear();
1196                         linesize = 1;
1197                 }
1198         }
1199
1200         /* Only send these if there are any */
1201         if (!modes.empty())
1202                 buffer.append(":").append(this->Instance->Config->GetSID()).append(" FMODE ").append(c->name).append(" ").append(ConvToStr(c->age)).append(" +").append(modes).append(params);
1203
1204         this->WriteLine(buffer);
1205 }
1206
1207 /** Send G, Q, Z and E lines */
1208 void TreeSocket::SendXLines(TreeServer* Current)
1209 {
1210         char data[MAXBUF];
1211         std::string buffer;
1212         std::string n = this->Instance->Config->GetSID();
1213         const char* sn = n.c_str();
1214
1215         std::vector<std::string> types = Instance->XLines->GetAllTypes();
1216
1217         for (std::vector<std::string>::iterator it = types.begin(); it != types.end(); ++it)
1218         {
1219                 XLineLookup* lookup = Instance->XLines->GetAll(*it);
1220
1221                 if (lookup)
1222                 {
1223                         for (LookupIter i = lookup->begin(); i != lookup->end(); ++i)
1224                         {
1225                                 snprintf(data,MAXBUF,":%s ADDLINE %s %s %s %lu %lu :%s\r\n",sn, it->c_str(), i->second->Displayable(),
1226                                                 i->second->source,
1227                                                 (unsigned long)i->second->set_time,
1228                                                 (unsigned long)i->second->duration,
1229                                                 i->second->reason);
1230                                 buffer.append(data);
1231                         }
1232                 }
1233         }
1234
1235         if (!buffer.empty())
1236                 this->WriteLine(buffer);
1237 }
1238
1239 /** Send channel modes and topics */
1240 void TreeSocket::SendChannelModes(TreeServer* Current)
1241 {
1242         char data[MAXBUF];
1243         std::deque<std::string> list;
1244         std::string n = this->Instance->Config->GetSID();
1245         const char* sn = n.c_str();
1246         Instance->Log(DEBUG,"Sending channels and modes, %d to send", this->Instance->chanlist->size());
1247         for (chan_hash::iterator c = this->Instance->chanlist->begin(); c != this->Instance->chanlist->end(); c++)
1248         {
1249                 SendFJoins(Current, c->second);
1250                 if (*c->second->topic)
1251                 {
1252                         snprintf(data,MAXBUF,":%s FTOPIC %s %lu %s :%s",sn,c->second->name,(unsigned long)c->second->topicset,c->second->setby,c->second->topic);
1253                         this->WriteLine(data);
1254                 }
1255                 FOREACH_MOD_I(this->Instance,I_OnSyncChannel,OnSyncChannel(c->second,(Module*)Utils->Creator,(void*)this));
1256                 list.clear();
1257                 c->second->GetExtList(list);
1258                 for (unsigned int j = 0; j < list.size(); j++)
1259                 {
1260                         FOREACH_MOD_I(this->Instance,I_OnSyncChannelMetaData,OnSyncChannelMetaData(c->second,(Module*)Utils->Creator,(void*)this,list[j]));
1261                 }
1262         }
1263 }
1264
1265 /** send all users and their oper state/modes */
1266 void TreeSocket::SendUsers(TreeServer* Current)
1267 {
1268         char data[MAXBUF];
1269         std::deque<std::string> list;
1270         std::string dataline;
1271         for (user_hash::iterator u = this->Instance->Users->clientlist->begin(); u != this->Instance->Users->clientlist->end(); u++)
1272         {
1273                 if (u->second->registered == REG_ALL)
1274                 {
1275                         TreeServer* theirserver = Utils->FindServer(u->second->server);
1276                         if (theirserver)
1277                         {
1278                                 snprintf(data,MAXBUF,":%s UID %s %lu %s %s %s %s +%s %s %lu :%s", theirserver->GetID().c_str(), u->second->uuid,
1279                                                 (unsigned long)u->second->age, u->second->nick, u->second->host, u->second->dhost,
1280                                                 u->second->ident, u->second->FormatModes(), u->second->GetIPString(),
1281                                                 (unsigned long)u->second->signon, u->second->fullname);
1282                                 this->WriteLine(data);
1283                                 if (*u->second->oper)
1284                                 {
1285                                         snprintf(data,MAXBUF,":%s OPERTYPE %s", u->second->uuid, u->second->oper);
1286                                         this->WriteLine(data);
1287                                 }
1288                                 if (*u->second->awaymsg)
1289                                 {
1290                                         snprintf(data,MAXBUF,":%s AWAY :%s", u->second->uuid, u->second->awaymsg);
1291                                         this->WriteLine(data);
1292                                 }
1293                         }
1294
1295                         FOREACH_MOD_I(this->Instance,I_OnSyncUser,OnSyncUser(u->second,(Module*)Utils->Creator,(void*)this));
1296                         list.clear();
1297                         u->second->GetExtList(list);
1298                         for (unsigned int j = 0; j < list.size(); j++)
1299                         {
1300                                 FOREACH_MOD_I(this->Instance,I_OnSyncUserMetaData,OnSyncUserMetaData(u->second,(Module*)Utils->Creator,(void*)this,list[j]));
1301                         }
1302                 }
1303         }
1304 }
1305
1306 /** This function is called when we want to send a netburst to a local
1307  * server. There is a set order we must do this, because for example
1308  * users require their servers to exist, and channels require their
1309  * users to exist. You get the idea.
1310  */
1311 void TreeSocket::DoBurst(TreeServer* s)
1312 {
1313         std::string name = s->GetName();
1314         std::string burst = ":" + this->Instance->Config->GetSID() + " BURST " +ConvToStr(Instance->Time(true));
1315         std::string endburst = ":" + this->Instance->Config->GetSID() + " ENDBURST";
1316         this->Instance->SNO->WriteToSnoMask('l',"Bursting to \2%s\2 (Authentication: %s).", name.c_str(), this->GetTheirChallenge().empty() ? "plaintext password" : "SHA256-HMAC challenge-response");
1317         this->WriteLine(burst);
1318         /* send our version string */
1319         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" VERSION :"+this->Instance->GetVersionString());
1320         /* Send server tree */
1321         this->SendServers(Utils->TreeRoot,s,1);
1322         /* Send users and their oper status */
1323         this->SendUsers(s);
1324         /* Send everything else (channel modes, xlines etc) */
1325         this->SendChannelModes(s);
1326         this->SendXLines(s);
1327         FOREACH_MOD_I(this->Instance,I_OnSyncOtherMetaData,OnSyncOtherMetaData((Module*)Utils->Creator,(void*)this));
1328         this->WriteLine(endburst);
1329         this->Instance->SNO->WriteToSnoMask('l',"Finished bursting to \2"+name+"\2.");
1330 }
1331
1332 /** This function is called when we receive data from a remote
1333  * server. We buffer the data in a std::string (it doesnt stay
1334  * there for long), reading using BufferedSocket::Read() which can
1335  * read up to 16 kilobytes in one operation.
1336  *
1337  * IF THIS FUNCTION RETURNS FALSE, THE CORE CLOSES AND DELETES
1338  * THE SOCKET OBJECT FOR US.
1339  */
1340 bool TreeSocket::OnDataReady()
1341 {
1342         char* data = this->Read();
1343         /* Check that the data read is a valid pointer and it has some content */
1344         if (data && *data)
1345         {
1346                 this->in_buffer.append(data);
1347                 /* While there is at least one new line in the buffer,
1348                  * do something useful (we hope!) with it.
1349                  */
1350                 while (in_buffer.find("\n") != std::string::npos)
1351                 {
1352                         std::string ret = in_buffer.substr(0,in_buffer.find("\n")-1);
1353                         in_buffer = in_buffer.substr(in_buffer.find("\n")+1,in_buffer.length()-in_buffer.find("\n"));
1354                         /* Use rfind here not find, as theres more
1355                          * chance of the \r being near the end of the
1356                          * string, not the start.
1357                          */
1358                         if (ret.find("\r") != std::string::npos)
1359                                 ret = in_buffer.substr(0,in_buffer.find("\r")-1);
1360                         /* Process this one, abort if it
1361                          * didnt return true.
1362                          */
1363                         if (!this->ProcessLine(ret))
1364                         {
1365                                 return false;
1366                         }
1367                 }
1368                 return true;
1369         }
1370         /* EAGAIN returns an empty but non-NULL string, so this
1371          * evaluates to TRUE for EAGAIN but to FALSE for EOF.
1372          */
1373         return (data && !*data);
1374 }