]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/modules/m_spanningtree.cpp
Fixed nick collision stuff
[user/henk/code/inspircd.git] / src / modules / m_spanningtree.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  Inspire is copyright (C) 2002-2005 ChatSpike-Dev.
6  *                       E-mail:
7  *                <brain@chatspike.net>
8  *                <Craig@chatspike.net>
9  *     
10  * Written by Craig Edwards, Craig McLure, and others.
11  * This program is free but copyrighted software; see
12  *            the file COPYING for details.
13  *
14  * ---------------------------------------------------
15  */
16
17 using namespace std;
18
19 #include <stdio.h>
20 #include <vector>
21 #include <deque>
22 #include "globals.h"
23 #include "inspircd_config.h"
24 #ifdef GCC3
25 #include <ext/hash_map>
26 #else
27 #include <hash_map>
28 #endif
29 #include "users.h"
30 #include "channels.h"
31 #include "modules.h"
32 #include "socket.h"
33 #include "helperfuncs.h"
34 #include "inspircd.h"
35 #include "inspstring.h"
36 #include "hashcomp.h"
37 #include "message.h"
38
39 #ifdef GCC3
40 #define nspace __gnu_cxx
41 #else
42 #define nspace std
43 #endif
44
45 enum ServerState { LISTENER, CONNECTING, WAIT_AUTH_1, WAIT_AUTH_2, CONNECTED };
46
47 typedef nspace::hash_map<std::string, userrec*, nspace::hash<string>, irc::StrHashComp> user_hash;
48 typedef nspace::hash_map<std::string, chanrec*, nspace::hash<string>, irc::StrHashComp> chan_hash;
49
50 extern user_hash clientlist;
51 extern chan_hash chanlist;
52
53 class TreeServer;
54 class TreeSocket;
55
56 bool DoOneToOne(std::string prefix, std::string command, std::deque<std::string> params, std::string target);
57 bool DoOneToAllButSender(std::string prefix, std::string command, std::deque<std::string> params, std::string omit);
58 bool DoOneToMany(std::string prefix, std::string command, std::deque<std::string> params);
59 bool DoOneToAllButSenderRaw(std::string data,std::string omit);
60
61 class TreeServer
62 {
63         TreeServer* Parent;
64         std::vector<TreeServer*> Children;
65         std::string ServerName;
66         std::string ServerDesc;
67         std::string VersionString;
68         int UserCount;
69         int OperCount;
70         TreeSocket* Socket;     // for directly connected servers this points at the socket object
71         
72  public:
73
74         TreeServer()
75         {
76                 Parent = NULL;
77                 ServerName = "";
78                 ServerDesc = "";
79                 VersionString = "";
80                 UserCount = OperCount = 0;
81         }
82
83         TreeServer(std::string Name, std::string Desc) : ServerName(Name), ServerDesc(Desc)
84         {
85                 Parent = NULL;
86                 VersionString = "";
87                 UserCount = OperCount = 0;
88         }
89
90         TreeServer(std::string Name, std::string Desc, TreeServer* Above, TreeSocket* Sock) : Parent(Above), ServerName(Name), ServerDesc(Desc), Socket(Sock)
91         {
92                 VersionString = "";
93                 UserCount = OperCount = 0;
94         }
95
96         std::string GetName()
97         {
98                 return this->ServerName;
99         }
100
101         std::string GetDesc()
102         {
103                 return this->ServerDesc;
104         }
105
106         std::string GetVersion()
107         {
108                 return this->VersionString;
109         }
110
111         int GetUserCount()
112         {
113                 return this->UserCount;
114         }
115
116         int GetOperCount()
117         {
118                 return this->OperCount;
119         }
120
121         TreeSocket* GetSocket()
122         {
123                 return this->Socket;
124         }
125
126         TreeServer* GetParent()
127         {
128                 return this->Parent;
129         }
130
131         unsigned int ChildCount()
132         {
133                 return Children.size();
134         }
135
136         TreeServer* GetChild(unsigned int n)
137         {
138                 if (n < Children.size())
139                 {
140                         return Children[n];
141                 }
142                 else
143                 {
144                         return NULL;
145                 }
146         }
147
148         void AddChild(TreeServer* Child)
149         {
150                 Children.push_back(Child);
151         }
152
153         bool DelChild(TreeServer* Child)
154         {
155                 for (std::vector<TreeServer*>::iterator a = Children.begin(); a < Children.end(); a++)
156                 {
157                         if (*a == Child)
158                         {
159                                 Children.erase(a);
160                                 return true;
161                         }
162                 }
163                 return false;
164         }
165
166         // removes child nodes of this node, and of that node, etc etc
167         bool Tidy()
168         {
169                 bool stillchildren = true;
170                 while (stillchildren)
171                 {
172                         stillchildren = false;
173                         for (std::vector<TreeServer*>::iterator a = Children.begin(); a < Children.end(); a++)
174                         {
175                                 TreeServer* s = (TreeServer*)*a;
176                                 s->Tidy();
177                                 Children.erase(a);
178                                 delete s;
179                                 stillchildren = true;
180                                 break;
181                         }
182                 }
183                 return true;
184         }
185 };
186
187 class Link
188 {
189  public:
190          std::string Name;
191          std::string IPAddr;
192          int Port;
193          std::string SendPass;
194          std::string RecvPass;
195 };
196
197 /* $ModDesc: Povides a spanning tree server link protocol */
198
199 Server *Srv;
200 ConfigReader *Conf;
201 TreeServer *TreeRoot;
202 std::vector<Link> LinkBlocks;
203
204 TreeServer* RouteEnumerate(TreeServer* Current, std::string ServerName)
205 {
206         if (Current->GetName() == ServerName)
207                 return Current;
208         for (unsigned int q = 0; q < Current->ChildCount(); q++)
209         {
210                 TreeServer* found = RouteEnumerate(Current->GetChild(q),ServerName);
211                 if (found)
212                 {
213                         return found;
214                 }
215         }
216         return NULL;
217 }
218
219 // Returns the locally connected server we must route a
220 // message through to reach server 'ServerName'. This
221 // only applies to one-to-one and not one-to-many routing.
222 TreeServer* BestRouteTo(std::string ServerName)
223 {
224         log(DEBUG,"Finding best route to %s",ServerName.c_str());
225         if (ServerName.c_str() == TreeRoot->GetName())
226         {
227                 log(DEBUG,"Cant route to myself!!!");
228                 return NULL;
229         }
230         // first, find the server by recursively walking the tree
231         TreeServer* Found = RouteEnumerate(TreeRoot,ServerName);
232         // did we find it? If not, they did something wrong, abort.
233         if (!Found)
234         {
235                 log(DEBUG,"Failed to find %s by walking tree!",ServerName.c_str());
236                 return NULL;
237         }
238         else
239         {
240                 // The server exists, follow its parent nodes until
241                 // the parent of the current is 'TreeRoot', we know
242                 // then that this is a directly-connected server.
243                 while ((Found) && (Found->GetParent() != TreeRoot))
244                 {
245                         Found = Found->GetParent();
246                 }
247                 log(DEBUG,"Route to %s is via %s",ServerName.c_str(),Found->GetName().c_str());
248                 return Found;
249         }
250 }
251
252 bool LookForServer(TreeServer* Current, std::string ServerName)
253 {
254         if (ServerName == Current->GetName())
255                 return true;
256         for (unsigned int q = 0; q < Current->ChildCount(); q++)
257         {
258                 if (LookForServer(Current->GetChild(q),ServerName))
259                         return true;
260         }
261         return false;
262 }
263
264 TreeServer* Found;
265
266 void RFindServer(TreeServer* Current, std::string ServerName)
267 {
268         if ((ServerName == Current->GetName()) && (!Found))
269         {
270                 Found = Current;
271                 log(DEBUG,"Found server %s desc %s",Current->GetName().c_str(),Current->GetDesc().c_str());
272                 return;
273         }
274         if (!Found)
275         {
276                 for (unsigned int q = 0; q < Current->ChildCount(); q++)
277                 {
278                         if (!Found)
279                                 RFindServer(Current->GetChild(q),ServerName);
280                 }
281         }
282         return;
283 }
284
285 TreeServer* FindServer(std::string ServerName)
286 {
287         Found = NULL;
288         RFindServer(TreeRoot,ServerName);
289         return Found;
290 }
291
292 bool IsServer(std::string ServerName)
293 {
294         return LookForServer(TreeRoot,ServerName);
295 }
296
297 class TreeSocket : public InspSocket
298 {
299         std::string myhost;
300         std::string in_buffer;
301         ServerState LinkState;
302         std::string InboundServerName;
303         std::string InboundDescription;
304         int num_lost_users;
305         int num_lost_servers;
306         
307  public:
308
309         TreeSocket(std::string host, int port, bool listening, unsigned long maxtime)
310                 : InspSocket(host, port, listening, maxtime)
311         {
312                 Srv->Log(DEBUG,"Create new listening");
313                 myhost = host;
314                 this->LinkState = LISTENER;
315         }
316
317         TreeSocket(std::string host, int port, bool listening, unsigned long maxtime, std::string ServerName)
318                 : InspSocket(host, port, listening, maxtime)
319         {
320                 Srv->Log(DEBUG,"Create new outbound");
321                 myhost = ServerName;
322                 this->LinkState = CONNECTING;
323         }
324
325         TreeSocket(int newfd, char* ip)
326                 : InspSocket(newfd, ip)
327         {
328                 Srv->Log(DEBUG,"Associate new inbound");
329                 this->LinkState = WAIT_AUTH_1;
330         }
331         
332         virtual bool OnConnected()
333         {
334                 if (this->LinkState == CONNECTING)
335                 {
336                         Srv->SendOpers("*** Connection to "+myhost+"["+this->GetIP()+"] established.");
337                         // we should send our details here.
338                         // if the other side is satisfied, they send theirs.
339                         // we do not need to change state here.
340                         for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
341                         {
342                                 if (x->Name == this->myhost)
343                                 {
344                                         // found who we're supposed to be connecting to, send the neccessary gubbins.
345                                         this->WriteLine("SERVER "+Srv->GetServerName()+" "+x->SendPass+" 0 :"+Srv->GetServerDescription());
346                                         return true;
347                                 }
348                         }
349                 }
350                 log(DEBUG,"Outbound connection ERROR: Could not find the right link block!");
351                 return true;
352         }
353         
354         virtual void OnError(InspSocketError e)
355         {
356         }
357
358         virtual int OnDisconnect()
359         {
360                 return true;
361         }
362
363         // recursively send the server tree with distances as hops
364         void SendServers(TreeServer* Current, TreeServer* s, int hops)
365         {
366                 char command[1024];
367                 for (unsigned int q = 0; q < Current->ChildCount(); q++)
368                 {
369                         TreeServer* recursive_server = Current->GetChild(q);
370                         if (recursive_server != s)
371                         {
372                                 // :source.server SERVER server.name hops :Description
373                                 snprintf(command,1024,":%s SERVER %s * %d :%s",Current->GetName().c_str(),recursive_server->GetName().c_str(),hops,recursive_server->GetDesc().c_str());
374                                 this->WriteLine(command);
375                                 // down to next level
376                                 this->SendServers(recursive_server, s, hops+1);
377                         }
378                 }
379         }
380
381         void SquitServer(TreeServer* Current)
382         {
383                 // recursively squit the servers attached to 'Current'
384                 for (unsigned int q = 0; q < Current->ChildCount(); q++)
385                 {
386                         TreeServer* recursive_server = Current->GetChild(q);
387                         this->SquitServer(recursive_server);
388                 }
389                 // Now we've whacked the kids, whack self
390                 log(DEBUG,"Deleted %s",Current->GetName().c_str());
391                 num_lost_servers++;
392                 bool quittingpeople = true;
393                 while (quittingpeople)
394                 {
395                         quittingpeople = false;
396                         for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
397                         {
398                                 if (!strcasecmp(u->second->server,Current->GetName().c_str()))
399                                 {
400                                         log(DEBUG,"Quitting user %s of server %s",u->second->nick,u->second->server);
401                                         Srv->QuitUser(u->second,Current->GetName()+" "+std::string(Srv->GetServerName()));
402                                         num_lost_users++;
403                                         quittingpeople = true;
404                                         break;
405                                 }
406                         }
407                 }
408         }
409
410         void Squit(TreeServer* Current,std::string reason)
411         {
412                 if (Current)
413                 {
414                         std::deque<std::string> params;
415                         params.push_back(Current->GetName());
416                         params.push_back(":"+reason);
417                         DoOneToAllButSender(Current->GetParent()->GetName(),"SQUIT",params,Current->GetName());
418                         if (Current->GetParent() == TreeRoot)
419                         {
420                                 Srv->SendOpers("Server \002"+Current->GetName()+"\002 split: "+reason);
421                         }
422                         else
423                         {
424                                 Srv->SendOpers("Server \002"+Current->GetName()+"\002 split from server \002"+Current->GetParent()->GetName()+"\002 with reason: "+reason);
425                         }
426                         num_lost_servers = 0;
427                         num_lost_users = 0;
428                         SquitServer(Current);
429                         Current->Tidy();
430                         Current->GetParent()->DelChild(Current);
431                         delete Current;
432                         WriteOpers("Netsplit complete, lost \002%d\002 users on \002%d\002 servers.", num_lost_users, num_lost_servers);
433                 }
434                 else
435                 {
436                         log(DEBUG,"Squit from unknown server");
437                 }
438         }
439
440         bool ForceMode(std::string source, std::deque<std::string> params)
441         {
442                 userrec* who = new userrec;
443                 who->fd = FD_MAGIC_NUMBER;
444                 if (params.size() < 2)
445                         return true;
446                 char* modelist[255];
447                 for (unsigned int q = 0; q < params.size(); q++)
448                 {
449                         modelist[q] = (char*)params[q].c_str();
450                 }
451                 Srv->SendMode(modelist,params.size(),who);
452                 DoOneToAllButSender(source,"FMODE",params,source);
453                 delete who;
454                 return true;
455         }
456
457         bool ForceTopic(std::string source, std::deque<std::string> params)
458         {
459                 // FTOPIC %s %lu %s :%s
460                 if (params.size() != 4)
461                         return true;
462                 std::string channel = params[0];
463                 time_t ts = atoi(params[1].c_str());
464                 std::string setby = params[2];
465                 std::string topic = params[3];
466
467                 chanrec* c = Srv->FindChannel(channel);
468                 if (c)
469                 {
470                         if ((ts >= c->topicset) || (!*c->topic))
471                         {
472                                 strlcpy(c->topic,topic.c_str(),MAXTOPIC);
473                                 strlcpy(c->setby,setby.c_str(),NICKMAX);
474                                 c->topicset = ts;
475                                 WriteChannelWithServ((char*)source.c_str(), c, "TOPIC %s :%s", c->name, c->topic);
476                         }
477                         
478                 }
479                 
480                 // all done, send it on its way
481                 params[3] = ":" + params[3];
482                 DoOneToAllButSender(source,"FTOPIC",params,source);
483
484                 return true;
485         }
486
487         bool ForceJoin(std::string source, std::deque<std::string> params)
488         {
489                 if (params.size() < 1)
490                         return true;
491                 for (unsigned int channelnum = 0; channelnum < params.size(); channelnum++)
492                 {
493                         // process one channel at a time, applying modes.
494                         char* channel = (char*)params[channelnum].c_str();
495                         char permissions = *channel;
496                         char* mode = NULL;
497                         switch (permissions)
498                         {
499                                 case '@':
500                                         channel++;
501                                         mode = "+o";
502                                 break;
503                                 case '%':
504                                         channel++;
505                                         mode = "+h";
506                                 break;
507                                 case '+':
508                                         channel++;
509                                         mode = "+v";
510                                 break;
511                         }
512                         userrec* who = Srv->FindNick(source);
513                         if (who)
514                         {
515                                 char* key = "";
516                                 chanrec* chan = Srv->FindChannel(channel);
517                                 if ((chan) && (*chan->key))
518                                 {
519                                         key = chan->key;
520                                 }
521                                 Srv->JoinUserToChannel(who,channel,key);
522                                 if (mode)
523                                 {
524                                         char* modelist[3];
525                                         modelist[0] = channel;
526                                         modelist[1] = mode;
527                                         modelist[2] = who->nick;
528                                         Srv->SendMode(modelist,3,who);
529                                 }
530                                 DoOneToAllButSender(source,"FJOIN",params,who->server);
531                         }
532                 }
533                 return true;
534         }
535
536         bool IntroduceClient(std::string source, std::deque<std::string> params)
537         {
538                 if (params.size() < 8)
539                         return true;
540                 // NICK age nick host dhost ident +modes ip :gecos
541                 //       0   1    2    3      4     5    6   7
542                 std::string nick = params[1];
543                 std::string host = params[2];
544                 std::string dhost = params[3];
545                 std::string ident = params[4];
546                 time_t age = atoi(params[0].c_str());
547                 std::string modes = params[5];
548                 if (*(modes.c_str()) == '+')
549                 {
550                         char* m = (char*)modes.c_str();
551                         m++;
552                         modes = m;
553                 }
554                 std::string ip = params[6];
555                 std::string gecos = params[7];
556                 char* tempnick = (char*)nick.c_str();
557                 log(DEBUG,"Introduce client %s!%s@%s",tempnick,ident.c_str(),host.c_str());
558                 
559                 user_hash::iterator iter;
560                 iter = clientlist.find(tempnick);
561                 if (iter != clientlist.end())
562                 {
563                         // nick collision
564                         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);
565                         Srv->QuitUser(iter->second,"Killed (Nickname collision from "+source+")");
566                         return true;
567                 }
568                 
569                 clientlist[tempnick] = new userrec();
570                 clientlist[tempnick]->fd = FD_MAGIC_NUMBER;
571                 strlcpy(clientlist[tempnick]->nick, tempnick,NICKMAX);
572                 strlcpy(clientlist[tempnick]->host, host.c_str(),160);
573                 strlcpy(clientlist[tempnick]->dhost, dhost.c_str(),160);
574                 clientlist[tempnick]->server = (char*)FindServerNamePtr(source.c_str());
575                 strlcpy(clientlist[tempnick]->ident, ident.c_str(),IDENTMAX);
576                 strlcpy(clientlist[tempnick]->fullname, gecos.c_str(),MAXGECOS);
577                 clientlist[tempnick]->registered = 7;
578                 clientlist[tempnick]->signon = age;
579                 strlcpy(clientlist[tempnick]->ip,ip.c_str(),16);
580                 for (int i = 0; i < MAXCHANS; i++)
581                 {
582                         clientlist[tempnick]->chans[i].channel = NULL;
583                         clientlist[tempnick]->chans[i].uc_modes = 0;
584                 }
585                 params[7] = ":" + params[7];
586                 DoOneToAllButSender(source,"NICK",params,source);
587                 return true;
588         }
589
590         void SendChannelModes(TreeServer* Current)
591         {
592                 char data[MAXBUF];
593                 for (chan_hash::iterator c = chanlist.begin(); c != chanlist.end(); c++)
594                 {
595                         snprintf(data,MAXBUF,":%s FMODE %s +%s",Srv->GetServerName().c_str(),c->second->name,chanmodes(c->second));
596                         this->WriteLine(data);
597                         if (*c->second->topic)
598                         {
599                                 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);
600                                 this->WriteLine(data);
601                         }
602                         for (BanList::iterator b = c->second->bans.begin(); b != c->second->bans.end(); b++)
603                         {
604                                 snprintf(data,MAXBUF,":%s FMODE %s +b %s",Srv->GetServerName().c_str(),c->second->name,b->data);
605                                 this->WriteLine(data);
606                         }
607                 }
608         }
609
610         // send all users and their channels
611         void SendUsers(TreeServer* Current)
612         {
613                 char data[MAXBUF];
614                 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
615                 {
616                         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,u->second->ip,u->second->fullname);
617                         this->WriteLine(data);
618                         if (strchr(u->second->modes,'o'))
619                         {
620                                 this->WriteLine(":"+std::string(u->second->nick)+" OPERTYPE "+std::string(u->second->oper));
621                         }
622                         char* chl = chlist(u->second,u->second);
623                         if (*chl)
624                         {
625                                 this->WriteLine(":"+std::string(u->second->nick)+" FJOIN "+std::string(chl));
626                         }
627                 }
628         }
629
630         void DoBurst(TreeServer* s)
631         {
632                 log(DEBUG,"Beginning network burst");
633                 Srv->SendOpers("*** Bursting to "+s->GetName()+".");
634                 this->WriteLine("BURST");
635                 // Send server tree
636                 this->SendServers(TreeRoot,s,1);
637                 // Send users and their channels
638                 this->SendUsers(s);
639                 // TODO: Send everything else (channel modes etc)
640                 this->SendChannelModes(s);
641                 this->WriteLine("ENDBURST");
642         }
643
644         virtual bool OnDataReady()
645         {
646                 char* data = this->Read();
647                 if (data)
648                 {
649                         this->in_buffer += data;
650                         while (in_buffer.find("\n") != std::string::npos)
651                         {
652                                 char* line = (char*)in_buffer.c_str();
653                                 std::string ret = "";
654                                 while ((*line != '\n') && (strlen(line)))
655                                 {
656                                         ret = ret + *line;
657                                         line++;
658                                 }
659                                 if ((*line == '\n') || (*line == '\r'))
660                                         line++;
661                                 in_buffer = line;
662                                 if (!this->ProcessLine(ret))
663                                 {
664                                         return false;
665                                 }
666                         }
667                 }
668                 return (data != NULL);
669         }
670
671         int WriteLine(std::string line)
672         {
673                 return this->Write(line + "\r\n");
674         }
675
676         bool Error(std::deque<std::string> params)
677         {
678                 if (params.size() < 1)
679                         return false;
680                 std::string Errmsg = params[0];
681                 std::string SName = myhost;
682                 if (InboundServerName != "")
683                 {
684                         SName = InboundServerName;
685                 }
686                 Srv->SendOpers("*** ERROR from "+SName+": "+Errmsg);
687                 // we will return false to cause the socket to close.
688                 return false;
689         }
690
691         bool OperType(std::string prefix, std::deque<std::string> params)
692         {
693                 if (params.size() != 1)
694                         return true;
695                 std::string opertype = params[0];
696                 userrec* u = Srv->FindNick(prefix);
697                 if (u)
698                 {
699                         strlcpy(u->oper,opertype.c_str(),NICKMAX);
700                         if (!strchr(u->modes,'o'))
701                         {
702                                 strcat(u->modes,"o");
703                         }
704                         DoOneToAllButSender(u->server,"OPERTYPE",params,u->server);
705                 }
706                 return true;
707         }
708
709         bool RemoteKill(std::string prefix, std::deque<std::string> params)
710         {
711                 if (params.size() != 2)
712                         return true;
713                 std::string nick = params[0];
714                 std::string reason = params[1];
715                 userrec* u = Srv->FindNick(prefix);
716                 userrec* who = Srv->FindNick(nick);
717                 if (who)
718                 {
719                         std::string sourceserv = prefix;
720                         if (u)
721                         {
722                                 sourceserv = u->server;
723                         }
724                         params[1] = ":" + params[1];
725                         DoOneToAllButSender(prefix,"KILL",params,sourceserv);
726                         Srv->QuitUser(who,reason);
727                 }
728                 return true;
729         }
730
731         bool RemoteServer(std::string prefix, std::deque<std::string> params)
732         {
733                 if (params.size() < 4)
734                         return false;
735                 std::string servername = params[0];
736                 std::string password = params[1];
737                 int hops = atoi(params[2].c_str());
738                 std::string description = params[3];
739                 if (!hops)
740                 {
741                         this->WriteLine("ERROR :Protocol error - Introduced remote server with incorrect hopcount!");
742                         return false;
743                 }
744                 TreeServer* ParentOfThis = FindServer(prefix);
745                 if (!ParentOfThis)
746                 {
747                         this->WriteLine("ERROR :Protocol error - Introduced remote server from unknown server "+prefix);
748                         return false;
749                 }
750                 TreeServer* Node = new TreeServer(servername,description,ParentOfThis,NULL);
751                 ParentOfThis->AddChild(Node);
752                 params[3] = ":" + params[3];
753                 DoOneToAllButSender(prefix,"SERVER",params,prefix);
754                 Srv->SendOpers("*** Server \002"+prefix+"\002 introduced server \002"+servername+"\002 ("+description+")");
755                 return true;
756         }
757
758         bool Outbound_Reply_Server(std::deque<std::string> params)
759         {
760                 if (params.size() < 4)
761                         return false;
762                 std::string servername = params[0];
763                 std::string password = params[1];
764                 int hops = atoi(params[2].c_str());
765                 if (hops)
766                 {
767                         this->WriteLine("ERROR :Server too far away for authentication");
768                         return false;
769                 }
770                 std::string description = params[3];
771                 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
772                 {
773                         if ((x->Name == servername) && (x->RecvPass == password))
774                         {
775                                 // Begin the sync here. this kickstarts the
776                                 // other side, waiting in WAIT_AUTH_2 state,
777                                 // into starting their burst, as it shows
778                                 // that we're happy.
779                                 this->LinkState = CONNECTED;
780                                 // we should add the details of this server now
781                                 // to the servers tree, as a child of the root
782                                 // node.
783                                 TreeServer* Node = new TreeServer(servername,description,TreeRoot,this);
784                                 TreeRoot->AddChild(Node);
785                                 params[3] = ":" + params[3];
786                                 DoOneToAllButSender(TreeRoot->GetName(),"SERVER",params,servername);
787                                 this->DoBurst(Node);
788                                 return true;
789                         }
790                 }
791                 this->WriteLine("ERROR :Invalid credentials");
792                 return false;
793         }
794
795         bool Inbound_Server(std::deque<std::string> params)
796         {
797                 if (params.size() < 4)
798                         return false;
799                 std::string servername = params[0];
800                 std::string password = params[1];
801                 int hops = atoi(params[2].c_str());
802                 if (hops)
803                 {
804                         this->WriteLine("ERROR :Server too far away for authentication");
805                         return false;
806                 }
807                 std::string description = params[3];
808                 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
809                 {
810                         if ((x->Name == servername) && (x->RecvPass == password))
811                         {
812                                 Srv->SendOpers("*** Verified incoming server connection from \002"+servername+"\002["+this->GetIP()+"] ("+description+")");
813                                 this->InboundServerName = servername;
814                                 this->InboundDescription = description;
815                                 // this is good. Send our details: Our server name and description and hopcount of 0,
816                                 // along with the sendpass from this block.
817                                 this->WriteLine("SERVER "+Srv->GetServerName()+" "+x->SendPass+" 0 :"+Srv->GetServerDescription());
818                                 // move to the next state, we are now waiting for THEM.
819                                 this->LinkState = WAIT_AUTH_2;
820                                 return true;
821                         }
822                 }
823                 this->WriteLine("ERROR :Invalid credentials");
824                 return false;
825         }
826
827         std::deque<std::string> Split(std::string line, bool stripcolon)
828         {
829                 std::deque<std::string> n;
830                 std::stringstream s(line);
831                 std::string param = "";
832                 n.clear();
833                 int item = 0;
834                 while (!s.eof())
835                 {
836                         s >> param;
837                         if ((param != "") && (param != "\n"))
838                         {
839                                 if ((param.c_str()[0] == ':') && (item))
840                                 {
841                                         char* str = (char*)param.c_str();
842                                         str++;
843                                         param = str;
844                                         std::string append;
845                                         while (!s.eof())
846                                         {
847                                                 append = "";
848                                                 s >> append;
849                                                 if (append != "")
850                                                 {
851                                                         param = param + " " + append;
852                                                 }
853                                         }
854                                 }
855                                 item++;
856                                 n.push_back(param);
857                         }
858                 }
859                 return n;
860         }
861
862         bool ProcessLine(std::string line)
863         {
864                 char* l = (char*)line.c_str();
865                 while ((strlen(l)) && (l[strlen(l)-1] == '\r') || (l[strlen(l)-1] == '\n'))
866                         l[strlen(l)-1] = '\0';
867                 line = l;
868                 if (line == "")
869                         return true;
870                 Srv->Log(DEBUG,"inbound-line: '"+line+"'");
871                 std::deque<std::string> params = this->Split(line,true);
872                 std::string command = "";
873                 std::string prefix = "";
874                 if (((params[0].c_str())[0] == ':') && (params.size() > 1))
875                 {
876                         prefix = params[0];
877                         command = params[1];
878                         char* pref = (char*)prefix.c_str();
879                         prefix = ++pref;
880                         params.pop_front();
881                         params.pop_front();
882                 }
883                 else
884                 {
885                         prefix = "";
886                         command = params[0];
887                         params.pop_front();
888                 }
889                 
890                 switch (this->LinkState)
891                 {
892                         TreeServer* Node;
893                         
894                         case WAIT_AUTH_1:
895                                 // Waiting for SERVER command from remote server. Server initiating
896                                 // the connection sends the first SERVER command, listening server
897                                 // replies with theirs if its happy, then if the initiator is happy,
898                                 // it starts to send its net sync, which starts the merge, otherwise
899                                 // it sends an ERROR.
900                                 if (command == "SERVER")
901                                 {
902                                         return this->Inbound_Server(params);
903                                 }
904                                 else if (command == "ERROR")
905                                 {
906                                         return this->Error(params);
907                                 }
908                         break;
909                         case WAIT_AUTH_2:
910                                 // Waiting for start of other side's netmerge to say they liked our
911                                 // password.
912                                 if (command == "SERVER")
913                                 {
914                                         // cant do this, they sent it to us in the WAIT_AUTH_1 state!
915                                         // silently ignore.
916                                         return true;
917                                 }
918                                 else if (command == "BURST")
919                                 {
920                                         this->LinkState = CONNECTED;
921                                         Node = new TreeServer(InboundServerName,InboundDescription,TreeRoot,this);
922                                         TreeRoot->AddChild(Node);
923                                         params.clear();
924                                         params.push_back(InboundServerName);
925                                         params.push_back("*");
926                                         params.push_back("1");
927                                         params.push_back(":"+InboundDescription);
928                                         DoOneToAllButSender(TreeRoot->GetName(),"SERVER",params,InboundServerName);
929                                         this->DoBurst(Node);
930                                 }
931                                 else if (command == "ERROR")
932                                 {
933                                         return this->Error(params);
934                                 }
935                                 
936                         break;
937                         case LISTENER:
938                                 this->WriteLine("ERROR :Internal error -- listening socket accepted its own descriptor!!!");
939                                 return false;
940                         break;
941                         case CONNECTING:
942                                 if (command == "SERVER")
943                                 {
944                                         // another server we connected to, which was in WAIT_AUTH_1 state,
945                                         // has just sent us their credentials. If we get this far, theyre
946                                         // happy with OUR credentials, and they are now in WAIT_AUTH_2 state.
947                                         // if we're happy with this, we should send our netburst which
948                                         // kickstarts the merge.
949                                         return this->Outbound_Reply_Server(params);
950                                 }
951                         break;
952                         case CONNECTED:
953                                 // This is the 'authenticated' state, when all passwords
954                                 // have been exchanged and anything past this point is taken
955                                 // as gospel.
956                                 std::string target = "";
957                                 if ((command == "NICK") && (params.size() > 1))
958                                 {
959                                         return this->IntroduceClient(prefix,params);
960                                 }
961                                 else if (command == "FJOIN")
962                                 {
963                                         return this->ForceJoin(prefix,params);
964                                 }
965                                 else if (command == "SERVER")
966                                 {
967                                         return this->RemoteServer(prefix,params);
968                                 }
969                                 else if (command == "OPERTYPE")
970                                 {
971                                         return this->OperType(prefix,params);
972                                 }
973                                 else if (command == "FMODE")
974                                 {
975                                         return this->ForceMode(prefix,params);
976                                 }
977                                 else if (command == "KILL")
978                                 {
979                                         return this->RemoteKill(prefix,params);
980                                 }
981                                 else if (command == "FTOPIC")
982                                 {
983                                         return this->ForceTopic(prefix,params);
984                                 }
985                                 else if (command == "SQUIT")
986                                 {
987                                         if (params.size() == 2)
988                                         {
989                                                 this->Squit(FindServer(params[0]),params[1]);
990                                         }
991                                         return true;
992                                 }
993                                 else
994                                 {
995                                         // not a special inter-server command.
996                                         // Emulate the actual user doing the command,
997                                         // this saves us having a huge ugly parser.
998                                         userrec* who = Srv->FindNick(prefix);
999                                         std::string sourceserv = this->myhost;
1000                                         if (this->InboundServerName != "")
1001                                         {
1002                                                 sourceserv = this->InboundServerName;
1003                                         }
1004                                         if (who)
1005                                         {
1006                                                 // its a user
1007                                                 target = who->server;
1008                                                 char* strparams[127];
1009                                                 for (unsigned int q = 0; q < params.size(); q++)
1010                                                 {
1011                                                         strparams[q] = (char*)params[q].c_str();
1012                                                 }
1013                                                 log(DEBUG,"*** CALL COMMAND HANDLER FOR %s, SOURCE: '%s'",command.c_str(),who->nick);
1014                                                 Srv->CallCommandHandler(command, strparams, params.size(), who);
1015                                         }
1016                                         else
1017                                         {
1018                                                 // its not a user. Its either a server, or somethings screwed up.
1019                                                 if (IsServer(prefix))
1020                                                 {
1021                                                         target = Srv->GetServerName();
1022                                                 }
1023                                                 else
1024                                                 {
1025                                                         log(DEBUG,"Command with unknown origin '%s'",prefix.c_str());
1026                                                         return true;
1027                                                 }
1028                                         }
1029                                         return DoOneToAllButSenderRaw(line,sourceserv);
1030
1031                                 }
1032                                 return true;
1033                         break;  
1034                 }
1035                 return true;
1036         }
1037
1038         virtual void OnTimeout()
1039         {
1040                 if (this->LinkState == CONNECTING)
1041                 {
1042                         Srv->SendOpers("*** CONNECT: Connection to \002"+myhost+"\002 timed out.");
1043                 }
1044         }
1045
1046         virtual void OnClose()
1047         {
1048                 // Connection closed.
1049                 // If the connection is fully up (state CONNECTED)
1050                 // then propogate a netsplit to all peers.
1051                 std::string quitserver = this->myhost;
1052                 if (this->InboundServerName != "")
1053                 {
1054                         quitserver = this->InboundServerName;
1055                 }
1056                 TreeServer* s = FindServer(quitserver);
1057                 if (s)
1058                 {
1059                         Squit(s,"Remote host closed the connection");
1060                 }
1061         }
1062
1063         virtual int OnIncomingConnection(int newsock, char* ip)
1064         {
1065                 TreeSocket* s = new TreeSocket(newsock, ip);
1066                 Srv->AddSocket(s);
1067                 return true;
1068         }
1069 };
1070
1071 bool DoOneToAllButSenderRaw(std::string data,std::string omit)
1072 {
1073         for (unsigned int x = 0; x < TreeRoot->ChildCount(); x++)
1074         {
1075                 TreeServer* Route = TreeRoot->GetChild(x);
1076                 if ((Route->GetSocket()) && (Route->GetName() != omit) && (BestRouteTo(omit) != Route))
1077                 {
1078                         TreeSocket* Sock = Route->GetSocket();
1079                         log(DEBUG,"Sending RAW to %s",Route->GetName().c_str());
1080                         Sock->WriteLine(data);
1081                 }
1082         }
1083         return true;
1084 }
1085
1086 bool DoOneToAllButSender(std::string prefix, std::string command, std::deque<std::string> params, std::string omit)
1087 {
1088         log(DEBUG,"ALLBUTONE: Comes from %s SHOULD NOT go back to %s",prefix.c_str(),omit.c_str());
1089         // TODO: Special stuff with privmsg and notice
1090         std::string FullLine = ":" + prefix + " " + command;
1091         for (unsigned int x = 0; x < params.size(); x++)
1092         {
1093                 FullLine = FullLine + " " + params[x];
1094         }
1095         for (unsigned int x = 0; x < TreeRoot->ChildCount(); x++)
1096         {
1097                 TreeServer* Route = TreeRoot->GetChild(x);
1098                 // Send the line IF:
1099                 // The route has a socket (its a direct connection)
1100                 // The route isnt the one to be omitted
1101                 // The route isnt the path to the one to be omitted
1102                 if ((Route->GetSocket()) && (Route->GetName() != omit) && (BestRouteTo(omit) != Route))
1103                 {
1104                         TreeSocket* Sock = Route->GetSocket();
1105                         log(DEBUG,"Sending to %s",Route->GetName().c_str());
1106                         Sock->WriteLine(FullLine);
1107                 }
1108         }
1109         return true;
1110 }
1111
1112 bool DoOneToMany(std::string prefix, std::string command, std::deque<std::string> params)
1113 {
1114         std::string FullLine = ":" + prefix + " " + command;
1115         for (unsigned int x = 0; x < params.size(); x++)
1116         {
1117                 FullLine = FullLine + " " + params[x];
1118         }
1119         for (unsigned int x = 0; x < TreeRoot->ChildCount(); x++)
1120         {
1121                 TreeServer* Route = TreeRoot->GetChild(x);
1122                 if (Route->GetSocket())
1123                 {
1124                         TreeSocket* Sock = Route->GetSocket();
1125                         Sock->WriteLine(FullLine);
1126                 }
1127         }
1128         return true;
1129 }
1130
1131 bool DoOneToOne(std::string prefix, std::string command, std::deque<std::string> params, std::string target)
1132 {
1133         TreeServer* Route = BestRouteTo(target);
1134         if (Route)
1135         {
1136                 std::string FullLine = ":" + prefix + " " + command;
1137                 for (unsigned int x = 0; x < params.size(); x++)
1138                 {
1139                         FullLine = FullLine + " " + params[x];
1140                 }
1141                 if (Route->GetSocket())
1142                 {
1143                         TreeSocket* Sock = Route->GetSocket();
1144                         Sock->WriteLine(FullLine);
1145                 }
1146                 return true;
1147         }
1148         else
1149         {
1150                 log(DEBUG,"Could not route message with target %s: %s",target.c_str(),command.c_str());
1151                 return true;
1152         }
1153 }
1154
1155
1156 class ModuleSpanningTree : public Module
1157 {
1158         std::vector<TreeSocket*> Bindings;
1159         int line;
1160
1161  public:
1162
1163         void ReadConfiguration(bool rebind)
1164         {
1165                 if (rebind)
1166                 {
1167                         for (int j =0; j < Conf->Enumerate("bind"); j++)
1168                         {
1169                                 std::string Type = Conf->ReadValue("bind","type",j);
1170                                 std::string IP = Conf->ReadValue("bind","address",j);
1171                                 long Port = Conf->ReadInteger("bind","port",j,true);
1172                                 if (Type == "servers")
1173                                 {
1174                                         if (IP == "*")
1175                                         {
1176                                                 IP = "";
1177                                         }
1178                                         TreeSocket* listener = new TreeSocket(IP.c_str(),Port,true,10);
1179                                         if (listener->GetState() == I_LISTENING)
1180                                         {
1181                                                 Srv->AddSocket(listener);
1182                                                 Bindings.push_back(listener);
1183                                         }
1184                                         else
1185                                         {
1186                                                 log(DEFAULT,"m_spanningtree: Warning: Failed to bind server port %d",Port);
1187                                                 listener->Close();
1188                                                 delete listener;
1189                                         }
1190                                 }
1191                         }
1192                 }
1193                 LinkBlocks.clear();
1194                 for (int j =0; j < Conf->Enumerate("link"); j++)
1195                 {
1196                         Link L;
1197                         L.Name = Conf->ReadValue("link","name",j);
1198                         L.IPAddr = Conf->ReadValue("link","ipaddr",j);
1199                         L.Port = Conf->ReadInteger("link","port",j,true);
1200                         L.SendPass = Conf->ReadValue("link","sendpass",j);
1201                         L.RecvPass = Conf->ReadValue("link","recvpass",j);
1202                         LinkBlocks.push_back(L);
1203                         log(DEBUG,"m_spanningtree: Read server %s with host %s:%d",L.Name.c_str(),L.IPAddr.c_str(),L.Port);
1204                 }
1205         }
1206
1207         ModuleSpanningTree()
1208         {
1209                 Srv = new Server;
1210                 Conf = new ConfigReader;
1211                 Bindings.clear();
1212
1213                 // Create the root of the tree
1214                 TreeRoot = new TreeServer(Srv->GetServerName(),Srv->GetServerDescription());
1215
1216                 ReadConfiguration(true);
1217         }
1218
1219         void ShowLinks(TreeServer* Current, userrec* user, int hops)
1220         {
1221                 std::string Parent = TreeRoot->GetName();
1222                 if (Current->GetParent())
1223                 {
1224                         Parent = Current->GetParent()->GetName();
1225                 }
1226                 for (unsigned int q = 0; q < Current->ChildCount(); q++)
1227                 {
1228                         ShowLinks(Current->GetChild(q),user,hops+1);
1229                 }
1230                 WriteServ(user->fd,"364 %s %s %s :%d %s",user->nick,Current->GetName().c_str(),Parent.c_str(),hops,Current->GetDesc().c_str());
1231         }
1232
1233         void HandleLinks(char** parameters, int pcnt, userrec* user)
1234         {
1235                 ShowLinks(TreeRoot,user,0);
1236                 WriteServ(user->fd,"365 %s * :End of /LINKS list.",user->nick);
1237                 return;
1238         }
1239
1240         void HandleLusers(char** parameters, int pcnt, userrec* user)
1241         {
1242                 return;
1243         }
1244
1245         // WARNING: NOT THREAD SAFE - DONT GET ANY SMART IDEAS.
1246
1247         void ShowMap(TreeServer* Current, userrec* user, int depth, char matrix[128][80])
1248         {
1249                 if (line < 128)
1250                 {
1251                         for (int t = 0; t < depth; t++)
1252                         {
1253                                 matrix[line][t] = ' ';
1254                         }
1255                         strlcpy(&matrix[line][depth],Current->GetName().c_str(),80);
1256                         line++;
1257                         for (unsigned int q = 0; q < Current->ChildCount(); q++)
1258                         {
1259                                 ShowMap(Current->GetChild(q),user,depth+2,matrix);
1260                         }
1261                 }
1262         }
1263
1264         // Ok, prepare to be confused.
1265         // After much mulling over how to approach this, it struck me that
1266         // the 'usual' way of doing a /MAP isnt the best way. Instead of
1267         // keeping track of a ton of ascii characters, and line by line
1268         // under recursion working out where to place them using multiplications
1269         // and divisons, we instead render the map onto a backplane of characters
1270         // (a character matrix), then draw the branches as a series of "L" shapes
1271         // from the nodes. This is not only friendlier on CPU it uses less stack.
1272
1273         void HandleMap(char** parameters, int pcnt, userrec* user)
1274         {
1275                 // This array represents a virtual screen which we will
1276                 // "scratch" draw to, as the console device of an irc
1277                 // client does not provide for a proper terminal.
1278                 char matrix[128][80];
1279                 for (unsigned int t = 0; t < 128; t++)
1280                 {
1281                         matrix[t][0] = '\0';
1282                 }
1283                 line = 0;
1284                 // The only recursive bit is called here.
1285                 ShowMap(TreeRoot,user,0,matrix);
1286                 // Process each line one by one. The algorithm has a limit of
1287                 // 128 servers (which is far more than a spanning tree should have
1288                 // anyway, so we're ok). This limit can be raised simply by making
1289                 // the character matrix deeper, 128 rows taking 10k of memory.
1290                 for (int l = 1; l < line; l++)
1291                 {
1292                         // scan across the line looking for the start of the
1293                         // servername (the recursive part of the algorithm has placed
1294                         // the servers at indented positions depending on what they
1295                         // are related to)
1296                         int first_nonspace = 0;
1297                         while (matrix[l][first_nonspace] == ' ')
1298                         {
1299                                 first_nonspace++;
1300                         }
1301                         first_nonspace--;
1302                         // Draw the `- (corner) section: this may be overwritten by
1303                         // another L shape passing along the same vertical pane, becoming
1304                         // a |- (branch) section instead.
1305                         matrix[l][first_nonspace] = '-';
1306                         matrix[l][first_nonspace-1] = '`';
1307                         int l2 = l - 1;
1308                         // Draw upwards until we hit the parent server, causing possibly
1309                         // other corners (`-) to become branches (|-)
1310                         while ((matrix[l2][first_nonspace-1] == ' ') || (matrix[l2][first_nonspace-1] == '`'))
1311                         {
1312                                 matrix[l2][first_nonspace-1] = '|';
1313                                 l2--;
1314                         }
1315                 }
1316                 // dump the whole lot to the user. This is the easy bit, honest.
1317                 for (int t = 0; t < line; t++)
1318                 {
1319                         WriteServ(user->fd,"006 %s :%s",user->nick,&matrix[t][0]);
1320                 }
1321                 WriteServ(user->fd,"007 %s :End of /MAP",user->nick);
1322                 return;
1323         }
1324
1325         int HandleSquit(char** parameters, int pcnt, userrec* user)
1326         {
1327                 return 1;
1328         }
1329
1330         int HandleConnect(char** parameters, int pcnt, userrec* user)
1331         {
1332                 for (std::vector<Link>::iterator x = LinkBlocks.begin(); x < LinkBlocks.end(); x++)
1333                 {
1334                         if (Srv->MatchText(x->Name.c_str(),parameters[0]))
1335                         {
1336                                 WriteServ(user->fd,"NOTICE %s :*** CONNECT: Connecting to server: %s (%s:%d)",user->nick,x->Name.c_str(),x->IPAddr.c_str(),x->Port);
1337                                 TreeSocket* newsocket = new TreeSocket(x->IPAddr,x->Port,false,10,x->Name);
1338                                 Srv->AddSocket(newsocket);
1339                                 return 1;
1340                         }
1341                 }
1342                 WriteServ(user->fd,"NOTICE %s :*** CONNECT: No matching server could be found in the config file.",user->nick);
1343                 return 1;
1344         }
1345
1346         virtual int OnPreCommand(std::string command, char **parameters, int pcnt, userrec *user)
1347         {
1348                 if (command == "CONNECT")
1349                 {
1350                         return this->HandleConnect(parameters,pcnt,user);
1351                 }
1352                 else if (command == "SQUIT")
1353                 {
1354                         return this->HandleSquit(parameters,pcnt,user);
1355                 }
1356                 else if (command == "MAP")
1357                 {
1358                         this->HandleMap(parameters,pcnt,user);
1359                         return 1;
1360                 }
1361                 else if (command == "LUSERS")
1362                 {
1363                         this->HandleLusers(parameters,pcnt,user);
1364                         return 1;
1365                 }
1366                 else if (command == "LINKS")
1367                 {
1368                         this->HandleLinks(parameters,pcnt,user);
1369                         return 1;
1370                 }
1371                 return 0;
1372         }
1373
1374         virtual void OnUserInvite(userrec* source,userrec* dest,chanrec* channel)
1375         {
1376                 if (std::string(source->server) == Srv->GetServerName())
1377                 {
1378                         std::deque<std::string> params;
1379                         params.push_back(dest->nick);
1380                         params.push_back(channel->name);
1381                         DoOneToMany(source->nick,"INVITE",params);
1382                 }
1383         }
1384
1385         virtual void OnPostLocalTopicChange(userrec* user, chanrec* chan, std::string topic)
1386         {
1387                 std::deque<std::string> params;
1388                 params.push_back(chan->name);
1389                 params.push_back(":"+topic);
1390                 DoOneToMany(user->nick,"TOPIC",params);
1391         }
1392
1393         virtual void OnUserNotice(userrec* user, void* dest, int target_type, std::string text)
1394         {
1395                 if (target_type == TYPE_USER)
1396                 {
1397                         userrec* d = (userrec*)dest;
1398                         if ((std::string(d->server) != Srv->GetServerName()) && (std::string(user->server) == Srv->GetServerName()))
1399                         {
1400                                 std::deque<std::string> params;
1401                                 params.clear();
1402                                 params.push_back(d->nick);
1403                                 params.push_back(":"+text);
1404                                 DoOneToOne(user->nick,"NOTICE",params,d->server);
1405                         }
1406                 }
1407                 else
1408                 {
1409                         if (std::string(user->server) == Srv->GetServerName())
1410                         {
1411                                 chanrec *c = (chanrec*)dest;
1412                                 std::deque<std::string> params;
1413                                 params.push_back(c->name);
1414                                 params.push_back(":"+text);
1415                                 DoOneToMany(user->nick,"NOTICE",params);
1416                         }
1417                 }
1418         }
1419
1420         virtual void OnUserMessage(userrec* user, void* dest, int target_type, std::string text)
1421         {
1422                 if (target_type == TYPE_USER)
1423                 {
1424                         // route private messages which are targetted at clients only to the server
1425                         // which needs to receive them
1426                         userrec* d = (userrec*)dest;
1427                         if ((std::string(d->server) != Srv->GetServerName()) && (std::string(user->server) == Srv->GetServerName()))
1428                         {
1429                                 std::deque<std::string> params;
1430                                 params.clear();
1431                                 params.push_back(d->nick);
1432                                 params.push_back(":"+text);
1433                                 DoOneToOne(user->nick,"PRIVMSG",params,d->server);
1434                         }
1435                 }
1436                 else
1437                 {
1438                         if (std::string(user->server) == Srv->GetServerName())
1439                         {
1440                                 chanrec *c = (chanrec*)dest;
1441                                 std::deque<std::string> params;
1442                                 params.push_back(c->name);
1443                                 params.push_back(":"+text);
1444                                 DoOneToMany(user->nick,"PRIVMSG",params);
1445                         }
1446                 }
1447         }
1448
1449         virtual void OnUserJoin(userrec* user, chanrec* channel)
1450         {
1451                 // Only do this for local users
1452                 if (std::string(user->server) == Srv->GetServerName())
1453                 {
1454                         log(DEBUG,"**** User on %s JOINS %s",user->server,channel->name);
1455                         std::deque<std::string> params;
1456                         params.clear();
1457                         params.push_back(channel->name);
1458                         if (*channel->key)
1459                         {
1460                                 log(DEBUG,"**** With key %s",channel->key);
1461                                 // if the channel has a key, force the join by emulating the key.
1462                                 params.push_back(channel->key);
1463                         }
1464                         DoOneToMany(user->nick,"JOIN",params);
1465                 }
1466         }
1467
1468         virtual void OnUserPart(userrec* user, chanrec* channel)
1469         {
1470                 if (std::string(user->server) == Srv->GetServerName())
1471                 {
1472                         log(DEBUG,"**** User on %s PARTS %s",user->server,channel->name);
1473                         std::deque<std::string> params;
1474                         params.clear();
1475                         params.push_back(channel->name);
1476                         DoOneToMany(user->nick,"PART",params);
1477                 }
1478         }
1479
1480         virtual void OnUserConnect(userrec* user)
1481         {
1482                 char agestr[MAXBUF];
1483                 if (std::string(user->server) == Srv->GetServerName())
1484                 {
1485                         log(DEBUG,"**** User on %s CONNECTS: %s",user->server,user->nick);
1486                         std::deque<std::string> params;
1487                         snprintf(agestr,MAXBUF,"%lu",(unsigned long)user->age);
1488                         params.clear();
1489                         params.push_back(agestr);
1490                         params.push_back(user->nick);
1491                         params.push_back(user->host);
1492                         params.push_back(user->dhost);
1493                         params.push_back(user->ident);
1494                         params.push_back("+"+std::string(user->modes));
1495                         params.push_back(user->ip);
1496                         params.push_back(":"+std::string(user->fullname));
1497                         DoOneToMany(Srv->GetServerName(),"NICK",params);
1498                 }
1499         }
1500
1501         virtual void OnUserQuit(userrec* user, std::string reason)
1502         {
1503                 if (std::string(user->server) == Srv->GetServerName())
1504                 {
1505                         log(DEBUG,"**** User on %s QUITS: %s",user->server,user->nick);
1506                         std::deque<std::string> params;
1507                         params.push_back(":"+reason);
1508                         DoOneToMany(user->nick,"QUIT",params);
1509                 }
1510         }
1511
1512         virtual void OnUserPostNick(userrec* user, std::string oldnick)
1513         {
1514                 if (std::string(user->server) == Srv->GetServerName())
1515                 {
1516                         log(DEBUG,"**** User on %s changes NICK: %s",user->server,user->nick);
1517                         std::deque<std::string> params;
1518                         params.push_back(user->nick);
1519                         DoOneToMany(oldnick,"NICK",params);
1520                 }
1521         }
1522
1523         virtual void OnUserKick(userrec* source, userrec* user, chanrec* chan, std::string reason)
1524         {
1525                 if (std::string(source->server) == Srv->GetServerName())
1526                 {
1527                         log(DEBUG,"**** User on %s KICKs: %s %s",source->server,source->nick,user->nick);
1528                         std::deque<std::string> params;
1529                         params.push_back(chan->name);
1530                         params.push_back(user->nick);
1531                         params.push_back(":"+reason);
1532                         DoOneToMany(source->nick,"KICK",params);
1533                 }
1534         }
1535
1536         virtual void OnRemoteKill(userrec* source, userrec* dest, std::string reason)
1537         {
1538                 std::deque<std::string> params;
1539                 params.push_back(dest->nick);
1540                 params.push_back(":"+reason);
1541                 DoOneToMany(source->nick,"KILL",params);
1542         }
1543
1544         // note: the protocol does not allow direct umode +o except
1545         // via NICK with 8 params. sending OPERTYPE infers +o modechange
1546         // locally.
1547         virtual void OnOper(userrec* user, std::string opertype)
1548         {
1549                 if (std::string(user->server) == Srv->GetServerName())
1550                 {
1551                         std::deque<std::string> params;
1552                         params.push_back(opertype);
1553                         DoOneToMany(user->nick,"OPERTYPE",params);
1554                 }
1555         }
1556
1557         virtual void OnMode(userrec* user, void* dest, int target_type, std::string text)
1558         {
1559                 log(DEBUG,"*** ONMODE TRIGGER");
1560                 if (std::string(user->server) == Srv->GetServerName())
1561                 {
1562                         log(DEBUG,"*** LOCAL");
1563                         if (target_type == TYPE_USER)
1564                         {
1565                                 userrec* u = (userrec*)dest;
1566                                 std::deque<std::string> params;
1567                                 params.push_back(u->nick);
1568                                 params.push_back(text);
1569                                 DoOneToMany(user->nick,"MODE",params);
1570                         }
1571                         else
1572                         {
1573                                 chanrec* c = (chanrec*)dest;
1574                                 std::deque<std::string> params;
1575                                 params.push_back(c->name);
1576                                 params.push_back(text);
1577                                 DoOneToMany(user->nick,"MODE",params);
1578                         }
1579                 }
1580         }
1581
1582         virtual ~ModuleSpanningTree()
1583         {
1584                 delete Srv;
1585         }
1586
1587         virtual Version GetVersion()
1588         {
1589                 return Version(1,0,0,0,VF_STATIC|VF_VENDOR);
1590         }
1591 };
1592
1593
1594 class ModuleSpanningTreeFactory : public ModuleFactory
1595 {
1596  public:
1597         ModuleSpanningTreeFactory()
1598         {
1599         }
1600         
1601         ~ModuleSpanningTreeFactory()
1602         {
1603         }
1604         
1605         virtual Module * CreateModule()
1606         {
1607                 return new ModuleSpanningTree;
1608         }
1609         
1610 };
1611
1612
1613 extern "C" void * init_module( void )
1614 {
1615         return new ModuleSpanningTreeFactory;
1616 }
1617