/*! \brief UNRESV 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] = channel/nick
* - parv[2] = "ON"
* - parv[3] = target server
*/
static int
mo_unresv(struct Client *source_p, int parc, char *parv[])
{
char *resv = NULL;
char *reason = NULL;
char *target_server = NULL;
if (!HasOFlag(source_p, OPER_FLAG_UNRESV))
{
sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "unresv");
return 0;
}
if (!parse_aline("UNRESV", source_p, parc, parv, 0, &resv, NULL,
NULL, &target_server, &reason))
return 0;
if (target_server)
{
sendto_match_servs(source_p, target_server, CAPAB_CLUSTER, "UNRESV %s %s",
target_server, resv);
/* Allow ON to apply local unresv as well if it matches */
if (match(target_server, me.name))
return 0;
}
else
cluster_a_line(source_p, "UNRESV", CAPAB_KLN, SHARED_UNRESV, resv);
resv_remove(source_p, resv);
return 0;
}
/* mo_unresv()
* parv[0] = sender prefix
* parv[1] = channel/nick to unforbid
*/
static void
mo_unresv(struct Client *client_p, struct Client *source_p, int parc, char *parv[])
{
char *resv = NULL;
char *reason = NULL;
char *target_server = NULL;
/* UNRESV #channel ON irc.server.com */
/* UNRESV kiddie ON irc.server.com */
if(parse_aline("UNRESV", source_p, parc, parv,
0, &resv, NULL, NULL, &target_server, &reason) < 0)
return;
if(target_server != NULL)
{
sendto_match_servs(source_p, target_server, CAP_CLUSTER,
"UNRESV %s %s", target_server, resv);
/* Allow ON to apply local unresv as well if it matches */
if(!match(target_server, me.name))
return;
}
else
cluster_a_line(source_p, "UNRESV", CAP_KLN, SHARED_UNRESV, resv);
remove_resv(source_p, resv);
}
/* mo_resv()
* parv[0] = command
* parv[1] = channel/nick to forbid
*/
static int
mo_resv(struct Client *source_p, int parc, char *parv[])
{
char *resv = NULL;
char *reason = NULL;
char *target_server = NULL;
time_t tkline_time = 0;
/* RESV #channel ON irc.server.com :abuse
* RESV kiddie ON irc.server.com :abuse
*/
if (!parse_aline("RESV", source_p, parc, parv, 0, &resv, NULL,
&tkline_time, &target_server, &reason))
return 0;
if (target_server)
{
/* if a given expire time is given, ENCAP it */
if (tkline_time)
sendto_match_servs(source_p, target_server, CAP_ENCAP,
"ENCAP %s RESV %d %s 0 :%s",
target_server, (int)tkline_time, resv, reason);
else
sendto_match_servs(source_p, target_server, CAP_CLUSTER,
"RESV %s %s :%s",
target_server, resv, reason);
/* Allow ON to apply local resv as well if it matches */
if (match(target_server, me.name))
return 0;
}
else
{
/* RESV #channel :abuse
* RESV kiddie :abuse
*/
if (tkline_time)
cluster_a_line(source_p, "ENCAP", CAP_ENCAP, SHARED_RESV,
"RESV %d %s 0 :%s", (int)tkline_time, resv, reason);
else
cluster_a_line(source_p, "RESV", CAP_KLN, SHARED_RESV,
"%s :%s", resv, reason);
}
parse_resv(source_p, resv, (int)tkline_time, reason);
return 0;
}
/*
** m_undline
** added May 28th 2000 by Toby Verrall <*****@*****.**>
** based totally on m_unkline
** added to hybrid-7 7/11/2000 --is
**
** parv[0] = sender nick
** parv[1] = dline to remove
*/
static void
mo_undline(struct Client *client_p, struct Client *source_p,
int parc, char *parv[])
{
char *addr = NULL, *user = NULL;
char *target_server = NULL;
if (!HasOFlag(source_p, OPER_FLAG_UNDLINE))
{
sendto_one(source_p, form_str(ERR_NOPRIVS),
me.name, source_p->name, "undline");
return;
}
if (parc < 2 || EmptyString(parv[1]))
{
sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
me.name, source_p->name, "UNDLINE");
return;
}
if (parse_aline("UNDLINE", source_p, parc, parv, 0, &user,
&addr, NULL, &target_server, NULL) < 0)
return;
if (target_server != NULL)
{
sendto_match_servs(source_p, target_server, CAP_UNDLN,
"UNDLINE %s %s", target_server, addr);
/* Allow ON to apply local unkline as well if it matches */
if (match(target_server, me.name))
return;
}
else
cluster_a_line(source_p, "UNDLINE", CAP_UNDLN, SHARED_UNDLINE,
"%s", addr);
if (remove_dline_match(addr))
{
sendto_one(source_p,
":%s NOTICE %s :D-Line for [%s] is removed",
me.name, source_p->name, addr);
sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
"%s has removed the D-Line for: [%s]",
get_oper_name(source_p), addr);
ilog(LOG_TYPE_DLINE, "%s removed D-Line for [%s]",
get_oper_name(source_p), addr);
}
else
sendto_one(source_p, ":%s NOTICE %s :No D-Line for [%s] found",
me.name, source_p->name, addr);
}
/*! \brief UNKLINE 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] = user\@host mask
* - parv[2] = "ON"
* - parv[3] = target server
*/
static int
mo_unkline(struct Client *source_p, int parc, char *parv[])
{
char *target_server = NULL;
char *user, *host;
if (!HasOFlag(source_p, OPER_FLAG_UNKLINE))
{
sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "unkline");
return 0;
}
if (EmptyString(parv[1]))
{
sendto_one_numeric(source_p, &me, ERR_NEEDMOREPARAMS, "UNKLINE");
return 0;
}
if (parse_aline("UNKLINE", source_p, parc, parv, 0, &user,
&host, NULL, &target_server, NULL) < 0)
return 0;
if (target_server)
{
sendto_match_servs(source_p, target_server, CAP_UNKLN,
"UNKLINE %s %s %s",
target_server, user, host);
/* Allow ON to apply local unkline as well if it matches */
if (match(target_server, me.name))
return 0;
}
else
cluster_a_line(source_p, "UNKLINE", CAP_UNKLN, SHARED_UNKLINE,
"%s %s", user, host);
if (remove_kline_match(host, user))
{
sendto_one_notice(source_p, &me, ":K-Line for [%s@%s] is removed", user, host);
sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
"%s has removed the K-Line for: [%s@%s]",
get_oper_name(source_p), user, host);
ilog(LOG_TYPE_KLINE, "%s removed K-Line for [%s@%s]",
get_oper_name(source_p), user, host);
}
else
sendto_one_notice(source_p, &me, ":No K-Line for [%s@%s] found", user, host);
return 0;
}
/* mo_dline()
*
* inputs - pointer to server
* - pointer to client
* - parameter count
* - parameter list
* output -
* side effects - D line is added
*
*/
static void
mo_dline(struct Client *client_p, struct Client *source_p,
int parc, char *parv[])
{
char def_reason[] = CONF_NOREASON;
char *dlhost = NULL, *reason = NULL;
char *target_server = NULL;
const char *creason;
const struct Client *target_p = NULL;
struct irc_ssaddr daddr;
struct MaskItem *conf=NULL;
time_t tkline_time=0;
int bits = 0, aftype = 0, t = 0;
const char *current_date = NULL;
time_t cur_time;
char hostip[HOSTIPLEN + 1];
char buffer[IRCD_BUFSIZE];
if (!HasOFlag(source_p, OPER_FLAG_DLINE))
{
sendto_one(source_p, form_str(ERR_NOPRIVS),
me.name, source_p->name, "dline");
return;
}
if (parse_aline("DLINE", source_p, parc, parv, AWILD, &dlhost,
NULL, &tkline_time, &target_server, &reason) < 0)
return;
if (target_server != NULL)
{
if (HasID(source_p))
{
sendto_server(NULL, CAP_DLN|CAP_TS6, NOCAPS,
":%s DLINE %s %lu %s :%s",
source_p->id, target_server, (unsigned long)tkline_time,
dlhost, reason);
sendto_server(NULL, CAP_DLN, CAP_TS6,
":%s DLINE %s %lu %s :%s",
source_p->name, target_server, (unsigned long)tkline_time,
dlhost, reason);
}
else
sendto_server(NULL, CAP_DLN, NOCAPS,
":%s DLINE %s %lu %s :%s",
source_p->name, target_server, (unsigned long)tkline_time,
dlhost, reason);
/* Allow ON to apply local kline as well if it matches */
if (match(target_server, me.name))
return;
}
else
cluster_a_line(source_p, "DLINE", CAP_DLN, SHARED_DLINE,
"%d %s :%s", tkline_time, dlhost, reason);
if ((t = parse_netmask(dlhost, NULL, &bits)) == HM_HOST)
{
if ((target_p = find_chasing(client_p, source_p, dlhost, NULL)) == NULL)
return;
if (!MyConnect(target_p))
{
sendto_one(source_p,
":%s NOTICE %s :Can't DLINE nick on another server",
me.name, source_p->name);
return;
}
if (IsExemptKline(target_p))
{
sendto_one(source_p,
":%s NOTICE %s :%s is E-lined", me.name,
source_p->name, target_p->name);
return;
}
getnameinfo((struct sockaddr *)&target_p->localClient->ip,
target_p->localClient->ip.ss_len, hostip,
sizeof(hostip), NULL, 0, NI_NUMERICHOST);
dlhost = hostip;
t = parse_netmask(dlhost, NULL, &bits);
assert(t == HM_IPV4 || t == HM_IPV6);
}
if (bits < 8)
{
sendto_one(source_p,
":%s NOTICE %s :For safety, bitmasks less than 8 require conf access.",
me.name, source_p->name);
return;
}
#ifdef IPV6
if (t == HM_IPV6)
aftype = AF_INET6;
else
#endif
aftype = AF_INET;
parse_netmask(dlhost, &daddr, NULL);
if ((conf = find_dline_conf(&daddr, aftype)) != NULL)
{
creason = conf->reason ? conf->reason : def_reason;
if (IsConfExemptKline(conf))
sendto_one(source_p,
":%s NOTICE %s :[%s] is (E)d-lined by [%s] - %s",
me.name, source_p->name, dlhost, conf->host, creason);
else
sendto_one(source_p,
":%s NOTICE %s :[%s] already D-lined by [%s] - %s",
me.name, source_p->name, dlhost, conf->host, creason);
return;
}
cur_time = CurrentTime;
current_date = smalldate(cur_time);
if (!valid_comment(source_p, reason, 1))
return;
conf = conf_make(CONF_DLINE);
conf->host = xstrdup(dlhost);
if (tkline_time != 0)
snprintf(buffer, sizeof(buffer), "Temporary D-line %d min. - %s (%s)",
(int)(tkline_time/60), reason, current_date);
else
snprintf(buffer, sizeof(buffer), "%s (%s)", reason, current_date);
conf->reason = xstrdup(buffer);
apply_dline(source_p, conf, tkline_time);
rehashed_klines = 1;
}
/* mo_dline()
*
* inputs - pointer to server
* - pointer to client
* - parameter count
* - parameter list
* output -
* side effects - D line is added
*
*/
static void
mo_dline(struct Client *client_p, struct Client *source_p,
int parc, char *parv[])
{
char def_reason[] = CONF_NOREASON;
char *dlhost = NULL, *oper_reason = NULL, *reason = NULL;
char *target_server = NULL;
const char *creason;
const struct Client *target_p = NULL;
struct sockaddr_storage daddr;
struct AccessItem *aconf = NULL;
time_t tkline_time = 0;
int bits, t;
char hostip[HOSTIPLEN + 1];
if (!HasOFlag(source_p, OPER_FLAG_DLINE))
{
sendto_one(source_p, form_str(ERR_NOPRIVS),
me.name, source_p->name, "dline");
return;
}
if (parse_aline("DLINE", source_p, parc, parv, AWILD, &dlhost,
NULL, &tkline_time, &target_server, &reason) < 0)
return;
if (target_server != NULL)
{
if (HasID(source_p))
{
sendto_server(NULL, CAP_DLN | CAP_TS6, NOCAPS,
":%s DLINE %s %lu %s :%s",
source_p->id, target_server, (unsigned long)tkline_time,
dlhost, reason);
sendto_server(NULL, CAP_DLN, CAP_TS6,
":%s DLINE %s %lu %s :%s",
source_p->name, target_server, (unsigned long)tkline_time,
dlhost, reason);
}
else
sendto_server(NULL, CAP_DLN, NOCAPS,
":%s DLINE %s %lu %s :%s",
source_p->name, target_server, (unsigned long)tkline_time,
dlhost, reason);
/* Allow ON to apply local kline as well if it matches */
if (!match(target_server, me.name))
return;
}
else
cluster_a_line(source_p, "DLINE", CAP_DLN, SHARED_DLINE,
"%d %s :%s", tkline_time, dlhost, reason);
if ((t = parse_netmask(dlhost, NULL, &bits)) == HM_HOST)
{
if ((target_p = find_chasing(client_p, source_p, dlhost, NULL)) == NULL)
return;
if (!MyConnect(target_p))
{
sendto_one(source_p,
":%s NOTICE %s :Can't DLINE nick on another server",
me.name, source_p->name);
return;
}
if (IsExemptKline(target_p))
{
sendto_one(source_p,
":%s NOTICE %s :%s is E-lined", me.name,
source_p->name, target_p->name);
return;
}
ip_to_string(&target_p->ip, hostip, sizeof(hostip));
dlhost = hostip;
t = parse_netmask(dlhost, NULL, &bits);
assert(t == HM_IPV4 || t == HM_IPV6);
}
if (bits < 8)
{
sendto_one(source_p,
":%s NOTICE %s :For safety, bitmasks less than 8 require conf access.",
me.name, source_p->name);
return;
}
if (t == HM_IPV6)
t = AF_INET6;
else
t = AF_INET;
parse_netmask(dlhost, &daddr, NULL);
if ((aconf = find_dline_conf(&daddr, t)) != NULL)
{
creason = aconf->reason ? aconf->reason : def_reason;
if (IsConfExemptKline(aconf))
sendto_one(source_p,
":%s NOTICE %s :[%s] is (E)d-lined by [%s] - %s",
me.name, source_p->name, dlhost, aconf->host, creason);
else
sendto_one(source_p,
":%s NOTICE %s :[%s] already D-lined by [%s] - %s",
me.name, source_p->name, dlhost, aconf->host, creason);
return;
}
/* Look for an oper reason */
if ((oper_reason = strchr(reason, '|')) != NULL)
* oper_reason++ = '\0';
if (!valid_comment(source_p, reason, 1))
return;
apply_conf_ban(source_p, DLINE_TYPE, NULL, dlhost, reason, oper_reason,
tkline_time);
}
