[irc/rqf/shadowircd.git] / modules / core / m_squit.c

/*
 *  ircd-ratbox: A slightly useful ircd.
 *  m_squit.c: Makes a server quit.
 *
 *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
 *  Copyright (C) 1996-2002 Hybrid Development Team
 *  Copyright (C) 2002-2005 ircd-ratbox development team
 *
 *  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: m_squit.c 3161 2007-01-25 07:23:01Z nenolod $
 */

#include "stdinc.h"
#include "client.h"
#include "common.h"		/* FALSE bleah */
#include "match.h"
#include "ircd.h"
#include "numeric.h"
#include "s_conf.h"
#include "logger.h"
#include "s_serv.h"
#include "send.h"
#include "msg.h"
#include "parse.h"
#include "modules.h"
#include "hash.h"
#include "s_newconf.h"

static int ms_squit(struct Client *, struct Client *, int, const char **);
static int mo_squit(struct Client *, struct Client *, int, const char **);

struct Message squit_msgtab = {
	"SQUIT", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, mg_not_oper, {ms_squit, 0}, {ms_squit, 0}, mg_ignore, {mo_squit, 2}}
};

mapi_clist_av1 squit_clist[] = { &squit_msgtab, NULL };

DECLARE_MODULE_AV1(squit, NULL, NULL, squit_clist, NULL, NULL, "$Revision: 3161 $");

struct squit_parms
{
	const char *server_name;
	struct Client *target_p;
};

static struct squit_parms *find_squit(struct Client *client_p,
				      struct Client *source_p, const char *server);


/*
 * mo_squit - SQUIT message handler
 *      parv[1] = server name
 *      parv[2] = comment
 */
static int
mo_squit(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct squit_parms *found_squit;
	const char *comment = (parc > 2 && parv[2]) ? parv[2] : client_p->name;

	if((found_squit = find_squit(client_p, source_p, parv[1])))
	{
		if(MyConnect(found_squit->target_p))
		{
			sendto_realops_snomask(SNO_GENERAL, L_ALL,
					     "Received SQUIT %s from %s (%s)",
					     found_squit->target_p->name,
					     get_client_name(source_p, HIDE_IP), comment);
			ilog(L_SERVER, "Received SQUIT %s from %s (%s)",
			     found_squit->target_p->name, log_client_name(source_p, HIDE_IP),
			     comment);
		}
		else if(!IsOperRemote(source_p))
		{
			sendto_one(source_p, form_str(ERR_NOPRIVS),
				   me.name, source_p->name, "remote");
			return 0;
		}

		exit_client(client_p, found_squit->target_p, source_p, comment);
		return 0;
	}
	else
	{
		sendto_one_numeric(source_p, ERR_NOSUCHSERVER, form_str(ERR_NOSUCHSERVER), parv[1]);
	}

	return 0;
}

/*
 * ms_squit - SQUIT message handler
 *      parv[1] = server name
 *      parv[2] = comment
 */
static int
ms_squit(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct Client *target_p;
	const char *comment = (parc > 2 && parv[2]) ? parv[2] : client_p->name;

	if(parc < 2)
		target_p = client_p;
	else
	{
		if((target_p = find_server(NULL, parv[1])) == NULL)
			return 0;

		if(IsMe(target_p))
			target_p = client_p;
		if(!IsServer(target_p))
			return 0;
	}

	/* Server is closing its link */
	if (target_p == client_p)
	{
		sendto_realops_snomask(SNO_GENERAL, L_ALL, "Server %s closing link (%s)",
				target_p->name, comment);
	}
	/*
	 **  Notify all opers, if my local link is remotely squitted
	 */
	else if(MyConnect(target_p))
	{
		sendto_wallops_flags(UMODE_WALLOP, &me,
				     "Remote SQUIT %s from %s (%s)",
				     target_p->name, source_p->name, comment);

		sendto_server(NULL, NULL, CAP_TS6, NOCAPS,
			      ":%s WALLOPS :Remote SQUIT %s from %s (%s)",
			      me.id, target_p->name, source_p->name, comment);

		ilog(L_SERVER, "SQUIT From %s : %s (%s)", source_p->name, target_p->name, comment);
	}
	exit_client(client_p, target_p, source_p, comment);
	return 0;
}


/*
 * find_squit
 * inputs	- local server connection
 *		-
 *		-
 * output	- pointer to struct containing found squit or none if not found
 * side effects	-
 */
static struct squit_parms *
find_squit(struct Client *client_p, struct Client *source_p, const char *server)
{
	static struct squit_parms found_squit;
	struct Client *target_p = NULL;
	struct Client *p;
	rb_dlink_node *ptr;

	/* must ALWAYS be reset */
	found_squit.target_p = NULL;
	found_squit.server_name = NULL;


	/*
	 ** The following allows wild cards in SQUIT. Only useful
	 ** when the command is issued by an oper.
	 */

	RB_DLINK_FOREACH(ptr, global_serv_list.head)
	{
		p = ptr->data;
		if(IsServer(p) || IsMe(p))
		{
			if(match(server, p->name))
			{
				target_p = p;
				break;
			}
		}
	}

	if(target_p == NULL)
		return NULL;

	found_squit.target_p = target_p;
	found_squit.server_name = server;

	if(IsMe(target_p))
	{
		if(IsClient(client_p))
		{
			if(MyClient(client_p))
				sendto_one_notice(source_p, ":You are trying to squit me.");

			return NULL;
		}
		else
		{
			found_squit.target_p = client_p;
			found_squit.server_name = client_p->name;
		}
	}

	if(found_squit.target_p != NULL)
		return &found_squit;
	else
		return (NULL);
}
Commit	Line	Data
212380e3	1	/*
	2	* ircd-ratbox: A slightly useful ircd.
	3	* m_squit.c: Makes a server quit.
	4	*
	5	* Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
	6	* Copyright (C) 1996-2002 Hybrid Development Team
	7	* Copyright (C) 2002-2005 ircd-ratbox development team
	8	*
	9	* This program is free software; you can redistribute it and/or modify
	10	* it under the terms of the GNU General Public License as published by
	11	* the Free Software Foundation; either version 2 of the License, or
	12	* (at your option) any later version.
	13	*
	14	* This program is distributed in the hope that it will be useful,
	15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	* GNU General Public License for more details.
	18	*
	19	* You should have received a copy of the GNU General Public License
	20	* along with this program; if not, write to the Free Software
	21	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
	22	* USA
	23	*
5366977b	24	* $Id: m_squit.c 3161 2007-01-25 07:23:01Z nenolod $
212380e3	25	*/
	26
	27	#include "stdinc.h"
	28	#include "client.h"
	29	#include "common.h" /* FALSE bleah */
13ae2f4b	30	#include "match.h"
212380e3	31	#include "ircd.h"
	32	#include "numeric.h"
	33	#include "s_conf.h"
d3455e2c	34	#include "logger.h"
212380e3	35	#include "s_serv.h"
	36	#include "send.h"
	37	#include "msg.h"
	38	#include "parse.h"
	39	#include "modules.h"
	40	#include "hash.h"
	41	#include "s_newconf.h"
	42
	43	static int ms_squit(struct Client , struct Client , int, const char **);
	44	static int mo_squit(struct Client , struct Client , int, const char **);
	45
	46	struct Message squit_msgtab = {
	47	"SQUIT", 0, 0, 0, MFLG_SLOW,
	48	{mg_unreg, mg_not_oper, {ms_squit, 0}, {ms_squit, 0}, mg_ignore, {mo_squit, 2}}
	49	};
	50
	51	mapi_clist_av1 squit_clist[] = { &squit_msgtab, NULL };
	52
5366977b	53	DECLARE_MODULE_AV1(squit, NULL, NULL, squit_clist, NULL, NULL, "$Revision: 3161 $");
212380e3	54
	55	struct squit_parms
	56	{
	57	const char *server_name;
	58	struct Client *target_p;
	59	};
	60
	61	static struct squit_parms find_squit(struct Client client_p,
	62	struct Client source_p, const char server);
	63
	64
	65	/*
	66	* mo_squit - SQUIT message handler
212380e3	67	* parv[1] = server name
	68	* parv[2] = comment
	69	*/
	70	static int
	71	mo_squit(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	72	{
	73	struct squit_parms *found_squit;
	74	const char *comment = (parc > 2 && parv[2]) ? parv[2] : client_p->name;
	75
	76	if((found_squit = find_squit(client_p, source_p, parv[1])))
	77	{
	78	if(MyConnect(found_squit->target_p))
	79	{
	80	sendto_realops_snomask(SNO_GENERAL, L_ALL,
	81	"Received SQUIT %s from %s (%s)",
	82	found_squit->target_p->name,
	83	get_client_name(source_p, HIDE_IP), comment);
	84	ilog(L_SERVER, "Received SQUIT %s from %s (%s)",
	85	found_squit->target_p->name, log_client_name(source_p, HIDE_IP),
	86	comment);
	87	}
	88	else if(!IsOperRemote(source_p))
	89	{
	90	sendto_one(source_p, form_str(ERR_NOPRIVS),
	91	me.name, source_p->name, "remote");
	92	return 0;
	93	}
	94
	95	exit_client(client_p, found_squit->target_p, source_p, comment);
	96	return 0;
	97	}
	98	else
	99	{
	100	sendto_one_numeric(source_p, ERR_NOSUCHSERVER, form_str(ERR_NOSUCHSERVER), parv[1]);
	101	}
	102
	103	return 0;
	104	}
	105
	106	/*
	107	* ms_squit - SQUIT message handler
212380e3	108	* parv[1] = server name
	109	* parv[2] = comment
	110	*/
	111	static int
	112	ms_squit(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	113	{
	114	struct Client *target_p;
	115	const char *comment = (parc > 2 && parv[2]) ? parv[2] : client_p->name;
	116
	117	if(parc < 2)
	118	target_p = client_p;
	119	else
	120	{
	121	if((target_p = find_server(NULL, parv[1])) == NULL)
	122	return 0;
	123
	124	if(IsMe(target_p))
	125	target_p = client_p;
	126	if(!IsServer(target_p))
	127	return 0;
	128	}
	129
	130	/* Server is closing its link */
	131	if (target_p == client_p)
	132	{
	133	sendto_realops_snomask(SNO_GENERAL, L_ALL, "Server %s closing link (%s)",
	134	target_p->name, comment);
	135	}
	136	/*
	137	** Notify all opers, if my local link is remotely squitted
	138	*/
	139	else if(MyConnect(target_p))
	140	{
	141	sendto_wallops_flags(UMODE_WALLOP, &me,
	142	"Remote SQUIT %s from %s (%s)",
	143	target_p->name, source_p->name, comment);
	144
	145	sendto_server(NULL, NULL, CAP_TS6, NOCAPS,
	146	":%s WALLOPS :Remote SQUIT %s from %s (%s)",
	147	me.id, target_p->name, source_p->name, comment);
	148
8e425f41	149	ilog(L_SERVER, "SQUIT From %s : %s (%s)", source_p->name, target_p->name, comment);
212380e3	150	}
	151	exit_client(client_p, target_p, source_p, comment);
	152	return 0;
	153	}
	154
	155
	156	/*
	157	* find_squit
	158	* inputs - local server connection
	159	* -
	160	* -
	161	* output - pointer to struct containing found squit or none if not found
	162	* side effects -
	163	*/
	164	static struct squit_parms *
	165	find_squit(struct Client client_p, struct Client source_p, const char *server)
	166	{
	167	static struct squit_parms found_squit;
	168	struct Client *target_p = NULL;
	169	struct Client *p;
08d11e34	170	rb_dlink_node *ptr;
212380e3	171
	172	/* must ALWAYS be reset */
	173	found_squit.target_p = NULL;
	174	found_squit.server_name = NULL;
	175
	176
	177	/*
	178	** The following allows wild cards in SQUIT. Only useful
	179	** when the command is issued by an oper.
	180	*/
	181
08d11e34	182	RB_DLINK_FOREACH(ptr, global_serv_list.head)
212380e3	183	{
	184	p = ptr->data;
	185	if(IsServer(p) \|\| IsMe(p))
	186	{
	187	if(match(server, p->name))
	188	{
	189	target_p = p;
	190	break;
	191	}
	192	}
	193	}
	194
	195	if(target_p == NULL)
	196	return NULL;
	197
	198	found_squit.target_p = target_p;
	199	found_squit.server_name = server;
	200
	201	if(IsMe(target_p))
	202	{
	203	if(IsClient(client_p))
	204	{
	205	if(MyClient(client_p))
5366977b	206	sendto_one_notice(source_p, ":You are trying to squit me.");
5366977b	207
212380e3	208	return NULL;
	209	}
	210	else
	211	{
	212	found_squit.target_p = client_p;
	213	found_squit.server_name = client_p->name;
	214	}
	215	}
	216
	217	if(found_squit.target_p != NULL)
	218	return &found_squit;
	219	else
	220	return (NULL);
	221	}