]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/modules/m_spanningtree/utils.cpp
8181969aceeae049236337c15b8a14d6494b9eb6
[user/henk/code/inspircd.git] / src / modules / m_spanningtree / utils.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  InspIRCd: (C) 2002-2008 InspIRCd Development Team
6  * See: http://www.inspircd.org/wiki/index.php/Credits
7  *
8  * This program is free but copyrighted software; see
9  *            the file COPYING for details.
10  *
11  * ---------------------------------------------------
12  */
13
14 #include "inspircd.h"
15 #include "commands/cmd_whois.h"
16 #include "commands/cmd_stats.h"
17 #include "socket.h"
18 #include "wildcard.h"
19 #include "xline.h"
20 #include "transport.h"
21 #include "socketengine.h"
22
23 #include "m_spanningtree/main.h"
24 #include "m_spanningtree/utils.h"
25 #include "m_spanningtree/treeserver.h"
26 #include "m_spanningtree/link.h"
27 #include "m_spanningtree/treesocket.h"
28 #include "m_spanningtree/resolvers.h"
29
30 /* $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 */
31
32 /** Yay for fast searches!
33  * This is hundreds of times faster than recursion
34  * or even scanning a linked list, especially when
35  * there are more than a few servers to deal with.
36  * (read as: lots).
37  */
38 TreeServer* SpanningTreeUtilities::FindServer(const std::string &ServerName)
39 {
40         if (this->ServerInstance->IsSID(ServerName))
41                 return this->FindServerID(ServerName);
42
43         server_hash::iterator iter = serverlist.find(ServerName.c_str());
44         if (iter != serverlist.end())
45         {
46                 return iter->second;
47         }
48         else
49         {
50                 return NULL;
51         }
52 }
53
54 /** Returns the locally connected server we must route a
55  * message through to reach server 'ServerName'. This
56  * only applies to one-to-one and not one-to-many routing.
57  * See the comments for the constructor of TreeServer
58  * for more details.
59  */
60 TreeServer* SpanningTreeUtilities::BestRouteTo(const std::string &ServerName)
61 {
62         if (ServerName.c_str() == TreeRoot->GetName() || ServerName == ServerInstance->Config->GetSID())
63                 return NULL;
64         TreeServer* Found = FindServer(ServerName);
65         if (Found)
66         {
67                 return Found->GetRoute();
68         }
69         else
70         {
71                 return NULL;
72         }
73 }
74
75 /** Find the first server matching a given glob mask.
76  * Theres no find-using-glob method of hash_map [awwww :-(]
77  * so instead, we iterate over the list using an iterator
78  * and match each one until we get a hit. Yes its slow,
79  * deal with it.
80  */
81 TreeServer* SpanningTreeUtilities::FindServerMask(const std::string &ServerName)
82 {
83         for (server_hash::iterator i = serverlist.begin(); i != serverlist.end(); i++)
84         {
85                 if (match(i->first.c_str(),ServerName.c_str()))
86                         return i->second;
87         }
88         return NULL;
89 }
90
91 TreeServer* SpanningTreeUtilities::FindServerID(const std::string &id)
92 {
93         server_hash::iterator iter = sidlist.find(id);
94         if (iter != sidlist.end())
95                 return iter->second;
96         else
97                 return NULL;
98 }
99
100 /* A convenient wrapper that returns true if a server exists */
101 bool SpanningTreeUtilities::IsServer(const std::string &ServerName)
102 {
103         return (FindServer(ServerName) != NULL);
104 }
105
106 SpanningTreeUtilities::SpanningTreeUtilities(InspIRCd* Instance, ModuleSpanningTree* C) : ServerInstance(Instance), Creator(C)
107 {
108         Bindings.clear();
109
110         ServerInstance->Logs->Log("m_spanningtree",DEBUG,"***** Using SID for hash: %s *****", ServerInstance->Config->GetSID().c_str());
111
112         this->TreeRoot = new TreeServer(this, ServerInstance, ServerInstance->Config->ServerName, ServerInstance->Config->ServerDesc, ServerInstance->Config->GetSID());
113
114         modulelist* ml = ServerInstance->Modules->FindInterface("BufferedSocketHook");
115
116         /* Did we find any modules? */
117         if (ml)
118         {
119                 /* Yes, enumerate them all to find out the hook name */
120                 for (modulelist::iterator m = ml->begin(); m != ml->end(); m++)
121                 {
122                         /* Make a request to it for its name, its implementing
123                          * BufferedSocketHook so we know its safe to do this
124                          */
125                         std::string name = BufferedSocketNameRequest((Module*)Creator, *m).Send();
126                         /* Build a map of them */
127                         hooks[name.c_str()] = *m;
128                         hooknames.push_back(name);
129                 }
130         }
131
132         this->ReadConfiguration(true);
133 }
134
135 SpanningTreeUtilities::~SpanningTreeUtilities()
136 {
137         for (unsigned int i = 0; i < Bindings.size(); i++)
138         {
139                 ServerInstance->SE->DelFd(Bindings[i]);
140                 Bindings[i]->Close();
141         }
142         while (TreeRoot->ChildCount())
143         {
144                 TreeServer* child_server = TreeRoot->GetChild(0);
145                 if (child_server)
146                 {
147                         TreeSocket* sock = child_server->GetSocket();
148                         ServerInstance->SE->DelFd(sock);
149                         sock->Close();
150                 }
151         }
152         delete TreeRoot;
153         ServerInstance->BufferedSocketCull();
154 }
155
156 void SpanningTreeUtilities::AddThisServer(TreeServer* server, TreeServerList &list)
157 {
158         if (list.find(server) == list.end())
159                 list[server] = server;
160 }
161
162 /* returns a list of DIRECT servernames for a specific channel */
163 void SpanningTreeUtilities::GetListOfServersForChannel(Channel* c, TreeServerList &list, char status, const CUList &exempt_list)
164 {
165         CUList *ulist;
166         switch (status)
167         {
168                 case '@':
169                         ulist = c->GetOppedUsers();
170                 break;
171                 case '%':
172                         ulist = c->GetHalfoppedUsers();
173                 break;
174                 case '+':
175                         ulist = c->GetVoicedUsers();
176                 break;
177                 default:
178                         ulist = c->GetUsers();
179                 break;
180         }
181         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
182         {
183                 if ((i->first->GetFd() < 0) && (exempt_list.find(i->first) == exempt_list.end()))
184                 {
185                         TreeServer* best = this->BestRouteTo(i->first->server);
186                         if (best)
187                                 AddThisServer(best,list);
188                 }
189         }
190         return;
191 }
192
193 bool SpanningTreeUtilities::DoOneToAllButSenderRaw(const std::string &data, const std::string &omit, const std::string &prefix, const irc::string &command, std::deque<std::string> &params)
194 {
195         char pfx = 0;
196         TreeServer* omitroute = this->BestRouteTo(omit);
197         if ((command == "NOTICE") || (command == "PRIVMSG"))
198         {
199                 if (params.size() >= 2)
200                 {
201                         /* Prefixes */
202                         if ((*(params[0].c_str()) == '@') || (*(params[0].c_str()) == '%') || (*(params[0].c_str()) == '+'))
203                         {
204                                 pfx = params[0][0];
205                                 params[0] = params[0].substr(1, params[0].length()-1);
206                         }
207                         if ((*(params[0].c_str()) != '#') && (*(params[0].c_str()) != '$'))
208                         {
209                                 // special routing for private messages/notices
210                                 User* d = ServerInstance->FindNick(params[0]);
211                                 if (d)
212                                 {
213                                         std::deque<std::string> par;
214                                         par.push_back(params[0]);
215                                         par.push_back(":"+params[1]);
216                                         this->DoOneToOne(prefix,command.c_str(),par,d->server);
217                                         return true;
218                                 }
219                         }
220                         else if (*(params[0].c_str()) == '$')
221                         {
222                                 std::deque<std::string> par;
223                                 par.push_back(params[0]);
224                                 par.push_back(":"+params[1]);
225                                 this->DoOneToAllButSender(prefix,command.c_str(),par,omitroute->GetName());
226                                 return true;
227                         }
228                         else
229                         {
230                                 Channel* c = ServerInstance->FindChan(params[0]);
231                                 User* u = ServerInstance->FindNick(prefix);
232                                 if (c)
233                                 {
234                                         CUList elist;
235                                         TreeServerList list;
236                                         FOREACH_MOD(I_OnBuildExemptList, OnBuildExemptList((command == "PRIVMSG" ? MSG_PRIVMSG : MSG_NOTICE), c, u, pfx, elist, params[1]));
237                                         GetListOfServersForChannel(c,list,pfx,elist);
238
239                                         for (TreeServerList::iterator i = list.begin(); i != list.end(); i++)
240                                         {
241                                                 TreeSocket* Sock = i->second->GetSocket();
242                                                 if ((Sock) && (i->second->GetName() != omit) && (omitroute != i->second))
243                                                 {
244                                                         Sock->WriteLine(data);
245                                                 }
246                                         }
247                                         return true;
248                                 }
249                         }
250                 }
251         }
252         unsigned int items =this->TreeRoot->ChildCount();
253         for (unsigned int x = 0; x < items; x++)
254         {
255                 TreeServer* Route = this->TreeRoot->GetChild(x);
256                 if ((Route) && (Route->GetSocket()) && (Route->GetName() != omit) && (omitroute != Route))
257                 {
258                         TreeSocket* Sock = Route->GetSocket();
259                         if (Sock)
260                                 Sock->WriteLine(data);
261                 }
262         }
263         return true;
264 }
265
266 bool SpanningTreeUtilities::DoOneToAllButSender(const std::string &prefix, const std::string &command, std::deque<std::string> &params, std::string omit)
267 {
268         TreeServer* omitroute = this->BestRouteTo(omit);
269         std::string FullLine = ":" + prefix + " " + command;
270         unsigned int words = params.size();
271         for (unsigned int x = 0; x < words; x++)
272         {
273                 FullLine = FullLine + " " + params[x];
274         }
275         unsigned int items = this->TreeRoot->ChildCount();
276         for (unsigned int x = 0; x < items; x++)
277         {
278                 TreeServer* Route = this->TreeRoot->GetChild(x);
279                 // Send the line IF:
280                 // The route has a socket (its a direct connection)
281                 // The route isnt the one to be omitted
282                 // The route isnt the path to the one to be omitted
283                 if ((Route) && (Route->GetSocket()) && (Route->GetName() != omit) && (omitroute != Route))
284                 {
285                         TreeSocket* Sock = Route->GetSocket();
286                         if (Sock)
287                                 Sock->WriteLine(FullLine);
288                 }
289         }
290         return true;
291 }
292
293 bool SpanningTreeUtilities::DoOneToMany(const std::string &prefix, const std::string &command, std::deque<std::string> &params)
294 {
295         std::string FullLine = ":" + prefix + " " + command;
296         unsigned int words = params.size();
297         for (unsigned int x = 0; x < words; x++)
298         {
299                 FullLine = FullLine + " " + params[x];
300         }
301         unsigned int items = this->TreeRoot->ChildCount();
302         for (unsigned int x = 0; x < items; x++)
303         {
304                 TreeServer* Route = this->TreeRoot->GetChild(x);
305                 if (Route && Route->GetSocket())
306                 {
307                         TreeSocket* Sock = Route->GetSocket();
308                         if (Sock)
309                                 Sock->WriteLine(FullLine);
310                 }
311         }
312         return true;
313 }
314
315 bool SpanningTreeUtilities::DoOneToMany(const char* prefix, const char* command, std::deque<std::string> &params)
316 {
317         std::string spfx = prefix;
318         std::string scmd = command;
319         return this->DoOneToMany(spfx, scmd, params);
320 }
321
322 bool SpanningTreeUtilities::DoOneToAllButSender(const char* prefix, const char* command, std::deque<std::string> &params, std::string omit)
323 {
324         std::string spfx = prefix;
325         std::string scmd = command;
326         return this->DoOneToAllButSender(spfx, scmd, params, omit);
327 }
328
329 bool SpanningTreeUtilities::DoOneToOne(const std::string &prefix, const std::string &command, std::deque<std::string> &params, std::string target)
330 {
331         TreeServer* Route = this->BestRouteTo(target);
332         if (Route)
333         {
334                 std::string FullLine = ":" + prefix + " " + command;
335                 unsigned int words = params.size();
336                 for (unsigned int x = 0; x < words; x++)
337                 {
338                         FullLine = FullLine + " " + params[x];
339                 }
340                 if (Route && Route->GetSocket())
341                 {
342                         TreeSocket* Sock = Route->GetSocket();
343                         if (Sock)
344                                 Sock->WriteLine(FullLine);
345                 }
346                 return true;
347         }
348         else
349         {
350                 return false;
351         }
352 }
353
354 void SpanningTreeUtilities::RefreshIPCache()
355 {
356         ValidIPs.clear();
357         for (std::vector<Link>::iterator L = LinkBlocks.begin(); L != LinkBlocks.end(); L++)
358         {
359                 if ((!L->IPAddr.empty()) && (!L->RecvPass.empty()) && (!L->SendPass.empty()) && (!L->Name.empty()) && (L->Port))
360                 {
361                         ValidIPs.push_back(L->IPAddr);
362
363                         if (L->AllowMask.length())
364                                 ValidIPs.push_back(L->AllowMask);
365
366                         /* Needs resolving */
367                         bool ipvalid = true;
368                         QueryType start_type = DNS_QUERY_A;
369 #ifdef IPV6
370                         start_type = DNS_QUERY_AAAA;
371                         if (strchr(L->IPAddr.c_str(),':'))
372                         {
373                                 in6_addr n;
374                                 if (inet_pton(AF_INET6, L->IPAddr.c_str(), &n) < 1)
375                                         ipvalid = false;
376                         }
377                         else
378 #endif
379                         {
380                                 in_addr n;
381                                 if (inet_aton(L->IPAddr.c_str(),&n) < 1)
382                                         ipvalid = false;
383                         }
384                         if (!ipvalid)
385                         {
386                                 try
387                                 {
388                                         bool cached;
389                                         SecurityIPResolver* sr = new SecurityIPResolver((Module*)this->Creator, this, ServerInstance, L->IPAddr, *L, cached, start_type);
390                                         ServerInstance->AddResolver(sr, cached);
391                                 }
392                                 catch (...)
393                                 {
394                                 }
395                         }
396                 }
397         }
398 }
399
400 void SpanningTreeUtilities::ReadConfiguration(bool rebind)
401 {
402         ConfigReader* Conf = new ConfigReader(ServerInstance);
403         if (rebind)
404         {
405                 for (unsigned int i = 0; i < Bindings.size(); i++)
406                 {
407                         ServerInstance->SE->DelFd(Bindings[i]);
408                         Bindings[i]->Close();
409                 }
410                 ServerInstance->BufferedSocketCull();
411                 Bindings.clear();
412
413                 for (int j = 0; j < Conf->Enumerate("bind"); j++)
414                 {
415                         std::string Type = Conf->ReadValue("bind","type",j);
416                         std::string IP = Conf->ReadValue("bind","address",j);
417                         std::string Port = Conf->ReadValue("bind","port",j);
418                         std::string transport = Conf->ReadValue("bind","transport",j);
419                         if (Type == "servers")
420                         {
421                                 irc::portparser portrange(Port, false);
422                                 int portno = -1;
423
424                                 if (IP == "*")
425                                         IP.clear();
426
427                                 while ((portno = portrange.GetToken()))
428                                 {
429                                         if ((!transport.empty()) && (hooks.find(transport.c_str()) ==  hooks.end()))
430                                         {
431                                                 throw CoreException("Can't find transport type '"+transport+"' for port "+IP+":"+Port+" - maybe you forgot to load it BEFORE m_spanningtree in your config file?");
432                                                 break;
433                                         }
434
435                                         TreeSocket* listener = new TreeSocket(this, ServerInstance, IP.c_str(), portno, true, 10, transport.empty() ? NULL : hooks[transport.c_str()]);
436                                         if (listener->GetState() == I_LISTENING)
437                                         {
438                                                 ServerInstance->Logs->Log("m_spanningtree",DEFAULT,"m_spanningtree: Binding server port %s:%d successful!", IP.c_str(), portno);
439                                                 Bindings.push_back(listener);
440                                         }
441                                         else
442                                         {
443                                                 ServerInstance->Logs->Log("m_spanningtree",DEFAULT,"m_spanningtree: Warning: Failed to bind server port: %s:%d: %s",IP.c_str(), portno, strerror(errno));
444                                                 listener->Close();
445                                         }
446                                 }
447                         }
448                 }
449         }
450         FlatLinks = Conf->ReadFlag("options","flatlinks",0);
451         HideULines = Conf->ReadFlag("options","hideulines",0);
452         AnnounceTSChange = Conf->ReadFlag("options","announcets",0);
453         ChallengeResponse = !Conf->ReadFlag("options", "disablehmac", 0);
454         quiet_bursts = Conf->ReadFlag("options", "quietbursts", 0);
455         PingWarnTime = Conf->ReadInteger("options", "pingwarning", 0, true);
456         PingFreq = Conf->ReadInteger("options", "serverpingfreq", 0, true);
457
458         if (PingFreq == 0)
459                 PingFreq = 60;
460
461         if (PingWarnTime < 0 || PingWarnTime > PingFreq - 1)
462                 PingWarnTime = 0;
463
464         LinkBlocks.clear();
465         ValidIPs.clear();
466         for (int j = 0; j < Conf->Enumerate("link"); j++)
467         {
468                 Link L;
469                 std::string Allow = Conf->ReadValue("link", "allowmask", j);
470                 L.Name = (Conf->ReadValue("link", "name", j)).c_str();
471                 L.AllowMask = Allow;
472                 L.IPAddr = Conf->ReadValue("link", "ipaddr", j);
473                 L.FailOver = Conf->ReadValue("link", "failover", j).c_str();
474                 L.Port = Conf->ReadInteger("link", "port", j, true);
475                 L.SendPass = Conf->ReadValue("link", "sendpass", j);
476                 L.RecvPass = Conf->ReadValue("link", "recvpass", j);
477                 L.AutoConnect = Conf->ReadInteger("link", "autoconnect", j, true);
478                 L.HiddenFromStats = Conf->ReadFlag("link", "statshidden", j);
479                 L.Timeout = Conf->ReadInteger("link", "timeout", j, true);
480                 L.Hook = Conf->ReadValue("link", "transport", j);
481                 L.Bind = Conf->ReadValue("link", "bind", j);
482                 L.Hidden = Conf->ReadFlag("link", "hidden", j);
483
484                 if ((!L.Hook.empty()) && (hooks.find(L.Hook.c_str()) ==  hooks.end()))
485                 {
486                         throw CoreException("Can't find transport type '"+L.Hook+"' for link '"+assign(L.Name)+"' - maybe you forgot to load it BEFORE m_spanningtree in your config file? Skipping <link> tag completely.");
487                         continue;
488
489                 }
490
491                 L.NextConnectTime = time(NULL) + L.AutoConnect;
492                 /* Bugfix by brain, do not allow people to enter bad configurations */
493                 if (L.Name != ServerInstance->Config->ServerName)
494                 {
495                         if ((!L.IPAddr.empty()) && (!L.RecvPass.empty()) && (!L.SendPass.empty()) && (!L.Name.empty()) && (L.Port))
496                         {
497                                 if (L.Name.find('.') == std::string::npos)
498                                         throw CoreException("The link name '"+assign(L.Name)+"' is invalid and must contain at least one '.' character");
499
500                                 if (L.Name.length() > 64)
501                                         throw CoreException("The link name '"+assign(L.Name)+"' is longer than 64 characters!");
502
503                                 ValidIPs.push_back(L.IPAddr);
504
505                                 if (Allow.length())
506                                         ValidIPs.push_back(Allow);
507
508                                 /* Needs resolving */
509                                 bool ipvalid = true;
510                                 QueryType start_type = DNS_QUERY_A;
511 #ifdef IPV6
512                                 start_type = DNS_QUERY_AAAA;
513                                 if (strchr(L.IPAddr.c_str(),':'))
514                                 {
515                                         in6_addr n;
516                                         if (inet_pton(AF_INET6, L.IPAddr.c_str(), &n) < 1)
517                                                 ipvalid = false;
518                                 }
519                                 else
520                                 {
521                                         in_addr n;
522                                         if (inet_aton(L.IPAddr.c_str(),&n) < 1)
523                                                 ipvalid = false;
524                                 }
525 #else
526                                 in_addr n;
527                                 if (inet_aton(L.IPAddr.c_str(),&n) < 1)
528                                         ipvalid = false;
529 #endif
530
531                                 if (!ipvalid)
532                                 {
533                                         try
534                                         {
535                                                 bool cached;
536                                                 SecurityIPResolver* sr = new SecurityIPResolver((Module*)this->Creator, this, ServerInstance, L.IPAddr, L, cached, start_type);
537                                                 ServerInstance->AddResolver(sr, cached);
538                                         }
539                                         catch (...)
540                                         {
541                                         }
542                                 }
543
544                                 LinkBlocks.push_back(L);
545                         }
546                         else
547                         {
548                                 if (L.IPAddr.empty())
549                                 {
550                                         throw CoreException("Invalid configuration for server '"+assign(L.Name)+"', IP address not defined!");
551                                 }
552                                 else if (L.RecvPass.empty())
553                                 {
554                                         throw CoreException("Invalid configuration for server '"+assign(L.Name)+"', recvpass not defined!");
555                                 }
556                                 else if (L.SendPass.empty())
557                                 {
558                                         throw CoreException("Invalid configuration for server '"+assign(L.Name)+"', sendpass not defined!");
559                                 }
560                                 else if (L.Name.empty())
561                                 {
562                                         throw CoreException("Invalid configuration, link tag without a name! IP address: "+L.IPAddr);
563                                 }
564                                 else if (!L.Port)
565                                 {
566                                         throw CoreException("Invalid configuration for server '"+assign(L.Name)+"', no port specified!");
567                                 }
568                         }
569                 }
570                 else
571                 {
572                         throw CoreException("Invalid configuration for server '"+assign(L.Name)+"', link tag has the same server name as the local server!");
573                 }
574         }
575         delete Conf;
576 }
577
578 void SpanningTreeUtilities::DoFailOver(Link* x)
579 {
580         if (x->FailOver.length())
581         {
582                 if (x->FailOver == x->Name)
583                 {
584                         Creator->RemoteMessage(NULL,"FAILOVER: Some muppet configured the failover for server \002%s\002 to point at itself. Not following it!", x->Name.c_str());
585                         return;
586                 }
587                 Link* TryThisOne = this->FindLink(x->FailOver.c_str());
588                 if (TryThisOne)
589                 {
590                         TreeServer* CheckDupe = this->FindServer(x->FailOver.c_str());
591                         if (CheckDupe)
592                         {
593                                 ServerInstance->Logs->Log("m_spanningtree",DEBUG,"Skipping existing failover: %s", x->FailOver.c_str());
594                         }
595                         else
596                         {
597                                 Creator->RemoteMessage(NULL,"FAILOVER: Trying failover link for \002%s\002: \002%s\002...", x->Name.c_str(), TryThisOne->Name.c_str());
598                                 Creator->ConnectServer(TryThisOne);
599                         }
600                 }
601                 else
602                 {
603                         Creator->RemoteMessage(NULL,"FAILOVER: Invalid failover server specified for server \002%s\002, will not follow!", x->Name.c_str());
604                 }
605         }
606 }
607
608 Link* SpanningTreeUtilities::FindLink(const std::string& name)
609 {
610         for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
611         {
612                 if (ServerInstance->MatchText(x->Name.c_str(), name.c_str()))
613                 {
614                         return &(*x);
615                 }
616         }
617         return NULL;
618 }