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