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