src/modcmd.c

   1 /* modcmd.c - Generalized module command support
   2  * Copyright 2002-2004 srvx Development Team
   3  *
   4  * This file is part of x3.
   5  *
   6  * x3 is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with srvx; if not, write to the Free Software Foundation,
  18  * Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
  19  */
  20
  21 #include "../ChangeLog"
  22 #include "chanserv.h"
  23 #include "conf.h"
  24 #include "compat.h"
  25 #include "modcmd.h"
  26 #include "opserv.h"
  27 #include "saxdb.h"
  28 #include "timeq.h"
  29
  30
  31 struct pending_template {
  32     struct svccmd *cmd;
  33     char *base;
  34     struct pending_template *next;
  35 };
  36
  37 extern unsigned long god_timeout;
  38 static struct dict *modules;
  39 static struct dict *services;
  40 static struct pending_template *pending_templates;
  41 static struct module *modcmd_module;
  42 static struct modcmd *bind_command, *help_command, *version_command, *credits_command;
  43 static const struct message_entry msgtab[] = {
  44     { "MCMSG_BARE_FLAG", "Flag %.*s must be preceded by a + or -." },
  45     { "MCMSG_UNKNOWN_FLAG", "Unknown module flag %.*s." },
  46     { "MCMSG_BAD_OPSERV_LEVEL", "Invalid $O access level %s." },
  47     { "MCMSG_BAD_CHANSERV_LEVEL", "Invalid $C access level %s." },
  48     { "MCMSG_LEVEL_TOO_LOW", "You cannot set the access requirements for %s (your level is too low.)" },
  49     { "MCMSG_LEVEL_TOO_HIGH", "You cannot set the access requirements to %s (that is too high)." },
  50     { "MCMSG_BAD_OPTION", "Unknown option %s." },
  51     { "MCMSG_MUST_QUALIFY", "You $bMUST$b \"/msg %s@$s %s\" (not just /msg %s)." },
  52     { "MCMSG_ACCOUNT_SUSPENDED", "Your account has been suspended." },
  53     { "MCMSG_CHAN_NOT_REGISTERED", "%s has not been registered with $C." },
  54     { "MCMSG_CHAN_SUSPENDED", "$b$C$b access to $b%s$b has been temporarily suspended (%s)." },
  55     { "MCMSG_NO_CHANNEL_ACCESS", "You lack access to %s." },
  56     { "MCMSG_LOW_CHANNEL_ACCESS", "You lack sufficient access in %s to use this command." },
  57     { "MCMSG_REQUIRES_JOINABLE", "You must be in %s (or on its userlist) to use this command." },
  58     { "MCMSG_MUST_BE_HELPING", "You must have security override (helping mode) on to use this command." },
  59     { "MCMSG_MISSING_COMMAND", "You must specify a command as well as a channel." },
  60     { "MCMSG_NO_CHANNEL_BEFORE", "You may not give a channel name before this command." },
  61     { "MCMSG_NO_PLUS_CHANNEL", "You may not use a +channel with this command." },
  62     { "MCMSG_COMMAND_ALIASES", "%s is an alias for: %s" },
  63     { "MCMSG_HELP_COMMAND_ALIAS", "$uAlias for:$u %s" },
  64     { "MCMSG_HELP_COMMAND_HEADER", "Command help for: $b%s$b" },
  65     { "MCMSG_HELP_COMMAND_UNKNOWN", "No help available for that command." },
  66     { "MCMSG_HELP_TOPIC_HEADER",   "Help topic: $b%s$b" },
  67     { "MCMSG_HELP_DIVIDER", "=---------------------------------------=" },
  68     { "MCMSG_HELP_FOOTER",  "=------------- End of Help -------------=" },
  69     { "MCMSG_COMMAND_BINDING", "%s is a binding of: %s" },
  70     { "MCMSG_ALIAS_ERROR", "Error in alias expansion for %s; check the error log for details." },
  71     { "MCMSG_INTERNAL_COMMAND", "$b%s$b is an internal command and cannot be called directly; please check command bindings." },
  72     { "MCMSG_UNKNOWN_MODULE", "Unknown module %s." },
  73     { "MCMSG_UNKNOWN_SERVICE", "Unknown service %s." },
  74     { "MCMSG_ALREADY_BOUND", "%s already has a command bound as %s." },
  75     { "MCMSG_UNKNOWN_COMMAND_2", "Unknown command name %s (relative to service %s)." },
  76     { "MCMSG_COMMAND_MODIFIED", "Option $b%s$b for $b%s$b has been set." },
  77     { "MCMSG_INSPECTION_REFUSED", "You do not have access to inspect command %s." },
  78     { "MCMSG_CANNOT_DOUBLE_ALIAS", "You cannot bind to a complex (argument-carrying) bind." },
  79     { "MCMSG_BAD_ALIAS_ARGUMENT", "Invalid alias argument $b%s$b." },
  80     { "MCMSG_COMMAND_BOUND", "New command %s bound to %s." },
  81     { "MCMSG_MODULE_BOUND", "Bound %d commands from %s to %s." },
  82     { "MCMSG_NO_COMMAND_BOUND", "%s has nothing bound as command %s." },
  83     { "MCMSG_UNBIND_PROHIBITED", "It wouldn't be very much fun to unbind the last %s command, now would it?" },
  84     { "MCMSG_COMMAND_UNBOUND", "Unbound command %s from %s." },
  85     { "MCMSG_HELPFILE_UNBOUND", "Since that was the last command from module %s on the service, the helpfile for %s was removed." },
  86     { "MCMSG_NO_HELPFILE", "Module %s does not have a help file." },
  87     { "MCMSG_HELPFILE_ERROR", "Syntax error reading %s; help contents not changed." },
  88     { "MCMSG_HELPFILE_READ", "Read %s help database in "FMT_TIME_T".%03lu seconds." },
  89     { "MCMSG_COMMAND_TIME", "Command $b%s$b finished in "FMT_TIME_T".%06lu seconds." },
  90     { "MCMSG_NEED_OPSERV_LEVEL", "You must have $O access of at least $b%u$b." },
  91     { "MCMSG_NEED_CHANSERV_LEVEL", "You must have $C access of at least $b%u$b in the channel." },
  92     { "MCMSG_NEED_ACCOUNT_FLAGS", "You must have account flags $b%s$b." },
  93     { "MCMSG_NEED_NOTHING", "Anyone may use the $b%s$b command." },
  94     { "MCMSG_NEED_STAFF_ACCESS", "You must be network staff." },
  95     { "MCMSG_NEED_STAFF_OPER", "You must be an IRC operator." },
  96     { "MCMSG_NEED_STAFF_NETHELPER", "You must be a network helper." },
  97     { "MCMSG_NEED_STAFF_NETHELPER_OR_OPER", "You must be a network helper or IRC operator." },
  98     { "MCMSG_NEED_STAFF_SHELPER", "You must be a support helper." },
  99     { "MCMSG_NEED_STAFF_SHELPER_OR_OPER", "You must be a support helper or IRC operator." },
 100     { "MCMSG_NEED_STAFF_HELPER", "You must be a network or support helper." },
 101     { "MCMSG_NEED_JOINABLE", "The channel must be open or you must be in the channel or on its userlist." },
 102     { "MCMSG_NEED_CHANUSER_CSUSPENDABLE", "You must be on the channel's userlist, and the channel can be suspended." },
 103     { "MCMSG_NEED_CHANUSER", "You must be on the channel's userlist." },
 104     { "MCMSG_NEED_REGCHAN", "You must specify a channel registered with $C." },
 105     { "MCMSG_NEED_CHANNEL", "You must specify a channel that exists." },
 106     { "MCMSG_NEED_AUTHED", "You must be authenticated with $N." },
 107     { "MCMSG_IS_TOY", "$b%s$b is a toy command." },
 108     { "MCMSG_END_REQUIREMENTS", "End of requirements for $b%s$b." },
 109     { "MCMSG_ALREADY_HELPING", "You already have security override enabled." },
 110     { "MCMSG_ALREADY_NOT_HELPING", "You already have security override disabled." },
 111     { "MCMSG_NOW_HELPING", "Security override has been enabled." },
 112     { "MCMSG_NOW_NOT_HELPING", "Security override has been disabled." },
 113     { "MCMSG_JOINER_CHOICES", "Subcommands of %s: %s" },
 114     { "MCMSG_MODULE_INFO", "Commands exported by module $b%s$b:" },
 115     { "MCMSG_SERVICE_INFO", "Commands bound to service $b%s$b:" },
 116     { "MCMSG_TOYS_DISABLED", "Toys are disabled in %s." },
 117     { "MCMSG_PUBLIC_DENY", "Public commands in $b%s$b are restricted." },
 118     { "MCMSG_HELPFILE_SEQUENCE", "Help priority %d: %s" },
 119     { "MCMSG_HELPFILE_SEQUENCE_SET", "Set helpfile priority sequence for %s." },
 120     { "MCMSG_BAD_SERVICE_NICK", "$b%s$b is an invalid nickname." },
 121     { "MCMSG_ALREADY_SERVICE", "$b%s$b is already a service." },
 122     { "MCMSG_NEW_SERVICE", "Added new service bot $b%s$b." },
 123     { "MCMSG_SERVICE_RENAMED", "Service renamed to $b%s$b." },
 124     { "MCMSG_NO_TRIGGER", "$b%s$b does not have an in-channel trigger." },
 125     { "MCMSG_REMOVED_TRIGGER", "Removed trigger from $b%s$b." },
 126     { "MCMSG_DUPLICATE_TRIGGER", "$b%s$b already uses trigger $b%c$b." },
 127     { "MCMSG_CURRENT_TRIGGER", "Trigger for $b%s$b is $b%c$b." },
 128     { "MCMSG_NEW_TRIGGER", "Changed trigger for $b%s$b to $b%c$b." },
 129     { "MCMSG_SERVICE_PRIVILEGED", "Service $b%s$b privileged: $b%s$b." },
 130     { "MCMSG_SERVICE_REMOVED", "Service $b%s$b has been deleted." },
 131     { "MCMSG_FILE_NOT_OPENED", "Unable to open file $b%s$b for writing." },
 132     { "MCMSG_MESSAGES_DUMPED", "Messages written to $b%s$b." },
 133     { "MCMSG_MESSAGE_DUMP_FAILED", "Message dump failed: %s." },
 134     { "MCMSG_COMMAND_FLAGS", "Command flags are %s (inferred: %s)." },
 135     { "MCMSG_COMMAND_ACCOUNT_FLAGS", "Requires account flags +%s, prohibits account flags +%s." },
 136     { "MCMSG_COMMAND_ACCESS_LEVEL", "Requires channel access %d and $O access %d." },
 137     { "MCMSG_COMMAND_USES", "%s has been used %d times." },
 138     { "MCMSG_GOD_EXPIRED", "Security override expired." },
 139     { NULL, NULL }
 140 };
 141 struct userData *_GetChannelUser(struct chanData *channel, struct handle_info *handle, int override, int allow_suspended);
 142
 143 #define ACTION_ALLOW     1
 144 #define ACTION_OVERRIDE  2
 145 #define ACTION_NOCHANNEL 4
 146 #define ACTION_STAFF     8
 147
 148 #define RESOLVE_DEPTH    4
 149
 150 static struct modcmd_flag {
 151     const char *name;
 152     unsigned int flag;
 153 } modcmd_flags[] = {
 154     { "acceptchan", MODCMD_ACCEPT_CHANNEL },
 155     { "acceptpluschan", MODCMD_ACCEPT_PCHANNEL },
 156     { "authed", MODCMD_REQUIRE_AUTHED },
 157     { "channel", MODCMD_REQUIRE_CHANNEL },
 158     { "chanuser", MODCMD_REQUIRE_CHANUSER },
 159     { "disabled", MODCMD_DISABLED },
 160     { "helping", MODCMD_REQUIRE_HELPING },
 161     { "ignore_csuspend", MODCMD_IGNORE_CSUSPEND },
 162     { "joinable", MODCMD_REQUIRE_JOINABLE },
 163     { "keepbound", MODCMD_KEEP_BOUND },
 164     { "loghostmask", MODCMD_LOG_HOSTMASK },
 165     { "networkhelper", MODCMD_REQUIRE_NETWORK_HELPER },
 166     { "never_csuspend", MODCMD_NEVER_CSUSPEND },
 167     { "nolog", MODCMD_NO_LOG },
 168     { "oper", MODCMD_REQUIRE_OPER },
 169     { "qualified", MODCMD_REQUIRE_QUALIFIED },
 170     { "regchan", MODCMD_REQUIRE_REGCHAN },
 171     { "supporthelper", MODCMD_REQUIRE_SUPPORT_HELPER },
 172     { "toy", MODCMD_TOY },
 173     { NULL, 0 }
 174 };
 175
 176 static int
 177 flags_bsearch(const void *a, const void *b) {
 178     const char *key = a;
 179     const struct modcmd_flag *flag = b;
 180     return ircncasecmp(key, flag->name, strlen(flag->name));
 181 }
 182
 183 static int
 184 flags_qsort(const void *a, const void *b) {
 185     const struct modcmd_flag *fa = a, *fb = b;
 186     return irccasecmp(fa->name, fb->name);
 187 }
 188
 189 DEFINE_LIST(svccmd_list, struct svccmd*)
 190 DEFINE_LIST(module_list, struct module*)
 191
 192 static void
 193 free_service_command(void *data) {
 194     struct svccmd *svccmd;
 195     unsigned int nn;
 196
 197     svccmd = data;
 198     if (svccmd->alias.used) {
 199         for (nn=0; nn<svccmd->alias.used; ++nn)
 200             free(svccmd->alias.list[nn]);
 201         free(svccmd->alias.list);
 202     }
 203     free(svccmd->name);
 204     free(svccmd);
 205 }
 206
 207 static void
 208 free_service(void *data) {
 209     struct service *service = data;
 210     dict_delete(service->commands);
 211     module_list_clean(&service->modules);
 212     free(service);
 213 }
 214
 215 static void
 216 free_module_command(void *data) {
 217     struct modcmd *modcmd = data;
 218     free_service_command(modcmd->defaults);
 219     free(modcmd->name);
 220     free(modcmd);
 221 }
 222
 223 static void
 224 free_module(void *data) {
 225     struct module *module = data;
 226     dict_delete(module->commands);
 227     close_helpfile(module->helpfile);
 228     free(module->name);
 229     free(module);
 230 }
 231
 232 struct module *
 233 module_register(const char *name, struct log_type *clog, const char *helpfile_name, expand_func_t expand_help) {
 234     struct module *newmod;
 235
 236     newmod = calloc(1, sizeof(*newmod));
 237     newmod->name = strdup(name);
 238     newmod->commands = dict_new();
 239     dict_set_free_data(newmod->commands, free_module_command);
 240     newmod->clog = clog;
 241     newmod->helpfile_name = helpfile_name;
 242     newmod->expand_help = expand_help;
 243     if (newmod->helpfile_name) {
 244         newmod->helpfile = open_helpfile(newmod->helpfile_name, newmod->expand_help);
 245     }
 246     dict_insert(modules, newmod->name, newmod);
 247     return newmod;
 248 }
 249
 250 struct module *
 251 module_find(const char *name) {
 252     return dict_find(modules, name, NULL);
 253 }
 254
 255 static void
 256 add_pending_template(struct svccmd *cmd, const char *target) {
 257     struct pending_template *pending = calloc(1, sizeof(*pending));
 258     pending->cmd = cmd;
 259     pending->base = strdup(target);
 260     pending->next = pending_templates;
 261     pending_templates = pending;
 262 }
 263
 264 struct svccmd *
 265 svccmd_resolve_name(struct svccmd *origin, const char *name) {
 266     char *sep, svcname[MAXLEN];
 267
 268     if ((sep = strchr(name, '.'))) {
 269         memcpy(svcname, name, sep-name);
 270         svcname[sep-name] = 0;
 271         name = sep + 1;
 272         if (svcname[0] == '*') {
 273             struct module *module = module_find(svcname+1);
 274             struct modcmd *cmd = module ? dict_find(module->commands, name, NULL) : NULL;
 275             return cmd ? cmd->defaults : NULL;
 276         } else {
 277             struct service *service = service_find(svcname);
 278             return service ? dict_find(service->commands, name, NULL) : NULL;
 279         }
 280     } else {
 281         if (origin->parent) {
 282             return dict_find(origin->parent->commands, name, NULL);
 283         } else {
 284             struct modcmd *cmd = dict_find(origin->command->parent->commands, name, NULL);
 285             return cmd ? cmd->defaults : NULL;
 286         }
 287     }
 288 }
 289
 290 static void
 291 modcmd_set_effective_flags(struct svccmd *cmd) {
 292     int flags = cmd->flags | cmd->command->flags;
 293     if (cmd->min_opserv_level > 0)
 294         flags |= MODCMD_REQUIRE_OPER;
 295     if (cmd->min_channel_access > 0)
 296         flags |= MODCMD_REQUIRE_CHANUSER;
 297     if (flags & MODCMD_REQUIRE_CHANUSER)
 298         flags |= MODCMD_REQUIRE_REGCHAN;
 299     if (flags & MODCMD_REQUIRE_REGCHAN)
 300         flags |= MODCMD_REQUIRE_CHANNEL;
 301     if (flags & (MODCMD_REQUIRE_STAFF|MODCMD_REQUIRE_HELPING))
 302         flags |= MODCMD_REQUIRE_AUTHED;
 303     cmd->effective_flags = flags;
 304 }
 305
 306 static void
 307 svccmd_copy_rules(struct svccmd *dest, struct svccmd *src) {
 308     dest->flags |= src->flags;
 309     dest->req_account_flags |= src->req_account_flags;
 310     dest->deny_account_flags |= src->deny_account_flags;
 311     if (src->min_opserv_level > dest->min_opserv_level)
 312         dest->min_opserv_level = src->min_opserv_level;
 313     if (src->min_channel_access > dest->min_channel_access)
 314         dest->min_channel_access = src->min_channel_access;
 315     modcmd_set_effective_flags(dest);
 316 }
 317
 318 static int
 319 svccmd_configure(struct svccmd *cmd, struct userNode *user, struct userNode *bot, const char *param, const char *value) {
 320     if (!irccasecmp(param, "flags")) {
 321         unsigned int set_flags, rem_flags;
 322         struct modcmd_flag *flag;
 323         int opt, end;
 324
 325         for (set_flags = rem_flags = 0; 1; value += end) {
 326             end = strcspn(value, ",");
 327             if (*value == '+')
 328                 opt = 1;
 329             else if (*value == '-')
 330                 opt = 0;
 331             else {
 332                 if (user)
 333                     send_message(user, bot, "MCMSG_BARE_FLAG", end, value);
 334                 else
 335                     log_module(MAIN_LOG, LOG_ERROR, "Flag %.*s must be preceded by a + or - (for command %s).", end, value, cmd->name);
 336                 return 0;
 337             }
 338             value++;
 339             flag = bsearch(value, modcmd_flags, ArrayLength(modcmd_flags)-1, sizeof(modcmd_flags[0]), flags_bsearch);
 340             if (!flag) {
 341                 if (user)
 342                     send_message(user, bot, "MCMSG_UNKNOWN_FLAG", end, value);
 343                 else
 344                     log_module(MAIN_LOG, LOG_ERROR, "Unknown module flag %.*s (for command %s).", end, value, cmd->name);
 345                 return 0;
 346             }
 347             if (opt)
 348                 set_flags |= flag->flag, rem_flags &= ~flag->flag;
 349             else
 350                 rem_flags |= flag->flag, set_flags &= ~flag->flag;
 351             if (!value[end-1])
 352                 break;
 353         }
 354         cmd->flags = (cmd->flags | set_flags) & ~rem_flags;
 355         return 1;
 356     } else if (!irccasecmp(param, "channel_level") || !irccasecmp(param, "channel_access") || !irccasecmp(param, "access")) {
 357         unsigned short ul;
 358         if (!irccasecmp(value, "none") || !irccasecmp(value, "0")) {
 359             cmd->min_channel_access = 0;
 360             return 1;
 361         } else if ((ul = user_level_from_name(value, UL_OWNER)) > 0) {
 362             cmd->min_channel_access = ul;
 363             return 1;
 364         } else if (user) {
 365             send_message(user, bot, "MCMSG_BAD_CHANSERV_LEVEL", value);
 366             return 0;
 367         } else {
 368             log_module(MAIN_LOG, LOG_ERROR, "Invalid ChanServ access level %s (for command %s).", value, cmd->name);
 369             return 0;
 370         }
 371     } else if (!irccasecmp(param, "oper_level") || !irccasecmp(param, "oper_access") || !irccasecmp(param, "level")) {
 372         unsigned int newval = atoi(value);
 373         if (!isdigit(value[0]) || (newval > 1000)) {
 374             if (user)
 375                 send_message(user, bot, "MCMSG_BAD_OPSERV_LEVEL", value);
 376             else
 377                 log_module(MAIN_LOG, LOG_ERROR, "Invalid OpServ access level %s (for command %s).", value, cmd->name);
 378             return 0;
 379         }
 380         if (user && (!user->handle_info || (cmd->min_opserv_level > user->handle_info->opserv_level))) {
 381             send_message(user, bot, "MCMSG_LEVEL_TOO_LOW", cmd->name);
 382             return 0;
 383         }
 384         if (user && (!user->handle_info || (newval > user->handle_info->opserv_level))) {
 385             send_message(user, bot, "MCMSG_LEVEL_TOO_HIGH", value);
 386             return 0;
 387         }
 388         cmd->min_opserv_level = newval;
 389         return 1;
 390     } else if (!irccasecmp(param, "account_flags")) {
 391         return nickserv_modify_handle_flags(user, bot, value, &cmd->req_account_flags, &cmd->deny_account_flags);
 392     } else {
 393         if (user)
 394             send_message(user, bot, "MCMSG_BAD_OPTION", param);
 395         else
 396             log_module(MAIN_LOG, LOG_ERROR, "Unknown option %s (for command %s).", param, cmd->name);
 397         return 0;
 398     }
 399 }
 400
 401 struct modcmd *
 402 modcmd_register(struct module *module, const char *name, modcmd_func_t func, unsigned int min_argc, unsigned int flags, ...) {
 403     struct modcmd *newcmd;
 404     va_list args;
 405     const char *param, *value;
 406
 407     newcmd = calloc(1, sizeof(*newcmd));
 408     newcmd->name = strdup(name);
 409     newcmd->parent = module;
 410     newcmd->func = func;
 411     newcmd->min_argc = min_argc;
 412     newcmd->flags = flags;
 413     newcmd->defaults = calloc(1, sizeof(*newcmd->defaults));
 414     newcmd->defaults->name = strdup(newcmd->name);
 415     newcmd->defaults->command = newcmd;
 416     dict_insert(module->commands, newcmd->name, newcmd);
 417     if (newcmd->flags & (MODCMD_REQUIRE_REGCHAN|MODCMD_REQUIRE_CHANNEL|MODCMD_REQUIRE_CHANUSER|MODCMD_REQUIRE_JOINABLE)) {
 418         newcmd->defaults->flags |= MODCMD_ACCEPT_CHANNEL;
 419     }
 420     if (newcmd->flags & MODCMD_REQUIRE_STAFF) {
 421         newcmd->defaults->flags |= MODCMD_REQUIRE_AUTHED;
 422     }
 423     va_start(args, flags);
 424     while ((param = va_arg(args, const char*))) {
 425         value = va_arg(args, const char*);
 426         if (!irccasecmp(param, "template")) {
 427             struct svccmd *svccmd = svccmd_resolve_name(newcmd->defaults, value);
 428             if (svccmd) {
 429                 svccmd_copy_rules(newcmd->defaults, svccmd);
 430             } else {
 431                 log_module(MAIN_LOG, LOG_ERROR, "Unable to resolve template name %s for %s.%s.", value, newcmd->parent->name, newcmd->name);
 432             }
 433             add_pending_template(newcmd->defaults, value);
 434         } else {
 435             svccmd_configure(newcmd->defaults, NULL, NULL, param, value);
 436         }
 437     }
 438     modcmd_set_effective_flags(newcmd->defaults);
 439     va_end(args);
 440     return newcmd;
 441 }
 442
 443 /* This is kind of a lame hack, but it is actually simpler than having
 444  * the permission check vary based on the command itself, or having a
 445  * more generic rule system.
 446  */
 447 int
 448 svccmd_can_invoke(struct userNode *user, struct userNode *bot, struct svccmd *cmd, struct chanNode *channel, int options) {
 449     extern struct userNode *chanserv;
 450     unsigned int uData_checked = 0;
 451     struct userData *uData = NULL;
 452     int rflags = 0, flags = cmd->effective_flags;
 453
 454     if (flags & MODCMD_DISABLED) {
 455         if (options & SVCCMD_NOISY)
 456             send_message(user, bot, "MSG_COMMAND_DISABLED", cmd->name);
 457         return 0;
 458     }
 459     if ((flags & MODCMD_REQUIRE_QUALIFIED) && !(options & SVCCMD_QUALIFIED)) {
 460         if (options & SVCCMD_NOISY)
 461             send_message(user, bot, "MCMSG_MUST_QUALIFY", bot->nick, cmd->name, bot->nick);
 462         return 0;
 463     }
 464     if (flags & MODCMD_REQUIRE_AUTHED) {
 465         if (!user->handle_info) {
 466             if (options & SVCCMD_NOISY)
 467                 send_message(user, bot, "MSG_AUTHENTICATE");
 468             return 0;
 469         }
 470         if (HANDLE_FLAGGED(user->handle_info, SUSPENDED)) {
 471             if (options & SVCCMD_NOISY)
 472                 send_message(user, bot, "MCMSG_ACCOUNT_SUSPENDED");
 473             return 0;
 474         }
 475     }
 476     if (channel || (options & SVCCMD_NOISY)) {
 477         if ((flags & MODCMD_REQUIRE_CHANNEL) && !channel) {
 478             if (options & SVCCMD_NOISY)
 479                 send_message(user, bot, "MSG_INVALID_CHANNEL");
 480             return 0;
 481         }
 482         if (flags & MODCMD_REQUIRE_REGCHAN) {
 483             if (!chanserv) {
 484                 /* Just use the inferred MODCMD_REQUIRE_CHANNEL. */
 485             } else if (!channel->channel_info) {
 486                 if (options & SVCCMD_NOISY)
 487                     send_message(user, bot, "MCMSG_CHAN_NOT_REGISTERED", channel->name);
 488                 return 0;
 489             } else if (IsSuspended(channel->channel_info) && !(flags & MODCMD_IGNORE_CSUSPEND)) {
 490                 /* Allow security-override users to ignore most channel
 491                  * suspensions, but flag that use as a staff command.
 492                  */
 493                 if (!IsHelping(user) || (flags & MODCMD_NEVER_CSUSPEND)) {
 494                     if (options & SVCCMD_NOISY)
 495                         send_message(user, bot, "MCMSG_CHAN_SUSPENDED", channel->name, channel->channel_info->suspended->reason);
 496                     return 0;
 497                 }
 498                 rflags |= ACTION_STAFF;
 499             }
 500         }
 501         if (flags & MODCMD_REQUIRE_CHANUSER) {
 502             if (!uData_checked)
 503                 uData = _GetChannelUser(channel->channel_info, user->handle_info, 1, 0), uData_checked = 1;
 504             if (!chanserv) {
 505                 /* Assume someone knows what they're doing. */
 506             } else if (!uData) {
 507                 if (options & SVCCMD_NOISY)
 508                     send_message(user, bot, "MCMSG_NO_CHANNEL_ACCESS", channel->name);
 509                 return 0;
 510             } else if (uData->access < cmd->min_channel_access) {
 511                 if (options & SVCCMD_NOISY)
 512                     send_message(user, bot, "MCMSG_LOW_CHANNEL_ACCESS", channel->name);
 513                 return 0;
 514             }
 515         }
 516         if ((flags & MODCMD_REQUIRE_JOINABLE) && channel) {
 517             if (!uData_checked)
 518                 uData = _GetChannelUser(channel->channel_info, user->handle_info, 1, 0), uData_checked = 1;
 519             if ((channel->modes & (MODE_INVITEONLY|MODE_KEY|MODE_SECRET))
 520                 && !uData
 521                 && !IsService(user)
 522                 && !GetUserMode(channel, user)) {
 523                 if (options & SVCCMD_NOISY)
 524                     send_message(user, bot, "MCMSG_REQUIRES_JOINABLE", channel->name);
 525                 return 0;
 526             }
 527         }
 528         if ((flags & MODCMD_TOY) && channel) {
 529             if (!channel->channel_info)
 530                 rflags |= ACTION_NOCHANNEL;
 531             else switch (channel->channel_info->chOpts[chToys]) {
 532             case 'd':
 533                 if (options & SVCCMD_NOISY)
 534                     send_message(user, bot, "MCMSG_TOYS_DISABLED", channel->name);
 535                 return 0;
 536             case 'n':
 537                 rflags |= ACTION_NOCHANNEL;
 538                 break;
 539             case 'p':
 540                 break;
 541             }
 542         }
 543     }
 544     if (flags & MODCMD_REQUIRE_STAFF) {
 545         if (((flags & MODCMD_REQUIRE_OPER) && IsOper(user))
 546             || ((flags & MODCMD_REQUIRE_NETWORK_HELPER) && IsNetworkHelper(user))
 547             || ((flags & MODCMD_REQUIRE_SUPPORT_HELPER) && IsSupportHelper(user))) {
 548             /* allow it */
 549             rflags |= ACTION_STAFF;
 550         } else {
 551             if (options & SVCCMD_NOISY)
 552                 send_message(user, bot, "MSG_COMMAND_PRIVILEGED", cmd->name);
 553             return 0;
 554         }
 555     }
 556     if (flags & MODCMD_REQUIRE_HELPING) {
 557         if (!HANDLE_FLAGGED(user->handle_info, HELPING)) {
 558             if (options & SVCCMD_NOISY)
 559                 send_message(user, bot, "MCMSG_MUST_BE_HELPING");
 560             return 0;
 561         }
 562         rflags |= ACTION_STAFF;
 563     }
 564     if (cmd->min_opserv_level > 0) {
 565         if (!oper_has_access(user, bot, cmd->min_opserv_level, !(options & SVCCMD_NOISY)))
 566           return 0;
 567         rflags |= ACTION_STAFF;
 568     }
 569     if (cmd->req_account_flags || cmd->deny_account_flags) {
 570         if (!user->handle_info) {
 571             if (options & SVCCMD_NOISY)
 572                 send_message(user, bot, "MSG_AUTHENTICATE");
 573             return 0;
 574         }
 575         /* Do we want separate or different messages here? */
 576         if ((cmd->req_account_flags & ~user->handle_info->flags)
 577             || (cmd->deny_account_flags & user->handle_info->flags)) {
 578             if (options & SVCCMD_NOISY)
 579                 send_message(user, bot, "MSG_COMMAND_PRIVILEGED", cmd->name);
 580             return 0;
 581         }
 582     }
 583
 584     /* If it's an override, return a special value. */
 585     if ((flags & MODCMD_REQUIRE_CHANUSER)
 586         && (options & SVCCMD_NOISY)
 587         && (!uData || (uData->access > 500))
 588         && (!(uData = _GetChannelUser(channel->channel_info, user->handle_info, 0, 0))
 589             || uData->access < cmd->min_channel_access)
 590         && !(flags & (MODCMD_REQUIRE_STAFF|MODCMD_REQUIRE_HELPING))) {
 591         rflags |= ACTION_OVERRIDE;
 592     }
 593     return rflags | ACTION_ALLOW;
 594 }
 595
 596 static int
 597 svccmd_expand_alias(struct svccmd *cmd, struct userNode *user, unsigned int old_argc, char *old_argv[], char *new_argv[]) {
 598     unsigned int ii, new_argc;
 599     char *arg, *altarg;
 600
 601     for (ii=new_argc=0; ii<cmd->alias.used; ++ii) {
 602         altarg = NULL;
 603         arg = cmd->alias.list[ii];
 604         if (arg[0] != '$') {
 605             new_argv[new_argc++] = arg;
 606             continue;
 607         }
 608         if (arg[1] == '$') {
 609             new_argv[new_argc++] = arg + 1;
 610         } else if (isdigit(arg[1])) {
 611             unsigned int lbound, ubound, jj;
 612             char *end_num;
 613
 614             lbound = strtoul(arg+1, &end_num, 10);
 615             switch (end_num[0]) {
 616             case 0: ubound = lbound; break;
 617             case 'a':
 618                 altarg = (user && user->handle_info) ? user->handle_info->handle : "(account)";
 619                 break;
 620             case 'n':
 621                 altarg = user ? user->nick : "(nick)";
 622                 break;
 623             case 'm':
 624 #ifdef WITH_PROTOCOL_P10
 625                 altarg = user ? user->numeric : "(numnick)";
 626 #else
 627                 altarg = "(This ircd protocol has no numnicks!)";
 628 #endif
 629                 break;
 630             case '-':
 631                 if (end_num[1] == 0) {
 632                     ubound = old_argc - 1;
 633                     break;
 634                 } else if (isdigit(end_num[1])) {
 635                     ubound = strtoul(end_num+1, NULL, 10);
 636                     break;
 637                 }
 638                 /* else fall through to default case */
 639             default:
 640                 log_module(MAIN_LOG, LOG_ERROR, "Alias expansion parse error in %s (near %s; %s.%s arg %d).", arg, end_num, cmd->parent->bot->nick, cmd->name, ii);
 641                 return 0;
 642             }
 643             if (altarg != NULL) {
 644                 if (end_num[1] != 0) {
 645                     if ((end_num[1] == '-') && (end_num[2] == 0))
 646                         ubound = old_argc - 1;
 647                     else if ((end_num[1] == '-') && (isdigit(end_num[2])))
 648                         ubound = strtoul(end_num+2, NULL, 10);
 649                     else {
 650                         log_module(MAIN_LOG, LOG_ERROR, "Alias expansion parse error in %s (near %s; %s.%s arg %d).", arg, end_num, cmd->parent->bot->nick, cmd->name, ii);
 651                         return 0;
 652                     }
 653                 } else {
 654                     ubound = lbound;
 655                 }
 656                 if (lbound >= old_argc)
 657                     new_argv[new_argc++] = altarg;
 658             }
 659             if (ubound >= old_argc)
 660                 ubound = old_argc - 1;
 661             if (lbound < old_argc)
 662                 for (jj = lbound; jj <= ubound; )
 663                     new_argv[new_argc++] = old_argv[jj++];
 664         } else {
 665             switch(arg[1]) {
 666                 case 'a':
 667                     new_argv[new_argc++] = (user && user->handle_info) ? user->handle_info->handle : "(account)";
 668                     break;
 669                 case 'n':
 670                     new_argv[new_argc++] = user ? user->nick : "(nick)";
 671                     break;
 672                 case 'm':
 673 #ifdef WITH_PROTOCOL_P10
 674                     new_argv[new_argc++] = user ? user->numeric : "(numnick)";
 675 #else
 676                     new_argv[new_argc++] = "(This ircd protocol has no numnicks!)";
 677 #endif
 678                     break;
 679                 default:
 680                     log_module(MAIN_LOG, LOG_ERROR, "Alias expansion: I do not know how to handle %s (%s.%s arg %d).", arg, cmd->parent->bot->nick, cmd->name, ii);
 681                     return 0;
 682             }
 683         }
 684     }
 685     return new_argc;
 686 }
 687
 688 int
 689 svccmd_invoke_argv(struct userNode *user, struct service *service, struct chanNode *channel, unsigned int argc, char *argv[], unsigned int server_qualified) {
 690     extern struct userNode *chanserv;
 691     struct svccmd *cmd;
 692     unsigned int cmd_arg, perms, flags, options, result;
 693     char channel_name[CHANNELLEN+1];
 694
 695     options = (server_qualified ? SVCCMD_QUALIFIED : 0) | SVCCMD_DEBIT | SVCCMD_NOISY;
 696     /* Find the command argument. */
 697     cmd_arg = IsChannelName(argv[0]) ? 1 : 0;
 698     if (argc < cmd_arg+1) {
 699         send_message(user, service->bot, "MCMSG_MISSING_COMMAND");
 700         return 0;
 701     }
 702     if (!isalnum(*argv[cmd_arg])) {
 703         /* Silently ignore stuff that doesn't begin with a letter or number. */
 704         return 0;
 705     }
 706     cmd = dict_find(service->commands, argv[cmd_arg], NULL);
 707     if (!cmd) {
 708         if (!channel)
 709             send_message(user, service->bot, "MSG_COMMAND_UNKNOWN", argv[cmd_arg]);
 710         return 0;
 711     }
 712
 713     /* Check pubcmd for the channel. */
 714     if (channel && (channel->channel_info) && (service->bot == chanserv)
 715         && !check_user_level(channel, user, lvlPubCmd, 1, 0)) {
 716         send_message(user, service->bot, "MCMSG_PUBLIC_DENY", channel->name);
 717         return 0;
 718     }
 719
 720     flags = cmd->effective_flags;
 721     /* If they put a channel name first, check if the command allows
 722      * it.  If so, swap it with the command name.
 723      */
 724     if (cmd_arg == 1) {
 725         char *tmp;
 726         /* Complain if we're not supposed to accept the channel. */
 727         if (!(flags & MODCMD_ACCEPT_CHANNEL)) {
 728             send_message(user, service->bot, "MCMSG_NO_CHANNEL_BEFORE");
 729             return 0;
 730         }
 731         if (!(flags & MODCMD_ACCEPT_PCHANNEL)
 732             && (argv[0][0] == '+')) {
 733             send_message(user, service->bot, "MCMSG_NO_PLUS_CHANNEL");
 734             return 0;
 735         }
 736         tmp = argv[1];
 737         argv[1] = argv[0];
 738         argv[0] = tmp;
 739     }
 740
 741     /* Try to grab a channel handle before alias expansion.
 742      * If the command accepts a channel name, and argv[1] is
 743      * one, use it as a channel name, and hide it from logging.
 744      */
 745     if ((argc > 1)
 746         && (flags & MODCMD_ACCEPT_CHANNEL)
 747         && IsChannelName(argv[1])
 748         && ((argv[1][0] != '+') || (flags & MODCMD_ACCEPT_PCHANNEL))
 749         && (channel = dict_find(channels, argv[1], NULL))) {
 750         argv[1] = argv[0];
 751         argv++, argc--;
 752         cmd_arg = 1;
 753     }
 754
 755     /* Expand the alias arguments, if there are any. */
 756     if (cmd->alias.used) {
 757         char *new_argv[MAXNUMPARAMS];
 758         int res;
 759
 760         res = svccmd_expand_alias(cmd, user, argc, argv, new_argv);
 761         if (res < 0) {
 762             send_message(user, service->bot, "MSG_MISSING_PARAMS", cmd->name);
 763             return 0;
 764         } else if (res == 0) {
 765             send_message(user, service->bot, "MCMSG_ALIAS_ERROR", cmd->name);
 766             return 0;
 767         }
 768         argc = res;
 769         argv = new_argv;
 770
 771         /* Try again to grab a handle to the channel after alias
 772          * expansion, overwriting any previous channel. This should,
 773          * of course, only be done again if an alias was acually
 774          * expanded. */
 775         if ((argc > 1)
 776             && (flags & MODCMD_ACCEPT_CHANNEL)
 777             && IsChannelName(argv[1])
 778             && ((argv[1][0] != '+') || (flags & MODCMD_ACCEPT_PCHANNEL))
 779             && (channel = dict_find(channels, argv[1], NULL))) {
 780             argv[1] = argv[0];
 781             argv++, argc--;
 782             cmd_arg = 1;
 783         }
 784     }
 785
 786     /* Figure out what actions we should do for it.. */
 787     if (cmd_arg && (flags & MODCMD_TOY)) {
 788         /* Do not let user manually specify a channel. */
 789         channel = NULL;
 790     }
 791     if (argc < cmd->command->min_argc) {
 792         send_message(user, service->bot, "MSG_MISSING_PARAMS", cmd->name);
 793         svccmd_send_help_brief(user, service->bot, cmd);
 794         return 0;
 795     }
 796     if (!cmd->command->func) {
 797         send_message(user, service->bot, "MCMSG_INTERNAL_COMMAND", cmd->name);
 798         return 0;
 799     }
 800     perms = svccmd_can_invoke(user, service->bot, cmd, channel, options);
 801     if (!perms)
 802         return 0;
 803     cmd->uses++;
 804     if (perms & ACTION_NOCHANNEL)
 805         channel = NULL;
 806
 807     if (channel)
 808         safestrncpy(channel_name, channel->name, sizeof(channel_name));
 809     else
 810         channel_name[0] = 0;
 811     if (!(result = cmd->command->func(user, channel, argc, argv, cmd)))
 812         return 0;
 813     if (!(flags & MODCMD_NO_LOG)) {
 814         enum log_severity slvl;
 815         if (result & CMD_LOG_OVERRIDE)
 816             slvl = LOG_OVERRIDE;
 817         else if ((perms & ACTION_STAFF) || (result & CMD_LOG_STAFF))
 818             slvl = LOG_STAFF;
 819         else if (perms & ACTION_OVERRIDE)
 820             slvl = LOG_OVERRIDE;
 821         else
 822             slvl = LOG_COMMAND;
 823         /* Unsplit argv after running the function to get the benefit
 824          * of any mangling/hiding done by the commands. */
 825         log_audit(cmd->command->parent->clog, slvl, user, service->bot, channel_name, AUDIT_HOSTMASK, unsplit_string(argv, argc, NULL));
 826     }
 827     return 1;
 828 }
 829
 830 /* First line (syntax usually) only help.. used for wrong param counts etc */
 831 int
 832 svccmd_send_help_brief(struct userNode *user, struct userNode *bot, struct svccmd *cmd) {
 833     int r;
 834
 835     /* If it's an alias, show what it's an alias for. */
 836     if (cmd->alias.used) {
 837         char alias_text[MAXLEN];
 838         unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
 839         send_message(user, bot, "MCMSG_COMMAND_ALIASES", cmd->name, cmd->command->name);
 840     }
 841     /* Send the syntax line of help.. */
 842     r = send_help_brief(user, bot, cmd->command->parent->helpfile, cmd->name);
 843     if(!r) {
 844         if(cmd->command->name)
 845         {
 846            send_message(user, bot, "MCMSG_COMMAND_ALIASES", cmd->name, cmd->command->name);
 847            r = send_help_brief(user, bot, cmd->command->parent->helpfile, cmd->command->name);
 848         }
 849     }
 850     return r;
 851 }
 852
 853 int is_joiner(struct svccmd *cmd)
 854 {
 855     if(cmd->command->name)
 856     {
 857         if(strcasecmp("joiner", cmd->command->name))
 858             return(0);
 859         else
 860             return(1);
 861     }
 862     return(0);
 863 /*
 864     if(cmd->alias.used)
 865     {
 866         char alias_text[MAXLEN];
 867         unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
 868         if(strcasecmp("joiner", alias_text))
 869             return(0);
 870         else
 871             return(1);
 872     }
 873 */
 874 }
 875
 876 int
 877 svccmd_send_help(struct userNode *user, struct service *service, const char *topic) {
 878     struct module *module;
 879     struct svccmd *cmd;
 880     char cmdname[MAXLEN];
 881     unsigned int nn, ii;
 882     int helpsent = 0;
 883
 884     /* If there is no topic show the index */
 885     if (!topic)
 886         topic = "<index>";
 887     /* make heading str (uppercase) */
 888     for (nn=0; topic[nn]; nn++)
 889             cmdname[nn] = toupper(topic[nn]);
 890     cmdname[nn] = 0;
 891
 892     /* If there is a command 'topic', send command help for the command (unless its bound to JOINER) */
 893     if ((cmd = dict_find(service->commands, topic, NULL)) && !is_joiner(cmd))
 894     {
 895         send_message(user, service->bot, "MCMSG_HELP_COMMAND_HEADER", cmdname);
 896         send_message(user, service->bot, "MCMSG_HELP_DIVIDER");
 897         helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, cmd->name);
 898
 899         /* Show if its an alias, or a binding of another command */
 900         if (cmd->alias.used)
 901         {
 902             char alias_text[MAXLEN];
 903             unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
 904             send_message(user, service->bot, "MCMSG_HELP_COMMAND_ALIAS", alias_text);
 905             /* If send_help above didnt work, try again with the referenced command.. */
 906             if(!helpsent)
 907                 helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, alias_text);
 908         }
 909         else if(cmd->command->name && strcasecmp(cmd->command->name, cmd->name))
 910         {
 911             send_message(user, service->bot, "MCMSG_HELP_COMMAND_ALIAS", cmd->command->name);
 912             /* If send_help above didnt work, try again with the referenced command.. */
 913             if(!helpsent)
 914                 helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, cmd->command->name);
 915         }
 916         /* If send_help still couldnt find it, tell them sorry */
 917         if(!helpsent)
 918             send_message(user, service->bot, "MCMSG_HELP_COMMAND_UNKNOWN");
 919         send_message(user, service->bot, "MCMSG_HELP_FOOTER");
 920         return true;
 921     }
 922     else /* look for topic in the help files loaded to this nick/service */
 923     {
 924         /* Check for non command help in first primary help file, then next and so on */
 925         /* Note - we need to think about default bindings. see opserv.helpfiles */
 926             for(ii = 0; ii < service->modules.used; ii++)
 927             {
 928                 module = service->modules.list[ii];
 929                 if(!module->helpfile)
 930                     continue;
 931                 if(dict_find(module->helpfile->db, topic, NULL))
 932                 {
 933                     if (module->helpfile && dict_find(module->helpfile->db, topic, NULL))
 934                     {
 935
 936                         send_message(user, service->bot, "MCMSG_HELP_TOPIC_HEADER", cmdname);
 937                         send_message(user, service->bot, "MCMSG_HELP_DIVIDER");
 938                         /* This should never fail but maybe if something is odd? */
 939                         if(!send_help(user, service->bot, module->helpfile, topic))
 940                             send_message(user, service->bot, "MSG_TOPIC_UNKNOWN");
 941                         send_message(user, service->bot, "MCMSG_HELP_FOOTER");
 942                         return true;
 943                     }
 944                 }
 945             }
 946     }
 947     /* Otherwise say we cant find it */
 948     send_message(user, service->bot, "MSG_TOPIC_UNKNOWN");
 949     return 0;
 950 }
 951
 952 static int
 953 svccmd_invoke(struct userNode *user, struct service *service, struct chanNode *channel, const char *text, int server_qualified) {
 954     unsigned int argc;
 955     char *argv[MAXNUMPARAMS];
 956     char tmpline[MAXLEN];
 957
 958     if (!*text)
 959         return 0;
 960     if (service->privileged) {
 961         if (!IsOper(user)) {
 962             send_message(user, service->bot, "MSG_SERVICE_PRIVILEGED", service->bot->nick);
 963             return 0;
 964         }
 965         if (!user->handle_info) {
 966             send_message(user, service->bot, "MSG_AUTHENTICATE");
 967             return 0;
 968         }
 969         if (HANDLE_FLAGGED(user->handle_info, OPER_SUSPENDED)) {
 970             send_message(user, service->bot, "MSG_OPER_SUSPENDED");
 971             return 0;
 972         }
 973     }
 974     safestrncpy(tmpline, text, sizeof(tmpline));
 975     argc = split_line(tmpline, false, ArrayLength(argv), argv);
 976     return argc ? svccmd_invoke_argv(user, service, channel, argc, argv, server_qualified) : 0;
 977 }
 978
 979 char *cvs_verstring() {
 980   static char verstring[MAXLEN] = { 0 };
 981
 982   if(!*verstring) {
 983     char *svn = NULL, *svnver = NULL, *svndate = NULL, *v = 0, ver[MAXLEN];
 984     int vc = 0;
 985
 986     strcpy(ver, CVS_VERSION);
 987     for (svn = x3_strtok(&v, ver, " "); svn;
 988          svn = x3_strtok(&v, 0, " ")) {
 989         if (vc == 2)
 990             svnver = svn;
 991         else if (vc == 3)
 992             svndate = svn;
 993         vc++;
 994     }
 995     sprintf(verstring, "%s %s", svnver, svndate);
 996   }
 997   return verstring;
 998 }
 999
1000
1001 void
1002 modcmd_privmsg(struct userNode *user, struct userNode *bot, const char *text, int server_qualified) {
1003     struct service *service;
1004
1005     if (!(service = dict_find(services, bot->nick, NULL))) {
1006         log_module(MAIN_LOG, LOG_ERROR, "modcmd_privmsg got privmsg for unhandled service %s, unregistering.", bot->nick);
1007         reg_privmsg_func(bot, NULL);
1008         return;
1009     }
1010
1011     if (text[0] == '\x01') {
1012         char *term, response[MAXLEN];
1013
1014         text++; /* Skip leading ^A. */
1015         /* Chop off final ^A. */
1016         term = strchr(text, '\x01');
1017         if (!term)
1018             return;
1019         *term = '\0';
1020         /* Parse out leading text. */
1021         term = strchr(text, ' ');
1022         if (term) {
1023             *term++ = '\0';
1024             if (!*term)
1025                 term = NULL;
1026         }
1027         /* No dict lookup since these are so few. */
1028         if (!irccasecmp(text, "CLIENTINFO")) {
1029             /* Use \001 instead of \x01 because apparently \x01C is
1030              * interpreted as ASCII FS (\034, decimal 28, hex 1C).
1031              */
1032             irc_notice_user(bot, user, "\001CLIENTINFO CLIENTINFO PING TIME USERINFO VERSION\x01");
1033         } else if (!irccasecmp(text, "PING")) {
1034             if (term) {
1035                 snprintf(response, sizeof(response), "\x01PING %s\x01", term);
1036                 irc_notice_user(bot, user, response);
1037             } else {
1038                 irc_notice_user(bot,user, "\x01PING\x01");
1039             }
1040         } else if (!irccasecmp(text, "TIME")) {
1041             struct tm tm;
1042             localtime_r(&now, &tm);
1043             strftime(response, sizeof(response), "\x01TIME %a %b %d %H:%M:%S %Y\x01", &tm);
1044             irc_notice_user(bot, user, response);
1045         } else if (!irccasecmp(text, "USERINFO")) {
1046             snprintf(response, sizeof(response), "\x01USERINFO %s\x01", bot->info);
1047             irc_notice_user(bot, user, response);
1048         } else if (!irccasecmp(text, "VERSION")) {
1049             snprintf(response, sizeof(response), "\x01VERSION %s+[%s]\x01", PACKAGE_STRING, cvs_verstring());
1050             irc_notice_user(bot, user, response);
1051         } else if (!irccasecmp(text, "GENDER")) {
1052              snprintf(response, sizeof(response), "\x01GENDER ummm im still deciding\x01");
1053              irc_notice_user(bot, user, response);
1054         }
1055         return;
1056     }
1057
1058     if (service->msg_hook && service->msg_hook(user, bot, text, server_qualified))
1059         return;
1060     svccmd_invoke(user, service, NULL, text, server_qualified);
1061 }
1062
1063 void
1064 modcmd_chanmsg(struct userNode *user, struct chanNode *chan, const char *text, struct userNode *bot, unsigned int is_notice, UNUSED_ARG(void *extra)) {
1065     struct service *service;
1066     if (!(service = dict_find(services, bot->nick, NULL)))
1067         return;
1068     svccmd_invoke(user, service, chan, text, 0);
1069     (void)is_notice;
1070 }
1071
1072 struct service *
1073 service_register(struct userNode *bot) {
1074     struct service *service;
1075     if ((service = dict_find(services, bot->nick, NULL)))
1076         return service;
1077     service = calloc(1, sizeof(*service));
1078     module_list_init(&service->modules);
1079     service->commands = dict_new();
1080     service->bot = bot;
1081     dict_set_free_data(service->commands, free_service_command);
1082     dict_insert(services, service->bot->nick, service);
1083     reg_privmsg_func(bot, modcmd_privmsg);
1084     return service;
1085 }
1086
1087 struct service *
1088 service_find(const char *name) {
1089     return dict_find(services, name, NULL);
1090 }
1091
1092 static void
1093 svccmd_insert(struct service *service, char *name, struct svccmd *svccmd, struct modcmd *modcmd) {
1094     unsigned int ii;
1095     svccmd->parent = service;
1096     svccmd->name = name;
1097     svccmd->command = modcmd;
1098     svccmd->command->bind_count++;
1099     dict_insert(service->commands, svccmd->name, svccmd);
1100     for (ii=0; ii<service->modules.used; ++ii) {
1101         if (service->modules.list[ii] == svccmd->command->parent) break;
1102     }
1103     if (ii == service->modules.used) {
1104         module_list_append(&service->modules, svccmd->command->parent);
1105     }
1106 }
1107
1108 struct svccmd *
1109 service_bind_modcmd(struct service *service, struct modcmd *cmd, const char *name) {
1110     struct svccmd *svccmd;
1111     if ((svccmd = dict_find(service->commands, name, NULL))) {
1112         if (svccmd->command == cmd) return svccmd;
1113         log_module(MAIN_LOG, LOG_ERROR, "Tried to bind command %s.%s into service %s as %s, but already bound (as %s.%s).", cmd->parent->name, cmd->name, service->bot->nick, name, svccmd->command->parent->name, svccmd->command->name);
1114         return NULL;
1115     }
1116     svccmd = calloc(1, sizeof(*svccmd));
1117     svccmd_insert(service, strdup(name), svccmd, cmd);
1118     svccmd_copy_rules(svccmd, cmd->defaults);
1119     return svccmd;
1120 }
1121
1122 static unsigned int
1123 service_bind_module(struct service *service, struct module *module) {
1124     dict_iterator_t it;
1125     struct modcmd *modcmd;
1126     unsigned int count;
1127
1128     count = 0;
1129     for (it = dict_first(module->commands); it; it = iter_next(it)) {
1130         modcmd = iter_data(it);
1131         if (!((modcmd->flags | modcmd->defaults->flags) & MODCMD_NO_DEFAULT_BIND))
1132             if (service_bind_modcmd(service, modcmd, iter_key(it)))
1133                 count++;
1134     }
1135     return count;
1136 }
1137
1138 /* This MUST return argc if the alias expansion code knows how to deal
1139  * with every argument in argv; otherwise, it MUST return the index of
1140  * an argument that the expansion code does not know how to deal with.
1141  */
1142 static unsigned int
1143 check_alias_args(char *argv[], unsigned int argc) {
1144     unsigned int arg;
1145
1146     for (arg=0; arg<argc; ++arg) {
1147         if (argv[arg][0] != '$') {
1148             continue;
1149         } else if (argv[arg][1] == '$') {
1150             continue;
1151         } else if (isdigit(argv[arg][1])) {
1152             char *end_num;
1153             unsigned long tmp;
1154
1155             tmp = strtoul(argv[arg]+1, &end_num, 10);
1156             switch (end_num[0]) {
1157             case 0:
1158                 continue;
1159             case 'a':
1160             case 'n':
1161             case 'm':
1162                 if (end_num[1] == 0)
1163                     continue;
1164                 else if (end_num[1] == '-')
1165                     end_num++;
1166                 else
1167                     return arg;
1168             case '-':
1169                 if (end_num[1] == 0)
1170                     continue;
1171                 else if (isdigit(end_num[1]))
1172                     continue;
1173                 /* else fall through to default case */
1174             default:
1175                 return arg;
1176             }
1177         } else {
1178             switch(argv[arg][1]) {
1179                 case 'a':
1180                 case 'n':
1181                 case 'm':
1182                     continue;
1183                 default:
1184                     return arg;
1185             }
1186         }
1187     }
1188     return arg;
1189 }
1190
1191 static unsigned int
1192 collapse_cmdname(char *argv[], unsigned int argc, char *dest) {
1193     unsigned int ii, pos, arg;
1194     if (!argc) {
1195         dest[0] = 0;
1196         return 0;
1197     }
1198     for (ii=pos=0, arg=0; argv[arg][ii]; ) {
1199         if (argv[arg][ii] == '\\') {
1200             if (argv[arg][ii+1]) {
1201                 /* escaping a real character just puts it in literally */
1202                 dest[pos++] = argv[arg][++ii];
1203             } else if ((arg+1) == argc) {
1204                 /* we ran to the end of the argument list; abort */
1205                 break;
1206             } else {
1207                 /* escape at end of a word is a space */
1208                 dest[pos++] = ' ';
1209                 ii = 0;
1210                 arg++;
1211             }
1212         } else {
1213             /* normal characters don't need escapes */
1214             dest[pos++] = argv[arg][ii++];
1215         }
1216     }
1217     dest[pos] = 0;
1218     return arg + 1;
1219 }
1220
1221 static MODCMD_FUNC(cmd_bind) {
1222     struct service *service;
1223     struct svccmd *template, *newcmd;
1224     char *svcname, *dot;
1225     char newname[MAXLEN], cmdname[MAXLEN];
1226     unsigned int arg, diff;
1227
1228     assert(argc > 3);
1229     svcname = argv[1];
1230     arg = collapse_cmdname(argv+2, argc-2, newname) + 2;
1231     if (!arg) {
1232         reply("MSG_MISSING_PARAMS", cmd->name);
1233         return 0;
1234     }
1235     diff = collapse_cmdname(argv+arg, argc-arg, cmdname);
1236     if (!diff) {
1237         reply("MSG_MISSING_PARAMS", cmd->name);
1238         return 0;
1239     }
1240     arg += diff;
1241
1242     if (!(service = service_find(svcname))) {
1243         reply("MCMSG_UNKNOWN_SERVICE", svcname);
1244         return 0;
1245     }
1246
1247     if ((newcmd = dict_find(service->commands, newname, NULL))) {
1248         reply("MCMSG_ALREADY_BOUND", service->bot->nick, newname);
1249         return 0;
1250     }
1251
1252     if ((dot = strchr(cmdname, '.')) && (dot[1] == '*') && (dot[2] == 0)) {
1253         unsigned int count;
1254         struct module *module;
1255         *dot = 0;
1256         module = module_find((cmdname[0] == '*') ? cmdname+1 : cmdname);
1257         if (!module) {
1258             reply("MSG_MODULE_UNKNOWN", cmdname);
1259             return 0;
1260         }
1261         count = service_bind_module(service, module);
1262         reply("MCMSG_MODULE_BOUND", count, module->name, service->bot->nick);
1263         return count != 0;
1264     }
1265     newcmd = calloc(1, sizeof(*newcmd));
1266     newcmd->name = strdup(newname);
1267     newcmd->parent = service;
1268     if (!(template = svccmd_resolve_name(newcmd, cmdname))) {
1269         reply("MCMSG_UNKNOWN_COMMAND_2", cmdname, service->bot->nick);
1270         free(newcmd->name);
1271         free(newcmd);
1272         return 0;
1273     }
1274     if (template->alias.used) {
1275         reply("MCMSG_CANNOT_DOUBLE_ALIAS");
1276         free(newcmd->name);
1277         free(newcmd);
1278         return 0;
1279     }
1280
1281     if (argc > arg) {
1282         /* a more complicated alias; fix it up */
1283         unsigned int nn;
1284
1285         arg -= diff;
1286         nn = check_alias_args(argv+arg, argc-arg);
1287         if (nn+arg < argc) {
1288             reply("MCMSG_BAD_ALIAS_ARGUMENT", argv[nn+arg]);
1289             free(newcmd->name);
1290             free(newcmd);
1291             return 0;
1292         }
1293         newcmd->alias.used = newcmd->alias.size = argc-arg;
1294         newcmd->alias.list = calloc(newcmd->alias.size, sizeof(newcmd->alias.list[0]));
1295         for (nn=0; nn<newcmd->alias.used; ++nn)
1296             newcmd->alias.list[nn] = strdup(argv[nn+arg]);
1297     }
1298
1299     svccmd_insert(service, newcmd->name, newcmd, template->command);
1300     svccmd_copy_rules(newcmd, template);
1301     reply("MCMSG_COMMAND_BOUND", newcmd->name, newcmd->parent->bot->nick);
1302     return 1;
1303 }
1304
1305 static int
1306 service_recheck_bindings(struct service *service, struct module *module) {
1307     dict_iterator_t it;
1308     struct svccmd *cmd;
1309
1310     for (it = dict_first(service->commands); it; it = iter_next(it)) {
1311         cmd = iter_data(it);
1312         if (cmd->command->parent == module) return 0;
1313     }
1314     /* No more bindings, remove it from our list. */
1315     module_list_remove(&service->modules, module);
1316     return 1;
1317 }
1318
1319 static svccmd_unbind_func_t *suf_list;
1320 static void **suf_list_extra;
1321 unsigned int suf_size, suf_used;
1322
1323 void
1324 reg_svccmd_unbind_func(svccmd_unbind_func_t handler, void *extra) {
1325     if (suf_used == suf_size) {
1326         if (suf_size) {
1327             suf_size <<= 1;
1328             suf_list = realloc(suf_list, suf_size*sizeof(svccmd_unbind_func_t));
1329             suf_list_extra = realloc(suf_list_extra, suf_size*sizeof(void*));
1330         } else {
1331             suf_size = 8;
1332             suf_list = malloc(suf_size*sizeof(svccmd_unbind_func_t));
1333             suf_list_extra = malloc(suf_size*sizeof(void*));
1334         }
1335     }
1336     suf_list[suf_used] = handler;
1337     suf_list_extra[suf_used++] = extra;
1338 }
1339
1340 static MODCMD_FUNC(cmd_unbind) {
1341     struct service *service;
1342     struct userNode *bot;
1343     struct svccmd *bound;
1344     struct module *module;
1345     const char *svcname;
1346     unsigned int arg, ii;
1347     char cmdname[MAXLEN];
1348
1349     assert(argc > 2);
1350     svcname = argv[1];
1351     arg = collapse_cmdname(argv+2, argc-2, cmdname) + 2;
1352     if (!arg) {
1353         reply("MSG_MISSING_PARAMS", cmd->name);
1354         return 0;
1355     }
1356     if (!(service = service_find(svcname))) {
1357         reply("MCMSG_UNKNOWN_SERVICE", svcname);
1358         return 0;
1359     }
1360     if (!(bound = dict_find(service->commands, cmdname, NULL))) {
1361         reply("MCMSG_NO_COMMAND_BOUND", service->bot->nick, cmdname);
1362         return 0;
1363     }
1364     if ((bound->command->flags & MODCMD_KEEP_BOUND) && (bound->command->bind_count == 1)) {
1365         reply("MCMSG_UNBIND_PROHIBITED", bound->command->name);
1366         return 0;
1367     }
1368
1369     for (ii=0; ii<suf_used; ii++)
1370         suf_list[ii](bound, suf_list_extra[ii]);
1371     /* If this command binding is removing itself, we must take care
1372      * not to dereference it after the dict_remove.
1373      */
1374     bot = cmd->parent->bot;
1375     module = cmd->command->parent;
1376     dict_remove(service->commands, bound->name);
1377     send_message(user, bot, "MCMSG_COMMAND_UNBOUND", cmdname, service->bot->nick);
1378     if (service_recheck_bindings(service, module))
1379         send_message(user, bot, "MCMSG_HELPFILE_UNBOUND", module->name, module->name);
1380     return 1;
1381 }
1382
1383 static MODCMD_FUNC(cmd_readhelp) {
1384     const char *modname;
1385     struct module *module;
1386     struct helpfile *old_helpfile;
1387     struct timeval start, stop;
1388
1389     assert(argc > 1);
1390     modname = argv[1];
1391     if (!(module = module_find(modname))) {
1392         reply("MSG_MODULE_UNKNOWN", modname);
1393         return 0;
1394     }
1395     if (!module->helpfile_name) {
1396         reply("MCMSG_NO_HELPFILE", module->name);
1397         return 0;
1398     }
1399     old_helpfile = module->helpfile;
1400     gettimeofday(&start, NULL);
1401     module->helpfile = open_helpfile(module->helpfile_name, module->expand_help);
1402     if (!module->helpfile) {
1403         module->helpfile = old_helpfile;
1404         reply("MCMSG_HELPFILE_ERROR", module->helpfile_name);
1405         return 0;
1406     }
1407     if (old_helpfile) close_helpfile(old_helpfile);
1408     gettimeofday(&stop, NULL);
1409     stop.tv_sec -= start.tv_sec;
1410     stop.tv_usec -= start.tv_usec;
1411     if (stop.tv_usec < 0) {
1412         stop.tv_sec -= 1;
1413         stop.tv_usec += 1000000;
1414     }
1415     reply("MCMSG_HELPFILE_READ", module->name, stop.tv_sec, stop.tv_usec/1000);
1416     return 1;
1417 }
1418
1419 static MODCMD_FUNC(cmd_help) {
1420     const char *topic;
1421
1422     topic = (argc < 2) ? NULL : unsplit_string(argv+1, argc-1, NULL);
1423     return svccmd_send_help(user, cmd->parent, topic);
1424 }
1425
1426 static MODCMD_FUNC(cmd_timecmd) {
1427     struct timeval start, stop;
1428     char cmd_text[MAXLEN];
1429
1430     unsplit_string(argv+1, argc-1, cmd_text);
1431     gettimeofday(&start, NULL);
1432     svccmd_invoke(user, cmd->parent, channel, cmd_text, 0);
1433     gettimeofday(&stop, NULL);
1434     stop.tv_sec -= start.tv_sec;
1435     stop.tv_usec -= start.tv_usec;
1436     if (stop.tv_usec < 0) {
1437         stop.tv_sec -= 1;
1438         stop.tv_usec += 1000000;
1439     }
1440     reply("MCMSG_COMMAND_TIME", cmd_text, stop.tv_sec, stop.tv_usec);
1441     return 1;
1442 }
1443
1444 static MODCMD_FUNC(cmd_command) {
1445     struct svccmd *svccmd;
1446     const char *cmd_name, *fmt_str;
1447     unsigned int flags, shown_flags, nn, pos;
1448     char buf[MAXLEN];
1449
1450     assert(argc >= 2);
1451     cmd_name = unsplit_string(argv+1, argc-1, NULL);
1452     if (!(svccmd = svccmd_resolve_name(cmd, cmd_name))) {
1453         reply("MCMSG_UNKNOWN_COMMAND_2", cmd_name, cmd->parent->bot->nick);
1454         return 0;
1455     }
1456     pos = snprintf(buf, sizeof(buf), "%s.%s", svccmd->command->parent->name, svccmd->command->name);
1457     if (svccmd->alias.used) {
1458         buf[pos++] = ' ';
1459         unsplit_string((char**)svccmd->alias.list+1, svccmd->alias.used-1, buf+pos);
1460         reply("MCMSG_COMMAND_ALIASES", svccmd->name, buf);
1461     } else {
1462         reply("MCMSG_COMMAND_BINDING", svccmd->name, buf);
1463     }
1464     flags = svccmd->effective_flags;
1465     if ((svccmd->parent && svccmd->parent->privileged && !IsOper(user))
1466         || ((flags & MODCMD_REQUIRE_STAFF)
1467             && !IsOper(user) && !IsNetworkHelper(user) && !IsSupportHelper(user))) {
1468         reply("MCMSG_INSPECTION_REFUSED", svccmd->name);
1469         return 0;
1470     }
1471     if (flags & MODCMD_DISABLED) {
1472         reply("MSG_COMMAND_DISABLED", svccmd->name);
1473         return 1;
1474     }
1475     shown_flags = 0;
1476     if (svccmd->min_opserv_level > 0) {
1477         reply("MCMSG_NEED_OPSERV_LEVEL", svccmd->min_opserv_level);
1478         shown_flags |= MODCMD_REQUIRE_OPER | MODCMD_REQUIRE_AUTHED;
1479     }
1480     if (svccmd->min_channel_access > 0) {
1481         reply("MCMSG_NEED_CHANSERV_LEVEL", svccmd->min_channel_access);
1482         shown_flags |= MODCMD_REQUIRE_CHANUSER | MODCMD_REQUIRE_REGCHAN | MODCMD_REQUIRE_CHANNEL | MODCMD_REQUIRE_AUTHED;
1483     }
1484     if (svccmd->req_account_flags) {
1485         for (nn=pos=0; nn<32; nn++) {
1486             if (!(svccmd->req_account_flags & (1 << nn))) continue;
1487             buf[pos++] = HANDLE_FLAGS[nn];
1488         }
1489         buf[pos] = 0;
1490         reply("MCMSG_NEED_ACCOUNT_FLAGS", buf);
1491         shown_flags |= MODCMD_REQUIRE_AUTHED;
1492     }
1493     if (!flags && !shown_flags) {
1494         reply("MCMSG_NEED_NOTHING", svccmd->name);
1495         return 1;
1496     }
1497     if (flags & ~shown_flags & MODCMD_REQUIRE_HELPING) {
1498         reply("MCMSG_MUST_BE_HELPING");
1499         shown_flags |= MODCMD_REQUIRE_AUTHED | MODCMD_REQUIRE_STAFF;
1500     }
1501     if (flags & ~shown_flags & MODCMD_REQUIRE_STAFF) {
1502         switch (flags & MODCMD_REQUIRE_STAFF) {
1503         default: case MODCMD_REQUIRE_STAFF:
1504             fmt_str = "MCMSG_NEED_STAFF_ACCESS";
1505             break;
1506         case MODCMD_REQUIRE_OPER:
1507             fmt_str = "MCMSG_NEED_STAFF_OPER";
1508             break;
1509         case MODCMD_REQUIRE_NETWORK_HELPER:
1510             fmt_str = "MCMSG_NEED_STAFF_NETHELPER";
1511             break;
1512         case MODCMD_REQUIRE_OPER|MODCMD_REQUIRE_NETWORK_HELPER:
1513             fmt_str = "MCMSG_NEED_STAFF_NETHELPER_OR_OPER";
1514             break;
1515         case MODCMD_REQUIRE_SUPPORT_HELPER:
1516             fmt_str = "MCMSG_NEED_STAFF_SHELPER";
1517             break;
1518         case MODCMD_REQUIRE_OPER|MODCMD_REQUIRE_SUPPORT_HELPER:
1519             fmt_str = "MCMSG_NEED_STAFF_SHELPER_OR_OPER";
1520             break;
1521         case MODCMD_REQUIRE_SUPPORT_HELPER|MODCMD_REQUIRE_NETWORK_HELPER:
1522             fmt_str = "MCMSG_NEED_STAFF_HELPER";
1523             break;
1524         }
1525         reply(fmt_str);
1526         shown_flags |= MODCMD_REQUIRE_AUTHED | MODCMD_REQUIRE_STAFF;
1527     }
1528     if (flags & ~shown_flags & MODCMD_REQUIRE_JOINABLE) {
1529         reply("MCMSG_NEED_JOINABLE");
1530         shown_flags |= MODCMD_REQUIRE_CHANUSER;
1531     }
1532     if (flags & ~shown_flags & MODCMD_REQUIRE_CHANUSER) {
1533         if (flags & ~shown_flags & MODCMD_IGNORE_CSUSPEND)
1534             reply("MCMSG_NEED_CHANUSER_CSUSPENDABLE");
1535         else
1536             reply("MCMSG_NEED_CHANUSER");
1537         shown_flags |= MODCMD_IGNORE_CSUSPEND | MODCMD_REQUIRE_REGCHAN | MODCMD_REQUIRE_CHANNEL | MODCMD_REQUIRE_AUTHED;
1538     }
1539     if (flags & ~shown_flags & MODCMD_REQUIRE_REGCHAN) {
1540         reply("MCMSG_NEED_REGCHAN");
1541         shown_flags |= MODCMD_REQUIRE_CHANNEL;
1542     }
1543     if (flags & ~shown_flags & MODCMD_REQUIRE_CHANNEL)
1544         reply("MCMSG_NEED_CHANNEL");
1545     if (flags & ~shown_flags & MODCMD_REQUIRE_AUTHED)
1546         reply("MCMSG_NEED_AUTHED");
1547     if (flags & ~shown_flags & MODCMD_TOY)
1548         reply("MCMSG_IS_TOY", svccmd->name);
1549     if (flags & ~shown_flags & MODCMD_REQUIRE_QUALIFIED) {
1550         const char *botnick = svccmd->parent ? svccmd->parent->bot->nick : "SomeBot";
1551         reply("MCMSG_MUST_QUALIFY", botnick, svccmd->name, botnick);
1552     }
1553     reply("MCMSG_END_REQUIREMENTS", svccmd->name);
1554     return 1;
1555 }
1556
1557 static void
1558 modcmd_describe_command(struct userNode *user, struct svccmd *cmd, struct svccmd *target) {
1559     char buf1[MAXLEN], buf2[MAXLEN];
1560     unsigned int ii, len, buf1_used, buf2_used;
1561
1562     if (target->alias.used) {
1563         unsplit_string((char**)target->alias.list, target->alias.used, buf1);
1564         reply("MCMSG_COMMAND_ALIASES", target->name, buf1);
1565     } else {
1566         snprintf(buf1, sizeof(buf1), "%s.%s", target->command->parent->name, target->command->name);
1567         reply("MCMSG_COMMAND_BINDING", target->name, buf1);
1568     }
1569     for (ii = buf1_used = buf2_used = 0; modcmd_flags[ii].name; ++ii) {
1570         const struct modcmd_flag *flag = &modcmd_flags[ii];
1571         if (target->flags & flag->flag) {
1572             if (buf1_used)
1573                 buf1[buf1_used++] = ',';
1574             len = strlen(flag->name);
1575             memcpy(buf1 + buf1_used, flag->name, len);
1576             buf1_used += len;
1577         } else if (target->effective_flags & flag->flag) {
1578             if (buf2_used)
1579                 buf2[buf2_used++] = ',';
1580             len = strlen(flag->name);
1581             memcpy(buf2 + buf2_used, flag->name, len);
1582             buf2_used += len;
1583         }
1584     }
1585     if (buf1_used)
1586         buf1[buf1_used] = '\0';
1587     else
1588         strcpy(buf1, user_find_message(user, "MSG_NONE"));
1589     if (buf2_used)
1590         buf2[buf2_used] = '\0';
1591     else
1592         strcpy(buf2, user_find_message(user, "MSG_NONE"));
1593     reply("MCMSG_COMMAND_FLAGS", buf1, buf2);
1594     for (ii = buf1_used = buf2_used = 0; handle_flags[ii]; ++ii) {
1595         if (target->req_account_flags & (1 << ii))
1596             buf1[buf1_used++] = handle_flags[ii];
1597         else if (target->deny_account_flags & (1 << ii))
1598             buf2[buf2_used++] = handle_flags[ii];
1599     }
1600     buf1[buf1_used] = buf2[buf2_used] = '\0';
1601     reply("MCMSG_COMMAND_ACCOUNT_FLAGS", buf1, buf2);
1602     reply("MCMSG_COMMAND_ACCESS_LEVEL", target->min_channel_access, target->min_opserv_level);
1603     reply("MCMSG_COMMAND_USES", target->name, target->uses);
1604 }
1605
1606 static MODCMD_FUNC(cmd_modcmd) {
1607     struct svccmd *svccmd;
1608     unsigned int arg, changed;
1609     char cmdname[MAXLEN];
1610
1611     assert(argc >= 2);
1612     arg = collapse_cmdname(argv+1, argc-1, cmdname) + 1;
1613     if (!arg) {
1614         reply("MSG_MISSING_PARAMS", cmd->name);
1615         return 0;
1616     }
1617     if (!(svccmd = svccmd_resolve_name(cmd, cmdname))) {
1618         reply("MCMSG_UNKNOWN_COMMAND_2", cmdname, cmd->parent->bot->nick);
1619         return 0;
1620     }
1621     for (changed = 0; arg+1 < argc; arg += 2) {
1622         if (svccmd_configure(svccmd, user, cmd->parent->bot, argv[arg], argv[arg+1])) {
1623             reply("MCMSG_COMMAND_MODIFIED", argv[arg], svccmd->name);
1624             changed = 1;
1625         }
1626     }
1627     if (changed)
1628         modcmd_set_effective_flags(svccmd);
1629     modcmd_describe_command(user, cmd, svccmd);
1630     return changed;
1631 }
1632
1633 static void
1634 timeout_god(void *data)
1635 {
1636     extern struct userNode *chanserv;
1637     struct userNode *user = data;
1638
1639     if(!user || !IsHelping(user)) return;
1640
1641     HANDLE_CLEAR_FLAG(user->handle_info, HELPING);
1642     send_message(user, chanserv, "MCMSG_GOD_EXPIRED");
1643 }
1644
1645 static MODCMD_FUNC(cmd_god) {
1646     int helping;
1647
1648     if (argc > 1) {
1649         if (enabled_string(argv[1])) {
1650             if (HANDLE_FLAGGED(user->handle_info, HELPING)) {
1651                 reply("MCMSG_ALREADY_HELPING");
1652                 return 0;
1653             }
1654             helping = 1;
1655         } else if (disabled_string(argv[1])) {
1656             if (!HANDLE_FLAGGED(user->handle_info, HELPING)) {
1657                 reply("MCMSG_ALREADY_NOT_HELPING");
1658                 return 0;
1659             }
1660             helping = 0;
1661         } else {
1662             reply("MSG_INVALID_BINARY", argv[1]);
1663             return 0;
1664         }
1665     } else {
1666         helping = !IsHelping(user);
1667     }
1668
1669     if (helping) {
1670         HANDLE_SET_FLAG(user->handle_info, HELPING);
1671         timeq_add(now + god_timeout, timeout_god, user);
1672         reply("MCMSG_NOW_HELPING");
1673     } else {
1674         HANDLE_CLEAR_FLAG(user->handle_info, HELPING);
1675         timeq_del(0, timeout_god, user, TIMEQ_IGNORE_WHEN);
1676         reply("MCMSG_NOW_NOT_HELPING");
1677     }
1678
1679     return 1;
1680 }
1681
1682 static MODCMD_FUNC(cmd_joiner) {
1683     char cmdname[MAXLEN];
1684
1685     if (argc < 2) {
1686         int len = sprintf(cmdname, "%s ", cmd->name);
1687         dict_iterator_t it;
1688         struct string_buffer sbuf;
1689
1690         string_buffer_init(&sbuf);
1691         for (it = dict_first(cmd->parent->commands); it; it = iter_next(it)) {
1692             if (!ircncasecmp(iter_key(it), cmdname, len)) {
1693                 if (sbuf.used) string_buffer_append_string(&sbuf, ", ");
1694                 string_buffer_append_string(&sbuf, iter_key(it));
1695             }
1696         }
1697         if (!sbuf.used) string_buffer_append(&sbuf, 0);
1698         reply("MCMSG_JOINER_CHOICES", cmd->name, sbuf.list);
1699         string_buffer_clean(&sbuf);
1700         return 1;
1701     }
1702     sprintf(cmdname, "%s %s", cmd->name, argv[1]);
1703     argv[1] = cmdname;
1704     svccmd_invoke_argv(user, cmd->parent, channel, argc-1, argv+1, 0);
1705     return 0; /* never try to log this; the recursive one logs it */
1706 }
1707
1708 static MODCMD_FUNC(cmd_stats_modules) {
1709     struct helpfile_table tbl;
1710     dict_iterator_t it;
1711     unsigned int ii;
1712     struct module *mod;
1713     struct modcmd *modcmd;
1714
1715     if (argc < 2) {
1716         tbl.length = dict_size(modules) + 1;
1717         tbl.width = 3;
1718         tbl.flags = TABLE_PAD_LEFT;
1719         tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1720         tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1721         tbl.contents[0][0] = "Module";
1722         tbl.contents[0][1] = "Commands";
1723         tbl.contents[0][2] = "Helpfile";
1724         for (ii=1, it=dict_first(modules); it; it=iter_next(it), ii++) {
1725             mod = iter_data(it);
1726             tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1727             tbl.contents[ii][0] = mod->name;
1728             tbl.contents[ii][1] = strtab(dict_size(mod->commands));
1729             tbl.contents[ii][2] = mod->helpfile_name ? mod->helpfile_name : "(none)";
1730         }
1731     } else if (!(mod = dict_find(modules, argv[1], NULL))) {
1732         reply("MCMSG_UNKNOWN_MODULE", argv[1]);
1733         return 0;
1734     } else {
1735         reply("MCMSG_MODULE_INFO", mod->name);
1736         tbl.length = dict_size(mod->commands) + 1;
1737         tbl.width = 3;
1738         tbl.flags = TABLE_PAD_LEFT;
1739         tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1740         tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1741         tbl.contents[0][0] = "Command";
1742         tbl.contents[0][1] = "Min. Args";
1743         tbl.contents[0][2] = "Bind Count";
1744         for (ii=1, it=dict_first(mod->commands); it; it=iter_next(it), ii++) {
1745             modcmd = iter_data(it);
1746             tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1747             tbl.contents[ii][0] = modcmd->name;
1748             tbl.contents[ii][1] = strtab(modcmd->min_argc);
1749             tbl.contents[ii][2] = strtab(modcmd->bind_count);
1750         }
1751     }
1752     table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1753     return 0;
1754 }
1755
1756 static MODCMD_FUNC(cmd_stats_services) {
1757     struct helpfile_table tbl;
1758     dict_iterator_t it;
1759     unsigned int ii;
1760     struct service *service;
1761     struct svccmd *svccmd;
1762     char *extra;
1763
1764     if (argc < 2) {
1765         tbl.length = dict_size(services) + 1;
1766         tbl.width = 4;
1767         tbl.flags = TABLE_PAD_LEFT;
1768         tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1769         tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1770         tbl.contents[0][0] = "Service";
1771         tbl.contents[0][1] = "Commands";
1772         tbl.contents[0][2] = "Priv'd?";
1773         tbl.contents[0][3] = "Trigger";
1774         extra = calloc(2, tbl.length);
1775         for (ii=1, it=dict_first(services); it; it=iter_next(it), ii++) {
1776             service = iter_data(it);
1777             tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1778             tbl.contents[ii][0] = service->bot->nick;
1779             tbl.contents[ii][1] = strtab(dict_size(service->commands));
1780             tbl.contents[ii][2] = service->privileged ? "yes" : "no";
1781             extra[ii*2] = service->trigger;
1782             tbl.contents[ii][3] = extra+ii*2;
1783         }
1784         table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1785         free(extra);
1786         return 0;
1787     } else if (!(service = dict_find(services, argv[1], NULL))) {
1788         reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1789         return 0;
1790     } else {
1791         tbl.length = dict_size(service->commands) + 1;
1792         tbl.width = 5;
1793         tbl.flags = TABLE_PAD_LEFT | TABLE_NO_FREE;
1794         tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1795         tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1796         tbl.contents[0][0] = "Command";
1797         tbl.contents[0][1] = "Module";
1798         tbl.contents[0][2] = "ModCmd";
1799         tbl.contents[0][3] = "Alias?";
1800         tbl.contents[0][4] = strdup("Uses");
1801         for (ii=1, it=dict_first(service->commands); it; it=iter_next(it), ii++) {
1802             svccmd = iter_data(it);
1803             tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1804             tbl.contents[ii][0] = svccmd->name;
1805             tbl.contents[ii][1] = svccmd->command->parent->name;
1806             tbl.contents[ii][2] = svccmd->command->name;
1807             tbl.contents[ii][3] = svccmd->alias.used ? "yes" : "no";
1808             tbl.contents[ii][4] = extra = malloc(12);
1809             sprintf(extra, "%u", svccmd->uses);
1810         }
1811         reply("MCMSG_SERVICE_INFO", service->bot->nick);
1812         table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1813         for (ii=0; ii<tbl.length; ii++) {
1814             free((char*)tbl.contents[ii][4]);
1815             free(tbl.contents[ii]);
1816         }
1817         free(tbl.contents);
1818         return 0;
1819     }
1820 }
1821
1822 static MODCMD_FUNC(cmd_showcommands) {
1823     struct svccmd_list commands;
1824     struct helpfile_table tbl;
1825     struct svccmd *svccmd;
1826     dict_iterator_t it;
1827     unsigned int ii, ignore_flags = 0;
1828     unsigned int max_opserv_level = 1000;
1829     unsigned short max_chanserv_level = 500;
1830     char show_opserv_level = 0, show_channel_access = 0;
1831
1832     /* Check to see what the max access they want to see is. */
1833     for (ii=1; ii<argc; ++ii) {
1834         if (isdigit(argv[ii][0]))
1835             max_opserv_level = atoi(argv[ii]);
1836         else
1837             max_chanserv_level = user_level_from_name(argv[ii], UL_OWNER);
1838     }
1839
1840     /* Find the matching commands. */
1841     svccmd_list_init(&commands);
1842     if (cmd->parent->privileged)
1843         ignore_flags = MODCMD_REQUIRE_OPER;
1844     for (it = dict_first(cmd->parent->commands); it; it = iter_next(it)) {
1845         svccmd = iter_data(it);
1846         if (strchr(svccmd->name, ' '))
1847             continue;
1848         if (!svccmd_can_invoke(user, svccmd->parent->bot, svccmd, channel, SVCCMD_QUALIFIED))
1849             continue;
1850         if (svccmd->min_opserv_level > max_opserv_level)
1851             continue;
1852         if (svccmd->min_channel_access > max_chanserv_level)
1853             continue;
1854         if (svccmd->min_opserv_level > 0)
1855             show_opserv_level = 1;
1856         if (svccmd->min_channel_access > 0)
1857             show_channel_access = 1;
1858         if (svccmd->effective_flags
1859             & (MODCMD_REQUIRE_STAFF|MODCMD_REQUIRE_HELPING)
1860             & ~ignore_flags) {
1861             show_channel_access = 1;
1862         }
1863         svccmd_list_append(&commands, svccmd);
1864     }
1865
1866     /* Build the table. */
1867     tbl.length = commands.used + 1;
1868     tbl.width = 1 + show_opserv_level + show_channel_access;
1869     tbl.flags = TABLE_REPEAT_ROWS;
1870     tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1871     tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1872     tbl.contents[0][ii = 0] = "Command";
1873     if (show_opserv_level)
1874         tbl.contents[0][++ii] = "OpServ Level";
1875     if (show_channel_access)
1876         tbl.contents[0][++ii] = "ChanServ Access";
1877     for (ii=0; ii<commands.used; ++ii) {
1878         svccmd = commands.list[ii];
1879         tbl.contents[ii+1] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1880         tbl.contents[ii+1][0] = svccmd->name;
1881         if (show_opserv_level)
1882             tbl.contents[ii+1][1] = strtab(svccmd->min_opserv_level);
1883         if (show_channel_access) {
1884             const char *access_name;
1885             int flags = svccmd->effective_flags;
1886             if (flags & MODCMD_REQUIRE_HELPING)
1887                 access_name = "helping";
1888             else if (flags & MODCMD_REQUIRE_STAFF) {
1889                 if (flags & MODCMD_REQUIRE_OPER)
1890                     access_name = "oper";
1891                 else if (flags & MODCMD_REQUIRE_NETWORK_HELPER)
1892                     access_name = "net.helper";
1893                 else
1894                     access_name = "staff";
1895             } else
1896                 access_name = strtab(svccmd->min_channel_access);
1897             tbl.contents[ii+1][1+show_opserv_level] = access_name;
1898         }
1899     }
1900     svccmd_list_clean(&commands);
1901     table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1902     return 0;
1903 }
1904
1905 static MODCMD_FUNC(cmd_helpfiles) {
1906     struct service *service;
1907     unsigned int ii;
1908
1909     if (!(service = dict_find(services, argv[1], NULL))) {
1910         reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1911         return 0;
1912     }
1913
1914     if (argc < 3) {
1915         for (ii=0; ii<service->modules.used; ++ii)
1916             reply("MCMSG_HELPFILE_SEQUENCE", ii+1, service->modules.list[ii]->name);
1917         return 0;
1918     }
1919
1920     service->modules.used = 0;
1921     for (ii=0; ii<argc-2; ii++) {
1922         struct module *module = dict_find(modules, argv[ii+2], NULL);
1923         if (!module) {
1924             reply("MCMSG_UNKNOWN_MODULE", argv[ii+2]);
1925             continue;
1926         }
1927         module_list_append(&service->modules, module);
1928     }
1929     reply("MCMSG_HELPFILE_SEQUENCE_SET", service->bot->nick);
1930     return 1;
1931 }
1932
1933 static MODCMD_FUNC(cmd_service_add) {
1934     const char *nick, *hostname, *desc;
1935     struct userNode *bot;
1936
1937     nick = argv[1];
1938     if (!is_valid_nick(nick)) {
1939         reply("MCMSG_BAD_SERVICE_NICK", nick);
1940         return 0;
1941     }
1942     hostname = argv[2];
1943     desc = unsplit_string(argv+3, argc-3, NULL);
1944     bot = GetUserH(nick);
1945     if (bot && IsService(bot)) {
1946         reply("MCMSG_ALREADY_SERVICE", bot->nick);
1947         return 0;
1948     }
1949     bot = AddLocalUser(nick, nick, hostname, desc, NULL);
1950     service_register(bot);
1951     reply("MCMSG_NEW_SERVICE", bot->nick);
1952     return 1;
1953 }
1954
1955 static MODCMD_FUNC(cmd_service_rename) {
1956     struct service *service;
1957
1958     if (!(service = service_find(argv[1]))) {
1959         reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1960         return 0;
1961     }
1962     NickChange(service->bot, argv[2], 0);
1963     reply("MCMSG_SERVICE_RENAMED", service->bot->nick);
1964     return 1;
1965 }
1966
1967 static MODCMD_FUNC(cmd_service_trigger) {
1968     struct userNode *bogon;
1969     struct service *service;
1970
1971     if (!(service = service_find(argv[1]))) {
1972         reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1973         return 0;
1974     }
1975     if (argc < 3) {
1976         if (service->trigger)
1977             reply("MCMSG_CURRENT_TRIGGER", service->bot->nick, service->trigger);
1978         else
1979             reply("MCMSG_NO_TRIGGER", service->bot->nick);
1980         return 1;
1981     }
1982     if (service->trigger)
1983         reg_chanmsg_func(service->trigger, NULL, NULL, NULL);
1984     if (!irccasecmp(argv[2], "none") || !irccasecmp(argv[2], "remove")) {
1985         service->trigger = 0;
1986         reply("MCMSG_REMOVED_TRIGGER", service->bot->nick);
1987     } else if ((bogon = get_chanmsg_bot(argv[2][0]))) {
1988         reply("MCMSG_DUPLICATE_TRIGGER", bogon->nick, argv[2][0]);
1989         return 1;
1990     } else {
1991         service->trigger = argv[2][0];
1992         reg_chanmsg_func(service->trigger, service->bot, modcmd_chanmsg, NULL);
1993         reply("MCMSG_NEW_TRIGGER", service->bot->nick, service->trigger);
1994     }
1995     return 1;
1996 }
1997
1998 static MODCMD_FUNC(cmd_service_privileged) {
1999     struct service *service;
2000     const char *newval;
2001
2002     if (!(service = service_find(argv[1]))) {
2003         reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
2004         return 0;
2005     }
2006     if (argc >= 3)
2007         service->privileged = true_string(argv[2]) || enabled_string(argv[2]);
2008     newval = user_find_message(user, service->privileged ? "MSG_ON" : "MSG_OFF");
2009     reply("MCMSG_SERVICE_PRIVILEGED", service->bot->nick, newval);
2010     return 1;
2011 }
2012
2013 static MODCMD_FUNC(cmd_service_remove) {
2014     char *name, *reason;
2015     struct service *service;
2016
2017     name = argv[1];
2018     if (argc > 2)
2019         reason = unsplit_string(argv+2, argc-2, NULL);
2020     else
2021         reason = "Removing bot";
2022     if (!(service = service_find(name))) {
2023         reply("MCMSG_UNKNOWN_SERVICE", name);
2024         return 0;
2025     }
2026     DelUser(service->bot, NULL, 1, reason);
2027     reply("MCMSG_SERVICE_REMOVED", name);
2028     dict_remove(services, name);
2029     return 1;
2030 }
2031
2032 static MODCMD_FUNC(cmd_dump_messages) {
2033     const char *fname = "strings.db";
2034     struct saxdb_context *ctx;
2035     dict_iterator_t it;
2036     FILE *pf;
2037     int res;
2038
2039     if (!(pf = fopen(fname, "w"))) {
2040         reply("MCMSG_FILE_NOT_OPENED", fname);
2041         return 0;
2042     }
2043     if (!(ctx = saxdb_open_context(pf))) {
2044         reply("MSG_INTERNAL_FAILURE");
2045         return 0;
2046     }
2047
2048     if ((res = setjmp(*saxdb_jmp_buf(ctx))) != 0) {
2049         saxdb_close_context(ctx, 1);
2050         reply("MCMSG_MESSAGE_DUMP_FAILED", strerror(res));
2051         return 0;
2052     } else {
2053         for (it = dict_first(lang_C->messages); it; it = iter_next(it))
2054             saxdb_write_string(ctx, iter_key(it), iter_data(it));
2055         saxdb_close_context(ctx, 1);
2056         reply("MCMSG_MESSAGES_DUMPED", fname);
2057         return 1;
2058     }
2059 }
2060
2061 static MODCMD_FUNC(cmd_version) {
2062     send_message_type(4, user, cmd->parent->bot, "$b"PACKAGE_STRING"+[%s]$b (Based on srvx 1.3.x), Built: "__DATE__", "__TIME__".", cvs_verstring());
2063     send_message_type(4, user, cmd->parent->bot, "See $bCREDITS$b for more information.");
2064     return 1;
2065 }
2066
2067 /* This function provides copyright management information to end
2068  * users of X3. You should not alter, disable or remove this
2069  * command or its accessibility to normal IRC users, except to add
2070  * copyright information pertaining to changes you make to X3.
2071  */
2072 static MODCMD_FUNC(cmd_credits) {
2073     send_message_type(4, user, cmd->parent->bot, "$b"PACKAGE"$b is based on srvx");
2074     send_message_type(4, user, cmd->parent->bot, "Copyright 2000-2007 srvx Development Team.");
2075     send_message_type(4, user, cmd->parent->bot, "Copyright 2004-2007 X3 Development Team.");
2076     send_message_type(4, user, cmd->parent->bot, "This software is OSI Certified Open Source Software.");
2077     send_message_type(4, user, cmd->parent->bot, "OSI Certified is a certification mark of the Open Source Initiative.");
2078     send_message_type(4, user, cmd->parent->bot, "$b$b");
2079     send_message_type(4, user, cmd->parent->bot, "The srvx 1.3.x Development Team includes Paul Chang, Adrian Dewhurst, Miles Peterson, Michael Poole and others.");
2080     send_message_type(4, user, cmd->parent->bot, "The X3 Development Team includes Alex Schumann, Reed Loden, Neil Spierling.");
2081     send_message_type(4, user, cmd->parent->bot, "The X3 Development Team can be reached at http://evilnet.sourceforge.net or in #evilnet on irc.afternet.org.");
2082     send_message_type(4, user, cmd->parent->bot, "$b$b");
2083     send_message_type(4, user, cmd->parent->bot, "Thanks goes to ThiefMaster, Joe Hansche (joeatrr), Martijn Smit (wasted), and to any other people who have contributed to X3.");
2084     send_message_type(4, user, cmd->parent->bot, "This program is free software; see COPYING in the distribution files.");
2085
2086     return 1;
2087 }
2088
2089 static void create_default_binds(int rebind);
2090
2091 static MODCMD_FUNC(cmd_rebindall) {
2092     send_message_type(4, user, cmd->parent->bot, "$bRe-binding all default commands to respective services..$b");
2093     create_default_binds(1);
2094     return 1;
2095 }
2096
2097 static MODCMD_FUNC(cmd_tell) {
2098     struct userNode *target;
2099     char *msg;
2100
2101     target = GetUserH(argv[1]);
2102     msg = unsplit_string(argv + 2, argc - 2, NULL);
2103     if (!target) {
2104         reply("MSG_NOT_TARGET_NAME");
2105         return 0;
2106     }
2107     send_message_type(MSG_TYPE_NOXLATE, target, cmd->parent->bot, "%s", msg);
2108     return 1;
2109 }
2110
2111 void
2112 modcmd_nick_change(struct userNode *user, const char *old_nick, UNUSED_ARG(void *extra)) {
2113     struct service *svc;
2114     if (!(svc = dict_find(services, old_nick, NULL)))
2115         return;
2116     dict_remove2(services, old_nick, 1);
2117     dict_insert(services, user->nick, svc);
2118 }
2119
2120 void
2121 modcmd_cleanup(UNUSED_ARG(void* extra)) {
2122     dict_delete(services);
2123     dict_delete(modules);
2124     if (suf_list)
2125         free(suf_list);
2126     if (suf_list_extra)
2127         free(suf_list_extra);
2128 }
2129
2130 static void
2131 modcmd_saxdb_write_command(struct saxdb_context *ctx, struct svccmd *cmd) {
2132     char buf[MAXLEN];
2133     unsigned int nn, len, pos;
2134     struct svccmd *template = cmd->command->defaults;
2135
2136     saxdb_start_record(ctx, cmd->name, 0);
2137     sprintf(buf, "%s.%s", cmd->command->parent->name, cmd->command->name);
2138     saxdb_write_string(ctx, "command", buf);
2139     if (cmd->alias.used)
2140         saxdb_write_string_list(ctx, "aliased", &cmd->alias);
2141     if (cmd->min_opserv_level != template->min_opserv_level)
2142         saxdb_write_int(ctx, "oper_access", cmd->min_opserv_level);
2143     if (cmd->min_channel_access != template->min_channel_access)
2144         saxdb_write_int(ctx, "channel_access", cmd->min_channel_access);
2145     if (cmd->flags != template->flags) {
2146         if (cmd->flags) {
2147             for (nn=pos=0; modcmd_flags[nn].name; ++nn) {
2148                 const struct modcmd_flag *flag = &modcmd_flags[nn];
2149                 if (cmd->flags & flag->flag) {
2150                     buf[pos++] = '+';
2151                     len = strlen(flag->name);
2152                     memcpy(buf+pos, flag->name, len);
2153                     pos += len;
2154                     buf[pos++] = ',';
2155                 }
2156             }
2157         } else {
2158             pos = 1;
2159         }
2160         buf[--pos] = 0;
2161         saxdb_write_string(ctx, "flags", buf);
2162     }
2163     if ((cmd->req_account_flags != template->req_account_flags)
2164         || (cmd->deny_account_flags != template->req_account_flags)) {
2165         pos = 0;
2166         if (cmd->req_account_flags) {
2167             buf[pos++] = '+';
2168             for (nn=0; nn<32; nn++)
2169                 if (cmd->req_account_flags & (1 << nn))
2170                     buf[pos++] = handle_flags[nn];
2171         }
2172         if (cmd->deny_account_flags) {
2173             buf[pos++] = '-';
2174             for (nn=0; nn<32; nn++)
2175                 if (cmd->deny_account_flags & (1 << nn))
2176                     buf[pos++] = handle_flags[nn];
2177         }
2178         buf[pos] = 0;
2179         saxdb_write_string(ctx, "account_flags", buf);
2180     }
2181     saxdb_end_record(ctx);
2182 }
2183
2184 static int
2185 modcmd_saxdb_write(struct saxdb_context *ctx) {
2186     struct string_list slist;
2187     dict_iterator_t it, it2;
2188     struct service *service;
2189     unsigned int ii;
2190
2191     saxdb_start_record(ctx, "bots", 1);
2192     for (it = dict_first(services); it; it = iter_next(it)) {
2193         char buff[16];
2194         char modes[32];
2195
2196         service = iter_data(it);
2197         saxdb_start_record(ctx, service->bot->nick, 1);
2198         if (service->trigger) {
2199             buff[0] = service->trigger;
2200             buff[1] = '\0';
2201             saxdb_write_string(ctx, "trigger", buff);
2202         }
2203         saxdb_write_string(ctx, "description", service->bot->info);
2204         saxdb_write_string(ctx, "hostname", service->bot->hostname);
2205         if (service->bot->modes) {
2206             irc_user_modes(service->bot, modes, sizeof(modes));
2207             saxdb_write_string(ctx, "modes", modes);
2208         }
2209         if (service->privileged)
2210             saxdb_write_string(ctx, "privileged", "1");
2211         saxdb_end_record(ctx);
2212     }
2213     saxdb_end_record(ctx);
2214
2215     saxdb_start_record(ctx, "services", 1);
2216     for (it = dict_first(services); it; it = iter_next(it)) {
2217         service = iter_data(it);
2218         saxdb_start_record(ctx, service->bot->nick, 1);
2219         for (it2 = dict_first(service->commands); it2; it2 = iter_next(it2))
2220             modcmd_saxdb_write_command(ctx, iter_data(it2));
2221         saxdb_end_record(ctx);
2222     }
2223     saxdb_end_record(ctx);
2224
2225     saxdb_start_record(ctx, "helpfiles", 1);
2226     slist.size = 0;
2227     for (it = dict_first(services); it; it = iter_next(it)) {
2228         service = iter_data(it);
2229         slist.used = 0;
2230         for (ii = 0; ii < service->modules.used; ++ii)
2231             string_list_append(&slist, service->modules.list[ii]->name);
2232         saxdb_write_string_list(ctx, iter_key(it), &slist);
2233     }
2234     if (slist.list)
2235         free(slist.list);
2236     saxdb_end_record(ctx);
2237
2238     return 0;
2239 }
2240
2241 static int
2242 append_entry(const char *key, UNUSED_ARG(void *data), void *extra) {
2243     struct helpfile_expansion *exp = extra;
2244     int row = exp->value.table.length++;
2245     exp->value.table.contents[row] = calloc(1, sizeof(char*));
2246     exp->value.table.contents[row][0] = key;
2247     return 0;
2248 }
2249
2250 static struct helpfile_expansion
2251 modcmd_expand(const char *variable) {
2252     struct helpfile_expansion exp;
2253     extern struct userNode *message_source;
2254     struct service *service;
2255
2256     service = dict_find(services, message_source->nick, NULL);
2257     if (!irccasecmp(variable, "index")) {
2258         exp.type = HF_TABLE;
2259         exp.value.table.length = 1;
2260         exp.value.table.width = 1;
2261         exp.value.table.flags = TABLE_REPEAT_ROWS | TABLE_NO_HEADERS;
2262         exp.value.table.contents = calloc(dict_size(service->commands)+1, sizeof(char**));
2263         exp.value.table.contents[0] = calloc(1, sizeof(char*));
2264         exp.value.table.contents[0][0] = "Commands";
2265         dict_foreach(service->commands, append_entry, &exp);
2266         return exp;
2267     } else if (!irccasecmp(variable, "languages")) {
2268         struct string_buffer sbuf;
2269         dict_iterator_t it;
2270         sbuf.used = sbuf.size = 0;
2271         sbuf.list = NULL;
2272         for (it = dict_first(languages); it; it = iter_next(it)) {
2273             string_buffer_append_string(&sbuf, iter_key(it));
2274             string_buffer_append(&sbuf, ' ');
2275         }
2276         sbuf.list[--sbuf.used] = 0;
2277         exp.type = HF_STRING;
2278         exp.value.str = sbuf.list;
2279         return exp;
2280     }
2281     exp.type = HF_STRING;
2282     exp.value.str = NULL;
2283     return exp;
2284 }
2285
2286 static void
2287 modcmd_load_bots(struct dict *db, int default_nick) {
2288     dict_iterator_t it;
2289
2290     for (it = dict_first(db); it; it = iter_next(it)) {
2291         struct record_data *rd;
2292         struct service *svc;
2293         const char *nick, *desc, *hostname, *modes;
2294
2295         rd = iter_data(it);
2296         if (rd->type != RECDB_OBJECT) {
2297             log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'bots/%s' in modcmd db (expected object).", iter_key(it));
2298             continue;
2299         }
2300         nick = database_get_data(rd->d.object, "nick", RECDB_QSTRING);
2301         if (!nick) {
2302             if (default_nick)
2303                 nick = iter_key(it);
2304             else
2305                 continue;
2306         }
2307         svc = service_find(nick);
2308         desc = database_get_data(rd->d.object, "description", RECDB_QSTRING);
2309         hostname = database_get_data(rd->d.object, "hostname", RECDB_QSTRING);
2310         modes = database_get_data(rd->d.object, "modes", RECDB_QSTRING);
2311         if (desc) {
2312             if (!svc)
2313                 svc = service_register(AddLocalUser(nick, nick, hostname, desc, modes));
2314             else if (hostname)
2315                 strcpy(svc->bot->hostname, hostname);
2316             desc = database_get_data(rd->d.object, "trigger", RECDB_QSTRING);
2317             if (desc)
2318                 svc->trigger = desc[0];
2319             desc = database_get_data(rd->d.object, "privileged", RECDB_QSTRING);
2320             if (desc && (true_string(desc) || enabled_string(desc)))
2321                 svc->privileged = 1;
2322         }
2323     }
2324 }
2325
2326 static void
2327 modcmd_conf_read(void) {
2328     modcmd_load_bots(conf_get_data("services", RECDB_OBJECT), 0);
2329 }
2330
2331 void
2332 modcmd_init(void) {
2333     qsort(modcmd_flags, ArrayLength(modcmd_flags)-1, sizeof(modcmd_flags[0]), flags_qsort);
2334     modules = dict_new();
2335     dict_set_free_data(modules, free_module);
2336     services = dict_new();
2337     dict_set_free_data(services, free_service);
2338     reg_nick_change_func(modcmd_nick_change, NULL);
2339     reg_exit_func(modcmd_cleanup, NULL);
2340     conf_register_reload(modcmd_conf_read);
2341
2342     modcmd_module = module_register("modcmd", MAIN_LOG, "modcmd.help", modcmd_expand);
2343     bind_command = modcmd_register(modcmd_module, "bind", cmd_bind, 4, MODCMD_KEEP_BOUND, "oper_level", "800", NULL);
2344     help_command = modcmd_register(modcmd_module, "help", cmd_help, 1, 0, "flags", "+nolog", NULL);
2345     modcmd_register(modcmd_module, "command", cmd_command, 2, 0, "flags", "+nolog", NULL);
2346     modcmd_register(modcmd_module, "modcmd", cmd_modcmd, 2, MODCMD_KEEP_BOUND, "template", "bind", NULL);
2347     modcmd_register(modcmd_module, "god", cmd_god, 0, MODCMD_REQUIRE_AUTHED, "flags", "+oper,+networkhelper", NULL);
2348     modcmd_register(modcmd_module, "readhelp", cmd_readhelp, 2, 0, "oper_level", "650", NULL);
2349     modcmd_register(modcmd_module, "timecmd", cmd_timecmd, 2, 0, "oper_level", "1", NULL);
2350     modcmd_register(modcmd_module, "unbind", cmd_unbind, 3, 0, "template", "bind", NULL);
2351     modcmd_register(modcmd_module, "joiner", cmd_joiner, 1, 0, NULL);
2352     modcmd_register(modcmd_module, "stats modules", cmd_stats_modules, 1, 0, "flags", "+oper", NULL);
2353     modcmd_register(modcmd_module, "stats services", cmd_stats_services, 1, 0, "flags", "+oper", NULL);
2354     modcmd_register(modcmd_module, "showcommands", cmd_showcommands, 1, 0, "flags", "+acceptchan", NULL);
2355     modcmd_register(modcmd_module, "helpfiles", cmd_helpfiles, 2, 0, "template", "bind", NULL);
2356     modcmd_register(modcmd_module, "service add", cmd_service_add, 4, 0, "flags", "+oper", NULL);
2357     modcmd_register(modcmd_module, "service rename", cmd_service_rename, 3, 0, "flags", "+oper", NULL);
2358     modcmd_register(modcmd_module, "service trigger", cmd_service_trigger, 2, 0, "flags", "+oper", NULL);
2359     modcmd_register(modcmd_module, "service privileged", cmd_service_privileged, 2, 0, "flags", "+oper", NULL);
2360     modcmd_register(modcmd_module, "service remove", cmd_service_remove, 2, 0, "flags", "+oper", NULL);
2361     modcmd_register(modcmd_module, "dumpmessages", cmd_dump_messages, 1, 0, "oper_level", "1000", NULL);
2362     modcmd_register(modcmd_module, "tell", cmd_tell, 3, 0, "flags", "+oper", NULL);
2363     modcmd_register(modcmd_module, "rebindall", cmd_rebindall, 0, MODCMD_KEEP_BOUND, "oper_level", "800", NULL);
2364     version_command = modcmd_register(modcmd_module, "version", cmd_version, 1, 0, NULL);
2365     credits_command = modcmd_register(modcmd_module, "credits", cmd_credits, 1, 0, NULL);
2366     message_register_table(msgtab);
2367
2368 }
2369
2370 static void
2371 modcmd_db_load_command(struct service *service, const char *cmdname, struct dict *obj) {
2372     struct svccmd *svccmd;
2373     struct module *module;
2374     struct modcmd *modcmd;
2375     struct string_list *slist;
2376     const char *str, *sep;
2377     char buf[MAXLEN];
2378
2379     str = database_get_data(obj, "command", RECDB_QSTRING);
2380     if (!str) {
2381         log_module(MAIN_LOG, LOG_ERROR, "Missing command for service %s command %s in modcmd.db", service->bot->nick, cmdname);
2382         return;
2383     }
2384     sep = strchr(str, '.');
2385     if (!sep) {
2386         log_module(MAIN_LOG, LOG_ERROR, "Invalid command %s for service %s command %s in modcmd.db", str, service->bot->nick, cmdname);
2387         return;
2388     }
2389     memcpy(buf, str, sep-str);
2390     buf[sep-str] = 0;
2391     if (!(module = module_find(buf))) {
2392         log_module(MAIN_LOG, LOG_ERROR, "Unknown module %s for service %s command %s in modcmd.db", buf, service->bot->nick, cmdname);
2393         return;
2394     }
2395     if (!(modcmd = dict_find(module->commands, sep+1, NULL))) {
2396         log_module(MAIN_LOG, LOG_ERROR, "Unknown command %s in module %s for service %s command %s", sep+1, module->name, service->bot->nick, cmdname);
2397         return;
2398     }
2399     /* Now that we know we have a command to use, fill in the basics. */
2400     svccmd = calloc(1, sizeof(*svccmd));
2401     svccmd_insert(service, strdup(cmdname), svccmd, modcmd);
2402     if ((str = database_get_data(obj, "template", RECDB_QSTRING))) {
2403         add_pending_template(svccmd, str);
2404     } else {
2405         svccmd_copy_rules(svccmd, modcmd->defaults);
2406     }
2407     if ((str = database_get_data(obj, "account_flags", RECDB_QSTRING))) {
2408         svccmd->req_account_flags = svccmd->deny_account_flags = 0;
2409         svccmd_configure(svccmd, NULL, service->bot, "account_flags", str);
2410     }
2411     if ((str = database_get_data(obj, "flags", RECDB_QSTRING))) {
2412         svccmd->flags = 0;
2413         svccmd_configure(svccmd, NULL, service->bot, "flags", str);
2414     }
2415     if ((str = database_get_data(obj, "oper_access", RECDB_QSTRING))
2416         || (str = database_get_data(obj, "opserv_level", RECDB_QSTRING))) {
2417         svccmd_configure(svccmd, NULL, service->bot, "oper_access", str);
2418     }
2419     if ((str = database_get_data(obj, "channel_access", RECDB_QSTRING))
2420         || (str = database_get_data(obj, "chanserv_level", RECDB_QSTRING))) {
2421         svccmd_configure(svccmd, NULL, service->bot, "channel_access", str);
2422     }
2423     if ((slist = database_get_data(obj, "aliased", RECDB_STRING_LIST))) {
2424         unsigned int nn;
2425         svccmd->alias.used = svccmd->alias.size = slist->used;
2426         svccmd->alias.list = calloc(svccmd->alias.size, sizeof(svccmd->alias.list[0]));
2427         for (nn=0; nn<slist->used; ++nn)
2428             svccmd->alias.list[nn] = strdup(slist->list[nn]);
2429     }
2430     modcmd_set_effective_flags(svccmd);
2431 }
2432
2433 static struct svccmd *
2434 service_make_alias(struct service *service, const char *alias, ...) {
2435     char *arg, *argv[MAXNUMPARAMS];
2436     unsigned int nn, argc;
2437     struct svccmd *svccmd, *template;
2438     va_list args;
2439
2440     va_start(args, alias);
2441     argc = 0;
2442     while (1) {
2443         arg = va_arg(args, char*);
2444         if (!arg)
2445             break;
2446         argv[argc++] = arg;
2447     }
2448     va_end(args);
2449     svccmd = calloc(1, sizeof(*svccmd));
2450     if (!(template = svccmd_resolve_name(svccmd, argv[0]))) {
2451         log_module(MAIN_LOG, LOG_ERROR, "Invalid base command %s for alias %s in service %s", argv[0], alias, service->bot->nick);
2452         free(svccmd->name);
2453         free(svccmd);
2454         return NULL;
2455     }
2456     if (argc > 1) {
2457         svccmd->alias.used = svccmd->alias.size = argc;
2458         svccmd->alias.list = calloc(svccmd->alias.size, sizeof(svccmd->alias.list[0]));
2459         for (nn=0; nn<argc; nn++)
2460             svccmd->alias.list[nn] = strdup(argv[nn]);
2461     }
2462     svccmd_insert(service, strdup(alias), svccmd, template->command);
2463     svccmd_copy_rules(svccmd, template);
2464     return svccmd;
2465 }
2466
2467 static int saxdb_present;
2468
2469 static int
2470 modcmd_saxdb_read(struct dict *db) {
2471     struct dict *db2;
2472     dict_iterator_t it, it2;
2473     struct record_data *rd, *rd2;
2474     struct service *service;
2475
2476     modcmd_load_bots(database_get_data(db, "bots", RECDB_OBJECT), 1);
2477     db2 = database_get_data(db, "services", RECDB_OBJECT);
2478     if (!db2) {
2479         log_module(MAIN_LOG, LOG_ERROR, "Missing section 'services' in modcmd db.");
2480         return 1;
2481     }
2482     for (it = dict_first(db2); it; it = iter_next(it)) {
2483         rd = iter_data(it);
2484         if (rd->type != RECDB_OBJECT) {
2485             log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'services/%s' in modcmd db (expected object).", iter_key(it));
2486             continue;
2487         }
2488         if (!(service = service_find(iter_key(it)))) {
2489             log_module(MAIN_LOG, LOG_ERROR, "Unknown service '%s' listed in modcmd db.", iter_key(it));
2490             continue;
2491         }
2492         for (it2 = dict_first(rd->d.object); it2; it2 = iter_next(it2)) {
2493             rd2 = iter_data(it2);
2494             if (rd2->type != RECDB_OBJECT) {
2495                 log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'services/%s/%s' in modcmd db (expected object).", iter_key(it), iter_key(it2));
2496                 continue;
2497             }
2498             modcmd_db_load_command(service, iter_key(it2), rd2->d.object);
2499         }
2500     }
2501     db2 = database_get_data(db, "helpfiles", RECDB_OBJECT);
2502     for (it = dict_first(db2); it; it = iter_next(it)) {
2503         struct module *module;
2504         struct string_list *slist;
2505         unsigned int ii;
2506
2507         rd = iter_data(it);
2508         if (rd->type != RECDB_STRING_LIST) {
2509             log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'helpfiles/%s' in modcmd db (expected string list).", iter_key(it));
2510             continue;
2511         }
2512         slist = rd->d.slist;
2513         if (!(service = service_find(iter_key(it)))) {
2514             /* We probably whined about the service being missing above. */
2515             continue;
2516         }
2517         service->modules.used = 0;
2518         for (ii=0; ii<slist->used; ++ii) {
2519             if (!(module = dict_find(modules, slist->list[ii], NULL))) {
2520                 log_module(MAIN_LOG, LOG_ERROR, "Unknown module '%s' listed in modcmd 'helpfiles/%s'.", slist->list[ii], iter_key(it));
2521                 continue;
2522             }
2523             module_list_append(&service->modules, module);
2524         }
2525     }
2526     saxdb_present = 1;
2527     return 0;
2528 }
2529
2530 static void
2531 create_default_binds(int rebind) {
2532     /* Which services should import which modules by default? */
2533     struct {
2534         const char *svcname;
2535         /* C is lame and requires a fixed size for this array.
2536          * Be sure you NULL-terminate each array and increment the
2537          * size here if you add more default modules to any
2538          * service. */
2539         const char *modnames[8];
2540     } def_binds[] = {
2541         { "ChanServ", { "ChanServ", NULL } },
2542         { "Global", { "Global", NULL } },
2543         { "NickServ", { "NickServ", NULL } },
2544         { "OpServ", { "OpServ", "modcmd", "sendmail", "saxdb", "proxycheck", NULL } },
2545         { "SpamServ", { "SpamServ", NULL } },
2546         { NULL, { NULL } }
2547     };
2548     unsigned int ii, jj;
2549     char buf[128], *nick;
2550     struct service *service;
2551     struct module *module;
2552
2553     for (ii = 0; def_binds[ii].svcname; ++ii) {
2554         sprintf(buf, "services/%s/nick", def_binds[ii].svcname);
2555         if (!(nick = conf_get_data(buf, RECDB_QSTRING)))
2556             continue;
2557         if (!(service = service_find(nick)))
2558             continue;
2559         if (dict_size(service->commands) > 0 && !rebind)
2560             continue;
2561
2562         /* Bind the default modules for this service to it */
2563         for (jj = 0; def_binds[ii].modnames[jj]; ++jj) {
2564             if (!(module = module_find(def_binds[ii].modnames[jj])))
2565                 continue;
2566             service_bind_module(service, module);
2567         }
2568
2569         /* Bind the help and version commands to this service */
2570         service_bind_modcmd(service, help_command, help_command->name);
2571         service_bind_modcmd(service, version_command, version_command->name);
2572         service_bind_modcmd(service, credits_command, credits_command->name);
2573
2574         /* Now some silly hax.. (aliases that most people want) */
2575         if (!irccasecmp(def_binds[ii].svcname, "ChanServ")) {
2576             service_make_alias(service, "addowner", "*chanserv.adduser", "$1", "owner", "$2", NULL);
2577             service_make_alias(service, "addcoowner", "*chanserv.adduser", "$1", "coowner", "$2", NULL);
2578             service_make_alias(service, "addco", "*chanserv.adduser", "$1", "coowner", "$2", NULL);
2579             service_make_alias(service, "addmanager", "*chanserv.adduser", "$1", "manager", "$2", NULL);
2580             service_make_alias(service, "addop", "*chanserv.adduser", "$1", "op", "$2", NULL);
2581             service_make_alias(service, "addhop", "*chanserv.adduser", "$1", "halfop", "$2", NULL);
2582             service_make_alias(service, "addpeon", "*chanserv.adduser", "$1", "peon", "$2", NULL);
2583             service_make_alias(service, "addpal", "*chanserv.adduser", "$1", "pal", "$2", NULL);
2584             service_make_alias(service, "delowner", "*chanserv.deluser", "owner", "$1", NULL);
2585             service_make_alias(service, "delcoowner", "*chanserv.deluser", "coowner", "$1", NULL);
2586             service_make_alias(service, "delmanager", "*chanserv.deluser", "manager", "$1", NULL);
2587             service_make_alias(service, "delop", "*chanserv.deluser", "op", "$1", NULL);
2588             service_make_alias(service, "delpeon", "*chanserv.deluser", "peon", "$1", NULL);
2589             service_make_alias(service, "delpal", "*chanserv.deluser", "pal", "$1", NULL);
2590             service_make_alias(service, "llist", "*chanserv.lamers", "$1",  NULL);
2591             service_make_alias(service, "command", "*modcmd.command", NULL);
2592             service_make_alias(service, "god", "*modcmd.god", NULL);
2593         } else if (!irccasecmp(def_binds[ii].svcname, "OpServ")) {
2594             struct svccmd *svccmd;
2595             svccmd = service_make_alias(service, "stats", "*modcmd.joiner", NULL);
2596             svccmd->min_opserv_level = 101;
2597             svccmd = service_make_alias(service, "service", "*modcmd.joiner", NULL);
2598             svccmd->min_opserv_level = 900;
2599             svccmd = service_make_alias(service, "routing", "*modcmd.joiner", NULL);
2600             svccmd->min_opserv_level = 100;
2601         }
2602     }
2603 }
2604
2605 static void
2606 import_aliases_db() {
2607     struct dict *db;
2608     dict_iterator_t it, it2;
2609     struct record_data *rd, *rd2;
2610     struct service *service;
2611     struct module *module;
2612
2613     if (!(db = parse_database("aliases.db")))
2614         return;
2615     for (it = dict_first(db); it; it = iter_next(it)) {
2616         service = service_find(iter_key(it));
2617         if (!service)
2618             continue;
2619         module = module_find(service->bot->nick);
2620         rd = iter_data(it);
2621         if (rd->type != RECDB_OBJECT)
2622             continue;
2623         for (it2 = dict_first(rd->d.object); it2; it2 = iter_next(it2)) {
2624             struct modcmd *command;
2625             rd2 = iter_data(it2);
2626             if (rd2->type != RECDB_QSTRING)
2627                 continue;
2628             command = dict_find(module->commands, rd2->d.qstring, NULL);
2629             if (!command)
2630                 continue;
2631             service_bind_modcmd(service, command, iter_key(it2));
2632         }
2633     }
2634 }
2635
2636 void
2637 modcmd_finalize(void) {
2638     dict_iterator_t it;
2639
2640     /* Check databases. */
2641     saxdb_register("modcmd", modcmd_saxdb_read, modcmd_saxdb_write);
2642     create_default_binds(0);
2643     if (!saxdb_present)
2644         import_aliases_db();
2645
2646     /* Register services for their triggers. */
2647     for (it = dict_first(services); it; it = iter_next(it)) {
2648         struct service *svc = iter_data(it);
2649         if (svc->trigger)
2650             reg_chanmsg_func(svc->trigger, svc->bot, modcmd_chanmsg, NULL);
2651     }
2652
2653     /* Resolve command rule-templates. */
2654     while (pending_templates) {
2655         struct pending_template *ptempl = pending_templates;
2656         struct svccmd *svccmd;
2657
2658         pending_templates = ptempl->next;
2659         /* Only overwrite the current template if we have a valid template. */
2660         if (!strcmp(ptempl->base, "*")) {
2661             /* Do nothing. */
2662         } else if ((svccmd = svccmd_resolve_name(ptempl->cmd, ptempl->base))) {
2663             svccmd_copy_rules(ptempl->cmd, svccmd);
2664         } else {
2665             assert(ptempl->cmd->parent);
2666             log_module(MAIN_LOG, LOG_ERROR, "Unable to resolve template name %s for command %s in service %s.", ptempl->base, ptempl->cmd->name, ptempl->cmd->parent->bot->nick);
2667         }
2668         free(ptempl->base);
2669         free(ptempl);
2670     }
2671 }