ircd/ircd_features.c

   1 /*
   2  * IRC - Internet Relay Chat, ircd/features.c
   3  * Copyright (C) 2000 Kevin L. Mitchell <klmitch@mit.edu>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 1, or (at your option)
   8  * any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18  *
  19  * $Id$
  20  */
  21 #include "config.h"
  22
  23 #include "ircd_features.h"
  24 #include "channel.h"    /* list_set_default */
  25 #include "class.h"
  26 #include "client.h"
  27 #include "hash.h"
  28 #include "ircd.h"
  29 #include "ircd_alloc.h"
  30 #include "ircd_log.h"
  31 #include "ircd_reply.h"
  32 #include "ircd_string.h"
  33 #include "match.h"
  34 #include "motd.h"
  35 #include "msg.h"
  36 #include "numeric.h"
  37 #include "numnicks.h"
  38 #include "random.h"     /* random_seed_set */
  39 #include "s_bsd.h"
  40 #include "s_debug.h"
  41 #include "s_misc.h"
  42 #include "send.h"
  43 #include "struct.h"
  44 #include "sys.h"    /* FALSE bleah */
  45 #include "whowas.h"     /* whowas_realloc */
  46
  47 #include <assert.h>
  48 #include <stdlib.h>
  49 #include <string.h>
  50
  51 /* List of log output types that can be set */
  52 static struct LogTypes {
  53   char *type;
  54   int (*set)(const char *, const char *);
  55   char *(*get)(const char *);
  56 } logTypes[] = {
  57   { "FILE", log_set_file, log_get_file },
  58   { "FACILITY", log_set_facility, log_get_facility },
  59   { "SNOMASK", log_set_snomask, log_get_snomask },
  60   { "LEVEL", log_set_level, log_get_level },
  61   { 0, 0, 0 }
  62 };
  63
  64 /* Look up a struct LogType given the type string */
  65 static struct LogTypes *
  66 feature_log_desc(struct Client* from, const char *type)
  67 {
  68   int i;
  69
  70   assert(0 != type);
  71
  72   for (i = 0; logTypes[i].type; i++) /* find appropriate descriptor */
  73     if (!ircd_strcmp(type, logTypes[i].type))
  74       return &logTypes[i];
  75
  76   Debug((DEBUG_ERROR, "Unknown log feature type \"%s\"", type));
  77   if (from) /* send an error; if from is NULL, called from conf parser */
  78     send_reply(from, ERR_BADLOGTYPE, type);
  79   else
  80     log_write(LS_CONFIG, L_ERROR, 0, "Unknown log feature type \"%s\"", type);
  81
  82   return 0; /* not found */
  83 }
  84
  85 /* Set the value of a log output type for a log subsystem */
  86 static int
  87 feature_log_set(struct Client* from, const char* const* fields, int count)
  88 {
  89   struct LogTypes *desc;
  90   char *subsys;
  91
  92   if (count < 2) { /* set default facility */
  93     if (log_set_default(count < 1 ? 0 : fields[0])) {
  94       assert(count >= 1); /* should always accept default */
  95
  96       if (from) /* send an error */
  97         send_reply(from, ERR_BADLOGVALUE, fields[0]);
  98       else
  99         log_write(LS_CONFIG, L_ERROR, 0,
 100                   "Bad value \"%s\" for default facility", fields[0]);
 101     } else
 102       return count < 1 ? -1 : 1; /* tell feature to set or clear mark */
 103   } else if (!(subsys = log_canon(fields[0]))) { /* no such subsystem */
 104     if (from) /* send an error */
 105       send_reply(from, ERR_BADLOGSYS, fields[0]);
 106     else
 107       log_write(LS_CONFIG, L_ERROR, 0,
 108                 "No such logging subsystem \"%s\"", fields[0]);
 109   } else if ((desc = feature_log_desc(from, fields[1]))) { /* set value */
 110     if ((*desc->set)(fields[0], count < 3 ? 0 : fields[2])) {
 111       assert(count >= 3); /* should always accept default */
 112
 113       if (from) /* send an error */
 114         send_reply(from, ERR_BADLOGVALUE, fields[2]);
 115       else
 116         log_write(LS_CONFIG, L_ERROR, 0,
 117                   "Bad value \"%s\" for log type %s (subsystem %s)",
 118                   fields[2], desc->type, subsys);
 119     }
 120   }
 121
 122   return 0;
 123 }
 124
 125 /* reset a log type for a subsystem to its default value */
 126 static int
 127 feature_log_reset(struct Client* from, const char* const* fields, int count)
 128 {
 129   struct LogTypes *desc;
 130   char *subsys;
 131
 132   assert(0 != from); /* Never called by the .conf parser */
 133
 134   if (count < 1) { /* reset default facility */
 135     log_set_default(0);
 136     return -1; /* unmark this entry */
 137   } else if (count < 2)
 138     need_more_params(from, "RESET");
 139   else if (!(subsys = log_canon(fields[0]))) /* no such subsystem */
 140     send_reply(from, ERR_BADLOGSYS, fields[0]);
 141   else if ((desc = feature_log_desc(from, fields[1]))) /* reset value */
 142     (*desc->set)(fields[0], 0); /* default should always be accepted */
 143
 144   return 0;
 145 }
 146
 147 /* report the value of a log setting */
 148 static void
 149 feature_log_get(struct Client* from, const char* const* fields, int count)
 150 {
 151   struct LogTypes *desc;
 152   char *value, *subsys;
 153
 154   assert(0 != from); /* never called by .conf parser */
 155
 156   if (count < 1) /* return default facility */
 157     send_reply(from, SND_EXPLICIT | RPL_FEATURE, ":Log facility: %s",
 158                log_get_default());
 159   else if (count < 2)
 160     need_more_params(from, "GET");
 161   else if (!(subsys = log_canon(fields[0]))) { /* no such subsystem */
 162     send_reply(from, ERR_BADLOGSYS, fields[0]);
 163   } else if ((desc = feature_log_desc(from, fields[1]))) {
 164     if ((value = (*desc->get)(fields[0]))) /* send along value */
 165       send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 166                  ":Log %s for subsystem %s: %s", desc->type, subsys,
 167                  (*desc->get)(subsys));
 168     else
 169       send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 170                  ":No log %s is set for subsystem %s", desc->type, subsys);
 171   }
 172 }
 173
 174 /* sets a feature to the given value */
 175 typedef int  (*feat_set_call)(struct Client*, const char* const*, int);
 176 /* gets the value of a feature */
 177 typedef void (*feat_get_call)(struct Client*, const char* const*, int);
 178 /* callback to notify of a feature's change */
 179 typedef void (*feat_notify_call)(void);
 180 /* unmarks all sub-feature values prior to reading .conf */
 181 typedef void (*feat_unmark_call)(void);
 182 /* resets to defaults all currently unmarked values */
 183 typedef int  (*feat_mark_call)(int);
 184 /* reports features as a /stats f list */
 185 typedef void (*feat_report_call)(struct Client*, int);
 186
 187 #define FEAT_NONE   0x0000      /* no value */
 188 #define FEAT_INT    0x0001      /* set if entry contains an integer value */
 189 #define FEAT_BOOL   0x0002      /* set if entry contains a boolean value */
 190 #define FEAT_STR    0x0003      /* set if entry contains a string value */
 191 #define FEAT_MASK   0x000f      /* possible value types */
 192
 193 #define FEAT_MARK   0x0010      /* set if entry has been changed */
 194 #define FEAT_NULL   0x0020      /* NULL string is permitted */
 195 #define FEAT_CASE   0x0040      /* string is case-sensitive */
 196
 197 #define FEAT_OPER   0x0100      /* set to display only to opers */
 198 #define FEAT_MYOPER 0x0200      /* set to display only to local opers */
 199 #define FEAT_NODISP 0x0400      /* feature must never be displayed */
 200
 201 #define FEAT_READ   0x1000      /* feature is read-only (for now, perhaps?) */
 202
 203 static struct FeatureDesc {
 204   enum Feature     feat;    /* feature identifier */
 205   char*            type;    /* string describing type */
 206   unsigned int     flags;   /* flags for feature */
 207   int              v_int;   /* integer value */
 208   int              def_int; /* default value */
 209   char*            v_str;   /* string value */
 210   char*            def_str; /* default value */
 211   feat_set_call    set;     /* set feature values */
 212   feat_set_call    reset;   /* reset feature values to defaults */
 213   feat_get_call    get;     /* get feature values */
 214   feat_notify_call notify;  /* notify of value change */
 215   feat_unmark_call unmark;  /* unmark all feature change values */
 216   feat_mark_call   mark;    /* reset to defaults all unchanged features */
 217   feat_report_call report;  /* report feature values */
 218 } features[] = {
 219 #define F_N(type, flags, set, reset, get, notify, unmark, mark, report)       \
 220   { FEAT_ ## type, #type, FEAT_NONE | (flags), 0, 0, 0, 0,                    \
 221     (set), (reset), (get), (notify), (unmark), (mark), (report) }
 222 #define F_I(type, flags, v_int, notify)                                       \
 223   { FEAT_ ## type, #type, FEAT_INT | (flags), 0, (v_int), 0, 0,               \
 224     0, 0, 0, (notify), 0, 0, 0 }
 225 #define F_B(type, flags, v_int, notify)                                       \
 226   { FEAT_ ## type, #type, FEAT_BOOL | (flags), 0, (v_int), 0, 0,              \
 227     0, 0, 0, (notify), 0, 0, 0 }
 228 #define F_S(type, flags, v_str, notify)                                       \
 229   { FEAT_ ## type, #type, FEAT_STR | (flags), 0, 0, 0, (v_str),               \
 230     0, 0, 0, (notify), 0, 0, 0 }
 231
 232   /* Misc. features */
 233   F_N(LOG, FEAT_MYOPER, feature_log_set, feature_log_reset, feature_log_get,
 234       0, log_feature_unmark, log_feature_mark, log_feature_report),
 235   F_S(DOMAINNAME, 0, DOMAINNAME, 0),
 236   F_B(RELIABLE_CLOCK, 0, 0, 0),
 237   F_I(BUFFERPOOL, 0, 27000000, 0),
 238   F_B(HAS_FERGUSON_FLUSHER, 0, 0, 0),
 239   F_I(CLIENT_FLOOD, 0, 1024, 0),
 240   F_I(SERVER_PORT, FEAT_OPER, 4400, 0),
 241   F_B(NODEFAULTMOTD, 0, 1, 0),
 242   F_S(MOTD_BANNER, FEAT_NULL, 0, 0),
 243   F_S(PROVIDER, FEAT_NULL, 0, 0),
 244   F_B(KILL_IPMISMATCH, FEAT_OPER, 0, 0),
 245   F_B(IDLE_FROM_MSG, 0, 1, 0),
 246   F_B(HUB, 0, 0, 0),
 247   F_B(WALLOPS_OPER_ONLY, 0, 0, 0),
 248   F_B(NODNS, 0, 0, 0),
 249   F_N(RANDOM_SEED, FEAT_NODISP, random_seed_set, 0, 0, 0, 0, 0, 0),
 250   F_S(DEFAULT_LIST_PARAM, FEAT_NULL, 0, list_set_default),
 251   F_I(NICKNAMEHISTORYLENGTH, 0, 800, whowas_realloc),
 252   F_B(HOST_HIDING, 0, 1, 0),
 253   F_S(HIDDEN_HOST, FEAT_CASE, "users.undernet.org", 0),
 254   F_S(HIDDEN_IP, 0, "127.0.0.1", 0),
 255   F_B(CONNEXIT_NOTICES, 0, 0, 0),
 256   F_B(OPLEVELS, 0, 1, 0),
 257   F_B(LOCAL_CHANNELS, 0, 1, 0),
 258   F_B(TOPIC_BURST, 0, 0, 0),
 259
 260   /* features that probably should not be touched */
 261   F_I(KILLCHASETIMELIMIT, 0, 30, 0),
 262   F_I(MAXCHANNELSPERUSER, 0, 10, 0),
 263   F_I(NICKLEN, 0, 12, 0),
 264   F_I(AVBANLEN, 0, 40, 0),
 265   F_I(MAXBANS, 0, 45, 0),
 266   F_I(MAXSILES, 0, 15, 0),
 267   F_I(HANGONGOODLINK, 0, 300, 0),
 268   F_I(HANGONRETRYDELAY, 0, 10, 0),
 269   F_I(CONNECTTIMEOUT, 0, 90, 0),
 270   F_I(MAXIMUM_LINKS, 0, 1, init_class), /* reinit class 0 as needed */
 271   F_I(PINGFREQUENCY, 0, 120, init_class),
 272   F_I(CONNECTFREQUENCY, 0, 600, init_class),
 273   F_I(DEFAULTMAXSENDQLENGTH, 0, 40000, init_class),
 274   F_I(GLINEMAXUSERCOUNT, 0, 20, 0),
 275   F_I(SOCKSENDBUF, 0, SERVER_TCP_WINDOW, 0),
 276   F_I(SOCKRECVBUF, 0, SERVER_TCP_WINDOW, 0),
 277   F_I(IPCHECK_CLONE_LIMIT, 0, 4, 0),
 278   F_I(IPCHECK_CLONE_PERIOD, 0, 40, 0),
 279   F_I(IPCHECK_CLONE_DELAY, 0, 600, 0),
 280
 281   /* Some misc. default paths */
 282   F_S(MPATH, FEAT_CASE | FEAT_MYOPER, "ircd.motd", motd_init),
 283   F_S(RPATH, FEAT_CASE | FEAT_MYOPER, "remote.motd", motd_init),
 284   F_S(PPATH, FEAT_CASE | FEAT_MYOPER | FEAT_READ, "ircd.pid", 0),
 285
 286   /* Networking features */
 287   F_I(TOS_SERVER, 0, 0x08, 0),
 288   F_I(TOS_CLIENT, 0, 0x08, 0),
 289   F_I(POLLS_PER_LOOP, 0, 200, 0),
 290   F_I(IRCD_RES_RETRIES, 0, 2, 0),
 291   F_I(IRCD_RES_TIMEOUT, 0, 4, 0),
 292   F_I(AUTH_TIMEOUT, 0, 9, 0),
 293   F_B(ANNOUNCE_INVITES, 0, 0, 0),
 294
 295   /* features that affect all operators */
 296   F_B(CONFIG_OPERCMDS, 0, 0, 0),
 297
 298   /* HEAD_IN_SAND Features */
 299   F_B(HIS_SNOTICES, 0, 1, 0),
 300   F_B(HIS_SNOTICES_OPER_ONLY, 0, 1, 0),
 301   F_B(HIS_DEBUG_OPER_ONLY, 0, 1, 0),
 302   F_B(HIS_WALLOPS, 0, 1, 0),
 303   F_B(HIS_MAP, 0, 1, 0),
 304   F_B(HIS_LINKS, 0, 1, 0),
 305   F_B(HIS_TRACE, 0, 1, 0),
 306   F_B(HIS_STATS_l, 0, 1, 0),
 307   F_B(HIS_STATS_L, 0, 1, 0),
 308   F_B(HIS_STATS_a, 0, 1, 0),
 309   F_B(HIS_STATS_c, 0, 1, 0),
 310   F_B(HIS_STATS_g, 0, 1, 0),
 311   F_B(HIS_STATS_h, 0, 1, 0),
 312   F_B(HIS_STATS_k, 0, 1, 0),
 313   F_B(HIS_STATS_f, 0, 1, 0),
 314   F_B(HIS_STATS_i, 0, 1, 0),
 315   F_B(HIS_STATS_j, 0, 1, 0),
 316   F_B(HIS_STATS_M, 0, 1, 0),
 317   F_B(HIS_STATS_m, 0, 1, 0),
 318   F_B(HIS_STATS_o, 0, 1, 0),
 319   F_B(HIS_STATS_p, 0, 1, 0),
 320   F_B(HIS_STATS_q, 0, 1, 0),
 321   F_B(HIS_STATS_R, 0, 1, 0),
 322   F_B(HIS_STATS_r, 0, 1, 0),
 323   F_B(HIS_STATS_d, 0, 1, 0),
 324   F_B(HIS_STATS_e, 0, 1, 0),
 325   F_B(HIS_STATS_t, 0, 1, 0),
 326   F_B(HIS_STATS_T, 0, 1, 0),
 327   F_B(HIS_STATS_u, 0, 0, 0),
 328   F_B(HIS_STATS_U, 0, 1, 0),
 329   F_B(HIS_STATS_v, 0, 1, 0),
 330   F_B(HIS_STATS_w, 0, 0, 0),
 331   F_B(HIS_STATS_x, 0, 1, 0),
 332   F_B(HIS_STATS_y, 0, 1, 0),
 333   F_B(HIS_STATS_z, 0, 1, 0),
 334   F_B(HIS_WHOIS_SERVERNAME, 0, 1, 0),
 335   F_B(HIS_WHOIS_IDLETIME, 0, 1, 0),
 336   F_B(HIS_WHOIS_LOCALCHAN, 0, 1, 0),
 337   F_B(HIS_WHO_SERVERNAME, 0, 1, 0),
 338   F_B(HIS_WHO_HOPCOUNT, 0, 1, 0),
 339   F_B(HIS_BANWHO, 0, 1, 0),
 340   F_B(HIS_KILLWHO, 0, 1, 0),
 341   F_B(HIS_REWRITE, 0, 1, 0),
 342   F_I(HIS_REMOTE, 0, 1, 0),
 343   F_B(HIS_NETSPLIT, 0, 1, 0),
 344   F_S(HIS_SERVERNAME, 0, "*.undernet.org", 0),
 345   F_S(HIS_SERVERINFO, 0, "The Undernet Underworld", 0),
 346   F_S(HIS_URLSERVERS, 0, "http://www.undernet.org/servers.php", 0),
 347
 348   /* Misc. random stuff */
 349   F_S(NETWORK, 0, "UnderNet", 0),
 350   F_S(URL_CLIENTS, 0, "ftp://ftp.undernet.org/pub/irc/clients", 0),
 351
 352 #undef F_S
 353 #undef F_B
 354 #undef F_I
 355 #undef F_N
 356   { FEAT_LAST_F, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }
 357 };
 358
 359 /* Given a feature's identifier, look up the feature descriptor */
 360 static struct FeatureDesc *
 361 feature_desc(struct Client* from, const char *feature)
 362 {
 363   int i;
 364
 365   assert(0 != feature);
 366
 367   for (i = 0; features[i].type; i++) /* find appropriate descriptor */
 368     if (!strcmp(feature, features[i].type))
 369       return &features[i];
 370
 371   Debug((DEBUG_ERROR, "Unknown feature \"%s\"", feature));
 372   if (from) /* report an error */
 373     send_reply(from, ERR_NOFEATURE, feature);
 374   else
 375     log_write(LS_CONFIG, L_ERROR, 0, "Unknown feature \"%s\"", feature);
 376
 377   return 0; /* not found */
 378 }
 379
 380 /* Given a feature vector string, set the value of a feature */
 381 int
 382 feature_set(struct Client* from, const char* const* fields, int count)
 383 {
 384   int i, change = 0, tmp;
 385   const char *t_str;
 386   struct FeatureDesc *feat;
 387
 388   if (from && !HasPriv(from, PRIV_SET))
 389     return send_reply(from, ERR_NOPRIVILEGES);
 390
 391   if (count < 1) {
 392     if (from) /* report an error in the number of arguments */
 393       need_more_params(from, "SET");
 394     else
 395       log_write(LS_CONFIG, L_ERROR, 0, "Not enough fields in F line");
 396   } else if ((feat = feature_desc(from, fields[0]))) { /* find feature */
 397     if (from && feat->flags & FEAT_READ)
 398       return send_reply(from, ERR_NOFEATURE, fields[0]);
 399
 400     switch (feat->flags & FEAT_MASK) {
 401     case FEAT_NONE:
 402       if (feat->set && (i = (*feat->set)(from, fields + 1, count - 1))) {
 403         change++; /* feature handler wants a change recorded */
 404
 405         if (i > 0) /* call the set callback and do marking */
 406           feat->flags |= FEAT_MARK;
 407         else /* i < 0 */
 408           feat->flags &= ~FEAT_MARK;
 409         break;
 410       }
 411
 412     case FEAT_INT: /* an integer value */
 413       tmp = feat->v_int; /* detect changes... */
 414
 415       if (count < 2) { /* reset value */
 416         feat->v_int = feat->def_int;
 417         feat->flags &= ~FEAT_MARK;
 418       } else { /* ok, figure out the value and whether to mark it */
 419         feat->v_int = strtoul(fields[1], 0, 0);
 420         if (feat->v_int == feat->def_int)
 421           feat->flags &= ~FEAT_MARK;
 422         else
 423           feat->flags |= FEAT_MARK;
 424       }
 425
 426       if (feat->v_int != tmp) /* check for change */
 427         change++;
 428       break;
 429
 430     case FEAT_BOOL: /* it's a boolean value--true or false */
 431       tmp = feat->v_int; /* detect changes... */
 432
 433       if (count < 2) { /* reset value */
 434         feat->v_int = feat->def_int;
 435         feat->flags &= ~FEAT_MARK;
 436       } else { /* figure out the value and whether to mark it */
 437         if (!ircd_strncmp(fields[1], "TRUE", strlen(fields[1])) ||
 438             !ircd_strncmp(fields[1], "YES", strlen(fields[1])) ||
 439             (strlen(fields[1]) >= 2 &&
 440              !ircd_strncmp(fields[1], "ON", strlen(fields[1]))))
 441           feat->v_int = 1;
 442         else if (!ircd_strncmp(fields[1], "FALSE", strlen(fields[1])) ||
 443                  !ircd_strncmp(fields[1], "NO", strlen(fields[1])) ||
 444                  (strlen(fields[1]) >= 2 &&
 445                   !ircd_strncmp(fields[1], "OFF", strlen(fields[1]))))
 446           feat->v_int = 0;
 447         else if (from) /* report an error... */
 448           return send_reply(from, ERR_BADFEATVALUE, fields[1], feat->type);
 449         else {
 450           log_write(LS_CONFIG, L_ERROR, 0, "Bad value \"%s\" for feature %s",
 451                     fields[1], feat->type);
 452           return 0;
 453         }
 454
 455         if (feat->v_int == feat->def_int) /* figure out whether to mark it */
 456           feat->flags &= ~FEAT_MARK;
 457         else
 458           feat->flags |= FEAT_MARK;
 459       }
 460
 461       if (feat->v_int != tmp) /* check for change */
 462         change++;
 463       break;
 464
 465     case FEAT_STR: /* it's a string value */
 466       if (count < 2)
 467         t_str = feat->def_str; /* changing to default */
 468       else
 469         t_str = *fields[1] ? fields[1] : 0;
 470
 471       if (!t_str && !(feat->flags & FEAT_NULL)) { /* NULL value permitted? */
 472         if (from)
 473           return send_reply(from, ERR_BADFEATVALUE, "NULL", feat->type);
 474         else {
 475           log_write(LS_CONFIG, L_ERROR, 0, "Bad value \"NULL\" for feature %s",
 476                     feat->type);
 477           return 0;
 478         }
 479       }
 480
 481       if (t_str == feat->def_str ||
 482           (t_str && feat->def_str &&
 483            !(feat->flags & FEAT_CASE ? strcmp(t_str, feat->def_str) :
 484              ircd_strcmp(t_str, feat->def_str)))) { /* resetting to default */
 485         if (feat->v_str != feat->def_str) {
 486           change++; /* change from previous value */
 487
 488           if (feat->v_str)
 489             MyFree(feat->v_str); /* free old value */
 490         }
 491
 492         feat->v_str = feat->def_str; /* very special... */
 493
 494         feat->flags &= ~FEAT_MARK;
 495       } else if (!t_str) {
 496         if (feat->v_str) {
 497           change++; /* change from previous value */
 498
 499           if (feat->v_str != feat->def_str)
 500             MyFree(feat->v_str); /* free old value */
 501         }
 502
 503         feat->v_str = 0; /* set it to NULL */
 504
 505         feat->flags |= FEAT_MARK;
 506       } else if (!feat->v_str ||
 507                  (feat->flags & FEAT_CASE ? strcmp(t_str, feat->v_str) :
 508                   ircd_strcmp(t_str, feat->v_str))) { /* new value */
 509         change++; /* change from previous value */
 510
 511         if (feat->v_str && feat->v_str != feat->def_str)
 512           MyFree(feat->v_str); /* free old value */
 513         DupString(feat->v_str, t_str); /* store new value */
 514
 515         feat->flags |= FEAT_MARK;
 516       } else /* they match, but don't match the default */
 517         feat->flags |= FEAT_MARK;
 518       break;
 519     }
 520
 521     if (change && feat->notify) /* call change notify function */
 522       (*feat->notify)();
 523   }
 524
 525   return 0;
 526 }
 527
 528 /* reset a feature to its default values */
 529 int
 530 feature_reset(struct Client* from, const char* const* fields, int count)
 531 {
 532   int i, change = 0;
 533   struct FeatureDesc *feat;
 534
 535   assert(0 != from);
 536
 537   if (!HasPriv(from, PRIV_SET))
 538     return send_reply(from, ERR_NOPRIVILEGES);
 539
 540   if (count < 1) /* check arguments */
 541     need_more_params(from, "RESET");
 542   else if ((feat = feature_desc(from, fields[0]))) { /* get descriptor */
 543     if (from && feat->flags & FEAT_READ)
 544       return send_reply(from, ERR_NOFEATURE, fields[0]);
 545
 546     switch (feat->flags & FEAT_MASK) {
 547     case FEAT_NONE: /* None... */
 548       if (feat->reset && (i = (*feat->reset)(from, fields + 1, count - 1))) {
 549         change++; /* feature handler wants a change recorded */
 550
 551         if (i > 0) /* call reset callback and parse mark return */
 552           feat->flags |= FEAT_MARK;
 553         else /* i < 0 */
 554           feat->flags &= ~FEAT_MARK;
 555       }
 556       break;
 557
 558     case FEAT_INT:  /* Integer... */
 559     case FEAT_BOOL: /* Boolean... */
 560       if (feat->v_int != feat->def_int)
 561         change++; /* change will be made */
 562
 563       feat->v_int = feat->def_int; /* set the default */
 564       feat->flags &= ~FEAT_MARK; /* unmark it */
 565       break;
 566
 567     case FEAT_STR: /* string! */
 568       if (feat->v_str != feat->def_str) {
 569         change++; /* change has been made */
 570         if (feat->v_str)
 571           MyFree(feat->v_str); /* free old value */
 572       }
 573
 574       feat->v_str = feat->def_str; /* set it to default */
 575       feat->flags &= ~FEAT_MARK; /* unmark it */
 576       break;
 577     }
 578
 579     if (change && feat->notify) /* call change notify function */
 580       (*feat->notify)();
 581   }
 582
 583   return 0;
 584 }
 585
 586 /* Gets the value of a specific feature and reports it to the user */
 587 int
 588 feature_get(struct Client* from, const char* const* fields, int count)
 589 {
 590   struct FeatureDesc *feat;
 591
 592   assert(0 != from);
 593
 594   if (count < 1) /* check parameters */
 595     need_more_params(from, "GET");
 596   else if ((feat = feature_desc(from, fields[0]))) {
 597     if ((feat->flags & FEAT_NODISP) ||
 598         (feat->flags & FEAT_MYOPER && !MyOper(from)) ||
 599         (feat->flags & FEAT_OPER && !IsAnOper(from))) /* check privs */
 600       return send_reply(from, ERR_NOPRIVILEGES);
 601
 602     switch (feat->flags & FEAT_MASK) {
 603     case FEAT_NONE: /* none, call the callback... */
 604       if (feat->get) /* if there's a callback, use it */
 605         (*feat->get)(from, fields + 1, count - 1);
 606       break;
 607
 608     case FEAT_INT: /* integer, report integer value */
 609       send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 610                  ":Integer value of %s: %d", feat->type, feat->v_int);
 611       break;
 612
 613     case FEAT_BOOL: /* boolean, report boolean value */
 614       send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 615                  ":Boolean value of %s: %s", feat->type,
 616                  feat->v_int ? "TRUE" : "FALSE");
 617       break;
 618
 619     case FEAT_STR: /* string, report string value */
 620       if (feat->v_str) /* deal with null case */
 621         send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 622                    ":String value of %s: %s", feat->type, feat->v_str);
 623       else
 624         send_reply(from, SND_EXPLICIT | RPL_FEATURE,
 625                    ":String value for %s not set", feat->type);
 626       break;
 627     }
 628   }
 629
 630   return 0;
 631 }
 632
 633 /* called before reading the .conf to clear all marks */
 634 void
 635 feature_unmark(void)
 636 {
 637   int i;
 638
 639   for (i = 0; features[i].type; i++) {
 640     features[i].flags &= ~FEAT_MARK; /* clear the marks... */
 641     if (features[i].unmark) /* call the unmark callback if necessary */
 642       (*features[i].unmark)();
 643   }
 644 }
 645
 646 /* Called after reading the .conf to reset unmodified values to defaults */
 647 void
 648 feature_mark(void)
 649 {
 650   int i, change;
 651
 652   for (i = 0; features[i].type; i++) {
 653     change = 0;
 654
 655     switch (features[i].flags & FEAT_MASK) {
 656     case FEAT_NONE:
 657       if (features[i].mark &&
 658           (*features[i].mark)(features[i].flags & FEAT_MARK ? 1 : 0))
 659         change++; /* feature handler wants a change recorded */
 660       break;
 661
 662     case FEAT_INT:  /* Integers or Booleans... */
 663     case FEAT_BOOL:
 664       if (!(features[i].flags & FEAT_MARK)) { /* not changed? */
 665         if (features[i].v_int != features[i].def_int)
 666           change++; /* we're making a change */
 667         features[i].v_int = features[i].def_int;
 668       }
 669       break;
 670
 671     case FEAT_STR: /* strings... */
 672       if (!(features[i].flags & FEAT_MARK)) { /* not changed? */
 673         if (features[i].v_str != features[i].def_str) {
 674           change++; /* we're making a change */
 675           if (features[i].v_str)
 676             MyFree(features[i].v_str); /* free old value */
 677         }
 678         features[i].v_str = features[i].def_str;
 679       }
 680       break;
 681     }
 682
 683     if (change && features[i].notify)
 684       (*features[i].notify)(); /* call change notify function */
 685   }
 686 }
 687
 688 /* used to initialize the features subsystem */
 689 void
 690 feature_init(void)
 691 {
 692   int i;
 693
 694   for (i = 0; features[i].type; i++) {
 695     switch (features[i].flags & FEAT_MASK) {
 696     case FEAT_NONE: /* you're on your own */
 697       break;
 698
 699     case FEAT_INT:  /* Integers or Booleans... */
 700     case FEAT_BOOL:
 701       features[i].v_int = features[i].def_int;
 702       break;
 703
 704     case FEAT_STR:  /* Strings */
 705       features[i].v_str = features[i].def_str;
 706       assert(features[i].def_str || (features[i].flags & FEAT_NULL));
 707       break;
 708     }
 709   }
 710 }
 711
 712 /* report all F-lines */
 713 void
 714 feature_report(struct Client* to, const struct StatDesc* sd, char* param)
 715 {
 716   int i;
 717
 718   for (i = 0; features[i].type; i++) {
 719     if ((features[i].flags & FEAT_NODISP) ||
 720         (features[i].flags & FEAT_MYOPER && !MyOper(to)) ||
 721         (features[i].flags & FEAT_OPER && !IsAnOper(to)))
 722       continue; /* skip this one */
 723
 724     switch (features[i].flags & FEAT_MASK) {
 725     case FEAT_NONE:
 726       if (features[i].report) /* let the callback handle this */
 727         (*features[i].report)(to, features[i].flags & FEAT_MARK ? 1 : 0);
 728       break;
 729
 730
 731     case FEAT_INT: /* Report an F-line with integer values */
 732       if (features[i].flags & FEAT_MARK) /* it's been changed */
 733         send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %d",
 734                    features[i].type, features[i].v_int);
 735       break;
 736
 737     case FEAT_BOOL: /* Report an F-line with boolean values */
 738       if (features[i].flags & FEAT_MARK) /* it's been changed */
 739         send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %s",
 740                    features[i].type, features[i].v_int ? "TRUE" : "FALSE");
 741       break;
 742
 743     case FEAT_STR: /* Report an F-line with string values */
 744       if (features[i].flags & FEAT_MARK) { /* it's been changed */
 745         if (features[i].v_str)
 746           send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s %s",
 747                      features[i].type, features[i].v_str);
 748         else /* Actually, F:<type> would reset it; you want F:<type>: */
 749           send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F %s",
 750                      features[i].type);
 751       }
 752       break;
 753     }
 754   }
 755 }
 756
 757 /* return a feature's integer value */
 758 int
 759 feature_int(enum Feature feat)
 760 {
 761   assert(features[feat].feat == feat);
 762   assert((features[feat].flags & FEAT_MASK) == FEAT_INT);
 763
 764   return features[feat].v_int;
 765 }
 766
 767 /* return a feature's boolean value */
 768 int
 769 feature_bool(enum Feature feat)
 770 {
 771   assert(feat <= FEAT_LAST_F);
 772   if (FEAT_LAST_F < feat)
 773     return 0;
 774   assert(features[feat].feat == feat);
 775   assert((features[feat].flags & FEAT_MASK) == FEAT_BOOL);
 776
 777   return features[feat].v_int;
 778 }
 779
 780 /* return a feature's string value */
 781 const char *
 782 feature_str(enum Feature feat)
 783 {
 784   assert(features[feat].feat == feat);
 785   assert((features[feat].flags & FEAT_MASK) == FEAT_STR);
 786
 787   return features[feat].v_str;
 788 }