/*
* IRC - Internet Relay Chat, ircd/features.c
* Copyright (C) 2000 Kevin L. Mitchell <klmitch@mit.edu>
*
* 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 1, 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., 675 Mass Ave, Cambridge, MA 02139, USA.
*
* $Id: ircd_features.c,v 1.15.2.13 2004/01/11 00:23:32 isomer Exp $
*/
#include "config.h"
#include "ircd_features.h"
#include "channel.h" /* list_set_default */
#include "class.h"
#include "client.h"
#include "hash.h"
#include "ircd.h"
#include "ircd_alloc.h"
#include "ircd_log.h"
#include "ircd_reply.h"
#include "ircd_string.h"
#include "match.h"
#include "motd.h"
#include "msg.h"
#include "numeric.h"
#include "numnicks.h"
#include "random.h" /* random_seed_set */
#include "s_bsd.h"
#include "s_debug.h"
#include "s_misc.h"
#include "s_stats.h"
#include "send.h"
#include "struct.h"
#include "support.h"
#include "sys.h" /* FALSE bleah */
#include "whowas.h" /* whowas_realloc */
#include <assert.h>
#include <stdlib.h>
#include <string.h>
/* List of log output types that can be set */
static struct LogTypes {
char *type;
int (*set)(const char *, const char *);
char *(*get)(const char *);
} logTypes[] = {
{ "FILE", log_set_file, log_get_file },
{ "FACILITY", log_set_facility, log_get_facility },
{ "SNOMASK", log_set_snomask, log_get_snomask },
{ "LEVEL", log_set_level, log_get_level },
{ 0, 0, 0 }
};
/* Look up a struct LogType given the type string */
static struct LogTypes *
feature_log_desc(struct Client* from, const char *type)
{
int i;
assert(0 != type);
for (i = 0; logTypes[i].type; i++) /* find appropriate descriptor */
if (!ircd_strcmp(type, logTypes[i].type))
return &logTypes[i];
Debug((DEBUG_ERROR, "Unknown log feature type \"%s\"", type));
if (from) /* send an error; if from is NULL, called from conf parser */
send_reply(from, ERR_BADLOGTYPE, type);
else
log_write(LS_CONFIG, L_ERROR, 0, "Unknown log feature type \"%s\"", type);
return 0; /* not found */
}
/* Set the value of a log output type for a log subsystem */
static int
feature_log_set(struct Client* from, const char* const* fields, int count)
{
struct LogTypes *desc;
char *subsys;
if (count < 2) { /* set default facility */
if (log_set_default(count < 1 ? 0 : fields[0])) {
assert(count >= 1); /* should always accept default */
if (from) /* send an error */
send_reply(from, ERR_BADLOGVALUE, fields[0]);
else
log_write(LS_CONFIG, L_ERROR, 0,
"Bad value \"%s\" for default facility", fields[0]);
} else
return count < 1 ? -1 : 1; /* tell feature to set or clear mark */
} else if (!(subsys = log_canon(fields[0]))) { /* no such subsystem */
if (from) /* send an error */
send_reply(from, ERR_BADLOGSYS, fields[0]);
else
log_write(LS_CONFIG, L_ERROR, 0,
"No such logging subsystem \"%s\"", fields[0]);
} else if ((desc = feature_log_desc(from, fields[1]))) { /* set value */
if ((*desc->set)(fields[0], count < 3 ? 0 : fields[2])) {
assert(count >= 3); /* should always accept default */
if (from) /* send an error */
send_reply(from, ERR_BADLOGVALUE, fields[2]);
else
log_write(LS_CONFIG, L_ERROR, 0,
"Bad value \"%s\" for log type %s (subsystem %s)",
fields[2], desc->type, subsys);
}
}
return 0;
}
/* reset a log type for a subsystem to its default value */
static int
feature_log_reset(struct Client* from, const char* const* fields, int count)
{
struct LogTypes *desc;
char *subsys;
assert(0 != from); /* Never called by the .conf parser */
if (count < 1) { /* reset default facility */
log_set_default(0);
return -1; /* unmark this entry */
} else if (count < 2)
need_more_params(from, "RESET");
else if (!(subsys = log_canon(fields[0]))) /* no such subsystem */
send_reply(from, ERR_BADLOGSYS, fields[0]);
else if ((desc = feature_log_desc(from, fields[1]))) /* reset value */
(*desc->set)(fields[0], 0); /* default should always be accepted */
return 0;
}
/* report the value of a log setting */
static void
feature_log_get(struct Client* from, const char* const* fields, int count)
{
struct LogTypes *desc;
char *value, *subsys;
assert(0 != from); /* never called by .conf parser */
if (count < 1) /* return default facility */
send_reply(from, SND_EXPLICIT | RPL_FEATURE, ":Log facility: %s",
log_get_default());
else if (count < 2)
need_more_params(from, "GET");
else if (!(subsys = log_canon(fields[0]))) { /* no such subsystem */
send_reply(from, ERR_BADLOGSYS, fields[0]);
} else if ((desc = feature_log_desc(from, fields[1]))) {
if ((value = (*desc->get)(fields[0]))) /* send along value */
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":Log %s for subsystem %s: %s", desc->type, subsys,
(*desc->get)(subsys));
else
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":No log %s is set for subsystem %s", desc->type, subsys);
}
}
/* sets a feature to the given value */
typedef int (*feat_set_call)(struct Client*, const char* const*, int);
/* gets the value of a feature */
typedef void (*feat_get_call)(struct Client*, const char* const*, int);
/* callback to notify of a feature's change */
typedef void (*feat_notify_call)(void);
/* unmarks all sub-feature values prior to reading .conf */
typedef void (*feat_unmark_call)(void);
/* resets to defaults all currently unmarked values */
typedef int (*feat_mark_call)(int);
/* reports features as a /stats f list */
typedef void (*feat_report_call)(struct Client*, int);
#define FEAT_NONE 0x0000 /* no value */
#define FEAT_INT 0x0001 /* set if entry contains an integer value */
#define FEAT_BOOL 0x0002 /* set if entry contains a boolean value */
#define FEAT_STR 0x0003 /* set if entry contains a string value */
#define FEAT_MASK 0x000f /* possible value types */
#define FEAT_MARK 0x0010 /* set if entry has been changed */
#define FEAT_NULL 0x0020 /* NULL string is permitted */
#define FEAT_CASE 0x0040 /* string is case-sensitive */
#define FEAT_OPER 0x0100 /* set to display only to opers */
#define FEAT_MYOPER 0x0200 /* set to display only to local opers */
#define FEAT_NODISP 0x0400 /* feature must never be displayed */
#define FEAT_READ 0x1000 /* feature is read-only (for now, perhaps?) */
static struct FeatureDesc {
enum Feature feat; /* feature identifier */
char* type; /* string describing type */
unsigned int flags; /* flags for feature */
int v_int; /* integer value */
int def_int; /* default value */
char* v_str; /* string value */
char* def_str; /* default value */
feat_set_call set; /* set feature values */
feat_set_call reset; /* reset feature values to defaults */
feat_get_call get; /* get feature values */
feat_notify_call notify; /* notify of value change */
feat_unmark_call unmark; /* unmark all feature change values */
feat_mark_call mark; /* reset to defaults all unchanged features */
feat_report_call report; /* report feature values */
} features[] = {
#define F_N(type, flags, set, reset, get, notify, unmark, mark, report) \
{ FEAT_ ## type, #type, FEAT_NONE | (flags), 0, 0, 0, 0, \
(set), (reset), (get), (notify), (unmark), (mark), (report) }
#define F_I(type, flags, v_int, notify) \
{ FEAT_ ## type, #type, FEAT_INT | (flags), 0, (v_int), 0, 0, \
0, 0, 0, (notify), 0, 0, 0 }
#define F_B(type, flags, v_int, notify) \
{ FEAT_ ## type, #type, FEAT_BOOL | (flags), 0, (v_int), 0, 0, \
0, 0, 0, (notify), 0, 0, 0 }
#define F_S(type, flags, v_str, notify) \
{ FEAT_ ## type, #type, FEAT_STR | (flags), 0, 0, 0, (v_str), \
0, 0, 0, (notify), 0, 0, 0 }
/* Misc. features */
F_N(LOG, FEAT_MYOPER, feature_log_set, feature_log_reset, feature_log_get,
0, log_feature_unmark, log_feature_mark, log_feature_report),
F_S(DOMAINNAME, 0, DOMAINNAME, 0),
F_B(RELIABLE_CLOCK, 0, 0, 0),
F_I(BUFFERPOOL, 0, 27000000, 0),
F_B(HAS_FERGUSON_FLUSHER, 0, 0, 0),
F_I(CLIENT_FLOOD, 0, 1024, 0),
F_I(SERVER_PORT, FEAT_OPER, 4400, 0),
F_B(NODEFAULTMOTD, 0, 1, 0),
F_S(MOTD_BANNER, FEAT_NULL, 0, 0),
F_S(PROVIDER, FEAT_NULL, 0, 0),
F_B(KILL_IPMISMATCH, FEAT_OPER, 0, 0),
F_B(IDLE_FROM_MSG, 0, 1, 0),
F_B(HUB, 0, 0, 0),
F_B(WALLOPS_OPER_ONLY, 0, 0, 0),
F_B(NODNS, 0, 0, 0),
F_N(RANDOM_SEED, FEAT_NODISP, random_seed_set, 0, 0, 0, 0, 0, 0),
F_S(DEFAULT_LIST_PARAM, FEAT_NULL, 0, list_set_default),
F_I(NICKNAMEHISTORYLENGTH, 0, 800, whowas_realloc),
F_B(HOST_HIDING, 0, 1, 0),
F_S(HIDDEN_HOST, FEAT_CASE, "users.undernet.org", 0),
F_S(HIDDEN_IP, 0, "127.0.0.1", 0),
F_B(AUTOHIDE, 0, 1, 0),
F_B(CONNEXIT_NOTICES, 0, 0, 0),
/* features that probably should not be touched */
F_I(KILLCHASETIMELIMIT, 0, 30, 0),
F_I(MAXCHANNELSPERUSER, 0, 10, 0),
F_I(NICKLEN, 0, 9, 0),
F_I(AVBANLEN, 0, 40, 0),
F_I(MAXBANS, 0, 45, 0),
F_I(MAXSILES, 0, 15, 0),
F_I(HANGONGOODLINK, 0, 300, 0),
F_I(HANGONRETRYDELAY, 0, 10, 0),
F_I(CONNECTTIMEOUT, 0, 90, 0),
F_I(TIMESEC, 0, 60, 0),
F_I(MAXIMUM_LINKS, 0, 1, init_class), /* reinit class 0 as needed */
F_I(PINGFREQUENCY, 0, 120, init_class),
F_I(CONNECTFREQUENCY, 0, 600, init_class),
F_I(DEFAULTMAXSENDQLENGTH, 0, 40000, init_class),
F_I(GLINEMAXUSERCOUNT, 0, 20, 0),
F_I(SOCKSENDBUF, 0, 0, 0),
F_I(SOCKRECVBUF, 0, 0, 0),
F_I(IPCHECK_CLONE_LIMIT, 0, 4, 0),
F_I(IPCHECK_CLONE_PERIOD, 0, 40, 0),
F_I(IPCHECK_CLONE_DELAY, 0, 600, 0),
/* Some misc. default paths */
F_S(MPATH, FEAT_CASE | FEAT_MYOPER, "ircd.motd", motd_init),
F_S(RPATH, FEAT_CASE | FEAT_MYOPER, "remote.motd", motd_init),
F_S(PPATH, FEAT_CASE | FEAT_MYOPER | FEAT_READ, "ircd.pid", 0),
/* Networking features */
F_B(VIRTUAL_HOST, 0, 0, 0),
F_I(TOS_SERVER, 0, 0x08, 0),
F_I(TOS_CLIENT, 0, 0x08, 0),
F_I(POLLS_PER_LOOP, 0, 200, 0),
F_I(IRCD_RES_RETRIES, 0, 2, 0),
F_I(IRCD_RES_TIMEOUT, 0, 4, 0),
F_I(AUTH_TIMEOUT, 0, 9, 0),
/* features that affect all operators */
F_B(CRYPT_OPER_PASSWORD, FEAT_MYOPER | FEAT_READ, 1, 0),
F_B(OPER_NO_CHAN_LIMIT, 0, 1, 0),
F_B(OPER_MODE_LCHAN, 0, 1, 0),
F_B(OPER_WALK_THROUGH_LMODES, 0, 0, 0),
F_B(NO_OPER_DEOP_LCHAN, 0, 0, 0),
F_B(SHOW_INVISIBLE_USERS, 0, 1, 0),
F_B(SHOW_ALL_INVISIBLE_USERS, 0, 1, 0),
F_B(UNLIMIT_OPER_QUERY, 0, 0, 0),
F_B(LOCAL_KILL_ONLY, 0, 0, 0),
F_B(CONFIG_OPERCMDS, 0, 0, 0),
/* features that affect global opers on this server */
F_B(OPER_KILL, 0, 1, 0),
F_B(OPER_REHASH, 0, 1, 0),
F_B(OPER_RESTART, 0, 1, 0),
F_B(OPER_DIE, 0, 1, 0),
F_B(OPER_GLINE, 0, 1, 0),
F_B(OPER_LGLINE, 0, 1, 0),
F_B(OPER_JUPE, 0, 1, 0),
F_B(OPER_LJUPE, 0, 1, 0),
F_B(OPER_OPMODE, 0, 1, 0),
F_B(OPER_LOPMODE, 0, 1, 0),
F_B(OPER_FORCE_OPMODE, 0, 1, 0),
F_B(OPER_FORCE_LOPMODE, 0, 1, 0),
F_B(OPER_BADCHAN, 0, 0, 0),
F_B(OPER_LBADCHAN, 0, 0, 0),
F_B(OPER_SET, 0, 0, 0),
F_B(OPERS_SEE_IN_SECRET_CHANNELS, 0, 1, 0),
F_B(OPER_WIDE_GLINE, 0, 1, 0),
/* features that affect local opers on this server */
F_B(LOCOP_KILL, 0, 1, 0),
F_B(LOCOP_REHASH, 0, 1, 0),
F_B(LOCOP_RESTART, 0, 0, 0),
F_B(LOCOP_DIE, 0, 0, 0),
F_B(LOCOP_LGLINE, 0, 1, 0),
F_B(LOCOP_LJUPE, 0, 1, 0),
F_B(LOCOP_LOPMODE, 0, 1, 0),
F_B(LOCOP_FORCE_LOPMODE, 0, 1, 0),
F_B(LOCOP_LBADCHAN, 0, 0, 0),
F_B(LOCOP_SET, 0, 0, 0),
F_B(LOCOP_SEE_IN_SECRET_CHANNELS, 0, 0, 0),
F_B(LOCOP_WIDE_GLINE, 0, 0, 0),
/* HEAD_IN_SAND Features */
F_B(HIS_SNOTICES, 0, 1, 0),
F_B(HIS_SNOTICES_OPER_ONLY, 0, 1, 0),
F_B(HIS_DESYNCS, 0, 1, 0),
F_B(HIS_DEBUG_OPER_ONLY, 0, 1, 0),
F_B(HIS_WALLOPS, 0, 1, 0),
F_B(HIS_MAP, 0, 1, 0),
F_B(HIS_LINKS, 0, 1, 0),
F_B(HIS_TRACE, 0, 1, 0),
F_B(HIS_STATS_l, 0, 1, 0),
F_B(HIS_STATS_c, 0, 1, 0),
F_B(HIS_STATS_g, 0, 1, 0),
F_B(HIS_STATS_h, 0, 1, 0),
F_B(HIS_STATS_k, 0, 1, 0),
F_B(HIS_STATS_f, 0, 1, 0),
F_B(HIS_STATS_i, 0, 1, 0),
F_B(HIS_STATS_j, 0, 1, 0),
F_B(HIS_STATS_M, 0, 1, 0),
F_B(HIS_STATS_m, 0, 1, 0),
F_B(HIS_STATS_o, 0, 1, 0),
F_B(HIS_STATS_p, 0, 1, 0),
F_B(HIS_STATS_q, 0, 1, 0),
F_B(HIS_STATS_r, 0, 1, 0),
F_B(HIS_STATS_d, 0, 1, 0),
F_B(HIS_STATS_e, 0, 1, 0),
F_B(HIS_STATS_t, 0, 1, 0),
F_B(HIS_STATS_T, 0, 1, 0),
F_B(HIS_STATS_u, 0, 0, 0),
F_B(HIS_STATS_U, 0, 1, 0),
F_B(HIS_STATS_v, 0, 1, 0),
F_B(HIS_STATS_w, 0, 0, 0),
F_B(HIS_STATS_x, 0, 1, 0),
F_B(HIS_STATS_y, 0, 1, 0),
F_B(HIS_STATS_z, 0, 1, 0),
F_B(HIS_WHOIS_SERVERNAME, 0, 1, 0),
F_B(HIS_WHOIS_IDLETIME, 0, 1, 0),
F_B(HIS_WHO_SERVERNAME, 0, 1, 0),
F_B(HIS_WHO_HOPCOUNT, 0, 1, 0),
F_B(HIS_BANWHO, 0, 1, 0),
F_B(HIS_KILLWHO, 0, 1, 0),
F_B(HIS_REWRITE, 0, 1, 0),
F_I(HIS_REMOTE, 0, 1, 0),
F_B(HIS_NETSPLIT, 0, 1, 0),
F_S(HIS_SERVERNAME, 0, "*.undernet.org", 0),
F_S(HIS_SERVERINFO, 0, "The Undernet Underworld", 0),
F_S(HIS_URLSERVERS, 0, "http://www.undernet.org/servers.php", 0),
/* Misc. random stuff */
F_S(NETWORK, 0, "UnderNet", 0),
F_S(URL_CLIENTS, 0, "ftp://ftp.undernet.org/pub/irc/clients", 0),
#undef F_S
#undef F_B
#undef F_I
#undef F_N
{ FEAT_LAST_F, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }
};
/* Given a feature's identifier, look up the feature descriptor */
static struct FeatureDesc *
feature_desc(struct Client* from, const char *feature)
{
int i;
assert(0 != feature);
for (i = 0; features[i].type; i++) /* find appropriate descriptor */
if (!strcmp(feature, features[i].type))
return &features[i];
Debug((DEBUG_ERROR, "Unknown feature \"%s\"", feature));
if (from) /* report an error */
send_reply(from, ERR_NOFEATURE, feature);
else
log_write(LS_CONFIG, L_ERROR, 0, "Unknown feature \"%s\"", feature);
return 0; /* not found */
}
/* Given a feature vector string, set the value of a feature */
int
feature_set(struct Client* from, const char* const* fields, int count)
{
int i, change = 0, tmp;
const char *t_str;
struct FeatureDesc *feat;
if (from && !HasPriv(from, PRIV_SET))
return send_reply(from, ERR_NOPRIVILEGES);
if (count < 1) {
if (from) /* report an error in the number of arguments */
need_more_params(from, "SET");
else
log_write(LS_CONFIG, L_ERROR, 0, "Not enough fields in F line");
} else if ((feat = feature_desc(from, fields[0]))) { /* find feature */
if (from && feat->flags & FEAT_READ)
return send_reply(from, ERR_NOFEATURE, fields[0]);
switch (feat->flags & FEAT_MASK) {
case FEAT_NONE:
if (feat->set && (i = (*feat->set)(from, fields + 1, count - 1))) {
change++; /* feature handler wants a change recorded */
if (i > 0) /* call the set callback and do marking */
feat->flags |= FEAT_MARK;
else /* i < 0 */
feat->flags &= ~FEAT_MARK;
break;
}
case FEAT_INT: /* an integer value */
tmp = feat->v_int; /* detect changes... */
if (count < 2) { /* reset value */
feat->v_int = feat->def_int;
feat->flags &= ~FEAT_MARK;
} else { /* ok, figure out the value and whether to mark it */
feat->v_int = strtoul(fields[1], 0, 0);
if (feat->v_int == feat->def_int)
feat->flags &= ~FEAT_MARK;
else
feat->flags |= FEAT_MARK;
}
if (feat->v_int != tmp) /* check for change */
change++;
break;
case FEAT_BOOL: /* it's a boolean value--true or false */
tmp = feat->v_int; /* detect changes... */
if (count < 2) { /* reset value */
feat->v_int = feat->def_int;
feat->flags &= ~FEAT_MARK;
} else { /* figure out the value and whether to mark it */
if (!ircd_strncmp(fields[1], "TRUE", strlen(fields[1])) ||
!ircd_strncmp(fields[1], "YES", strlen(fields[1])) ||
(strlen(fields[1]) >= 2 &&
!ircd_strncmp(fields[1], "ON", strlen(fields[1]))))
feat->v_int = 1;
else if (!ircd_strncmp(fields[1], "FALSE", strlen(fields[1])) ||
!ircd_strncmp(fields[1], "NO", strlen(fields[1])) ||
(strlen(fields[1]) >= 2 &&
!ircd_strncmp(fields[1], "OFF", strlen(fields[1]))))
feat->v_int = 0;
else if (from) /* report an error... */
return send_reply(from, ERR_BADFEATVALUE, fields[1], feat->type);
else {
log_write(LS_CONFIG, L_ERROR, 0, "Bad value \"%s\" for feature %s",
fields[1], feat->type);
return 0;
}
if (feat->v_int == feat->def_int) /* figure out whether to mark it */
feat->flags &= ~FEAT_MARK;
else
feat->flags |= FEAT_MARK;
}
if (feat->v_int != tmp) /* check for change */
change++;
break;
case FEAT_STR: /* it's a string value */
if (count < 2)
t_str = feat->def_str; /* changing to default */
else
t_str = *fields[1] ? fields[1] : 0;
if (!t_str && !(feat->flags & FEAT_NULL)) { /* NULL value permitted? */
if (from)
return send_reply(from, ERR_BADFEATVALUE, "NULL", feat->type);
else {
log_write(LS_CONFIG, L_ERROR, 0, "Bad value \"NULL\" for feature %s",
feat->type);
return 0;
}
}
if (t_str == feat->def_str ||
(t_str && feat->def_str &&
!(feat->flags & FEAT_CASE ? strcmp(t_str, feat->def_str) :
ircd_strcmp(t_str, feat->def_str)))) { /* resetting to default */
if (feat->v_str != feat->def_str) {
change++; /* change from previous value */
if (feat->v_str)
MyFree(feat->v_str); /* free old value */
}
feat->v_str = feat->def_str; /* very special... */
feat->flags &= ~FEAT_MARK;
} else if (!t_str) {
if (feat->v_str) {
change++; /* change from previous value */
if (feat->v_str != feat->def_str)
MyFree(feat->v_str); /* free old value */
}
feat->v_str = 0; /* set it to NULL */
feat->flags |= FEAT_MARK;
} else if (!feat->v_str ||
(feat->flags & FEAT_CASE ? strcmp(t_str, feat->v_str) :
ircd_strcmp(t_str, feat->v_str))) { /* new value */
change++; /* change from previous value */
if (feat->v_str && feat->v_str != feat->def_str)
MyFree(feat->v_str); /* free old value */
DupString(feat->v_str, t_str); /* store new value */
feat->flags |= FEAT_MARK;
} else /* they match, but don't match the default */
feat->flags |= FEAT_MARK;
break;
}
if (change && feat->notify) /* call change notify function */
(*feat->notify)();
}
return 0;
}
/* reset a feature to its default values */
int
feature_reset(struct Client* from, const char* const* fields, int count)
{
int i, change = 0;
struct FeatureDesc *feat;
assert(0 != from);
if (!HasPriv(from, PRIV_SET))
return send_reply(from, ERR_NOPRIVILEGES);
if (count < 1) /* check arguments */
need_more_params(from, "RESET");
else if ((feat = feature_desc(from, fields[0]))) { /* get descriptor */
if (from && feat->flags & FEAT_READ)
return send_reply(from, ERR_NOFEATURE, fields[0]);
switch (feat->flags & FEAT_MASK) {
case FEAT_NONE: /* None... */
if (feat->reset && (i = (*feat->reset)(from, fields + 1, count - 1))) {
change++; /* feature handler wants a change recorded */
if (i > 0) /* call reset callback and parse mark return */
feat->flags |= FEAT_MARK;
else /* i < 0 */
feat->flags &= ~FEAT_MARK;
}
break;
case FEAT_INT: /* Integer... */
case FEAT_BOOL: /* Boolean... */
if (feat->v_int != feat->def_int)
change++; /* change will be made */
feat->v_int = feat->def_int; /* set the default */
feat->flags &= ~FEAT_MARK; /* unmark it */
break;
case FEAT_STR: /* string! */
if (feat->v_str != feat->def_str) {
change++; /* change has been made */
if (feat->v_str)
MyFree(feat->v_str); /* free old value */
}
feat->v_str = feat->def_str; /* set it to default */
feat->flags &= ~FEAT_MARK; /* unmark it */
break;
}
if (change && feat->notify) /* call change notify function */
(*feat->notify)();
}
return 0;
}
/* Gets the value of a specific feature and reports it to the user */
int
feature_get(struct Client* from, const char* const* fields, int count)
{
struct FeatureDesc *feat;
assert(0 != from);
if (count < 1) /* check parameters */
need_more_params(from, "GET");
else if ((feat = feature_desc(from, fields[0]))) {
if ((feat->flags & FEAT_NODISP) ||
(feat->flags & FEAT_MYOPER && !MyOper(from)) ||
(feat->flags & FEAT_OPER && !IsAnOper(from))) /* check privs */
return send_reply(from, ERR_NOPRIVILEGES);
switch (feat->flags & FEAT_MASK) {
case FEAT_NONE: /* none, call the callback... */
if (feat->get) /* if there's a callback, use it */
(*feat->get)(from, fields + 1, count - 1);
break;
case FEAT_INT: /* integer, report integer value */
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":Integer value of %s: %d", feat->type, feat->v_int);
break;
case FEAT_BOOL: /* boolean, report boolean value */
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":Boolean value of %s: %s", feat->type,
feat->v_int ? "TRUE" : "FALSE");
break;
case FEAT_STR: /* string, report string value */
if (feat->v_str) /* deal with null case */
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":String value of %s: %s", feat->type, feat->v_str);
else
send_reply(from, SND_EXPLICIT | RPL_FEATURE,
":String value for %s not set", feat->type);
break;
}
}
return 0;
}
/* called before reading the .conf to clear all marks */
void
feature_unmark(void)
{
int i;
for (i = 0; features[i].type; i++) {
features[i].flags &= ~FEAT_MARK; /* clear the marks... */
if (features[i].unmark) /* call the unmark callback if necessary */
(*features[i].unmark)();
}
}
/* Called after reading the .conf to reset unmodified values to defaults */
void
feature_mark(void)
{
int i, change;
for (i = 0; features[i].type; i++) {
change = 0;
switch (features[i].flags & FEAT_MASK) {
case FEAT_NONE:
if (features[i].mark &&
(*features[i].mark)(features[i].flags & FEAT_MARK ? 1 : 0))
change++; /* feature handler wants a change recorded */
break;
case FEAT_INT: /* Integers or Booleans... */
case FEAT_BOOL:
if (!(features[i].flags & FEAT_MARK)) { /* not changed? */
if (features[i].v_int != features[i].def_int)
change++; /* we're making a change */
features[i].v_int = features[i].def_int;
}
break;
case FEAT_STR: /* strings... */
if (!(features[i].flags & FEAT_MARK)) { /* not changed? */
if (features[i].v_str != features[i].def_str) {
change++; /* we're making a change */
if (features[i].v_str)
MyFree(features[i].v_str); /* free old value */
}
features[i].v_str = features[i].def_str;
}
break;
}
if (change && features[i].notify)
(*features[i].notify)(); /* call change notify function */
}
}
/* used to initialize the features subsystem */
void
feature_init(void)
{
int i;
for (i = 0; features[i].type; i++) {
switch (features[i].flags & FEAT_MASK) {
case FEAT_NONE: /* you're on your own */
break;
case FEAT_INT: /* Integers or Booleans... */
case FEAT_BOOL:
features[i].v_int = features[i].def_int;
break;
case FEAT_STR: /* Strings */
features[i].v_str = features[i].def_str;
assert(features[i].def_str || (features[i].flags & FEAT_NULL));
break;
}
}
}
/* report all F-lines */
void
feature_report(struct Client* to, struct StatDesc* sd, int stat, char* param)
{
int i;
for (i = 0; features[i].type; i++) {
if ((features[i].flags & FEAT_NODISP) ||
(features[i].flags & FEAT_MYOPER && !MyOper(to)) ||
(features[i].flags & FEAT_OPER && !IsAnOper(to)))
continue; /* skip this one */
switch (features[i].flags & FEAT_MASK) {
case FEAT_NONE:
if (features[i].report) /* let the callback handle this */
(*features[i].report)(to, features[i].flags & FEAT_MARK ? 1 : 0);
break;
case FEAT_INT: /* Report an F-line with integer values */
if (features[i].flags & FEAT_MARK) /* it's been changed */
send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %d",
features[i].type, features[i].v_int);
break;
case FEAT_BOOL: /* Report an F-line with boolean values */
if (features[i].flags & FEAT_MARK) /* it's been changed */
send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %s",
features[i].type, features[i].v_int ? "TRUE" : "FALSE");
break;
case FEAT_STR: /* Report an F-line with string values */
if (features[i].flags & FEAT_MARK) { /* it's been changed */
if (features[i].v_str)
send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %s",
features[i].type, features[i].v_str);
else /* Actually, F:<type> would reset it; you want F:<type>: */
send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s",
features[i].type);
}
break;
}
}
}
/* return a feature's integer value */
int
feature_int(enum Feature feat)
{
assert(features[feat].feat == feat);
assert((features[feat].flags & FEAT_MASK) == FEAT_INT);
return features[feat].v_int;
}
/* return a feature's boolean value */
int
feature_bool(enum Feature feat)
{
assert(features[feat].feat == feat);
assert((features[feat].flags & FEAT_MASK) == FEAT_BOOL);
return features[feat].v_int;
}
/* return a feature's string value */
const char *
feature_str(enum Feature feat)
{
assert(features[feat].feat == feat);
assert((features[feat].flags & FEAT_MASK) == FEAT_STR);
return features[feat].v_str;
}
syntax highlighted by Code2HTML, v. 0.9.1