1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
7 * <brain@chatspike.net>
8 * <Craig@chatspike.net>
10 * Written by Craig Edwards, Craig McLure, and others.
11 * This program is free but copyrighted software; see
12 * the file COPYING for details.
14 * ---------------------------------------------------
19 #include "inspircd_config.h"
21 #include "inspircd_io.h"
24 #include <sys/errno.h>
28 #include <ext/hash_map>
45 #include "inspstring.h"
46 #include "helperfuncs.h"
49 #include "cull_list.h"
51 extern ServerConfig *Config;
54 extern std::vector<Module*> modules;
55 extern std::vector<ircd_module*> factory;
56 extern ServerConfig* Config;
57 extern user_hash clientlist;
58 extern std::vector<userrec*> local_users;
60 /* Version two, now with optimized expiry!
62 * Because the old way was horrendously slow, the new way of expiring xlines is very
63 * very efficient. I have improved the efficiency of the algorithm in two ways:
65 * (1) There are now two lists of items for each linetype. One list holds temporary
66 * items, and the other list holds permenant items (ones which will expire).
67 * Items which are on the permenant list are NEVER checked at all by the
68 * expire_lines() function.
69 * (2) The temporary xline lists are always kept in strict numerical order, keyed by
70 * current time + duration. This means that the line which is due to expire the
71 * soonest is always pointed at by vector::begin(), so a simple while loop can
72 * very efficiently, very quickly and above all SAFELY pick off the first few
73 * items in the vector which need zapping.
82 /* Lists for temporary lines with an expiry time */
84 std::vector<KLine> klines;
85 std::vector<GLine> glines;
86 std::vector<ZLine> zlines;
87 std::vector<QLine> qlines;
88 std::vector<ELine> elines;
90 /* Seperate lists for perm XLines that isnt checked by expiry functions */
92 std::vector<KLine> pklines;
93 std::vector<GLine> pglines;
94 std::vector<ZLine> pzlines;
95 std::vector<QLine> pqlines;
96 std::vector<ELine> pelines;
99 bool GSortComparison ( const GLine one, const GLine two );
100 bool ZSortComparison ( const ZLine one, const ZLine two );
101 bool ESortComparison ( const ELine one, const ELine two );
102 bool QSortComparison ( const QLine one, const QLine two );
103 bool KSortComparison ( const KLine one, const KLine two );
105 // Reads the default bans from the config file.
106 // only a very small number of bans are defined
107 // this way these days, such as qlines against
108 // services nicks, etc.
110 bool InitXLine(const char* tag)
115 bool DoneXLine(const char* tag)
117 apply_lines(APPLY_ALL);
121 bool DoZLine(const char* tag, char** entries, void** values, int* types)
123 char* reason = (char*)values[0];
124 char* ipmask = (char*)values[1];
126 add_zline(0,"<Config>",reason,ipmask);
127 log(DEBUG,"Read Z line (badip tag): ipmask=%s reason=%s",ipmask,reason);
131 bool DoQLine(const char* tag, char** entries, void** values, int* types)
133 char* reason = (char*)values[0];
134 char* nick = (char*)values[1];
136 add_qline(0,"<Config>",reason,nick);
137 log(DEBUG,"Read Q line (badnick tag): nick=%s reason=%s",nick,reason);
141 bool DoKLine(const char* tag, char** entries, void** values, int* types)
143 char* reason = (char*)values[0];
144 char* host = (char*)values[1];
146 add_kline(0,"<Config>",reason,host);
147 log(DEBUG,"Read K line (badhost tag): host=%s reason=%s",host,reason);
151 bool DoELine(const char* tag, char** entries, void** values, int* types)
153 char* reason = (char*)values[0];
154 char* host = (char*)values[1];
156 add_eline(0,"<Config>",reason,host);
157 log(DEBUG,"Read E line (exception tag): host=%s reason=%s",host,reason);
163 bool add_gline(long duration, const char* source,const char* reason,const char* hostmask)
165 bool ret = del_gline(hostmask);
168 item.duration = duration;
169 strlcpy(item.hostmask,hostmask,199);
170 strlcpy(item.reason,reason,MAXBUF);
171 strlcpy(item.source,source,255);
173 item.set_time = TIME;
177 glines.push_back(item);
178 sort(glines.begin(), glines.end(),GSortComparison);
182 pglines.push_back(item);
188 // adds an e:line (exception to bans)
190 bool add_eline(long duration, const char* source, const char* reason, const char* hostmask)
192 bool ret = del_eline(hostmask);
194 item.duration = duration;
195 strlcpy(item.hostmask,hostmask,199);
196 strlcpy(item.reason,reason,MAXBUF);
197 strlcpy(item.source,source,255);
199 item.set_time = TIME;
202 elines.push_back(item);
203 sort(elines.begin(), elines.end(),ESortComparison);
207 pelines.push_back(item);
214 bool add_qline(long duration, const char* source, const char* reason, const char* nickname)
216 bool ret = del_qline(nickname);
218 item.duration = duration;
219 strlcpy(item.nick,nickname,63);
220 strlcpy(item.reason,reason,MAXBUF);
221 strlcpy(item.source,source,255);
223 item.is_global = false;
224 item.set_time = TIME;
227 qlines.push_back(item);
228 sort(qlines.begin(), qlines.end(),QSortComparison);
232 pqlines.push_back(item);
239 bool add_zline(long duration, const char* source, const char* reason, const char* ipaddr)
241 bool ret = del_zline(ipaddr);
243 item.duration = duration;
244 if (strchr(ipaddr,'@'))
246 while (*ipaddr != '@')
250 strlcpy(item.ipaddr,ipaddr,39);
251 strlcpy(item.reason,reason,MAXBUF);
252 strlcpy(item.source,source,255);
254 item.is_global = false;
255 item.set_time = TIME;
258 zlines.push_back(item);
259 sort(zlines.begin(), zlines.end(),ZSortComparison);
263 pzlines.push_back(item);
270 bool add_kline(long duration, const char* source, const char* reason, const char* hostmask)
272 bool ret = del_kline(hostmask);
274 item.duration = duration;
275 strlcpy(item.hostmask,hostmask,200);
276 strlcpy(item.reason,reason,MAXBUF);
277 strlcpy(item.source,source,255);
279 item.set_time = TIME;
282 klines.push_back(item);
283 sort(klines.begin(), klines.end(),KSortComparison);
287 pklines.push_back(item);
292 // deletes a g:line, returns true if the line existed and was removed
294 bool del_gline(const char* hostmask)
296 for (std::vector<GLine>::iterator i = glines.begin(); i != glines.end(); i++)
298 if (!strcasecmp(hostmask,i->hostmask))
304 for (std::vector<GLine>::iterator i = pglines.begin(); i != pglines.end(); i++)
306 if (!strcasecmp(hostmask,i->hostmask))
315 // deletes a e:line, returns true if the line existed and was removed
317 bool del_eline(const char* hostmask)
319 for (std::vector<ELine>::iterator i = elines.begin(); i != elines.end(); i++)
321 if (!strcasecmp(hostmask,i->hostmask))
327 for (std::vector<ELine>::iterator i = pelines.begin(); i != pelines.end(); i++)
329 if (!strcasecmp(hostmask,i->hostmask))
338 // deletes a q:line, returns true if the line existed and was removed
340 bool del_qline(const char* nickname)
342 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
344 if (!strcasecmp(nickname,i->nick))
350 for (std::vector<QLine>::iterator i = pqlines.begin(); i != pqlines.end(); i++)
352 if (!strcasecmp(nickname,i->nick))
361 bool qline_make_global(const char* nickname)
363 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
365 if (!strcasecmp(nickname,i->nick))
374 bool zline_make_global(const char* ipaddr)
376 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
378 if (!strcasecmp(ipaddr,i->ipaddr))
387 // deletes a z:line, returns true if the line existed and was removed
389 bool del_zline(const char* ipaddr)
391 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
393 if (!strcasecmp(ipaddr,i->ipaddr))
399 for (std::vector<ZLine>::iterator i = pzlines.begin(); i != pzlines.end(); i++)
401 if (!strcasecmp(ipaddr,i->ipaddr))
410 // deletes a k:line, returns true if the line existed and was removed
412 bool del_kline(const char* hostmask)
414 for (std::vector<KLine>::iterator i = klines.begin(); i != klines.end(); i++)
416 if (!strcasecmp(hostmask,i->hostmask))
422 for (std::vector<KLine>::iterator i = pklines.begin(); i != pklines.end(); i++)
424 if (!strcasecmp(hostmask,i->hostmask))
433 // returns a pointer to the reason if a nickname matches a qline, NULL if it didnt match
435 char* matches_qline(const char* nick)
437 if ((qlines.empty()) && (pqlines.empty()))
439 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
440 if (match(nick,i->nick))
442 for (std::vector<QLine>::iterator i = pqlines.begin(); i != pqlines.end(); i++)
443 if (match(nick,i->nick))
448 // returns a pointer to the reason if a host matches a gline, NULL if it didnt match
450 char* matches_gline(const char* host)
452 if ((glines.empty()) && (pglines.empty()))
454 for (std::vector<GLine>::iterator i = glines.begin(); i != glines.end(); i++)
455 if (match(host,i->hostmask))
457 for (std::vector<GLine>::iterator i = pglines.begin(); i != pglines.end(); i++)
458 if (match(host,i->hostmask))
463 char* matches_exception(const char* host)
465 if ((elines.empty()) && (pelines.empty()))
468 snprintf(host2,MAXBUF,"*@%s",host);
469 for (std::vector<ELine>::iterator i = elines.begin(); i != elines.end(); i++)
470 if ((match(host,i->hostmask)) || (match(host2,i->hostmask)))
472 for (std::vector<ELine>::iterator i = pelines.begin(); i != pelines.end(); i++)
473 if ((match(host,i->hostmask)) || (match(host2,i->hostmask)))
479 void gline_set_creation_time(char* host, time_t create_time)
481 for (std::vector<GLine>::iterator i = glines.begin(); i != glines.end(); i++)
483 if (!strcasecmp(host,i->hostmask))
485 i->set_time = create_time;
489 for (std::vector<GLine>::iterator i = pglines.begin(); i != pglines.end(); i++)
491 if (!strcasecmp(host,i->hostmask))
493 i->set_time = create_time;
500 void eline_set_creation_time(char* host, time_t create_time)
502 for (std::vector<ELine>::iterator i = elines.begin(); i != elines.end(); i++)
504 if (!strcasecmp(host,i->hostmask))
506 i->set_time = create_time;
510 for (std::vector<ELine>::iterator i = pelines.begin(); i != pelines.end(); i++)
512 if (!strcasecmp(host,i->hostmask))
514 i->set_time = create_time;
521 void qline_set_creation_time(char* nick, time_t create_time)
523 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
525 if (!strcasecmp(nick,i->nick))
527 i->set_time = create_time;
531 for (std::vector<QLine>::iterator i = pqlines.begin(); i != pqlines.end(); i++)
533 if (!strcasecmp(nick,i->nick))
535 i->set_time = create_time;
542 void zline_set_creation_time(char* ip, time_t create_time)
544 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
546 if (!strcasecmp(ip,i->ipaddr))
548 i->set_time = create_time;
552 for (std::vector<ZLine>::iterator i = pzlines.begin(); i != pzlines.end(); i++)
554 if (!strcasecmp(ip,i->ipaddr))
556 i->set_time = create_time;
563 // returns a pointer to the reason if an ip address matches a zline, NULL if it didnt match
565 char* matches_zline(const char* ipaddr)
567 if ((zlines.empty()) && (pzlines.empty()))
569 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
570 if (match(ipaddr,i->ipaddr))
572 for (std::vector<ZLine>::iterator i = pzlines.begin(); i != pzlines.end(); i++)
573 if (match(ipaddr,i->ipaddr))
578 // returns a pointer to the reason if a host matches a kline, NULL if it didnt match
580 char* matches_kline(const char* host)
582 if ((klines.empty()) && (pklines.empty()))
584 for (std::vector<KLine>::iterator i = klines.begin(); i != klines.end(); i++)
585 if (match(host,i->hostmask))
587 for (std::vector<KLine>::iterator i = pklines.begin(); i != pklines.end(); i++)
588 if (match(host,i->hostmask))
593 bool GSortComparison ( const GLine one, const GLine two )
595 return (one.duration + one.set_time) < (two.duration + two.set_time);
598 bool ESortComparison ( const ELine one, const ELine two )
600 return (one.duration + one.set_time) < (two.duration + two.set_time);
603 bool ZSortComparison ( const ZLine one, const ZLine two )
605 return (one.duration + one.set_time) < (two.duration + two.set_time);
608 bool KSortComparison ( const KLine one, const KLine two )
610 return (one.duration + one.set_time) < (two.duration + two.set_time);
613 bool QSortComparison ( const QLine one, const QLine two )
615 return (one.duration + one.set_time) < (two.duration + two.set_time);
618 // removes lines that have expired
622 time_t current = TIME;
624 /* Because we now store all our XLines in sorted order using (i->duration + i->set_time) as a key, this
625 * means that to expire the XLines we just need to do a while, picking off the top few until there are
626 * none left at the head of the queue that are after the current time.
629 while ((glines.size()) && (current > (glines.begin()->duration + glines.begin()->set_time)))
631 std::vector<GLine>::iterator i = glines.begin();
632 WriteOpers("*** Expiring timed G-Line %s (set by %s %d seconds ago)",i->hostmask,i->source,i->duration);
636 while ((elines.size()) && (current > (elines.begin()->duration + elines.begin()->set_time)))
638 std::vector<ELine>::iterator i = elines.begin();
639 WriteOpers("*** Expiring timed E-Line %s (set by %s %d seconds ago)",i->hostmask,i->source,i->duration);
643 while ((zlines.size()) && (current > (zlines.begin()->duration + zlines.begin()->set_time)))
645 std::vector<ZLine>::iterator i = zlines.begin();
646 WriteOpers("*** Expiring timed Z-Line %s (set by %s %d seconds ago)",i->ipaddr,i->source,i->duration);
650 while ((klines.size()) && (current > (klines.begin()->duration + klines.begin()->set_time)))
652 std::vector<KLine>::iterator i = klines.begin();
653 WriteOpers("*** Expiring timed K-Line %s (set by %s %d seconds ago)",i->hostmask,i->source,i->duration);
657 while ((qlines.size()) && (current > (qlines.begin()->duration + qlines.begin()->set_time)))
659 std::vector<QLine>::iterator i = qlines.begin();
660 WriteOpers("*** Expiring timed Q-Line %s (set by %s %d seconds ago)",i->nick,i->source,i->duration);
666 // applies lines, removing clients and changing nicks etc as applicable
668 void apply_lines(const int What)
673 if ((!glines.size()) && (!klines.size()) && (!zlines.size()) && (!qlines.size()) &&
674 (!pglines.size()) && (!pklines.size()) && (!pzlines.size()) && (!pqlines.size()))
677 CullList* Goners = new CullList();
679 for (std::vector<userrec*>::const_iterator u2 = local_users.begin(); u2 != local_users.end(); u2++)
681 userrec* u = (userrec*)(*u2);
683 if (elines.size() || pelines.size())
685 // ignore people matching exempts
686 if (matches_exception(host))
689 if ((What & APPLY_GLINES) && (glines.size() || pglines.size()))
691 if ((check = matches_gline(host)))
693 snprintf(reason,MAXBUF,"G-Lined: %s",check);
694 Goners->AddItem(u,reason);
697 if ((What & APPLY_KLINES) && (klines.size() || pklines.size()))
699 if ((check = matches_kline(host)))
701 snprintf(reason,MAXBUF,"K-Lined: %s",check);
702 Goners->AddItem(u,reason);
705 if ((What & APPLY_QLINES) && (qlines.size() || pqlines.size()))
707 if ((check = matches_qline(u->nick)))
709 snprintf(reason,MAXBUF,"Q-Lined: %s",check);
710 Goners->AddItem(u,reason);
713 if ((What & APPLY_ZLINES) && (zlines.size() || pzlines.size()))
715 if ((check = matches_zline((char*)inet_ntoa(u->ip4))))
717 snprintf(reason,MAXBUF,"Z-Lined: %s",check);
718 Goners->AddItem(u,reason);
727 void stats_k(userrec* user)
729 for (std::vector<KLine>::iterator i = klines.begin(); i != klines.end(); i++)
730 WriteServ(user->fd,"216 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);
731 for (std::vector<KLine>::iterator i = pklines.begin(); i != pklines.end(); i++)
732 WriteServ(user->fd,"216 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);
735 void stats_g(userrec* user)
737 for (std::vector<GLine>::iterator i = glines.begin(); i != glines.end(); i++)
738 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);
739 for (std::vector<GLine>::iterator i = pglines.begin(); i != pglines.end(); i++)
740 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);
743 void stats_q(userrec* user)
745 for (std::vector<QLine>::iterator i = qlines.begin(); i != qlines.end(); i++)
746 WriteServ(user->fd,"217 %s :%s %d %d %s :%s",user->nick,i->nick,i->set_time,i->duration,i->source,i->reason);
747 for (std::vector<QLine>::iterator i = pqlines.begin(); i != pqlines.end(); i++)
748 WriteServ(user->fd,"217 %s :%s %d %d %s :%s",user->nick,i->nick,i->set_time,i->duration,i->source,i->reason);
751 void stats_z(userrec* user)
753 for (std::vector<ZLine>::iterator i = zlines.begin(); i != zlines.end(); i++)
754 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->ipaddr,i->set_time,i->duration,i->source,i->reason);
755 for (std::vector<ZLine>::iterator i = pzlines.begin(); i != pzlines.end(); i++)
756 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->ipaddr,i->set_time,i->duration,i->source,i->reason);
759 void stats_e(userrec* user)
761 for (std::vector<ELine>::iterator i = elines.begin(); i != elines.end(); i++)
762 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);
763 for (std::vector<ELine>::iterator i = pelines.begin(); i != pelines.end(); i++)
764 WriteServ(user->fd,"223 %s :%s %d %d %s :%s",user->nick,i->hostmask,i->set_time,i->duration,i->source,i->reason);