static void cs_cmd_devoice(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "DEVOICE");
command_fail(si, fault_needmoreparams, _("Syntax: DEVOICE <#channel> [nickname]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_VOICE))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
/* figure out who we're going to devoice */
if (!nick)
tu = si->su;
else
{
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
return;
}
}
if (is_internal_client(tu))
return;
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
return;
}
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, 'v', CLIENT_NAME(tu));
cu->modes &= ~CSTATUS_VOICE;
if (si->c == NULL && tu != si->su)
change_notify(chansvs.nick, tu, "You have been devoiced on %s by %s", mc->name, get_source_name(si));
logcommand(si, CMDLOG_DO, "DEVOICE: \2%s!%s@%s\2 on \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (!chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been devoiced on \2%s\2."), tu->nick, mc->name);
}
static void
cs_cmd_invite(struct sourceinfo *si, int parc, char *parv[])
{
char *chan = parv[0];
struct mychan *mc;
if (si->su == NULL)
{
command_fail(si, fault_noprivs, STR_IRC_COMMAND_ONLY, "INVITE");
return;
}
/* This command is not useful if the user is already in the channel,
* ignore it if it is a fantasy command so users can program bots to
* react on it without interference from ChanServ.
*/
if (si->c != NULL)
return;
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "INVITE");
command_fail(si, fault_needmoreparams, _("Syntax: INVITE <#channel>"));
return;
}
if (!(mc = mychan_find(chan)))
{
command_fail(si, fault_nosuch_target, STR_IS_NOT_REGISTERED, chan);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, STR_CHANNEL_IS_CLOSED, chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_INVITE))
{
command_fail(si, fault_noprivs, STR_NOT_AUTHORIZED);
return;
}
if (!mc->chan)
{
command_fail(si, fault_nosuch_target, STR_CHANNEL_IS_EMPTY, mc->name);
return;
}
if (chanuser_find(mc->chan, si->su))
{
command_fail(si, fault_noprivs, _("You're already on \2%s\2."), mc->name);
return;
}
invite_sts(si->service->me, si->su, mc->chan);
logcommand(si, CMDLOG_DO, "INVITE: \2%s\2", mc->name);
command_success_nodata(si, _("You have been invited to \2%s\2."), mc->name);
}
/* NOTICE wrapper */
static void asuka_notice_channel_sts(user_t *from, channel_t *target, const char *text)
{
if (from == NULL || chanuser_find(target, from))
sts("%s O %s :%s", from ? from->uid : me.numeric, target->name, text);
else
sts("%s O %s :[%s:%s] %s", me.numeric, target->name, from->nick, target->name, text);
}
static void cs_cmd_invite(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
mychan_t *mc;
if (si->su == NULL)
{
command_fail(si, fault_noprivs, _("\2%s\2 can only be executed via IRC."), "INVITE");
return;
}
/* This command is not useful if the user is already in the channel,
* ignore it if it is a fantasy command so users can program bots to
* react on it without interference from ChanServ.
*/
if (si->c != NULL)
return;
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "INVITE");
command_fail(si, fault_needmoreparams, _("Syntax: INVITE <#channel>"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_INVITE))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (!mc->chan)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), mc->name);
return;
}
if (chanuser_find(mc->chan, si->su))
{
command_fail(si, fault_noprivs, _("You're already on \2%s\2."), mc->name);
return;
}
invite_sts(si->service->me, si->su, mc->chan);
logcommand(si, CMDLOG_DO, "INVITE: \2%s\2", mc->name);
command_success_nodata(si, _("You have been invited to \2%s\2."), mc->name);
}
/* ircd allows forwards to existing channels; the target channel must be
* +F or the setter must have ops in it */
static bool check_forward(const char *value, channel_t *c, mychan_t *mc, user_t *u, myuser_t *mu)
{
channel_t *target_c;
mychan_t *target_mc;
chanuser_t *target_cu;
if (!VALID_GLOBAL_CHANNEL_PFX(value) || strlen(value) > 50)
return false;
if (u == NULL && mu == NULL)
return true;
target_c = channel_find(value);
target_mc = mychan_from(target_c);
if (target_c == NULL && target_mc == NULL)
return false;
if (target_c != NULL && target_c->modes & CMODE_FTARGET)
return true;
if (target_mc != NULL && target_mc->mlock_on & CMODE_FTARGET)
return true;
if (u != NULL)
{
target_cu = chanuser_find(target_c, u);
if (target_cu != NULL && target_cu->modes & CSTATUS_OP)
return true;
if (chanacs_user_flags(target_mc, u) & CA_SET)
return true;
}
else if (mu != NULL)
if (chanacs_entity_has_flag(target_mc, entity(mu), CA_SET))
return true;
return false;
}
/* -------------------------------------------------------------------------- *
* -------------------------------------------------------------------------- */
static int cm_noext_hook(struct client *cptr, struct channel *chptr,
intptr_t type, const char *text)
{
struct chanuser *cuptr = chanuser_find(chptr, cptr);
if(cuptr == NULL && (chptr->modes & CHFLG(n)))
{
numeric_send(cptr, ERR_CANNOTSENDTOCHAN, chptr->name);
return 1;
}
return 0;
}
static void cs_cmd_topic(char *origin)
{
char *chan = strtok(NULL, " ");
char *topic = strtok(NULL, "");
mychan_t *mc;
channel_t *c;
user_t *u;
if (!chan || !topic)
{
notice(chansvs.nick, origin, STR_INSUFFICIENT_PARAMS, "TOPIC");
notice(chansvs.nick, origin, "Syntax: TOPIC <#channel> <topic>");
return;
}
c = channel_find(chan);
if (!c)
{
notice(chansvs.nick, origin, "\2%s\2 is not registered.", chan);
return;
}
mc = mychan_find(chan);
if (!mc)
{
notice(chansvs.nick, origin, "Channel \2%s\2 is not registered.", chan);
return;
}
if (metadata_find(mc, METADATA_CHANNEL, "private:close:closer"))
{
notice(chansvs.nick, origin, "\2%s\2 is closed.", chan);
return;
}
u = user_find_named(origin);
if (!chanacs_user_has_flag(mc, u, CA_TOPIC))
{
notice(chansvs.nick, origin, "You are not authorized to perform this operation.");
return;
}
handle_topic(c, origin, CURRTIME, topic);
topic_sts(chan, origin, CURRTIME, topic);
logcommand(chansvs.me, u, CMDLOG_SET, "%s TOPIC", mc->name);
if (!chanuser_find(c, u))
notice(chansvs.nick, origin, "Topic set to \2%s\2 on \2%s\2.", topic, chan);
}
/* NOTICE wrapper */
static void asuka_notice_channel_sts(user_t *from, channel_t *target, const char *text)
{
if (target->modes & CMODE_NONOTICE)
{
/* asuka sucks */
/* remove that stupid +N mode before it blocks our notice
* -- jilles */
sts("%s M %s -N", from ? from->uid : me.numeric, target->name);
target->modes &= ~CMODE_NONOTICE;
}
if (from == NULL || chanuser_find(target, from))
sts("%s O %s :%s", from ? from->uid : me.numeric, target->name, text);
else
sts("%s O %s :[%s:%s] %s", me.numeric, target->name, from->nick, target->name, text);
}
static void cs_cmd_topicswap(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *topic = parv[1];
mychan_t *mc;
channel_t *c;
const char *topicsetter;
time_t prevtopicts;
char topicbuf[BUFSIZE];
char commbuf[BUFSIZE];
char *pos = NULL;
char *search = NULL;
char *replace = NULL;
size_t search_size = 0;
size_t replace_size = 0;
size_t copylen = 0;
if (parc < 2)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "TOPICSWAP");
command_fail(si, fault_needmoreparams, _("Syntax: TOPICSWAP <#channel> <search>:[<replace>]"));
return;
}
mowgli_strlcpy(commbuf, parv[1], BUFSIZE);
search = commbuf;
pos = strrchr(commbuf, ':');
if (!pos || pos == commbuf)
{
command_fail(si, fault_badparams, STR_INSUFFICIENT_PARAMS, "TOPICSWAP");
command_fail(si, fault_badparams, _("Syntax: TOPICSWAP <#channel> <search>:[<replace>]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
c = channel_find(chan);
if (!c)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_TOPIC))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
if (!c->topic)
topicbuf[0] = '\0';
else
mowgli_strlcpy(topicbuf, c->topic, BUFSIZE);
*pos = '\0';
replace = pos + 1;
search_size = strlen(search);
replace_size = strlen(replace);
pos = strstr(topicbuf, search);
if (!pos)
{
command_fail(si, fault_badparams, _("Channel \2%s\2 does not have \2%s\2 in its topic."), chan, search);
return;
}
copylen = strlen(pos + search_size) + 1;
if (pos - topicbuf + replace_size + copylen > BUFSIZE)
goto invalid_error;
memmove(pos + search_size + (replace_size - search_size), pos + search_size, copylen);
memcpy(pos, replace, replace_size);
if (!validtopic(topicbuf))
{
invalid_error:
command_fail(si, fault_badparams, _("The new topic is invalid or too long."));
return;
}
if (si->su != NULL)
topicsetter = si->su->nick;
else if (si->smu != NULL)
topicsetter = entity(si->smu)->name;
else
topicsetter = "unknown";
prevtopicts = c->topicts;
handle_topic(c, topicsetter, CURRTIME, topicbuf);
topic_sts(c, si->service->me, topicsetter, CURRTIME, prevtopicts, topicbuf);
logcommand(si, CMDLOG_DO, "TOPICSWAP: \2%s\2", mc->name);
if (si->su == NULL || !chanuser_find(c, si->su))
command_success_nodata(si, _("Topic set to \2%s\2 on \2%s\2."), c->topic, chan);
}
static void
cs_cmd_register(struct sourceinfo *si, int parc, char *parv[])
{
struct channel *c;
struct chanuser *cu;
struct mychan *mc;
char *name = parv[0];
char str[21];
hook_channel_register_check_t hdatac;
hook_channel_req_t hdata;
unsigned int fl;
/* This command is not useful on registered channels, ignore it if
* it is a fantasy command so users can program bots to react on
* it without interference from ChanServ.
*/
if (si->c != NULL)
return;
if (!name)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "REGISTER");
command_fail(si, fault_needmoreparams, _("To register a channel: REGISTER <#channel>"));
return;
}
if (*name != '#')
{
command_fail(si, fault_badparams, STR_INVALID_PARAMS, "REGISTER");
command_fail(si, fault_badparams, _("Syntax: REGISTER <#channel>"));
return;
}
if (si->smu->flags & MU_WAITAUTH)
{
command_fail(si, fault_notverified, _("You need to verify your email address before you may register channels."));
return;
}
// make sure it isn't already registered
if ((mc = mychan_find(name)))
{
if (! (mc->flags & MC_PRIVATE))
command_fail(si, fault_alreadyexists, _("\2%s\2 is already registered to \2%s\2."), mc->name, mychan_founder_names(mc));
else
command_fail(si, fault_alreadyexists, _("\2%s\2 is already registered."), mc->name);
return;
}
// make sure the channel exists
if (!(c = channel_find(name)))
{
command_fail(si, fault_nosuch_target, _("The channel \2%s\2 must exist in order to register it."), name);
return;
}
// make sure they're in it
if (!(cu = chanuser_find(c, si->su)))
{
command_fail(si, fault_noprivs, _("You must be in \2%s\2 in order to register it."), name);
return;
}
// make sure they're opped (or protected/owner on unreal/inspircd)
if (!((CSTATUS_OP | CSTATUS_PROTECT | CSTATUS_OWNER) & cu->modes))
{
command_fail(si, fault_noprivs, _("You must be a channel operator in \2%s\2 in order to register it."), name);
return;
}
if (metadata_find(si->smu, "private:restrict:setter"))
{
command_fail(si, fault_noprivs, _("You have been restricted from registering channels by network staff."));
return;
}
if ((unsigned int)(CURRTIME - ratelimit_firsttime) > config_options.ratelimit_period)
{
ratelimit_count = 0;
ratelimit_firsttime = CURRTIME;
}
if (ratelimit_count > config_options.ratelimit_uses && !has_priv(si, PRIV_FLOOD))
{
command_fail(si, fault_toomany, _("The system is currently too busy to process your registration, please try again later."));
slog(LG_INFO, "CHANSERV:REGISTER:THROTTLED: \2%s\2 by \2%s\2", name, entity(si->smu)->name);
return;
}
hdatac.si = si;
hdatac.name = name;
hdatac.chan = c;
hdatac.approved = 0;
hook_call_channel_can_register(&hdatac);
if (hdatac.approved != 0)
return;
if (!myentity_can_register_channel(entity(si->smu)))
{
command_fail(si, fault_toomany, _("You have too many channels registered."));
return;
}
if (config_options.ratelimit_uses && config_options.ratelimit_period)
ratelimit_count++;
logcommand(si, CMDLOG_REGISTER, "REGISTER: \2%s\2", name);
mc = mychan_add(name);
mc->registered = CURRTIME;
mc->used = CURRTIME;
mc->mlock_on |= (CMODE_NOEXT | CMODE_TOPIC);
if (c->limit == 0)
mc->mlock_off |= CMODE_LIMIT;
if (c->key == NULL)
mc->mlock_off |= CMODE_KEY;
mc->flags |= config_options.defcflags;
chanacs_add(mc, entity(si->smu), custom_founder_check(), CURRTIME, entity(si->smu));
if (c->ts > 0)
{
snprintf(str, sizeof str, "%lu", (unsigned long)c->ts);
metadata_add(mc, "private:channelts", str);
}
if (chansvs.deftemplates != NULL && *chansvs.deftemplates != '\0')
metadata_add(mc, "private:templates",
chansvs.deftemplates);
command_success_nodata(si, _("\2%s\2 is now registered to \2%s\2."), mc->name, entity(si->smu)->name);
hdata.si = si;
hdata.mc = mc;
hook_call_channel_register(&hdata);
// Allow the hook to override this.
fl = chanacs_source_flags(mc, si);
cu = chanuser_find(mc->chan, si->su);
if (cu == NULL)
;
else if (ircd->uses_owner && fl & CA_USEOWNER && fl & CA_AUTOOP &&
!(cu->modes & CSTATUS_OWNER))
{
modestack_mode_param(si->service->nick, mc->chan, MTYPE_ADD,
ircd->owner_mchar[1], CLIENT_NAME(si->su));
cu->modes |= CSTATUS_OWNER;
}
else if (ircd->uses_protect && fl & CA_USEPROTECT && fl & CA_AUTOOP &&
!(cu->modes & CSTATUS_PROTECT))
{
modestack_mode_param(si->service->nick, mc->chan, MTYPE_ADD,
ircd->protect_mchar[1], CLIENT_NAME(si->su));
cu->modes |= CSTATUS_PROTECT;
}
}
static void cs_cmd_kick(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
char *reason = parv[2];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
char reasonbuf[BUFSIZE];
if (!chan || !nick)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "KICK");
command_fail(si, fault_needmoreparams, _("Syntax: KICK <#channel> <nickname> [reason]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_REMOVE))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
/* figure out who we're going to kick */
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
return;
}
/* if target is a service, bail. --nenolod */
if (is_internal_client(tu))
return;
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
return;
}
if (cu->modes & CSTATUS_OWNER || cu->modes & CSTATUS_PROTECT)
{
command_fail(si, fault_noprivs, _("\2%s\2 is protected from kicks; you cannot kick them."), tu->nick);
return;
}
snprintf(reasonbuf, BUFSIZE, "(%s) %s", get_source_name(si), reason ? reason : "No reason given");
try_kick(chansvs.me->me, mc->chan, tu, reasonbuf);
logcommand(si, CMDLOG_DO, "KICK: \2%s!%s@%s\2 from \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (si->su != tu && !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been kicked from \2%s\2."), tu->nick, mc->name);
}
static void cs_cmd_owner(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
char *nicklist;
char *strtokctx;
if (ircd->uses_owner == false)
{
command_fail(si, fault_noprivs, _("The IRCd software you are running does not support this feature."));
return;
}
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "OWNER");
command_fail(si, fault_needmoreparams, _("Syntax: OWNER <#channel> [nickname] [...]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_USEOWNER))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
nicklist = (!nick ? strdup(si->su->nick) : strdup(nick));
nick = strtok_r(nicklist, " ", &strtokctx);
do
{
if (invert_purpose(si, parc, chan, &nick, '-', &cs_cmd_deowner))
continue;
/* figure out who we're going to op */
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
continue;
}
if (is_internal_client(tu))
continue;
/* SECURE check; we can skip this if sender == target, because we already verified */
if ((si->su != tu) && (mc->flags & MC_SECURE) && !chanacs_user_has_flag(mc, tu, CA_OP) && !chanacs_user_has_flag(mc, tu, CA_AUTOOP))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
command_fail(si, fault_noprivs, _("\2%s\2 has the SECURE option enabled, and \2%s\2 does not have appropriate access."), mc->name, tu->nick);
continue;
}
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
continue;
}
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, ircd->owner_mchar[1], CLIENT_NAME(tu));
cu->modes |= CSTATUS_OWNER;
if (si->c == NULL && tu != si->su)
change_notify(chansvs.nick, tu, "You have been set as owner on %s by %s", mc->name, get_source_name(si));
logcommand(si, CMDLOG_DO, "OWNER: \2%s!%s@%s\2 on \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been set as owner on \2%s\2."), tu->nick, mc->name);
} while ((nick = strtok_r(NULL, " ", &strtokctx)) != NULL);
free(nicklist);
}
static mowgli_node_t *inspircd_next_matching_ban(channel_t *c, user_t *u, int type, mowgli_node_t *first)
{
chanban_t *cb;
mowgli_node_t *n;
char hostbuf[NICKLEN+USERLEN+HOSTLEN];
char realbuf[NICKLEN+USERLEN+HOSTLEN];
char ipbuf[NICKLEN+USERLEN+HOSTLEN];
char *p;
snprintf(hostbuf, sizeof hostbuf, "%s!%s@%s", u->nick, u->user, u->vhost);
snprintf(realbuf, sizeof realbuf, "%s!%s@%s", u->nick, u->user, u->host);
/* will be nick!user@ if ip unknown, doesn't matter */
snprintf(ipbuf, sizeof ipbuf, "%s!%s@%s", u->nick, u->user, u->ip);
MOWGLI_ITER_FOREACH(n, first)
{
channel_t *target_c;
cb = n->data;
if (cb->type != type)
continue;
if ((!match(cb->mask, hostbuf) || !match(cb->mask, realbuf) || !match(cb->mask, ipbuf)) || !match_cidr(cb->mask, ipbuf))
return n;
if (cb->mask[1] == ':' && strchr("MRUjrm", cb->mask[0]))
{
bool matched = false;
p = cb->mask + 2;
if (*(p - 1) != ':')
p = NULL;
switch (cb->mask[0])
{
case 'M':
case 'R':
matched = u->myuser != NULL && !(u->myuser->flags & MU_WAITAUTH) && (p == NULL || !match(p, entity(u->myuser)->name));
break;
case 'U':
matched = u->myuser == NULL;
break;
case 'j':
if (p == NULL)
continue;
target_c = channel_find(p);
if (target_c == NULL || (target_c->modes & (CMODE_PRIV | CMODE_SEC)))
continue;
matched = chanuser_find(target_c, u) != NULL;
break;
case 'r':
if (p == NULL)
continue;
matched = !match(p, u->gecos);
break;
case 'm':
matched = (!match(p, hostbuf) || !match(p, realbuf) || !match(p, ipbuf)) || !match_cidr(p, ipbuf);
break;
default:
continue;
}
if (matched)
return n;
}
}
static void cs_cmd_halfop(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
if (!ircd->uses_halfops)
{
command_fail(si, fault_noprivs, _("Your IRC server does not support halfops."));
return;
}
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "HALFOP");
command_fail(si, fault_needmoreparams, _("Syntax: HALFOP <#channel> [nickname]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_HALFOP))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
/* figure out who we're going to halfop */
if (!nick)
tu = si->su;
else
{
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
return;
}
}
if (is_internal_client(tu))
return;
/* SECURE check; we can skip this if sender == target, because we already verified */
if ((si->su != tu) && (mc->flags & MC_SECURE) && !chanacs_user_has_flag(mc, tu, CA_HALFOP) && !chanacs_user_has_flag(mc, tu, CA_AUTOHALFOP))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
command_fail(si, fault_noprivs, _("\2%s\2 has the SECURE option enabled, and \2%s\2 does not have appropriate access."), mc->name, tu->nick);
return;
}
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
return;
}
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, 'h', CLIENT_NAME(tu));
cu->modes |= ircd->halfops_mode;
if (si->c == NULL && tu != si->su)
change_notify(chansvs.nick, tu, "You have been halfopped on %s by %s", mc->name, get_source_name(si));
logcommand(si, CMDLOG_DO, "HALFOP: \2%s!%s@%s\2 on \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (!chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been halfopped on \2%s\2."), tu->nick, mc->name);
}
static void cs_cmd_down(sourceinfo_t *si, int parc, char *parv[])
{
chanuser_t *cu;
mychan_t *mc;
char *name = parv[0];
if (!name)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "DOWN");
command_fail(si, fault_needmoreparams, "Syntax: DOWN <#channel>");
return;
}
if (!(mc = mychan_find(name)))
{
command_fail(si, fault_nosuch_target, "\2%s\2 is not registered.", name);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, "\2%s\2 is closed.", name);
return;
}
if (!mc->chan)
{
command_fail(si, fault_nosuch_target, "\2%s\2 does not exist.", name);
return;
}
if (!si->su)
return; // needs to be done over IRC
cu = chanuser_find(mc->chan, si->su);
if (!cu)
{
command_fail(si, fault_nosuch_target, "You are not on \2%s\2.", mc->name);
return;
}
chanacs_user_flags(mc, cu->user);
// Don't check NOOP, because they are explicitly requesting status
if (ircd->uses_owner)
{
if (ircd->owner_mode & cu->modes)
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, ircd->owner_mchar[1], CLIENT_NAME(cu->user));
cu->modes &= ~ircd->owner_mode;
}
}
if (ircd->uses_protect)
{
if (ircd->protect_mode & cu->modes)
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, ircd->protect_mchar[1], CLIENT_NAME(cu->user));
cu->modes &= ~ircd->protect_mode;
}
}
if ((CSTATUS_OP & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, 'o', CLIENT_NAME(cu->user));
cu->modes &= ~CSTATUS_OP;
}
if (ircd->uses_halfops)
{
if (ircd->halfops_mode & cu->modes)
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, ircd->halfops_mchar[1], CLIENT_NAME(cu->user));
cu->modes &= ~ircd->halfops_mode;
}
}
if ((CSTATUS_VOICE & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, 'v', CLIENT_NAME(cu->user));
cu->modes &= ~CSTATUS_VOICE;
}
command_success_nodata(si, "Downed successfully on \2%s\2.", mc->name);
}
static void cs_cmd_topic(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *topic = parv[1];
mychan_t *mc;
channel_t *c;
const char *topicsetter;
time_t prevtopicts;
if (!chan || !topic)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "TOPIC");
command_fail(si, fault_needmoreparams, _("Syntax: TOPIC <#channel> <topic>"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
c = channel_find(chan);
if (!c)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), chan);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
if (!(chanacs_source_has_flag(mc, si, CA_TOPIC) || chanacs_source_has_flag(mc, si, CA_FOUNDER)))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (!validtopic(topic))
{
command_fail(si, fault_badparams, _("The new topic is invalid or too long."));
return;
}
if (si->su != NULL)
topicsetter = si->su->nick;
else if (si->smu != NULL)
topicsetter = entity(si->smu)->name;
else
topicsetter = "unknown";
prevtopicts = c->topicts;
handle_topic(c, topicsetter, CURRTIME, topic);
topic_sts(c, si->service->me, topicsetter, CURRTIME, prevtopicts, topic);
logcommand(si, CMDLOG_DO, "TOPIC: \2%s\2", mc->name);
if (si->su == NULL || !chanuser_find(c, si->su))
command_success_nodata(si, _("Topic set to \2%s\2 on \2%s\2."), topic, chan);
}
static void cs_cmd_unban(sourceinfo_t *si, int parc, char *parv[])
{
const char *channel = parv[0];
const char *target = parv[1];
channel_t *c = channel_find(channel);
mychan_t *mc = mychan_find(channel);
user_t *tu;
chanban_t *cb;
if (!channel)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "UNBAN");
command_fail(si, fault_needmoreparams, _("Syntax: UNBAN <#channel> <nickname|hostmask>"));
return;
}
if (!target)
{
if (si->su == NULL)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "UNBAN");
command_fail(si, fault_needmoreparams, _("Syntax: UNBAN <#channel> <nickname|hostmask>"));
return;
}
target = si->su->nick;
}
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), channel);
return;
}
if (!c)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), channel);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_REMOVE) &&
(si->su == NULL ||
!chanacs_source_has_flag(mc, si, CA_EXEMPT) ||
irccasecmp(target, si->su->nick)))
{
command_fail(si, fault_noprivs, STR_NOT_AUTHORIZED);
return;
}
if ((tu = user_find_named(target)))
{
mowgli_node_t *n, *tn;
char hostbuf2[BUFSIZE];
int count = 0;
snprintf(hostbuf2, BUFSIZE, "%s!%s@%s", tu->nick, tu->user, tu->vhost);
for (n = next_matching_ban(c, tu, 'b', c->bans.head); n != NULL; n = next_matching_ban(c, tu, 'b', tn))
{
tn = n->next;
cb = n->data;
logcommand(si, CMDLOG_DO, "UNBAN: \2%s\2 on \2%s\2 (for user \2%s\2)", cb->mask, mc->name, hostbuf2);
modestack_mode_param(chansvs.nick, c, MTYPE_DEL, cb->type, cb->mask);
chanban_delete(cb);
count++;
}
if (count > 0)
command_success_nodata(si, _("Unbanned \2%s\2 on \2%s\2 (%d ban%s removed)."),
target, channel, count, (count != 1 ? "s" : ""));
else
command_success_nodata(si, _("No bans found matching \2%s\2 on \2%s\2."), target, channel);
return;
}
else if ((cb = chanban_find(c, target, 'b')) != NULL || validhostmask(target))
{
if (cb)
{
modestack_mode_param(chansvs.nick, c, MTYPE_DEL, 'b', target);
chanban_delete(cb);
logcommand(si, CMDLOG_DO, "UNBAN: \2%s\2 on \2%s\2", target, mc->name);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("Unbanned \2%s\2 on \2%s\2."), target, channel);
}
else
command_fail(si, fault_nosuch_key, _("No such ban \2%s\2 on \2%s\2."), target, channel);
return;
}
else
{
command_fail(si, fault_badparams, _("Invalid nickname/hostmask provided: \2%s\2"), target);
command_fail(si, fault_badparams, _("Syntax: UNBAN <#channel> [nickname|hostmask]"));
return;
}
}
/* yeah, this should be fun. */
void channel_mode(channel_t *chan, uint8_t parc, char *parv[])
{
boolean_t matched = FALSE;
int i, parpos = 0, whatt = MTYPE_NUL;
char *pos = parv[0];
mychan_t *mc;
chanuser_t *cu = NULL;
if ((!pos) || (*pos == '\0'))
return;
if (!chan)
return;
/* SJOIN modes of 0 means no change */
if (*pos == '0')
return;
/* assumed that the parc is correct. ircd does, too. */
for (; *pos != '\0'; pos++)
{
matched = FALSE;
if (*pos == '+')
{
whatt = MTYPE_ADD;
continue;
}
if (*pos == '-')
{
whatt = MTYPE_DEL;
continue;
}
for (i = 0; mode_list[i].mode != '\0'; i++)
{
if (*pos == mode_list[i].mode)
{
matched = TRUE;
if (whatt == MTYPE_ADD)
chan->modes |= mode_list[i].value;
else
chan->modes &= ~mode_list[i].value;
break;
}
}
if (matched == TRUE)
continue;
for (i = 0; ignore_mode_list[i].mode != '\0'; i++)
{
if (*pos == ignore_mode_list[i].mode)
{
matched = TRUE;
parpos++;
break;
}
}
if (matched == TRUE)
continue;
for (i = 0; ignore_mode_list[i].mode != '\0'; i++)
{
if (*pos == ignore_mode_list[i].mode)
{
matched = TRUE;
parpos++;
break;
}
}
if (matched == TRUE)
continue;
if (*pos == 'l')
{
if (whatt == MTYPE_ADD)
{
chan->modes |= CMODE_LIMIT;
chan->limit = atoi(parv[++parpos]);
}
else
{
chan->modes &= ~CMODE_LIMIT;
chan->limit = 0;
}
continue;
}
if (*pos == 'k')
{
if (whatt == MTYPE_ADD)
{
chan->modes |= CMODE_KEY;
chan->key = sstrdup(parv[++parpos]);
}
else
{
chan->modes &= ~CMODE_KEY;
free(chan->key);
chan->key = NULL;
/* ratbox typically sends either the key or a `*' on -k, so you
* should eat a parameter
*/
parpos++;
}
continue;
}
for (i = 0; status_mode_list[i].mode != '\0'; i++)
{
if (*pos == status_mode_list[i].mode)
{
cu = chanuser_find(chan, user_find(parv[++parpos]));
if (cu == NULL)
{
slog(LG_ERROR, "channel_mode(): MODE %s %c%c %s", chan->name,
(whatt == MTYPE_ADD) ? '+' : '-', status_mode_list[i].value,
parv[parpos]);
matched = TRUE;
}
if (matched == TRUE)
break;
matched = TRUE;
if (whatt == MTYPE_ADD)
{
cu->modes |= status_mode_list[i].value;
/* see if they did something we have to undo */
if ((mc = mychan_find(cu->chan->name)))
{
myuser_t *mu = cu->user->myuser;
if ((MC_SECURE & mc->flags) && (status_mode_list[i].mode == 'o'))
{
char hostbuf[BUFSIZE];
snprintf(hostbuf, BUFSIZE, "%s!%s@%s",
cu->user->nick, cu->user->user, cu->user->host);
if ((!is_founder(mc, mu)) && (cu->user != svs.svs) &&
(!is_xop(mc, mu, (CA_AOP | CA_SOP))) &&
(!chanacs_find_host(mc, hostbuf, CA_AOP)))
{
/* they were opped and aren't on the list, deop them */
cmode(svs.nick, mc->name, "-o", cu->user->nick);
cu->modes &= ~status_mode_list[i].value;
}
}
}
}
else
{
if (cu->user == svs.svs)
{
slog(LG_DEBUG, "channel_mode(): deopped on %s, rejoining",
cu->chan->name);
/* we were deopped, part and join */
part(cu->chan->name, svs.nick);
join(cu->chan->name, svs.nick);
continue;
}
cu->modes &= ~status_mode_list[i].value;
}
break;
}
}
if (matched == TRUE)
continue;
slog(LG_DEBUG, "channel_mode(): mode %c not matched", *pos);
}
check_modes(mychan_find(chan->name));
}
static void cs_cmd_halfop(char *origin)
{
char *chan = strtok(NULL, " ");
char *nick = strtok(NULL, " ");
mychan_t *mc;
user_t *u, *tu;
chanuser_t *cu;
if (!ircd->uses_halfops)
{
notice(chansvs.nick, origin, "Your IRC server does not support halfops.");
return;
}
if (!chan)
{
notice(chansvs.nick, origin, STR_INSUFFICIENT_PARAMS, "HALFOP");
notice(chansvs.nick, origin, "Syntax: HALFOP <#channel> [nickname]");
return;
}
mc = mychan_find(chan);
if (!mc)
{
notice(chansvs.nick, origin, "\2%s\2 is not registered.", chan);
return;
}
u = user_find_named(origin);
if (!chanacs_user_has_flag(mc, u, CA_HALFOP))
{
notice(chansvs.nick, origin, "You are not authorized to perform this operation.");
return;
}
if (metadata_find(mc, METADATA_CHANNEL, "private:close:closer"))
{
notice(chansvs.nick, origin, "\2%s\2 is closed.", chan);
return;
}
/* figure out who we're going to halfop */
if (!nick)
tu = u;
else
{
if (!(tu = user_find_named(nick)))
{
notice(chansvs.nick, origin, "\2%s\2 is not online.", nick);
return;
}
}
if (is_internal_client(tu))
return;
/* SECURE check; we can skip this if sender == target, because we already verified */
if ((u != tu) && (mc->flags & MC_SECURE) && !chanacs_user_has_flag(mc, tu, CA_HALFOP) && !chanacs_user_has_flag(mc, tu, CA_AUTOHALFOP))
{
notice(chansvs.nick, origin, "You are not authorized to perform this operation.", mc->name);
notice(chansvs.nick, origin, "\2%s\2 has the SECURE option enabled, and \2%s\2 does not have appropriate access.", mc->name, tu->nick);
return;
}
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
notice(chansvs.nick, origin, "\2%s\2 is not on \2%s\2.", tu->nick, mc->name);
return;
}
modestack_mode_param(chansvs.nick, chan, MTYPE_ADD, 'h', CLIENT_NAME(tu));
cu->modes |= ircd->halfops_mode;
/* TODO: Add which username had access to perform the command */
if (tu != u)
notice(chansvs.nick, tu->nick, "You have been halfopped on %s by %s", mc->name, origin);
logcommand(chansvs.me, u, CMDLOG_SET, "%s HALFOP %s!%s@%s", mc->name, tu->nick, tu->user, tu->vhost);
if (!chanuser_find(mc->chan, u))
notice(chansvs.nick, origin, "\2%s\2 has been halfopped on \2%s\2.", tu->nick, mc->name);
}
static void cs_fcmd_dehalfop(char *origin, char *chan)
{
char *nick;
mychan_t *mc;
user_t *u, *tu;
chanuser_t *cu;
if (!ircd->uses_halfops)
{
notice(chansvs.nick, origin, "Your IRC server does not support halfops.");
return;
}
mc = mychan_find(chan);
if (!mc)
{
notice(chansvs.nick, origin, "\2%s\2 is not registered.", chan);
return;
}
u = user_find_named(origin);
if (!chanacs_user_has_flag(mc, u, CA_HALFOP))
{
notice(chansvs.nick, origin, "You are not authorized to perform this operation.");
return;
}
if (metadata_find(mc, METADATA_CHANNEL, "private:close:closer"))
{
notice(chansvs.nick, origin, "\2%s\2 is closed.", chan);
return;
}
/* figure out who we're going to dehalfop */
nick = strtok(NULL, " ");
do
{
if (!nick)
tu = u;
else
{
if (!(tu = user_find_named(nick)))
{
notice(chansvs.nick, origin, "\2%s\2 is not online.", nick);
continue;
}
}
if (is_internal_client(tu))
continue;
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
notice(chansvs.nick, origin, "\2%s\2 is not on \2%s\2.", tu->nick, mc->name);
continue;
}
modestack_mode_param(chansvs.nick, chan, MTYPE_DEL, 'h', CLIENT_NAME(tu));
cu->modes &= ~ircd->halfops_mode;
logcommand(chansvs.me, u, CMDLOG_SET, "%s DEHALFOP %s!%s@%s", mc->name, tu->nick, tu->user, tu->vhost);
} while ((nick = strtok(NULL, " ")) != NULL);
}
static mowgli_node_t *unreal_next_matching_ban(channel_t *c, user_t *u, int type, mowgli_node_t *first)
{
chanban_t *cb;
mowgli_node_t *n;
char hostbuf[NICKLEN+USERLEN+HOSTLEN];
char realbuf[NICKLEN+USERLEN+HOSTLEN];
char ipbuf[NICKLEN+USERLEN+HOSTLEN];
char *p;
bool matched;
int exttype;
channel_t *target_c;
snprintf(hostbuf, sizeof hostbuf, "%s!%s@%s", u->nick, u->user, u->vhost);
snprintf(realbuf, sizeof realbuf, "%s!%s@%s", u->nick, u->user, u->host);
/* will be nick!user@ if ip unknown, doesn't matter */
snprintf(ipbuf, sizeof ipbuf, "%s!%s@%s", u->nick, u->user, u->ip);
MOWGLI_ITER_FOREACH(n, first)
{
cb = n->data;
if (cb->type != type)
continue;
if ((!match(cb->mask, hostbuf) || !match(cb->mask, realbuf) || !match(cb->mask, ipbuf)))
return n;
if (cb->mask[0] == '~')
{
p = cb->mask + 1;
exttype = *p++;
if (exttype == '\0')
continue;
/* check parameter */
if (*p++ != ':')
p = NULL;
switch (exttype)
{
case 'a':
matched = u->myuser != NULL && !(u->myuser->flags & MU_WAITAUTH) && (p == NULL || !match(p, entity(u->myuser)->name));
break;
case 'c':
if (p == NULL)
continue;
target_c = channel_find(p);
if (target_c == NULL || (target_c->modes & (CMODE_PRIV | CMODE_SEC)))
continue;
matched = chanuser_find(target_c, u) != NULL;
break;
case 'r':
if (p == NULL)
continue;
matched = !match(p, u->gecos);
break;
case 'R':
matched = should_reg_umode(u);
break;
case 'q':
matched = !match(p, hostbuf) || !match(p, ipbuf);
break;
default:
continue;
}
if (matched)
return n;
}
}
static void cs_cmd_up(sourceinfo_t *si, int parc, char *parv[])
{
chanuser_t *cu;
mychan_t *mc;
char *name = parv[0];
char *chan = parv[0];
int fl;
if (!name)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "UP");
command_fail(si, fault_needmoreparams, "Syntax: UP <#channel>");
return;
}
if (!(mc = mychan_find(name)))
{
command_fail(si, fault_nosuch_target, "\2%s\2 is not registered.", name);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, "\2%s\2 is closed.", name);
return;
}
if (metadata_find(mc, "private:frozen:freezer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is frozen."), chan);
return;
}
if (!mc->chan)
{
command_fail(si, fault_nosuch_target, "\2%s\2 does not exist.", name);
return;
}
if (!si->su)
return; // needs to be done over IRC
if (chanacs_source_has_flag(mc, si, CA_SUSPENDED))
{
command_fail(si, fault_noprivs, _("Your access in %s is \2suspended\2."), chan);
return;
}
cu = chanuser_find(mc->chan, si->su);
if (!cu)
{
command_fail(si, fault_nosuch_target, "You are not on \2%s\2.", mc->name);
return;
}
fl = chanacs_user_flags(mc, cu->user);
// Don't check NOOP, because they are explicitly requesting status
if (ircd->uses_owner)
{
if (fl & CA_USEOWNER)
{
if (fl & CA_AUTOOP && !(ircd->owner_mode & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, ircd->owner_mchar[1], CLIENT_NAME(cu->user));
cu->modes |= ircd->owner_mode;
}
}
}
if (ircd->uses_protect)
{
if (fl & CA_USEPROTECT)
{
if (fl & CA_AUTOOP && !(ircd->protect_mode & cu->modes) && !(ircd->uses_owner && cu->modes & ircd->owner_mode))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, ircd->protect_mchar[1], CLIENT_NAME(cu->user));
cu->modes |= ircd->protect_mode;
}
}
}
if (fl & (CA_AUTOOP | CA_OP))
{
if (fl & CA_AUTOOP && !(CSTATUS_OP & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, 'o', CLIENT_NAME(cu->user));
cu->modes |= CSTATUS_OP;
}
}
if (ircd->uses_halfops)
{
if (fl & (CA_AUTOHALFOP | CA_HALFOP))
{
if (fl & CA_AUTOHALFOP && !(ircd->halfops_mode & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, ircd->halfops_mchar[1], CLIENT_NAME(cu->user));
cu->modes |= ircd->halfops_mode;
}
}
}
if (fl & (CA_AUTOVOICE | CA_VOICE))
{
if (fl & CA_AUTOVOICE && !(CSTATUS_VOICE & cu->modes))
{
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, 'v', CLIENT_NAME(cu->user));
cu->modes |= CSTATUS_VOICE;
}
}
command_success_nodata(si, "Upped successfully on \2%s\2.", mc->name);
}
static void cs_cmd_voice(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
char *nicklist;
char *strtokctx;
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "VOICE");
command_fail(si, fault_needmoreparams, _("Syntax: VOICE <#channel> [nickname] [...]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
nicklist = (!nick ? strdup(si->su->nick) : strdup(nick));
nick = strtok_r(nicklist, " ", &strtokctx);
do
{
if (invert_purpose(si, parc, chan, &nick, '-', &cs_cmd_devoice))
continue;
/* figure out who we're going to voice */
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
continue;
}
if (!chanacs_source_has_flag(mc, si, CA_VOICE) && (tu != si->su ||
!chanacs_source_has_flag(mc, si, CA_AUTOVOICE)))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
continue;
}
if (is_internal_client(tu))
continue;
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
continue;
}
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_ADD, 'v', CLIENT_NAME(tu));
cu->modes |= CSTATUS_VOICE;
if (si->c == NULL && tu != si->su)
change_notify(chansvs.nick, tu, "You have been voiced on %s by %s", mc->name, get_source_name(si));
logcommand(si, CMDLOG_DO, "VOICE: \2%s!%s@%s\2 on \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been voiced on \2%s\2."), tu->nick, mc->name);
} while ((nick = strtok_r(NULL, " ", &strtokctx)) != NULL);
free(nicklist);
}
static void cs_cmd_ban(sourceinfo_t *si, int parc, char *parv[])
{
char *channel = parv[0];
char *target = parv[1];
char *newtarget;
channel_t *c = channel_find(channel);
mychan_t *mc = mychan_find(channel);
user_t *tu;
if (!channel || !target)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "BAN");
command_fail(si, fault_needmoreparams, _("Syntax: BAN <#channel> <nickname|hostmask>"));
return;
}
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), channel);
return;
}
if (!c)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), channel);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_REMOVE))
{
command_fail(si, fault_noprivs, STR_NOT_AUTHORIZED);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), channel);
return;
}
if ((tu = user_find_named(target)))
{
char hostbuf[BUFSIZE];
hostbuf[0] = '\0';
mowgli_strlcat(hostbuf, "*!*@", BUFSIZE);
mowgli_strlcat(hostbuf, tu->vhost, BUFSIZE);
modestack_mode_param(chansvs.nick, c, MTYPE_ADD, 'b', hostbuf);
chanban_add(c, hostbuf, 'b');
logcommand(si, CMDLOG_DO, "BAN: \2%s\2 on \2%s\2 (for user \2%s!%s@%s\2)", hostbuf, mc->name, tu->nick, tu->user, tu->vhost);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("Banned \2%s\2 on \2%s\2."), target, channel);
return;
}
else if ((is_extban(target) && (newtarget = target)) || ((newtarget = pretty_mask(target)) && validhostmask(newtarget)))
{
modestack_mode_param(chansvs.nick, c, MTYPE_ADD, 'b', newtarget);
chanban_add(c, newtarget, 'b');
logcommand(si, CMDLOG_DO, "BAN: \2%s\2 on \2%s\2", newtarget, mc->name);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("Banned \2%s\2 on \2%s\2."), newtarget, channel);
return;
}
else
{
command_fail(si, fault_badparams, _("Invalid nickname/hostmask provided: \2%s\2"), target);
command_fail(si, fault_badparams, _("Syntax: BAN <#channel> <nickname|hostmask>"));
return;
}
}
static void cs_cmd_deowner(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *nick = parv[1];
mychan_t *mc;
user_t *tu;
chanuser_t *cu;
if (ircd->uses_owner == false)
{
command_fail(si, fault_noprivs, _("The IRCd software you are running does not support this feature."));
return;
}
if (!chan)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "DEOWNER");
command_fail(si, fault_needmoreparams, _("Syntax: DEOWNER <#channel> [nickname]"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_USEOWNER))
{
command_fail(si, fault_noprivs, _("You are not authorized to perform this operation."));
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
/* figure out who we're going to deop */
if (!nick)
tu = si->su;
else
{
if (!(tu = user_find_named(nick)))
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not online."), nick);
return;
}
}
if (is_internal_client(tu))
return;
cu = chanuser_find(mc->chan, tu);
if (!cu)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is not on \2%s\2."), tu->nick, mc->name);
return;
}
modestack_mode_param(chansvs.nick, mc->chan, MTYPE_DEL, ircd->owner_mchar[1], CLIENT_NAME(tu));
cu->modes &= ~CSTATUS_OWNER;
if (si->c == NULL && tu != si->su)
change_notify(chansvs.nick, tu, "You have been unset as owner on %s by %s", mc->name, get_source_name(si));
logcommand(si, CMDLOG_DO, "DEOWNER: \2%s!%s@%s\2 on \2%s\2", tu->nick, tu->user, tu->vhost, mc->name);
if (si->su == NULL || !chanuser_find(mc->chan, si->su))
command_success_nodata(si, _("\2%s\2 has been unset as owner on \2%s\2."), tu->nick, mc->name);
}
static mowgli_node_t *charybdis_next_matching_ban(channel_t *c, user_t *u, int type, mowgli_node_t *first)
{
chanban_t *cb;
mowgli_node_t *n;
char hostbuf[NICKLEN+USERLEN+HOSTLEN];
char realbuf[NICKLEN+USERLEN+HOSTLEN];
char ipbuf[NICKLEN+USERLEN+HOSTLEN];
char strippedmask[NICKLEN+USERLEN+HOSTLEN+CHANNELLEN+2];
char *p;
bool negate, matched;
int exttype;
channel_t *target_c;
snprintf(hostbuf, sizeof hostbuf, "%s!%s@%s", u->nick, u->user, u->vhost);
snprintf(realbuf, sizeof realbuf, "%s!%s@%s", u->nick, u->user, u->host);
/* will be nick!user@ if ip unknown, doesn't matter */
snprintf(ipbuf, sizeof ipbuf, "%s!%s@%s", u->nick, u->user, u->ip);
MOWGLI_ITER_FOREACH(n, first)
{
cb = n->data;
if (cb->type != type)
continue;
/*
* strip any banforwards from the mask. (SRV-73)
* charybdis itself doesn't support banforward but i don't feel like copying
* this stuff into ircd-seven and it is possible that charybdis may support them
* one day.
* --nenolod
*/
mowgli_strlcpy(strippedmask, cb->mask, sizeof strippedmask);
p = strrchr(strippedmask, '$');
if (p != NULL && p != strippedmask)
*p = 0;
if ((!match(strippedmask, hostbuf) || !match(strippedmask, realbuf) || !match(strippedmask, ipbuf) || !match_cidr(strippedmask, ipbuf)))
return n;
if (strippedmask[0] == '$')
{
p = strippedmask + 1;
negate = *p == '~';
if (negate)
p++;
exttype = *p++;
if (exttype == '\0')
continue;
/* check parameter */
if (*p++ != ':')
p = NULL;
switch (exttype)
{
case 'a':
matched = u->myuser != NULL && !(u->myuser->flags & MU_WAITAUTH) && (p == NULL || !match(p, entity(u->myuser)->name));
break;
case 'c':
if (p == NULL)
continue;
target_c = channel_find(p);
if (target_c == NULL || (target_c->modes & (CMODE_PRIV | CMODE_SEC)))
continue;
matched = chanuser_find(target_c, u) != NULL;
break;
case 'o':
matched = is_ircop(u);
break;
case 'r':
if (p == NULL)
continue;
matched = !match(p, u->gecos);
break;
case 's':
if (p == NULL)
continue;
matched = !match(p, u->server->name);
break;
case 'x':
if (p == NULL)
continue;
matched = extgecos_match(p, u);
break;
default:
continue;
}
if (negate ^ matched)
return n;
}
}
static void cs_cmd_topicprepend(sourceinfo_t *si, int parc, char *parv[])
{
char *chan = parv[0];
char *topic = parv[1];
mychan_t *mc;
char topicbuf[BUFSIZE];
channel_t *c;
const char *topicsetter;
time_t prevtopicts;
if (!chan || !topic)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "TOPICPREPEND");
command_fail(si, fault_needmoreparams, _("Syntax: TOPICPREPEND <#channel> <topic>"));
return;
}
mc = mychan_find(chan);
if (!mc)
{
command_fail(si, fault_nosuch_target, _("Channel \2%s\2 is not registered."), chan);
return;
}
c = channel_find(chan);
if (!c)
{
command_fail(si, fault_nosuch_target, _("\2%s\2 is currently empty."), chan);
return;
}
if (!chanacs_source_has_flag(mc, si, CA_TOPIC))
{
command_fail(si, fault_noprivs, STR_NOT_AUTHORIZED);
return;
}
if (metadata_find(mc, "private:close:closer"))
{
command_fail(si, fault_noprivs, _("\2%s\2 is closed."), chan);
return;
}
topicbuf[0] = '\0';
if (c->topic)
{
mowgli_strlcpy(topicbuf, topic, BUFSIZE);
mowgli_strlcat(topicbuf, " | ", BUFSIZE);
mowgli_strlcat(topicbuf, c->topic, BUFSIZE);
}
else
mowgli_strlcpy(topicbuf, topic, BUFSIZE);
if (!validtopic(topicbuf))
{
command_fail(si, fault_badparams, _("The new topic is invalid or too long."));
return;
}
if (si->su != NULL)
topicsetter = si->su->nick;
else if (si->smu != NULL)
topicsetter = entity(si->smu)->name;
else
topicsetter = "unknown";
prevtopicts = c->topicts;
handle_topic(c, topicsetter, CURRTIME, topicbuf);
topic_sts(c, si->service->me, topicsetter, CURRTIME, prevtopicts, topicbuf);
logcommand(si, CMDLOG_DO, "TOPICPREPEND: \2%s\2", mc->name);
if (si->su == NULL || !chanuser_find(c, si->su))
command_success_nodata(si, _("Topic set to \2%s\2 on \2%s\2."), c->topic, chan);
}
