[solanum.git] / extensions / m_sendbans.c

/*
 * m_sendbans.c: sends all permanent resvs and xlines to given server
 *
 * Copyright (C) 2008 Jilles Tjoelker
 * Copyright (C) 2008 charybdis development team
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met:
 *
 * 1.Redistributions of source code must retain the above copyright notice,
 *   this list of conditions and the following disclaimer.
 * 2.Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * 3.The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "stdinc.h"
#include "client.h"
#include "ircd.h"
#include "match.h"
#include "numeric.h"
#include "s_conf.h"
#include "s_serv.h"
#include "s_newconf.h"
#include "send.h"
#include "msg.h"
#include "hash.h"
#include "modules.h"
#include "messages.h"
#include "rb_radixtree.h"

static const char sendbands_desc[] =
	"Adds the ability to send all permanent RESVs and XLINEs to given server";

static void mo_sendbans(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);

struct Message sendbans_msgtab = {
	"SENDBANS", 0, 0, 0, 0,
	{mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_sendbans, 2}}
};

mapi_clist_av1 sendbans_clist[] = {
	&sendbans_msgtab,
	NULL
};

DECLARE_MODULE_AV2(sendbans, NULL, NULL, sendbans_clist, NULL, NULL, NULL, NULL, sendbands_desc);

static const char *expand_xline(const char *mask)
{
	static char buf[512];
	const char *p;
	char *q;

	if (!strchr(mask, ' '))
		return mask;
	if (strlen(mask) > 250)
		return NULL;
	p = mask;
	q = buf;
	while (*p != '\0')
	{
		if (*p == ' ')
			*q++ = '\\', *q++ = 's';
		else
			*q++ = *p;
		p++;
	}
	*q = '\0';
	return buf;
}

static void
mo_sendbans(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct ConfItem *aconf;
	rb_dlink_node *ptr;
	int count;
	const char *target, *mask2;
	struct Client *server_p;
	struct rb_radixtree_iteration_state state;

	if (!IsOperRemoteBan(source_p))
	{
		sendto_one(source_p, form_str(ERR_NOPRIVS),
			me.name, source_p->name, "remoteban");
		return;
	}
	if (!IsOperXline(source_p))
	{
		sendto_one(source_p, form_str(ERR_NOPRIVS),
			me.name, source_p->name, "xline");
		return;
	}
	if (!IsOperResv(source_p))
	{
		sendto_one(source_p, form_str(ERR_NOPRIVS),
			me.name, source_p->name, "resv");
		return;
	}

	target = parv[1];
	count = 0;
	RB_DLINK_FOREACH(ptr, global_serv_list.head)
	{
		server_p = ptr->data;
		if (IsMe(server_p))
			continue;
		if (match(target, server_p->name))
			count++;
	}
	if (count == 0)
	{
		sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
				form_str(ERR_NOSUCHSERVER), target);
		return;
	}

	sendto_realops_snomask(SNO_GENERAL, L_NETWIDE,
			"%s!%s@%s is sending resvs and xlines to %s",
			source_p->name, source_p->username, source_p->host,
			target);

	RB_DLINK_FOREACH(ptr, resv_conf_list.head)
	{
		aconf = ptr->data;
		if (aconf->hold)
			continue;
		sendto_match_servs(source_p, target,
				CAP_ENCAP, NOCAPS,
				"ENCAP %s RESV 0 %s 0 :%s",
				target, aconf->host, aconf->passwd);
	}

	RB_RADIXTREE_FOREACH(aconf, &state, resv_tree)
	{
		if (aconf->hold)
			continue;
		sendto_match_servs(source_p, target,
				CAP_ENCAP, NOCAPS,
				"ENCAP %s RESV 0 %s 0 :%s",
				target, aconf->host, aconf->passwd);
	}

	RB_DLINK_FOREACH(ptr, xline_conf_list.head)
	{
		aconf = ptr->data;
		if (aconf->hold)
			continue;
		mask2 = expand_xline(aconf->host);
		if (mask2 == NULL)
		{
			sendto_one_notice(source_p, ":Skipping xline [%s]",
					aconf->host);
			continue;
		}
		sendto_match_servs(source_p, target,
				CAP_ENCAP, NOCAPS,
				"ENCAP %s XLINE 0 %s 2 :%s",
				target, mask2, aconf->passwd);
	}
}
Commit	Line	Data
b0ccacd2 JT	1	/*
	2	* m_sendbans.c: sends all permanent resvs and xlines to given server
	3	*
	4	* Copyright (C) 2008 Jilles Tjoelker
	5	* Copyright (C) 2008 charybdis development team
	6	*
	7	* Redistribution and use in source and binary forms, with or without
	8	* modification, are permitted provided that the following conditions are
	9	* met:
	10	*
	11	* 1.Redistributions of source code must retain the above copyright notice,
	12	* this list of conditions and the following disclaimer.
	13	* 2.Redistributions in binary form must reproduce the above copyright
	14	* notice, this list of conditions and the following disclaimer in the
	15	* documentation and/or other materials provided with the distribution.
	16	* 3.The name of the author may not be used to endorse or promote products
	17	* derived from this software without specific prior written permission.
	18	*
	19	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
	20	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
	21	* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
	22	* DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
	23	* INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
	24	* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
	25	* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	26	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
	27	* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
	28	* IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
	29	* POSSIBILITY OF SUCH DAMAGE.
	30	*/
	31
	32	#include "stdinc.h"
	33	#include "client.h"
b0ccacd2 JT	34	#include "ircd.h"
	35	#include "match.h"
	36	#include "numeric.h"
	37	#include "s_conf.h"
	38	#include "s_serv.h"
	39	#include "s_newconf.h"
	40	#include "send.h"
	41	#include "msg.h"
	42	#include "hash.h"
	43	#include "modules.h"
bd0d352f	44	#include "messages.h"
a4bf26dd	45	#include "rb_radixtree.h"
b0ccacd2	46
eeabf33a EM	47	static const char sendbands_desc[] =
	48	"Adds the ability to send all permanent RESVs and XLINEs to given server";
	49
3c7d6fcc	50	static void mo_sendbans(struct MsgBuf msgbuf_p, struct Client client_p, struct Client source_p, int parc, const char parv[]);
b0ccacd2 JT	51
b0ccacd2 JT	52	struct Message sendbans_msgtab = {
7baa37a9	53	"SENDBANS", 0, 0, 0, 0,
b0ccacd2 JT	54	{mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_sendbans, 2}}
	55	};
	56
	57	mapi_clist_av1 sendbans_clist[] = {
	58	&sendbans_msgtab,
	59	NULL
	60	};
	61
02369fa7	62	DECLARE_MODULE_AV2(sendbans, NULL, NULL, sendbans_clist, NULL, NULL, NULL, NULL, sendbands_desc);
b0ccacd2 JT	63
	64	static const char expand_xline(const char mask)
	65	{
	66	static char buf[512];
	67	const char *p;
	68	char *q;
	69
	70	if (!strchr(mask, ' '))
	71	return mask;
	72	if (strlen(mask) > 250)
	73	return NULL;
	74	p = mask;
	75	q = buf;
	76	while (*p != '\0')
	77	{
	78	if (*p == ' ')
	79	q++ = '\\', q++ = 's';
	80	else
	81	q++ = p;
	82	p++;
	83	}
	84	*q = '\0';
	85	return buf;
	86	}
	87
3c7d6fcc EM	88	static void
3c7d6fcc EM	89	mo_sendbans(struct MsgBuf msgbuf_p, struct Client client_p, struct Client source_p, int parc, const char parv[])
b0ccacd2 JT	90	{
	91	struct ConfItem *aconf;
	92	rb_dlink_node *ptr;
e23126c8	93	int count;
b0ccacd2 JT	94	const char target, mask2;
b0ccacd2 JT	95	struct Client *server_p;
a4bf26dd	96	struct rb_radixtree_iteration_state state;
b0ccacd2 JT	97
	98	if (!IsOperRemoteBan(source_p))
	99	{
	100	sendto_one(source_p, form_str(ERR_NOPRIVS),
	101	me.name, source_p->name, "remoteban");
3c7d6fcc	102	return;
b0ccacd2 JT	103	}
	104	if (!IsOperXline(source_p))
	105	{
	106	sendto_one(source_p, form_str(ERR_NOPRIVS),
	107	me.name, source_p->name, "xline");
3c7d6fcc	108	return;
b0ccacd2 JT	109	}
	110	if (!IsOperResv(source_p))
	111	{
	112	sendto_one(source_p, form_str(ERR_NOPRIVS),
	113	me.name, source_p->name, "resv");
3c7d6fcc	114	return;
b0ccacd2 JT	115	}
	116
	117	target = parv[1];
	118	count = 0;
	119	RB_DLINK_FOREACH(ptr, global_serv_list.head)
	120	{
	121	server_p = ptr->data;
	122	if (IsMe(server_p))
	123	continue;
	124	if (match(target, server_p->name))
	125	count++;
	126	}
	127	if (count == 0)
	128	{
	129	sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
	130	form_str(ERR_NOSUCHSERVER), target);
3c7d6fcc	131	return;
b0ccacd2 JT	132	}
	133
	134	sendto_realops_snomask(SNO_GENERAL, L_NETWIDE,
b92d34ad JT	135	"%s!%s@%s is sending resvs and xlines to %s",
	136	source_p->name, source_p->username, source_p->host,
	137	target);
b0ccacd2 JT	138
	139	RB_DLINK_FOREACH(ptr, resv_conf_list.head)
	140	{
	141	aconf = ptr->data;
	142	if (aconf->hold)
	143	continue;
	144	sendto_match_servs(source_p, target,
	145	CAP_ENCAP, NOCAPS,
	146	"ENCAP %s RESV 0 %s 0 :%s",
70ea02eb	147	target, aconf->host, aconf->passwd);
b0ccacd2 JT	148	}
b0ccacd2 JT	149
a4bf26dd	150	RB_RADIXTREE_FOREACH(aconf, &state, resv_tree)
b0ccacd2	151	{
b0ccacd2 JT	152	if (aconf->hold)
	153	continue;
	154	sendto_match_servs(source_p, target,
	155	CAP_ENCAP, NOCAPS,
	156	"ENCAP %s RESV 0 %s 0 :%s",
70ea02eb	157	target, aconf->host, aconf->passwd);
b0ccacd2	158	}
b0ccacd2 JT	159
	160	RB_DLINK_FOREACH(ptr, xline_conf_list.head)
	161	{
	162	aconf = ptr->data;
	163	if (aconf->hold)
	164	continue;
70ea02eb	165	mask2 = expand_xline(aconf->host);
b0ccacd2 JT	166	if (mask2 == NULL)
	167	{
	168	sendto_one_notice(source_p, ":Skipping xline [%s]",
70ea02eb	169	aconf->host);
b0ccacd2 JT	170	continue;
	171	}
	172	sendto_match_servs(source_p, target,
	173	CAP_ENCAP, NOCAPS,
	174	"ENCAP %s XLINE 0 %s 2 :%s",
	175	target, mask2, aconf->passwd);
	176	}
b0ccacd2	177	}