ircd-ratbox/ircd-ratbox-3.0.10/contrib/m_flags.c

459 lines
12 KiB
C
Raw Normal View History

2023-08-20 17:26:10 +00:00
/*
* m_flags.c: Implements comstud-style mode flags.
*
* Copyright 2002 by W. Campbell and the ircd-hybrid 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.
*
* $Id: m_flags.c 28681 2015-10-02 16:49:39Z androsyn $
*/
/* List of ircd includes from ../include/ */
#include "stdinc.h"
#include "ratbox_lib.h"
#include "struct.h"
#include "client.h"
#include "common.h"
#include "ircd.h"
#include "match.h"
#include "numeric.h"
#include "s_conf.h"
#include "s_log.h"
#include "s_serv.h"
#include "send.h"
#include "parse.h"
#include "modules.h"
#include "s_user.h" /* send_umode_out() */
#include "s_newconf.h"
static int m_flags(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int mo_flags(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static char *set_flags_to_string(struct Client *client_p);
static char *unset_flags_to_string(struct Client *client_p);
struct Message test_msgtab = {
"FLAGS", 0, 0, 0, MFLG_SLOW,
{mg_unreg, {m_flags, 0}, {m_flags, 0}, mg_ignore, mg_ignore, {mo_flags, 0}}
};
mapi_clist_av1 test_clist[] = { &test_msgtab, NULL };
DECLARE_MODULE_AV1(test, NULL, NULL, test_clist, NULL, NULL, "$Revision: 28681 $");
/* FLAGS requires it's own mini parser, since the last parameter in it can
** contain a number of FLAGS. CS handles FLAGS mode1 mode2 OR
** FLAGS :mode1 mode2, but not both mixed.
**
** The best way to match a flag to a mode is with a simple table
*/
struct FlagTable
{
const char *name;
int mode;
int oper;
};
/* *INDENT-OFF* */
static struct FlagTable flag_table[] = {
/* name mode it represents oper only? */
#if 0
/* This one is special...controlled via an oper block option */
{ "OWALLOPS", UMODE_OPERWALL, 1 },
#endif
{ "SWALLOPS", UMODE_WALLOP, 0 },
{ "STATSNOTICES", UMODE_SPY, 1 },
/* We don't have a separate OKILL and SKILL modes */
{ "OKILLS", UMODE_SERVNOTICE, 0 },
{ "SKILLS", UMODE_SKILL, 0 },
{ "SNOTICES", UMODE_SERVNOTICE, 0 },
/* We don't have separate client connect and disconnect modes */
{ "CLICONNECTS", UMODE_CCONN, 1 },
{ "CLIDISCONNECTS", UMODE_CCONN, 1 },
/* I'm taking a wild guess here... */
{ "THROTTLES", UMODE_REJ, 1 },
#if 0
/* This one is special...controlled via an oper block option */
{ "NICKCHANGES", UMODE_NCHANGE, 1 },
/* NICKCHANGES must be checked for separately */
#endif
/* I'm assuming this is correct... */
{ "IPMISMATCHES", UMODE_UNAUTH, 1 },
{ "LWALLOPS", UMODE_LOCOPS, 1 },
/* These aren't separate on Hybrid */
{ "CONNECTS", UMODE_EXTERNAL, 1 },
{ "SQUITS", UMODE_EXTERNAL, 1 },
/* Now we have our Hybrid specific flags */
{ "FULL", UMODE_FULL, 1 },
/* Not in CS, but we might as well put it here */
{ "INVISIBLE", UMODE_INVISIBLE, 0 },
{ "BOTS", UMODE_BOTS, 1 },
{ "CALLERID", UMODE_CALLERID, 0 },
{ "UNAUTH", UMODE_UNAUTH, 1 },
{ "DEBUG", UMODE_DEBUG, 1 },
{ NULL, 0, 0}
};
/* *INDENT-ON* */
/* We won't control CALLERID or INVISIBLE in here */
#define FL_ALL_USER_FLAGS (UMODE_WALLOP | UMODE_SKILL | UMODE_SERVNOTICE )
/* and we don't control NCHANGES here either */
#define FL_ALL_OPER_FLAGS (FL_ALL_USER_FLAGS | UMODE_CCONN | UMODE_REJ |\
UMODE_FULL | UMODE_SPY | UMODE_DEBUG |\
UMODE_BOTS | UMODE_EXTERNAL |\
UMODE_UNAUTH | UMODE_LOCOPS )
/*
** m_flags
** parv[0] = sender prefix
** parv[1] = parameter
*/
static int
m_flags(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
int i, j;
int isadd;
int setflags;
int isgood;
char *p;
char *flag;
if(parc < 2)
{
/* Generate a list of what flags you have and what you are missing,
** and send it to the user
*/
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
return 1;
}
/* Preserve the current flags */
setflags = source_p->umodes;
/* XXX - change this to support a multiple last parameter like ISON */
for(i = 1; i < parc; i++)
{
char *s = LOCAL_COPY(parv[i]);
for(flag = rb_strtok_r(s, " ", &p); flag; flag = rb_strtok_r(NULL, " ", &p))
{
/* We default to being in ADD mode */
isadd = 1;
/* We default to being in BAD mode */
isgood = 0;
if(!isalpha(flag[0]))
{
if(flag[0] == '-')
isadd = 0;
else if(flag[0] == '+')
isadd = 1;
flag++;
}
/* support ALL here */
if(!irccmp(flag, "ALL"))
{
if(isadd)
source_p->umodes |= FL_ALL_USER_FLAGS;
else
source_p->umodes &= ~FL_ALL_USER_FLAGS;
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
send_umode_out(client_p, source_p, setflags);
return 1;
}
for(j = 0; flag_table[j].name; j++)
{
if(!flag_table[j].oper && !irccmp(flag, flag_table[j].name))
{
if(isadd)
source_p->umodes |= flag_table[j].mode;
else
source_p->umodes &= ~(flag_table[j].mode);
isgood = 1;
continue;
}
}
/* This for ended without matching a valid FLAG, here is where
** I want to operate differently than ircd-comstud, and just ignore
** the invalid flag, send a warning and go on.
*/
if(!isgood)
sendto_one(source_p, ":%s NOTICE %s :Invalid FLAGS: %s (IGNORING)",
me.name, parv[0], flag);
}
}
/* All done setting the flags, print the notices out to the user
** telling what flags they have and what flags they are missing
*/
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
send_umode_out(client_p, source_p, setflags);
return 0;
}
/*
** mo_flags
** parv[0] = sender prefix
** parv[1] = parameter
*/
static int
mo_flags(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
int i, j;
int isadd;
int setflags;
int isgood;
char *p;
char *flag;
if(parc < 2)
{
/* Generate a list of what flags you have and what you are missing,
** and send it to the user
*/
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
return 1;
}
/* Preserve the current flags */
setflags = source_p->umodes;
/* XXX - change this to support a multiple last parameter like ISON */
for(i = 1; i < parc; i++)
{
char *s = LOCAL_COPY(parv[i]);
for(flag = rb_strtok_r(s, " ", &p); flag; flag = rb_strtok_r(NULL, " ", &p))
{
/* We default to being in ADD mode */
isadd = 1;
/* We default to being in BAD mode */
isgood = 0;
if(!isalpha(flag[0]))
{
if(flag[0] == '-')
isadd = 0;
else if(flag[0] == '+')
isadd = 1;
flag++;
}
/* support ALL here */
if(!irccmp(flag, "ALL"))
{
if(isadd)
source_p->umodes |= FL_ALL_OPER_FLAGS;
else
source_p->umodes &= ~FL_ALL_OPER_FLAGS;
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
send_umode_out(client_p, source_p, setflags);
return 1;
}
if(!irccmp(flag, "NICKCHANGES"))
{
if(!IsOperN(source_p))
{
sendto_one(source_p,
":%s NOTICE %s :*** You need oper and N flag for +n",
me.name, parv[0]);
continue;
}
if(isadd)
source_p->umodes |= UMODE_NCHANGE;
else
source_p->umodes &= ~UMODE_NCHANGE;
isgood = 1;
continue;
}
if(!irccmp(flag, "OWALLOPS"))
{
if(!IsOperOperwall(source_p))
{
sendto_one(source_p,
":%s NOTICE %s :*** You need oper and operwall flag for +z",
me.name, parv[0]);
continue;
}
if(isadd)
source_p->umodes |= UMODE_OPERWALL;
else
source_p->umodes &= ~UMODE_OPERWALL;
isgood = 1;
continue;
}
for(j = 0; flag_table[j].name; j++)
{
if(!irccmp(flag, flag_table[j].name))
{
if(isadd)
source_p->umodes |= flag_table[j].mode;
else
source_p->umodes &= ~(flag_table[j].mode);
isgood = 1;
continue;
}
}
/* This for ended without matching a valid FLAG, here is where
** I want to operate differently than ircd-comstud, and just ignore
** the invalid flag, send a warning and go on.
*/
if(!isgood)
sendto_one(source_p, ":%s NOTICE %s :Invalid FLAGS: %s (IGNORING)",
me.name, parv[0], flag);
}
}
/* All done setting the flags, print the notices out to the user
** telling what flags they have and what flags they are missing
*/
sendto_one(source_p, ":%s NOTICE %s :Current flags:%s",
me.name, parv[0], set_flags_to_string(source_p));
sendto_one(source_p, ":%s NOTICE %s :Current missing flags:%s",
me.name, parv[0], unset_flags_to_string(source_p));
send_umode_out(client_p, source_p, setflags);
return 0;
}
static char *
set_flags_to_string(struct Client *client_p)
{
/* XXX - list all flags that we have set on the client */
static char setflags[BUFSIZE + 1];
int i;
/* Clear it to begin with, we'll be doing a lot of rb_sprintf's */
setflags[0] = '\0';
/* Unlike unset_flags_to_string(), we don't have to care about oper
** flags and not showing them
*/
if(client_p->umodes & UMODE_OPERWALL)
{
rb_sprintf(setflags, "%s %s", setflags, "OWALLOPS");
}
for(i = 0; flag_table[i].name; i++)
{
if(client_p->umodes & flag_table[i].mode)
{
rb_sprintf(setflags, "%s %s", setflags, flag_table[i].name);
}
}
#if 0
if(IsOper(client_p) && IsOperN(client_p))
{
#endif
/* You can only be set +NICKCHANGES if you are an oper and
** IsOperN(client_p) is true
*/
if(client_p->umodes & UMODE_NCHANGE)
{
rb_sprintf(setflags, "%s %s", setflags, "NICKCHANGES");
}
#if 0
}
#endif
return setflags;
}
static char *
unset_flags_to_string(struct Client *client_p)
{
/* Inverse of above */
/* XXX - list all flags that we do NOT have set on the client */
static char setflags[BUFSIZE + 1];
int i, isoper;
/* Clear it to begin with, we'll be doing a lot of rb_sprintf's */
setflags[0] = '\0';
if(IsOper(client_p))
isoper = 1;
else
isoper = 0;
if(IsOper(client_p) && IsOperOperwall(client_p))
{
if(!(client_p->umodes & UMODE_OPERWALL))
{
rb_sprintf(setflags, "%s %s", setflags, "OWALLOPS");
}
}
for(i = 0; flag_table[i].name; i++)
{
if(!(client_p->umodes & flag_table[i].mode))
{
if(!isoper && flag_table[i].oper)
continue;
rb_sprintf(setflags, "%s %s", setflags, flag_table[i].name);
}
}
if(IsOper(client_p) && IsOperN(client_p))
{
if(!(client_p->umodes & UMODE_NCHANGE))
{
rb_sprintf(setflags, "%s %s", setflags, "NICKCHANGES");
}
}
return setflags;
}