summaryrefslogtreecommitdiff
path: root/modules/m_xline.c
diff options
context:
space:
mode:
Diffstat (limited to 'modules/m_xline.c')
-rw-r--r--modules/m_xline.c467
1 files changed, 467 insertions, 0 deletions
diff --git a/modules/m_xline.c b/modules/m_xline.c
new file mode 100644
index 0000000..3a70299
--- /dev/null
+++ b/modules/m_xline.c
@@ -0,0 +1,467 @@
+/*
+ * ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
+ * m_xline.c: xlines an user.
+ *
+ * Copyright (C) 2002 by the past and present ircd coders, and others.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
+ * USA
+ *
+ * $Id$
+ */
+
+#include "stdinc.h"
+#include "list.h"
+#include "channel.h"
+#include "client.h"
+#include "irc_string.h"
+#include "sprintf_irc.h"
+#include "ircd.h"
+#include "hostmask.h"
+#include "numeric.h"
+#include "fdlist.h"
+#include "s_bsd.h"
+#include "conf.h"
+#include "log.h"
+#include "s_misc.h"
+#include "send.h"
+#include "hash.h"
+#include "s_serv.h"
+#include "parse.h"
+#include "modules.h"
+#include "resv.h"
+
+
+static int valid_xline(struct Client *, char *, char *, int);
+static void write_xline(struct Client *, char *, char *, time_t);
+static void remove_xline(struct Client *, char *);
+static int remove_txline_match(const char *);
+
+static void relay_xline(struct Client *, char *[]);
+
+/* mo_xline()
+ *
+ * inputs - pointer to server
+ * - pointer to client
+ * - parameter count
+ * - parameter list
+ * output -
+ * side effects - x line is added
+ *
+ */
+static void
+mo_xline(struct Client *client_p, struct Client *source_p,
+ int parc, char *parv[])
+{
+ char *reason = NULL;
+ char *gecos = NULL;
+ struct ConfItem *conf = NULL;
+ struct MatchItem *match_item = NULL;
+ char *target_server = NULL;
+ time_t tkline_time = 0;
+
+ if (!HasOFlag(source_p, OPER_FLAG_X))
+ {
+ sendto_one(source_p, form_str(ERR_NOPRIVS),
+ me.name, source_p->name, "xline");
+ return;
+ }
+
+ /*
+ * XLINE <gecos> <time> ON <mask> :<reason>
+ * XLINE <gecos> ON <mask> :<reason>
+ */
+ if (parse_aline("XLINE", source_p, parc, parv, AWILD, &gecos, NULL,
+ &tkline_time, &target_server, &reason) < 0)
+ return;
+
+ if (target_server != NULL)
+ {
+ /* if a given expire time is given, ENCAP it */
+ if (tkline_time != 0)
+ sendto_match_servs(source_p, target_server, CAP_ENCAP,
+ "ENCAP %s XLINE %d %s 0 :%s",
+ target_server, (int)tkline_time, gecos, reason);
+ else
+ sendto_match_servs(source_p, target_server, CAP_CLUSTER,
+ "XLINE %s %s %d :%s",
+ target_server, gecos, (int)tkline_time, reason);
+
+ /* Allow ON to apply local xline as well if it matches */
+ if (!match(target_server, me.name))
+ return;
+ }
+ else
+ {
+ if (tkline_time != 0)
+ cluster_a_line(source_p, "ENCAP", CAP_ENCAP, SHARED_XLINE,
+ "XLINE %d %s 0 :%s", (int)tkline_time, gecos, reason);
+ else
+ cluster_a_line(source_p, "XLINE", CAP_KLN, SHARED_XLINE,
+ "%s 0 :%s", gecos, reason);
+ }
+
+ if (!valid_xline(source_p, gecos, reason, 0))
+ return;
+
+ if ((conf = find_matching_name_conf(XLINE_TYPE, gecos,
+ NULL, NULL, 0)) != NULL)
+ {
+ match_item = map_to_conf(conf);
+
+ sendto_one(source_p, ":%s NOTICE %s :[%s] already X-Lined by [%s] - %s",
+ me.name, source_p->name, gecos,
+ conf->name, match_item->reason);
+ return;
+ }
+
+ write_xline(source_p, gecos, reason, tkline_time);
+}
+
+/* ms_xline()
+ *
+ * inputs - oper, target server, xline, {type}, reason
+ * deprecate {type} reserve for temp xlines later? XXX
+ *
+ * outputs - none
+ * side effects - propagates xline, applies it if we are a target
+ */
+static void
+ms_xline(struct Client *client_p, struct Client *source_p,
+ int parc, char *parv[])
+{
+ if (parc != 5 || EmptyString(parv[4]))
+ return;
+
+ if (!IsClient(source_p))
+ return;
+
+ if (!valid_xline(source_p, parv[2], parv[4], 0))
+ return;
+
+ relay_xline(source_p, parv);
+}
+
+/* me_xline()
+ *
+ * inputs - server
+ * - client (oper)
+ * - parc number of arguments
+ * - parv list of arguments
+ * via parv[]
+ * parv[1] = target
+ * parv[2] = server
+ * parv[3] = xline
+ * parv[4] = time
+ * parv[5] = reason
+ *
+ * outputs - none
+ * side effects -
+ */
+static void
+me_xline(struct Client *client_p, struct Client *source_p,
+ int parc, char *parv[])
+{
+ if (!IsClient(source_p) || parc != 5)
+ return;
+
+ relay_xline(source_p, parv);
+}
+
+static void
+relay_xline(struct Client *source_p, char *parv[])
+{
+ struct ConfItem *conf;
+ struct MatchItem *match_item;
+ int t_sec;
+
+ t_sec = atoi(parv[3]);
+ /* XXX kludge! */
+ if (t_sec < 3)
+ t_sec = 0;
+
+ sendto_match_servs(source_p, parv[1], CAP_CLUSTER,
+ "XLINE %s %s %s :%s",
+ parv[1], parv[2], parv[3], parv[4]);
+
+ if (!match(parv[1], me.name))
+ return;
+
+ if (HasFlag(source_p, FLAGS_SERVICE) || find_matching_name_conf(ULINE_TYPE, source_p->servptr->name,
+ source_p->username, source_p->host,
+ SHARED_XLINE))
+ {
+ if ((conf = find_matching_name_conf(XLINE_TYPE, parv[2],
+ NULL, NULL, 0)) != NULL)
+ {
+ match_item = map_to_conf(conf);
+ sendto_one(source_p, ":%s NOTICE %s :[%s] already X-Lined by [%s] - %s",
+ ID_or_name(&me, source_p->from),
+ ID_or_name(source_p, source_p->from),
+ parv[2], conf->name, match_item->reason);
+ return;
+ }
+
+ write_xline(source_p, parv[2], parv[4], t_sec);
+ }
+}
+
+/* mo_unxline()
+ *
+ * inputs - pointer to server
+ * - pointer to client
+ * - parameter count
+ * - parameter list
+ * output -
+ * side effects - removes a xline
+ */
+static void
+mo_unxline(struct Client *client_p, struct Client *source_p,
+ int parc, char *parv[])
+{
+ char *gecos = NULL;
+ char *target_server = NULL;
+
+ if (!HasOFlag(source_p, OPER_FLAG_X))
+ {
+ sendto_one(source_p, form_str(ERR_NOPRIVS),
+ me.name, source_p->name, "unxline");
+ return;
+ }
+
+ /* UNXLINE bill ON irc.server.com */
+ if (parse_aline("UNXLINE", source_p, parc, parv, 0, &gecos,
+ NULL, NULL, &target_server, NULL) < 0)
+ return;
+
+ if (target_server != NULL)
+ {
+ sendto_match_servs(source_p, target_server, CAP_CLUSTER,
+ "UNXLINE %s %s", target_server, gecos);
+
+ /* Allow ON to apply local unxline as well if it matches */
+ if (!match(target_server, me.name))
+ return;
+ }
+ else
+ cluster_a_line(source_p, "UNXLINE", CAP_CLUSTER, SHARED_UNXLINE,
+ "%s", gecos);
+
+ remove_xline(source_p, gecos);
+}
+
+/* ms_unxline()
+ *
+ * inputs - oper, target server, gecos
+ * outputs - none
+ * side effects - propagates unxline, applies it if we are a target
+ */
+static void
+ms_unxline(struct Client *client_p, struct Client *source_p,
+ int parc, char *parv[])
+{
+ if (parc != 3)
+ return;
+
+ if (!IsClient(source_p) || EmptyString(parv[2]))
+ return;
+
+ sendto_match_servs(source_p, parv[1], CAP_CLUSTER,
+ "UNXLINE %s %s", parv[1], parv[2]);
+
+ if (!match(parv[1], me.name))
+ return;
+
+ if (HasFlag(source_p, FLAGS_SERVICE) || find_matching_name_conf(ULINE_TYPE, source_p->servptr->name,
+ source_p->username, source_p->host,
+ SHARED_UNXLINE))
+ remove_xline(source_p, parv[2]);
+}
+
+/* valid_xline()
+ *
+ * inputs - client to complain to, gecos, reason, whether to complain
+ * outputs - 1 for valid, else 0
+ * side effects - complains to client, when warn != 0
+ */
+static int
+valid_xline(struct Client *source_p, char *gecos, char *reason, int warn)
+{
+ if (EmptyString(reason))
+ {
+ if (warn)
+ sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
+ me.name, source_p->name, "XLINE");
+ return 0;
+ }
+
+ if (strchr(gecos, '"'))
+ {
+ sendto_one(source_p, ":%s NOTICE %s :Invalid character '\"'",
+ me.name, source_p->name);
+ return 0;
+ }
+
+ if (!valid_wild_card_simple(gecos))
+ {
+ if (warn)
+ sendto_one(source_p, ":%s NOTICE %s :Please include at least %d non-wildcard characters with the xline",
+ me.name, source_p->name, ConfigFileEntry.min_nonwildcard_simple);
+
+ return 0;
+ }
+
+ return 1;
+}
+
+/* write_xline()
+ *
+ * inputs - client taking credit for xline, gecos, reason, xline type
+ * outputs - none
+ * side effects - when successful, adds an xline to the conf
+ */
+static void
+write_xline(struct Client *source_p, char *gecos, char *reason,
+ time_t tkline_time)
+{
+ struct ConfItem *conf;
+ struct MatchItem *match_item;
+ const char *current_date;
+ time_t cur_time;
+
+ conf = make_conf_item(XLINE_TYPE);
+ match_item = map_to_conf(conf);
+
+ collapse(gecos);
+ DupString(conf->name, gecos);
+ DupString(match_item->reason, reason);
+ DupString(match_item->oper_reason, ""); /* XXX */
+ cur_time = CurrentTime;
+ current_date = smalldate(cur_time);
+
+ if (tkline_time != 0)
+ {
+ sendto_realops_flags(UMODE_ALL, L_ALL,
+ "%s added temporary %d min. X-Line for [%s] [%s]",
+ get_oper_name(source_p), (int)tkline_time/60,
+ conf->name, match_item->reason);
+ sendto_one(source_p, ":%s NOTICE %s :Added temporary %d min. X-Line [%s]",
+ MyConnect(source_p) ? me.name : ID_or_name(&me, source_p->from),
+ source_p->name, (int)tkline_time/60, conf->name);
+ ilog(LOG_TYPE_KLINE, "%s added temporary %d min. X-Line for [%s] [%s]",
+ source_p->name, (int)tkline_time/60,
+ conf->name, match_item->reason);
+ match_item->hold = CurrentTime + tkline_time;
+ add_temp_line(conf);
+ }
+ else
+ write_conf_line(source_p, conf, current_date, cur_time);
+ rehashed_klines = 1;
+}
+
+static void
+remove_xline(struct Client *source_p, char *gecos)
+{
+ /* XXX use common temporary un function later */
+ if (remove_txline_match(gecos))
+ {
+ sendto_one(source_p,
+ ":%s NOTICE %s :Un-xlined [%s] from temporary X-Lines",
+ me.name, source_p->name, gecos);
+ sendto_realops_flags(UMODE_ALL, L_ALL,
+ "%s has removed the temporary X-Line for: [%s]",
+ get_oper_name(source_p), gecos);
+ ilog(LOG_TYPE_KLINE, "%s removed temporary X-Line for [%s]",
+ source_p->name, gecos);
+ return;
+ }
+
+ if (remove_conf_line(XLINE_TYPE, source_p, gecos, NULL) > 0)
+ {
+ sendto_one(source_p, ":%s NOTICE %s :X-Line for [%s] is removed",
+ me.name, source_p->name, gecos);
+ sendto_realops_flags(UMODE_ALL, L_ALL,
+ "%s has removed the X-Line for: [%s]",
+ get_oper_name(source_p), gecos);
+ ilog(LOG_TYPE_KLINE, "%s removed X-Line for [%s]",
+ get_oper_name(source_p), gecos);
+ }
+ else
+ sendto_one(source_p, ":%s NOTICE %s :No X-Line for %s",
+ me.name, source_p->name, gecos);
+}
+
+/* static int remove_tkline_match(const char *host, const char *user)
+ *
+ * Inputs: gecos
+ * Output: returns YES on success, NO if no tkline removed.
+ * Side effects: Any matching tklines are removed.
+ */
+static int
+remove_txline_match(const char *gecos)
+{
+ dlink_node *ptr = NULL, *next_ptr = NULL;
+ struct ConfItem *conf = NULL;
+
+ DLINK_FOREACH_SAFE(ptr, next_ptr, temporary_xlines.head)
+ {
+ conf = ptr->data;
+
+ if (irccmp(gecos, conf->name) == 0)
+ {
+ dlinkDelete(ptr, &temporary_xlines);
+ free_dlink_node(ptr);
+ delete_conf_item(conf);
+
+ return 1;
+ }
+ }
+
+ return 0;
+}
+
+static struct Message xline_msgtab = {
+ "XLINE", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
+ { m_unregistered, m_not_oper, ms_xline, me_xline, mo_xline, m_ignore }
+};
+
+static struct Message unxline_msgtab = {
+ "UNXLINE", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
+ { m_unregistered, m_not_oper, ms_unxline, m_ignore, mo_unxline, m_ignore }
+};
+
+static void
+module_init(void)
+{
+ mod_add_cmd(&xline_msgtab);
+ mod_add_cmd(&unxline_msgtab);
+}
+
+static void
+module_exit(void)
+{
+ mod_del_cmd(&xline_msgtab);
+ mod_del_cmd(&unxline_msgtab);
+}
+
+struct module module_entry = {
+ .node = { NULL, NULL, NULL },
+ .name = NULL,
+ .version = "$Revision$",
+ .handle = NULL,
+ .modinit = module_init,
+ .modexit = module_exit,
+ .flags = 0
+};
generated by cgit (git 2.34.1) at 2025-07-15 23:41:45 +0000