]> jfr.im git - irc/evilnet/x3.git/blob - src/modcmd.c
projects / irc / evilnet / x3.git / blob
? search:


943580c0b8fa9d22263e95d78e35d6483717b994
[irc/evilnet/x3.git] / 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 "chanserv.h"
22 #include "conf.h"
23 #include "compat.h"
24 #include "modcmd.h"
25 #include "opserv.h"
26 #include "saxdb.h"
27 #include "timeq.h"
28 #include "version.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 = 0;
612 unsigned int ubound = 0;
613 unsigned int jj = 0;
614 char *end_num;
615
616 lbound = strtoul(arg+1, &end_num, 10);
617 switch (end_num[0]) {
618 case 0: ubound = lbound; break;
619 case 'a':
620 altarg = (user && user->handle_info) ? user->handle_info->handle : "(account)";
621 break;
622 case 'n':
623 altarg = user ? user->nick : "(nick)";
624 break;
625 case 'm':
626 #ifdef WITH_PROTOCOL_P10
627 altarg = user ? user->numeric : "(numnick)";
628 #else
629 altarg = "(This ircd protocol has no numnicks!)";
630 #endif
631 break;
632 case '-':
633 if (end_num[1] == 0) {
634 ubound = old_argc - 1;
635 break;
636 } else if (isdigit(end_num[1])) {
637 ubound = strtoul(end_num+1, NULL, 10);
638 break;
639 }
640 /* else fall through to default case */
641 default:
642 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);
643 return 0;
644 }
645 if (altarg != NULL) {
646 if (end_num[1] != 0) {
647 if ((end_num[1] == '-') && (end_num[2] == 0))
648 ubound = old_argc - 1;
649 else if ((end_num[1] == '-') && (isdigit(end_num[2])))
650 ubound = strtoul(end_num+2, NULL, 10);
651 else {
652 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);
653 return 0;
654 }
655 } else {
656 ubound = lbound;
657 }
658 if (lbound >= old_argc)
659 new_argv[new_argc++] = altarg;
660 }
661 if (ubound >= old_argc)
662 ubound = old_argc - 1;
663 if (lbound < old_argc)
664 for (jj = lbound; jj <= ubound; )
665 new_argv[new_argc++] = old_argv[jj++];
666 } else {
667 switch(arg[1]) {
668 case 'a':
669 new_argv[new_argc++] = (user && user->handle_info) ? user->handle_info->handle : "(account)";
670 break;
671 case 'n':
672 new_argv[new_argc++] = user ? user->nick : "(nick)";
673 break;
674 case 'm':
675 #ifdef WITH_PROTOCOL_P10
676 new_argv[new_argc++] = user ? user->numeric : "(numnick)";
677 #else
678 new_argv[new_argc++] = "(This ircd protocol has no numnicks!)";
679 #endif
680 break;
681 default:
682 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);
683 return 0;
684 }
685 }
686 }
687 return new_argc;
688 }
689
690 int
691 svccmd_invoke_argv(struct userNode *user, struct service *service, struct chanNode *channel, unsigned int argc, char *argv[], unsigned int server_qualified) {
692 extern struct userNode *chanserv;
693 struct svccmd *cmd;
694 unsigned int cmd_arg, perms, flags, options, result;
695 char channel_name[CHANNELLEN+1];
696 char *new_argv[MAXNUMPARAMS]; /* for aliases */
697
698 options = (server_qualified ? SVCCMD_QUALIFIED : 0) | SVCCMD_DEBIT | SVCCMD_NOISY;
699 /* Find the command argument. */
700 cmd_arg = IsChannelName(argv[0]) ? 1 : 0;
701 if (argc < cmd_arg+1) {
702 send_message(user, service->bot, "MCMSG_MISSING_COMMAND");
703 return 0;
704 }
705 if (!isalnum(*argv[cmd_arg])) {
706 /* Silently ignore stuff that doesn't begin with a letter or number. */
707 return 0;
708 }
709 cmd = dict_find(service->commands, argv[cmd_arg], NULL);
710 if (!cmd) {
711 if (!channel)
712 send_message(user, service->bot, "MSG_COMMAND_UNKNOWN", argv[cmd_arg]);
713 return 0;
714 }
715
716 /* Check pubcmd for the channel. */
717 if (channel && (channel->channel_info) && (service->bot == chanserv)
718 && !check_user_level(channel, user, lvlPubCmd, 1, 0)) {
719 send_message(user, service->bot, "MCMSG_PUBLIC_DENY", channel->name);
720 return 0;
721 }
722
723 flags = cmd->effective_flags;
724 /* If they put a channel name first, check if the command allows
725 * it. If so, swap it with the command name.
726 */
727 if (cmd_arg == 1) {
728 char *tmp;
729 /* Complain if we're not supposed to accept the channel. */
730 if (!(flags & MODCMD_ACCEPT_CHANNEL)) {
731 send_message(user, service->bot, "MCMSG_NO_CHANNEL_BEFORE");
732 return 0;
733 }
734 if (!(flags & MODCMD_ACCEPT_PCHANNEL)
735 && (argv[0][0] == '+')) {
736 send_message(user, service->bot, "MCMSG_NO_PLUS_CHANNEL");
737 return 0;
738 }
739 tmp = argv[1];
740 argv[1] = argv[0];
741 argv[0] = tmp;
742 }
743
744 /* Try to grab a channel handle before alias expansion.
745 * If the command accepts a channel name, and argv[1] is
746 * one, use it as a channel name, and hide it from logging.
747 */
748 if ((argc > 1)
749 && (flags & MODCMD_ACCEPT_CHANNEL)
750 && IsChannelName(argv[1])
751 && ((argv[1][0] != '+') || (flags & MODCMD_ACCEPT_PCHANNEL))
752 && (channel = dict_find(channels, argv[1], NULL))) {
753 argv[1] = argv[0];
754 argv++, argc--;
755 cmd_arg = 1;
756 }
757
758 /* Expand the alias arguments, if there are any. */
759 if (cmd->alias.used) {
760 int res;
761
762 res = svccmd_expand_alias(cmd, user, argc, argv, new_argv);
763 if (res < 0) {
764 send_message(user, service->bot, "MSG_MISSING_PARAMS", cmd->name);
765 return 0;
766 } else if (res == 0) {
767 send_message(user, service->bot, "MCMSG_ALIAS_ERROR", cmd->name);
768 return 0;
769 }
770 argc = res;
771 argv = new_argv;
772
773 /* Try again to grab a handle to the channel after alias
774 * expansion, overwriting any previous channel. This should,
775 * of course, only be done again if an alias was acually
776 * expanded. */
777 if ((argc > 1)
778 && (flags & MODCMD_ACCEPT_CHANNEL)
779 && IsChannelName(argv[1])
780 && ((argv[1][0] != '+') || (flags & MODCMD_ACCEPT_PCHANNEL))
781 && (channel = dict_find(channels, argv[1], NULL))) {
782 argv[1] = argv[0];
783 argv++, argc--;
784 cmd_arg = 1;
785 }
786 }
787
788 /* Figure out what actions we should do for it.. */
789 if (cmd_arg && (flags & MODCMD_TOY)) {
790 /* Do not let user manually specify a channel. */
791 channel = NULL;
792 }
793 if (argc < cmd->command->min_argc) {
794 send_message(user, service->bot, "MSG_MISSING_PARAMS", cmd->name);
795 svccmd_send_help_brief(user, service->bot, cmd);
796 return 0;
797 }
798 if (!cmd->command->func) {
799 send_message(user, service->bot, "MCMSG_INTERNAL_COMMAND", cmd->name);
800 return 0;
801 }
802 perms = svccmd_can_invoke(user, service->bot, cmd, channel, options);
803 if (!perms)
804 return 0;
805 cmd->uses++;
806 if (perms & ACTION_NOCHANNEL)
807 channel = NULL;
808
809 if (channel)
810 safestrncpy(channel_name, channel->name, sizeof(channel_name));
811 else
812 channel_name[0] = 0;
813
814 /* Call the function here */
815 if (!(result = cmd->command->func(user, channel, argc, argv, cmd)))
816 return 0;
817
818 if (!(flags & MODCMD_NO_LOG)) {
819 enum log_severity slvl;
820 if (result & CMD_LOG_OVERRIDE)
821 slvl = LOG_OVERRIDE;
822 else if ((perms & ACTION_STAFF) || (result & CMD_LOG_STAFF))
823 slvl = LOG_STAFF;
824 else if (perms & ACTION_OVERRIDE)
825 slvl = LOG_OVERRIDE;
826 else
827 slvl = LOG_COMMAND;
828 /* Unsplit argv after running the function to get the benefit
829 * of any mangling/hiding done by the commands. */
830 log_audit(cmd->command->parent->clog, slvl, user, service->bot, channel_name, AUDIT_HOSTMASK, unsplit_string(argv, argc, NULL));
831 }
832 return 1;
833 }
834
835 /* First line (syntax usually) only help.. used for wrong param counts etc */
836 int
837 svccmd_send_help_brief(struct userNode *user, struct userNode *bot, struct svccmd *cmd) {
838 int r;
839
840 /* If it's an alias, show what it's an alias for. */
841 if (cmd->alias.used) {
842 char alias_text[MAXLEN];
843 unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
844 send_message(user, bot, "MCMSG_COMMAND_ALIASES", cmd->name, cmd->command->name);
845 }
846 /* Send the syntax line of help.. */
847 r = send_help_brief(user, bot, cmd->command->parent->helpfile, cmd->name);
848 if(!r) {
849 if(cmd->command->name)
850 {
851 send_message(user, bot, "MCMSG_COMMAND_ALIASES", cmd->name, cmd->command->name);
852 r = send_help_brief(user, bot, cmd->command->parent->helpfile, cmd->command->name);
853 }
854 }
855 return r;
856 }
857
858 int is_joiner(struct svccmd *cmd)
859 {
860 if(cmd->command->name)
861 {
862 if(strcasecmp("joiner", cmd->command->name))
863 return(0);
864 else
865 return(1);
866 }
867 return(0);
868 /*
869 if(cmd->alias.used)
870 {
871 char alias_text[MAXLEN];
872 unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
873 if(strcasecmp("joiner", alias_text))
874 return(0);
875 else
876 return(1);
877 }
878 */
879 }
880
881 int
882 svccmd_send_help(struct userNode *user, struct service *service, const char *topic) {
883 struct module *module;
884 struct svccmd *cmd;
885 char cmdname[MAXLEN];
886 unsigned int nn, ii;
887 int helpsent = 0;
888
889 /* If there is no topic show the index */
890 if (!topic)
891 topic = "<index>";
892 /* make heading str (uppercase) */
893 for (nn=0; topic[nn]; nn++)
894 cmdname[nn] = toupper(topic[nn]);
895 cmdname[nn] = 0;
896
897 /* If there is a command 'topic', send command help for the command (unless its bound to JOINER) */
898 if ((cmd = dict_find(service->commands, topic, NULL)) && !is_joiner(cmd))
899 {
900 send_message(user, service->bot, "MCMSG_HELP_COMMAND_HEADER", cmdname);
901 send_message(user, service->bot, "MCMSG_HELP_DIVIDER");
902 helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, cmd->name);
903
904 /* Show if its an alias, or a binding of another command */
905 if (cmd->alias.used)
906 {
907 char alias_text[MAXLEN];
908 unsplit_string((char**)cmd->alias.list, cmd->alias.used, alias_text);
909 send_message(user, service->bot, "MCMSG_HELP_COMMAND_ALIAS", alias_text);
910 /* If send_help above didnt work, try again with the referenced command.. */
911 if(!helpsent)
912 helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, alias_text);
913 }
914 else if(cmd->command->name && strcasecmp(cmd->command->name, cmd->name))
915 {
916 send_message(user, service->bot, "MCMSG_HELP_COMMAND_ALIAS", cmd->command->name);
917 /* If send_help above didnt work, try again with the referenced command.. */
918 if(!helpsent)
919 helpsent = send_help(user, service->bot, cmd->command->parent->helpfile, cmd->command->name);
920 }
921 /* If send_help still couldnt find it, tell them sorry */
922 if(!helpsent)
923 send_message(user, service->bot, "MCMSG_HELP_COMMAND_UNKNOWN");
924 send_message(user, service->bot, "MCMSG_HELP_FOOTER");
925 return true;
926 }
927 else /* look for topic in the help files loaded to this nick/service */
928 {
929 /* Check for non command help in first primary help file, then next and so on */
930 /* Note - we need to think about default bindings. see opserv.helpfiles */
931 for(ii = 0; ii < service->modules.used; ii++)
932 {
933 module = service->modules.list[ii];
934 if(!module->helpfile)
935 continue;
936 if(dict_find(module->helpfile->db, topic, NULL))
937 {
938 if (module->helpfile && dict_find(module->helpfile->db, topic, NULL))
939 {
940
941 send_message(user, service->bot, "MCMSG_HELP_TOPIC_HEADER", cmdname);
942 send_message(user, service->bot, "MCMSG_HELP_DIVIDER");
943 /* This should never fail but maybe if something is odd? */
944 if(!send_help(user, service->bot, module->helpfile, topic))
945 send_message(user, service->bot, "MSG_TOPIC_UNKNOWN");
946 send_message(user, service->bot, "MCMSG_HELP_FOOTER");
947 return true;
948 }
949 }
950 }
951 }
952 /* Otherwise say we cant find it */
953 send_message(user, service->bot, "MSG_TOPIC_UNKNOWN");
954 return 0;
955 }
956
957 static int
958 svccmd_invoke(struct userNode *user, struct service *service, struct chanNode *channel, const char *text, int server_qualified, int chanmsg) {
959 unsigned int argc;
960 char *argv[MAXNUMPARAMS];
961 char tmpline[MAXLEN];
962
963 if (!*text)
964 return 0;
965 if (service->privileged) {
966 /* Silently return if the message is a channel message (trigger) */
967 if (chanmsg && (!IsOper(user) || !user->handle_info || HANDLE_FLAGGED(user->handle_info, OPER_SUSPENDED)))
968 return 0;
969 if (!IsOper(user)) {
970 send_message(user, service->bot, "MSG_SERVICE_PRIVILEGED", service->bot->nick);
971 return 0;
972 }
973 if (!user->handle_info) {
974 send_message(user, service->bot, "MSG_AUTHENTICATE");
975 return 0;
976 }
977 if (HANDLE_FLAGGED(user->handle_info, OPER_SUSPENDED)) {
978 send_message(user, service->bot, "MSG_OPER_SUSPENDED");
979 return 0;
980 }
981 }
982 safestrncpy(tmpline, text, sizeof(tmpline));
983 argc = split_line(tmpline, false, ArrayLength(argv), argv);
984 return argc ? svccmd_invoke_argv(user, service, channel, argc, argv, server_qualified) : 0;
985 }
986
987 void
988 modcmd_privmsg(struct userNode *user, struct userNode *bot, const char *text, int server_qualified) {
989 struct service *service;
990
991 if (!(service = dict_find(services, bot->nick, NULL))) {
992 log_module(MAIN_LOG, LOG_ERROR, "modcmd_privmsg got privmsg for unhandled service %s, unregistering.", bot->nick);
993 reg_privmsg_func(bot, NULL);
994 return;
995 }
996
997 if (text[0] == '\x01') {
998 char *term, response[MAXLEN];
999
1000 text++; /* Skip leading ^A. */
1001 /* Chop off final ^A. */
1002 term = strchr(text, '\x01');
1003 if (!term)
1004 return;
1005 *term = '\0';
1006 /* Parse out leading text. */
1007 term = strchr(text, ' ');
1008 if (term) {
1009 *term++ = '\0';
1010 if (!*term)
1011 term = NULL;
1012 }
1013 /* No dict lookup since these are so few. */
1014 if (!irccasecmp(text, "CLIENTINFO")) {
1015 /* Use \001 instead of \x01 because apparently \x01C is
1016 * interpreted as ASCII FS (\034, decimal 28, hex 1C).
1017 */
1018 irc_notice_user(bot, user, "\001CLIENTINFO CLIENTINFO PING TIME USERINFO VERSION\x01");
1019 } else if (!irccasecmp(text, "PING")) {
1020 if (term) {
1021 snprintf(response, sizeof(response), "\x01PING %s\x01", term);
1022 irc_notice_user(bot, user, response);
1023 } else {
1024 irc_notice_user(bot,user, "\x01PING\x01");
1025 }
1026 } else if (!irccasecmp(text, "TIME")) {
1027 struct tm tm;
1028 localtime_r(&now, &tm);
1029 strftime(response, sizeof(response), "\x01TIME %a %b %d %H:%M:%S %Y\x01", &tm);
1030 irc_notice_user(bot, user, response);
1031 } else if (!irccasecmp(text, "USERINFO")) {
1032 snprintf(response, sizeof(response), "\x01USERINFO %s\x01", bot->info);
1033 irc_notice_user(bot, user, response);
1034 } else if (!irccasecmp(text, "VERSION")) {
1035 snprintf(response, sizeof(response), "\x01VERSION %s+[%s]\x01", PACKAGE_STRING, cvs_version);
1036 irc_notice_user(bot, user, response);
1037 } else if (!irccasecmp(text, "GENDER")) {
1038 snprintf(response, sizeof(response), "\x01GENDER ummm im still deciding\x01");
1039 irc_notice_user(bot, user, response);
1040 }
1041 return;
1042 }
1043
1044 if (service->msg_hook && service->msg_hook(user, bot, text, server_qualified))
1045 return;
1046 svccmd_invoke(user, service, NULL, text, server_qualified, 0);
1047 }
1048
1049 void
1050 modcmd_chanmsg(struct userNode *user, struct chanNode *chan, const char *text, struct userNode *bot, unsigned int is_notice, UNUSED_ARG(void *extra)) {
1051 struct service *service;
1052 if (!(service = dict_find(services, bot->nick, NULL)))
1053 return;
1054 svccmd_invoke(user, service, chan, text, 0, 1);
1055 (void)is_notice;
1056 }
1057
1058 struct service *
1059 service_register(struct userNode *bot) {
1060 struct service *service;
1061 if ((service = dict_find(services, bot->nick, NULL)))
1062 return service;
1063 service = calloc(1, sizeof(*service));
1064 module_list_init(&service->modules);
1065 service->commands = dict_new();
1066 service->bot = bot;
1067 dict_set_free_data(service->commands, free_service_command);
1068 dict_insert(services, service->bot->nick, service);
1069 reg_privmsg_func(bot, modcmd_privmsg);
1070 return service;
1071 }
1072
1073 struct service *
1074 service_find(const char *name) {
1075 return dict_find(services, name, NULL);
1076 }
1077
1078 static void
1079 svccmd_insert(struct service *service, char *name, struct svccmd *svccmd, struct modcmd *modcmd) {
1080 unsigned int ii;
1081 svccmd->parent = service;
1082 svccmd->name = name;
1083 svccmd->command = modcmd;
1084 svccmd->command->bind_count++;
1085 dict_insert(service->commands, svccmd->name, svccmd);
1086 for (ii=0; ii<service->modules.used; ++ii) {
1087 if (service->modules.list[ii] == svccmd->command->parent) break;
1088 }
1089 if (ii == service->modules.used) {
1090 module_list_append(&service->modules, svccmd->command->parent);
1091 }
1092 }
1093
1094 struct svccmd *
1095 service_bind_modcmd(struct service *service, struct modcmd *cmd, const char *name) {
1096 struct svccmd *svccmd;
1097 if ((svccmd = dict_find(service->commands, name, NULL))) {
1098 if (svccmd->command == cmd) return svccmd;
1099 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);
1100 return NULL;
1101 }
1102 svccmd = calloc(1, sizeof(*svccmd));
1103 svccmd_insert(service, strdup(name), svccmd, cmd);
1104 svccmd_copy_rules(svccmd, cmd->defaults);
1105 return svccmd;
1106 }
1107
1108 static unsigned int
1109 service_bind_module(struct service *service, struct module *module) {
1110 dict_iterator_t it;
1111 struct modcmd *modcmd;
1112 unsigned int count;
1113
1114 count = 0;
1115 for (it = dict_first(module->commands); it; it = iter_next(it)) {
1116 modcmd = iter_data(it);
1117 if (!((modcmd->flags | modcmd->defaults->flags) & MODCMD_NO_DEFAULT_BIND))
1118 if (service_bind_modcmd(service, modcmd, iter_key(it)))
1119 count++;
1120 }
1121 return count;
1122 }
1123
1124 /* This MUST return argc if the alias expansion code knows how to deal
1125 * with every argument in argv; otherwise, it MUST return the index of
1126 * an argument that the expansion code does not know how to deal with.
1127 */
1128 static unsigned int
1129 check_alias_args(char *argv[], unsigned int argc) {
1130 unsigned int arg;
1131
1132 for (arg=0; arg<argc; ++arg) {
1133 if (argv[arg][0] != '$') {
1134 continue;
1135 } else if (argv[arg][1] == '$') {
1136 continue;
1137 } else if (isdigit(argv[arg][1])) {
1138 char *end_num;
1139 unsigned long tmp;
1140
1141 tmp = strtoul(argv[arg]+1, &end_num, 10);
1142 switch (end_num[0]) {
1143 case 0:
1144 continue;
1145 case 'a':
1146 case 'n':
1147 case 'm':
1148 if (end_num[1] == 0)
1149 continue;
1150 else if (end_num[1] == '-')
1151 end_num++;
1152 else
1153 return arg;
1154 case '-':
1155 if (end_num[1] == 0)
1156 continue;
1157 else if (isdigit(end_num[1]))
1158 continue;
1159 /* else fall through to default case */
1160 default:
1161 return arg;
1162 }
1163 } else {
1164 switch(argv[arg][1]) {
1165 case 'a':
1166 case 'n':
1167 case 'm':
1168 continue;
1169 default:
1170 return arg;
1171 }
1172 }
1173 }
1174 return arg;
1175 }
1176
1177 static unsigned int
1178 collapse_cmdname(char *argv[], unsigned int argc, char *dest) {
1179 unsigned int ii, pos, arg;
1180 if (!argc) {
1181 dest[0] = 0;
1182 return 0;
1183 }
1184 for (ii=pos=0, arg=0; argv[arg][ii]; ) {
1185 if (argv[arg][ii] == '\\') {
1186 if (argv[arg][ii+1]) {
1187 /* escaping a real character just puts it in literally */
1188 dest[pos++] = argv[arg][++ii];
1189 } else if ((arg+1) == argc) {
1190 /* we ran to the end of the argument list; abort */
1191 break;
1192 } else {
1193 /* escape at end of a word is a space */
1194 dest[pos++] = ' ';
1195 ii = 0;
1196 arg++;
1197 }
1198 } else {
1199 /* normal characters don't need escapes */
1200 dest[pos++] = argv[arg][ii++];
1201 }
1202 }
1203 dest[pos] = 0;
1204 return arg + 1;
1205 }
1206
1207 static MODCMD_FUNC(cmd_bind) {
1208 struct service *service;
1209 struct svccmd *template, *newcmd;
1210 char *svcname, *dot;
1211 char newname[MAXLEN], cmdname[MAXLEN];
1212 unsigned int arg, diff;
1213
1214 assert(argc > 3);
1215 svcname = argv[1];
1216 arg = collapse_cmdname(argv+2, argc-2, newname) + 2;
1217 if (!arg) {
1218 reply("MSG_MISSING_PARAMS", cmd->name);
1219 return 0;
1220 }
1221 diff = collapse_cmdname(argv+arg, argc-arg, cmdname);
1222 if (!diff) {
1223 reply("MSG_MISSING_PARAMS", cmd->name);
1224 return 0;
1225 }
1226 arg += diff;
1227
1228 if (!(service = service_find(svcname))) {
1229 reply("MCMSG_UNKNOWN_SERVICE", svcname);
1230 return 0;
1231 }
1232
1233 if ((newcmd = dict_find(service->commands, newname, NULL))) {
1234 reply("MCMSG_ALREADY_BOUND", service->bot->nick, newname);
1235 return 0;
1236 }
1237
1238 if ((dot = strchr(cmdname, '.')) && (dot[1] == '*') && (dot[2] == 0)) {
1239 unsigned int count;
1240 struct module *module;
1241 *dot = 0;
1242 module = module_find((cmdname[0] == '*') ? cmdname+1 : cmdname);
1243 if (!module) {
1244 reply("MSG_MODULE_UNKNOWN", cmdname);
1245 return 0;
1246 }
1247 count = service_bind_module(service, module);
1248 reply("MCMSG_MODULE_BOUND", count, module->name, service->bot->nick);
1249 return count != 0;
1250 }
1251 newcmd = calloc(1, sizeof(*newcmd));
1252 newcmd->name = strdup(newname);
1253 newcmd->parent = service;
1254 if (!(template = svccmd_resolve_name(newcmd, cmdname))) {
1255 reply("MCMSG_UNKNOWN_COMMAND_2", cmdname, service->bot->nick);
1256 free(newcmd->name);
1257 free(newcmd);
1258 return 0;
1259 }
1260 if (template->alias.used) {
1261 reply("MCMSG_CANNOT_DOUBLE_ALIAS");
1262 free(newcmd->name);
1263 free(newcmd);
1264 return 0;
1265 }
1266
1267 if (argc > arg) {
1268 /* a more complicated alias; fix it up */
1269 unsigned int nn;
1270
1271 arg -= diff;
1272 nn = check_alias_args(argv+arg, argc-arg);
1273 if (nn+arg < argc) {
1274 reply("MCMSG_BAD_ALIAS_ARGUMENT", argv[nn+arg]);
1275 free(newcmd->name);
1276 free(newcmd);
1277 return 0;
1278 }
1279 newcmd->alias.used = newcmd->alias.size = argc-arg;
1280 newcmd->alias.list = calloc(newcmd->alias.size, sizeof(newcmd->alias.list[0]));
1281 for (nn=0; nn<newcmd->alias.used; ++nn)
1282 newcmd->alias.list[nn] = strdup(argv[nn+arg]);
1283 }
1284
1285 svccmd_insert(service, newcmd->name, newcmd, template->command);
1286 svccmd_copy_rules(newcmd, template);
1287 reply("MCMSG_COMMAND_BOUND", newcmd->name, newcmd->parent->bot->nick);
1288 return 1;
1289 }
1290
1291 static int
1292 service_recheck_bindings(struct service *service, struct module *module) {
1293 dict_iterator_t it;
1294 struct svccmd *cmd;
1295
1296 for (it = dict_first(service->commands); it; it = iter_next(it)) {
1297 cmd = iter_data(it);
1298 if (cmd->command->parent == module) return 0;
1299 }
1300 /* No more bindings, remove it from our list. */
1301 module_list_remove(&service->modules, module);
1302 return 1;
1303 }
1304
1305 static svccmd_unbind_func_t *suf_list;
1306 static void **suf_list_extra;
1307 unsigned int suf_size, suf_used;
1308
1309 void
1310 reg_svccmd_unbind_func(svccmd_unbind_func_t handler, void *extra) {
1311 if (suf_used == suf_size) {
1312 if (suf_size) {
1313 suf_size <<= 1;
1314 suf_list = realloc(suf_list, suf_size*sizeof(svccmd_unbind_func_t));
1315 suf_list_extra = realloc(suf_list_extra, suf_size*sizeof(void*));
1316 } else {
1317 suf_size = 8;
1318 suf_list = malloc(suf_size*sizeof(svccmd_unbind_func_t));
1319 suf_list_extra = malloc(suf_size*sizeof(void*));
1320 }
1321 }
1322 suf_list[suf_used] = handler;
1323 suf_list_extra[suf_used++] = extra;
1324 }
1325
1326 static MODCMD_FUNC(cmd_unbind) {
1327 struct service *service;
1328 struct userNode *bot;
1329 struct svccmd *bound;
1330 struct module *module;
1331 const char *svcname;
1332 unsigned int arg, ii;
1333 char cmdname[MAXLEN];
1334
1335 assert(argc > 2);
1336 svcname = argv[1];
1337 arg = collapse_cmdname(argv+2, argc-2, cmdname) + 2;
1338 if (!arg) {
1339 reply("MSG_MISSING_PARAMS", cmd->name);
1340 return 0;
1341 }
1342 if (!(service = service_find(svcname))) {
1343 reply("MCMSG_UNKNOWN_SERVICE", svcname);
1344 return 0;
1345 }
1346 if (!(bound = dict_find(service->commands, cmdname, NULL))) {
1347 reply("MCMSG_NO_COMMAND_BOUND", service->bot->nick, cmdname);
1348 return 0;
1349 }
1350 if ((bound->command->flags & MODCMD_KEEP_BOUND) && (bound->command->bind_count == 1)) {
1351 reply("MCMSG_UNBIND_PROHIBITED", bound->command->name);
1352 return 0;
1353 }
1354
1355 for (ii=0; ii<suf_used; ii++)
1356 suf_list[ii](bound, suf_list_extra[ii]);
1357 /* If this command binding is removing itself, we must take care
1358 * not to dereference it after the dict_remove.
1359 */
1360 bot = cmd->parent->bot;
1361 module = cmd->command->parent;
1362 dict_remove(service->commands, bound->name);
1363 send_message(user, bot, "MCMSG_COMMAND_UNBOUND", cmdname, service->bot->nick);
1364 if (service_recheck_bindings(service, module))
1365 send_message(user, bot, "MCMSG_HELPFILE_UNBOUND", module->name, module->name);
1366 return 1;
1367 }
1368
1369 static MODCMD_FUNC(cmd_readhelp) {
1370 const char *modname;
1371 struct module *module;
1372 struct helpfile *old_helpfile;
1373 struct timeval start, stop;
1374
1375 assert(argc > 1);
1376 modname = argv[1];
1377 if (!(module = module_find(modname))) {
1378 reply("MSG_MODULE_UNKNOWN", modname);
1379 return 0;
1380 }
1381 if (!module->helpfile_name) {
1382 reply("MCMSG_NO_HELPFILE", module->name);
1383 return 0;
1384 }
1385 old_helpfile = module->helpfile;
1386 gettimeofday(&start, NULL);
1387 module->helpfile = open_helpfile(module->helpfile_name, module->expand_help);
1388 if (!module->helpfile) {
1389 module->helpfile = old_helpfile;
1390 reply("MCMSG_HELPFILE_ERROR", module->helpfile_name);
1391 return 0;
1392 }
1393 if (old_helpfile) close_helpfile(old_helpfile);
1394 gettimeofday(&stop, NULL);
1395 stop.tv_sec -= start.tv_sec;
1396 stop.tv_usec -= start.tv_usec;
1397 if (stop.tv_usec < 0) {
1398 stop.tv_sec -= 1;
1399 stop.tv_usec += 1000000;
1400 }
1401 reply("MCMSG_HELPFILE_READ", module->name, stop.tv_sec, stop.tv_usec/1000);
1402 return 1;
1403 }
1404
1405 static MODCMD_FUNC(cmd_help) {
1406 const char *topic;
1407
1408 topic = (argc < 2) ? NULL : unsplit_string(argv+1, argc-1, NULL);
1409 return svccmd_send_help(user, cmd->parent, topic);
1410 }
1411
1412 static MODCMD_FUNC(cmd_timecmd) {
1413 struct timeval start, stop;
1414 char cmd_text[MAXLEN];
1415
1416 unsplit_string(argv+1, argc-1, cmd_text);
1417 gettimeofday(&start, NULL);
1418 svccmd_invoke(user, cmd->parent, channel, cmd_text, 0, 0);
1419 gettimeofday(&stop, NULL);
1420 stop.tv_sec -= start.tv_sec;
1421 stop.tv_usec -= start.tv_usec;
1422 if (stop.tv_usec < 0) {
1423 stop.tv_sec -= 1;
1424 stop.tv_usec += 1000000;
1425 }
1426 reply("MCMSG_COMMAND_TIME", cmd_text, stop.tv_sec, stop.tv_usec);
1427 return 1;
1428 }
1429
1430 static MODCMD_FUNC(cmd_command) {
1431 struct svccmd *svccmd;
1432 const char *cmd_name, *fmt_str;
1433 unsigned int flags, shown_flags, nn, pos;
1434 char buf[MAXLEN];
1435
1436 assert(argc >= 2);
1437 cmd_name = unsplit_string(argv+1, argc-1, NULL);
1438 if (!(svccmd = svccmd_resolve_name(cmd, cmd_name))) {
1439 reply("MCMSG_UNKNOWN_COMMAND_2", cmd_name, cmd->parent->bot->nick);
1440 return 0;
1441 }
1442 pos = snprintf(buf, sizeof(buf), "%s.%s", svccmd->command->parent->name, svccmd->command->name);
1443 if (svccmd->alias.used) {
1444 buf[pos++] = ' ';
1445 unsplit_string((char**)svccmd->alias.list+1, svccmd->alias.used-1, buf+pos);
1446 reply("MCMSG_COMMAND_ALIASES", svccmd->name, buf);
1447 } else {
1448 reply("MCMSG_COMMAND_BINDING", svccmd->name, buf);
1449 }
1450 flags = svccmd->effective_flags;
1451 if ((svccmd->parent && svccmd->parent->privileged && !IsOper(user))
1452 || ((flags & MODCMD_REQUIRE_STAFF)
1453 && !IsOper(user) && !IsNetworkHelper(user) && !IsSupportHelper(user))) {
1454 reply("MCMSG_INSPECTION_REFUSED", svccmd->name);
1455 return 0;
1456 }
1457 if (flags & MODCMD_DISABLED) {
1458 reply("MSG_COMMAND_DISABLED", svccmd->name);
1459 return 1;
1460 }
1461 shown_flags = 0;
1462 if (svccmd->min_opserv_level > 0) {
1463 reply("MCMSG_NEED_OPSERV_LEVEL", svccmd->min_opserv_level);
1464 shown_flags |= MODCMD_REQUIRE_OPER | MODCMD_REQUIRE_AUTHED;
1465 }
1466 if (svccmd->min_channel_access > 0) {
1467 reply("MCMSG_NEED_CHANSERV_LEVEL", svccmd->min_channel_access);
1468 shown_flags |= MODCMD_REQUIRE_CHANUSER | MODCMD_REQUIRE_REGCHAN | MODCMD_REQUIRE_CHANNEL | MODCMD_REQUIRE_AUTHED;
1469 }
1470 if (svccmd->req_account_flags) {
1471 for (nn=pos=0; nn<32; nn++) {
1472 if (!(svccmd->req_account_flags & (1 << nn))) continue;
1473 buf[pos++] = HANDLE_FLAGS[nn];
1474 }
1475 buf[pos] = 0;
1476 reply("MCMSG_NEED_ACCOUNT_FLAGS", buf);
1477 shown_flags |= MODCMD_REQUIRE_AUTHED;
1478 }
1479 if (!flags && !shown_flags) {
1480 reply("MCMSG_NEED_NOTHING", svccmd->name);
1481 return 1;
1482 }
1483 if (flags & ~shown_flags & MODCMD_REQUIRE_HELPING) {
1484 reply("MCMSG_MUST_BE_HELPING");
1485 shown_flags |= MODCMD_REQUIRE_AUTHED | MODCMD_REQUIRE_STAFF;
1486 }
1487 if (flags & ~shown_flags & MODCMD_REQUIRE_STAFF) {
1488 switch (flags & MODCMD_REQUIRE_STAFF) {
1489 default: case MODCMD_REQUIRE_STAFF:
1490 fmt_str = "MCMSG_NEED_STAFF_ACCESS";
1491 break;
1492 case MODCMD_REQUIRE_OPER:
1493 fmt_str = "MCMSG_NEED_STAFF_OPER";
1494 break;
1495 case MODCMD_REQUIRE_NETWORK_HELPER:
1496 fmt_str = "MCMSG_NEED_STAFF_NETHELPER";
1497 break;
1498 case MODCMD_REQUIRE_OPER|MODCMD_REQUIRE_NETWORK_HELPER:
1499 fmt_str = "MCMSG_NEED_STAFF_NETHELPER_OR_OPER";
1500 break;
1501 case MODCMD_REQUIRE_SUPPORT_HELPER:
1502 fmt_str = "MCMSG_NEED_STAFF_SHELPER";
1503 break;
1504 case MODCMD_REQUIRE_OPER|MODCMD_REQUIRE_SUPPORT_HELPER:
1505 fmt_str = "MCMSG_NEED_STAFF_SHELPER_OR_OPER";
1506 break;
1507 case MODCMD_REQUIRE_SUPPORT_HELPER|MODCMD_REQUIRE_NETWORK_HELPER:
1508 fmt_str = "MCMSG_NEED_STAFF_HELPER";
1509 break;
1510 }
1511 reply(fmt_str);
1512 shown_flags |= MODCMD_REQUIRE_AUTHED | MODCMD_REQUIRE_STAFF;
1513 }
1514 if (flags & ~shown_flags & MODCMD_REQUIRE_JOINABLE) {
1515 reply("MCMSG_NEED_JOINABLE");
1516 shown_flags |= MODCMD_REQUIRE_CHANUSER;
1517 }
1518 if (flags & ~shown_flags & MODCMD_REQUIRE_CHANUSER) {
1519 if (flags & ~shown_flags & MODCMD_IGNORE_CSUSPEND)
1520 reply("MCMSG_NEED_CHANUSER_CSUSPENDABLE");
1521 else
1522 reply("MCMSG_NEED_CHANUSER");
1523 shown_flags |= MODCMD_IGNORE_CSUSPEND | MODCMD_REQUIRE_REGCHAN | MODCMD_REQUIRE_CHANNEL | MODCMD_REQUIRE_AUTHED;
1524 }
1525 if (flags & ~shown_flags & MODCMD_REQUIRE_REGCHAN) {
1526 reply("MCMSG_NEED_REGCHAN");
1527 shown_flags |= MODCMD_REQUIRE_CHANNEL;
1528 }
1529 if (flags & ~shown_flags & MODCMD_REQUIRE_CHANNEL)
1530 reply("MCMSG_NEED_CHANNEL");
1531 if (flags & ~shown_flags & MODCMD_REQUIRE_AUTHED)
1532 reply("MCMSG_NEED_AUTHED");
1533 if (flags & ~shown_flags & MODCMD_TOY)
1534 reply("MCMSG_IS_TOY", svccmd->name);
1535 if (flags & ~shown_flags & MODCMD_REQUIRE_QUALIFIED) {
1536 const char *botnick = svccmd->parent ? svccmd->parent->bot->nick : "SomeBot";
1537 reply("MCMSG_MUST_QUALIFY", botnick, svccmd->name, botnick);
1538 }
1539 reply("MCMSG_END_REQUIREMENTS", svccmd->name);
1540 return 1;
1541 }
1542
1543 static void
1544 modcmd_describe_command(struct userNode *user, struct svccmd *cmd, struct svccmd *target) {
1545 char buf1[MAXLEN], buf2[MAXLEN];
1546 unsigned int ii, len, buf1_used, buf2_used;
1547
1548 if (target->alias.used) {
1549 unsplit_string((char**)target->alias.list, target->alias.used, buf1);
1550 reply("MCMSG_COMMAND_ALIASES", target->name, buf1);
1551 } else {
1552 snprintf(buf1, sizeof(buf1), "%s.%s", target->command->parent->name, target->command->name);
1553 reply("MCMSG_COMMAND_BINDING", target->name, buf1);
1554 }
1555 for (ii = buf1_used = buf2_used = 0; modcmd_flags[ii].name; ++ii) {
1556 const struct modcmd_flag *flag = &modcmd_flags[ii];
1557 if (target->flags & flag->flag) {
1558 if (buf1_used)
1559 buf1[buf1_used++] = ',';
1560 len = strlen(flag->name);
1561 memcpy(buf1 + buf1_used, flag->name, len);
1562 buf1_used += len;
1563 } else if (target->effective_flags & flag->flag) {
1564 if (buf2_used)
1565 buf2[buf2_used++] = ',';
1566 len = strlen(flag->name);
1567 memcpy(buf2 + buf2_used, flag->name, len);
1568 buf2_used += len;
1569 }
1570 }
1571 if (buf1_used)
1572 buf1[buf1_used] = '\0';
1573 else
1574 strcpy(buf1, user_find_message(user, "MSG_NONE"));
1575 if (buf2_used)
1576 buf2[buf2_used] = '\0';
1577 else
1578 strcpy(buf2, user_find_message(user, "MSG_NONE"));
1579 reply("MCMSG_COMMAND_FLAGS", buf1, buf2);
1580 for (ii = buf1_used = buf2_used = 0; handle_flags[ii]; ++ii) {
1581 if (target->req_account_flags & (1 << ii))
1582 buf1[buf1_used++] = handle_flags[ii];
1583 else if (target->deny_account_flags & (1 << ii))
1584 buf2[buf2_used++] = handle_flags[ii];
1585 }
1586 buf1[buf1_used] = buf2[buf2_used] = '\0';
1587 reply("MCMSG_COMMAND_ACCOUNT_FLAGS", buf1, buf2);
1588 reply("MCMSG_COMMAND_ACCESS_LEVEL", target->min_channel_access, target->min_opserv_level);
1589 reply("MCMSG_COMMAND_USES", target->name, target->uses);
1590 }
1591
1592 static MODCMD_FUNC(cmd_modcmd) {
1593 struct svccmd *svccmd;
1594 unsigned int arg, changed;
1595 char cmdname[MAXLEN];
1596
1597 assert(argc >= 2);
1598 arg = collapse_cmdname(argv+1, argc-1, cmdname) + 1;
1599 if (!arg) {
1600 reply("MSG_MISSING_PARAMS", cmd->name);
1601 return 0;
1602 }
1603 if (!(svccmd = svccmd_resolve_name(cmd, cmdname))) {
1604 reply("MCMSG_UNKNOWN_COMMAND_2", cmdname, cmd->parent->bot->nick);
1605 return 0;
1606 }
1607 for (changed = 0; arg+1 < argc; arg += 2) {
1608 if (svccmd_configure(svccmd, user, cmd->parent->bot, argv[arg], argv[arg+1])) {
1609 reply("MCMSG_COMMAND_MODIFIED", argv[arg], svccmd->name);
1610 changed = 1;
1611 }
1612 }
1613 if (changed)
1614 modcmd_set_effective_flags(svccmd);
1615 modcmd_describe_command(user, cmd, svccmd);
1616 return changed;
1617 }
1618
1619 static void
1620 timeout_god(void *data)
1621 {
1622 extern struct userNode *chanserv;
1623 struct userNode *user = data;
1624
1625 if(!user || !IsHelping(user)) return;
1626
1627 HANDLE_CLEAR_FLAG(user->handle_info, HELPING);
1628 send_message(user, chanserv, "MCMSG_GOD_EXPIRED");
1629 }
1630
1631 static MODCMD_FUNC(cmd_god) {
1632 int helping;
1633
1634 if (argc > 1) {
1635 if (enabled_string(argv[1])) {
1636 if (HANDLE_FLAGGED(user->handle_info, HELPING)) {
1637 reply("MCMSG_ALREADY_HELPING");
1638 return 0;
1639 }
1640 helping = 1;
1641 } else if (disabled_string(argv[1])) {
1642 if (!HANDLE_FLAGGED(user->handle_info, HELPING)) {
1643 reply("MCMSG_ALREADY_NOT_HELPING");
1644 return 0;
1645 }
1646 helping = 0;
1647 } else {
1648 reply("MSG_INVALID_BINARY", argv[1]);
1649 return 0;
1650 }
1651 } else {
1652 helping = !IsHelping(user);
1653 }
1654
1655 if (helping) {
1656 HANDLE_SET_FLAG(user->handle_info, HELPING);
1657 timeq_add(now + god_timeout, timeout_god, user);
1658 reply("MCMSG_NOW_HELPING");
1659 } else {
1660 HANDLE_CLEAR_FLAG(user->handle_info, HELPING);
1661 timeq_del(0, timeout_god, user, TIMEQ_IGNORE_WHEN);
1662 reply("MCMSG_NOW_NOT_HELPING");
1663 }
1664
1665 return 1;
1666 }
1667
1668 static MODCMD_FUNC(cmd_joiner) {
1669 char cmdname[MAXLEN];
1670
1671 if (argc < 2) {
1672 int len = sprintf(cmdname, "%s ", cmd->name);
1673 dict_iterator_t it;
1674 struct string_buffer sbuf;
1675
1676 string_buffer_init(&sbuf);
1677 for (it = dict_first(cmd->parent->commands); it; it = iter_next(it)) {
1678 if (!ircncasecmp(iter_key(it), cmdname, len)) {
1679 if (sbuf.used) string_buffer_append_string(&sbuf, ", ");
1680 string_buffer_append_string(&sbuf, iter_key(it));
1681 }
1682 }
1683 if (!sbuf.used) string_buffer_append(&sbuf, 0);
1684 reply("MCMSG_JOINER_CHOICES", cmd->name, sbuf.list);
1685 string_buffer_clean(&sbuf);
1686 return 1;
1687 }
1688 sprintf(cmdname, "%s %s", cmd->name, argv[1]);
1689 argv[1] = cmdname;
1690 svccmd_invoke_argv(user, cmd->parent, channel, argc-1, argv+1, 0);
1691 return 0; /* never try to log this; the recursive one logs it */
1692 }
1693
1694 static MODCMD_FUNC(cmd_stats_modules) {
1695 struct helpfile_table tbl;
1696 dict_iterator_t it;
1697 unsigned int ii;
1698 struct module *mod;
1699 struct modcmd *modcmd;
1700
1701 if (argc < 2) {
1702 tbl.length = dict_size(modules) + 1;
1703 tbl.width = 3;
1704 tbl.flags = TABLE_PAD_LEFT;
1705 tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1706 tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1707 tbl.contents[0][0] = "Module";
1708 tbl.contents[0][1] = "Commands";
1709 tbl.contents[0][2] = "Helpfile";
1710 for (ii=1, it=dict_first(modules); it; it=iter_next(it), ii++) {
1711 mod = iter_data(it);
1712 tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1713 tbl.contents[ii][0] = mod->name;
1714 tbl.contents[ii][1] = strtab(dict_size(mod->commands));
1715 tbl.contents[ii][2] = mod->helpfile_name ? mod->helpfile_name : "(none)";
1716 }
1717 } else if (!(mod = dict_find(modules, argv[1], NULL))) {
1718 reply("MCMSG_UNKNOWN_MODULE", argv[1]);
1719 return 0;
1720 } else {
1721 reply("MCMSG_MODULE_INFO", mod->name);
1722 tbl.length = dict_size(mod->commands) + 1;
1723 tbl.width = 3;
1724 tbl.flags = TABLE_PAD_LEFT;
1725 tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1726 tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1727 tbl.contents[0][0] = "Command";
1728 tbl.contents[0][1] = "Min. Args";
1729 tbl.contents[0][2] = "Bind Count";
1730 for (ii=1, it=dict_first(mod->commands); it; it=iter_next(it), ii++) {
1731 modcmd = iter_data(it);
1732 tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1733 tbl.contents[ii][0] = modcmd->name;
1734 tbl.contents[ii][1] = strtab(modcmd->min_argc);
1735 tbl.contents[ii][2] = strtab(modcmd->bind_count);
1736 }
1737 }
1738 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1739 return 0;
1740 }
1741
1742 static MODCMD_FUNC(cmd_stats_services) {
1743 struct helpfile_table tbl;
1744 dict_iterator_t it;
1745 unsigned int ii;
1746 struct service *service;
1747 struct svccmd *svccmd;
1748 char *extra;
1749
1750 if (argc < 2) {
1751 tbl.length = dict_size(services) + 1;
1752 tbl.width = 4;
1753 tbl.flags = TABLE_PAD_LEFT;
1754 tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1755 tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1756 tbl.contents[0][0] = "Service";
1757 tbl.contents[0][1] = "Commands";
1758 tbl.contents[0][2] = "Priv'd?";
1759 tbl.contents[0][3] = "Trigger";
1760 extra = calloc(2, tbl.length);
1761 for (ii=1, it=dict_first(services); it; it=iter_next(it), ii++) {
1762 service = iter_data(it);
1763 tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1764 tbl.contents[ii][0] = service->bot->nick;
1765 tbl.contents[ii][1] = strtab(dict_size(service->commands));
1766 tbl.contents[ii][2] = service->privileged ? "yes" : "no";
1767 extra[ii*2] = service->trigger;
1768 tbl.contents[ii][3] = extra+ii*2;
1769 }
1770 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1771 free(extra);
1772 return 0;
1773 } else if (!(service = dict_find(services, argv[1], NULL))) {
1774 reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1775 return 0;
1776 } else {
1777 tbl.length = dict_size(service->commands) + 1;
1778 tbl.width = 5;
1779 tbl.flags = TABLE_PAD_LEFT | TABLE_NO_FREE;
1780 tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1781 tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1782 tbl.contents[0][0] = "Command";
1783 tbl.contents[0][1] = "Module";
1784 tbl.contents[0][2] = "ModCmd";
1785 tbl.contents[0][3] = "Alias?";
1786 tbl.contents[0][4] = strdup("Uses");
1787 for (ii=1, it=dict_first(service->commands); it; it=iter_next(it), ii++) {
1788 svccmd = iter_data(it);
1789 tbl.contents[ii] = calloc(tbl.width, sizeof(tbl.contents[ii][0]));
1790 tbl.contents[ii][0] = svccmd->name;
1791 tbl.contents[ii][1] = svccmd->command->parent->name;
1792 tbl.contents[ii][2] = svccmd->command->name;
1793 tbl.contents[ii][3] = svccmd->alias.used ? "yes" : "no";
1794 tbl.contents[ii][4] = extra = malloc(12);
1795 sprintf(extra, "%u", svccmd->uses);
1796 }
1797 reply("MCMSG_SERVICE_INFO", service->bot->nick);
1798 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1799 for (ii=0; ii<tbl.length; ii++) {
1800 free((char*)tbl.contents[ii][4]);
1801 free(tbl.contents[ii]);
1802 }
1803 free(tbl.contents);
1804 return 0;
1805 }
1806 }
1807
1808 static MODCMD_FUNC(cmd_showcommands) {
1809 struct svccmd_list commands;
1810 struct helpfile_table tbl;
1811 struct svccmd *svccmd;
1812 dict_iterator_t it;
1813 unsigned int ii, ignore_flags = 0;
1814 unsigned int max_opserv_level = 1000;
1815 unsigned short max_chanserv_level = 500;
1816 char show_opserv_level = 0, show_channel_access = 0;
1817
1818 /* Check to see what the max access they want to see is. */
1819 for (ii=1; ii<argc; ++ii) {
1820 if (isdigit(argv[ii][0]))
1821 max_opserv_level = atoi(argv[ii]);
1822 else
1823 max_chanserv_level = user_level_from_name(argv[ii], UL_OWNER);
1824 }
1825
1826 /* Find the matching commands. */
1827 svccmd_list_init(&commands);
1828 if (cmd->parent->privileged)
1829 ignore_flags = MODCMD_REQUIRE_OPER;
1830 for (it = dict_first(cmd->parent->commands); it; it = iter_next(it)) {
1831 svccmd = iter_data(it);
1832 if (strchr(svccmd->name, ' '))
1833 continue;
1834 if (!svccmd_can_invoke(user, svccmd->parent->bot, svccmd, channel, SVCCMD_QUALIFIED))
1835 continue;
1836 if (svccmd->min_opserv_level > max_opserv_level)
1837 continue;
1838 if (svccmd->min_channel_access > max_chanserv_level)
1839 continue;
1840 if (svccmd->min_opserv_level > 0)
1841 show_opserv_level = 1;
1842 if (svccmd->min_channel_access > 0)
1843 show_channel_access = 1;
1844 if (svccmd->effective_flags
1845 & (MODCMD_REQUIRE_STAFF|MODCMD_REQUIRE_HELPING)
1846 & ~ignore_flags) {
1847 show_channel_access = 1;
1848 }
1849 svccmd_list_append(&commands, svccmd);
1850 }
1851
1852 /* Build the table. */
1853 tbl.length = commands.used + 1;
1854 tbl.width = 1 + show_opserv_level + show_channel_access;
1855 tbl.flags = TABLE_REPEAT_ROWS;
1856 tbl.contents = calloc(tbl.length, sizeof(tbl.contents[0]));
1857 tbl.contents[0] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1858 tbl.contents[0][ii = 0] = "Command";
1859 if (show_opserv_level)
1860 tbl.contents[0][++ii] = "OpServ Level";
1861 if (show_channel_access)
1862 tbl.contents[0][++ii] = "ChanServ Access";
1863 for (ii=0; ii<commands.used; ++ii) {
1864 svccmd = commands.list[ii];
1865 tbl.contents[ii+1] = calloc(tbl.width, sizeof(tbl.contents[0][0]));
1866 tbl.contents[ii+1][0] = svccmd->name;
1867 if (show_opserv_level)
1868 tbl.contents[ii+1][1] = strtab(svccmd->min_opserv_level);
1869 if (show_channel_access) {
1870 const char *access_name;
1871 int flags = svccmd->effective_flags;
1872 if (flags & MODCMD_REQUIRE_HELPING)
1873 access_name = "helping";
1874 else if (flags & MODCMD_REQUIRE_STAFF) {
1875 if (flags & MODCMD_REQUIRE_OPER)
1876 access_name = "oper";
1877 else if (flags & MODCMD_REQUIRE_NETWORK_HELPER)
1878 access_name = "net.helper";
1879 else
1880 access_name = "staff";
1881 } else
1882 access_name = strtab(svccmd->min_channel_access);
1883 tbl.contents[ii+1][1+show_opserv_level] = access_name;
1884 }
1885 }
1886 svccmd_list_clean(&commands);
1887 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1888 return 0;
1889 }
1890
1891 static MODCMD_FUNC(cmd_helpfiles) {
1892 struct service *service;
1893 unsigned int ii;
1894
1895 if (!(service = dict_find(services, argv[1], NULL))) {
1896 reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1897 return 0;
1898 }
1899
1900 if (argc < 3) {
1901 for (ii=0; ii<service->modules.used; ++ii)
1902 reply("MCMSG_HELPFILE_SEQUENCE", ii+1, service->modules.list[ii]->name);
1903 return 0;
1904 }
1905
1906 service->modules.used = 0;
1907 for (ii=0; ii<argc-2; ii++) {
1908 struct module *module = dict_find(modules, argv[ii+2], NULL);
1909 if (!module) {
1910 reply("MCMSG_UNKNOWN_MODULE", argv[ii+2]);
1911 continue;
1912 }
1913 module_list_append(&service->modules, module);
1914 }
1915 reply("MCMSG_HELPFILE_SEQUENCE_SET", service->bot->nick);
1916 return 1;
1917 }
1918
1919 static MODCMD_FUNC(cmd_service_add) {
1920 const char *nick, *hostname, *desc;
1921 struct userNode *bot;
1922
1923 nick = argv[1];
1924 if (!is_valid_nick(nick)) {
1925 reply("MCMSG_BAD_SERVICE_NICK", nick);
1926 return 0;
1927 }
1928 hostname = argv[2];
1929 desc = unsplit_string(argv+3, argc-3, NULL);
1930 bot = GetUserH(nick);
1931 if (bot && IsService(bot)) {
1932 reply("MCMSG_ALREADY_SERVICE", bot->nick);
1933 return 0;
1934 }
1935 bot = AddLocalUser(nick, nick, hostname, desc, NULL);
1936 service_register(bot);
1937 reply("MCMSG_NEW_SERVICE", bot->nick);
1938 return 1;
1939 }
1940
1941 static MODCMD_FUNC(cmd_service_rename) {
1942 struct service *service;
1943
1944 if (!(service = service_find(argv[1]))) {
1945 reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1946 return 0;
1947 }
1948 NickChange(service->bot, argv[2], 0);
1949 reply("MCMSG_SERVICE_RENAMED", service->bot->nick);
1950 return 1;
1951 }
1952
1953 static MODCMD_FUNC(cmd_service_trigger) {
1954 struct userNode *bogon;
1955 struct service *service;
1956
1957 if (!(service = service_find(argv[1]))) {
1958 reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1959 return 0;
1960 }
1961 if (argc < 3) {
1962 if (service->trigger)
1963 reply("MCMSG_CURRENT_TRIGGER", service->bot->nick, service->trigger);
1964 else
1965 reply("MCMSG_NO_TRIGGER", service->bot->nick);
1966 return 1;
1967 }
1968 if (service->trigger)
1969 reg_chanmsg_func(service->trigger, NULL, NULL, NULL);
1970 if (!irccasecmp(argv[2], "none") || !irccasecmp(argv[2], "remove")) {
1971 service->trigger = 0;
1972 reply("MCMSG_REMOVED_TRIGGER", service->bot->nick);
1973 } else if ((bogon = get_chanmsg_bot(argv[2][0]))) {
1974 reply("MCMSG_DUPLICATE_TRIGGER", bogon->nick, argv[2][0]);
1975 return 1;
1976 } else {
1977 service->trigger = argv[2][0];
1978 reg_chanmsg_func(service->trigger, service->bot, modcmd_chanmsg, NULL);
1979 reply("MCMSG_NEW_TRIGGER", service->bot->nick, service->trigger);
1980 }
1981 return 1;
1982 }
1983
1984 static MODCMD_FUNC(cmd_service_privileged) {
1985 struct service *service;
1986 const char *newval;
1987
1988 if (!(service = service_find(argv[1]))) {
1989 reply("MCMSG_UNKNOWN_SERVICE", argv[1]);
1990 return 0;
1991 }
1992 if (argc >= 3)
1993 service->privileged = true_string(argv[2]) || enabled_string(argv[2]);
1994 newval = user_find_message(user, service->privileged ? "MSG_ON" : "MSG_OFF");
1995 reply("MCMSG_SERVICE_PRIVILEGED", service->bot->nick, newval);
1996 return 1;
1997 }
1998
1999 static MODCMD_FUNC(cmd_service_remove) {
2000 char *name, *reason;
2001 struct service *service;
2002
2003 name = argv[1];
2004 if (argc > 2)
2005 reason = unsplit_string(argv+2, argc-2, NULL);
2006 else
2007 reason = "Removing bot";
2008 if (!(service = service_find(name))) {
2009 reply("MCMSG_UNKNOWN_SERVICE", name);
2010 return 0;
2011 }
2012 DelUser(service->bot, NULL, 1, reason);
2013 reply("MCMSG_SERVICE_REMOVED", name);
2014 dict_remove(services, name);
2015 return 1;
2016 }
2017
2018 static MODCMD_FUNC(cmd_dump_messages) {
2019 const char *fname = "strings.db";
2020 struct saxdb_context *ctx;
2021 dict_iterator_t it;
2022 FILE *pf;
2023 int res;
2024
2025 if (!(pf = fopen(fname, "w"))) {
2026 reply("MCMSG_FILE_NOT_OPENED", fname);
2027 return 0;
2028 }
2029 if (!(ctx = saxdb_open_context(pf))) {
2030 reply("MSG_INTERNAL_FAILURE");
2031 return 0;
2032 }
2033
2034 if ((res = setjmp(*saxdb_jmp_buf(ctx))) != 0) {
2035 saxdb_close_context(ctx, 1);
2036 reply("MCMSG_MESSAGE_DUMP_FAILED", strerror(res));
2037 return 0;
2038 } else {
2039 for (it = dict_first(lang_C->messages); it; it = iter_next(it))
2040 saxdb_write_string(ctx, iter_key(it), iter_data(it));
2041 saxdb_close_context(ctx, 1);
2042 reply("MCMSG_MESSAGES_DUMPED", fname);
2043 return 1;
2044 }
2045 }
2046
2047 static MODCMD_FUNC(cmd_version) {
2048 send_message_type(4, user, cmd->parent->bot, "$b"PACKAGE_STRING"+[%s]$b (Based on srvx 1.3.x), Built: "__DATE__", "__TIME__".", cvs_version);
2049 send_message_type(4, user, cmd->parent->bot, "See $bCREDITS$b for more information.");
2050 return 1;
2051 }
2052
2053 /* This function provides copyright management information to end
2054 * users of X3. You should not alter, disable or remove this
2055 * command or its accessibility to normal IRC users, except to add
2056 * copyright information pertaining to changes you make to X3.
2057 */
2058 static MODCMD_FUNC(cmd_credits) {
2059 send_message_type(4, user, cmd->parent->bot, "$b"PACKAGE"$b is based on srvx");
2060 send_message_type(4, user, cmd->parent->bot, "Copyright 2000-2007 srvx Development Team.");
2061 send_message_type(4, user, cmd->parent->bot, "Copyright 2004-2007 X3 Development Team.");
2062 send_message_type(4, user, cmd->parent->bot, "This software is OSI Certified Open Source Software.");
2063 send_message_type(4, user, cmd->parent->bot, "OSI Certified is a certification mark of the Open Source Initiative.");
2064 send_message_type(4, user, cmd->parent->bot, "$b$b");
2065 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.");
2066 send_message_type(4, user, cmd->parent->bot, "The X3 Development Team includes Alex Schumann, Reed Loden, Neil Spierling, Matthew Beeching.");
2067 send_message_type(4, user, cmd->parent->bot, "The X3 Development Team can be reached at https://github.com/evilnet/x3/ or in #evilnet on irc.afternet.org.");
2068 send_message_type(4, user, cmd->parent->bot, "$b$b");
2069 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.");
2070 send_message_type(4, user, cmd->parent->bot, "This program is free software; see COPYING in the distribution files.");
2071
2072 return 1;
2073 }
2074
2075 static void create_default_binds(int rebind);
2076
2077 static MODCMD_FUNC(cmd_rebindall) {
2078 send_message_type(4, user, cmd->parent->bot, "$bRe-binding all default commands to respective services..$b");
2079 create_default_binds(1);
2080 return 1;
2081 }
2082
2083 static MODCMD_FUNC(cmd_tell) {
2084 struct userNode *target;
2085 char *msg;
2086
2087 target = GetUserH(argv[1]);
2088 msg = unsplit_string(argv + 2, argc - 2, NULL);
2089 if (!target) {
2090 reply("MSG_NOT_TARGET_NAME");
2091 return 0;
2092 }
2093 send_message_type(MSG_TYPE_NOXLATE, target, cmd->parent->bot, "%s", msg);
2094 return 1;
2095 }
2096
2097 void
2098 modcmd_nick_change(struct userNode *user, const char *old_nick, UNUSED_ARG(void *extra)) {
2099 struct service *svc;
2100 if (!(svc = dict_find(services, old_nick, NULL)))
2101 return;
2102 dict_remove2(services, old_nick, 1);
2103 dict_insert(services, user->nick, svc);
2104 }
2105
2106 void
2107 modcmd_cleanup(UNUSED_ARG(void* extra)) {
2108 dict_delete(services);
2109 dict_delete(modules);
2110 if (suf_list)
2111 free(suf_list);
2112 if (suf_list_extra)
2113 free(suf_list_extra);
2114 }
2115
2116 static void
2117 modcmd_saxdb_write_command(struct saxdb_context *ctx, struct svccmd *cmd) {
2118 char buf[MAXLEN];
2119 unsigned int nn, len, pos;
2120 struct svccmd *template = cmd->command->defaults;
2121
2122 saxdb_start_record(ctx, cmd->name, 0);
2123 sprintf(buf, "%s.%s", cmd->command->parent->name, cmd->command->name);
2124 saxdb_write_string(ctx, "command", buf);
2125 if (cmd->alias.used)
2126 saxdb_write_string_list(ctx, "aliased", &cmd->alias);
2127 if (cmd->min_opserv_level != template->min_opserv_level)
2128 saxdb_write_int(ctx, "oper_access", cmd->min_opserv_level);
2129 if (cmd->min_channel_access != template->min_channel_access)
2130 saxdb_write_int(ctx, "channel_access", cmd->min_channel_access);
2131 if (cmd->flags != template->flags) {
2132 if (cmd->flags) {
2133 for (nn=pos=0; modcmd_flags[nn].name; ++nn) {
2134 const struct modcmd_flag *flag = &modcmd_flags[nn];
2135 if (cmd->flags & flag->flag) {
2136 buf[pos++] = '+';
2137 len = strlen(flag->name);
2138 memcpy(buf+pos, flag->name, len);
2139 pos += len;
2140 buf[pos++] = ',';
2141 }
2142 }
2143 } else {
2144 pos = 1;
2145 }
2146 buf[--pos] = 0;
2147 saxdb_write_string(ctx, "flags", buf);
2148 }
2149 if ((cmd->req_account_flags != template->req_account_flags)
2150 || (cmd->deny_account_flags != template->req_account_flags)) {
2151 pos = 0;
2152 if (cmd->req_account_flags) {
2153 buf[pos++] = '+';
2154 for (nn=0; nn<32; nn++)
2155 if (cmd->req_account_flags & (1 << nn))
2156 buf[pos++] = handle_flags[nn];
2157 }
2158 if (cmd->deny_account_flags) {
2159 buf[pos++] = '-';
2160 for (nn=0; nn<32; nn++)
2161 if (cmd->deny_account_flags & (1 << nn))
2162 buf[pos++] = handle_flags[nn];
2163 }
2164 buf[pos] = 0;
2165 saxdb_write_string(ctx, "account_flags", buf);
2166 }
2167 saxdb_end_record(ctx);
2168 }
2169
2170 static int
2171 modcmd_saxdb_write(struct saxdb_context *ctx) {
2172 struct string_list slist;
2173 dict_iterator_t it, it2;
2174 struct service *service;
2175 unsigned int ii;
2176
2177 saxdb_start_record(ctx, "bots", 1);
2178 for (it = dict_first(services); it; it = iter_next(it)) {
2179 char buff[16];
2180 char modes[32];
2181
2182 service = iter_data(it);
2183 saxdb_start_record(ctx, service->bot->nick, 1);
2184 if (service->trigger) {
2185 buff[0] = service->trigger;
2186 buff[1] = '\0';
2187 saxdb_write_string(ctx, "trigger", buff);
2188 }
2189 saxdb_write_string(ctx, "description", service->bot->info);
2190 saxdb_write_string(ctx, "hostname", service->bot->hostname);
2191 if (service->bot->modes) {
2192 irc_user_modes(service->bot, modes, sizeof(modes));
2193 saxdb_write_string(ctx, "modes", modes);
2194 }
2195 if (service->privileged)
2196 saxdb_write_string(ctx, "privileged", "1");
2197 saxdb_end_record(ctx);
2198 }
2199 saxdb_end_record(ctx);
2200
2201 saxdb_start_record(ctx, "services", 1);
2202 for (it = dict_first(services); it; it = iter_next(it)) {
2203 service = iter_data(it);
2204 saxdb_start_record(ctx, service->bot->nick, 1);
2205 for (it2 = dict_first(service->commands); it2; it2 = iter_next(it2))
2206 modcmd_saxdb_write_command(ctx, iter_data(it2));
2207 saxdb_end_record(ctx);
2208 }
2209 saxdb_end_record(ctx);
2210
2211 saxdb_start_record(ctx, "helpfiles", 1);
2212 slist.size = 0;
2213 for (it = dict_first(services); it; it = iter_next(it)) {
2214 service = iter_data(it);
2215 slist.used = 0;
2216 for (ii = 0; ii < service->modules.used; ++ii)
2217 string_list_append(&slist, service->modules.list[ii]->name);
2218 saxdb_write_string_list(ctx, iter_key(it), &slist);
2219 }
2220 if (slist.list)
2221 free(slist.list);
2222 saxdb_end_record(ctx);
2223
2224 return 0;
2225 }
2226
2227 static int
2228 append_entry(const char *key, UNUSED_ARG(void *data), void *extra) {
2229 struct helpfile_expansion *exp = extra;
2230 int row = exp->value.table.length++;
2231 exp->value.table.contents[row] = calloc(1, sizeof(char*));
2232 exp->value.table.contents[row][0] = key;
2233 return 0;
2234 }
2235
2236 static struct helpfile_expansion
2237 modcmd_expand(const char *variable) {
2238 struct helpfile_expansion exp;
2239 extern struct userNode *message_source;
2240 struct service *service;
2241
2242 service = dict_find(services, message_source->nick, NULL);
2243 if (!irccasecmp(variable, "index")) {
2244 exp.type = HF_TABLE;
2245 exp.value.table.length = 1;
2246 exp.value.table.width = 1;
2247 exp.value.table.flags = TABLE_REPEAT_ROWS | TABLE_NO_HEADERS;
2248 exp.value.table.contents = calloc(dict_size(service->commands)+1, sizeof(char**));
2249 exp.value.table.contents[0] = calloc(1, sizeof(char*));
2250 exp.value.table.contents[0][0] = "Commands";
2251 dict_foreach(service->commands, append_entry, &exp);
2252 return exp;
2253 } else if (!irccasecmp(variable, "languages")) {
2254 struct string_buffer sbuf;
2255 dict_iterator_t it;
2256 sbuf.used = sbuf.size = 0;
2257 sbuf.list = NULL;
2258 for (it = dict_first(languages); it; it = iter_next(it)) {
2259 string_buffer_append_string(&sbuf, iter_key(it));
2260 string_buffer_append(&sbuf, ' ');
2261 }
2262 sbuf.list[--sbuf.used] = 0;
2263 exp.type = HF_STRING;
2264 exp.value.str = sbuf.list;
2265 return exp;
2266 }
2267 exp.type = HF_STRING;
2268 exp.value.str = NULL;
2269 return exp;
2270 }
2271
2272 static void
2273 modcmd_load_bots(struct dict *db, int default_nick) {
2274 dict_iterator_t it;
2275
2276 for (it = dict_first(db); it; it = iter_next(it)) {
2277 struct record_data *rd;
2278 struct service *svc;
2279 const char *nick, *desc, *hostname, *modes;
2280
2281 rd = iter_data(it);
2282 if (rd->type != RECDB_OBJECT) {
2283 log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'bots/%s' in modcmd db (expected object).", iter_key(it));
2284 continue;
2285 }
2286 nick = database_get_data(rd->d.object, "nick", RECDB_QSTRING);
2287 if (!nick) {
2288 if (default_nick)
2289 nick = iter_key(it);
2290 else
2291 continue;
2292 }
2293 svc = service_find(nick);
2294 desc = database_get_data(rd->d.object, "description", RECDB_QSTRING);
2295 hostname = database_get_data(rd->d.object, "hostname", RECDB_QSTRING);
2296 modes = database_get_data(rd->d.object, "modes", RECDB_QSTRING);
2297 if (desc) {
2298 if (!svc)
2299 svc = service_register(AddLocalUser(nick, nick, hostname, desc, modes));
2300 else if (hostname)
2301 strcpy(svc->bot->hostname, hostname);
2302 desc = database_get_data(rd->d.object, "trigger", RECDB_QSTRING);
2303 if (desc)
2304 svc->trigger = desc[0];
2305 desc = database_get_data(rd->d.object, "privileged", RECDB_QSTRING);
2306 if (desc && (true_string(desc) || enabled_string(desc)))
2307 svc->privileged = 1;
2308 }
2309 }
2310 }
2311
2312 static void
2313 modcmd_conf_read(void) {
2314 modcmd_load_bots(conf_get_data("services", RECDB_OBJECT), 0);
2315 }
2316
2317 void
2318 modcmd_init(void) {
2319 qsort(modcmd_flags, ArrayLength(modcmd_flags)-1, sizeof(modcmd_flags[0]), flags_qsort);
2320 modules = dict_new();
2321 dict_set_free_data(modules, free_module);
2322 services = dict_new();
2323 dict_set_free_data(services, free_service);
2324 reg_nick_change_func(modcmd_nick_change, NULL);
2325 reg_exit_func(modcmd_cleanup, NULL);
2326 conf_register_reload(modcmd_conf_read);
2327
2328 modcmd_module = module_register("modcmd", MAIN_LOG, "modcmd.help", modcmd_expand);
2329 bind_command = modcmd_register(modcmd_module, "bind", cmd_bind, 4, MODCMD_KEEP_BOUND, "oper_level", "800", NULL);
2330 help_command = modcmd_register(modcmd_module, "help", cmd_help, 1, 0, "flags", "+nolog", NULL);
2331 modcmd_register(modcmd_module, "command", cmd_command, 2, 0, "flags", "+nolog", NULL);
2332 modcmd_register(modcmd_module, "modcmd", cmd_modcmd, 2, MODCMD_KEEP_BOUND, "template", "bind", NULL);
2333 modcmd_register(modcmd_module, "god", cmd_god, 0, MODCMD_REQUIRE_AUTHED, "flags", "+oper,+networkhelper", NULL);
2334 modcmd_register(modcmd_module, "readhelp", cmd_readhelp, 2, 0, "oper_level", "650", NULL);
2335 modcmd_register(modcmd_module, "timecmd", cmd_timecmd, 2, 0, "oper_level", "1", NULL);
2336 modcmd_register(modcmd_module, "unbind", cmd_unbind, 3, 0, "template", "bind", NULL);
2337 modcmd_register(modcmd_module, "joiner", cmd_joiner, 1, 0, NULL);
2338 modcmd_register(modcmd_module, "stats modules", cmd_stats_modules, 1, 0, "flags", "+oper", NULL);
2339 modcmd_register(modcmd_module, "stats services", cmd_stats_services, 1, 0, "flags", "+oper", NULL);
2340 modcmd_register(modcmd_module, "showcommands", cmd_showcommands, 1, 0, "flags", "+acceptchan", NULL);
2341 modcmd_register(modcmd_module, "helpfiles", cmd_helpfiles, 2, 0, "template", "bind", NULL);
2342 modcmd_register(modcmd_module, "service add", cmd_service_add, 4, 0, "flags", "+oper", NULL);
2343 modcmd_register(modcmd_module, "service rename", cmd_service_rename, 3, 0, "flags", "+oper", NULL);
2344 modcmd_register(modcmd_module, "service trigger", cmd_service_trigger, 2, 0, "flags", "+oper", NULL);
2345 modcmd_register(modcmd_module, "service privileged", cmd_service_privileged, 2, 0, "flags", "+oper", NULL);
2346 modcmd_register(modcmd_module, "service remove", cmd_service_remove, 2, 0, "flags", "+oper", NULL);
2347 modcmd_register(modcmd_module, "dumpmessages", cmd_dump_messages, 1, 0, "oper_level", "1000", NULL);
2348 modcmd_register(modcmd_module, "tell", cmd_tell, 3, 0, "flags", "+oper", NULL);
2349 modcmd_register(modcmd_module, "rebindall", cmd_rebindall, 0, MODCMD_KEEP_BOUND, "oper_level", "800", NULL);
2350 version_command = modcmd_register(modcmd_module, "version", cmd_version, 1, 0, NULL);
2351 credits_command = modcmd_register(modcmd_module, "credits", cmd_credits, 1, 0, NULL);
2352 message_register_table(msgtab);
2353
2354 }
2355
2356 static void
2357 modcmd_db_load_command(struct service *service, const char *cmdname, struct dict *obj) {
2358 struct svccmd *svccmd;
2359 struct module *module;
2360 struct modcmd *modcmd;
2361 struct string_list *slist;
2362 const char *str, *sep;
2363 char buf[MAXLEN];
2364
2365 str = database_get_data(obj, "command", RECDB_QSTRING);
2366 if (!str) {
2367 log_module(MAIN_LOG, LOG_ERROR, "Missing command for service %s command %s in modcmd.db", service->bot->nick, cmdname);
2368 return;
2369 }
2370 sep = strchr(str, '.');
2371 if (!sep) {
2372 log_module(MAIN_LOG, LOG_ERROR, "Invalid command %s for service %s command %s in modcmd.db", str, service->bot->nick, cmdname);
2373 return;
2374 }
2375 memcpy(buf, str, sep-str);
2376 buf[sep-str] = 0;
2377 if (!(module = module_find(buf))) {
2378 log_module(MAIN_LOG, LOG_ERROR, "Unknown module %s for service %s command %s in modcmd.db", buf, service->bot->nick, cmdname);
2379 return;
2380 }
2381 if (!(modcmd = dict_find(module->commands, sep+1, NULL))) {
2382 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);
2383 return;
2384 }
2385 /* Now that we know we have a command to use, fill in the basics. */
2386 svccmd = calloc(1, sizeof(*svccmd));
2387 svccmd_insert(service, strdup(cmdname), svccmd, modcmd);
2388 if ((str = database_get_data(obj, "template", RECDB_QSTRING))) {
2389 add_pending_template(svccmd, str);
2390 } else {
2391 svccmd_copy_rules(svccmd, modcmd->defaults);
2392 }
2393 if ((str = database_get_data(obj, "account_flags", RECDB_QSTRING))) {
2394 svccmd->req_account_flags = svccmd->deny_account_flags = 0;
2395 svccmd_configure(svccmd, NULL, service->bot, "account_flags", str);
2396 }
2397 if ((str = database_get_data(obj, "flags", RECDB_QSTRING))) {
2398 svccmd->flags = 0;
2399 svccmd_configure(svccmd, NULL, service->bot, "flags", str);
2400 }
2401 if ((str = database_get_data(obj, "oper_access", RECDB_QSTRING))
2402 || (str = database_get_data(obj, "opserv_level", RECDB_QSTRING))) {
2403 svccmd_configure(svccmd, NULL, service->bot, "oper_access", str);
2404 }
2405 if ((str = database_get_data(obj, "channel_access", RECDB_QSTRING))
2406 || (str = database_get_data(obj, "chanserv_level", RECDB_QSTRING))) {
2407 svccmd_configure(svccmd, NULL, service->bot, "channel_access", str);
2408 }
2409 if ((slist = database_get_data(obj, "aliased", RECDB_STRING_LIST))) {
2410 unsigned int nn;
2411 svccmd->alias.used = svccmd->alias.size = slist->used;
2412 svccmd->alias.list = calloc(svccmd->alias.size, sizeof(svccmd->alias.list[0]));
2413 for (nn=0; nn<slist->used; ++nn)
2414 svccmd->alias.list[nn] = strdup(slist->list[nn]);
2415 }
2416 modcmd_set_effective_flags(svccmd);
2417 }
2418
2419 static struct svccmd *
2420 service_make_alias(struct service *service, const char *alias, ...) {
2421 char *arg, *argv[MAXNUMPARAMS];
2422 unsigned int nn, argc;
2423 struct svccmd *svccmd, *template;
2424 va_list args;
2425
2426 va_start(args, alias);
2427 argc = 0;
2428 while (1) {
2429 arg = va_arg(args, char*);
2430 if (!arg)
2431 break;
2432 argv[argc++] = arg;
2433 }
2434 va_end(args);
2435 svccmd = calloc(1, sizeof(*svccmd));
2436 if (!(template = svccmd_resolve_name(svccmd, argv[0]))) {
2437 log_module(MAIN_LOG, LOG_ERROR, "Invalid base command %s for alias %s in service %s", argv[0], alias, service->bot->nick);
2438 free(svccmd->name);
2439 free(svccmd);
2440 return NULL;
2441 }
2442 if (argc > 1) {
2443 svccmd->alias.used = svccmd->alias.size = argc;
2444 svccmd->alias.list = calloc(svccmd->alias.size, sizeof(svccmd->alias.list[0]));
2445 for (nn=0; nn<argc; nn++)
2446 svccmd->alias.list[nn] = strdup(argv[nn]);
2447 }
2448 svccmd_insert(service, strdup(alias), svccmd, template->command);
2449 svccmd_copy_rules(svccmd, template);
2450 return svccmd;
2451 }
2452
2453 static int saxdb_present;
2454
2455 static int
2456 modcmd_saxdb_read(struct dict *db) {
2457 struct dict *db2;
2458 dict_iterator_t it, it2;
2459 struct record_data *rd, *rd2;
2460 struct service *service;
2461
2462 modcmd_load_bots(database_get_data(db, "bots", RECDB_OBJECT), 1);
2463 db2 = database_get_data(db, "services", RECDB_OBJECT);
2464 if (!db2) {
2465 log_module(MAIN_LOG, LOG_ERROR, "Missing section 'services' in modcmd db.");
2466 return 1;
2467 }
2468 for (it = dict_first(db2); it; it = iter_next(it)) {
2469 rd = iter_data(it);
2470 if (rd->type != RECDB_OBJECT) {
2471 log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'services/%s' in modcmd db (expected object).", iter_key(it));
2472 continue;
2473 }
2474 if (!(service = service_find(iter_key(it)))) {
2475 log_module(MAIN_LOG, LOG_ERROR, "Unknown service '%s' listed in modcmd db.", iter_key(it));
2476 continue;
2477 }
2478 for (it2 = dict_first(rd->d.object); it2; it2 = iter_next(it2)) {
2479 rd2 = iter_data(it2);
2480 if (rd2->type != RECDB_OBJECT) {
2481 log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'services/%s/%s' in modcmd db (expected object).", iter_key(it), iter_key(it2));
2482 continue;
2483 }
2484 modcmd_db_load_command(service, iter_key(it2), rd2->d.object);
2485 }
2486 }
2487 db2 = database_get_data(db, "helpfiles", RECDB_OBJECT);
2488 for (it = dict_first(db2); it; it = iter_next(it)) {
2489 struct module *module;
2490 struct string_list *slist;
2491 unsigned int ii;
2492
2493 rd = iter_data(it);
2494 if (rd->type != RECDB_STRING_LIST) {
2495 log_module(MAIN_LOG, LOG_ERROR, "Bad type for 'helpfiles/%s' in modcmd db (expected string list).", iter_key(it));
2496 continue;
2497 }
2498 slist = rd->d.slist;
2499 if (!(service = service_find(iter_key(it)))) {
2500 /* We probably whined about the service being missing above. */
2501 continue;
2502 }
2503 service->modules.used = 0;
2504 for (ii=0; ii<slist->used; ++ii) {
2505 if (!(module = dict_find(modules, slist->list[ii], NULL))) {
2506 log_module(MAIN_LOG, LOG_ERROR, "Unknown module '%s' listed in modcmd 'helpfiles/%s'.", slist->list[ii], iter_key(it));
2507 continue;
2508 }
2509 module_list_append(&service->modules, module);
2510 }
2511 }
2512 saxdb_present = 1;
2513 return 0;
2514 }
2515
2516 static void
2517 create_default_binds(int rebind) {
2518 /* Which services should import which modules by default? */
2519 struct {
2520 const char *svcname;
2521 /* C is lame and requires a fixed size for this array.
2522 * Be sure you NULL-terminate each array and increment the
2523 * size here if you add more default modules to any
2524 * service. */
2525 const char *modnames[8];
2526 } def_binds[] = {
2527 { "ChanServ", { "ChanServ", NULL } },
2528 { "Global", { "Global", NULL } },
2529 { "NickServ", { "NickServ", NULL } },
2530 { "OpServ", { "OpServ", "modcmd", "sendmail", "saxdb", "proxycheck", NULL } },
2531 { "SpamServ", { "SpamServ", NULL } },
2532 { NULL, { NULL } }
2533 };
2534 unsigned int ii, jj;
2535 char buf[128], *nick;
2536 struct service *service;
2537 struct module *module;
2538
2539 for (ii = 0; def_binds[ii].svcname; ++ii) {
2540 sprintf(buf, "services/%s/nick", def_binds[ii].svcname);
2541 if (!(nick = conf_get_data(buf, RECDB_QSTRING)))
2542 continue;
2543 if (!(service = service_find(nick)))
2544 continue;
2545 if (dict_size(service->commands) > 0 && !rebind)
2546 continue;
2547
2548 /* Bind the default modules for this service to it */
2549 for (jj = 0; def_binds[ii].modnames[jj]; ++jj) {
2550 if (!(module = module_find(def_binds[ii].modnames[jj])))
2551 continue;
2552 service_bind_module(service, module);
2553 }
2554
2555 /* Bind the help and version commands to this service */
2556 service_bind_modcmd(service, help_command, help_command->name);
2557 service_bind_modcmd(service, version_command, version_command->name);
2558 service_bind_modcmd(service, credits_command, credits_command->name);
2559
2560 /* Now some silly hax.. (aliases that most people want) */
2561 if (!irccasecmp(def_binds[ii].svcname, "ChanServ")) {
2562 service_make_alias(service, "addowner", "*chanserv.adduser", "$1", "owner", "$2", NULL);
2563 service_make_alias(service, "addcoowner", "*chanserv.adduser", "$1", "coowner", "$2", NULL);
2564 service_make_alias(service, "addco", "*chanserv.adduser", "$1", "coowner", "$2", NULL);
2565 service_make_alias(service, "addmanager", "*chanserv.adduser", "$1", "manager", "$2", NULL);
2566 service_make_alias(service, "addop", "*chanserv.adduser", "$1", "op", "$2", NULL);
2567 service_make_alias(service, "addhop", "*chanserv.adduser", "$1", "halfop", "$2", NULL);
2568 service_make_alias(service, "addpeon", "*chanserv.adduser", "$1", "peon", "$2", NULL);
2569 service_make_alias(service, "addpal", "*chanserv.adduser", "$1", "pal", "$2", NULL);
2570 service_make_alias(service, "delowner", "*chanserv.deluser", "owner", "$1", NULL);
2571 service_make_alias(service, "delcoowner", "*chanserv.deluser", "coowner", "$1", NULL);
2572 service_make_alias(service, "delmanager", "*chanserv.deluser", "manager", "$1", NULL);
2573 service_make_alias(service, "delop", "*chanserv.deluser", "op", "$1", NULL);
2574 service_make_alias(service, "delpeon", "*chanserv.deluser", "peon", "$1", NULL);
2575 service_make_alias(service, "delpal", "*chanserv.deluser", "pal", "$1", NULL);
2576 service_make_alias(service, "llist", "*chanserv.lamers", "$1", NULL);
2577 service_make_alias(service, "command", "*modcmd.command", NULL);
2578 service_make_alias(service, "god", "*modcmd.god", NULL);
2579 } else if (!irccasecmp(def_binds[ii].svcname, "OpServ")) {
2580 struct svccmd *svccmd;
2581 svccmd = service_make_alias(service, "stats", "*modcmd.joiner", NULL);
2582 svccmd->min_opserv_level = 101;
2583 svccmd = service_make_alias(service, "service", "*modcmd.joiner", NULL);
2584 svccmd->min_opserv_level = 900;
2585 svccmd = service_make_alias(service, "routing", "*modcmd.joiner", NULL);
2586 svccmd->min_opserv_level = 100;
2587 }
2588 }
2589 }
2590
2591 static void
2592 import_aliases_db() {
2593 struct dict *db;
2594 dict_iterator_t it, it2;
2595 struct record_data *rd, *rd2;
2596 struct service *service;
2597 struct module *module;
2598
2599 if (!(db = parse_database("aliases.db")))
2600 return;
2601 for (it = dict_first(db); it; it = iter_next(it)) {
2602 service = service_find(iter_key(it));
2603 if (!service)
2604 continue;
2605 module = module_find(service->bot->nick);
2606 rd = iter_data(it);
2607 if (rd->type != RECDB_OBJECT)
2608 continue;
2609 for (it2 = dict_first(rd->d.object); it2; it2 = iter_next(it2)) {
2610 struct modcmd *command;
2611 rd2 = iter_data(it2);
2612 if (rd2->type != RECDB_QSTRING)
2613 continue;
2614 command = dict_find(module->commands, rd2->d.qstring, NULL);
2615 if (!command)
2616 continue;
2617 service_bind_modcmd(service, command, iter_key(it2));
2618 }
2619 }
2620 }
2621
2622 void
2623 modcmd_finalize(void) {
2624 dict_iterator_t it;
2625
2626 /* Check databases. */
2627 saxdb_register("modcmd", modcmd_saxdb_read, modcmd_saxdb_write);
2628 create_default_binds(0);
2629 if (!saxdb_present)
2630 import_aliases_db();
2631
2632 /* Register services for their triggers. */
2633 for (it = dict_first(services); it; it = iter_next(it)) {
2634 struct service *svc = iter_data(it);
2635 if (svc->trigger)
2636 reg_chanmsg_func(svc->trigger, svc->bot, modcmd_chanmsg, NULL);
2637 }
2638
2639 /* Resolve command rule-templates. */
2640 while (pending_templates) {
2641 struct pending_template *ptempl = pending_templates;
2642 struct svccmd *svccmd;
2643
2644 pending_templates = ptempl->next;
2645 /* Only overwrite the current template if we have a valid template. */
2646 if (!strcmp(ptempl->base, "*")) {
2647 /* Do nothing. */
2648 } else if ((svccmd = svccmd_resolve_name(ptempl->cmd, ptempl->base))) {
2649 svccmd_copy_rules(ptempl->cmd, svccmd);
2650 } else {
2651 assert(ptempl->cmd->parent);
2652 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);
2653 }
2654 free(ptempl->base);
2655 free(ptempl);
2656 }
2657 }
Unnamed repository; edit this file 'description' to name the repository.