1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
7 * <brain@chatspike.net>
8 * <Craig@chatspike.net>
10 * Written by Craig Edwards, Craig McLure, and others.
11 * This program is free but copyrighted software; see
12 * the file COPYING for details.
14 * ---------------------------------------------------
17 /* $ModDesc: Povides a spanning tree server link protocol */
25 #include "inspircd_config.h"
27 #include <ext/hash_map>
36 #include "helperfuncs.h"
38 #include "inspstring.h"
43 #include "cull_list.h"
47 #define nspace __gnu_cxx
53 * The server list in InspIRCd is maintained as two structures
54 * which hold the data in different ways. Most of the time, we
55 * want to very quicky obtain three pieces of information:
57 * (1) The information on a server
58 * (2) The information on the server we must send data through
59 * to actually REACH the server we're after
60 * (3) Potentially, the child/parent objects of this server
62 * The InspIRCd spanning protocol provides easy access to these
63 * by storing the data firstly in a recursive structure, where
64 * each item references its parent item, and a dynamic list
65 * of child items, and another structure which stores the items
66 * hashed, linearly. This means that if we want to find a server
67 * by name quickly, we can look it up in the hash, avoiding
68 * any O(n) lookups. If however, during a split or sync, we want
69 * to apply an operation to a server, and any of its child objects
70 * we can resort to recursion to walk the tree structure.
73 class ModuleSpanningTree;
74 static ModuleSpanningTree* TreeProtocolModule;
76 extern ServerConfig* Config;
78 extern std::vector<Module*> modules;
79 extern std::vector<ircd_module*> factory;
82 /* Any socket can have one of five states at any one time.
83 * The LISTENER state indicates a socket which is listening
84 * for connections. It cannot receive data itself, only incoming
86 * The CONNECTING state indicates an outbound socket which is
87 * waiting to be writeable.
88 * The WAIT_AUTH_1 state indicates the socket is outbound and
89 * has successfully connected, but has not yet sent and received
91 * The WAIT_AUTH_2 state indicates that the socket is inbound
92 * (allocated by a LISTENER) but has not yet sent and received
94 * The CONNECTED state represents a fully authorized, fully
97 enum ServerState { LISTENER, CONNECTING, WAIT_AUTH_1, WAIT_AUTH_2, CONNECTED };
99 /* We need to import these from the core for use in netbursts */
100 extern user_hash clientlist;
101 extern chan_hash chanlist;
103 /* Foward declarations */
107 /* This variable represents the root of the server tree
108 * (for all intents and purposes, it's us)
110 TreeServer *TreeRoot;
114 /* This hash_map holds the hash equivalent of the server
115 * tree, used for rapid linear lookups.
117 typedef nspace::hash_map<std::string, TreeServer*> server_hash;
118 server_hash serverlist;
120 /* More forward declarations */
121 bool DoOneToOne(std::string prefix, std::string command, std::deque<std::string> ¶ms, std::string target);
122 bool DoOneToAllButSender(std::string prefix, std::string command, std::deque<std::string> ¶ms, std::string omit);
123 bool DoOneToMany(std::string prefix, std::string command, std::deque<std::string> ¶ms);
124 bool DoOneToAllButSenderRaw(std::string data, std::string omit, std::string prefix, std::string command, std::deque<std::string> ¶ms);
125 void ReadConfiguration(bool rebind);
127 /* Flatten links and /MAP for non-opers */
129 /* Hide U-Lined servers in /MAP and /LINKS */
132 /* Imported from xline.cpp for use during netburst */
133 extern std::vector<KLine> klines;
134 extern std::vector<GLine> glines;
135 extern std::vector<ZLine> zlines;
136 extern std::vector<QLine> qlines;
137 extern std::vector<ELine> elines;
138 extern std::vector<KLine> pklines;
139 extern std::vector<GLine> pglines;
140 extern std::vector<ZLine> pzlines;
141 extern std::vector<QLine> pqlines;
142 extern std::vector<ELine> pelines;
144 /* Each server in the tree is represented by one class of
145 * type TreeServer. A locally connected TreeServer can
146 * have a class of type TreeSocket associated with it, for
147 * remote servers, the TreeSocket entry will be NULL.
148 * Each server also maintains a pointer to its parent
149 * (NULL if this server is ours, at the top of the tree)
150 * and a pointer to its "Route" (see the comments in the
151 * constructors below), and also a dynamic list of pointers
152 * to its children which can be iterated recursively
153 * if required. Creating or deleting objects of type
154 * TreeServer automatically maintains the hash_map of
155 * TreeServer items, deleting and inserting them as they
156 * are created and destroyed.
161 TreeServer* Parent; /* Parent entry */
162 TreeServer* Route; /* Route entry */
163 std::vector<TreeServer*> Children; /* List of child objects */
164 std::string ServerName; /* Server's name */
165 std::string ServerDesc; /* Server's description */
166 std::string VersionString; /* Version string or empty string */
167 int UserCount; /* Not used in this version */
168 int OperCount; /* Not used in this version */
169 TreeSocket* Socket; /* For directly connected servers this points at the socket object */
170 time_t NextPing; /* After this time, the server should be PINGed*/
171 bool LastPingWasGood; /* True if the server responded to the last PING with a PONG */
175 /* We don't use this constructor. Its a dummy, and won't cause any insertion
176 * of the TreeServer into the hash_map. See below for the two we DO use.
184 UserCount = OperCount = 0;
185 VersionString = Srv->GetVersion();
188 /* We use this constructor only to create the 'root' item, TreeRoot, which
189 * represents our own server. Therefore, it has no route, no parent, and
190 * no socket associated with it. Its version string is our own local version.
192 TreeServer(std::string Name, std::string Desc) : ServerName(Name), ServerDesc(Desc)
196 UserCount = OperCount = 0;
197 VersionString = Srv->GetVersion();
199 Socket = NULL; /* Fix by brain */
203 /* When we create a new server, we call this constructor to initialize it.
204 * This constructor initializes the server's Route and Parent, and sets up
205 * its ping counters so that it will be pinged one minute from now.
207 TreeServer(std::string Name, std::string Desc, TreeServer* Above, TreeSocket* Sock) : Parent(Above), ServerName(Name), ServerDesc(Desc), Socket(Sock)
210 UserCount = OperCount = 0;
211 this->SetNextPingTime(time(NULL) + 120);
214 /* find the 'route' for this server (e.g. the one directly connected
215 * to the local server, which we can use to reach it)
217 * In the following example, consider we have just added a TreeServer
218 * class for server G on our network, of which we are server A.
219 * To route traffic to G (marked with a *) we must send the data to
220 * B (marked with a +) so this algorithm initializes the 'Route'
221 * value to point at whichever server traffic must be routed through
222 * to get here. If we were to try this algorithm with server B,
223 * the Route pointer would point at its own object ('this').
233 * We only run this algorithm when a server is created, as
234 * the routes remain constant while ever the server exists, and
235 * do not need to be re-calculated.
239 if (Route == TreeRoot)
245 while (this->Route->GetParent() != TreeRoot)
247 this->Route = Route->GetParent();
251 /* Because recursive code is slow and takes a lot of resources,
252 * we store two representations of the server tree. The first
253 * is a recursive structure where each server references its
254 * children and its parent, which is used for netbursts and
255 * netsplits to dump the whole dataset to the other server,
256 * and the second is used for very fast lookups when routing
257 * messages and is instead a hash_map, where each item can
258 * be referenced by its server name. The AddHashEntry()
259 * call below automatically inserts each TreeServer class
260 * into the hash_map as it is created. There is a similar
261 * maintainance call in the destructor to tidy up deleted
265 this->AddHashEntry();
268 /* This method is used to add the structure to the
269 * hash_map for linear searches. It is only called
270 * by the constructors.
274 server_hash::iterator iter;
275 iter = serverlist.find(this->ServerName);
276 if (iter == serverlist.end())
277 serverlist[this->ServerName] = this;
280 /* This method removes the reference to this object
281 * from the hash_map which is used for linear searches.
282 * It is only called by the default destructor.
286 server_hash::iterator iter;
287 iter = serverlist.find(this->ServerName);
288 if (iter != serverlist.end())
289 serverlist.erase(iter);
292 /* These accessors etc should be pretty self-
296 TreeServer* GetRoute()
301 std::string GetName()
306 std::string GetDesc()
311 std::string GetVersion()
313 return VersionString;
316 void SetNextPingTime(time_t t)
319 LastPingWasGood = false;
322 time_t NextPingTime()
327 bool AnsweredLastPing()
329 return LastPingWasGood;
334 LastPingWasGood = true;
357 TreeSocket* GetSocket()
362 TreeServer* GetParent()
367 void SetVersion(std::string Version)
369 VersionString = Version;
372 unsigned int ChildCount()
374 return Children.size();
377 TreeServer* GetChild(unsigned int n)
379 if (n < Children.size())
381 /* Make sure they cant request
382 * an out-of-range object. After
383 * all we know what these programmer
384 * types are like *grin*.
394 void AddChild(TreeServer* Child)
396 Children.push_back(Child);
399 bool DelChild(TreeServer* Child)
401 for (std::vector<TreeServer*>::iterator a = Children.begin(); a < Children.end(); a++)
412 /* Removes child nodes of this node, and of that node, etc etc.
413 * This is used during netsplits to automatically tidy up the
414 * server tree. It is slow, we don't use it for much else.
418 bool stillchildren = true;
419 while (stillchildren)
421 stillchildren = false;
422 for (std::vector<TreeServer*>::iterator a = Children.begin(); a < Children.end(); a++)
424 TreeServer* s = (TreeServer*)*a;
428 stillchildren = true;
437 /* We'd better tidy up after ourselves, eh? */
438 this->DelHashEntry();
442 /* The Link class might as well be a struct,
443 * but this is C++ and we don't believe in structs (!).
444 * It holds the entire information of one <link>
445 * tag from the main config file. We maintain a list
446 * of them, and populate the list on rehash/load.
455 std::string SendPass;
456 std::string RecvPass;
457 unsigned long AutoConnect;
458 time_t NextConnectTime;
459 std::string EncryptionKey;
460 bool HiddenFromStats;
463 /* The usual stuff for inspircd modules,
464 * plus the vector of Link classes which we
465 * use to store the <link> tags from the config
469 std::vector<Link> LinkBlocks;
471 /* Yay for fast searches!
472 * This is hundreds of times faster than recursion
473 * or even scanning a linked list, especially when
474 * there are more than a few servers to deal with.
477 TreeServer* FindServer(std::string ServerName)
479 server_hash::iterator iter;
480 iter = serverlist.find(ServerName);
481 if (iter != serverlist.end())
491 /* Returns the locally connected server we must route a
492 * message through to reach server 'ServerName'. This
493 * only applies to one-to-one and not one-to-many routing.
494 * See the comments for the constructor of TreeServer
497 TreeServer* BestRouteTo(std::string ServerName)
499 if (ServerName.c_str() == TreeRoot->GetName())
501 TreeServer* Found = FindServer(ServerName);
504 return Found->GetRoute();
512 /* Find the first server matching a given glob mask.
513 * Theres no find-using-glob method of hash_map [awwww :-(]
514 * so instead, we iterate over the list using an iterator
515 * and match each one until we get a hit. Yes its slow,
518 TreeServer* FindServerMask(std::string ServerName)
520 for (server_hash::iterator i = serverlist.begin(); i != serverlist.end(); i++)
522 if (Srv->MatchText(i->first,ServerName))
528 /* A convenient wrapper that returns true if a server exists */
529 bool IsServer(std::string ServerName)
531 return (FindServer(ServerName) != NULL);
535 class cmd_rconnect : public command_t
539 cmd_rconnect (Module* Callback) : command_t("RCONNECT", 'o', 2), Creator(Callback)
541 this->source = "m_spanningtree.so";
544 void Handle (char **parameters, int pcnt, userrec *user)
546 /* Is this aimed at our server? */
547 if (Srv->MatchText(Srv->GetServerName(),parameters[0]))
549 /* Yes, initiate the given connect */
551 para[0] = parameters[1];
552 Creator->OnPreCommand("CONNECT", para, 1, user, true);
559 /* Every SERVER connection inbound or outbound is represented by
560 * an object of type TreeSocket.
561 * TreeSockets, being inherited from InspSocket, can be tied into
562 * the core socket engine, and we cn therefore receive activity events
563 * for them, just like activex objects on speed. (yes really, that
564 * is a technical term!) Each of these which relates to a locally
565 * connected server is assocated with it, by hooking it onto a
566 * TreeSocket class using its constructor. In this way, we can
567 * maintain a list of servers, some of which are directly connected,
568 * some of which are not.
571 class TreeSocket : public InspSocket
574 std::string in_buffer;
575 ServerState LinkState;
576 std::string InboundServerName;
577 std::string InboundDescription;
579 int num_lost_servers;
581 bool LastPingWasGood;
585 unsigned int keylength;
589 /* Because most of the I/O gubbins are encapsulated within
590 * InspSocket, we just call the superclass constructor for
591 * most of the action, and append a few of our own values
594 TreeSocket(std::string host, int port, bool listening, unsigned long maxtime)
595 : InspSocket(host, port, listening, maxtime)
598 this->LinkState = LISTENER;
600 this->ctx_out = NULL;
603 TreeSocket(std::string host, int port, bool listening, unsigned long maxtime, std::string ServerName)
604 : InspSocket(host, port, listening, maxtime)
607 this->LinkState = CONNECTING;
609 this->ctx_out = NULL;
612 /* When a listening socket gives us a new file descriptor,
613 * we must associate it with a socket without creating a new
614 * connection. This constructor is used for this purpose.
616 TreeSocket(int newfd, char* ip)
617 : InspSocket(newfd, ip)
619 this->LinkState = WAIT_AUTH_1;
621 this->ctx_out = NULL;
622 this->SendCapabilities();
633 void InitAES(std::string key,std::string SName)
640 log(DEBUG,"Initialized AES key %s",key.c_str());
641 // key must be 16, 24, 32 etc bytes (multiple of 8)
642 keylength = key.length();
643 if (!(keylength == 16 || keylength == 24 || keylength == 32))
645 WriteOpers("*** \2ERROR\2: Key length for encryptionkey is not 16, 24 or 32 bytes in length!");
646 log(DEBUG,"Key length not 16, 24 or 32 characters!");
650 WriteOpers("*** \2AES\2: Initialized %d bit encryption to server %s",keylength*8,SName.c_str());
651 ctx_in->MakeKey(key.c_str(), "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\
652 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0", keylength, keylength);
653 ctx_out->MakeKey(key.c_str(), "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\
654 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0", keylength, keylength);
658 /* When an outbound connection finishes connecting, we receive
659 * this event, and must send our SERVER string to the other
660 * side. If the other side is happy, as outlined in the server
661 * to server docs on the inspircd.org site, the other side
662 * will then send back its own server string.
664 virtual bool OnConnected()
666 if (this->LinkState == CONNECTING)
668 /* we do not need to change state here. */
669 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
671 if (x->Name == this->myhost)
673 Srv->SendOpers("*** Connection to \2"+myhost+"\2["+(x->HiddenFromStats ? "<hidden>" : this->GetIP())+"] established.");
674 this->SendCapabilities();
675 if (x->EncryptionKey != "")
677 if (!(x->EncryptionKey.length() == 16 || x->EncryptionKey.length() == 24 || x->EncryptionKey.length() == 32))
679 WriteOpers("\2WARNING\2: Your encryption key is NOT 16, 24 or 32 characters in length, encryption will \2NOT\2 be enabled.");
683 this->WriteLine("AES "+Srv->GetServerName());
684 this->InitAES(x->EncryptionKey,x->Name);
687 /* found who we're supposed to be connecting to, send the neccessary gubbins. */
688 this->WriteLine("SERVER "+Srv->GetServerName()+" "+x->SendPass+" 0 :"+Srv->GetServerDescription());
693 /* There is a (remote) chance that between the /CONNECT and the connection
694 * being accepted, some muppet has removed the <link> block and rehashed.
695 * If that happens the connection hangs here until it's closed. Unlikely
696 * and rather harmless.
698 Srv->SendOpers("*** Connection to \2"+myhost+"\2 lost link tag(!)");
702 virtual void OnError(InspSocketError e)
704 /* We don't handle this method, because all our
705 * dirty work is done in OnClose() (see below)
706 * which is still called on error conditions too.
710 virtual int OnDisconnect()
712 /* For the same reason as above, we don't
713 * handle OnDisconnect()
718 /* Recursively send the server tree with distances as hops.
719 * This is used during network burst to inform the other server
720 * (and any of ITS servers too) of what servers we know about.
721 * If at any point any of these servers already exist on the other
722 * end, our connection may be terminated. The hopcounts given
723 * by this function are relative, this doesn't matter so long as
724 * they are all >1, as all the remote servers re-calculate them
725 * to be relative too, with themselves as hop 0.
727 void SendServers(TreeServer* Current, TreeServer* s, int hops)
730 for (unsigned int q = 0; q < Current->ChildCount(); q++)
732 TreeServer* recursive_server = Current->GetChild(q);
733 if (recursive_server != s)
735 snprintf(command,1024,":%s SERVER %s * %d :%s",Current->GetName().c_str(),recursive_server->GetName().c_str(),hops,recursive_server->GetDesc().c_str());
736 this->WriteLine(command);
737 this->WriteLine(":"+recursive_server->GetName()+" VERSION :"+recursive_server->GetVersion());
738 /* down to next level */
739 this->SendServers(recursive_server, s, hops+1);
744 std::string MyCapabilities()
746 ServerConfig* Config = Srv->GetConfig();
747 std::vector<std::string> modlist;
748 std::string capabilities = "";
750 for (int i = 0; i <= MODCOUNT; i++)
752 if ((modules[i]->GetVersion().Flags & VF_STATIC) || (modules[i]->GetVersion().Flags & VF_COMMON))
753 modlist.push_back(Config->module_names[i]);
755 sort(modlist.begin(),modlist.end());
756 for (unsigned int i = 0; i < modlist.size(); i++)
759 capabilities = capabilities + ",";
760 capabilities = capabilities + modlist[i];
765 void SendCapabilities()
767 this->WriteLine("CAPAB "+MyCapabilities());
770 bool Capab(std::deque<std::string> params)
772 if (params.size() != 1)
774 this->WriteLine("ERROR :Invalid number of parameters for CAPAB");
777 if (params[0] != this->MyCapabilities())
779 std::string quitserver = this->myhost;
780 if (this->InboundServerName != "")
782 quitserver = this->InboundServerName;
784 WriteOpers("*** \2ERROR\2: Server '%s' does not have the same set of modules loaded, cannot link!",quitserver.c_str());
785 WriteOpers("*** Our networked module set is: '%s'",this->MyCapabilities().c_str());
786 WriteOpers("*** Other server's networked module set is: '%s'",params[0].c_str());
787 WriteOpers("*** These lists must match exactly on both servers. Please correct these errors, and try again.");
788 this->WriteLine("ERROR :CAPAB mismatch; My capabilities: '"+this->MyCapabilities()+"'");
794 /* This function forces this server to quit, removing this server
795 * and any users on it (and servers and users below that, etc etc).
796 * It's very slow and pretty clunky, but luckily unless your network
797 * is having a REAL bad hair day, this function shouldnt be called
798 * too many times a month ;-)
800 void SquitServer(TreeServer* Current, CullList* Goners)
802 /* recursively squit the servers attached to 'Current'.
803 * We're going backwards so we don't remove users
804 * while we still need them ;)
806 for (unsigned int q = 0; q < Current->ChildCount(); q++)
808 TreeServer* recursive_server = Current->GetChild(q);
809 this->SquitServer(recursive_server,Goners);
811 /* Now we've whacked the kids, whack self */
813 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
815 if (!strcasecmp(u->second->server,Current->GetName().c_str()))
817 std::string qreason = Current->GetName()+" "+std::string(Srv->GetServerName());
818 Goners->AddItem(u->second,qreason);
824 /* This is a wrapper function for SquitServer above, which
825 * does some validation first and passes on the SQUIT to all
826 * other remaining servers.
828 void Squit(TreeServer* Current,std::string reason)
830 if ((Current) && (Current != TreeRoot))
832 std::deque<std::string> params;
833 params.push_back(Current->GetName());
834 params.push_back(":"+reason);
835 DoOneToAllButSender(Current->GetParent()->GetName(),"SQUIT",params,Current->GetName());
836 if (Current->GetParent() == TreeRoot)
838 Srv->SendOpers("Server \002"+Current->GetName()+"\002 split: "+reason);
842 Srv->SendOpers("Server \002"+Current->GetName()+"\002 split from server \002"+Current->GetParent()->GetName()+"\002 with reason: "+reason);
844 num_lost_servers = 0;
846 CullList* Goners = new CullList();
847 SquitServer(Current, Goners);
850 Current->GetParent()->DelChild(Current);
853 WriteOpers("Netsplit complete, lost \002%d\002 users on \002%d\002 servers.", num_lost_users, num_lost_servers);
857 log(DEFAULT,"Squit from unknown server");
862 bool ForceMode(std::string source, std::deque<std::string> params)
864 userrec* who = new userrec;
865 who->fd = FD_MAGIC_NUMBER;
866 if (params.size() < 2)
869 for (unsigned int q = 0; q < params.size(); q++)
871 modelist[q] = (char*)params[q].c_str();
873 Srv->SendMode(modelist,params.size(),who);
874 DoOneToAllButSender(source,"FMODE",params,source);
880 bool ForceTopic(std::string source, std::deque<std::string> params)
882 if (params.size() != 4)
884 std::string channel = params[0];
885 time_t ts = atoi(params[1].c_str());
886 std::string setby = params[2];
887 std::string topic = params[3];
888 std::string nsource = source;
890 chanrec* c = Srv->FindChannel(channel);
893 if ((ts >= c->topicset) || (!*c->topic))
895 std::string oldtopic = c->topic;
896 strlcpy(c->topic,topic.c_str(),MAXTOPIC);
897 strlcpy(c->setby,setby.c_str(),NICKMAX);
899 /* if the topic text is the same as the current topic,
900 * dont bother to send the TOPIC command out, just silently
901 * update the set time and set nick.
903 if (oldtopic != topic)
905 userrec* user = Srv->FindNick(source);
908 WriteChannelWithServ((char*)source.c_str(), c, "TOPIC %s :%s", c->name, c->topic);
912 WriteChannel(c, user, "TOPIC %s :%s", c->name, c->topic);
913 nsource = user->server;
920 /* all done, send it on its way */
921 params[3] = ":" + params[3];
922 DoOneToAllButSender(source,"FTOPIC",params,nsource);
927 /* FJOIN, similar to unreal SJOIN */
928 bool ForceJoin(std::string source, std::deque<std::string> params)
930 if (params.size() < 3)
934 char modestring[MAXBUF];
935 char* mode_users[127];
936 mode_users[0] = first;
937 mode_users[1] = modestring;
938 strcpy(mode_users[1],"+");
939 unsigned int modectr = 2;
942 std::string channel = params[0];
943 time_t TS = atoi(params[1].c_str());
946 chanrec* chan = Srv->FindChannel(channel);
951 strlcpy(mode_users[0],channel.c_str(),MAXBUF);
953 /* default is a high value, which if we dont have this
954 * channel will let the other side apply their modes.
956 time_t ourTS = time(NULL)+600;
957 chanrec* us = Srv->FindChannel(channel);
963 log(DEBUG,"FJOIN detected, our TS=%lu, their TS=%lu",ourTS,TS);
965 /* do this first, so our mode reversals are correctly received by other servers
966 * if there is a TS collision.
968 DoOneToAllButSender(source,"FJOIN",params,source);
970 for (unsigned int usernum = 2; usernum < params.size(); usernum++)
972 /* process one channel at a time, applying modes. */
973 char* usr = (char*)params[usernum].c_str();
974 /* Safety check just to make sure someones not sent us an FJOIN full of spaces
975 * (is this even possible?) */
978 char permissions = *usr;
983 mode_users[modectr++] = usr;
984 strlcat(modestring,"o",MAXBUF);
988 mode_users[modectr++] = usr;
989 strlcat(modestring,"h",MAXBUF);
993 mode_users[modectr++] = usr;
994 strlcat(modestring,"v",MAXBUF);
997 who = Srv->FindNick(usr);
1000 Srv->JoinUserToChannel(who,channel,key);
1001 if (modectr >= (MAXMODES-1))
1003 /* theres a mode for this user. push them onto the mode queue, and flush it
1004 * if there are more than MAXMODES to go.
1006 if ((ourTS >= TS) || (Srv->IsUlined(who->server)))
1008 /* We also always let u-lined clients win, no matter what the TS value */
1009 log(DEBUG,"Our our channel newer than theirs, accepting their modes");
1010 Srv->SendMode(mode_users,modectr,who);
1014 log(DEBUG,"Their channel newer than ours, bouncing their modes");
1015 /* bouncy bouncy! */
1016 std::deque<std::string> params;
1017 /* modes are now being UNSET... */
1018 *mode_users[1] = '-';
1019 for (unsigned int x = 0; x < modectr; x++)
1021 params.push_back(mode_users[x]);
1023 // tell everyone to bounce the modes. bad modes, bad!
1024 DoOneToMany(Srv->GetServerName(),"FMODE",params);
1026 strcpy(mode_users[1],"+");
1032 /* there werent enough modes built up to flush it during FJOIN,
1033 * or, there are a number left over. flush them out.
1035 if ((modectr > 2) && (who))
1039 log(DEBUG,"Our our channel newer than theirs, accepting their modes");
1040 Srv->SendMode(mode_users,modectr,who);
1044 log(DEBUG,"Their channel newer than ours, bouncing their modes");
1045 std::deque<std::string> params;
1046 *mode_users[1] = '-';
1047 for (unsigned int x = 0; x < modectr; x++)
1049 params.push_back(mode_users[x]);
1051 DoOneToMany(Srv->GetServerName(),"FMODE",params);
1058 bool IntroduceClient(std::string source, std::deque<std::string> params)
1060 if (params.size() < 8)
1062 // NICK age nick host dhost ident +modes ip :gecos
1064 std::string nick = params[1];
1065 std::string host = params[2];
1066 std::string dhost = params[3];
1067 std::string ident = params[4];
1068 time_t age = atoi(params[0].c_str());
1069 std::string modes = params[5];
1070 while (*(modes.c_str()) == '+')
1072 char* m = (char*)modes.c_str();
1076 std::string ip = params[6];
1077 std::string gecos = params[7];
1078 char* tempnick = (char*)nick.c_str();
1079 log(DEBUG,"Introduce client %s!%s@%s",tempnick,ident.c_str(),host.c_str());
1081 user_hash::iterator iter;
1082 iter = clientlist.find(tempnick);
1083 if (iter != clientlist.end())
1086 log(DEBUG,"Nick collision on %s!%s@%s: %lu %lu",tempnick,ident.c_str(),host.c_str(),(unsigned long)age,(unsigned long)iter->second->age);
1087 this->WriteLine(":"+Srv->GetServerName()+" KILL "+tempnick+" :Nickname collision");
1091 clientlist[tempnick] = new userrec();
1092 clientlist[tempnick]->fd = FD_MAGIC_NUMBER;
1093 strlcpy(clientlist[tempnick]->nick, tempnick,NICKMAX);
1094 strlcpy(clientlist[tempnick]->host, host.c_str(),160);
1095 strlcpy(clientlist[tempnick]->dhost, dhost.c_str(),160);
1096 clientlist[tempnick]->server = (char*)FindServerNamePtr(source.c_str());
1097 strlcpy(clientlist[tempnick]->ident, ident.c_str(),IDENTMAX);
1098 strlcpy(clientlist[tempnick]->fullname, gecos.c_str(),MAXGECOS);
1099 clientlist[tempnick]->registered = 7;
1100 clientlist[tempnick]->signon = age;
1101 strlcpy(clientlist[tempnick]->modes, modes.c_str(),53);
1102 inet_aton(ip.c_str(),&clientlist[tempnick]->ip4);
1107 for (int i = 0; i < MAXCHANS; i++)
1108 clientlist[tempnick]->chans.push_back(a);
1110 if (!this->bursting)
1112 WriteOpers("*** Client connecting at %s: %s!%s@%s [%s]",clientlist[tempnick]->server,clientlist[tempnick]->nick,clientlist[tempnick]->ident,clientlist[tempnick]->host,(char*)inet_ntoa(clientlist[tempnick]->ip4));
1114 params[7] = ":" + params[7];
1115 DoOneToAllButSender(source,"NICK",params,source);
1117 // Increment the Source Servers User Count..
1118 TreeServer* SourceServer = FindServer(source);
1120 SourceServer->AddUserCount();
1126 /* Send one or more FJOINs for a channel of users.
1127 * If the length of a single line is more than 480-NICKMAX
1128 * in length, it is split over multiple lines.
1130 void SendFJoins(TreeServer* Current, chanrec* c)
1132 log(DEBUG,"Sending FJOINs to other server for %s",c->name);
1134 snprintf(list,MAXBUF,":%s FJOIN %s %lu",Srv->GetServerName().c_str(),c->name,(unsigned long)c->age);
1135 std::map<char*,char*> *ulist = c->GetUsers();
1136 for (std::map<char*,char*>::iterator i = ulist->begin(); i != ulist->end(); i++)
1138 char* o = i->second;
1139 userrec* otheruser = (userrec*)o;
1140 strlcat(list," ",MAXBUF);
1141 strlcat(list,cmode(otheruser,c),MAXBUF);
1142 strlcat(list,otheruser->nick,MAXBUF);
1143 if (strlen(list)>(480-NICKMAX))
1145 log(DEBUG,"FJOIN line wrapped");
1146 this->WriteLine(list);
1147 snprintf(list,MAXBUF,":%s FJOIN %s %lu",Srv->GetServerName().c_str(),c->name,(unsigned long)c->age);
1150 if (list[strlen(list)-1] != ':')
1152 log(DEBUG,"Final FJOIN line");
1153 this->WriteLine(list);
1157 /* Send G, Q, Z and E lines */
1158 void SendXLines(TreeServer* Current)
1161 /* Yes, these arent too nice looking, but they get the job done */
1162 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
1164 snprintf(data,MAXBUF,":%s ADDLINE Z %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->ipaddr,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1165 this->WriteLine(data);
1167 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
1169 snprintf(data,MAXBUF,":%s ADDLINE Q %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->nick,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1170 this->WriteLine(data);
1172 for (std::vector<GLine>::iterator i = glines.begin(); i != glines.end(); i++)
1174 snprintf(data,MAXBUF,":%s ADDLINE G %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->hostmask,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1175 this->WriteLine(data);
1177 for (std::vector<ELine>::iterator i = elines.begin(); i != elines.end(); i++)
1179 snprintf(data,MAXBUF,":%s ADDLINE E %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->hostmask,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1180 this->WriteLine(data);
1182 for (std::vector<ZLine>::iterator i = pzlines.begin(); i != pzlines.end(); i++)
1184 snprintf(data,MAXBUF,":%s ADDLINE Z %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->ipaddr,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1185 this->WriteLine(data);
1187 for (std::vector<QLine>::iterator i = pqlines.begin(); i != pqlines.end(); i++)
1189 snprintf(data,MAXBUF,":%s ADDLINE Q %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->nick,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1190 this->WriteLine(data);
1192 for (std::vector<GLine>::iterator i = pglines.begin(); i != pglines.end(); i++)
1194 snprintf(data,MAXBUF,":%s ADDLINE G %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->hostmask,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1195 this->WriteLine(data);
1197 for (std::vector<ELine>::iterator i = pelines.begin(); i != pelines.end(); i++)
1199 snprintf(data,MAXBUF,":%s ADDLINE E %s %s %lu %lu :%s",Srv->GetServerName().c_str(),i->hostmask,i->source,(unsigned long)i->set_time,(unsigned long)i->duration,i->reason);
1200 this->WriteLine(data);
1204 /* Send channel modes and topics */
1205 void SendChannelModes(TreeServer* Current)
1208 std::deque<std::string> list;
1209 for (chan_hash::iterator c = chanlist.begin(); c != chanlist.end(); c++)
1211 SendFJoins(Current, c->second);
1212 snprintf(data,MAXBUF,":%s FMODE %s +%s",Srv->GetServerName().c_str(),c->second->name,chanmodes(c->second,true));
1213 this->WriteLine(data);
1214 if (*c->second->topic)
1216 snprintf(data,MAXBUF,":%s FTOPIC %s %lu %s :%s",Srv->GetServerName().c_str(),c->second->name,(unsigned long)c->second->topicset,c->second->setby,c->second->topic);
1217 this->WriteLine(data);
1219 for (BanList::iterator b = c->second->bans.begin(); b != c->second->bans.end(); b++)
1221 snprintf(data,MAXBUF,":%s FMODE %s +b %s",Srv->GetServerName().c_str(),c->second->name,b->data);
1222 this->WriteLine(data);
1224 FOREACH_MOD(I_OnSyncChannel,OnSyncChannel(c->second,(Module*)TreeProtocolModule,(void*)this));
1226 c->second->GetExtList(list);
1227 for (unsigned int j = 0; j < list.size(); j++)
1229 FOREACH_MOD(I_OnSyncChannelMetaData,OnSyncChannelMetaData(c->second,(Module*)TreeProtocolModule,(void*)this,list[j]));
1234 /* send all users and their oper state/modes */
1235 void SendUsers(TreeServer* Current)
1238 std::deque<std::string> list;
1239 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
1241 if (u->second->registered == 7)
1243 snprintf(data,MAXBUF,":%s NICK %lu %s %s %s %s +%s %s :%s",u->second->server,(unsigned long)u->second->age,u->second->nick,u->second->host,u->second->dhost,u->second->ident,u->second->modes,(char*)inet_ntoa(u->second->ip4),u->second->fullname);
1244 this->WriteLine(data);
1245 if (strchr(u->second->modes,'o'))
1247 this->WriteLine(":"+std::string(u->second->nick)+" OPERTYPE "+std::string(u->second->oper));
1249 FOREACH_MOD(I_OnSyncUser,OnSyncUser(u->second,(Module*)TreeProtocolModule,(void*)this));
1251 u->second->GetExtList(list);
1252 for (unsigned int j = 0; j < list.size(); j++)
1254 FOREACH_MOD(I_OnSyncUserMetaData,OnSyncUserMetaData(u->second,(Module*)TreeProtocolModule,(void*)this,list[j]));
1260 /* This function is called when we want to send a netburst to a local
1261 * server. There is a set order we must do this, because for example
1262 * users require their servers to exist, and channels require their
1263 * users to exist. You get the idea.
1265 void DoBurst(TreeServer* s)
1267 Srv->SendOpers("*** Bursting to \2"+s->GetName()+"\2.");
1268 this->WriteLine("BURST");
1269 /* send our version string */
1270 this->WriteLine(":"+Srv->GetServerName()+" VERSION :"+Srv->GetVersion());
1271 /* Send server tree */
1272 this->SendServers(TreeRoot,s,1);
1273 /* Send users and their oper status */
1275 /* Send everything else (channel modes, xlines etc) */
1276 this->SendChannelModes(s);
1277 this->SendXLines(s);
1278 FOREACH_MOD(I_OnSyncOtherMetaData,OnSyncOtherMetaData((Module*)TreeProtocolModule,(void*)this));
1279 this->WriteLine("ENDBURST");
1280 Srv->SendOpers("*** Finished bursting to \2"+s->GetName()+"\2.");
1283 /* This function is called when we receive data from a remote
1284 * server. We buffer the data in a std::string (it doesnt stay
1285 * there for long), reading using InspSocket::Read() which can
1286 * read up to 16 kilobytes in one operation.
1288 * IF THIS FUNCTION RETURNS FALSE, THE CORE CLOSES AND DELETES
1289 * THE SOCKET OBJECT FOR US.
1291 virtual bool OnDataReady()
1293 char* data = this->Read();
1294 /* Check that the data read is a valid pointer and it has some content */
1297 this->in_buffer += data;
1298 /* While there is at least one new line in the buffer,
1299 * do something useful (we hope!) with it.
1301 while (in_buffer.find("\n") != std::string::npos)
1303 char* line = (char*)in_buffer.c_str();
1304 std::string ret = "";
1305 while ((*line != '\n') && (strlen(line)))
1307 if ((*line != '\r') && (*line != '\n'))
1311 if ((*line == '\n') || (*line == '\r'))
1314 /* Process this one, abort if it
1315 * didnt return true.
1321 memset(result,0,1024);
1323 log(DEBUG,"Original string '%s'",ret.c_str());
1324 /* ERROR + CAPAB is still allowed unencryped */
1325 if ((ret.substr(0,7) != "ERROR :") && (ret.substr(0,6) != "CAPAB "))
1327 int nbytes = from64tobits(out, ret.c_str(), 1024);
1328 if ((nbytes > 0) && (nbytes < 1024))
1330 log(DEBUG,"m_spanningtree: decrypt %d bytes",nbytes);
1331 ctx_in->Decrypt(out, result, nbytes, 1);
1332 for (int t = 0; t < nbytes; t++)
1333 if (result[t] == '\7') result[t] = 0;
1338 if (!this->ProcessLine(ret))
1344 /* EAGAIN returns an empty but non-NULL string, so this
1345 * evaluates to TRUE for EAGAIN but to FALSE for EOF.
1347 return (data != NULL);
1350 int WriteLine(std::string line)
1352 log(DEBUG,"OUT: %s",line.c_str());
1355 log(DEBUG,"AES context");
1357 char result64[10240];
1358 if (this->keylength)
1360 while (line.length() % this->keylength != 0)
1362 // pad it to be a multiple of the key length
1366 unsigned int ll = line.length();
1367 log(DEBUG,"Plaintext line with padding = %d chars",ll);
1368 ctx_out->Encrypt(line.c_str(), result, ll, 1);
1369 log(DEBUG,"Encrypted.");
1370 to64frombits((unsigned char*)result64,(unsigned char*)result,ll);
1372 log(DEBUG,"Encrypted: %s",line.c_str());
1373 //int from64tobits(char *out, const char *in, int maxlen);
1375 return this->Write(line + "\r\n");
1378 /* Handle ERROR command */
1379 bool Error(std::deque<std::string> params)
1381 if (params.size() < 1)
1383 std::string Errmsg = params[0];
1384 std::string SName = myhost;
1385 if (InboundServerName != "")
1387 SName = InboundServerName;
1389 Srv->SendOpers("*** ERROR from "+SName+": "+Errmsg);
1390 /* we will return false to cause the socket to close.
1395 /* Because the core won't let users or even SERVERS set +o,
1396 * we use the OPERTYPE command to do this.
1398 bool OperType(std::string prefix, std::deque<std::string> ¶ms)
1400 if (params.size() != 1)
1402 std::string opertype = params[0];
1403 userrec* u = Srv->FindNick(prefix);
1406 strlcpy(u->oper,opertype.c_str(),NICKMAX);
1407 if (!strchr(u->modes,'o'))
1409 strcat(u->modes,"o");
1411 DoOneToAllButSender(u->nick,"OPERTYPE",params,u->server);
1416 /* Because Andy insists that services-compatible servers must
1417 * implement SVSNICK and SVSJOIN, that's exactly what we do :p
1419 bool ForceNick(std::string prefix, std::deque<std::string> ¶ms)
1421 if (params.size() < 3)
1423 userrec* u = Srv->FindNick(params[0]);
1426 Srv->ChangeUserNick(u,params[1]);
1427 u->age = atoi(params[2].c_str());
1428 DoOneToAllButSender(prefix,"SVSNICK",params,prefix);
1433 bool ServiceJoin(std::string prefix, std::deque<std::string> ¶ms)
1435 if (params.size() < 2)
1437 userrec* u = Srv->FindNick(params[0]);
1440 Srv->JoinUserToChannel(u,params[1],"");
1441 DoOneToAllButSender(prefix,"SVSJOIN",params,prefix);
1446 bool RemoteRehash(std::string prefix, std::deque<std::string> ¶ms)
1448 if (params.size() < 1)
1450 std::string servermask = params[0];
1451 if (Srv->MatchText(Srv->GetServerName(),servermask))
1453 Srv->SendOpers("*** Remote rehash initiated from server \002"+prefix+"\002.");
1454 Srv->RehashServer();
1455 ReadConfiguration(false);
1457 DoOneToAllButSender(prefix,"REHASH",params,prefix);
1461 bool RemoteKill(std::string prefix, std::deque<std::string> ¶ms)
1463 if (params.size() != 2)
1465 std::string nick = params[0];
1466 userrec* u = Srv->FindNick(prefix);
1467 userrec* who = Srv->FindNick(nick);
1470 /* Prepend kill source, if we don't have one */
1471 std::string sourceserv = prefix;
1474 sourceserv = u->server;
1476 if (*(params[1].c_str()) != '[')
1478 params[1] = "[" + sourceserv + "] Killed (" + params[1] +")";
1480 std::string reason = params[1];
1481 params[1] = ":" + params[1];
1482 DoOneToAllButSender(prefix,"KILL",params,sourceserv);
1483 Srv->QuitUser(who,reason);
1488 bool LocalPong(std::string prefix, std::deque<std::string> ¶ms)
1490 if (params.size() < 1)
1492 TreeServer* ServerSource = FindServer(prefix);
1495 ServerSource->SetPingFlag();
1500 bool MetaData(std::string prefix, std::deque<std::string> ¶ms)
1502 if (params.size() < 3)
1504 TreeServer* ServerSource = FindServer(prefix);
1507 if (params[0] == "*")
1509 FOREACH_MOD(I_OnDecodeMetaData,OnDecodeMetaData(TYPE_OTHER,NULL,params[1],params[2]));
1511 else if (*(params[0].c_str()) == '#')
1513 chanrec* c = Srv->FindChannel(params[0]);
1516 FOREACH_MOD(I_OnDecodeMetaData,OnDecodeMetaData(TYPE_CHANNEL,c,params[1],params[2]));
1519 else if (*(params[0].c_str()) != '#')
1521 userrec* u = Srv->FindNick(params[0]);
1524 FOREACH_MOD(I_OnDecodeMetaData,OnDecodeMetaData(TYPE_USER,u,params[1],params[2]));
1528 params[2] = ":" + params[2];
1529 DoOneToAllButSender(prefix,"METADATA",params,prefix);
1533 bool ServerVersion(std::string prefix, std::deque<std::string> ¶ms)
1535 if (params.size() < 1)
1537 TreeServer* ServerSource = FindServer(prefix);
1540 ServerSource->SetVersion(params[0]);
1542 params[0] = ":" + params[0];
1543 DoOneToAllButSender(prefix,"VERSION",params,prefix);
1547 bool ChangeHost(std::string prefix, std::deque<std::string> ¶ms)
1549 if (params.size() < 1)
1551 userrec* u = Srv->FindNick(prefix);
1554 Srv->ChangeHost(u,params[0]);
1555 DoOneToAllButSender(prefix,"FHOST",params,u->server);
1560 bool AddLine(std::string prefix, std::deque<std::string> ¶ms)
1562 if (params.size() < 6)
1564 std::string linetype = params[0]; /* Z, Q, E, G, K */
1565 std::string mask = params[1]; /* Line type dependent */
1566 std::string source = params[2]; /* may not be online or may be a server */
1567 std::string settime = params[3]; /* EPOCH time set */
1568 std::string duration = params[4]; /* Duration secs */
1569 std::string reason = params[5];
1571 switch (*(linetype.c_str()))
1574 add_zline(atoi(duration.c_str()), source.c_str(), reason.c_str(), mask.c_str());
1575 zline_set_creation_time((char*)mask.c_str(), atoi(settime.c_str()));
1578 add_qline(atoi(duration.c_str()), source.c_str(), reason.c_str(), mask.c_str());
1579 qline_set_creation_time((char*)mask.c_str(), atoi(settime.c_str()));
1582 add_eline(atoi(duration.c_str()), source.c_str(), reason.c_str(), mask.c_str());
1583 eline_set_creation_time((char*)mask.c_str(), atoi(settime.c_str()));
1586 add_gline(atoi(duration.c_str()), source.c_str(), reason.c_str(), mask.c_str());
1587 gline_set_creation_time((char*)mask.c_str(), atoi(settime.c_str()));
1590 add_kline(atoi(duration.c_str()), source.c_str(), reason.c_str(), mask.c_str());
1593 /* Just in case... */
1594 Srv->SendOpers("*** \2WARNING\2: Invalid xline type '"+linetype+"' sent by server "+prefix+", ignored!");
1597 /* Send it on its way */
1598 params[5] = ":" + params[5];
1599 DoOneToAllButSender(prefix,"ADDLINE",params,prefix);
1603 bool ChangeName(std::string prefix, std::deque<std::string> ¶ms)
1605 if (params.size() < 1)
1607 userrec* u = Srv->FindNick(prefix);
1610 Srv->ChangeGECOS(u,params[0]);
1611 params[0] = ":" + params[0];
1612 DoOneToAllButSender(prefix,"FNAME",params,u->server);
1617 bool Whois(std::string prefix, std::deque<std::string> ¶ms)
1619 if (params.size() < 1)
1621 log(DEBUG,"In IDLE command");
1622 userrec* u = Srv->FindNick(prefix);
1625 log(DEBUG,"USER EXISTS: %s",u->nick);
1626 // an incoming request
1627 if (params.size() == 1)
1629 userrec* x = Srv->FindNick(params[0]);
1630 if ((x) && (x->fd > -1))
1632 userrec* x = Srv->FindNick(params[0]);
1633 log(DEBUG,"Got IDLE");
1634 char signon[MAXBUF];
1636 log(DEBUG,"Sending back IDLE 3");
1637 snprintf(signon,MAXBUF,"%lu",(unsigned long)x->signon);
1638 snprintf(idle,MAXBUF,"%lu",(unsigned long)abs((x->idle_lastmsg)-time(NULL)));
1639 std::deque<std::string> par;
1640 par.push_back(prefix);
1641 par.push_back(signon);
1642 par.push_back(idle);
1643 // ours, we're done, pass it BACK
1644 DoOneToOne(params[0],"IDLE",par,u->server);
1648 // not ours pass it on
1649 DoOneToOne(prefix,"IDLE",params,x->server);
1652 else if (params.size() == 3)
1654 std::string who_did_the_whois = params[0];
1655 userrec* who_to_send_to = Srv->FindNick(who_did_the_whois);
1656 if ((who_to_send_to) && (who_to_send_to->fd > -1))
1658 log(DEBUG,"Got final IDLE");
1659 // an incoming reply to a whois we sent out
1660 std::string nick_whoised = prefix;
1661 unsigned long signon = atoi(params[1].c_str());
1662 unsigned long idle = atoi(params[2].c_str());
1663 if ((who_to_send_to) && (who_to_send_to->fd > -1))
1664 do_whois(who_to_send_to,u,signon,idle,(char*)nick_whoised.c_str());
1668 // not ours, pass it on
1669 DoOneToOne(prefix,"IDLE",params,who_to_send_to->server);
1676 bool LocalPing(std::string prefix, std::deque<std::string> ¶ms)
1678 if (params.size() < 1)
1680 std::string stufftobounce = params[0];
1681 this->WriteLine(":"+Srv->GetServerName()+" PONG "+stufftobounce);
1685 bool RemoteServer(std::string prefix, std::deque<std::string> ¶ms)
1687 if (params.size() < 4)
1689 std::string servername = params[0];
1690 std::string password = params[1];
1691 // hopcount is not used for a remote server, we calculate this ourselves
1692 std::string description = params[3];
1693 TreeServer* ParentOfThis = FindServer(prefix);
1696 this->WriteLine("ERROR :Protocol error - Introduced remote server from unknown server "+prefix);
1699 TreeServer* CheckDupe = FindServer(servername);
1702 this->WriteLine("ERROR :Server "+servername+" already exists on server "+CheckDupe->GetParent()->GetName()+"!");
1703 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, already exists on server "+CheckDupe->GetParent()->GetName());
1706 TreeServer* Node = new TreeServer(servername,description,ParentOfThis,NULL);
1707 ParentOfThis->AddChild(Node);
1708 params[3] = ":" + params[3];
1709 DoOneToAllButSender(prefix,"SERVER",params,prefix);
1710 Srv->SendOpers("*** Server \002"+prefix+"\002 introduced server \002"+servername+"\002 ("+description+")");
1714 bool Outbound_Reply_Server(std::deque<std::string> ¶ms)
1716 if (params.size() < 4)
1718 std::string servername = params[0];
1719 std::string password = params[1];
1720 int hops = atoi(params[2].c_str());
1723 this->WriteLine("ERROR :Server too far away for authentication");
1724 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, server is too far away for authentication");
1727 std::string description = params[3];
1728 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
1730 if ((x->Name == servername) && (x->RecvPass == password))
1732 TreeServer* CheckDupe = FindServer(servername);
1735 this->WriteLine("ERROR :Server "+servername+" already exists on server "+CheckDupe->GetParent()->GetName()+"!");
1736 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, already exists on server "+CheckDupe->GetParent()->GetName());
1739 // Begin the sync here. this kickstarts the
1740 // other side, waiting in WAIT_AUTH_2 state,
1741 // into starting their burst, as it shows
1742 // that we're happy.
1743 this->LinkState = CONNECTED;
1744 // we should add the details of this server now
1745 // to the servers tree, as a child of the root
1747 TreeServer* Node = new TreeServer(servername,description,TreeRoot,this);
1748 TreeRoot->AddChild(Node);
1749 params[3] = ":" + params[3];
1750 DoOneToAllButSender(TreeRoot->GetName(),"SERVER",params,servername);
1751 this->bursting = true;
1752 this->DoBurst(Node);
1756 this->WriteLine("ERROR :Invalid credentials");
1757 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, invalid link credentials");
1761 bool Inbound_Server(std::deque<std::string> ¶ms)
1763 if (params.size() < 4)
1765 std::string servername = params[0];
1766 std::string password = params[1];
1767 int hops = atoi(params[2].c_str());
1770 this->WriteLine("ERROR :Server too far away for authentication");
1771 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, server is too far away for authentication");
1774 std::string description = params[3];
1775 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
1777 if ((x->Name == servername) && (x->RecvPass == password))
1779 TreeServer* CheckDupe = FindServer(servername);
1782 this->WriteLine("ERROR :Server "+servername+" already exists on server "+CheckDupe->GetParent()->GetName()+"!");
1783 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, already exists on server "+CheckDupe->GetParent()->GetName());
1786 /* If the config says this link is encrypted, but the remote side
1787 * hasnt bothered to send the AES command before SERVER, then we
1788 * boot them off as we MUST have this connection encrypted.
1790 if ((x->EncryptionKey != "") && (!this->ctx_in))
1792 this->WriteLine("ERROR :This link requires AES encryption to be enabled. Plaintext connection refused.");
1793 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, remote server did not enable AES.");
1796 Srv->SendOpers("*** Verified incoming server connection from \002"+servername+"\002["+(x->HiddenFromStats ? "<hidden>" : this->GetIP())+"] ("+description+")");
1797 this->InboundServerName = servername;
1798 this->InboundDescription = description;
1799 // this is good. Send our details: Our server name and description and hopcount of 0,
1800 // along with the sendpass from this block.
1801 this->WriteLine("SERVER "+Srv->GetServerName()+" "+x->SendPass+" 0 :"+Srv->GetServerDescription());
1802 // move to the next state, we are now waiting for THEM.
1803 this->LinkState = WAIT_AUTH_2;
1807 this->WriteLine("ERROR :Invalid credentials");
1808 Srv->SendOpers("*** Server connection from \2"+servername+"\2 denied, invalid link credentials");
1812 void Split(std::string line, bool stripcolon, std::deque<std::string> &n)
1814 if (!strchr(line.c_str(),' '))
1819 std::stringstream s(line);
1820 std::string param = "";
1839 if ((param == ":") && (item > 0))
1862 bool ProcessLine(std::string line)
1864 char* l = (char*)line.c_str();
1865 while ((strlen(l)) && (l[strlen(l)-1] == '\r') || (l[strlen(l)-1] == '\n'))
1866 l[strlen(l)-1] = '\0';
1870 Srv->Log(DEBUG,"IN: "+line);
1872 std::deque<std::string> params;
1873 this->Split(line,true,params);
1874 std::string command = "";
1875 std::string prefix = "";
1876 if (((params[0].c_str())[0] == ':') && (params.size() > 1))
1879 command = params[1];
1880 char* pref = (char*)prefix.c_str();
1888 command = params[0];
1892 if ((!this->ctx_in) && (command == "AES"))
1894 std::string sserv = params[0];
1895 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
1897 if ((x->EncryptionKey != "") && (x->Name == sserv))
1899 this->InitAES(x->EncryptionKey,sserv);
1904 else if ((this->ctx_in) && (command == "AES"))
1906 WriteOpers("*** \2AES\2: Encryption already enabled on this connection yet %s is trying to enable it twice!",params[0].c_str());
1909 switch (this->LinkState)
1914 // Waiting for SERVER command from remote server. Server initiating
1915 // the connection sends the first SERVER command, listening server
1916 // replies with theirs if its happy, then if the initiator is happy,
1917 // it starts to send its net sync, which starts the merge, otherwise
1918 // it sends an ERROR.
1919 if (command == "PASS")
1921 /* Silently ignored */
1923 else if (command == "SERVER")
1925 return this->Inbound_Server(params);
1927 else if (command == "ERROR")
1929 return this->Error(params);
1931 else if (command == "USER")
1933 this->WriteLine("ERROR :Client connections to this port are prohibited.");
1936 else if (command == "CAPAB")
1938 return this->Capab(params);
1940 else if ((command == "U") || (command == "S"))
1942 this->WriteLine("ERROR :Cannot use the old-style mesh linking protocol with m_spanningtree.so!");
1947 this->WriteLine("ERROR :Invalid command in negotiation phase.");
1952 // Waiting for start of other side's netmerge to say they liked our
1954 if (command == "SERVER")
1956 // cant do this, they sent it to us in the WAIT_AUTH_1 state!
1960 else if ((command == "U") || (command == "S"))
1962 this->WriteLine("ERROR :Cannot use the old-style mesh linking protocol with m_spanningtree.so!");
1965 else if (command == "BURST")
1967 this->LinkState = CONNECTED;
1968 Node = new TreeServer(InboundServerName,InboundDescription,TreeRoot,this);
1969 TreeRoot->AddChild(Node);
1971 params.push_back(InboundServerName);
1972 params.push_back("*");
1973 params.push_back("1");
1974 params.push_back(":"+InboundDescription);
1975 DoOneToAllButSender(TreeRoot->GetName(),"SERVER",params,InboundServerName);
1976 this->bursting = true;
1977 this->DoBurst(Node);
1979 else if (command == "ERROR")
1981 return this->Error(params);
1983 else if (command == "CAPAB")
1985 return this->Capab(params);
1990 this->WriteLine("ERROR :Internal error -- listening socket accepted its own descriptor!!!");
1994 if (command == "SERVER")
1996 // another server we connected to, which was in WAIT_AUTH_1 state,
1997 // has just sent us their credentials. If we get this far, theyre
1998 // happy with OUR credentials, and they are now in WAIT_AUTH_2 state.
1999 // if we're happy with this, we should send our netburst which
2000 // kickstarts the merge.
2001 return this->Outbound_Reply_Server(params);
2003 else if (command == "ERROR")
2005 return this->Error(params);
2009 // This is the 'authenticated' state, when all passwords
2010 // have been exchanged and anything past this point is taken
2015 std::string direction = prefix;
2016 userrec* t = Srv->FindNick(prefix);
2019 direction = t->server;
2021 TreeServer* route_back_again = BestRouteTo(direction);
2022 if ((!route_back_again) || (route_back_again->GetSocket() != this))
2024 if (route_back_again)
2025 log(DEBUG,"Protocol violation: Fake direction in command '%s' from connection '%s'",line.c_str(),this->GetName().c_str());
2030 * When there is activity on the socket, reset the ping counter so
2031 * that we're not wasting bandwidth pinging an active server.
2033 route_back_again->SetNextPingTime(time(NULL) + 120);
2034 route_back_again->SetPingFlag();
2037 if (command == "SVSMODE")
2039 /* Services expects us to implement
2040 * SVSMODE. In inspircd its the same as
2045 std::string target = "";
2046 /* Yes, know, this is a mess. Its reasonably fast though as we're
2047 * working with std::string here.
2049 if ((command == "NICK") && (params.size() > 1))
2051 return this->IntroduceClient(prefix,params);
2053 else if (command == "FJOIN")
2055 return this->ForceJoin(prefix,params);
2057 else if (command == "SERVER")
2059 return this->RemoteServer(prefix,params);
2061 else if (command == "ERROR")
2063 return this->Error(params);
2065 else if (command == "OPERTYPE")
2067 return this->OperType(prefix,params);
2069 else if (command == "FMODE")
2071 return this->ForceMode(prefix,params);
2073 else if (command == "KILL")
2075 return this->RemoteKill(prefix,params);
2077 else if (command == "FTOPIC")
2079 return this->ForceTopic(prefix,params);
2081 else if (command == "REHASH")
2083 return this->RemoteRehash(prefix,params);
2085 else if (command == "METADATA")
2087 return this->MetaData(prefix,params);
2089 else if (command == "PING")
2091 return this->LocalPing(prefix,params);
2093 else if (command == "PONG")
2095 return this->LocalPong(prefix,params);
2097 else if (command == "VERSION")
2099 return this->ServerVersion(prefix,params);
2101 else if (command == "FHOST")
2103 return this->ChangeHost(prefix,params);
2105 else if (command == "FNAME")
2107 return this->ChangeName(prefix,params);
2109 else if (command == "ADDLINE")
2111 return this->AddLine(prefix,params);
2113 else if (command == "SVSNICK")
2117 prefix = this->GetName();
2119 return this->ForceNick(prefix,params);
2121 else if (command == "IDLE")
2123 return this->Whois(prefix,params);
2125 else if (command == "SVSJOIN")
2129 prefix = this->GetName();
2131 return this->ServiceJoin(prefix,params);
2133 else if (command == "SQUIT")
2135 if (params.size() == 2)
2137 this->Squit(FindServer(params[0]),params[1]);
2141 else if (command == "ENDBURST")
2143 this->bursting = false;
2148 // not a special inter-server command.
2149 // Emulate the actual user doing the command,
2150 // this saves us having a huge ugly parser.
2151 userrec* who = Srv->FindNick(prefix);
2152 std::string sourceserv = this->myhost;
2153 if (this->InboundServerName != "")
2155 sourceserv = this->InboundServerName;
2159 if ((command == "NICK") && (params.size() > 0))
2161 /* On nick messages, check that the nick doesnt
2162 * already exist here. If it does, kill their copy,
2165 userrec* x = Srv->FindNick(params[0]);
2168 std::deque<std::string> p;
2169 p.push_back(params[0]);
2170 p.push_back("Nickname collision ("+prefix+" -> "+params[0]+")");
2171 DoOneToMany(Srv->GetServerName(),"KILL",p);
2173 p.push_back(prefix);
2174 p.push_back("Nickname collision");
2175 DoOneToMany(Srv->GetServerName(),"KILL",p);
2176 Srv->QuitUser(x,"Nickname collision ("+prefix+" -> "+params[0]+")");
2177 userrec* y = Srv->FindNick(prefix);
2180 Srv->QuitUser(y,"Nickname collision");
2182 return DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
2186 target = who->server;
2187 char* strparams[127];
2188 for (unsigned int q = 0; q < params.size(); q++)
2190 strparams[q] = (char*)params[q].c_str();
2192 Srv->CallCommandHandler(command, strparams, params.size(), who);
2196 // its not a user. Its either a server, or somethings screwed up.
2197 if (IsServer(prefix))
2199 target = Srv->GetServerName();
2203 log(DEBUG,"Command with unknown origin '%s'",prefix.c_str());
2207 return DoOneToAllButSenderRaw(line,sourceserv,prefix,command,params);
2216 virtual std::string GetName()
2218 std::string sourceserv = this->myhost;
2219 if (this->InboundServerName != "")
2221 sourceserv = this->InboundServerName;
2226 virtual void OnTimeout()
2228 if (this->LinkState == CONNECTING)
2230 Srv->SendOpers("*** CONNECT: Connection to \002"+myhost+"\002 timed out.");
2234 virtual void OnClose()
2236 // Connection closed.
2237 // If the connection is fully up (state CONNECTED)
2238 // then propogate a netsplit to all peers.
2239 std::string quitserver = this->myhost;
2240 if (this->InboundServerName != "")
2242 quitserver = this->InboundServerName;
2244 TreeServer* s = FindServer(quitserver);
2247 Squit(s,"Remote host closed the connection");
2249 WriteOpers("Server '\2%s\2' closed the connection.",quitserver.c_str());
2252 virtual int OnIncomingConnection(int newsock, char* ip)
2254 TreeSocket* s = new TreeSocket(newsock, ip);
2260 void AddThisServer(TreeServer* server, std::deque<TreeServer*> &list)
2262 for (unsigned int c = 0; c < list.size(); c++)
2264 if (list[c] == server)
2269 list.push_back(server);
2272 // returns a list of DIRECT servernames for a specific channel
2273 void GetListOfServersForChannel(chanrec* c, std::deque<TreeServer*> &list)
2275 std::map<char*,char*> *ulist = c->GetUsers();
2276 for (std::map<char*,char*>::iterator i = ulist->begin(); i != ulist->end(); i++)
2278 char* o = i->second;
2279 userrec* otheruser = (userrec*)o;
2280 if (otheruser->fd < 0)
2282 TreeServer* best = BestRouteTo(otheruser->server);
2284 AddThisServer(best,list);
2290 bool DoOneToAllButSenderRaw(std::string data, std::string omit, std::string prefix, std::string command, std::deque<std::string> ¶ms)
2292 TreeServer* omitroute = BestRouteTo(omit);
2293 if ((command == "NOTICE") || (command == "PRIVMSG"))
2295 if ((params.size() >= 2) && (*(params[0].c_str()) != '$'))
2297 if (*(params[0].c_str()) != '#')
2299 // special routing for private messages/notices
2300 userrec* d = Srv->FindNick(params[0]);
2303 std::deque<std::string> par;
2304 par.push_back(params[0]);
2305 par.push_back(":"+params[1]);
2306 DoOneToOne(prefix,command,par,d->server);
2312 log(DEBUG,"Channel privmsg going to chan %s",params[0].c_str());
2313 chanrec* c = Srv->FindChannel(params[0]);
2316 std::deque<TreeServer*> list;
2317 GetListOfServersForChannel(c,list);
2318 log(DEBUG,"Got a list of %d servers",list.size());
2319 unsigned int lsize = list.size();
2320 for (unsigned int i = 0; i < lsize; i++)
2322 TreeSocket* Sock = list[i]->GetSocket();
2323 if ((Sock) && (list[i]->GetName() != omit) && (omitroute != list[i]))
2325 log(DEBUG,"Writing privmsg to server %s",list[i]->GetName().c_str());
2326 Sock->WriteLine(data);
2334 unsigned int items = TreeRoot->ChildCount();
2335 for (unsigned int x = 0; x < items; x++)
2337 TreeServer* Route = TreeRoot->GetChild(x);
2338 if ((Route->GetSocket()) && (Route->GetName() != omit) && (omitroute != Route))
2340 TreeSocket* Sock = Route->GetSocket();
2341 Sock->WriteLine(data);
2347 bool DoOneToAllButSender(std::string prefix, std::string command, std::deque<std::string> ¶ms, std::string omit)
2349 TreeServer* omitroute = BestRouteTo(omit);
2350 std::string FullLine = ":" + prefix + " " + command;
2351 unsigned int words = params.size();
2352 for (unsigned int x = 0; x < words; x++)
2354 FullLine = FullLine + " " + params[x];
2356 unsigned int items = TreeRoot->ChildCount();
2357 for (unsigned int x = 0; x < items; x++)
2359 TreeServer* Route = TreeRoot->GetChild(x);
2360 // Send the line IF:
2361 // The route has a socket (its a direct connection)
2362 // The route isnt the one to be omitted
2363 // The route isnt the path to the one to be omitted
2364 if ((Route->GetSocket()) && (Route->GetName() != omit) && (omitroute != Route))
2366 TreeSocket* Sock = Route->GetSocket();
2367 Sock->WriteLine(FullLine);
2373 bool DoOneToMany(std::string prefix, std::string command, std::deque<std::string> ¶ms)
2375 std::string FullLine = ":" + prefix + " " + command;
2376 unsigned int words = params.size();
2377 for (unsigned int x = 0; x < words; x++)
2379 FullLine = FullLine + " " + params[x];
2381 unsigned int items = TreeRoot->ChildCount();
2382 for (unsigned int x = 0; x < items; x++)
2384 TreeServer* Route = TreeRoot->GetChild(x);
2385 if (Route->GetSocket())
2387 TreeSocket* Sock = Route->GetSocket();
2388 Sock->WriteLine(FullLine);
2394 bool DoOneToOne(std::string prefix, std::string command, std::deque<std::string> ¶ms, std::string target)
2396 TreeServer* Route = BestRouteTo(target);
2399 std::string FullLine = ":" + prefix + " " + command;
2400 unsigned int words = params.size();
2401 for (unsigned int x = 0; x < words; x++)
2403 FullLine = FullLine + " " + params[x];
2405 if (Route->GetSocket())
2407 TreeSocket* Sock = Route->GetSocket();
2408 Sock->WriteLine(FullLine);
2418 std::vector<TreeSocket*> Bindings;
2420 void ReadConfiguration(bool rebind)
2422 Conf = new ConfigReader;
2425 for (int j =0; j < Conf->Enumerate("bind"); j++)
2427 std::string Type = Conf->ReadValue("bind","type",j);
2428 std::string IP = Conf->ReadValue("bind","address",j);
2429 long Port = Conf->ReadInteger("bind","port",j,true);
2430 if (Type == "servers")
2436 TreeSocket* listener = new TreeSocket(IP.c_str(),Port,true,10);
2437 if (listener->GetState() == I_LISTENING)
2439 Srv->AddSocket(listener);
2440 Bindings.push_back(listener);
2444 log(DEFAULT,"m_spanningtree: Warning: Failed to bind server port %d",Port);
2451 FlatLinks = Conf->ReadFlag("options","flatlinks",0);
2452 HideULines = Conf->ReadFlag("options","hideulines",0);
2454 for (int j =0; j < Conf->Enumerate("link"); j++)
2457 L.Name = Conf->ReadValue("link","name",j);
2458 L.IPAddr = Conf->ReadValue("link","ipaddr",j);
2459 L.Port = Conf->ReadInteger("link","port",j,true);
2460 L.SendPass = Conf->ReadValue("link","sendpass",j);
2461 L.RecvPass = Conf->ReadValue("link","recvpass",j);
2462 L.AutoConnect = Conf->ReadInteger("link","autoconnect",j,true);
2463 L.EncryptionKey = Conf->ReadValue("link","encryptionkey",j);
2464 L.HiddenFromStats = Conf->ReadFlag("link","hidden",j);
2465 L.NextConnectTime = time(NULL) + L.AutoConnect;
2466 /* Bugfix by brain, do not allow people to enter bad configurations */
2467 if ((L.RecvPass != "") && (L.SendPass != "") && (L.Name != "") && (L.Port))
2469 LinkBlocks.push_back(L);
2470 log(DEBUG,"m_spanningtree: Read server %s with host %s:%d",L.Name.c_str(),L.IPAddr.c_str(),L.Port);
2474 if (L.RecvPass == "")
2476 log(DEFAULT,"Invalid configuration for server '%s', recvpass not defined!",L.Name.c_str());
2478 else if (L.SendPass == "")
2480 log(DEFAULT,"Invalid configuration for server '%s', sendpass not defined!",L.Name.c_str());
2482 else if (L.Name == "")
2484 log(DEFAULT,"Invalid configuration, link tag without a name!");
2488 log(DEFAULT,"Invalid configuration for server '%s', no port specified!",L.Name.c_str());
2496 class ModuleSpanningTree : public Module
2498 std::vector<TreeSocket*> Bindings;
2501 cmd_rconnect* command_rconnect;
2505 ModuleSpanningTree(Server* Me)
2506 : Module::Module(Me)
2511 // Create the root of the tree
2512 TreeRoot = new TreeServer(Srv->GetServerName(),Srv->GetServerDescription());
2514 ReadConfiguration(true);
2516 command_rconnect = new cmd_rconnect(this);
2517 Srv->AddCommand(command_rconnect);
2520 void ShowLinks(TreeServer* Current, userrec* user, int hops)
2522 std::string Parent = TreeRoot->GetName();
2523 if (Current->GetParent())
2525 Parent = Current->GetParent()->GetName();
2527 for (unsigned int q = 0; q < Current->ChildCount(); q++)
2529 if ((HideULines) && (Srv->IsUlined(Current->GetName())))
2533 ShowLinks(Current->GetChild(q),user,hops+1);
2538 ShowLinks(Current->GetChild(q),user,hops+1);
2541 WriteServ(user->fd,"364 %s %s %s :%d %s",user->nick,Current->GetName().c_str(),Parent.c_str(),(FlatLinks && (!*user->oper)) ? 0 : hops,Current->GetDesc().c_str());
2544 int CountLocalServs()
2546 return TreeRoot->ChildCount();
2551 return serverlist.size();
2554 void HandleLinks(char** parameters, int pcnt, userrec* user)
2556 ShowLinks(TreeRoot,user,0);
2557 WriteServ(user->fd,"365 %s * :End of /LINKS list.",user->nick);
2561 void HandleLusers(char** parameters, int pcnt, userrec* user)
2563 WriteServ(user->fd,"251 %s :There are %d users and %d invisible on %d servers",user->nick,usercnt()-usercount_invisible(),usercount_invisible(),this->CountServs());
2564 WriteServ(user->fd,"252 %s %d :operator(s) online",user->nick,usercount_opers());
2565 WriteServ(user->fd,"253 %s %d :unknown connections",user->nick,usercount_unknown());
2566 WriteServ(user->fd,"254 %s %d :channels formed",user->nick,chancount());
2567 WriteServ(user->fd,"254 %s :I have %d clients and %d servers",user->nick,local_count(),this->CountLocalServs());
2571 // WARNING: NOT THREAD SAFE - DONT GET ANY SMART IDEAS.
2573 void ShowMap(TreeServer* Current, userrec* user, int depth, char matrix[128][80])
2577 for (int t = 0; t < depth; t++)
2579 matrix[line][t] = ' ';
2582 // For Aligning, we need to work out exactly how deep this thing is, and produce
2583 // a 'Spacer' String to compensate.
2586 memset(spacer,' ',40);
2587 if ((40 - Current->GetName().length() - depth) > 1) {
2588 spacer[40 - Current->GetName().length() - depth] = '\0';
2597 if (clientlist.size() == 0) {
2598 // If there are no users, WHO THE HELL DID THE /MAP?!?!?!
2603 percent = ((float)Current->GetUserCount() / (float)clientlist.size()) * 100;
2605 snprintf(text, 80, "%s %s%5d [%5.2f%%]", Current->GetName().c_str(), spacer, Current->GetUserCount(), percent);
2606 strlcpy(&matrix[line][depth],text,80);
2608 for (unsigned int q = 0; q < Current->ChildCount(); q++)
2610 if ((HideULines) && (Srv->IsUlined(Current->GetChild(q)->GetName())))
2614 ShowMap(Current->GetChild(q),user,(FlatLinks && (!*user->oper)) ? depth : depth+2,matrix);
2619 ShowMap(Current->GetChild(q),user,(FlatLinks && (!*user->oper)) ? depth : depth+2,matrix);
2625 // Ok, prepare to be confused.
2626 // After much mulling over how to approach this, it struck me that
2627 // the 'usual' way of doing a /MAP isnt the best way. Instead of
2628 // keeping track of a ton of ascii characters, and line by line
2629 // under recursion working out where to place them using multiplications
2630 // and divisons, we instead render the map onto a backplane of characters
2631 // (a character matrix), then draw the branches as a series of "L" shapes
2632 // from the nodes. This is not only friendlier on CPU it uses less stack.
2634 void HandleMap(char** parameters, int pcnt, userrec* user)
2636 // This array represents a virtual screen which we will
2637 // "scratch" draw to, as the console device of an irc
2638 // client does not provide for a proper terminal.
2639 char matrix[128][80];
2640 for (unsigned int t = 0; t < 128; t++)
2642 matrix[t][0] = '\0';
2645 // The only recursive bit is called here.
2646 ShowMap(TreeRoot,user,0,matrix);
2647 // Process each line one by one. The algorithm has a limit of
2648 // 128 servers (which is far more than a spanning tree should have
2649 // anyway, so we're ok). This limit can be raised simply by making
2650 // the character matrix deeper, 128 rows taking 10k of memory.
2651 for (int l = 1; l < line; l++)
2653 // scan across the line looking for the start of the
2654 // servername (the recursive part of the algorithm has placed
2655 // the servers at indented positions depending on what they
2657 int first_nonspace = 0;
2658 while (matrix[l][first_nonspace] == ' ')
2663 // Draw the `- (corner) section: this may be overwritten by
2664 // another L shape passing along the same vertical pane, becoming
2665 // a |- (branch) section instead.
2666 matrix[l][first_nonspace] = '-';
2667 matrix[l][first_nonspace-1] = '`';
2669 // Draw upwards until we hit the parent server, causing possibly
2670 // other corners (`-) to become branches (|-)
2671 while ((matrix[l2][first_nonspace-1] == ' ') || (matrix[l2][first_nonspace-1] == '`'))
2673 matrix[l2][first_nonspace-1] = '|';
2677 // dump the whole lot to the user. This is the easy bit, honest.
2678 for (int t = 0; t < line; t++)
2680 WriteServ(user->fd,"006 %s :%s",user->nick,&matrix[t][0]);
2682 WriteServ(user->fd,"007 %s :End of /MAP",user->nick);
2686 int HandleSquit(char** parameters, int pcnt, userrec* user)
2688 TreeServer* s = FindServerMask(parameters[0]);
2693 WriteServ(user->fd,"NOTICE %s :*** SQUIT: Foolish mortal, you cannot make a server SQUIT itself! (%s matches local server name)",user->nick,parameters[0]);
2696 TreeSocket* sock = s->GetSocket();
2699 log(DEBUG,"Splitting server %s",s->GetName().c_str());
2700 WriteOpers("*** SQUIT: Server \002%s\002 removed from network by %s",parameters[0],user->nick);
2701 sock->Squit(s,"Server quit by "+std::string(user->nick)+"!"+std::string(user->ident)+"@"+std::string(user->host));
2702 Srv->RemoveSocket(sock);
2706 WriteServ(user->fd,"NOTICE %s :*** SQUIT: The server \002%s\002 is not directly connected.",user->nick,parameters[0]);
2711 WriteServ(user->fd,"NOTICE %s :*** SQUIT: The server \002%s\002 does not exist on the network.",user->nick,parameters[0]);
2716 int HandleRemoteWhois(char** parameters, int pcnt, userrec* user)
2718 if ((user->fd > -1) && (pcnt > 1))
2720 userrec* remote = Srv->FindNick(parameters[1]);
2721 if ((remote) && (remote->fd < 0))
2723 std::deque<std::string> params;
2724 params.push_back(parameters[1]);
2725 DoOneToOne(user->nick,"IDLE",params,remote->server);
2730 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[1]);
2731 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, parameters[1]);
2738 void DoPingChecks(time_t curtime)
2740 for (unsigned int j = 0; j < TreeRoot->ChildCount(); j++)
2742 TreeServer* serv = TreeRoot->GetChild(j);
2743 TreeSocket* sock = serv->GetSocket();
2746 if (curtime >= serv->NextPingTime())
2748 if (serv->AnsweredLastPing())
2750 sock->WriteLine(":"+Srv->GetServerName()+" PING "+serv->GetName());
2751 serv->SetNextPingTime(curtime + 120);
2755 // they didnt answer, boot them
2756 WriteOpers("*** Server \002%s\002 pinged out",serv->GetName().c_str());
2757 sock->Squit(serv,"Ping timeout");
2758 Srv->RemoveSocket(sock);
2767 void AutoConnectServers(time_t curtime)
2769 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
2771 if ((x->AutoConnect) && (curtime >= x->NextConnectTime))
2773 log(DEBUG,"Auto-Connecting %s",x->Name.c_str());
2774 x->NextConnectTime = curtime + x->AutoConnect;
2775 TreeServer* CheckDupe = FindServer(x->Name);
2778 // an autoconnected server is not connected. Check if its time to connect it
2779 WriteOpers("*** AUTOCONNECT: Auto-connecting server \002%s\002 (%lu seconds until next attempt)",x->Name.c_str(),x->AutoConnect);
2780 TreeSocket* newsocket = new TreeSocket(x->IPAddr,x->Port,false,10,x->Name);
2781 if (newsocket->GetState() != I_ERROR)
2783 Srv->AddSocket(newsocket);
2787 WriteOpers("*** AUTOCONNECT: Error autoconnecting \002%s\002.",x->Name.c_str());
2795 int HandleVersion(char** parameters, int pcnt, userrec* user)
2797 // we've already checked if pcnt > 0, so this is safe
2798 TreeServer* found = FindServerMask(parameters[0]);
2801 std::string Version = found->GetVersion();
2802 WriteServ(user->fd,"351 %s :%s",user->nick,Version.c_str());
2803 if (found == TreeRoot)
2805 std::stringstream out(Config->data005);
2806 std::string token = "";
2807 std::string line5 = "";
2808 int token_counter = 0;
2812 line5 = line5 + token + " ";
2814 if ((token_counter >= 13) || (out.eof() == true))
2816 WriteServ(user->fd,"005 %s %s:are supported by this server",user->nick,line5.c_str());
2825 WriteServ(user->fd,"402 %s %s :No such server",user->nick,parameters[0]);
2830 int HandleConnect(char** parameters, int pcnt, userrec* user)
2832 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
2834 if (Srv->MatchText(x->Name.c_str(),parameters[0]))
2836 TreeServer* CheckDupe = FindServer(x->Name);
2839 WriteServ(user->fd,"NOTICE %s :*** CONNECT: Connecting to server: \002%s\002 (%s:%d)",user->nick,x->Name.c_str(),(x->HiddenFromStats ? "<hidden>" : x->IPAddr.c_str()),x->Port);
2840 TreeSocket* newsocket = new TreeSocket(x->IPAddr,x->Port,false,10,x->Name);
2841 if (newsocket->GetState() != I_ERROR)
2843 Srv->AddSocket(newsocket);
2847 WriteServ(user->fd,"NOTICE %s :*** CONNECT: Error connecting \002%s\002.",user->nick,x->Name.c_str());
2854 WriteServ(user->fd,"NOTICE %s :*** CONNECT: Server \002%s\002 already exists on the network and is connected via \002%s\002",user->nick,x->Name.c_str(),CheckDupe->GetParent()->GetName().c_str());
2859 WriteServ(user->fd,"NOTICE %s :*** CONNECT: No server matching \002%s\002 could be found in the config file.",user->nick,parameters[0]);
2863 virtual int OnStats(char statschar, userrec* user)
2865 if (statschar == 'c')
2867 for (unsigned int i = 0; i < LinkBlocks.size(); i++)
2869 WriteServ(user->fd,"213 %s C *@%s * %s %d 0 %c%c%c",user->nick,(LinkBlocks[i].HiddenFromStats ? "<hidden>" : LinkBlocks[i].IPAddr).c_str(),LinkBlocks[i].Name.c_str(),LinkBlocks[i].Port,(LinkBlocks[i].EncryptionKey != "" ? 'e' : '-'),(LinkBlocks[i].AutoConnect ? 'a' : '-'),'s');
2870 WriteServ(user->fd,"244 %s H * * %s",user->nick,LinkBlocks[i].Name.c_str());
2872 WriteServ(user->fd,"219 %s %c :End of /STATS report",user->nick,statschar);
2873 WriteOpers("*** Notice: Stats '%c' requested by %s (%s@%s)",statschar,user->nick,user->ident,user->host);
2879 virtual int OnPreCommand(std::string command, char **parameters, int pcnt, userrec *user, bool validated)
2881 /* If the command doesnt appear to be valid, we dont want to mess with it. */
2885 if (command == "CONNECT")
2887 return this->HandleConnect(parameters,pcnt,user);
2889 else if (command == "SQUIT")
2891 return this->HandleSquit(parameters,pcnt,user);
2893 else if (command == "MAP")
2895 this->HandleMap(parameters,pcnt,user);
2898 else if (command == "LUSERS")
2900 this->HandleLusers(parameters,pcnt,user);
2903 else if (command == "LINKS")
2905 this->HandleLinks(parameters,pcnt,user);
2908 else if (command == "WHOIS")
2913 return this->HandleRemoteWhois(parameters,pcnt,user);
2916 else if ((command == "VERSION") && (pcnt > 0))
2918 this->HandleVersion(parameters,pcnt,user);
2921 else if (Srv->IsValidModuleCommand(command, pcnt, user))
2923 // this bit of code cleverly routes all module commands
2924 // to all remote severs *automatically* so that modules
2925 // can just handle commands locally, without having
2926 // to have any special provision in place for remote
2927 // commands and linking protocols.
2928 std::deque<std::string> params;
2930 for (int j = 0; j < pcnt; j++)
2932 if (strchr(parameters[j],' '))
2934 params.push_back(":" + std::string(parameters[j]));
2938 params.push_back(std::string(parameters[j]));
2941 log(DEBUG,"Globally route '%s'",command.c_str());
2942 DoOneToMany(user->nick,command,params);
2947 virtual void OnGetServerDescription(std::string servername,std::string &description)
2949 TreeServer* s = FindServer(servername);
2952 description = s->GetDesc();
2956 virtual void OnUserInvite(userrec* source,userrec* dest,chanrec* channel)
2958 if (source->fd > -1)
2960 std::deque<std::string> params;
2961 params.push_back(dest->nick);
2962 params.push_back(channel->name);
2963 DoOneToMany(source->nick,"INVITE",params);
2967 virtual void OnPostLocalTopicChange(userrec* user, chanrec* chan, std::string topic)
2969 std::deque<std::string> params;
2970 params.push_back(chan->name);
2971 params.push_back(":"+topic);
2972 DoOneToMany(user->nick,"TOPIC",params);
2975 virtual void OnWallops(userrec* user, std::string text)
2979 std::deque<std::string> params;
2980 params.push_back(":"+text);
2981 DoOneToMany(user->nick,"WALLOPS",params);
2985 virtual void OnUserNotice(userrec* user, void* dest, int target_type, std::string text)
2987 if (target_type == TYPE_USER)
2989 userrec* d = (userrec*)dest;
2990 if ((d->fd < 0) && (user->fd > -1))
2992 std::deque<std::string> params;
2994 params.push_back(d->nick);
2995 params.push_back(":"+text);
2996 DoOneToOne(user->nick,"NOTICE",params,d->server);
3003 chanrec *c = (chanrec*)dest;
3004 std::deque<TreeServer*> list;
3005 GetListOfServersForChannel(c,list);
3006 unsigned int ucount = list.size();
3007 for (unsigned int i = 0; i < ucount; i++)
3009 TreeSocket* Sock = list[i]->GetSocket();
3011 Sock->WriteLine(":"+std::string(user->nick)+" NOTICE "+std::string(c->name)+" :"+text);
3017 virtual void OnUserMessage(userrec* user, void* dest, int target_type, std::string text)
3019 if (target_type == TYPE_USER)
3021 // route private messages which are targetted at clients only to the server
3022 // which needs to receive them
3023 userrec* d = (userrec*)dest;
3024 if ((d->fd < 0) && (user->fd > -1))
3026 std::deque<std::string> params;
3028 params.push_back(d->nick);
3029 params.push_back(":"+text);
3030 DoOneToOne(user->nick,"PRIVMSG",params,d->server);
3037 chanrec *c = (chanrec*)dest;
3038 std::deque<TreeServer*> list;
3039 GetListOfServersForChannel(c,list);
3040 unsigned int ucount = list.size();
3041 for (unsigned int i = 0; i < ucount; i++)
3043 TreeSocket* Sock = list[i]->GetSocket();
3045 Sock->WriteLine(":"+std::string(user->nick)+" PRIVMSG "+std::string(c->name)+" :"+text);
3051 virtual void OnBackgroundTimer(time_t curtime)
3053 AutoConnectServers(curtime);
3054 DoPingChecks(curtime);
3057 virtual void OnUserJoin(userrec* user, chanrec* channel)
3059 // Only do this for local users
3062 std::deque<std::string> params;
3064 params.push_back(channel->name);
3067 // if the channel has a key, force the join by emulating the key.
3068 params.push_back(channel->key);
3070 if (channel->GetUserCounter() > 1)
3072 // not the first in the channel
3073 DoOneToMany(user->nick,"JOIN",params);
3077 // first in the channel, set up their permissions
3078 // and the channel TS with FJOIN.
3080 snprintf(ts,24,"%lu",(unsigned long)channel->age);
3082 params.push_back(channel->name);
3083 params.push_back(ts);
3084 params.push_back("@"+std::string(user->nick));
3085 DoOneToMany(Srv->GetServerName(),"FJOIN",params);
3090 virtual void OnChangeHost(userrec* user, std::string newhost)
3092 // only occurs for local clients
3093 if (user->registered != 7)
3095 std::deque<std::string> params;
3096 params.push_back(newhost);
3097 DoOneToMany(user->nick,"FHOST",params);
3100 virtual void OnChangeName(userrec* user, std::string gecos)
3102 // only occurs for local clients
3103 if (user->registered != 7)
3105 std::deque<std::string> params;
3106 params.push_back(gecos);
3107 DoOneToMany(user->nick,"FNAME",params);
3110 virtual void OnUserPart(userrec* user, chanrec* channel, std::string partmessage)
3114 std::deque<std::string> params;
3115 params.push_back(channel->name);
3116 if (partmessage != "")
3117 params.push_back(":"+partmessage);
3118 DoOneToMany(user->nick,"PART",params);
3122 virtual void OnUserConnect(userrec* user)
3124 char agestr[MAXBUF];
3127 std::deque<std::string> params;
3128 snprintf(agestr,MAXBUF,"%lu",(unsigned long)user->age);
3129 params.push_back(agestr);
3130 params.push_back(user->nick);
3131 params.push_back(user->host);
3132 params.push_back(user->dhost);
3133 params.push_back(user->ident);
3134 params.push_back("+"+std::string(user->modes));
3135 params.push_back((char*)inet_ntoa(user->ip4));
3136 params.push_back(":"+std::string(user->fullname));
3137 DoOneToMany(Srv->GetServerName(),"NICK",params);
3139 // User is Local, change needs to be reflected!
3140 TreeServer* SourceServer = FindServer(user->server);
3142 SourceServer->AddUserCount();
3148 virtual void OnUserQuit(userrec* user, std::string reason)
3150 if ((user->fd > -1) && (user->registered == 7))
3152 std::deque<std::string> params;
3153 params.push_back(":"+reason);
3154 DoOneToMany(user->nick,"QUIT",params);
3156 // Regardless, We need to modify the user Counts..
3157 TreeServer* SourceServer = FindServer(user->server);
3159 SourceServer->DelUserCount();
3164 virtual void OnUserPostNick(userrec* user, std::string oldnick)
3168 std::deque<std::string> params;
3169 params.push_back(user->nick);
3170 DoOneToMany(oldnick,"NICK",params);
3174 virtual void OnUserKick(userrec* source, userrec* user, chanrec* chan, std::string reason)
3176 if ((source) && (source->fd > -1))
3178 std::deque<std::string> params;
3179 params.push_back(chan->name);
3180 params.push_back(user->nick);
3181 params.push_back(":"+reason);
3182 DoOneToMany(source->nick,"KICK",params);
3186 virtual void OnRemoteKill(userrec* source, userrec* dest, std::string reason)
3188 std::deque<std::string> params;
3189 params.push_back(dest->nick);
3190 params.push_back(":"+reason);
3191 DoOneToMany(source->nick,"KILL",params);
3194 virtual void OnRehash(std::string parameter)
3196 if (parameter != "")
3198 std::deque<std::string> params;
3199 params.push_back(parameter);
3200 DoOneToMany(Srv->GetServerName(),"REHASH",params);
3202 if (Srv->MatchText(Srv->GetServerName(),parameter))
3204 Srv->SendOpers("*** Remote rehash initiated from server \002"+Srv->GetServerName()+"\002.");
3205 Srv->RehashServer();
3208 ReadConfiguration(false);
3211 // note: the protocol does not allow direct umode +o except
3212 // via NICK with 8 params. sending OPERTYPE infers +o modechange
3214 virtual void OnOper(userrec* user, std::string opertype)
3218 std::deque<std::string> params;
3219 params.push_back(opertype);
3220 DoOneToMany(user->nick,"OPERTYPE",params);
3224 void OnLine(userrec* source, std::string host, bool adding, char linetype, long duration, std::string reason)
3226 if (source->fd > -1)
3229 snprintf(type,8,"%cLINE",linetype);
3230 std::string stype = type;
3233 char sduration[MAXBUF];
3234 snprintf(sduration,MAXBUF,"%ld",duration);
3235 std::deque<std::string> params;
3236 params.push_back(host);
3237 params.push_back(sduration);
3238 params.push_back(":"+reason);
3239 DoOneToMany(source->nick,stype,params);
3243 std::deque<std::string> params;
3244 params.push_back(host);
3245 DoOneToMany(source->nick,stype,params);
3250 virtual void OnAddGLine(long duration, userrec* source, std::string reason, std::string hostmask)
3252 OnLine(source,hostmask,true,'G',duration,reason);
3255 virtual void OnAddZLine(long duration, userrec* source, std::string reason, std::string ipmask)
3257 OnLine(source,ipmask,true,'Z',duration,reason);
3260 virtual void OnAddQLine(long duration, userrec* source, std::string reason, std::string nickmask)
3262 OnLine(source,nickmask,true,'Q',duration,reason);
3265 virtual void OnAddELine(long duration, userrec* source, std::string reason, std::string hostmask)
3267 OnLine(source,hostmask,true,'E',duration,reason);
3270 virtual void OnDelGLine(userrec* source, std::string hostmask)
3272 OnLine(source,hostmask,false,'G',0,"");
3275 virtual void OnDelZLine(userrec* source, std::string ipmask)
3277 OnLine(source,ipmask,false,'Z',0,"");
3280 virtual void OnDelQLine(userrec* source, std::string nickmask)
3282 OnLine(source,nickmask,false,'Q',0,"");
3285 virtual void OnDelELine(userrec* source, std::string hostmask)
3287 OnLine(source,hostmask,false,'E',0,"");
3290 virtual void OnMode(userrec* user, void* dest, int target_type, std::string text)
3292 if ((user->fd > -1) && (user->registered == 7))
3294 if (target_type == TYPE_USER)
3296 userrec* u = (userrec*)dest;
3297 std::deque<std::string> params;
3298 params.push_back(u->nick);
3299 params.push_back(text);
3300 DoOneToMany(user->nick,"MODE",params);
3304 chanrec* c = (chanrec*)dest;
3305 std::deque<std::string> params;
3306 params.push_back(c->name);
3307 params.push_back(text);
3308 DoOneToMany(user->nick,"MODE",params);
3313 virtual void ProtoSendMode(void* opaque, int target_type, void* target, std::string modeline)
3315 TreeSocket* s = (TreeSocket*)opaque;
3318 if (target_type == TYPE_USER)
3320 userrec* u = (userrec*)target;
3321 s->WriteLine(":"+Srv->GetServerName()+" FMODE "+u->nick+" "+modeline);
3325 chanrec* c = (chanrec*)target;
3326 s->WriteLine(":"+Srv->GetServerName()+" FMODE "+c->name+" "+modeline);
3331 virtual void ProtoSendMetaData(void* opaque, int target_type, void* target, std::string extname, std::string extdata)
3333 TreeSocket* s = (TreeSocket*)opaque;
3336 if (target_type == TYPE_USER)
3338 userrec* u = (userrec*)target;
3339 s->WriteLine(":"+Srv->GetServerName()+" METADATA "+u->nick+" "+extname+" :"+extdata);
3341 else if (target_type == TYPE_OTHER)
3343 s->WriteLine(":"+Srv->GetServerName()+" METADATA * "+extname+" :"+extdata);
3345 else if (target_type == TYPE_CHANNEL)
3347 chanrec* c = (chanrec*)target;
3348 s->WriteLine(":"+Srv->GetServerName()+" METADATA "+c->name+" "+extname+" :"+extdata);
3353 virtual void OnEvent(Event* event)
3355 if (event->GetEventID() == "send_metadata")
3357 std::deque<std::string>* params = (std::deque<std::string>*)event->GetData();
3358 if (params->size() < 3)
3360 (*params)[2] = ":" + (*params)[2];
3361 DoOneToMany(Srv->GetServerName(),"METADATA",*params);
3365 virtual ~ModuleSpanningTree()
3369 virtual Version GetVersion()
3371 return Version(1,0,0,0,VF_STATIC|VF_VENDOR);
3374 void Implements(char* List)
3376 List[I_OnPreCommand] = List[I_OnGetServerDescription] = List[I_OnUserInvite] = List[I_OnPostLocalTopicChange] = 1;
3377 List[I_OnWallops] = List[I_OnUserNotice] = List[I_OnUserMessage] = List[I_OnBackgroundTimer] = 1;
3378 List[I_OnUserJoin] = List[I_OnChangeHost] = List[I_OnChangeName] = List[I_OnUserPart] = List[I_OnUserConnect] = 1;
3379 List[I_OnUserQuit] = List[I_OnUserPostNick] = List[I_OnUserKick] = List[I_OnRemoteKill] = List[I_OnRehash] = 1;
3380 List[I_OnOper] = List[I_OnAddGLine] = List[I_OnAddZLine] = List[I_OnAddQLine] = List[I_OnAddELine] = 1;
3381 List[I_OnDelGLine] = List[I_OnDelZLine] = List[I_OnDelQLine] = List[I_OnDelELine] = List[I_ProtoSendMode] = List[I_OnMode] = 1;
3382 List[I_OnStats] = List[I_ProtoSendMetaData] = List[I_OnEvent] = 1;
3385 /* It is IMPORTANT that m_spanningtree is the last module in the chain
3386 * so that any activity it sees is FINAL, e.g. we arent going to send out
3387 * a NICK message before m_cloaking has finished putting the +x on the user,
3389 * Therefore, we return PRIORITY_LAST to make sure we end up at the END of
3390 * the module call queue.
3392 Priority Prioritize()
3394 return PRIORITY_LAST;
3399 class ModuleSpanningTreeFactory : public ModuleFactory
3402 ModuleSpanningTreeFactory()
3406 ~ModuleSpanningTreeFactory()
3410 virtual Module * CreateModule(Server* Me)
3412 TreeProtocolModule = new ModuleSpanningTree(Me);
3413 return TreeProtocolModule;
3419 extern "C" void * init_module( void )
3421 return new ModuleSpanningTreeFactory;