]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/modules/m_spanningtree/treesocket1.cpp
Fix these to use new hook system (u_listmode wasnt fixed yet)
[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() < 3)
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[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         params[2] = ":" + params[2];
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 our TS is less than theirs, we dont accept their modes */
808         if (ourTS < TS)
809                 apply_other_sides_modes = false;
810
811         /* Our TS greater than theirs, clear all our modes from the channel, accept theirs. */
812         if (ourTS > TS)
813         {
814                 std::deque<std::string> param_list;
815                 if (Utils->AnnounceTSChange && chan)
816                         chan->WriteChannelWithServ(Instance->Config->ServerName, "NOTICE %s :TS for %s changed from %lu to %lu", chan->name, chan->name, ourTS, TS);
817                 ourTS = TS;
818                 if (!created)
819                 {
820                         chan->age = TS;
821                         param_list.push_back(channel);
822                         this->RemoveStatus(Instance->Config->GetSID(), param_list);
823                 }
824         }
825
826         /* Now, process every 'prefixes,nick' pair */
827         while (users.GetToken(item))
828         {
829                 const char* usr = item.c_str();
830                 if (usr && *usr)
831                 {
832                         const char* permissions = usr;
833                         /* Iterate through all the prefix values, convert them from prefixes to mode letters */
834                         std::string modes;
835                         while ((*permissions) && (*permissions != ','))
836                         {
837                                 ModeHandler* mh = Instance->Modes->FindPrefix(*permissions);
838                                 if (mh)
839                                         modes = modes + mh->GetModeChar();
840                                 else
841                                 {
842                                         this->SendError(std::string("Invalid prefix '")+(*permissions)+"' in FJOIN");
843                                         return false;
844                                 }
845                                 usr++;
846                                 permissions++;
847                         }
848                         /* Advance past the comma, to the nick */
849                         usr++;
850                         
851                         /* Check the user actually exists */
852                         who = this->Instance->FindUUID(usr);
853                         if (who)
854                         {
855                                 /* Check that the user's 'direction' is correct */
856                                 TreeServer* route_back_again = Utils->BestRouteTo(who->server);
857                                 if ((!route_back_again) || (route_back_again->GetSocket() != this))
858                                         continue;
859
860                                 /* Add any permissions this user had to the mode stack */
861                                 for (std::string::iterator x = modes.begin(); x != modes.end(); ++x)
862                                         modestack.Push(*x, who->nick);
863
864                                 Channel::JoinUser(this->Instance, who, channel.c_str(), true, "", TS);
865                         }
866                         else
867                         {
868                                 Instance->Log(SPARSE,"Warning! Invalid user %s in FJOIN to channel %s IGNORED", usr, channel.c_str());
869                                 continue;
870                         }
871                 }
872         }
873
874         /* Flush mode stacker if we lost the FJOIN or had equal TS */
875         if (apply_other_sides_modes)
876         {
877                 std::deque<std::string> stackresult;
878                 const char* mode_junk[MAXMODES+2];
879                 mode_junk[0] = channel.c_str();
880
881                 while (modestack.GetStackedLine(stackresult))
882                 {
883                         for (size_t j = 0; j < stackresult.size(); j++)
884                         {
885                                 mode_junk[j+1] = stackresult[j].c_str();
886                         }
887                         Instance->SendMode(mode_junk, stackresult.size() + 1, Instance->FakeClient);
888                 }
889         }
890
891         return true;
892 }
893
894 /*
895  * Yes, this function looks a little ugly.
896  * However, in some circumstances we may not have a User, so we need to do things this way.
897  * Returns 1 if colliding local client, 2 if colliding remote, 3 if colliding both.
898  * Sends SVSNICKs as appropriate and forces nickchanges too.
899  */
900 int TreeSocket::DoCollision(User *u, time_t remotets, const char *remoteident, const char *remoteip, const char *remoteuid)
901 {
902         /*
903          *  Under old protocol rules, we would have had to kill both clients.
904          *  Really, this sucks.
905          * These days, we have UID. And, so what we do is, force nick change client(s)
906          * involved according to timestamp rules.
907          *
908          * RULES:        
909          *  user@ip equal:       
910          *   Force nick change on OLDER timestamped client       
911          *  user@ip differ:      
912          *   Force nick change on NEWER timestamped client       
913          *  TS EQUAL:    
914          *   FNC both.   
915          *       
916          * This stops abusive use of collisions, simplifies problems with loops, and so on.      
917          *   -- w00t
918          */
919         bool bChangeLocal = true;
920         bool bChangeRemote = true;
921
922         /* for brevity, don't use the User */
923         time_t localts = u->age;
924         const char *localident = u->ident;
925         const char *localip = u->GetIPString();
926
927         /* mmk. let's do this again. */
928         if (remotets == localts)
929         {
930                 /* equal. fuck them both! do nada, let the handler at the bottom figure this out. */
931         }
932         else
933         {
934                 /* fuck. now it gets complex. */
935
936                 /* first, let's see if ident@host matches. */
937                 bool SamePerson = !strcmp(localident, remoteident)
938                                 && !strcmp(localip, remoteip);
939
940                 /*
941                  * if ident@ip is equal, and theirs is newer, or
942                  * ident@ip differ, and ours is newer
943                  */
944                 if((SamePerson && remotets < localts) ||
945                    (!SamePerson && remotets > localts))
946                 {
947                         /* remote needs to change */
948                         bChangeLocal = false;
949                 }
950                 else
951                 {
952                         /* ours needs to change */
953                         bChangeRemote = false;
954                 }
955         }
956
957
958         if (bChangeLocal)
959         {
960                 u->ForceNickChange(u->uuid);
961
962                 if (!bChangeRemote)
963                         return 1;
964         }
965         if (bChangeRemote)
966         {
967                 /*
968                  * Cheat a little here. Instead of a dedicated command to change UID,
969                  * use SVSNICK and accept their client with it's UID (as we know the SVSNICK will
970                  * not fail under any circumstances -- UIDs are netwide exclusive).
971                  *
972                  * This means that each side of a collide will generate one extra NICK back to where
973                  * they have just linked (and where it got the SVSNICK from), however, it will
974                  * be dropped harmlessly as it will come in as :928AAAB NICK 928AAAB, and we already
975                  * have 928AAAB's nick set to that.
976                  *   -- w00t
977                  */
978                 User *remote = this->Instance->FindUUID(remoteuid);
979
980                 if (remote)
981                 {
982                         /* buh.. nick change collide. force change their nick. */
983                         remote->ForceNickChange(remote->uuid);
984                 }
985                 else
986                 {
987                         /* user has not been introduced yet, just inform their server */
988                         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" SVSNICK "+remoteuid+" " + remoteuid + " " + ConvToStr(remotets));
989                 }
990
991                 if (!bChangeLocal)
992                         return 2;
993         }
994
995         return 3;
996 }
997
998 bool TreeSocket::ParseUID(const std::string &source, std::deque<std::string> &params)
999 {
1000         /** Do we have enough parameters:
1001          * UID uuid age nick host dhost ident +modestr ip.string :gecos
1002          */
1003         if (params.size() != 10)
1004         {
1005                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction ("+params[0]+" with only "+
1006                                 ConvToStr(params.size())+" of 10 parameters?)");
1007                 return true;
1008         }
1009
1010         time_t age = ConvToInt(params[1]);
1011         time_t signon = ConvToInt(params[8]);
1012         const char* tempnick = params[2].c_str();
1013         std::string empty;
1014
1015         /* XXX probably validate UID length too -- w00t */
1016         cmd_validation valid[] = { {"Nickname", 2, NICKMAX}, {"Hostname", 3, 64}, {"Displayed hostname", 4, 64}, {"Ident", 5, IDENTMAX}, {"GECOS", 9, MAXGECOS}, {"", 0, 0} };
1017
1018         TreeServer* remoteserver = Utils->FindServer(source);
1019
1020         if (!remoteserver)
1021         {
1022                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (Unknown server "+source+")");
1023                 return true;
1024         }
1025
1026         /* Check parameters for validity before introducing the client, discovered by dmb */
1027         if (!age)
1028         {
1029                 this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (Invalid TS?)");
1030                 return true;
1031         }
1032
1033         for (size_t x = 0; valid[x].length; ++x)
1034         {
1035                 if (params[valid[x].param].length() > valid[x].length)
1036                 {
1037                         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" KILL "+params[0]+" :Invalid client introduction (" + valid[x].item + " > " + ConvToStr(valid[x].length) + ")");
1038                         return true;
1039                 }
1040         }
1041
1042
1043         /* check for collision */
1044         user_hash::iterator iter = this->Instance->clientlist->find(tempnick);
1045
1046         if (iter != this->Instance->clientlist->end())
1047         {
1048                 /*
1049                  * Nick collision.
1050                  */
1051                 Instance->Log(DEBUG,"*** Collision on %s", tempnick);
1052                 int collide = this->DoCollision(iter->second, age, params[5].c_str(), params[7].c_str(), params[0].c_str());
1053
1054                 if (collide == 2)
1055                 {
1056                         /* remote client changed, make sure we change their nick for the hash too */
1057                         tempnick = params[0].c_str();
1058                 }
1059         }
1060
1061         /* IMPORTANT NOTE: For remote users, we pass the UUID in the constructor. This automatically
1062          * sets it up in the UUID hash for us.
1063          */
1064         User* _new = NULL;
1065         try
1066         {
1067                 _new = new User(this->Instance, params[0]);
1068         }
1069         catch (...)
1070         {
1071                 SendError("Protocol violation - Duplicate UUID '" + params[0] + "' on introduction of new user");
1072                 return false;
1073         }
1074         (*(this->Instance->clientlist))[tempnick] = _new;
1075         _new->SetFd(FD_MAGIC_NUMBER);
1076         strlcpy(_new->nick, tempnick, NICKMAX - 1);
1077         strlcpy(_new->host, params[3].c_str(),64);
1078         strlcpy(_new->dhost, params[4].c_str(),64);
1079         _new->server = this->Instance->FindServerNamePtr(remoteserver->GetName().c_str());
1080         strlcpy(_new->ident, params[5].c_str(),IDENTMAX);
1081         strlcpy(_new->fullname, params[9].c_str(),MAXGECOS);
1082         _new->registered = REG_ALL;
1083         _new->signon = signon;
1084         _new->age = age;
1085
1086         /* we need to remove the + from the modestring, so we can do our stuff */
1087         std::string::size_type pos_after_plus = params[6].find_first_not_of('+');
1088         if (pos_after_plus != std::string::npos)
1089         params[6] = params[6].substr(pos_after_plus);
1090
1091         for (std::string::iterator v = params[6].begin(); v != params[6].end(); v++)
1092         {
1093                 /* For each mode thats set, increase counter */
1094                 ModeHandler* mh = Instance->Modes->FindMode(*v, MODETYPE_USER);
1095
1096                 if (mh)
1097                 {
1098                         mh->OnModeChange(_new, _new, NULL, empty, true);
1099                         _new->SetMode(*v, true);
1100                         mh->ChangeCount(1);
1101                 }
1102         }
1103
1104         /* now we've done with modes processing, put the + back for remote servers */
1105         params[6] = "+" + params[6];
1106
1107 #ifdef SUPPORT_IP6LINKS
1108         if (params[7].find_first_of(":") != std::string::npos)
1109                 _new->SetSockAddr(AF_INET6, params[7].c_str(), 0);
1110         else
1111 #endif
1112                 _new->SetSockAddr(AF_INET, params[7].c_str(), 0);
1113
1114         Instance->AddGlobalClone(_new);
1115
1116         bool dosend = !(((this->Utils->quiet_bursts) && (this->bursting || Utils->FindRemoteBurstServer(remoteserver))) || (this->Instance->SilentULine(_new->server)));
1117         
1118         if (dosend)
1119                 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);
1120
1121         params[9] = ":" + params[9];
1122         Utils->DoOneToAllButSender(source, "UID", params, source);
1123
1124         // Increment the Source Servers User Count..
1125         TreeServer* SourceServer = Utils->FindServer(source);
1126         if (SourceServer)
1127         {
1128                 SourceServer->AddUserCount();
1129         }
1130
1131         FOREACH_MOD_I(Instance,I_OnPostConnect,OnPostConnect(_new));
1132
1133         return true;
1134 }
1135
1136 /** Send one or more FJOINs for a channel of users.
1137  * If the length of a single line is more than 480-NICKMAX
1138  * in length, it is split over multiple lines.
1139  */
1140 void TreeSocket::SendFJoins(TreeServer* Current, Channel* c)
1141 {
1142         std::string buffer;
1143         char list[MAXBUF];
1144         std::string individual_halfops = std::string(":")+this->Instance->Config->GetSID()+" FMODE "+c->name+" "+ConvToStr(c->age);
1145
1146         size_t dlen, curlen;
1147         dlen = curlen = snprintf(list,MAXBUF,":%s FJOIN %s %lu",this->Instance->Config->GetSID().c_str(),c->name,(unsigned long)c->age);
1148         int numusers = 0;
1149         char* ptr = list + dlen;
1150
1151         CUList *ulist = c->GetUsers();
1152         std::string modes;
1153         std::string params;
1154
1155         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1156         {
1157                 // The first parameter gets a : before it
1158                 size_t ptrlen = snprintf(ptr, MAXBUF, " %s%s,%s", !numusers ? ":" : "", c->GetAllPrefixChars(i->first), i->first->uuid);
1159
1160                 curlen += ptrlen;
1161                 ptr += ptrlen;
1162
1163                 numusers++;
1164
1165                 if (curlen > (480-NICKMAX))
1166                 {
1167                         buffer.append(list).append("\r\n");
1168                         dlen = curlen = snprintf(list,MAXBUF,":%s FJOIN %s %lu",this->Instance->Config->GetSID().c_str(),c->name,(unsigned long)c->age);
1169                         ptr = list + dlen;
1170                         ptrlen = 0;
1171                         numusers = 0;
1172                 }
1173         }
1174
1175         if (numusers)
1176                 buffer.append(list).append("\r\n");
1177
1178         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");
1179
1180         int linesize = 1;
1181         for (BanList::iterator b = c->bans.begin(); b != c->bans.end(); b++)
1182         {
1183                 int size = strlen(b->data) + 2;
1184                 int currsize = linesize + size;
1185                 if (currsize <= 350)
1186                 {
1187                         modes.append("b");
1188                         params.append(" ").append(b->data);
1189                         linesize += size; 
1190                 }
1191                 if ((params.length() >= MAXMODES) || (currsize > 350))
1192                 {
1193                         /* Wrap at MAXMODES */
1194                         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");
1195                         modes.clear();
1196                         params.clear();
1197                         linesize = 1;
1198                 }
1199         }
1200
1201         /* Only send these if there are any */
1202         if (!modes.empty())
1203                 buffer.append(":").append(this->Instance->Config->GetSID()).append(" FMODE ").append(c->name).append(" ").append(ConvToStr(c->age)).append(" +").append(modes).append(params);
1204
1205         this->WriteLine(buffer);
1206 }
1207
1208 /** Send G, Q, Z and E lines */
1209 void TreeSocket::SendXLines(TreeServer* Current)
1210 {
1211         char data[MAXBUF];
1212         std::string buffer;
1213         std::string n = this->Instance->Config->GetSID();
1214         const char* sn = n.c_str();
1215
1216         std::vector<std::string> types = Instance->XLines->GetAllTypes();
1217
1218         for (std::vector<std::string>::iterator it = types.begin(); it != types.end(); ++it)
1219         {
1220                 XLineLookup* lookup = Instance->XLines->GetAll(*it);
1221
1222                 if (lookup)
1223                 {
1224                         for (LookupIter i = lookup->begin(); i != lookup->end(); ++i)
1225                         {
1226                                 snprintf(data,MAXBUF,":%s ADDLINE %s %s %s %lu %lu :%s\r\n",sn, it->c_str(), i->second->Displayable(),
1227                                                 i->second->source,
1228                                                 (unsigned long)i->second->set_time,
1229                                                 (unsigned long)i->second->duration,
1230                                                 i->second->reason);
1231                                 buffer.append(data);
1232                         }
1233                 }
1234         }
1235
1236         if (!buffer.empty())
1237                 this->WriteLine(buffer);
1238 }
1239
1240 /** Send channel modes and topics */
1241 void TreeSocket::SendChannelModes(TreeServer* Current)
1242 {
1243         char data[MAXBUF];
1244         std::deque<std::string> list;
1245         std::string n = this->Instance->Config->GetSID();
1246         const char* sn = n.c_str();
1247         Instance->Log(DEBUG,"Sending channels and modes, %d to send", this->Instance->chanlist->size());
1248         for (chan_hash::iterator c = this->Instance->chanlist->begin(); c != this->Instance->chanlist->end(); c++)
1249         {
1250                 SendFJoins(Current, c->second);
1251                 if (*c->second->topic)
1252                 {
1253                         snprintf(data,MAXBUF,":%s FTOPIC %s %lu %s :%s",sn,c->second->name,(unsigned long)c->second->topicset,c->second->setby,c->second->topic);
1254                         this->WriteLine(data);
1255                 }
1256                 FOREACH_MOD_I(this->Instance,I_OnSyncChannel,OnSyncChannel(c->second,(Module*)Utils->Creator,(void*)this));
1257                 list.clear();
1258                 c->second->GetExtList(list);
1259                 for (unsigned int j = 0; j < list.size(); j++)
1260                 {
1261                         FOREACH_MOD_I(this->Instance,I_OnSyncChannelMetaData,OnSyncChannelMetaData(c->second,(Module*)Utils->Creator,(void*)this,list[j]));
1262                 }
1263         }
1264 }
1265
1266 /** send all users and their oper state/modes */
1267 void TreeSocket::SendUsers(TreeServer* Current)
1268 {
1269         char data[MAXBUF];
1270         std::deque<std::string> list;
1271         std::string dataline;
1272         for (user_hash::iterator u = this->Instance->clientlist->begin(); u != this->Instance->clientlist->end(); u++)
1273         {
1274                 if (u->second->registered == REG_ALL)
1275                 {
1276                         TreeServer* theirserver = Utils->FindServer(u->second->server);
1277                         if (theirserver)
1278                         {
1279                                 snprintf(data,MAXBUF,":%s UID %s %lu %s %s %s %s +%s %s %lu :%s", theirserver->GetID().c_str(), u->second->uuid,
1280                                                 (unsigned long)u->second->age, u->second->nick, u->second->host, u->second->dhost,
1281                                                 u->second->ident, u->second->FormatModes(), u->second->GetIPString(),
1282                                                 (unsigned long)u->second->signon, u->second->fullname);
1283                                 this->WriteLine(data);
1284                                 if (*u->second->oper)
1285                                 {
1286                                         snprintf(data,MAXBUF,":%s OPERTYPE %s", u->second->uuid, u->second->oper);
1287                                         this->WriteLine(data);
1288                                 }
1289                                 if (*u->second->awaymsg)
1290                                 {
1291                                         snprintf(data,MAXBUF,":%s AWAY :%s", u->second->uuid, u->second->awaymsg);
1292                                         this->WriteLine(data);
1293                                 }
1294                         }
1295
1296                         FOREACH_MOD_I(this->Instance,I_OnSyncUser,OnSyncUser(u->second,(Module*)Utils->Creator,(void*)this));
1297                         list.clear();
1298                         u->second->GetExtList(list);
1299                         for (unsigned int j = 0; j < list.size(); j++)
1300                         {
1301                                 FOREACH_MOD_I(this->Instance,I_OnSyncUserMetaData,OnSyncUserMetaData(u->second,(Module*)Utils->Creator,(void*)this,list[j]));
1302                         }
1303                 }
1304         }
1305 }
1306
1307 /** This function is called when we want to send a netburst to a local
1308  * server. There is a set order we must do this, because for example
1309  * users require their servers to exist, and channels require their
1310  * users to exist. You get the idea.
1311  */
1312 void TreeSocket::DoBurst(TreeServer* s)
1313 {
1314         std::string name = s->GetName();
1315         std::string burst = "BURST "+ConvToStr(Instance->Time(true));
1316         std::string endburst = "ENDBURST";
1317         this->Instance->SNO->WriteToSnoMask('l',"Bursting to \2%s\2 (Authentication: %s).", name.c_str(), this->GetTheirChallenge().empty() ? "plaintext password" : "SHA256-HMAC challenge-response");
1318         this->WriteLine(burst);
1319         /* send our version string */
1320         this->WriteLine(std::string(":")+this->Instance->Config->GetSID()+" VERSION :"+this->Instance->GetVersionString());
1321         /* Send server tree */
1322         this->SendServers(Utils->TreeRoot,s,1);
1323         /* Send users and their oper status */
1324         this->SendUsers(s);
1325         /* Send everything else (channel modes, xlines etc) */
1326         this->SendChannelModes(s);
1327         this->SendXLines(s);
1328         FOREACH_MOD_I(this->Instance,I_OnSyncOtherMetaData,OnSyncOtherMetaData((Module*)Utils->Creator,(void*)this));
1329         this->WriteLine(endburst);
1330         this->Instance->SNO->WriteToSnoMask('l',"Finished bursting to \2"+name+"\2.");
1331 }
1332
1333 /** This function is called when we receive data from a remote
1334  * server. We buffer the data in a std::string (it doesnt stay
1335  * there for long), reading using BufferedSocket::Read() which can
1336  * read up to 16 kilobytes in one operation.
1337  *
1338  * IF THIS FUNCTION RETURNS FALSE, THE CORE CLOSES AND DELETES
1339  * THE SOCKET OBJECT FOR US.
1340  */
1341 bool TreeSocket::OnDataReady()
1342 {
1343         char* data = this->Read();
1344         /* Check that the data read is a valid pointer and it has some content */
1345         if (data && *data)
1346         {
1347                 this->in_buffer.append(data);
1348                 /* While there is at least one new line in the buffer,
1349                  * do something useful (we hope!) with it.
1350                  */
1351                 while (in_buffer.find("\n") != std::string::npos)
1352                 {
1353                         std::string ret = in_buffer.substr(0,in_buffer.find("\n")-1);
1354                         in_buffer = in_buffer.substr(in_buffer.find("\n")+1,in_buffer.length()-in_buffer.find("\n"));
1355                         /* Use rfind here not find, as theres more
1356                          * chance of the \r being near the end of the
1357                          * string, not the start.
1358                          */
1359                         if (ret.find("\r") != std::string::npos)
1360                                 ret = in_buffer.substr(0,in_buffer.find("\r")-1);
1361                         /* Process this one, abort if it
1362                          * didnt return true.
1363                          */
1364                         if (!this->ProcessLine(ret))
1365                         {
1366                                 return false;
1367                         }
1368                 }
1369                 return true;
1370         }
1371         /* EAGAIN returns an empty but non-NULL string, so this
1372          * evaluates to TRUE for EAGAIN but to FALSE for EOF.
1373          */
1374         return (data && !*data);
1375 }