trunk/modules/m_xline.c

/*
 *  ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
 *
 *  Copyright (c) 2003-2015 ircd-hybrid 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
 *  USA
 */

/*! \file m_xline.c
 * \brief Includes required functions for processing the XLINE command.
 * \version $Id$
 */

#include "stdinc.h"
#include "list.h"
#include "client.h"
#include "irc_string.h"
#include "ircd.h"
#include "conf.h"
#include "numeric.h"
#include "log.h"
#include "misc.h"
#include "send.h"
#include "server.h"
#include "parse.h"
#include "modules.h"
#include "memory.h"


static void
xline_check(struct MaskItem *conf)
{
  dlink_node *node = NULL, *node_next = NULL;

  DLINK_FOREACH_SAFE(node, node_next, local_client_list.head)
  {
    struct Client *client_p = node->data;

    if (IsDead(client_p))
      continue;

    if (!match(conf->name, client_p->info))
      conf_try_ban(client_p, conf);
  }
}

/* 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, const char *gecos)
{
  if (!valid_wild_card_simple(gecos))
  {
    if (IsClient(source_p))
      sendto_one_notice(source_p, &me, ":Please include at least %u non-wildcard characters with the xline",
                        ConfigGeneral.min_nonwildcard_simple);
    return 0;
  }

  return 1;
}

/* xline_add()
 *
 * inputs       - client taking credit for xline, gecos, reason, xline type
 * outputs      - none
 * side effects - when successful, adds an xline to the conf
 */
static void
xline_add(struct Client *source_p, const char *gecos, const char *reason,
          time_t duration)
{
  char buf[IRCD_BUFSIZE];
  struct MaskItem *conf;

  if (duration)
    snprintf(buf, sizeof(buf), "Temporary X-line %ju min. - %.*s (%s)",
             duration / 60, REASONLEN, reason, date_iso8601(0));
  else
    snprintf(buf, sizeof(buf), "%.*s (%s)", REASONLEN, reason, date_iso8601(0));

  conf = conf_make(CONF_XLINE);
  conf->name = xstrdup(gecos);
  conf->reason = xstrdup(buf);
  conf->setat = CurrentTime;
  SetConfDatabase(conf);

  if (duration)
  {
    conf->until = CurrentTime + duration;

    if (IsClient(source_p))
      sendto_one_notice(source_p, &me, ":Added temporary %ju min. X-Line [%s]",
                        duration / 60, conf->name);

    sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
                         "%s added temporary %ju min. X-Line for [%s] [%s]",
                         get_oper_name(source_p), duration / 60,
                         conf->name, conf->reason);
    ilog(LOG_TYPE_XLINE, "%s added temporary %ju min. X-Line for [%s] [%s]",
         get_oper_name(source_p), duration / 60, conf->name, conf->reason);
  }
  else
  {
    if (IsClient(source_p))
      sendto_one_notice(source_p, &me, ":Added X-Line [%s] [%s]",
                        conf->name, conf->reason);

    sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
                         "%s added X-Line for [%s] [%s]",
                         get_oper_name(source_p), conf->name,
                         conf->reason);
    ilog(LOG_TYPE_XLINE, "%s added X-Line for [%s] [%s]",
         get_oper_name(source_p), conf->name, conf->reason);
  }

  xline_check(conf);
}

static void
relay_xline(struct Client *source_p, char *parv[])
{
  struct MaskItem *conf = NULL;

  if (HasFlag(source_p, FLAGS_SERVICE) || find_matching_name_conf(CONF_SHARED, source_p->servptr->name,
                              source_p->username, source_p->host,
                              SHARED_XLINE))
  {
    if ((conf = find_matching_name_conf(CONF_XLINE, parv[2], NULL, NULL, 0)))
    {
      if (IsClient(source_p))
        sendto_one_notice(source_p, &me, ":[%s] already X-Lined by [%s] - %s",
                          parv[2], conf->name, conf->reason);
      return;
    }

    xline_add(source_p, parv[2], parv[4], atoi(parv[3]));
  }
}

/* mo_xline()
 *
 * inputs       - pointer to server
 *              - pointer to client
 *              - parameter count
 *              - parameter list
 * output       -
 * side effects - x line is added
 *
 */
static int
mo_xline(struct Client *source_p, int parc, char *parv[])
{
  char *reason = NULL;
  char *gecos = NULL;
  struct MaskItem *conf = NULL;
  char *target_server = NULL;
  time_t duration = 0;

  if (!HasOFlag(source_p, OPER_FLAG_XLINE))
  {
    sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "xline");
    return 0;
  }

  if (!parse_aline("XLINE", source_p, parc, parv, 0, &gecos, NULL,
                   &duration, &target_server, &reason))
    return 0;

  if (target_server)
  {
    sendto_match_servs(source_p, target_server, CAPAB_CLUSTER, "XLINE %s %s %ju :%s",
                       target_server, gecos, duration, reason);

    /* Allow ON to apply local xline as well if it matches */
    if (match(target_server, me.name))
      return 0;
  }
  else
    cluster_a_line(source_p, "XLINE", CAPAB_CLUSTER, SHARED_XLINE, "%s %ju :%s",
                   gecos, duration, reason);

  if (!valid_xline(source_p, gecos))
    return 0;

  if ((conf = find_matching_name_conf(CONF_XLINE, gecos, NULL, NULL, 0)))
  {
    sendto_one_notice(source_p, &me, ":[%s] already X-Lined by [%s] - %s",
                      gecos, conf->name, conf->reason);
    return 0;
  }

  xline_add(source_p, gecos, reason, duration);
  return 0;
}

/*! \brief XLINE command handler
 *
 * \param source_p Pointer to allocated Client struct from which the message
 *                 originally comes from.  This can be a local or remote client.
 * \param parc     Integer holding the number of supplied arguments.
 * \param parv     Argument vector where parv[0] .. parv[parc-1] are non-NULL
 *                 pointers.
 * \note Valid arguments for this command are:
 *      - parv[0] = command
 *      - parv[1] = target server
 *      - parv[2] = gecos
 *      - parv[3] = time
 *      - parv[4] = reason
 */
static int
ms_xline(struct Client *source_p, int parc, char *parv[])
{
  if (parc != 5 || EmptyString(parv[4]))
    return 0;

  sendto_match_servs(source_p, parv[1], CAPAB_CLUSTER, "XLINE %s %s %s :%s",
                     parv[1], parv[2], parv[3], parv[4]);

  if (match(parv[1], me.name))
    return 0;

  if (!valid_xline(source_p, parv[2]))
    return 0;

  relay_xline(source_p, parv);
  return 0;
}

/* XXX: TBR */
/* me_xline()
 *
 * inputs       - server
 *              - client (oper)
 *              - parc number of arguments
 *              - parv list of arguments
 * via parv[]
 * parv[1] = target server
 * parv[2] = xline
 * parv[3] = time
 * parv[4] = reason
 *
 * outputs      - none
 * side effects -
 */
static int
me_xline(struct Client *source_p, int parc, char *parv[])
{
  if (parc != 5 || EmptyString(parv[4]))
    return 0;

  if (!valid_xline(source_p, parv[2]))
    return 0;

  relay_xline(source_p, parv);
  return 0;
}

static struct Message xline_msgtab =
{
  .cmd = "XLINE",
  .args_min = 2,
  .args_max = MAXPARA,
  .handlers[UNREGISTERED_HANDLER] = m_unregistered,
  .handlers[CLIENT_HANDLER] = m_not_oper,
  .handlers[SERVER_HANDLER] = ms_xline,
  .handlers[ENCAP_HANDLER] = me_xline,
  .handlers[OPER_HANDLER] = mo_xline
};

static void
module_init(void)
{
  mod_add_cmd(&xline_msgtab);
}

static void
module_exit(void)
{
  mod_del_cmd(&xline_msgtab);
}

struct module module_entry =
{
  .version = "$Revision$",
  .modinit = module_init,
  .modexit = module_exit,
};
Revision:	6782
Committed:	Sun Nov 15 18:49:32 2015 UTC (10 years, 8 months ago) by michael
Content type:	text/x-csrc
File size:	8134 byte(s)
Log Message:	- Use the %ju conversion specifier for time_t and get rid of these non-portable (unsigned long) casts; replace some uint64_t with uintmax_t
#	User	Rev	Content
1	adx	30	/*
2	michael	2820	* ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
3	adx	30	*
4	michael	5347	* Copyright (c) 2003-2015 ircd-hybrid development team
5	adx	30	*
6			* This program is free software; you can redistribute it and/or modify
7			* it under the terms of the GNU General Public License as published by
8			* the Free Software Foundation; either version 2 of the License, or
9			* (at your option) any later version.
10			*
11			* This program is distributed in the hope that it will be useful,
12			* but WITHOUT ANY WARRANTY; without even the implied warranty of
13			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14			* GNU General Public License for more details.
15			*
16			* You should have received a copy of the GNU General Public License
17			* along with this program; if not, write to the Free Software
18	michael	4565	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
19	adx	30	* USA
20			*/
21
22	michael	2820	/*! \file m_xline.c
23	michael	3352	* \brief Includes required functions for processing the XLINE command.
24	michael	2820	* \version $Id$
25			*/
26
27	adx	30	#include "stdinc.h"
28	michael	1011	#include "list.h"
29	adx	30	#include "client.h"
30			#include "irc_string.h"
31			#include "ircd.h"
32	michael	1632	#include "conf.h"
33	adx	30	#include "numeric.h"
34	michael	1309	#include "log.h"
35	michael	5823	#include "misc.h"
36	adx	30	#include "send.h"
37	michael	3347	#include "server.h"
38	adx	30	#include "parse.h"
39			#include "modules.h"
40	michael	1666	#include "memory.h"
41	adx	30
42
43	michael	2877	static void
44	michael	5875	xline_check(struct MaskItem *conf)
45	michael	2877	{
46	michael	4815	dlink_node node = NULL, node_next = NULL;
47	michael	2877
48	michael	4815	DLINK_FOREACH_SAFE(node, node_next, local_client_list.head)
49	michael	2877	{
50	michael	4815	struct Client *client_p = node->data;
51	michael	2877
52			if (IsDead(client_p))
53			continue;
54
55	michael	4242	if (!match(conf->name, client_p->info))
56	michael	2877	conf_try_ban(client_p, conf);
57			}
58			}
59
60	michael	2974	/* valid_xline()
61			*
62			* inputs - client to complain to, gecos, reason, whether to complain
63			* outputs - 1 for valid, else 0
64			* side effects - complains to client, when warn != 0
65			*/
66			static int
67	michael	4646	valid_xline(struct Client source_p, const char gecos)
68	michael	2974	{
69			if (!valid_wild_card_simple(gecos))
70			{
71	michael	4646	if (IsClient(source_p))
72			sendto_one_notice(source_p, &me, ":Please include at least %u non-wildcard characters with the xline",
73			ConfigGeneral.min_nonwildcard_simple);
74	michael	2974	return 0;
75			}
76
77			return 1;
78			}
79
80	michael	5867	/* xline_add()
81	michael	2974	*
82			* inputs - client taking credit for xline, gecos, reason, xline type
83			* outputs - none
84			* side effects - when successful, adds an xline to the conf
85			*/
86			static void
87	michael	5867	xline_add(struct Client source_p, const char gecos, const char *reason,
88	michael	6458	time_t duration)
89	michael	2974	{
90	michael	5865	char buf[IRCD_BUFSIZE];
91			struct MaskItem *conf;
92	michael	2974
93	michael	6458	if (duration)
94	michael	6782	snprintf(buf, sizeof(buf), "Temporary X-line %ju min. - %.*s (%s)",
95			duration / 60, REASONLEN, reason, date_iso8601(0));
96	michael	5865	else
97	michael	6422	snprintf(buf, sizeof(buf), "%.*s (%s)", REASONLEN, reason, date_iso8601(0));
98	michael	5865
99			conf = conf_make(CONF_XLINE);
100	michael	2974	conf->name = xstrdup(gecos);
101	michael	5865	conf->reason = xstrdup(buf);
102	michael	2974	conf->setat = CurrentTime;
103			SetConfDatabase(conf);
104
105	michael	6458	if (duration)
106	michael	2974	{
107	michael	6458	conf->until = CurrentTime + duration;
108	michael	5875
109	michael	4646	if (IsClient(source_p))
110	michael	6782	sendto_one_notice(source_p, &me, ":Added temporary %ju min. X-Line [%s]",
111			duration / 60, conf->name);
112	michael	4890
113	michael	6318	sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
114	michael	6782	"%s added temporary %ju min. X-Line for [%s] [%s]",
115			get_oper_name(source_p), duration / 60,
116	michael	2974	conf->name, conf->reason);
117	michael	6782	ilog(LOG_TYPE_XLINE, "%s added temporary %ju min. X-Line for [%s] [%s]",
118			get_oper_name(source_p), duration / 60, conf->name, conf->reason);
119	michael	2974	}
120			else
121			{
122	michael	4646	if (IsClient(source_p))
123			sendto_one_notice(source_p, &me, ":Added X-Line [%s] [%s]",
124			conf->name, conf->reason);
125	michael	4890
126	michael	6318	sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
127	michael	2974	"%s added X-Line for [%s] [%s]",
128			get_oper_name(source_p), conf->name,
129			conf->reason);
130			ilog(LOG_TYPE_XLINE, "%s added X-Line for [%s] [%s]",
131			get_oper_name(source_p), conf->name, conf->reason);
132			}
133
134	michael	5875	xline_check(conf);
135	michael	2974	}
136
137			static void
138			relay_xline(struct Client source_p, char parv[])
139			{
140			struct MaskItem *conf = NULL;
141
142	michael	6628	if (HasFlag(source_p, FLAGS_SERVICE) \|\| find_matching_name_conf(CONF_SHARED, source_p->servptr->name,
143	michael	2974	source_p->username, source_p->host,
144			SHARED_XLINE))
145			{
146			if ((conf = find_matching_name_conf(CONF_XLINE, parv[2], NULL, NULL, 0)))
147			{
148	michael	4646	if (IsClient(source_p))
149			sendto_one_notice(source_p, &me, ":[%s] already X-Lined by [%s] - %s",
150			parv[2], conf->name, conf->reason);
151	michael	2974	return;
152			}
153
154	michael	5867	xline_add(source_p, parv[2], parv[4], atoi(parv[3]));
155	michael	2974	}
156			}
157
158	adx	30	/* mo_xline()
159			*
160			* inputs - pointer to server
161			* - pointer to client
162			* - parameter count
163			* - parameter list
164			* output -
165			* side effects - x line is added
166			*
167			*/
168	michael	2820	static int
169	michael	3156	mo_xline(struct Client source_p, int parc, char parv[])
170	adx	30	{
171			char *reason = NULL;
172			char *gecos = NULL;
173	michael	1632	struct MaskItem *conf = NULL;
174	adx	30	char *target_server = NULL;
175	michael	6458	time_t duration = 0;
176	adx	30
177	michael	2852	if (!HasOFlag(source_p, OPER_FLAG_XLINE))
178	adx	30	{
179	michael	3109	sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "xline");
180	michael	2820	return 0;
181	adx	30	}
182
183	michael	5776	if (!parse_aline("XLINE", source_p, parc, parv, 0, &gecos, NULL,
184	michael	6458	&duration, &target_server, &reason))
185	michael	2820	return 0;
186	adx	30
187	michael	3368	if (target_server)
188	adx	30	{
189	michael	6782	sendto_match_servs(source_p, target_server, CAPAB_CLUSTER, "XLINE %s %s %ju :%s",
190			target_server, gecos, duration, reason);
191	adx	30
192			/* Allow ON to apply local xline as well if it matches */
193	michael	1652	if (match(target_server, me.name))
194	michael	2820	return 0;
195	adx	30	}
196	michael	2820	else
197	michael	6782	cluster_a_line(source_p, "XLINE", CAPAB_CLUSTER, SHARED_XLINE, "%s %ju :%s",
198	michael	6458	gecos, duration, reason);
199	adx	30
200	michael	4646	if (!valid_xline(source_p, gecos))
201	michael	2820	return 0;
202	adx	30
203	michael	2820	if ((conf = find_matching_name_conf(CONF_XLINE, gecos, NULL, NULL, 0)))
204	adx	30	{
205	michael	3110	sendto_one_notice(source_p, &me, ":[%s] already X-Lined by [%s] - %s",
206			gecos, conf->name, conf->reason);
207	michael	2820	return 0;
208	adx	30	}
209
210	michael	6458	xline_add(source_p, gecos, reason, duration);
211	michael	2820	return 0;
212	adx	30	}
213
214	michael	5870	/*! \brief XLINE command handler
215	adx	30	*
216	michael	5870	* \param source_p Pointer to allocated Client struct from which the message
217			* originally comes from. This can be a local or remote client.
218			* \param parc Integer holding the number of supplied arguments.
219			* \param parv Argument vector where parv[0] .. parv[parc-1] are non-NULL
220			* pointers.
221			* \note Valid arguments for this command are:
222			* - parv[0] = command
223			* - parv[1] = target server
224			* - parv[2] = gecos
225			* - parv[3] = time
226			* - parv[4] = reason
227	adx	30	*/
228	michael	2820	static int
229	michael	3156	ms_xline(struct Client source_p, int parc, char parv[])
230	adx	30	{
231			if (parc != 5 \|\| EmptyString(parv[4]))
232	michael	2820	return 0;
233	adx	30
234	michael	6354	sendto_match_servs(source_p, parv[1], CAPAB_CLUSTER, "XLINE %s %s %s :%s",
235	michael	4646	parv[1], parv[2], parv[3], parv[4]);
236
237			if (match(parv[1], me.name))
238	michael	2820	return 0;
239	adx	30
240	michael	4646	if (!valid_xline(source_p, parv[2]))
241	michael	2820	return 0;
242	adx	30
243			relay_xline(source_p, parv);
244	michael	2820	return 0;
245	adx	30	}
246
247	michael	5870	/* XXX: TBR */
248	adx	30	/* me_xline()
249			*
250			* inputs - server
251			* - client (oper)
252			* - parc number of arguments
253			* - parv list of arguments
254			* via parv[]
255	michael	2828	* parv[1] = target server
256			* parv[2] = xline
257			* parv[3] = time
258			* parv[4] = reason
259	adx	30	*
260			* outputs - none
261	michael	2820	* side effects -
262	adx	30	*/
263	michael	2820	static int
264	michael	3156	me_xline(struct Client source_p, int parc, char parv[])
265	adx	30	{
266	michael	4646	if (parc != 5 \|\| EmptyString(parv[4]))
267	michael	2820	return 0;
268	adx	30
269	michael	4646	if (!valid_xline(source_p, parv[2]))
270			return 0;
271
272	adx	30	relay_xline(source_p, parv);
273	michael	2820	return 0;
274	adx	30	}
275
276	michael	2820	static struct Message xline_msgtab =
277			{
278	michael	5881	.cmd = "XLINE",
279			.args_min = 2,
280			.args_max = MAXPARA,
281			.handlers[UNREGISTERED_HANDLER] = m_unregistered,
282			.handlers[CLIENT_HANDLER] = m_not_oper,
283			.handlers[SERVER_HANDLER] = ms_xline,
284			.handlers[ENCAP_HANDLER] = me_xline,
285			.handlers[OPER_HANDLER] = mo_xline
286	michael	1230	};
287
288			static void
289			module_init(void)
290			{
291			mod_add_cmd(&xline_msgtab);
292			}
293
294			static void
295			module_exit(void)
296			{
297			mod_del_cmd(&xline_msgtab);
298			}
299
300	michael	2820	struct module module_entry =
301			{
302	michael	1230	.version = "$Revision$",
303			.modinit = module_init,
304			.modexit = module_exit,
305			};