2 #include "inspircd_io.h"
3 #include "inspircd_util.h"
4 #include "inspircd_config.h"
9 #include <sys/utsname.h>
14 #include <ext/hash_map>
26 #include "connection.h"
39 #define nspace __gnu_cxx
47 extern vector<Module*> modules;
48 extern vector<ircd_module*> factory;
51 extern char ServerName[MAXBUF];
52 extern char Network[MAXBUF];
53 extern char ServerDesc[MAXBUF];
54 extern char AdminName[MAXBUF];
55 extern char AdminEmail[MAXBUF];
56 extern char AdminNick[MAXBUF];
57 extern char diepass[MAXBUF];
58 extern char restartpass[MAXBUF];
59 extern char motd[MAXBUF];
60 extern char rules[MAXBUF];
61 extern char list[MAXBUF];
62 extern char PrefixQuit[MAXBUF];
63 extern char DieValue[MAXBUF];
66 extern int WHOWAS_STALE;
67 extern int WHOWAS_MAX;
69 extern time_t startup_time;
70 extern int NetBufferSize;
72 extern time_t nb_start;
74 extern std::vector<int> fd_reap;
75 extern std::vector<std::string> module_names;
77 extern char bannerBuffer[MAXBUF];
78 extern int boundPortCount;
80 extern int UDPportCount;
81 extern int ports[MAXSOCKS];
82 extern int defaultRoute;
84 extern std::vector<long> auth_cookies;
85 extern std::stringstream config_f;
87 extern serverrec* me[32];
89 extern FILE *log_file;
91 const long duration_m = 60;
92 const long duration_h = duration_m * 60;
93 const long duration_d = duration_h * 24;
94 const long duration_w = duration_d * 7;
95 const long duration_y = duration_w * 52;
99 template<> struct nspace::hash<in_addr>
101 size_t operator()(const struct in_addr &a) const
104 memcpy(&q,&a,sizeof(size_t));
109 template<> struct nspace::hash<string>
111 size_t operator()(const string &s) const
114 static struct hash<const char *> strhash;
126 bool operator()(const string& s1, const string& s2) const
128 char a[MAXBUF],b[MAXBUF];
129 strcpy(a,s1.c_str());
130 strcpy(b,s2.c_str());
131 return (strcasecmp(a,b) == 0);
136 struct InAddr_HashComp
139 bool operator()(const in_addr &s1, const in_addr &s2) const
144 memcpy(&q,&s1,sizeof(size_t));
145 memcpy(&p,&s2,sizeof(size_t));
153 typedef nspace::hash_map<std::string, userrec*, nspace::hash<string>, StrHashComp> user_hash;
154 typedef nspace::hash_map<std::string, chanrec*, nspace::hash<string>, StrHashComp> chan_hash;
155 typedef nspace::hash_map<in_addr,string*, nspace::hash<in_addr>, InAddr_HashComp> address_cache;
156 typedef std::deque<command_t> command_table;
159 extern user_hash clientlist;
160 extern chan_hash chanlist;
161 extern user_hash whowas;
162 extern command_table cmdlist;
163 extern file_cache MOTD;
164 extern file_cache RULES;
165 extern address_cache IP;
168 void handle_join(char **parameters, int pcnt, userrec *user)
173 if (loop_call(handle_join,parameters,pcnt,user,0,0,1))
175 if (parameters[0][0] == '#')
177 Ptr = add_channel(user,parameters[0],parameters[1],false);
182 void handle_part(char **parameters, int pcnt, userrec *user)
188 if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-2,0))
190 del_channel(user,parameters[0],parameters[1],false);
194 if (loop_call(handle_part,parameters,pcnt,user,0,pcnt-1,0))
196 del_channel(user,parameters[0],NULL,false);
200 void handle_kick(char **parameters, int pcnt, userrec *user)
202 chanrec* Ptr = FindChan(parameters[0]);
203 userrec* u = Find(parameters[1]);
207 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
211 if (!has_channel(u,Ptr))
213 WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, parameters[0]);
221 strncpy(reason,parameters[2],MAXBUF);
222 if (strlen(reason)>MAXKICK)
224 reason[MAXKICK-1] = '\0';
227 kick_channel(user,u,Ptr,reason);
231 strcpy(reason,user->nick);
232 kick_channel(user,u,Ptr,reason);
235 // this must be propogated so that channel membership is kept in step network-wide
238 snprintf(buffer,MAXBUF,"k %s %s %s :%s",user->nick,u->nick,Ptr->name,reason);
239 NetSendToAll(buffer);
243 void handle_die(char **parameters, int pcnt, userrec *user)
245 log(DEBUG,"die: %s",user->nick);
246 if (!strcmp(parameters[0],diepass))
248 WriteOpers("*** DIE command from %s!%s@%s, terminating...",user->nick,user->ident,user->host);
254 WriteOpers("*** Failed DIE Command from %s!%s@%s.",user->nick,user->ident,user->host);
258 void handle_restart(char **parameters, int pcnt, userrec *user)
260 log(DEBUG,"restart: %s",user->nick);
261 if (!strcmp(parameters[0],restartpass))
263 WriteOpers("*** RESTART command from %s!%s@%s, Pretending to restart till this is finished :D",user->nick,user->ident,user->host);
266 /* Will finish this later when i can be arsed :) */
270 WriteOpers("*** Failed RESTART Command from %s!%s@%s.",user->nick,user->ident,user->host);
274 void handle_kill(char **parameters, int pcnt, userrec *user)
276 userrec *u = Find(parameters[0]);
277 char killreason[MAXBUF];
279 log(DEBUG,"kill: %s %s",parameters[0],parameters[1]);
282 if (strcmp(ServerName,u->server))
285 WriteOpers("*** Remote kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]);
286 sprintf(killreason,"[%s] Killed (%s (%s))",ServerName,user->nick,parameters[1]);
287 WriteCommonExcept(u,"QUIT :%s",killreason);
288 // K token must go to ALL servers!!!
290 snprintf(buffer,MAXBUF,"K %s %s :%s",user->nick,u->nick,killreason);
291 NetSendToAll(buffer);
293 user_hash::iterator iter = clientlist.find(u->nick);
294 if (iter != clientlist.end())
296 log(DEBUG,"deleting user hash value %d",iter->second);
297 if ((iter->second) && (user->registered == 7)) {
300 clientlist.erase(iter);
307 WriteTo(user, u, "KILL %s :%s!%s!%s (%s)", u->nick, ServerName,user->dhost,user->nick,parameters[1]);
308 WriteOpers("*** Local Kill by %s: %s!%s@%s (%s)",user->nick,u->nick,u->ident,u->host,parameters[1]);
309 sprintf(killreason,"Killed (%s (%s))",user->nick,parameters[1]);
310 kill_link(u,killreason);
315 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
319 void handle_summon(char **parameters, int pcnt, userrec *user)
321 WriteServ(user->fd,"445 %s :SUMMON has been disabled (depreciated command)",user->nick);
324 void handle_users(char **parameters, int pcnt, userrec *user)
326 WriteServ(user->fd,"445 %s :USERS has been disabled (depreciated command)",user->nick);
329 void handle_pass(char **parameters, int pcnt, userrec *user)
331 // Check to make sure they havnt registered -- Fix by FCS
332 if (user->registered == 7)
334 WriteServ(user->fd,"462 %s :You may not reregister",user->nick);
337 if (!strcasecmp(parameters[0],Passwd(user)))
339 user->haspassed = true;
343 void handle_invite(char **parameters, int pcnt, userrec *user)
345 userrec* u = Find(parameters[0]);
346 chanrec* c = FindChan(parameters[1]);
352 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[1]);
358 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, parameters[0]);
367 if (cstatus(user,c) < STATUS_HOP)
369 WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel",user->nick, c->name);
373 if (has_channel(u,c))
375 WriteServ(user->fd,"443 %s %s %s :Is already on channel %s",user->nick,u->nick,c->name,c->name);
378 if (!has_channel(user,c))
380 WriteServ(user->fd,"442 %s %s :You're not on that channel!",user->nick, c->name);
383 u->InviteTo(c->name);
384 WriteFrom(u->fd,user,"INVITE %s :%s",u->nick,c->name);
385 WriteServ(user->fd,"341 %s %s %s",user->nick,u->nick,c->name);
387 // i token must go to ALL servers!!!
389 snprintf(buffer,MAXBUF,"i %s %s %s",u->nick,user->nick,c->name);
390 NetSendToAll(buffer);
393 void handle_topic(char **parameters, int pcnt, userrec *user)
399 if (strlen(parameters[0]) <= CHANMAX)
401 Ptr = FindChan(parameters[0]);
406 WriteServ(user->fd,"332 %s %s :%s", user->nick, Ptr->name, Ptr->topic);
407 WriteServ(user->fd,"333 %s %s %s %d", user->nick, Ptr->name, Ptr->setby, Ptr->topicset);
411 WriteServ(user->fd,"331 %s %s :No topic is set.", user->nick, Ptr->name);
416 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
423 if (strlen(parameters[0]) <= CHANMAX)
425 Ptr = FindChan(parameters[0]);
428 if ((Ptr->topiclock) && (cstatus(user,Ptr)<STATUS_HOP))
430 WriteServ(user->fd,"482 %s %s :You must be at least a half-operator to change modes on this channel", user->nick, Ptr->name);
435 strncpy(topic,parameters[1],MAXBUF);
436 if (strlen(topic)>MAXTOPIC)
438 topic[MAXTOPIC-1] = '\0';
441 strcpy(Ptr->topic,topic);
442 strcpy(Ptr->setby,user->nick);
443 Ptr->topicset = time(NULL);
444 WriteChannel(Ptr,user,"TOPIC %s :%s",Ptr->name, Ptr->topic);
446 // t token must go to ALL servers!!!
448 snprintf(buffer,MAXBUF,"t %s %s :%s",user->nick,Ptr->name,topic);
449 NetSendToAll(buffer);
453 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
459 void handle_names(char **parameters, int pcnt, userrec *user)
463 if (loop_call(handle_names,parameters,pcnt,user,0,pcnt-1,0))
465 c = FindChan(parameters[0]);
468 /*WriteServ(user->fd,"353 %s = %s :%s", user->nick, c->name,*/
470 WriteServ(user->fd,"366 %s %s :End of /NAMES list.", user->nick, c->name);
474 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
478 void handle_privmsg(char **parameters, int pcnt, userrec *user)
483 user->idle_lastmsg = time(NULL);
485 if (loop_call(handle_privmsg,parameters,pcnt,user,0,pcnt-2,0))
487 if (parameters[0][0] == '#')
489 chan = FindChan(parameters[0]);
492 if ((chan->noexternal) && (!has_channel(user,chan)))
494 WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name);
497 if ((chan->moderated) && (cstatus(user,chan)<STATUS_VOICE))
499 WriteServ(user->fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name);
505 FOREACH_RESULT(OnUserPreMessage(user,chan,TYPE_CHANNEL,std::string(parameters[1])));
510 ChanExceptSender(chan, user, "PRIVMSG %s :%s", chan->name, parameters[1]);
512 // if any users of this channel are on remote servers, broadcast the packet
514 snprintf(buffer,MAXBUF,"P %s %s :%s",user->nick,chan->name,parameters[1]);
515 NetSendToCommon(user,buffer);
519 /* no such nick/channel */
520 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
525 dest = Find(parameters[0]);
528 if (strcmp(dest->awaymsg,""))
530 /* auto respond with aweh msg */
531 WriteServ(user->fd,"301 %s %s :%s",user->nick,dest->nick,dest->awaymsg);
536 FOREACH_RESULT(OnUserPreMessage(user,dest,TYPE_USER,std::string(parameters[1])));
543 if (!strcmp(dest->server,user->server))
545 // direct write, same server
546 WriteTo(user, dest, "PRIVMSG %s :%s", dest->nick, parameters[1]);
551 snprintf(buffer,MAXBUF,"P %s %s :%s",user->nick,dest->nick,parameters[1]);
552 NetSendToOne(dest->server,buffer);
557 /* no such nick/channel */
558 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
562 void handle_notice(char **parameters, int pcnt, userrec *user)
567 user->idle_lastmsg = time(NULL);
569 if (loop_call(handle_notice,parameters,pcnt,user,0,pcnt-2,0))
571 if (parameters[0][0] == '#')
573 chan = FindChan(parameters[0]);
576 if ((chan->noexternal) && (!has_channel(user,chan)))
578 WriteServ(user->fd,"404 %s %s :Cannot send to channel (no external messages)", user->nick, chan->name);
581 if ((chan->moderated) && (cstatus(user,chan)<STATUS_VOICE))
583 WriteServ(user->fd,"404 %s %s :Cannot send to channel (+m)", user->nick, chan->name);
589 FOREACH_RESULT(OnUserPreNotice(user,chan,TYPE_CHANNEL,std::string(parameters[1])));
594 ChanExceptSender(chan, user, "NOTICE %s :%s", chan->name, parameters[1]);
596 // if any users of this channel are on remote servers, broadcast the packet
598 snprintf(buffer,MAXBUF,"V %s %s :%s",user->nick,chan->name,parameters[1]);
599 NetSendToCommon(user,buffer);
603 /* no such nick/channel */
604 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
609 dest = Find(parameters[0]);
614 FOREACH_RESULT(OnUserPreNotice(user,dest,TYPE_USER,std::string(parameters[1])));
619 if (!strcmp(dest->server,user->server))
621 // direct write, same server
622 WriteTo(user, dest, "NOTICE %s :%s", dest->nick, parameters[1]);
627 snprintf(buffer,MAXBUF,"V %s %s :%s",user->nick,dest->nick,parameters[1]);
628 NetSendToOne(dest->server,buffer);
633 /* no such nick/channel */
634 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
639 void handle_info(char **parameters, int pcnt, userrec *user)
641 WriteServ(user->fd,"371 %s :The Inspire IRCd Project Has been brought to you by the following people..",user->nick);
642 WriteServ(user->fd,"371 %s :Craig Edwards, Craig McLure, and Others..",user->nick);
643 WriteServ(user->fd,"371 %s :Will finish this later when i can be arsed :p",user->nick);
644 FOREACH_MOD OnInfo(user);
645 WriteServ(user->fd,"374 %s :End of /INFO list",user->nick);
648 void handle_time(char **parameters, int pcnt, userrec *user)
651 struct tm * timeinfo;
654 timeinfo = localtime ( &rawtime );
655 WriteServ(user->fd,"391 %s %s :%s",user->nick,ServerName, asctime (timeinfo) );
659 void handle_whois(char **parameters, int pcnt, userrec *user)
664 if (loop_call(handle_whois,parameters,pcnt,user,0,pcnt-1,0))
666 dest = Find(parameters[0]);
669 // bug found by phidjit - were able to whois an incomplete connection if it had sent a NICK or USER
670 if (dest->registered == 7)
672 WriteServ(user->fd,"311 %s %s %s %s * :%s",user->nick, dest->nick, dest->ident, dest->dhost, dest->fullname);
673 if ((user == dest) || (strchr(user->modes,'o')))
675 WriteServ(user->fd,"378 %s %s :is connecting from *@%s",user->nick, dest->nick, dest->host);
677 if (strcmp(chlist(dest),""))
679 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, chlist(dest));
681 WriteServ(user->fd,"312 %s %s %s :%s",user->nick, dest->nick, dest->server, GetServerDescription(dest->server).c_str());
682 if (strcmp(dest->awaymsg,""))
684 WriteServ(user->fd,"301 %s %s :%s",user->nick, dest->nick, dest->awaymsg);
686 if (strchr(dest->modes,'o'))
688 WriteServ(user->fd,"313 %s %s :is an IRC operator",user->nick, dest->nick);
690 FOREACH_MOD OnWhois(user,dest);
691 if (!strcasecmp(user->server,dest->server))
693 // idle time and signon line can only be sent if youre on the same server (according to RFC)
694 WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, abs((dest->idle_lastmsg)-time(NULL)), dest->signon);
697 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, dest->nick);
701 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
706 /* no such nick/channel */
707 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
711 void handle_quit(char **parameters, int pcnt, userrec *user)
713 user_hash::iterator iter = clientlist.find(user->nick);
716 if (user->registered == 7)
718 /* theres more to do here, but for now just close the socket */
721 if (parameters[0][0] == ':')
725 reason = parameters[0];
727 if (strlen(reason)>MAXQUIT)
729 reason[MAXQUIT-1] = '\0';
732 Write(user->fd,"ERROR :Closing link (%s@%s) [%s]",user->ident,user->host,parameters[0]);
733 WriteOpers("*** Client exiting: %s!%s@%s [%s]",user->nick,user->ident,user->host,parameters[0]);
734 WriteCommonExcept(user,"QUIT :%s%s",PrefixQuit,parameters[0]);
737 snprintf(buffer,MAXBUF,"Q %s :%s%s",user->nick,PrefixQuit,parameters[0]);
738 NetSendToAll(buffer);
742 Write(user->fd,"ERROR :Closing link (%s@%s) [QUIT]",user->ident,user->host);
743 WriteOpers("*** Client exiting: %s!%s@%s [Client exited]",user->nick,user->ident,user->host);
744 WriteCommonExcept(user,"QUIT :Client exited");
747 snprintf(buffer,MAXBUF,"Q %s :Client exited",user->nick);
748 NetSendToAll(buffer);
750 FOREACH_MOD OnUserQuit(user);
754 /* push the socket on a stack of sockets due to be closed at the next opportunity */
755 fd_reap.push_back(user->fd);
757 if (iter != clientlist.end())
759 clientlist.erase(iter);
760 log(DEBUG,"deleting user hash value %d",iter->second);
761 //if ((user) && (user->registered == 7)) {
766 if (user->registered == 7) {
771 void handle_who(char **parameters, int pcnt, userrec *user)
775 /* theres more to do here, but for now just close the socket */
778 if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*")))
780 if (user->chans[0].channel)
783 for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
785 Ptr = i->second->chans[0].channel;
786 // suggested by phidjit and FCS
787 if ((!common_channels(user,i->second)) && (isnick(i->second->nick)))
789 WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, Ptr ? Ptr->name : "*", i->second->ident, i->second->dhost, i->second->server, i->second->nick, i->second->fullname);
791 if (n_list > MaxWhoResults)
798 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, Ptr->name);
802 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, user->nick);
806 if (parameters[0][0] == '#')
808 Ptr = FindChan(parameters[0]);
811 for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
813 if ((has_channel(i->second,Ptr)) && (isnick(i->second->nick)))
815 WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, Ptr->name, i->second->ident, i->second->dhost, i->second->server, i->second->nick, i->second->fullname);
818 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, Ptr->name);
822 WriteServ(user->fd,"401 %s %s :No suck nick/channel",user->nick, parameters[0]);
827 userrec* u = Find(parameters[0]);
830 WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, u->nick, u->ident, u->dhost, u->server, u->nick, u->fullname);
832 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, parameters[0]);
837 if ((!strcmp(parameters[0],"0")) || (!strcmp(parameters[0],"*")) && (!strcmp(parameters[1],"o")))
839 for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
841 if ((common_channels(user,i->second)) && (isnick(i->second->nick)))
843 if (strchr(i->second->modes,'o'))
845 WriteServ(user->fd,"352 %s %s %s %s %s %s Hr@ :0 %s",user->nick, user->nick, i->second->ident, i->second->dhost, i->second->server, i->second->nick, i->second->fullname);
849 WriteServ(user->fd,"315 %s %s :End of /WHO list.",user->nick, user->nick);
855 void handle_wallops(char **parameters, int pcnt, userrec *user)
857 WriteWallOps(user,false,"%s",parameters[0]);
860 void handle_list(char **parameters, int pcnt, userrec *user)
864 WriteServ(user->fd,"321 %s Channel :Users Name",user->nick);
865 for (chan_hash::const_iterator i = chanlist.begin(); i != chanlist.end(); i++)
867 if ((!i->second->c_private) && (!i->second->secret))
869 WriteServ(user->fd,"322 %s %s %d :[+%s] %s",user->nick,i->second->name,usercount_i(i->second),chanmodes(i->second),i->second->topic);
872 WriteServ(user->fd,"323 %s :End of channel list.",user->nick);
876 void handle_rehash(char **parameters, int pcnt, userrec *user)
878 WriteServ(user->fd,"382 %s %s :Rehashing",user->nick,CleanFilename(CONFIG_FILE));
880 FOREACH_MOD OnRehash();
881 WriteOpers("%s is rehashing config file %s",user->nick,CleanFilename(CONFIG_FILE));
884 void handle_lusers(char **parameters, int pcnt, userrec *user)
886 WriteServ(user->fd,"251 %s :There are %d users and %d invisible on %d servers",user->nick,usercnt()-usercount_invisible(),usercount_invisible(),servercount());
887 WriteServ(user->fd,"252 %s %d :operator(s) online",user->nick,usercount_opers());
888 WriteServ(user->fd,"253 %s %d :unknown connections",user->nick,usercount_unknown());
889 WriteServ(user->fd,"254 %s %d :channels formed",user->nick,chancount());
890 WriteServ(user->fd,"254 %s :I have %d clients and %d servers",user->nick,local_count(),count_servs());
893 void handle_admin(char **parameters, int pcnt, userrec *user)
895 WriteServ(user->fd,"256 %s :Administrative info for %s",user->nick,ServerName);
896 WriteServ(user->fd,"257 %s :Name - %s",user->nick,AdminName);
897 WriteServ(user->fd,"258 %s :Nickname - %s",user->nick,AdminNick);
898 WriteServ(user->fd,"258 %s :E-Mail - %s",user->nick,AdminEmail);
901 void handle_ping(char **parameters, int pcnt, userrec *user)
903 WriteServ(user->fd,"PONG %s :%s",ServerName,parameters[0]);
906 void handle_pong(char **parameters, int pcnt, userrec *user)
908 // set the user as alive so they survive to next ping
912 void handle_motd(char **parameters, int pcnt, userrec *user)
917 void handle_rules(char **parameters, int pcnt, userrec *user)
922 void handle_user(char **parameters, int pcnt, userrec *user)
924 if (user->registered < 3)
926 if (isident(parameters[0]) == 0) {
927 // This kinda Sucks, According to the RFC thou, its either this,
928 // or "You have already registered" :p -- Craig
929 WriteServ(user->fd,"461 %s USER :Not enough parameters",user->nick);
932 WriteServ(user->fd,"NOTICE Auth :No ident response, ident prefixed with ~");
933 strcpy(user->ident,"~"); /* we arent checking ident... but these days why bother anyway? */
934 strncat(user->ident,parameters[0],IDENTMAX);
935 strncpy(user->fullname,parameters[3],128);
936 user->registered = (user->registered | 1);
941 WriteServ(user->fd,"462 %s :You may not reregister",user->nick);
944 /* parameters 2 and 3 are local and remote hosts, ignored when sent by client connection */
945 if (user->registered == 3)
947 /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */
952 void handle_userhost(char **parameters, int pcnt, userrec *user)
954 char Return[MAXBUF],junk[MAXBUF];
955 sprintf(Return,"302 %s :",user->nick);
956 for (int i = 0; i < pcnt; i++)
958 userrec *u = Find(parameters[i]);
961 if (strchr(u->modes,'o'))
963 sprintf(junk,"%s*=+%s@%s ",u->nick,u->ident,u->host);
968 sprintf(junk,"%s=+%s@%s ",u->nick,u->ident,u->host);
973 WriteServ(user->fd,Return);
977 void handle_ison(char **parameters, int pcnt, userrec *user)
980 sprintf(Return,"303 %s :",user->nick);
981 for (int i = 0; i < pcnt; i++)
983 userrec *u = Find(parameters[i]);
986 strcat(Return,u->nick);
990 WriteServ(user->fd,Return);
994 void handle_away(char **parameters, int pcnt, userrec *user)
998 strcpy(user->awaymsg,parameters[0]);
999 WriteServ(user->fd,"306 %s :You have been marked as being away",user->nick);
1003 strcpy(user->awaymsg,"");
1004 WriteServ(user->fd,"305 %s :You are no longer marked as being away",user->nick);
1008 void handle_whowas(char **parameters, int pcnt, userrec* user)
1010 user_hash::iterator i = whowas.find(parameters[0]);
1012 if (i == whowas.end())
1014 WriteServ(user->fd,"406 %s %s :There was no such nickname",user->nick,parameters[0]);
1015 WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]);
1019 time_t rawtime = i->second->signon;
1023 timeinfo = localtime(&rawtime);
1024 strcpy(b,asctime(timeinfo));
1025 b[strlen(b)-1] = '\0';
1027 WriteServ(user->fd,"314 %s %s %s %s * :%s",user->nick,i->second->nick,i->second->ident,i->second->dhost,i->second->fullname);
1028 WriteServ(user->fd,"312 %s %s %s :%s",user->nick,i->second->nick,i->second->server,b);
1029 WriteServ(user->fd,"369 %s %s :End of WHOWAS",user->nick,parameters[0]);
1034 void handle_trace(char **parameters, int pcnt, userrec *user)
1036 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
1040 if (isnick(i->second->nick))
1042 if (strchr(i->second->modes,'o'))
1044 WriteServ(user->fd,"205 %s :Oper 0 %s",user->nick,i->second->nick);
1048 WriteServ(user->fd,"204 %s :User 0 %s",user->nick,i->second->nick);
1053 WriteServ(user->fd,"203 %s :???? 0 [%s]",user->nick,i->second->host);
1059 void handle_modules(char **parameters, int pcnt, userrec *user)
1061 for (int i = 0; i < module_names.size(); i++)
1063 Version V = modules[i]->GetVersion();
1064 char modulename[MAXBUF];
1065 strncpy(modulename,module_names[i].c_str(),256);
1066 WriteServ(user->fd,"900 %s :0x%08lx %d.%d.%d.%d %s",user->nick,modules[i],V.Major,V.Minor,V.Revision,V.Build,CleanFilename(modulename));
1070 void handle_stats(char **parameters, int pcnt, userrec *user)
1076 if (strlen(parameters[0])>1)
1078 /* make the stats query 1 character long */
1079 parameters[0][1] = '\0';
1082 if (!strcmp(parameters[0],"k"))
1087 if (!strcmp(parameters[0],"g"))
1092 if (!strcmp(parameters[0],"q"))
1097 if (!strcmp(parameters[0],"Z"))
1102 /* stats m (list number of times each command has been used, plus bytecount) */
1103 if (!strcmp(parameters[0],"m"))
1105 for (int i = 0; i < cmdlist.size(); i++)
1107 if (cmdlist[i].handler_function)
1109 if (cmdlist[i].use_count)
1111 /* RPL_STATSCOMMANDS */
1112 WriteServ(user->fd,"212 %s %s %d %d",user->nick,cmdlist[i].command,cmdlist[i].use_count,cmdlist[i].total_bytes);
1119 /* stats z (debug and memory info) */
1120 if (!strcmp(parameters[0],"z"))
1122 WriteServ(user->fd,"249 %s :Users(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,clientlist.size(),clientlist.size()*sizeof(userrec),clientlist.bucket_count());
1123 WriteServ(user->fd,"249 %s :Channels(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,chanlist.size(),chanlist.size()*sizeof(chanrec),chanlist.bucket_count());
1124 WriteServ(user->fd,"249 %s :Commands(VECTOR) %d (%d bytes)",user->nick,cmdlist.size(),cmdlist.size()*sizeof(command_t));
1125 WriteServ(user->fd,"249 %s :MOTD(VECTOR) %d, RULES(VECTOR) %d",user->nick,MOTD.size(),RULES.size());
1126 WriteServ(user->fd,"249 %s :address_cache(HASH_MAP) %d (%d buckets)",user->nick,IP.size(),IP.bucket_count());
1127 WriteServ(user->fd,"249 %s :Modules(VECTOR) %d (%d)",user->nick,modules.size(),modules.size()*sizeof(Module));
1128 WriteServ(user->fd,"249 %s :ClassFactories(VECTOR) %d (%d)",user->nick,factory.size(),factory.size()*sizeof(ircd_module));
1129 WriteServ(user->fd,"249 %s :Ports(STATIC_ARRAY) %d",user->nick,boundPortCount);
1133 if (!strcmp(parameters[0],"o"))
1135 for (int i = 0; i < ConfValueEnum("oper",&config_f); i++)
1137 char LoginName[MAXBUF];
1138 char HostName[MAXBUF];
1139 char OperType[MAXBUF];
1140 ConfValue("oper","name",i,LoginName,&config_f);
1141 ConfValue("oper","host",i,HostName,&config_f);
1142 ConfValue("oper","type",i,OperType,&config_f);
1143 WriteServ(user->fd,"243 %s O %s * %s %s 0",user->nick,HostName,LoginName,OperType);
1147 /* stats l (show user I/O stats) */
1148 if (!strcmp(parameters[0],"l"))
1150 WriteServ(user->fd,"211 %s :server:port nick bytes_in cmds_in bytes_out cmds_out",user->nick);
1151 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
1153 if (isnick(i->second->nick))
1155 WriteServ(user->fd,"211 %s :%s:%d %s %d %d %d %d",user->nick,ServerName,i->second->port,i->second->nick,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
1159 WriteServ(user->fd,"211 %s :%s:%d (unknown@%d) %d %d %d %d",user->nick,ServerName,i->second->port,i->second->fd,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
1165 /* stats u (show server uptime) */
1166 if (!strcmp(parameters[0],"u"))
1168 time_t current_time = 0;
1169 current_time = time(NULL);
1170 time_t server_uptime = current_time - startup_time;
1172 stime = gmtime(&server_uptime);
1173 /* i dont know who the hell would have an ircd running for over a year nonstop, but
1174 * Craig suggested this, and it seemed a good idea so in it went */
1175 if (stime->tm_year > 70)
1177 WriteServ(user->fd,"242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick,(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
1181 WriteServ(user->fd,"242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick,stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
1185 WriteServ(user->fd,"219 %s %s :End of /STATS report",user->nick,parameters[0]);
1186 WriteOpers("*** Notice: Stats '%s' requested by %s (%s@%s)",parameters[0],user->nick,user->ident,user->host);
1190 void handle_connect(char **parameters, int pcnt, userrec *user)
1192 char Link_ServerName[1024];
1193 char Link_IPAddr[1024];
1194 char Link_Port[1024];
1195 char Link_Pass[1024];
1199 for (int i = 0; i < ConfValueEnum("link",&config_f); i++)
1203 ConfValue("link","name",i,Link_ServerName,&config_f);
1204 ConfValue("link","ipaddr",i,Link_IPAddr,&config_f);
1205 ConfValue("link","port",i,Link_Port,&config_f);
1206 ConfValue("link","sendpass",i,Link_Pass,&config_f);
1207 log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass);
1208 LinkPort = atoi(Link_Port);
1209 if (match(Link_ServerName,parameters[0])) {
1217 WriteServ(user->fd,"NOTICE %s :*** Failed to connect to %s: No servers matching this pattern are configured for linking.",user->nick,parameters[0]);
1221 // TODO: Perform a check here to stop a server being linked twice!
1223 WriteServ(user->fd,"NOTICE %s :*** Connecting to %s (%s) port %s...",user->nick,Link_ServerName,Link_IPAddr,Link_Port);
1225 if (me[defaultRoute])
1227 me[defaultRoute]->BeginLink(Link_IPAddr,LinkPort,Link_Pass,Link_ServerName,me[defaultRoute]->port);
1232 WriteServ(user->fd,"NOTICE %s :No default route is defined for server connections on this server. You must define a server connection to be default route so that sockets can be bound to it.",user->nick);
1236 void handle_squit(char **parameters, int pcnt, userrec *user)
1238 // send out an squit across the mesh and then clear the server list (for local squit)
1241 WriteOpers("SQUIT command issued by %s",user->nick);
1242 char buffer[MAXBUF];
1243 snprintf(buffer,MAXBUF,"& %s",ServerName);
1244 NetSendToAll(buffer);
1249 WriteServ(user->fd,"NOTICE :*** Remote SQUIT not supported yet.");
1253 void handle_links(char **parameters, int pcnt, userrec *user)
1255 WriteServ(user->fd,"364 %s %s %s :0 %s",user->nick,ServerName,ServerName,ServerDesc);
1256 for (int j = 0; j < 32; j++)
1260 for (int k = 0; k < me[j]->connectors.size(); k++)
1262 WriteServ(user->fd,"364 %s %s %s :1 %s",user->nick,me[j]->connectors[k].GetServerName().c_str(),ServerName,me[j]->connectors[k].GetDescription().c_str());
1266 WriteServ(user->fd,"365 %s * :End of /LINKS list.",user->nick);
1269 void handle_map(char **parameters, int pcnt, userrec *user)
1272 snprintf(line,MAXBUF,"006 %s :%s",user->nick,ServerName);
1273 while (strlen(line) < 50)
1275 WriteServ(user->fd,"%s%d (%.2f%%)",line,local_count(),(float)(((float)local_count()/(float)usercnt())*100));
1276 for (int j = 0; j < 32; j++)
1280 for (int k = 0; k < me[j]->connectors.size(); k++)
1282 snprintf(line,MAXBUF,"006 %s :%c-%s",user->nick,islast(me[j]->connectors[k].GetServerName().c_str()),me[j]->connectors[k].GetServerName().c_str());
1283 while (strlen(line) < 50)
1285 WriteServ(user->fd,"%s%d (%.2f%%)",line,map_count(me[j]->connectors[k].GetServerName().c_str()),(float)(((float)map_count(me[j]->connectors[k].GetServerName().c_str())/(float)usercnt())*100));
1289 WriteServ(user->fd,"007 %s :End of /MAP",user->nick);
1292 bool is_uline(const char* server)
1294 char ServName[MAXBUF];
1297 for (int i = 0; i < ConfValueEnum("uline",&config_f); i++)
1299 ConfValue("uline","server",i,ServName,&config_f);
1300 if (!strcasecmp(server,ServName))
1309 void handle_oper(char **parameters, int pcnt, userrec *user)
1311 char LoginName[MAXBUF];
1312 char Password[MAXBUF];
1313 char OperType[MAXBUF];
1314 char TypeName[MAXBUF];
1315 char Hostname[MAXBUF];
1318 for (int i = 0; i < ConfValueEnum("oper",&config_f); i++)
1320 ConfValue("oper","name",i,LoginName,&config_f);
1321 ConfValue("oper","password",i,Password,&config_f);
1322 if ((!strcmp(LoginName,parameters[0])) && (!strcmp(Password,parameters[1])))
1324 /* correct oper credentials */
1325 ConfValue("oper","type",i,OperType,&config_f);
1326 WriteOpers("*** %s (%s@%s) is now an IRC operator of type %s",user->nick,user->ident,user->host,OperType);
1327 WriteServ(user->fd,"381 %s :You are now an IRC operator of type %s",user->nick,OperType);
1328 WriteServ(user->fd,"MODE %s :+o",user->nick);
1329 char global[MAXBUF];
1330 snprintf(global,MAXBUF,"M %s +o",user->nick);
1331 NetSendToAll(global);
1332 for (j =0; j < ConfValueEnum("type",&config_f); j++)
1334 ConfValue("type","name",j,TypeName,&config_f);
1335 if (!strcmp(TypeName,OperType))
1337 /* found this oper's opertype */
1338 ConfValue("type","host",j,Hostname,&config_f);
1339 ChangeDisplayedHost(user,Hostname);
1342 if (!strchr(user->modes,'o'))
1344 strcat(user->modes,"o");
1346 FOREACH_MOD OnOper(user);
1351 WriteServ(user->fd,"491 %s :Invalid oper credentials",user->nick);
1352 WriteOpers("*** WARNING! Failed oper attempt by %s!%s@%s!",user->nick,user->ident,user->host);
1355 void handle_nick(char **parameters, int pcnt, userrec *user)
1359 log(DEBUG,"not enough params for handle_nick");
1364 log(DEBUG,"invalid parameter passed to handle_nick");
1367 if (!strlen(parameters[0]))
1369 log(DEBUG,"zero length new nick passed to handle_nick");
1374 log(DEBUG,"invalid user passed to handle_nick");
1379 log(DEBUG,"invalid old nick passed to handle_nick");
1382 if (!strcasecmp(user->nick,parameters[0]))
1384 log(DEBUG,"old nick is new nick, skipping");
1389 if (strlen(parameters[0]) > 1)
1391 if (parameters[0][0] == ':')
1396 if (matches_qline(parameters[0]))
1398 WriteOpers("*** Q-Lined nickname %s from %s!%s@%s: %s",parameters[0],user->nick,user->ident,user->host,matches_qline(parameters[0]));
1399 WriteServ(user->fd,"432 %s %s :Invalid nickname: %s",user->nick,parameters[0],matches_qline(parameters[0]));
1402 if ((Find(parameters[0])) && (Find(parameters[0]) != user))
1404 WriteServ(user->fd,"433 %s %s :Nickname is already in use.",user->nick,parameters[0]);
1408 if (isnick(parameters[0]) == 0)
1410 WriteServ(user->fd,"432 %s %s :Erroneous Nickname",user->nick,parameters[0]);
1414 if (user->registered == 7)
1417 FOREACH_RESULT(OnUserPreNick(user,parameters[0]));
1419 // if a module returns true, the nick change is silently forbidden.
1423 WriteCommon(user,"NICK %s",parameters[0]);
1425 // Q token must go to ALL servers!!!
1426 char buffer[MAXBUF];
1427 snprintf(buffer,MAXBUF,"n %s %s",user->nick,parameters[0]);
1428 NetSendToAll(buffer);
1432 /* change the nick of the user in the users_hash */
1433 user = ReHashNick(user->nick, parameters[0]);
1434 /* actually change the nick within the record */
1436 if (!user->nick) return;
1438 strncpy(user->nick, parameters[0],NICKMAX);
1440 log(DEBUG,"new nick set: %s",user->nick);
1442 if (user->registered < 3)
1443 user->registered = (user->registered | 2);
1444 if (user->registered == 3)
1446 /* user is registered now, bit 0 = USER command, bit 1 = sent a NICK command */
1453 void handle_V(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1455 char* src = strtok(params," ");
1456 char* dest = strtok(NULL," :");
1457 char* text = strtok(NULL,"\r\n");
1460 userrec* user = Find(src);
1463 userrec* dst = Find(dest);
1467 WriteTo(user, dst, "NOTICE %s :%s", dst->nick, text);
1471 chanrec* d = FindChan(dest);
1474 ChanExceptSender(d, user, "NOTICE %s :%s", d->name, text);
1482 void handle_P(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1484 char* src = strtok(params," ");
1485 char* dest = strtok(NULL," :");
1486 char* text = strtok(NULL,"\r\n");
1489 userrec* user = Find(src);
1492 userrec* dst = Find(dest);
1496 WriteTo(user, dst, "PRIVMSG %s :%s", dst->nick, text);
1500 chanrec* d = FindChan(dest);
1503 ChanExceptSender(d, user, "PRIVMSG %s :%s", d->name, text);
1510 void handle_i(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1512 char* nick = strtok(params," ");
1513 char* from = strtok(NULL," ");
1514 char* channel = strtok(NULL," ");
1515 userrec* u = Find(nick);
1516 userrec* user = Find(from);
1517 chanrec* c = FindChan(channel);
1518 if ((c) && (u) && (user))
1520 u->InviteTo(c->name);
1521 WriteFrom(u->fd,user,"INVITE %s :%s",u->nick,c->name);
1525 void handle_t(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1527 char* setby = strtok(params," ");
1528 char* channel = strtok(NULL," :");
1529 char* topic = strtok(NULL,"\r\n");
1531 userrec* u = Find(setby);
1532 chanrec* c = FindChan(channel);
1535 WriteChannelLocal(c,u,"TOPIC %s :%s",c->name,topic);
1536 strncpy(c->topic,topic,MAXTOPIC);
1537 strncpy(c->setby,u->nick,NICKMAX);
1538 c->topicset = time(NULL);
1543 void handle_T(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1545 char* tm = strtok(params," ");
1546 char* setby = strtok(NULL," ");
1547 char* channel = strtok(NULL," :");
1548 char* topic = strtok(NULL,"\r\n");
1550 time_t TS = atoi(tm);
1551 chanrec* c = FindChan(channel);
1554 // in the case of topics and TS, the *NEWER*
1555 if (TS <= c->topicset)
1557 WriteChannelLocal(c,NULL,"TOPIC %s :%s",c->name,topic);
1558 strncpy(c->topic,topic,MAXTOPIC);
1559 strncpy(c->setby,setby,NICKMAX);
1564 void handle_M(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1567 char original[MAXBUF],target[MAXBUF];
1568 strncpy(original,params,MAXBUF);
1570 char* parameter = strtok(params," ");
1571 strncpy(target,parameter,MAXBUF);
1574 if (parameter[0] == ':')
1576 pars[index++] = parameter;
1577 parameter = strtok(NULL," ");
1579 log(DEBUG,"*** MODE: %s %s",pars[0],pars[1]);
1580 merge_mode(pars,index);
1581 if (FindChan(target))
1583 WriteChannelLocal(FindChan(target), NULL, "MODE %s",original);
1587 Write(Find(target)->fd,":%s MODE %s",ServerName,original);
1591 // m is modes set by users only (not servers) valid targets are channels or users.
1593 void handle_m(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1595 // m blah #chatspike +b *!test@*4
1597 char original[MAXBUF];
1598 strncpy(original,params,MAXBUF);
1600 if (!strchr(params,' '))
1602 WriteOpers("WARNING! 'm' token in data stream without any parameters! Something fishy is going on!");
1608 char* src = strtok(params," ");
1609 userrec* user = Find(src);
1613 log(DEBUG,"Found user: %s",user->nick);
1614 char* parameter = strtok(NULL," ");
1617 pars[index++] = parameter;
1618 parameter = strtok(NULL," ");
1621 log(DEBUG,"Calling merge_mode2");
1622 merge_mode2(pars,index,user);
1627 void handle_L(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1629 char* nick = strtok(params," ");
1630 char* channel = strtok(NULL," :");
1631 char* reason = strtok(NULL,"\r\n");
1632 userrec* user = Find(nick);
1636 if (strcmp(reason,""))
1638 del_channel(user,channel,reason,true);
1642 del_channel(user,channel,NULL,true);
1647 void handle_K(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1649 char* src = strtok(params," ");
1650 char* nick = strtok(NULL," :");
1651 char* reason = strtok(NULL,"\r\n");
1652 char kreason[MAXBUF];
1655 userrec* u = Find(nick);
1656 userrec* user = Find(src);
1660 WriteTo(user, u, "KILL %s :%s!%s!%s!%s (%s)", u->nick, source->name, ServerName, user->dhost,user->nick,reason);
1661 WriteOpers("*** Remote kill from %s by %s: %s!%s@%s (%s)",source->name,user->nick,u->nick,u->ident,u->host,reason);
1662 snprintf(kreason,MAXBUF,"[%s] Killed (%s (%s))",source->name,user->nick,reason);
1663 kill_link(u,kreason);
1667 void handle_Q(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1669 char* nick = strtok(params," :");
1670 char* reason = strtok(NULL,"\r\n");
1673 userrec* user = Find(nick);
1677 if (strlen(reason)>MAXQUIT)
1679 reason[MAXQUIT-1] = '\0';
1683 WriteCommonExcept(user,"QUIT :%s",reason);
1685 user_hash::iterator iter = clientlist.find(user->nick);
1687 if (iter != clientlist.end())
1689 log(DEBUG,"deleting user hash value %d",iter->second);
1690 if ((iter->second) && (user->registered == 7)) {
1691 delete iter->second;
1693 clientlist.erase(iter);
1696 purge_empty_chans();
1700 void handle_n(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1702 char* oldnick = strtok(params," ");
1703 char* newnick = strtok(NULL," ");
1705 userrec* user = Find(oldnick);
1709 WriteCommon(user,"NICK %s",newnick);
1710 if (is_uline(tcp_host))
1713 FOREACH_RESULT(OnUserPreNick(user,newnick));
1715 // if a module returns true, the nick change couldnt be allowed
1716 kill_link(user,"Nickname collision");
1719 if (matches_qline(newnick))
1721 kill_link(user,"Nickname collision");
1725 // broadcast this because its a services thingy
1726 char buffer[MAXBUF];
1727 snprintf(buffer,MAXBUF,"n %s %s",user->nick,newnick);
1728 NetSendToAll(buffer);
1730 user = ReHashNick(user->nick, newnick);
1732 if (!user->nick) return;
1733 strncpy(user->nick, newnick,NICKMAX);
1734 log(DEBUG,"new nick set: %s",user->nick);
1738 // k <SOURCE> <DEST> <CHANNEL> :<REASON>
1739 void handle_k(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1741 char* src = strtok(params," ");
1742 char* dest = strtok(NULL," ");
1743 char* channel = strtok(NULL," :");
1744 char* reason = strtok(NULL,"\r\n");
1746 userrec* s = Find(src);
1747 userrec* d = Find(dest);
1748 chanrec* c = FindChan(channel);
1749 if ((s) && (d) && (c))
1751 kick_channel(s,d,c,reason);
1756 if ((s) && (d) && (c))
1758 kick_channel(s,d,c,reason);
1763 void handle_AT(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1765 char* who = strtok(params," :");
1766 char* text = strtok(NULL,"\r\n");
1768 userrec* s = Find(who);
1771 WriteWallOps(s,true,text);
1775 void handle_H(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1777 log(DEBUG,"Adding ULined server %s to my map",params);
1779 s.SetState(STATE_DISCONNECTED);
1780 s.SetServerName(params);
1781 source->connectors.push_back(s);
1782 WriteOpers("Non-Mesh server %s has joined the network",params);
1785 void handle_N(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1787 char* tm = strtok(params," ");
1788 char* nick = strtok(NULL," ");
1789 char* host = strtok(NULL," ");
1790 char* dhost = strtok(NULL," ");
1791 char* ident = strtok(NULL," ");
1792 char* modes = strtok(NULL," ");
1793 char* ipaddr = strtok(NULL," ");
1794 char* server = strtok(NULL," :");
1795 char* gecos = strtok(NULL,"\r\n");
1798 time_t TS = atoi(tm);
1799 user_hash::iterator iter = clientlist.find(nick);
1800 if (iter != clientlist.end())
1803 WriteOpers("Nickname collision: %s@%s != %s@%s",nick,server,iter->second->nick,iter->second->server);
1805 snprintf(str,MAXBUF,"Killed (Nick Collision (%s@%s < %s@%s))",nick,server,iter->second->nick,iter->second->server);
1806 WriteServ(iter->second->fd, "KILL %s :%s",iter->second->nick,str);
1807 kill_link(iter->second,str);
1809 clientlist[nick] = new userrec();
1810 // remote users have an fd of -1. This is so that our Write abstraction
1811 // routines know to route any messages to this record away to whatever server
1813 clientlist[nick]->fd = -1;
1814 strncpy(clientlist[nick]->nick, nick,NICKMAX);
1815 strncpy(clientlist[nick]->host, host,160);
1816 strncpy(clientlist[nick]->dhost, dhost,160);
1817 strncpy(clientlist[nick]->server, server,256);
1818 strncpy(clientlist[nick]->ident, ident,10); // +1 char to compensate for tilde
1819 strncpy(clientlist[nick]->fullname, gecos,128);
1820 clientlist[nick]->signon = TS;
1821 clientlist[nick]->nping = 0; // this is ignored for a remote user anyway.
1822 clientlist[nick]->lastping = 1;
1823 clientlist[nick]->port = 0; // so is this...
1824 clientlist[nick]->registered = 7; // this however we need to set for them to receive messages and appear online
1825 clientlist[nick]->idle_lastmsg = time(NULL); // this is unrealiable and wont actually be used locally
1826 for (int i = 0; i < MAXCHANS; i++)
1828 clientlist[nick]->chans[i].channel = NULL;
1829 clientlist[nick]->chans[i].uc_modes = 0;
1833 void handle_F(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1835 long tdiff = time(NULL) - atoi(params);
1837 WriteOpers("TS split for %s -> %s: %d",source->name,reply->name,tdiff);
1840 void handle_a(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1842 char* nick = strtok(params," :");
1843 char* gecos = strtok(NULL,"\r\n");
1845 userrec* user = Find(nick);
1848 strncpy(user->fullname,gecos,MAXBUF);
1851 void handle_b(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1853 char* nick = strtok(params," ");
1854 char* host = strtok(NULL," ");
1856 userrec* user = Find(nick);
1859 strncpy(user->dhost,host,160);
1862 void handle_plus(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1865 // + test3.chatspike.net 7010 -2016508415
1866 char* servername = strtok(params," ");
1867 char* ipaddr = strtok(NULL," ");
1868 char* ipport = strtok(NULL," ");
1869 char* cookie = strtok(NULL," ");
1870 log(DEBUG,"*** Connecting back to %s:%d",ipaddr,atoi(ipport));
1873 bool conn_already = false;
1874 for (int i = 0; i < 32; i++)
1878 for (int j = 0; j < me[i]->connectors.size(); j++)
1880 if (!strcasecmp(me[i]->connectors[j].GetServerName().c_str(),servername))
1882 if (me[i]->connectors[j].GetServerPort() == atoi(ipport))
1884 log(DEBUG,"Already got a connection to %s:%d, ignoring +",ipaddr,atoi(ipport));
1885 conn_already = true;
1892 me[defaultRoute]->MeshCookie(ipaddr,atoi(ipport),atoi(cookie),servername);
1895 void handle_R(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1897 char* server = strtok(params," ");
1898 char* data = strtok(NULL,"\r\n");
1899 if ((!data) || (!server))
1901 log(DEBUG,"Someones playing silly buggers, attempting to send to a null server or send a null message (BUG?)");
1905 log(DEBUG,"Forwarded packet '%s' to '%s'",data,server);
1906 NetSendToOne(server,data);
1909 void handle_J(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1912 // The J token currently has no timestamp - this needs looking at
1913 // because it will allow splitriding.
1914 char* nick = strtok(params," ");
1915 char* channel = strtok(NULL," ");
1916 userrec* user = Find(nick);
1919 if ((user != NULL) && (strcmp(channel,"")))
1921 char privilage = '\0';
1922 if (channel[0] != '#')
1924 privilage = channel[0];
1927 add_channel(user,channel,"",true);
1929 // now work out the privilages they should have on each channel
1930 // and send the appropriate servermodes.
1931 for (int i = 0; i != MAXCHANS; i++)
1933 if (user->chans[i].channel)
1935 if (!strcasecmp(user->chans[i].channel->name,channel))
1937 if (privilage == '@')
1939 user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_OP;
1940 WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +o %s",channel,user->nick);
1942 if (privilage == '%')
1944 user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_HOP;
1945 WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +h %s",channel,user->nick);
1947 if (privilage == '+')
1949 user->chans[i].uc_modes = user->chans[i].uc_modes | UCMODE_VOICE;
1950 WriteChannelLocal(user->chans[i].channel, NULL, "MODE %s +v %s",channel,user->nick);
1957 channel = strtok(NULL," ");
1961 void handle_dollar(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1963 log(DEBUG,"Storing routing table...");
1964 char* sourceserver = strtok(params," ");
1965 char* server = strtok(NULL," ");
1966 for (int i = 0; i < 32; i++)
1970 for (int j = 0; j < me[i]->connectors.size(); j++)
1972 if (!strcasecmp(me[i]->connectors[j].GetServerName().c_str(),sourceserver))
1974 me[i]->connectors[j].routes.clear();
1975 log(DEBUG,"Found entry for source server.");
1979 me[i]->connectors[j].routes.push_back(server);
1980 log(DEBUG,"*** Stored route: %s -> %s -> %s",ServerName,sourceserver,server);
1981 server = strtok(NULL," ");
1988 log(DEBUG,"Warning! routing table received from nonexistent server!");
1991 void handle_amp(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
1993 log(DEBUG,"Netsplit! %s split from mesh, removing!",params);
1994 WriteOpers("*** NOTICE - Controlled netsplit: %s split from %s",params,ServerName);
1995 bool go_again = true;
1999 for (int i = 0; i < 32; i++)
2003 for (vector<ircd_connector>::iterator j = me[i]->connectors.begin(); j != me[i]->connectors.end(); j++)
2005 if (!strcasecmp(j->GetServerName().c_str(),params))
2008 j->CloseConnection();
2009 me[i]->connectors.erase(j);
2017 log(DEBUG,"Removed server. Will remove clients...");
2018 // iterate through the userlist and remove all users on this server.
2019 // because we're dealing with a mesh, we dont have to deal with anything
2020 // "down-route" from this server (nice huh)
2022 char reason[MAXBUF];
2023 snprintf(reason,MAXBUF,"%s %s",ServerName,params);
2027 for (user_hash::const_iterator u = clientlist.begin(); u != clientlist.end(); u++)
2029 if (!strcasecmp(u->second->server,params))
2031 kill_link(u->second,reason);
2041 void handle_hash(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2043 // # <mask> <who-set-it> <time-set> <duration> :<reason>
2044 log(DEBUG,"Adding G-line");
2045 char* mask = strtok(params," ");
2046 char* who = strtok(NULL," ");
2047 char* create_time = strtok(NULL," ");
2048 char* duration = strtok(NULL," :");
2049 char* reason = strtok(NULL,"\r\n");
2050 add_gline(atoi(duration),who,reason,mask);
2051 // we must update the creation time on this gline
2052 // now that we've added it, or it wont expire at the right time.
2053 gline_set_creation_time(mask,atoi(create_time));
2054 if (!atoi(duration))
2056 WriteOpers("*** %s Added permenant G-Line on %s.",who,mask);
2060 WriteOpers("*** %s Added timed G-Line on %s to expire in %d seconds.",who,mask,atoi(duration));
2065 void handle_dot(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2067 log(DEBUG,"Removing G-line");
2068 char* mask = strtok(params," ");
2069 char* who = strtok(NULL," ");
2072 if (del_gline(mask))
2076 WriteOpers("*** %s Removed G-line on %s.",who,mask);
2082 void handle_add_sqline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2084 // { <mask> <who-set-it> <time-set> <duration> :<reason>
2085 log(DEBUG,"Adding Q-line");
2086 char* mask = strtok(params," ");
2087 char* who = strtok(NULL," ");
2088 char* create_time = strtok(NULL," ");
2089 char* duration = strtok(NULL," :");
2090 char* reason = strtok(NULL,"\r\n");
2091 add_qline(atoi(duration),who,reason,mask);
2092 // we must update the creation time on this gline
2093 // now that we've added it, or it wont expire at the right time.
2094 qline_set_creation_time(mask,atoi(create_time));
2095 qline_make_global(mask);
2096 if (!atoi(duration))
2098 WriteOpers("*** %s Added permenant Q-Line on %s.",who,mask);
2102 WriteOpers("*** %s Added timed Q-Line on %s to expire in %d seconds.",who,mask,atoi(duration));
2107 void handle_del_sqline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2109 log(DEBUG,"Removing Q-line");
2110 char* mask = strtok(params," ");
2111 char* who = strtok(NULL," ");
2114 if (del_qline(mask))
2118 WriteOpers("*** %s Removed Q-line on %s.",who,mask);
2124 void handle_add_szline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2126 // } <mask> <who-set-it> <time-set> <duration> :<reason>
2127 log(DEBUG,"Adding Z-line");
2128 char* mask = strtok(params," ");
2129 char* who = strtok(NULL," ");
2130 char* create_time = strtok(NULL," ");
2131 char* duration = strtok(NULL," :");
2132 char* reason = strtok(NULL,"\r\n");
2133 add_zline(atoi(duration),who,reason,mask);
2134 // we must update the creation time on this gline
2135 // now that we've added it, or it wont expire at the right time.
2136 zline_set_creation_time(mask,atoi(create_time));
2137 zline_make_global(mask);
2138 if (!atoi(duration))
2140 WriteOpers("*** %s Added permenant Z-Line on %s.",who,mask);
2144 WriteOpers("*** %s Added timed Z-Line on %s to expire in %d seconds.",who,mask,atoi(duration));
2149 void handle_del_szline(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host)
2151 log(DEBUG,"Removing Z-line");
2152 char* mask = strtok(params," ");
2153 char* who = strtok(NULL," ");
2156 if (del_zline(mask))
2160 WriteOpers("*** %s Removed Q-line on %s.",who,mask);
2167 void process_restricted_commands(char token,char* params,serverrec* source,serverrec* reply, char* tcp_host,char* ipaddr,int port)
2169 char buffer[MAXBUF];
2176 nb_start = time(NULL);
2177 WriteOpers("Server %s is starting netburst.",tcp_host);
2178 // now broadcast this new servers address out to all servers that are linked to us,
2179 // except the newcomer. They'll all attempt to connect back to it.
2180 authcookie = rand()*rand();
2181 snprintf(buffer,MAXBUF,"~ %d",authcookie);
2182 NetSendToAll(buffer);
2186 // once stored, this authcookie permits other servers to log in
2187 // without user or password, using it.
2189 auth_cookies.push_back(atoi(params));
2190 log(DEBUG,"*** Stored auth cookie, will permit servers with auth-cookie %d",atoi(params));
2192 // connect back to a server using an authcookie
2194 handle_plus(token,params,source,reply,tcp_host);
2198 handle_dollar(token,params,source,reply,tcp_host);
2200 // node unreachable - we cant route to a server, sooooo we slit it off.
2201 // servers can generate these for themselves for an squit.
2203 handle_amp(token,params,source,reply,tcp_host);
2205 // R <server> <data>
2206 // redirect token, send all of <data> along to the given
2207 // server as this server has been found to still have a route to it
2209 handle_R(token,params,source,reply,tcp_host);
2214 reply->SendPacket("!",tcp_host);
2224 // N <TS> <NICK> <HOST> <DHOST> <IDENT> <MODES> <SERVER> :<GECOS>
2225 // introduce remote client
2227 handle_N(token,params,source,reply,tcp_host);
2229 // a <NICK> :<GECOS>
2230 // change GECOS (SETNAME)
2232 handle_a(token,params,source,reply,tcp_host);
2235 // change displayed host (SETHOST)
2237 handle_b(token,params,source,reply,tcp_host);
2239 // t <NICK> <CHANNEL> :<TOPIC>
2240 // change a channel topic
2242 handle_t(token,params,source,reply,tcp_host);
2244 // i <NICK> <CHANNEL>
2245 // invite a user to a channel
2247 handle_i(token,params,source,reply,tcp_host);
2249 // k <SOURCE> <DEST> <CHANNEL> :<REASON>
2250 // kick a user from a channel
2252 handle_k(token,params,source,reply,tcp_host);
2254 // n <NICK> <NEWNICK>
2255 // change nickname of client -- a server should only be able to
2256 // change the nicknames of clients that reside on it unless
2259 handle_n(token,params,source,reply,tcp_host);
2261 // J <NICK> <CHANLIST>
2262 // Join user to channel list, merge channel permissions
2264 handle_J(token,params,source,reply,tcp_host);
2266 // T <TS> <CHANNEL> <TOPICSETTER> :<TOPIC>
2267 // change channel topic (netburst only)
2269 handle_T(token,params,source,reply,tcp_host);
2271 // M <TARGET> <MODES> [MODE-PARAMETERS]
2272 // Server setting modes on an object
2274 handle_M(token,params,source,reply,tcp_host);
2276 // m <SOURCE> <TARGET> <MODES> [MODE-PARAMETERS]
2277 // User setting modes on an object
2279 handle_m(token,params,source,reply,tcp_host);
2281 // P <SOURCE> <TARGET> :<TEXT>
2282 // Send a private/channel message
2284 handle_P(token,params,source,reply,tcp_host);
2286 // V <SOURCE> <TARGET> :<TEXT>
2287 // Send a private/channel notice
2289 handle_V(token,params,source,reply,tcp_host);
2291 // L <SOURCE> <CHANNEL> :<REASON>
2292 // User parting a channel
2294 handle_L(token,params,source,reply,tcp_host);
2296 // Q <SOURCE> :<REASON>
2299 handle_Q(token,params,source,reply,tcp_host);
2302 // introduce non-meshable server (such as a services server)
2304 handle_H(token,params,source,reply,tcp_host);
2306 // K <SOURCE> <DEST> :<REASON>
2309 handle_K(token,params,source,reply,tcp_host);
2311 // @ <SOURCE> :<TEXT>
2314 handle_AT(token,params,source,reply,tcp_host);
2316 // # <mask> <who-set-it> <time-set> <duration> :<reason>
2319 handle_hash(token,params,source,reply,tcp_host);
2324 handle_dot(token,params,source,reply,tcp_host);
2326 // # <mask> <who-set-it> <time-set> <duration> :<reason>
2329 handle_add_sqline(token,params,source,reply,tcp_host);
2334 handle_del_sqline(token,params,source,reply,tcp_host);
2336 // # <mask> <who-set-it> <time-set> <duration> :<reason>
2339 handle_add_szline(token,params,source,reply,tcp_host);
2344 handle_del_szline(token,params,source,reply,tcp_host);
2349 WriteOpers("Server %s has completed netburst. (%d secs)",tcp_host,time(NULL)-nb_start);
2350 handle_F(token,params,source,reply,tcp_host);
2352 // tell all the other servers to use this authcookie to connect back again
2353 // got '+ test3.chatspike.net 7010 -2016508415' from test.chatspike.net
2354 snprintf(buffer,MAXBUF,"+ %s %s %d %d",tcp_host,ipaddr,port,authcookie);
2355 NetSendToAllExcept(tcp_host,buffer);
2358 // end netburst with no mesh creation
2360 WriteOpers("Server %s has completed netburst. (%d secs)",tcp_host,time(NULL)-nb_start);
2361 handle_F(token,params,source,reply,tcp_host);
2363 // tell everyone else about the new server name so they just add it in the disconnected
2365 snprintf(buffer,MAXBUF,"u %s :%s",tcp_host,GetServerDescription(tcp_host).c_str());
2366 NetSendToAllExcept(tcp_host,buffer);
2369 // Send netburst now
2371 WriteOpers("Sending my netburst to %s",tcp_host);
2372 DoSync(source,tcp_host);
2373 WriteOpers("Send of netburst to %s completed",tcp_host);
2374 NetSendMyRoutingTable();
2378 WriteOpers("WARNING! Unknown datagram type '%c'",token);
2384 void handle_link_packet(char* udp_msg, char* tcp_host, serverrec *serv)
2386 if ((!strncmp(udp_msg,"USER ",5)) || (!strncmp(udp_msg,"NICK ",5)))
2388 // a user on a server port, just close their connection.
2389 RemoveServer(tcp_host);
2393 char response[10240];
2394 char token = udp_msg[0];
2395 char* old = udp_msg;
2397 if (token == ':') // leading :servername or details - strip them off (services does this, sucky)
2399 char* src = udp_msg+1;
2400 while (udp_msg[0] != ' ')
2404 char* comd = udp_msg;
2405 while (udp_msg[0] != ' ')
2410 char source[MAXBUF];
2411 char command[MAXBUF];
2412 strcpy(data,udp_msg);
2414 strcpy(command,comd);
2418 // :services-dev.chatspike.net 433 Craig Craig :Nickname is registered to someone else
2419 if (!strcmp(command,"433"))
2423 if (!strcmp(command,"432"))
2427 if (!strcmp(command,"NOTICE"))
2429 snprintf(udp_msg,MAXBUF,"V %s %s",source,data);
2430 log(DEBUG,"Rewrote NOTICE from services to: '%s'",udp_msg);
2433 if (!strcmp(command,"QUIT"))
2435 if ((!udp_msg) || (!strcmp(data,"")) || (strcmp(data,":")))
2437 strcpy(data,":No reason");
2439 if (!strcmp(data,":"))
2441 strcpy(data,":No reason");
2443 snprintf(udp_msg,MAXBUF,"Q %s %s",source,data);
2444 log(DEBUG,"Rewrote QUIT from services to: '%s'",udp_msg);
2447 if (!strcmp(command,"SQUIT"))
2449 snprintf(udp_msg,MAXBUF,"& %s",source);
2450 log(DEBUG,"Rewrote SQUIT from services to: '%s'",udp_msg);
2453 if (!strcmp(command,"SVSMODE"))
2455 snprintf(udp_msg,MAXBUF,"M %s",data);
2456 log(DEBUG,"Rewrote SVSMODE from services to: '%s'",udp_msg);
2459 if (!strcmp(command,"SVS2MODE"))
2461 snprintf(udp_msg,MAXBUF,"M %s",data);
2462 log(DEBUG,"Rewrote SVSMODE from services to: '%s'",udp_msg);
2465 // todo: this wont work without u:lines
2466 // in give_ops etc allow nick on a u:lined serv to do just about anything
2467 if (!strcmp(command,"MODE"))
2469 snprintf(udp_msg,MAXBUF,"m %s %s",source,data);
2470 log(DEBUG,"Rewrote MODE from services to: '%s'",udp_msg);
2473 if (!strcmp(command,"KICK"))
2475 snprintf(udp_msg,MAXBUF,"k %s %s",source,data);
2476 log(DEBUG,"Rewrote KICK from services to: '%s'",udp_msg);
2479 if (!strcmp(command,"KILL"))
2481 snprintf(udp_msg,MAXBUF,"K %s %s",source,data);
2482 log(DEBUG,"Rewrote KILL from services to: '%s'",udp_msg);
2485 if (!strcmp(command,"SVSJOIN"))
2487 snprintf(udp_msg,MAXBUF,"J %s",data);
2488 NetSendToOne(tcp_host,udp_msg);
2489 char* nick = strtok(data," ");
2490 char* chan = strtok(NULL," ");
2491 log(DEBUG,"Rewrote SVSJOIN from services to: '%s'",udp_msg);
2492 userrec* u = Find(nick);
2495 add_channel(u,chan,"",true);
2503 char* params = udp_msg + 2;
2504 char finalparam[1024];
2505 strcpy(finalparam," :xxxx");
2506 if (strstr(udp_msg," :")) {
2507 strncpy(finalparam,strstr(udp_msg," :"),1024);
2512 char* cookie = strtok(params," ");
2513 char* servername = strtok(NULL," ");
2514 char* serverdesc = finalparam+2;
2516 WriteOpers("AuthCookie CONNECT from %s (%s)",servername,tcp_host);
2518 for (int u = 0; u < auth_cookies.size(); u++)
2520 if (auth_cookies[u] == atoi(cookie))
2522 WriteOpers("Allowed cookie from %s, is now part of the mesh",servername);
2525 for (int j = 0; j < 32; j++)
2529 for (int k = 0; k < me[j]->connectors.size(); k++)
2531 if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host))
2533 me[j]->connectors[k].SetServerName(servername);
2534 me[j]->connectors[k].SetDescription(serverdesc);
2535 me[j]->connectors[k].SetState(STATE_CONNECTED);
2536 NetSendMyRoutingTable();
2541 WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right now! Possible intrusion attempt!",tcp_host);
2549 // bad cookie, bad bad! go sit in the corner!
2550 WriteOpers("Bad cookie from %s!",servername);
2555 // S test.chatspike.net password portn :ChatSpike InspIRCd test server
2556 char* servername = strtok(params," ");
2557 char* password = strtok(NULL," ");
2558 char* myport = strtok(NULL," ");
2559 char* revision = strtok(NULL," ");
2560 char* serverdesc = finalparam+2;
2562 WriteOpers("CONNECT from %s (%s) (their port: %d)",servername,tcp_host,atoi(myport));
2564 ircd_connector* cn = serv->FindHost(servername);
2568 WriteOpers("CONNECT aborted: Server %s already exists from %s",servername,ServerName);
2569 char buffer[MAXBUF];
2570 sprintf(buffer,"E :Server %s already exists!",servername);
2571 serv->SendPacket(buffer,tcp_host);
2572 RemoveServer(tcp_host);
2576 if (atoi(revision) != GetRevision())
2578 WriteOpers("CONNECT aborted: Could not link to %s, is an incompatible version %s, our version is %d",servername,revision,GetRevision());
2579 char buffer[MAXBUF];
2580 sprintf(buffer,"E :Version number mismatch");
2581 serv->SendPacket(buffer,tcp_host);
2582 RemoveServer(tcp_host);
2583 RemoveServer(servername);
2587 for (int j = 0; j < serv->connectors.size(); j++)
2589 if (!strcasecmp(serv->connectors[j].GetServerName().c_str(),tcp_host))
2591 serv->connectors[j].SetServerName(servername);
2592 serv->connectors[j].SetDescription(serverdesc);
2593 serv->connectors[j].SetServerPort(atoi(myport));
2598 char Link_ServerName[1024];
2599 char Link_IPAddr[1024];
2600 char Link_Port[1024];
2601 char Link_Pass[1024];
2602 char Link_SendPass[1024];
2605 // search for a corresponding <link> block in the config files
2606 for (int i = 0; i < ConfValueEnum("link",&config_f); i++)
2608 ConfValue("link","name",i,Link_ServerName,&config_f);
2609 ConfValue("link","ipaddr",i,Link_IPAddr,&config_f);
2610 ConfValue("link","port",i,Link_Port,&config_f);
2611 ConfValue("link","recvpass",i,Link_Pass,&config_f);
2612 ConfValue("link","sendpass",i,Link_SendPass,&config_f);
2613 log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass);
2614 LinkPort = atoi(Link_Port);
2615 if (!strcasecmp(Link_ServerName,servername))
2617 // we have a matching link line -
2618 // send a 'diminutive' server message back...
2619 snprintf(response,10240,"s %s %s :%s",ServerName,Link_SendPass,ServerDesc);
2620 serv->SendPacket(response,servername);
2622 for (int t = 0; t < serv->connectors.size(); t++)
2624 if (!strcasecmp(serv->connectors[t].GetServerName().c_str(),servername))
2626 serv->connectors[t].SetState(STATE_CONNECTED);
2633 char buffer[MAXBUF];
2634 sprintf(buffer,"E :Access is denied (no matching link block)");
2635 serv->SendPacket(buffer,tcp_host);
2636 WriteOpers("CONNECT from %s denied, no matching link block",servername);
2637 RemoveServer(tcp_host);
2638 RemoveServer(servername);
2643 // S test.chatspike.net password :ChatSpike InspIRCd test server
2644 char* servername = strtok(params," ");
2645 char* password = strtok(NULL," ");
2646 char* serverdesc = finalparam+2;
2648 // TODO: we should do a check here to ensure that this server is one we recently initiated a
2649 // link with, and didnt hear an 's' or 'E' back from yet (these are the only two valid responses
2650 // to an 'S' command. If we didn't recently send an 'S' to this server, theyre trying to spoof
2651 // a connect, so put out an oper alert!
2653 // for now, just accept all, we'll fix that later.
2654 WriteOpers("%s accepted our link credentials ",servername);
2656 char Link_ServerName[1024];
2657 char Link_IPAddr[1024];
2658 char Link_Port[1024];
2659 char Link_Pass[1024];
2660 char Link_SendPass[1024];
2663 // search for a corresponding <link> block in the config files
2664 for (int i = 0; i < ConfValueEnum("link",&config_f); i++)
2666 ConfValue("link","name",i,Link_ServerName,&config_f);
2667 ConfValue("link","ipaddr",i,Link_IPAddr,&config_f);
2668 ConfValue("link","port",i,Link_Port,&config_f);
2669 ConfValue("link","recvpass",i,Link_Pass,&config_f);
2670 ConfValue("link","sendpass",i,Link_SendPass,&config_f);
2671 log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass);
2672 LinkPort = atoi(Link_Port);
2673 if (!strcasecmp(Link_ServerName,servername))
2675 // matching link at this end too, we're all done!
2676 // at this point we must begin key exchange and insert this
2677 // server into our 'active' table.
2678 for (int j = 0; j < 32; j++)
2682 for (int k = 0; k < me[j]->connectors.size(); k++)
2684 if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host))
2686 char buffer[MAXBUF];
2687 me[j]->connectors[k].SetDescription(serverdesc);
2688 me[j]->connectors[k].SetState(STATE_CONNECTED);
2689 sprintf(buffer,"X 0");
2690 serv->SendPacket(buffer,tcp_host);
2691 DoSync(me[j],tcp_host);
2692 NetSendMyRoutingTable();
2697 WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right noe! Possible intrusion attempt!",tcp_host);
2702 log(DEBUG,"Server names '%s' and '%s' don't match",Link_ServerName,servername);
2705 char buffer[MAXBUF];
2706 sprintf(buffer,"E :Access is denied (no matching link block)");
2707 serv->SendPacket(buffer,tcp_host);
2708 WriteOpers("CONNECT from %s denied, no matching link block",servername);
2709 RemoveServer(tcp_host);
2710 RemoveServer(servername);
2715 // U services.chatspike.net password :ChatSpike Services
2717 // non-meshed link, used by services. Everything coming from a non-meshed link is auto broadcasted.
2718 char* servername = strtok(params," ");
2719 char* password = strtok(NULL," ");
2720 char* serverdesc = finalparam+2;
2722 char Link_ServerName[1024];
2723 char Link_IPAddr[1024];
2724 char Link_Port[1024];
2725 char Link_Pass[1024];
2726 char Link_SendPass[1024];
2729 // search for a corresponding <link> block in the config files
2730 for (int i = 0; i < ConfValueEnum("link",&config_f); i++)
2732 ConfValue("link","name",i,Link_ServerName,&config_f);
2733 ConfValue("link","ipaddr",i,Link_IPAddr,&config_f);
2734 ConfValue("link","port",i,Link_Port,&config_f);
2735 ConfValue("link","recvpass",i,Link_Pass,&config_f);
2736 ConfValue("link","sendpass",i,Link_SendPass,&config_f);
2737 log(DEBUG,"(%d) Comparing against name='%s', ipaddr='%s', port='%s', recvpass='%s'",i,Link_ServerName,Link_IPAddr,Link_Port,Link_Pass);
2738 LinkPort = atoi(Link_Port);
2739 if (!strcasecmp(Link_ServerName,servername))
2741 // matching link at this end too, we're all done!
2742 // at this point we must begin key exchange and insert this
2743 // server into our 'active' table.
2744 for (int j = 0; j < 32; j++)
2748 for (int k = 0; k < me[j]->connectors.size(); k++)
2750 if (!strcasecmp(me[j]->connectors[k].GetServerName().c_str(),tcp_host))
2752 char buffer[MAXBUF];
2753 me[j]->connectors[k].SetDescription(serverdesc);
2754 me[j]->connectors[k].SetServerName(servername);
2755 me[j]->connectors[k].SetState(STATE_SERVICES);
2756 sprintf(buffer,"X 0");
2757 serv->SendPacket(buffer,servername);
2758 DoSync(me[j],servername);
2759 NetSendMyRoutingTable();
2760 sprintf(buffer,"H %s",servername);
2761 NetSendToAllExcept(servername,buffer);
2762 WriteOpers("Non-Mesh server %s has joined the network",servername);
2767 WriteOpers("\2WARNING!\2 %s sent us an authentication packet but we are not authenticating with this server right noe! Possible intrusion attempt!",tcp_host);
2772 log(DEBUG,"Server names '%s' and '%s' don't match",Link_ServerName,servername);
2775 char buffer[MAXBUF];
2776 sprintf(buffer,"E :Access is denied (no matching link block)");
2777 serv->SendPacket(buffer,tcp_host);
2778 WriteOpers("CONNECT from %s denied, no matching link block",servername);
2779 RemoveServer(tcp_host);
2780 RemoveServer(servername);
2785 char* error_message = finalparam+2;
2786 WriteOpers("ERROR from %s: %s",tcp_host,error_message);
2791 serverrec* source_server = NULL;
2793 for (int j = 0; j < 32; j++)
2797 for (int x = 0; x < me[j]->connectors.size(); x++)
2799 log(DEBUG,"Servers are: '%s' '%s'",tcp_host,me[j]->connectors[x].GetServerName().c_str());
2800 if (!strcasecmp(me[j]->connectors[x].GetServerName().c_str(),tcp_host))
2802 if ((me[j]->connectors[x].GetState() == STATE_CONNECTED) || (me[j]->connectors[x].GetState() == STATE_SERVICES))
2804 // found a valid ircd_connector.
2805 process_restricted_commands(token,params,me[j],serv,tcp_host,me[j]->connectors[x].GetServerIP(),me[j]->connectors[x].GetServerPort());
2813 log(DEBUG,"Unrecognised token or unauthenticated host in datagram from %s: %c",tcp_host,token);
2817 long duration(char* str)
2819 char n_field[MAXBUF];
2821 char* str_end = str + strlen(str);
2824 for (char* i = str; i < str_end; i++)
2826 // if we have digits, build up a string for the value in n_field,
2827 // up to 10 digits in size.
2828 if ((*i >= '0') && (*i <= '9'))
2830 strncat(n_field,i,10);
2834 // we dont have a digit, check for numeric tokens
2835 switch (tolower(*i))
2838 total += atoi(n_field);
2842 total += (atoi(n_field)*duration_m);
2846 total += (atoi(n_field)*duration_h);
2850 total += (atoi(n_field)*duration_d);
2854 total += (atoi(n_field)*duration_w);
2858 total += (atoi(n_field)*duration_y);
2864 // add trailing seconds
2865 total += atoi(n_field);
2871 void handle_kline(char **parameters, int pcnt, userrec *user)
2875 add_kline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2876 if (!duration(parameters[1]))
2878 WriteOpers("*** %s added permenant K-line for %s.",user->nick,parameters[0]);
2882 WriteOpers("*** %s added timed K-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2887 if (del_kline(parameters[0]))
2889 WriteOpers("*** %s Removed K-line on %s.",user->nick,parameters[0]);
2893 WriteServ(user->fd,"NOTICE %s :*** K-Line %s not found in list, try /stats k.",user->nick,parameters[0]);
2899 void handle_gline(char **parameters, int pcnt, userrec *user)
2901 char netdata[MAXBUF];
2904 add_gline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2905 // # <mask> <who-set-it> <time-set> <duration> :<reason>
2906 snprintf(netdata,MAXBUF,"# %s %s %ld %ld :%s",parameters[0],user->nick,time(NULL),duration(parameters[1]),parameters[2]);
2907 NetSendToAll(netdata);
2908 if (!duration(parameters[1]))
2910 WriteOpers("*** %s added permenant G-line for %s.",user->nick,parameters[0]);
2914 WriteOpers("*** %s added timed G-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2919 if (del_gline(parameters[0]))
2921 // . <mask> <who-removed-it>
2922 snprintf(netdata,MAXBUF,". %s %s",parameters[0],user->nick);
2923 WriteOpers("*** %s Removed G-line on %s.",user->nick,parameters[0]);
2927 WriteServ(user->fd,"NOTICE %s :*** G-Line %s not found in list, try /stats g.",user->nick,parameters[0]);
2933 void handle_zline(char **parameters, int pcnt, userrec *user)
2937 add_zline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2938 if (!duration(parameters[1]))
2940 WriteOpers("*** %s added permenant Z-line for %s.",user->nick,parameters[0]);
2944 WriteOpers("*** %s added timed Z-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2949 if (del_zline(parameters[0]))
2951 WriteOpers("*** %s Removed Z-line on %s.",user->nick,parameters[0]);
2955 WriteServ(user->fd,"NOTICE %s :*** Z-Line %s not found in list, try /stats Z.",user->nick,parameters[0]);
2961 void handle_qline(char **parameters, int pcnt, userrec *user)
2965 add_qline(duration(parameters[1]),user->nick,parameters[2],parameters[0]);
2966 if (!duration(parameters[1]))
2968 WriteOpers("*** %s added permenant Q-line for %s.",user->nick,parameters[0]);
2972 WriteOpers("*** %s added timed Q-line for %s, expires in %d seconds.",user->nick,parameters[0],duration(parameters[1]));
2977 if (del_qline(parameters[0]))
2979 WriteOpers("*** %s Removed Q-line on %s.",user->nick,parameters[0]);
2983 WriteServ(user->fd,"NOTICE %s :*** Q-Line %s not found in list, try /stats k.",user->nick,parameters[0]);