/[cvs]/eggdrop1.9/src/cmds.c
ViewVC logotype

Annotation of /eggdrop1.9/src/cmds.c

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.116 - (hide annotations) (download) (as text)
Sat Feb 15 09:07:15 2003 UTC (16 years, 9 months ago) by wcc
Branch: MAIN
Changes since 1.115: +3 -3 lines
File MIME type: text/x-chdr
* Synch 1.6: off-by-one, delignore-bounds.

1 guppy 1.49 /*
2 tothwolf 1.102 * cmds.c --
3 guppy 1.49 *
4 tothwolf 1.102 * commands from a user via dcc
5     * (split in 2, this portion contains no-irc commands)
6 segfault 1.1 */
7 guppy 1.49 /*
8     * Copyright (C) 1997 Robey Pointer
9 wcc 1.110 * Copyright (C) 1999, 2000, 2001, 2002, 2003 Eggheads Development Team
10 guppy 1.49 *
11 fabian 1.15 * This program is free software; you can redistribute it and/or
12     * modify it under the terms of the GNU General Public License
13     * as published by the Free Software Foundation; either version 2
14     * of the License, or (at your option) any later version.
15 guppy 1.49 *
16 fabian 1.15 * This program is distributed in the hope that it will be useful,
17     * but WITHOUT ANY WARRANTY; without even the implied warranty of
18     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19     * GNU General Public License for more details.
20 guppy 1.49 *
21 fabian 1.15 * You should have received a copy of the GNU General Public License
22     * along with this program; if not, write to the Free Software
23     * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 segfault 1.1 */
25 tothwolf 1.102
26     #ifndef lint
27 wcc 1.116 static const char rcsid[] = "$Id: cmds.c,v 1.115 2003/02/15 05:04:58 wcc Exp $";
28 tothwolf 1.102 #endif
29 segfault 1.1
30     #include "main.h"
31     #include "modules.h"
32 ite 1.87 #include "logfile.h"
33     #include "misc.h"
34 wingman 1.101 #include "cmdt.h" /* cmd_t */
35 stdarg 1.104 #include "core_binds.h" /* check_bind_act, check_bind_chpt,
36     check_bind_chjn, check_bind_chof */
37 wingman 1.101 #include "users.h" /* get_user_by_host, set_user,
38     USERENTRY_PASS */
39     #include "chanprog.h" /* masktype, tell_verbose_status,
40     tell_settings, maskname, logmodes
41     isowner, reload */
42     #include "dccutil.h" /* dprintf_eggdrop, not_away, set_away
43     tell_dcc, do_boot, chanout_but,
44     dcc_chatter, flush_lines */
45     #include "net.h" /* tell_netdebug, killsock */
46     #include "cmds.h" /* prototypes */
47    
48 segfault 1.1 #include <ctype.h>
49 stdarg 1.100 #include "traffic.h" /* egg_traffic_t */
50 segfault 1.1
51 fabian 1.22 extern struct chanset_t *chanset;
52     extern struct dcc_t *dcc;
53 wcc 1.112 extern user_t *userlist;
54     extern int dcc_total, backgrd, make_userfile, do_restart, conmask, strict_host,
55     term_z, con_chan;
56 stdarg 1.100 extern egg_traffic_t traffic;
57 wcc 1.112 extern char myname[], ver[], network[], owner[], spaces[], quit_msg[];
58     extern time_t now, online_since;
59 guppy 1.83 extern module_entry *module_list;
60 wingman 1.101
61     #ifndef MAKING_MODS
62     extern struct dcc_table DCC_CHAT, DCC_BOT, DCC_RELAY, DCC_FORK_BOT,
63     DCC_CHAT_PASS;
64     #endif /* MAKING_MODS */
65 fabian 1.22
66 guppy 1.46 static char *btos(unsigned long);
67 fabian 1.22
68 segfault 1.1
69 stdarg 1.108 static void tell_who(user_t *u, int idx, int chan)
70 segfault 1.1 {
71     int i, k, ok = 0, atr = u ? u->flags : 0, len;
72     char s[1024]; /* temp fix - 1.4 has a better one */
73    
74 guppy 1.45 if (!chan)
75 segfault 1.1 dprintf(idx, "Party line members: (* = owner, + = master, @ = op)\n");
76     else {
77 stdarg 1.93 dprintf(idx,
78 segfault 1.1 "People on channel %s%d: (* = owner, + = master, @ = op)\n",
79     (chan < 100000) ? "" : "*", chan % 100000);
80     }
81     for (i = 0; i < dcc_total; i++)
82     if (dcc[i].type == &DCC_CHAT)
83     if (dcc[i].u.chat->channel == chan) {
84     spaces[len = HANDLEN - strlen(dcc[i].nick)] = 0;
85     if (atr & USER_OWNER) {
86 ite 1.88 sprintf(s, " [%.2lu] %c%s%s %s", dcc[i].sock,
87     (geticon(dcc[i].user) == '-' ? ' ' : geticon(dcc[i].user)),
88 segfault 1.1 dcc[i].nick, spaces, dcc[i].host);
89     } else {
90     sprintf(s, " %c%s%s %s",
91 ite 1.88 (geticon(dcc[i].user) == '-' ? ' ' : geticon(dcc[i].user)),
92 segfault 1.1 dcc[i].nick, spaces, dcc[i].host);
93     }
94     spaces[len] = ' ';
95     if (atr & USER_MASTER) {
96     if (dcc[i].u.chat->con_flags)
97     sprintf(&s[strlen(s)], " (con:%s)",
98     masktype(dcc[i].u.chat->con_flags));
99     }
100     if (now - dcc[i].timeval > 300) {
101     unsigned long days, hrs, mins;
102    
103     days = (now - dcc[i].timeval) / 86400;
104     hrs = ((now - dcc[i].timeval) - (days * 86400)) / 3600;
105     mins = ((now - dcc[i].timeval) - (hrs * 3600)) / 60;
106     if (days > 0)
107     sprintf(&s[strlen(s)], " (idle %lud%luh)", days, hrs);
108     else if (hrs > 0)
109     sprintf(&s[strlen(s)], " (idle %luh%lum)", hrs, mins);
110     else
111     sprintf(&s[strlen(s)], " (idle %lum)", mins);
112     }
113     dprintf(idx, "%s\n", s);
114     if (dcc[i].u.chat->away != NULL)
115     dprintf(idx, " AWAY: %s\n", dcc[i].u.chat->away);
116     }
117     ok = 0;
118     for (i = 0; i < dcc_total; i++) {
119     if ((dcc[i].type == &DCC_CHAT) && (dcc[i].u.chat->channel != chan)) {
120     if (!ok) {
121     ok = 1;
122 ite 1.89 dprintf(idx, _("Other people on the bot:\n"));
123 segfault 1.1 }
124     spaces[len = HANDLEN - strlen(dcc[i].nick)] = 0;
125     if (atr & USER_OWNER) {
126     sprintf(s, " [%.2lu] %c%s%s ",
127     dcc[i].sock,
128 ite 1.88 (geticon(dcc[i].user) == '-' ? ' ' : geticon(dcc[i].user)),
129     dcc[i].nick, spaces);
130 segfault 1.1 } else {
131     sprintf(s, " %c%s%s ",
132 ite 1.88 (geticon(dcc[i].user) == '-' ? ' ' : geticon(dcc[i].user)),
133     dcc[i].nick, spaces);
134 segfault 1.1 }
135     spaces[len] = ' ';
136     if (atr & USER_MASTER) {
137     if (dcc[i].u.chat->channel < 0)
138     strcat(s, "(-OFF-) ");
139 guppy 1.45 else if (!dcc[i].u.chat->channel)
140 segfault 1.1 strcat(s, "(party) ");
141     else
142     sprintf(&s[strlen(s)], "(%5d) ", dcc[i].u.chat->channel);
143     }
144     strcat(s, dcc[i].host);
145     if (atr & USER_MASTER) {
146     if (dcc[i].u.chat->con_flags)
147     sprintf(&s[strlen(s)], " (con:%s)",
148     masktype(dcc[i].u.chat->con_flags));
149     }
150     if (now - dcc[i].timeval > 300) {
151     k = (now - dcc[i].timeval) / 60;
152     if (k < 60)
153     sprintf(&s[strlen(s)], " (idle %dm)", k);
154     else
155     sprintf(&s[strlen(s)], " (idle %dh%dm)", k / 60, k % 60);
156     }
157     dprintf(idx, "%s\n", s);
158     if (dcc[i].u.chat->away != NULL)
159     dprintf(idx, " AWAY: %s\n", dcc[i].u.chat->away);
160     }
161 stdarg 1.84 if ((atr & USER_MASTER) && dcc[i].type && (dcc[i].type->flags & DCT_SHOWWHO) &&
162 segfault 1.1 (dcc[i].type != &DCC_CHAT)) {
163     if (!ok) {
164     ok = 1;
165 ite 1.89 dprintf(idx, _("Other people on the bot:\n"));
166 segfault 1.1 }
167     spaces[len = HANDLEN - strlen(dcc[i].nick)] = 0;
168     if (atr & USER_OWNER) {
169     sprintf(s, " [%.2lu] %c%s%s (files) %s",
170     dcc[i].sock, dcc[i].status & STAT_CHAT ? '+' : ' ',
171     dcc[i].nick, spaces, dcc[i].host);
172     } else {
173     sprintf(s, " %c%s%s (files) %s",
174     dcc[i].status & STAT_CHAT ? '+' : ' ',
175     dcc[i].nick, spaces, dcc[i].host);
176     }
177     spaces[len] = ' ';
178     dprintf(idx, "%s\n", s);
179     }
180     }
181     }
182    
183 stdarg 1.108 static int cmd_me(user_t *u, int idx, char *par)
184 segfault 1.1 {
185     int i;
186    
187     if (dcc[idx].u.chat->channel < 0) {
188 ite 1.89 dprintf(idx, _("You have chat turned off.\n"));
189 stdarg 1.103 return(0);
190 segfault 1.1 }
191     if (!par[0]) {
192     dprintf(idx, "Usage: me <action>\n");
193 stdarg 1.103 return(0);
194 segfault 1.1 }
195     if (dcc[idx].u.chat->away != NULL)
196     not_away(idx);
197     for (i = 0; i < dcc_total; i++)
198 stdarg 1.104 check_bind_act(dcc[idx].nick, dcc[idx].u.chat->channel, par);
199 stdarg 1.103 return(0);
200 segfault 1.1 }
201    
202 stdarg 1.108 static int cmd_motd(user_t *u, int idx, char *par)
203 segfault 1.1 {
204     show_motd(idx);
205 stdarg 1.103 return(1);
206 segfault 1.1 }
207    
208 stdarg 1.108 static int cmd_away(user_t *u, int idx, char *par)
209 segfault 1.1 {
210     if (strlen(par) > 60)
211     par[60] = 0;
212     set_away(idx, par);
213 stdarg 1.107 return(1);
214 segfault 1.1 }
215    
216 stdarg 1.108 static int cmd_back(user_t *u, int idx, char *par)
217 segfault 1.1 {
218     not_away(idx);
219 stdarg 1.107 return(1);
220 segfault 1.1 }
221    
222 stdarg 1.108 static int cmd_newpass(user_t *u, int idx, char *par)
223 segfault 1.1 {
224     char *new;
225    
226     if (!par[0]) {
227     dprintf(idx, "Usage: newpass <newpassword>\n");
228 stdarg 1.103 return(0);
229 segfault 1.1 }
230     new = newsplit(&par);
231     if (strlen(new) > 16)
232     new[16] = 0;
233     if (strlen(new) < 6) {
234 ite 1.89 dprintf(idx, _("Please use at least 6 characters.\n"));
235 stdarg 1.103 return(0);
236 segfault 1.1 }
237     set_user(&USERENTRY_PASS, u, new);
238 stdarg 1.103 putlog(LOG_CMDS, "*", "#%s# newpass ...", dcc[idx].nick);
239 ite 1.89 dprintf(idx, _("Changed password to '%s'\n"), new);
240 stdarg 1.103 return(0);
241 segfault 1.1 }
242    
243 stdarg 1.108 static int cmd_rehelp(user_t *u, int idx, char *par)
244 segfault 1.1 {
245 ite 1.89 dprintf(idx, _("Reload help cache...\n"));
246 segfault 1.1 reload_help_data();
247 stdarg 1.103 return(1);
248 segfault 1.1 }
249    
250 stdarg 1.108 static int cmd_help(user_t *u, int idx, char *par)
251 segfault 1.1 {
252 fabian 1.4 struct flag_record fr = {FR_GLOBAL | FR_CHAN, 0, 0, 0, 0, 0};
253 segfault 1.1
254     get_user_flagrec(u, &fr, dcc[idx].u.chat->con_chan);
255     if (par[0]) {
256     if (!strcmp(par, "all"))
257     tellallhelp(idx, "all", &fr);
258 fabian 1.4 else if (strchr(par, '*') || strchr(par, '?')) {
259     char *p = par;
260    
261     /* Check if the search pattern only consists of '*' and/or '?'
262     * If it does, show help for "all" instead of listing all help
263 fabian 1.22 * entries.
264     */
265 fabian 1.4 for (p = par; *p && ((*p == '*') || (*p == '?')); p++);
266     if (*p)
267     tellwildhelp(idx, par, &fr);
268     else
269     tellallhelp(idx, "all", &fr);
270     } else
271 segfault 1.1 tellhelp(idx, par, &fr, 0);
272     } else {
273     if (glob_op(fr) || glob_botmast(fr) || chan_op(fr))
274     tellhelp(idx, "help", &fr, 0);
275     else
276     tellhelp(idx, "helpparty", &fr, 0);
277     }
278 stdarg 1.103 return(1);
279 segfault 1.1 }
280    
281 stdarg 1.108 static int cmd_who(user_t *u, int idx, char *par)
282 segfault 1.1 {
283     putlog(LOG_CMDS, "*", "#%s# who", dcc[idx].nick);
284     if (dcc[idx].u.chat->channel < 0)
285     tell_who(u, idx, 0);
286     else
287     tell_who(u, idx, dcc[idx].u.chat->channel);
288 stdarg 1.107
289 stdarg 1.103 return(1);
290 segfault 1.1 }
291    
292 stdarg 1.108 static int cmd_whois(user_t *u, int idx, char *par)
293 segfault 1.1 {
294     if (!par[0]) {
295     dprintf(idx, "Usage: whois <handle>\n");
296 stdarg 1.103 return(0);
297 segfault 1.1 }
298     tell_user_ident(idx, par, u ? (u->flags & USER_MASTER) : 0);
299 stdarg 1.103 return(1);
300 segfault 1.1 }
301    
302 stdarg 1.108 static int cmd_match(user_t *u, int idx, char *par)
303 segfault 1.1 {
304     int start = 1, limit = 20;
305     char *s, *s1, *chname;
306    
307     if (!par[0]) {
308     dprintf(idx, "Usage: match <nick/host> [[skip] count]\n");
309 stdarg 1.103 return(0);
310 segfault 1.1 }
311     s = newsplit(&par);
312     if (strchr(CHANMETA, par[0]) != NULL)
313     chname = newsplit(&par);
314     else
315     chname = "";
316     if (atoi(par) > 0) {
317     s1 = newsplit(&par);
318     if (atoi(par) > 0) {
319     start = atoi(s1);
320     limit = atoi(par);
321     } else
322     limit = atoi(s1);
323     }
324     tell_users_match(idx, s, start, limit, u ? (u->flags & USER_MASTER) : 0,
325     chname);
326 stdarg 1.103 return(1);
327 segfault 1.1 }
328    
329 stdarg 1.108 static int cmd_uptime(user_t *u, int idx, char *par)
330 segfault 1.1 {
331 guppy 1.64 char s[256];
332     unsigned long uptime, tmp, hr, min;
333    
334     uptime = now - online_since;
335     s[0] = 0;
336     if (uptime > 86400) {
337     tmp = (uptime / 86400);
338     sprintf(s, "%lu day%s, ", tmp, (tmp == 1) ? "" : "s");
339     uptime -= (tmp * 86400);
340     }
341     hr = (uptime / 3600);
342     uptime -= (hr * 3600);
343     min = (uptime / 60);
344     sprintf(&s[strlen(s)], "%02lu:%02lu", hr, min);
345    
346     dprintf(idx, "%s %s (%s)\n", _("Online for"), s, backgrd ?
347     _("background") : term_z ? _("terminal mode") : con_chan ?
348     _("status mode") : _("log dump mode"));
349 stdarg 1.103 return(1);
350 segfault 1.1 }
351    
352 stdarg 1.108 static int cmd_status(user_t *u, int idx, char *par)
353 segfault 1.1 {
354     int atr = u ? u->flags : 0;
355    
356 tothwolf 1.74 if (!strcasecmp(par, "all")) {
357 segfault 1.1 if (!(atr & USER_MASTER)) {
358 ite 1.89 dprintf(idx, _("You do not have Bot Master privileges.\n"));
359 stdarg 1.103 return(0);
360 segfault 1.1 }
361     tell_verbose_status(idx);
362     dprintf(idx, "\n");
363     tell_settings(idx);
364     do_module_report(idx, 1, NULL);
365     } else {
366     tell_verbose_status(idx);
367     do_module_report(idx, 0, NULL);
368     }
369 stdarg 1.103 return(1);
370 segfault 1.1 }
371    
372 stdarg 1.108 static int cmd_dccstat(user_t *u, int idx, char *par)
373 segfault 1.1 {
374     tell_dcc(idx);
375 stdarg 1.103 return(1);
376 segfault 1.1 }
377    
378 stdarg 1.108 static int cmd_boot(user_t *u, int idx, char *par)
379 segfault 1.1 {
380     int i, files = 0, ok = 0;
381     char *who;
382 stdarg 1.108 user_t *u2;
383 segfault 1.1
384     if (!par[0]) {
385     dprintf(idx, "Usage: boot nick[@bot]\n");
386 stdarg 1.103 return(0);
387 segfault 1.1 }
388     who = newsplit(&par);
389     for (i = 0; i < dcc_total; i++)
390 stdarg 1.99 if (dcc[i].type && !strcasecmp(dcc[i].nick, who)
391 fabian 1.39 && !ok && (dcc[i].type->flags & DCT_CANBOOT)) {
392 segfault 1.1 u2 = get_user_by_handle(userlist, dcc[i].nick);
393 fabian 1.39 if (u2 && (u2->flags & USER_OWNER)
394 tothwolf 1.74 && strcasecmp(dcc[idx].nick, who)) {
395 wcc 1.92 dprintf(idx, _("You can't boot a bot owner.\n"));
396 stdarg 1.103 return(0);
397 fabian 1.39 }
398     if (u2 && (u2->flags & USER_MASTER) && !(u && (u->flags & USER_MASTER))) {
399 wcc 1.92 dprintf(idx, _("You can't boot a bot master.\n"));
400 stdarg 1.103 return(0);
401 segfault 1.1 }
402     files = (dcc[i].type->flags & DCT_FILES);
403     if (files)
404 wcc 1.92 dprintf(idx, _("Booted %s from the file area.\n"), dcc[i].nick);
405 segfault 1.1 else
406 wcc 1.92 dprintf(idx, _("Booted %s from the party line.\n"), dcc[i].nick);
407 segfault 1.1 do_boot(i, dcc[idx].nick, par);
408     ok = 1;
409     }
410 stdarg 1.103 if (!ok) {
411 ite 1.89 dprintf(idx, _("Who? No such person on the party line.\n"));
412 stdarg 1.103 return(0);
413     }
414     return(1);
415 segfault 1.1 }
416    
417 stdarg 1.108 static int cmd_console(user_t *u, int idx, char *par)
418 segfault 1.1 {
419     char *nick, s[2], s1[512];
420     int dest = 0, i, ok = 0, pls, md;
421 fabian 1.8 struct flag_record fr = {FR_GLOBAL | FR_CHAN, 0, 0, 0, 0, 0};
422 segfault 1.1 module_entry *me;
423    
424     if (!par[0]) {
425 wcc 1.92 dprintf(idx, "Your console is %s: %s (%s).\n",
426 segfault 1.1 dcc[idx].u.chat->con_chan,
427     masktype(dcc[idx].u.chat->con_flags),
428     maskname(dcc[idx].u.chat->con_flags));
429 stdarg 1.103 return(1);
430 segfault 1.1 }
431     get_user_flagrec(u, &fr, dcc[idx].u.chat->con_chan);
432     strcpy(s1, par);
433     nick = newsplit(&par);
434 guppy 1.49 /* Don't remove '+' as someone couldn't have '+' in CHANMETA cause
435 fabian 1.22 * he doesn't use IRCnet ++rtc.
436     */
437 fabian 1.6 if (nick[0] && !strchr(CHANMETA "+-*", nick[0]) && glob_master(fr)) {
438 segfault 1.1 for (i = 0; i < dcc_total; i++)
439 stdarg 1.99 if (dcc[i].type && !strcasecmp(nick, dcc[i].nick) &&
440 segfault 1.1 (dcc[i].type == &DCC_CHAT) && (!ok)) {
441     ok = 1;
442     dest = i;
443     }
444     if (!ok) {
445     dprintf(idx, "No such user on the party line!\n");
446 stdarg 1.103 return(0);
447 segfault 1.1 }
448     nick[0] = 0;
449     } else
450     dest = idx;
451     if (!nick[0])
452     nick = newsplit(&par);
453 fabian 1.22 /* Consider modeless channels, starting with '+' */
454 guppy 1.49 if ((nick [0] == '+' && findchan_by_dname(nick)) ||
455 fabian 1.6 (nick [0] != '+' && strchr(CHANMETA "*", nick[0]))) {
456 fabian 1.8 if (strcmp(nick, "*") && !findchan_by_dname(nick)) {
457 wcc 1.92 dprintf(idx, "Invalid console channel: %s.\n", nick);
458 stdarg 1.103 return(0);
459 segfault 1.1 }
460     get_user_flagrec(u, &fr, nick);
461 wcc 1.111 if (!chan_op(fr) && !glob_op(fr)) {
462 wcc 1.92 dprintf(idx, "You don't have op or master access to channel %s.\n",
463 segfault 1.1 nick);
464 stdarg 1.103 return(0);
465 segfault 1.1 }
466 ite 1.97 strlcpy(dcc[dest].u.chat->con_chan, nick, 81);
467 segfault 1.1 nick[0] = 0;
468     if ((dest == idx) && !glob_master(fr) && !chan_master(fr))
469 fabian 1.22 /* Consoling to another channel for self */
470 segfault 1.1 dcc[dest].u.chat->con_flags &= ~(LOG_MISC | LOG_CMDS | LOG_WALL);
471     }
472     if (!nick[0])
473     nick = newsplit(&par);
474     pls = 1;
475     if (nick[0]) {
476     if ((nick[0] != '+') && (nick[0] != '-'))
477     dcc[dest].u.chat->con_flags = 0;
478     for (; *nick; nick++) {
479     if (*nick == '+')
480     pls = 1;
481     else if (*nick == '-')
482     pls = 0;
483     else {
484     s[0] = *nick;
485     s[1] = 0;
486     md = logmodes(s);
487     if ((dest == idx) && !glob_master(fr) && pls) {
488     if (chan_master(fr))
489     md &= ~(LOG_FILES | LOG_LEV1 | LOG_LEV2 | LOG_LEV3 |
490     LOG_LEV4 | LOG_LEV5 | LOG_LEV6 | LOG_LEV7 |
491     LOG_LEV8 | LOG_DEBUG);
492     else
493     md &= ~(LOG_MISC | LOG_CMDS | LOG_FILES | LOG_LEV1 |
494     LOG_LEV2 | LOG_LEV3 | LOG_LEV4 | LOG_LEV5 |
495     LOG_LEV6 | LOG_LEV7 | LOG_LEV8 | LOG_WALL |
496     LOG_DEBUG);
497     }
498     if (!glob_owner(fr) && pls)
499 wcc 1.115 md &= ~(LOG_RAW | LOG_SRVOUT);
500 segfault 1.1 if (!glob_botmast(fr) && pls)
501     md &= ~LOG_BOTS;
502     if (pls)
503     dcc[dest].u.chat->con_flags |= md;
504     else
505     dcc[dest].u.chat->con_flags &= ~md;
506     }
507     }
508     }
509     if (dest == idx) {
510 wcc 1.92 dprintf(idx, "Set your console to %s: %s (%s).\n",
511 segfault 1.1 dcc[idx].u.chat->con_chan,
512     masktype(dcc[idx].u.chat->con_flags),
513     maskname(dcc[idx].u.chat->con_flags));
514     } else {
515 wcc 1.92 dprintf(idx, "Set console of %s to %s: %s (%s).\n", dcc[dest].nick,
516 segfault 1.1 dcc[dest].u.chat->con_chan,
517     masktype(dcc[dest].u.chat->con_flags),
518     maskname(dcc[dest].u.chat->con_flags));
519 wcc 1.92 dprintf(dest, "%s set your console to %s: %s (%s).\n", dcc[idx].nick,
520 segfault 1.1 dcc[dest].u.chat->con_chan,
521     masktype(dcc[dest].u.chat->con_flags),
522     maskname(dcc[dest].u.chat->con_flags));
523     }
524 fabian 1.22 /* New style autosave -- drummer,07/25/1999*/
525 fabian 1.2 if ((me = module_find("console", 1, 1))) {
526 segfault 1.1 Function *func = me->funcs;
527 fabian 1.3 (func[CONSOLE_DOSTORE]) (dest);
528 segfault 1.1 }
529 stdarg 1.103 return(1);
530 segfault 1.1 }
531    
532 stdarg 1.108 static int cmd_pls_bot(user_t *u, int idx, char *par)
533 segfault 1.1 {
534     char *handle, *addr, *p, *q, *host;
535 stdarg 1.108 user_t *u1;
536 segfault 1.1 struct bot_addr *bi;
537 drummer 1.61 int addrlen;
538 segfault 1.1
539 wcc 1.113 if (!par[0]) {
540     dprintf(idx, "Usage: +bot <handle> [address[:telnet-port[/relay-port]]] "
541     "[host]\n");
542     return(0);
543     }
544    
545     handle = newsplit(&par);
546     addr = newsplit(&par);
547     host = newsplit(&par);
548    
549     if (strlen(handle) > HANDLEN)
550     handle[HANDLEN] = 0;
551    
552     if (get_user_by_handle(userlist, handle))
553     dprintf(idx, _("Someone already exists by that name.\n"));
554     return(0);
555     }
556    
557     if (strchr(BADHANDCHARS, handle[0]) != NULL) {
558     dprintf(idx, _("You can't start a botnick with '%c'.\n"), handle[0]);
559     return(0);
560     }
561    
562     if (strlen(addr) > 60)
563     addr[60] = 0;
564    
565     userlist = adduser(userlist, handle, "none", "-", USER_BOT);
566     u1 = get_user_by_handle(userlist, handle);
567     bi = malloc(sizeof(struct bot_addr));
568    
569     if (*addr == '[') {
570     addr++;
571     if ((q = strchr(addr, ']'))) {
572     addrlen = q - addr;
573     q++;
574     if (*q != ':')
575     q = 0;
576     } else
577     addrlen = strlen(addr);
578     } else {
579     if ((q = strchr(addr, ':')))
580     addrlen = q - addr;
581     else
582     addrlen = strlen(addr);
583     }
584     if (!q) {
585     bi->address = strdup(addr);
586     bi->telnet_port = 3333;
587     bi->relay_port = 3333;
588     } else {
589     bi->address = malloc(addrlen + 1);
590     strlcpy(bi->address, addr, addrlen + 1);
591     p = q + 1;
592     bi->telnet_port = atoi(p);
593     q = strchr(p, '/');
594     if (!q)
595     bi->relay_port = bi->telnet_port;
596     else
597     bi->relay_port = atoi(q + 1);
598 segfault 1.1 }
599 wcc 1.113 set_user(&USERENTRY_BOTADDR, u1, bi);
600     dprintf(idx, _("Added bot '%s' with %s%s%s%s and %s%s%s%s.\n"), handle,
601     addr[0] ? "address " : "no address ", addr[0] ? "'" : "",
602     addr[0] ? addr : "", addr[0] ? "'" : "",
603     host[0] ? "hostmask " : "no hostmask", addr[0] ? "'" : "",
604     host[0] ? host : "", addr[0] ? "'" : "");
605     if (host[0])
606     addhost_by_handle(handle, host);
607     else if (!add_bot_hostmask(idx, handle))
608     dprintf(idx, _("You'll want to add a hostmask if this bot will ever be on any channels that I'm on.\n"));
609 stdarg 1.103 return(1);
610 segfault 1.1 }
611    
612 stdarg 1.108 static int cmd_chhandle(user_t *u, int idx, char *par)
613 segfault 1.1 {
614 fabian 1.2 char hand[HANDLEN + 1], newhand[HANDLEN + 1];
615 segfault 1.1 int i, atr = u ? u->flags : 0, atr2;
616 stdarg 1.108 user_t *u2;
617 segfault 1.1
618 ite 1.97 strlcpy(hand, newsplit(&par), sizeof hand);
619     strlcpy(newhand, newsplit(&par), sizeof newhand);
620 fabian 1.2
621     if (!hand[0] || !newhand[0]) {
622 fabian 1.27 dprintf(idx, "Usage: chhandle <oldhandle> <newhandle>\n");
623 stdarg 1.103 return(0);
624 fabian 1.2 }
625     for (i = 0; i < strlen(newhand); i++)
626     if ((newhand[i] <= 32) || (newhand[i] >= 127) || (newhand[i] == '@'))
627     newhand[i] = '?';
628 fabian 1.6 if (strchr(BADHANDCHARS, newhand[0]) != NULL)
629 wcc 1.92 dprintf(idx, _("Bizarre quantum forces prevent nicknames from starting with %c.\n"),
630 fabian 1.2 newhand[0]);
631     else if (get_user_by_handle(userlist, newhand) &&
632 tothwolf 1.74 strcasecmp(hand, newhand))
633 ite 1.89 dprintf(idx, _("Somebody is already using %s.\n"), newhand);
634 segfault 1.1 else {
635 fabian 1.2 u2 = get_user_by_handle(userlist, hand);
636     atr2 = u2 ? u2->flags : 0;
637     if ((atr & USER_BOTMAST) && !(atr & USER_MASTER) &&
638     !(atr2 & USER_BOT))
639 wcc 1.92 dprintf(idx, _("You can't change handles for non-bots.\n"));
640 fabian 1.2 else if ((atr2 & USER_OWNER) && !(atr & USER_OWNER) &&
641 tothwolf 1.74 strcasecmp(dcc[idx].nick, hand))
642 wcc 1.92 dprintf(idx, _("You can't change a bot owner's handle.\n"));
643 tothwolf 1.74 else if (isowner(hand) && strcasecmp(dcc[idx].nick, hand))
644 wcc 1.92 dprintf(idx, _("You can't change a permanent bot owner's handle.\n"));
645 wcc 1.112 else if (!strcasecmp(newhand, myname) && !(atr2 & USER_BOT))
646 ite 1.89 dprintf(idx, _("Hey! That's MY name!\n"));
647 fabian 1.2 else if (change_handle(u2, newhand)) {
648 ite 1.89 dprintf(idx, _("Changed.\n"));
649 fabian 1.2 } else
650 ite 1.89 dprintf(idx, _("Failed.\n"));
651 segfault 1.1 }
652 stdarg 1.103 return(1);
653 segfault 1.1 }
654    
655 stdarg 1.108 static int cmd_handle(user_t *u, int idx, char *par)
656 segfault 1.1 {
657 fabian 1.27 char oldhandle[HANDLEN + 1], newhandle[HANDLEN + 1];
658 fabian 1.2 int i;
659    
660 ite 1.97 strlcpy(newhandle, newsplit(&par), sizeof newhandle);
661 segfault 1.1
662 fabian 1.27 if (!newhandle[0]) {
663     dprintf(idx, "Usage: handle <new-handle>\n");
664 stdarg 1.77 return(0);
665 segfault 1.1 }
666 fabian 1.27 for (i = 0; i < strlen(newhandle); i++)
667     if ((newhandle[i] <= 32) || (newhandle[i] >= 127) || (newhandle[i] == '@'))
668     newhandle[i] = '?';
669     if (strchr(BADHANDCHARS, newhandle[0]) != NULL) {
670 ite 1.89 dprintf(idx, _("Bizarre quantum forces prevent handle from starting with '%c'\n"),
671 fabian 1.27 newhandle[0]);
672     } else if (get_user_by_handle(userlist, newhandle) &&
673 tothwolf 1.74 strcasecmp(dcc[idx].nick, newhandle)) {
674 ite 1.89 dprintf(idx, _("Somebody is already using %s.\n"), newhandle);
675 wcc 1.112 } else if (!strcasecmp(newhandle, myname)) {
676 ite 1.89 dprintf(idx, _("Hey! That's MY name!\n"));
677 segfault 1.1 } else {
678 ite 1.97 strlcpy(oldhandle, dcc[idx].nick, sizeof oldhandle);
679 fabian 1.27 if (change_handle(u, newhandle)) {
680 ite 1.89 dprintf(idx, _("Okay, changed.\n"));
681 segfault 1.1 } else
682 ite 1.89 dprintf(idx, _("Failed.\n"));
683 segfault 1.1 }
684 stdarg 1.77 return(1);
685 segfault 1.1 }
686    
687 stdarg 1.108 static int cmd_chpass(user_t *u, int idx, char *par)
688 segfault 1.1 {
689     char *handle, *new;
690     int atr = u ? u->flags : 0, l;
691    
692     if (!par[0])
693     dprintf(idx, "Usage: chpass <handle> [password]\n");
694     else {
695     handle = newsplit(&par);
696     u = get_user_by_handle(userlist, handle);
697     if (!u)
698 ite 1.89 dprintf(idx, _("No such user.\n"));
699 segfault 1.1 else if ((atr & USER_BOTMAST) && !(atr & USER_MASTER) &&
700     !(u->flags & USER_BOT))
701 wcc 1.92 dprintf(idx, _("You can't change passwords for non-bots.\n"));
702 segfault 1.1 else if ((u->flags & USER_OWNER) && !(atr & USER_OWNER) &&
703 tothwolf 1.74 strcasecmp(handle, dcc[idx].nick))
704 wcc 1.92 dprintf(idx, _("You can't change a bot owner's password.\n"));
705 tothwolf 1.74 else if (isowner(handle) && strcasecmp(dcc[idx].nick, handle))
706 wcc 1.92 dprintf(idx, _("You can't change a permanent bot owner's password.\n"));
707 segfault 1.1 else if (!par[0]) {
708     set_user(&USERENTRY_PASS, u, NULL);
709 ite 1.89 dprintf(idx, _("Removed password.\n"));
710 segfault 1.1 } else {
711     l = strlen(new = newsplit(&par));
712     if (l > 16)
713     new[16] = 0;
714     if (l < 6)
715 ite 1.89 dprintf(idx, _("Please use at least 6 characters.\n"));
716 segfault 1.1 else {
717     set_user(&USERENTRY_PASS, u, new);
718 ite 1.89 dprintf(idx, _("Changed password.\n"));
719 segfault 1.1 }
720     }
721     }
722 stdarg 1.103 return(0);
723 segfault 1.1 }
724    
725 stdarg 1.108 static int cmd_chaddr(user_t *u, int idx, char *par)
726 segfault 1.1 {
727 guppy 1.51 int telnet_port = 3333, relay_port = 3333;
728 segfault 1.1 char *handle, *addr, *p, *q;
729     struct bot_addr *bi;
730 stdarg 1.108 user_t *u1;
731 drummer 1.61 int addrlen;
732 segfault 1.1
733 wcc 1.116 handle = newsplit(&par);
734 segfault 1.1 if (!par[0]) {
735 guppy 1.51 dprintf(idx, "Usage: chaddr <botname> <address[:telnet-port[/relay-port]]>\n");
736 stdarg 1.103 return(0);
737 segfault 1.1 }
738     addr = newsplit(&par);
739 fabian 1.6 if (strlen(addr) > UHOSTMAX)
740     addr[UHOSTMAX] = 0;
741 segfault 1.1 u1 = get_user_by_handle(userlist, handle);
742     if (!u1 || !(u1->flags & USER_BOT)) {
743 wcc 1.92 dprintf(idx, _("This command is only useful for tandem bots.\n"));
744 stdarg 1.103 return(0);
745 segfault 1.1 }
746 ite 1.89 dprintf(idx, _("Changed bot's address.\n"));
747 guppy 1.51
748     bi = (struct bot_addr *) get_user(&USERENTRY_BOTADDR, u1);
749     if (bi) {
750     telnet_port = bi->telnet_port;
751     relay_port = bi->relay_port;
752     }
753    
754 tothwolf 1.70 bi = malloc(sizeof(struct bot_addr));
755 segfault 1.1
756 drummer 1.61 if (*addr == '[') {
757     addr++;
758     if ((q = strchr(addr, ']'))) {
759     addrlen = q - addr;
760     q++;
761     if (*q != ':')
762     q = 0;
763     } else
764     addrlen = strlen(addr);
765     } else {
766     if ((q = strchr(addr, ':')))
767     addrlen = q - addr;
768     else
769     addrlen = strlen(addr);
770     }
771 segfault 1.1 if (!q) {
772 ite 1.85 bi->address = strdup(addr);
773 guppy 1.51 bi->telnet_port = telnet_port;
774     bi->relay_port = relay_port;
775 segfault 1.1 } else {
776 tothwolf 1.70 bi->address = malloc(addrlen + 1);
777 ite 1.97 strlcpy(bi->address, addr, addrlen + 1);
778 segfault 1.1 p = q + 1;
779     bi->telnet_port = atoi(p);
780     q = strchr(p, '/');
781     if (!q) {
782     bi->relay_port = bi->telnet_port;
783     } else {
784     bi->relay_port = atoi(q + 1);
785     }
786     }
787     set_user(&USERENTRY_BOTADDR, u1, bi);
788 stdarg 1.103 return(1);
789 segfault 1.1 }
790    
791 stdarg 1.108 static int cmd_comment(user_t *u, int idx, char *par)
792 segfault 1.1 {
793     char *handle;
794 stdarg 1.108 user_t *u1;
795 segfault 1.1
796 wcc 1.116 handle = newsplit(&par);
797 segfault 1.1 if (!par[0]) {
798     dprintf(idx, "Usage: comment <handle> <newcomment>\n");
799 stdarg 1.103 return(0);
800 segfault 1.1 }
801     u1 = get_user_by_handle(userlist, handle);
802     if (!u1) {
803 ite 1.89 dprintf(idx, _("No such user!\n"));
804 stdarg 1.103 return(0);
805 segfault 1.1 }
806     if ((u1->flags & USER_OWNER) && !(u && (u->flags & USER_OWNER)) &&
807 tothwolf 1.74 strcasecmp(handle, dcc[idx].nick)) {
808 ite 1.89 dprintf(idx, _("Can't change comment on the bot owner.\n"));
809 stdarg 1.103 return(0);
810 segfault 1.1 }
811 tothwolf 1.74 if (!strcasecmp(par, "none")) {
812 ite 1.89 dprintf(idx, _("Okay, comment blanked.\n"));
813 segfault 1.1 set_user(&USERENTRY_COMMENT, u1, NULL);
814 stdarg 1.103 return(0);
815 segfault 1.1 }
816 ite 1.89 dprintf(idx, _("Changed comment.\n"));
817 segfault 1.1 set_user(&USERENTRY_COMMENT, u1, par);
818 stdarg 1.103 return(1);
819 segfault 1.1 }
820    
821 stdarg 1.108 static int cmd_restart(user_t *u, int idx, char *par)
822 segfault 1.1 {
823     if (!backgrd) {
824 stdarg 1.103 dprintf(idx, "%s\n", _("You cannot .restart a bot when running -n (due to tcl)."));
825     return(0);
826 segfault 1.1 }
827 ite 1.89 dprintf(idx, _("Restarting.\n"));
828 guppy 1.64 if (make_userfile)
829 segfault 1.1 make_userfile = 0;
830     write_userfile(-1);
831 guppy 1.64 putlog(LOG_MISC, "*", "%s", _("Restarting ..."));
832 segfault 1.1 do_restart = idx;
833 stdarg 1.103 return(1);
834 segfault 1.1 }
835    
836 stdarg 1.108 static int cmd_rehash(user_t *u, int idx, char *par)
837 segfault 1.1 {
838 guppy 1.64 dprintf(idx, "%s\n", _("Rehashing."));
839     if (make_userfile)
840 segfault 1.1 make_userfile = 0;
841     write_userfile(-1);
842 guppy 1.64 putlog(LOG_MISC, "*", "%s", _("Rehashing..."));
843 segfault 1.1 do_restart = -2;
844 stdarg 1.103 return(1);
845 segfault 1.1 }
846    
847 stdarg 1.108 static int cmd_reload(user_t *u, int idx, char *par)
848 segfault 1.1 {
849 guppy 1.64 dprintf(idx, "%s\n", _("Reloading user file..."));
850 segfault 1.1 reload();
851 stdarg 1.107 return(1);
852 segfault 1.1 }
853    
854 stdarg 1.108 void cmd_die(user_t *u, int idx, char *par)
855 segfault 1.1 {
856 guppy 1.62 char s1[1024], s2[1024];
857 segfault 1.1
858     if (par[0]) {
859 tothwolf 1.74 snprintf(s1, sizeof s1, "%s (%s: %s)", _("BOT SHUTDOWN"), dcc[idx].nick,
860 guppy 1.64 par);
861 tothwolf 1.74 snprintf(s2, sizeof s2, "%s %s!%s (%s)", _("DIE BY"), dcc[idx].nick,
862 guppy 1.64 dcc[idx].host, par);
863 ite 1.97 strlcpy(quit_msg, par, 1024);
864 segfault 1.1 } else {
865 tothwolf 1.74 snprintf(s1, sizeof s1, "%s (%s %s)", _("BOT SHUTDOWN"), _("Authorized by"),
866 guppy 1.64 dcc[idx].nick);
867 tothwolf 1.74 snprintf(s2, sizeof s2, "%s %s!%s (%s)", _("DIE BY"), dcc[idx].nick,
868 guppy 1.64 dcc[idx].host, _("requested"));
869 ite 1.97 strlcpy(quit_msg, dcc[idx].nick, 1024);
870 segfault 1.1 }
871 guppy 1.62 kill_bot(s1, s2);
872 segfault 1.1 }
873    
874 stdarg 1.108 static int cmd_simul(user_t *u, int idx, char *par)
875 segfault 1.1 {
876     char *nick;
877     int i, ok = 0;
878    
879     nick = newsplit(&par);
880     if (!par[0]) {
881 johoho 1.32 dprintf(idx, "Usage: simul <hand> <text>\n");
882 stdarg 1.103 return(0);
883 segfault 1.1 }
884     if (isowner(nick)) {
885 ite 1.89 dprintf(idx, _("Unable to '.simul' permanent owners.\n"));
886 stdarg 1.103 return(0);
887 segfault 1.1 }
888     for (i = 0; i < dcc_total; i++)
889 stdarg 1.99 if (dcc[i].type && !strcasecmp(nick, dcc[i].nick) && !ok &&
890 segfault 1.1 (dcc[i].type->flags & DCT_SIMUL)) {
891     if (dcc[i].type && dcc[i].type->activity) {
892     dcc[i].type->activity(i, par, strlen(par));
893     ok = 1;
894     }
895     }
896     if (!ok)
897 ite 1.89 dprintf(idx, _("No such user on the party line.\n"));
898 stdarg 1.103 return(1);
899 segfault 1.1 }
900    
901 stdarg 1.108 static int cmd_save(user_t *u, int idx, char *par)
902 segfault 1.1 {
903 ite 1.89 dprintf(idx, _("Saving user file...\n"));
904 segfault 1.1 write_userfile(-1);
905 stdarg 1.103 return(1);
906 segfault 1.1 }
907    
908 stdarg 1.108 static int cmd_backup(user_t *u, int idx, char *par)
909 segfault 1.1 {
910 wcc 1.92 dprintf(idx, _("Backing up the channel & user files...\n"));
911 guppy 1.60 call_hook(HOOK_BACKUP);
912 stdarg 1.103 return(1);
913 segfault 1.1 }
914    
915 fabian 1.22 /* After messing with someone's user flags, make sure the dcc-chat flags
916     * are set correctly.
917     */
918 stdarg 1.108 int check_dcc_attrs(user_t *u, int oatr)
919 segfault 1.1 {
920     int i, stat;
921    
922     if (!u)
923     return 0;
924 fabian 1.22 /* Make sure default owners are +n */
925 poptix 1.57 if (isowner(u->handle)) {
926     u->flags = sanity_check(u->flags | USER_OWNER);
927 segfault 1.1 }
928     for (i = 0; i < dcc_total; i++) {
929 stdarg 1.76 if (dcc[i].type && (dcc[i].type->flags & DCT_MASTER) &&
930 tothwolf 1.74 (!strcasecmp(u->handle, dcc[i].nick))) {
931 segfault 1.1 stat = dcc[i].status;
932     if ((oatr & USER_MASTER) && !(u->flags & USER_MASTER)) {
933 fabian 1.22 struct flag_record fr = {FR_CHAN | FR_ANYWH, 0, 0, 0, 0, 0};
934 segfault 1.1
935     dcc[i].u.chat->con_flags &= ~(LOG_MISC | LOG_CMDS | LOG_RAW |
936     LOG_FILES | LOG_LEV1 | LOG_LEV2 |
937     LOG_LEV3 | LOG_LEV4 | LOG_LEV5 |
938     LOG_LEV6 | LOG_LEV7 | LOG_LEV8 |
939     LOG_WALL | LOG_DEBUG);
940     get_user_flagrec(u, &fr, NULL);
941     if (!chan_master(fr))
942     dcc[i].u.chat->con_flags |= (LOG_MISC | LOG_CMDS);
943     dprintf(i, "*** POOF! ***\n");
944 ite 1.89 dprintf(i, _("You are no longer a master on this bot.\n"));
945 segfault 1.1 }
946     if (!(oatr & USER_MASTER) && (u->flags & USER_MASTER)) {
947     dcc[i].u.chat->con_flags |= conmask;
948     dprintf(i, "*** POOF! ***\n");
949 ite 1.89 dprintf(i, _("You are now a master on this bot.\n"));
950 segfault 1.1 }
951     if (!(oatr & USER_BOTMAST) && (u->flags & USER_BOTMAST)) {
952     dprintf(i, "### POOF! ###\n");
953 ite 1.89 dprintf(i, _("You are now a botnet master on this bot.\n"));
954 segfault 1.1 }
955     if ((oatr & USER_BOTMAST) && !(u->flags & USER_BOTMAST)) {
956     dprintf(i, "### POOF! ###\n");
957 ite 1.89 dprintf(i, _("You are no longer a botnet master on this bot.\n"));
958 segfault 1.1 }
959     if (!(oatr & USER_OWNER) && (u->flags & USER_OWNER)) {
960     dprintf(i, "@@@ POOF! @@@\n");
961 ite 1.89 dprintf(i, _("You are now an OWNER of this bot.\n"));
962 segfault 1.1 }
963     if ((oatr & USER_OWNER) && !(u->flags & USER_OWNER)) {
964     dprintf(i, "@@@ POOF! @@@\n");
965 ite 1.89 dprintf(i, _("You are no longer an owner of this bot.\n"));
966 segfault 1.1 }
967     if ((stat & STAT_PARTY) && (u->flags & USER_OP))
968     stat &= ~STAT_PARTY;
969     if (!(stat & STAT_PARTY) && !(u->flags & USER_OP) &&
970     !(u->flags & USER_MASTER))
971     stat |= STAT_PARTY;
972     if ((stat & STAT_CHAT) && !(u->flags & USER_PARTY) &&
973 guppy 1.81 !(u->flags & USER_MASTER))
974 segfault 1.1 stat &= ~STAT_CHAT;
975     if ((dcc[i].type->flags & DCT_FILES) && !(stat & STAT_CHAT) &&
976 guppy 1.81 ((u->flags & USER_MASTER) || (u->flags & USER_PARTY)))
977 segfault 1.1 stat |= STAT_CHAT;
978     dcc[i].status = stat;
979 fabian 1.22 /* Check if they no longer have access to wherever they are.
980 guppy 1.49 *
981 fabian 1.22 * NOTE: DON'T kick someone off the party line just cuz they lost +p
982     * (pinvite script removes +p after 5 mins automatically)
983     */
984 segfault 1.1 if ((dcc[i].type->flags & DCT_FILES) && !(u->flags & USER_XFER) &&
985     !(u->flags & USER_MASTER)) {
986     dprintf(i, "-+- POOF! -+-\n");
987 ite 1.89 dprintf(i, _("You no longer have file area access.\n\n"));
988     putlog(LOG_MISC, "*", _("DCC user [%s]%s removed from file system"),
989 segfault 1.1 dcc[i].nick, dcc[i].host);
990     if (dcc[i].status & STAT_CHAT) {
991     struct chat_info *ci;
992    
993     ci = dcc[i].u.file->chat;
994 tothwolf 1.70 free(dcc[i].u.file);
995 segfault 1.1 dcc[i].u.chat = ci;
996     dcc[i].status &= (~STAT_CHAT);
997     dcc[i].type = &DCC_CHAT;
998     if (dcc[i].u.chat->channel >= 0) {
999     chanout_but(-1, dcc[i].u.chat->channel,
1000     "*** %s has returned.\n", dcc[i].nick);
1001     }
1002     } else {
1003     killsock(dcc[i].sock);
1004 fabian 1.16 lostdcc(i);
1005 segfault 1.1 }
1006     }
1007     }
1008     }
1009     return u->flags;
1010     }
1011    
1012 stdarg 1.108 int check_dcc_chanattrs(user_t *u, char *chname, int chflags,
1013 segfault 1.1 int ochatr)
1014     {
1015     int i, found = 0, atr = u ? u->flags : 0;
1016     struct chanset_t *chan;
1017    
1018     if (!u)
1019     return 0;
1020     for (i = 0; i < dcc_total; i++) {
1021 stdarg 1.99 if (dcc[i].type && (dcc[i].type->flags & DCT_MASTER) &&
1022 tothwolf 1.74 !strcasecmp(u->handle, dcc[i].nick)) {
1023 segfault 1.1 if ((ochatr & USER_MASTER) && !(chflags & USER_MASTER)) {
1024     if (!(atr & USER_MASTER))
1025     dcc[i].u.chat->con_flags &= ~(LOG_MISC | LOG_CMDS);
1026     dprintf(i, "*** POOF! ***\n");
1027 ite 1.89 dprintf(i, _("You are no longer a master on %s.\n"), chname);
1028 segfault 1.1 }
1029     if (!(ochatr & USER_MASTER) && (chflags & USER_MASTER)) {
1030     dcc[i].u.chat->con_flags |= conmask;
1031     if (!(atr & USER_MASTER))
1032     dcc[i].u.chat->con_flags &=
1033     ~(LOG_LEV1 | LOG_LEV2 | LOG_LEV3 | LOG_LEV4 |
1034     LOG_LEV5 | LOG_LEV6 | LOG_LEV7 | LOG_LEV8 |
1035     LOG_RAW | LOG_DEBUG | LOG_WALL | LOG_FILES | LOG_SRVOUT);
1036     dprintf(i, "*** POOF! ***\n");
1037 ite 1.89 dprintf(i, _("You are now a master on %s.\n"), chname);
1038 segfault 1.1 }
1039     if (!(ochatr & USER_OWNER) && (chflags & USER_OWNER)) {
1040     dprintf(i, "@@@ POOF! @@@\n");
1041 ite 1.89 dprintf(i, _("You are now an OWNER of %s.\n"), chname);
1042 segfault 1.1 }
1043     if ((ochatr & USER_OWNER) && !(chflags & USER_OWNER)) {
1044     dprintf(i, "@@@ POOF! @@@\n");
1045 ite 1.89 dprintf(i, _("You are no longer an owner of %s.\n"), chname);
1046 segfault 1.1 }
1047     if (((ochatr & (USER_OP | USER_MASTER | USER_OWNER)) &&
1048     (!(chflags & (USER_OP | USER_MASTER | USER_OWNER)))) ||
1049     ((chflags & (USER_OP | USER_MASTER | USER_OWNER)) &&
1050     (!(ochatr & (USER_OP | USER_MASTER | USER_OWNER))))) {
1051 fabian 1.11 struct flag_record fr = {FR_CHAN, 0, 0, 0, 0, 0};
1052 segfault 1.1
1053 guppy 1.56 for (chan = chanset; chan && !found; chan = chan->next) {
1054 fabian 1.8 get_user_flagrec(u, &fr, chan->dname);
1055 segfault 1.1 if (fr.chan & (USER_OP | USER_MASTER | USER_OWNER))
1056     found = 1;
1057     }
1058     if (!chan)
1059     chan = chanset;
1060     if (chan)
1061 fabian 1.8 strcpy(dcc[i].u.chat->con_chan, chan->dname);
1062 segfault 1.1 else
1063     strcpy(dcc[i].u.chat->con_chan, "*");
1064     }
1065     }
1066     }
1067     return chflags;
1068     }
1069    
1070 stdarg 1.108 static int cmd_chattr(user_t *u, int idx, char *par)
1071 segfault 1.1 {
1072 fabian 1.6 char *hand, *arg = NULL, *tmpchg = NULL, *chg = NULL, work[1024];
1073 segfault 1.1 struct chanset_t *chan = NULL;
1074 stdarg 1.108 user_t *u2;
1075 fabian 1.2 struct flag_record pls = {0, 0, 0, 0, 0, 0},
1076     mns = {0, 0, 0, 0, 0, 0},
1077     user = {0, 0, 0, 0, 0, 0};
1078 segfault 1.1 module_entry *me;
1079     int fl = -1, of = 0, ocf = 0;
1080    
1081     if (!par[0]) {
1082     dprintf(idx, "Usage: chattr <handle> [changes] [channel]\n");
1083 stdarg 1.103 return(0);
1084 segfault 1.1 }
1085     hand = newsplit(&par);
1086     u2 = get_user_by_handle(userlist, hand);
1087 fabian 1.6 if (!u2) {
1088 ite 1.89 dprintf(idx, _("No such user!\n"));
1089 stdarg 1.103 return(0);
1090 segfault 1.1 }
1091 fabian 1.6
1092     /* Parse args */
1093     if (par[0]) {
1094 fabian 1.8 arg = newsplit(&par);
1095 fabian 1.6 if (par[0]) {
1096     /* .chattr <handle> <changes> <channel> */
1097     chg = arg;
1098 fabian 1.8 arg = newsplit(&par);
1099     chan = findchan_by_dname(arg);
1100 fabian 1.6 } else {
1101 fabian 1.8 chan = findchan_by_dname(arg);
1102 fabian 1.22 /* Consider modeless channels, starting with '+' */
1103 fabian 1.6 if (!(arg[0] == '+' && chan) &&
1104     !(arg[0] != '+' && strchr (CHANMETA, arg[0]))) {
1105     /* .chattr <handle> <changes> */
1106     chg = arg;
1107     chan = NULL; /* uh, !strchr (CHANMETA, channel[0]) && channel found?? */
1108     arg = NULL;
1109     }
1110     /* .chattr <handle> <channel>: nothing to do... */
1111     }
1112     }
1113     /* arg: pointer to channel name, NULL if none specified
1114     * chan: pointer to channel structure, NULL if none found or none specified
1115     * chg: pointer to changes, NULL if none specified
1116     */
1117 tothwolf 1.72 assert(!(!arg && chan));
1118 fabian 1.6 if (arg && !chan) {
1119 ite 1.89 dprintf(idx, _("No channel record for %s.\n"), arg);
1120 stdarg 1.103 return(0);
1121 segfault 1.1 }
1122 fabian 1.6 if (chg) {
1123     if (!arg && strpbrk(chg, "&|")) {
1124     /* .chattr <handle> *[&|]*: use console channel if found... */
1125     if (!strcmp ((arg = dcc[idx].u.chat->con_chan), "*"))
1126     arg = NULL;
1127     else
1128 fabian 1.8 chan = findchan_by_dname(arg);
1129 fabian 1.6 if (arg && !chan) {
1130 ite 1.89 dprintf (idx, _("Invalid console channel %s.\n"), arg);
1131 stdarg 1.103 return(0);
1132 fabian 1.6 }
1133     } else if (arg && !strpbrk(chg, "&|")) {
1134 tothwolf 1.70 tmpchg = malloc(strlen(chg) + 2);
1135 fabian 1.11 strcpy(tmpchg, "|");
1136     strcat(tmpchg, chg);
1137 fabian 1.6 chg = tmpchg;
1138 segfault 1.1 }
1139     }
1140 fabian 1.6 par = arg;
1141 segfault 1.1 user.match = FR_GLOBAL;
1142     if (chan)
1143     user.match |= FR_CHAN;
1144 fabian 1.8 get_user_flagrec(u, &user, chan ? chan->dname : 0);
1145 segfault 1.1 if (!chan && !glob_botmast(user)) {
1146 ite 1.89 dprintf(idx, _("You do not have Bot Master privileges.\n"));
1147 fabian 1.6 if (tmpchg)
1148 tothwolf 1.70 free(tmpchg);
1149 stdarg 1.103 return(0);
1150 segfault 1.1 }
1151     if (chan && !glob_master(user) && !chan_master(user)) {
1152 ite 1.89 dprintf(idx,
1153 wcc 1.92 _("You do not have channel master privileges for channel %s.\n"),
1154 segfault 1.1 par);
1155 fabian 1.6 if (tmpchg)
1156 tothwolf 1.70 free(tmpchg);
1157 stdarg 1.103 return(0);
1158 segfault 1.1 }
1159     user.match &= fl;
1160     if (chg) {
1161     pls.match = user.match;
1162     break_down_flags(chg, &pls, &mns);
1163 fabian 1.22 /* No-one can change these flags on-the-fly */
1164 segfault 1.1 if (!glob_owner(user)) {
1165 wcc 1.115 pls.global &= ~(USER_OWNER | USER_MASTER | USER_BOTMAST);
1166     mns.global &= ~(USER_OWNER | USER_MASTER | USER_BOTMAST);
1167 segfault 1.1
1168     if (chan) {
1169     pls.chan &= ~USER_OWNER;
1170     mns.chan &= ~USER_OWNER;
1171     }
1172     if (!glob_master(user)) {
1173 fabian 1.6 pls.global &= USER_PARTY | USER_XFER;
1174     mns.global &= USER_PARTY | USER_XFER;
1175 segfault 1.1
1176     if (!glob_botmast(user)) {
1177     pls.global = 0;
1178     mns.global = 0;
1179     }
1180     }
1181     }
1182     if (chan && !chan_owner(user) && !glob_owner(user)) {
1183     pls.chan &= ~USER_MASTER;
1184     mns.chan &= ~USER_MASTER;
1185     if (!chan_master(user) && !glob_master(user)) {
1186     pls.chan = 0;
1187     mns.chan = 0;
1188     }
1189     }
1190     get_user_flagrec(u2, &user, par);
1191     if (user.match & FR_GLOBAL) {
1192     of = user.global;
1193     user.global = sanity_check((user.global |pls.global) &~mns.global);
1194    
1195     user.udef_global = (user.udef_global | pls.udef_global)
1196     & ~mns.udef_global;
1197     }
1198     if (chan) {
1199     ocf = user.chan;
1200     user.chan = chan_sanity_check((user.chan | pls.chan) & ~mns.chan,
1201     user.global);
1202    
1203     user.udef_chan = (user.udef_chan | pls.udef_chan) & ~mns.udef_chan;
1204     }
1205     set_user_flagrec(u2, &user, par);
1206     }
1207 fabian 1.22 /* Get current flags and display them */
1208 segfault 1.1 if (user.match & FR_GLOBAL) {
1209     user.match = FR_GLOBAL;
1210     if (chg)
1211     check_dcc_attrs(u2, of);
1212     get_user_flagrec(u2, &user, NULL);
1213     build_flags(work, &user, NULL);
1214     if (work[0] != '-')
1215 wcc 1.92 dprintf(idx, _("Global flags for %1$s are now +%2$s.\n"), hand, work);
1216 segfault 1.1 else
1217 ite 1.89 dprintf(idx, _("No global flags for %s.\n"), hand);
1218 segfault 1.1 }
1219     if (chan) {
1220     user.match = FR_CHAN;
1221     get_user_flagrec(u2, &user, par);
1222     if (chg)
1223 fabian 1.8 check_dcc_chanattrs(u2, chan->dname, user.chan, ocf);
1224 segfault 1.1 build_flags(work, &user, NULL);
1225     if (work[0] != '-')
1226 wcc 1.92 dprintf(idx, _("Channel flags for %1$s on %2$s are now +%3$s.\n"), hand,
1227 fabian 1.8 chan->dname, work);
1228 segfault 1.1 else
1229 ite 1.89 dprintf(idx, _("No flags for %1$s on %2$s.\n"), hand, chan->dname);
1230 ite 1.79 }
1231     if (chg && (me = module_find("irc", 0, 0))) {
1232     Function *func = me->funcs;
1233    
1234 guppy 1.82 (func[IRC_CHECK_THIS_USER]) (hand, 0, NULL);
1235 segfault 1.1 }
1236 fabian 1.6 if (tmpchg)
1237 tothwolf 1.70 free(tmpchg);
1238 stdarg 1.103 return(1);
1239 segfault 1.1 }
1240    
1241 stdarg 1.108 static int cmd_botattr(user_t *u, int idx, char *par)
1242 segfault 1.1 {
1243 fabian 1.6 char *hand, *chg = NULL, *arg = NULL, *tmpchg = NULL, work[1024];
1244 segfault 1.1 struct chanset_t *chan = NULL;
1245 stdarg 1.108 user_t *u2;
1246 fabian 1.8 struct flag_record pls = {0, 0, 0, 0, 0, 0},
1247     mns = {0, 0, 0, 0, 0, 0},
1248     user = {0, 0, 0, 0, 0, 0};
1249 segfault 1.1 int idx2;
1250    
1251     if (!par[0]) {
1252     dprintf(idx, "Usage: botattr <handle> [changes] [channel]\n");
1253 stdarg 1.103 return(0);
1254 segfault 1.1 }
1255     hand = newsplit(&par);
1256     u2 = get_user_by_handle(userlist, hand);
1257 fabian 1.6 if (!u2 || !(u2->flags & USER_BOT)) {
1258 ite 1.89 dprintf(idx, _("No such bot!\n"));
1259 stdarg 1.103 return(0);
1260 segfault 1.1 }
1261     for (idx2 = 0; idx2 < dcc_total; idx2++)
1262 stdarg 1.107 if (dcc[idx2].type && !strcasecmp(dcc[idx2].nick, hand))
1263 segfault 1.1 break;
1264     if (idx2 != dcc_total) {
1265 ite 1.89 dprintf(idx,
1266     _("You may not change the attributes of a directly linked bot.\n"));
1267 stdarg 1.103 return(0);
1268 segfault 1.1 }
1269 fabian 1.6 /* Parse args */
1270     if (par[0]) {
1271 fabian 1.10 arg = newsplit(&par);
1272 fabian 1.6 if (par[0]) {
1273     /* .botattr <handle> <changes> <channel> */
1274     chg = arg;
1275 fabian 1.10 arg = newsplit(&par);
1276 fabian 1.8 chan = findchan_by_dname(arg);
1277 fabian 1.6 } else {
1278 fabian 1.8 chan = findchan_by_dname(arg);
1279 fabian 1.22 /* Consider modeless channels, starting with '+' */
1280 fabian 1.6 if (!(arg[0] == '+' && chan) &&
1281     !(arg[0] != '+' && strchr (CHANMETA, arg[0]))) {
1282     /* .botattr <handle> <changes> */
1283     chg = arg;
1284     chan = NULL; /* uh, !strchr (CHANMETA, channel[0]) && channel found?? */
1285     arg = NULL;
1286     }
1287     /* .botattr <handle> <channel>: nothing to do... */
1288     }
1289     }
1290     /* arg: pointer to channel name, NULL if none specified
1291     * chan: pointer to channel structure, NULL if none found or none specified
1292     * chg: pointer to changes, NULL if none specified
1293     */
1294 tothwolf 1.72 assert(!(!arg && chan));
1295 fabian 1.6 if (arg && !chan) {
1296 ite 1.89 dprintf(idx, _("No channel record for %s.\n"), arg);
1297 stdarg 1.103 return(0);
1298 segfault 1.1 }
1299 fabian 1.6 if (chg) {
1300     if (!arg && strpbrk(chg, "&|")) {
1301     /* botattr <handle> *[&|]*: use console channel if found... */
1302     if (!strcmp ((arg = dcc[idx].u.chat->con_chan), "*"))
1303     arg = NULL;
1304     else
1305 fabian 1.8 chan = findchan_by_dname(arg);
1306 fabian 1.6 if (arg && !chan) {
1307 ite 1.89 dprintf (idx, _("Invalid console channel %s.\n"), arg);
1308 stdarg 1.103 return(0);
1309 fabian 1.6 }
1310     } else if (arg && !strpbrk(chg, "&|")) {
1311 tothwolf 1.70 tmpchg = malloc(strlen(chg) + 2);
1312     strcpy(tmpchg, "|");
1313     strcat(tmpchg, chg);
1314 fabian 1.6 chg = tmpchg;
1315     }
1316 segfault 1.1 }
1317 fabian 1.6 par = arg;
1318 guppy 1.49
1319 segfault 1.1 user.match = FR_GLOBAL;
1320 fabian 1.8 get_user_flagrec(u, &user, chan ? chan->dname : 0);
1321 segfault 1.1 if (!glob_botmast(user)) {
1322 ite 1.89 dprintf(idx, _("You do not have Bot Master privileges.\n"));
1323 fabian 1.6 if (tmpchg)
1324 tothwolf 1.70 free(tmpchg);
1325 stdarg 1.103 return(0);
1326 segfault 1.1 }
1327     if (chg) {
1328     user.match = FR_BOT | (chan ? FR_CHAN : 0);
1329     pls.match = user.match;
1330     break_down_flags(chg, &pls, &mns);
1331 wcc 1.115 pls.chan = 0;
1332     mns.chan = 0;
1333 segfault 1.1 user.match = FR_BOT | (chan ? FR_CHAN : 0);
1334     get_user_flagrec(u2, &user, par);
1335     user.bot = (user.bot | pls.bot) & ~mns.bot;
1336     if (chan)
1337     user.chan = (user.chan | pls.chan) & ~mns.chan;
1338     set_user_flagrec(u2, &user, par);
1339     }
1340     /* get current flags and display them */
1341     if (!chan || pls.bot || mns.bot) {
1342     user.match = FR_BOT;
1343     get_user_flagrec(u2, &user, NULL);
1344     build_flags(work, &user, NULL);
1345     if (work[0] != '-')
1346 wcc 1.92 dprintf(idx, _("Bot flags for %1$s are now +%2$s.\n"), hand, work);
1347 segfault 1.1 else
1348 ite 1.89 dprintf(idx, _("No bot flags for %s.\n"), hand);
1349 segfault 1.1 }
1350     if (chan) {
1351     user.match = FR_CHAN;
1352     get_user_flagrec(u2, &user, par);
1353     build_flags(work, &user, NULL);
1354     if (work[0] != '-')
1355 wcc 1.92 dprintf(idx, _("Bot flags for %1$s on %2$s are now +%3$s.\n"), hand,
1356 fabian 1.8 chan->dname, work);
1357 segfault 1.1 else
1358 ite 1.89 dprintf(idx, _("No bot flags for %1$s on %2$s.\n"), hand, chan->dname);
1359 segfault 1.1 }
1360 fabian 1.6 if (tmpchg)
1361 tothwolf 1.70 free(tmpchg);
1362 stdarg 1.103 return(1);
1363 segfault 1.1 }
1364    
1365 stdarg 1.108 static int cmd_su(user_t *u, int idx, char *par)
1366 segfault 1.1 {
1367     int atr = u ? u->flags : 0;
1368 fabian 1.4 struct flag_record fr = {FR_ANYWH | FR_CHAN | FR_GLOBAL, 0, 0, 0, 0, 0};
1369 segfault 1.1
1370     u = get_user_by_handle(userlist, par);
1371    
1372     if (!par[0])
1373     dprintf(idx, "Usage: su <user>\n");
1374     else if (!u)
1375 ite 1.89 dprintf(idx, _("No such user.\n"));
1376 segfault 1.1 else if (u->flags & USER_BOT)
1377 ite 1.89 dprintf(idx, _("Can't su to a bot... then again, why would you wanna?\n"));
1378 segfault 1.1 else if (dcc[idx].u.chat->su_nick)
1379 ite 1.89 dprintf(idx, _("You cannot currently double .su, try .su'ing directly\n"));
1380 segfault 1.1 else {
1381     get_user_flagrec(u, &fr, NULL);
1382 guppy 1.81 if (!glob_party(fr) && !(atr & USER_BOTMAST))
1383 ite 1.89 dprintf(idx, _("No party line access permitted for %s.\n"), par);
1384 segfault 1.1 else {
1385     correct_handle(par);
1386     if (!(atr & USER_OWNER) ||
1387 fabian 1.31 ((u->flags & USER_OWNER) && (isowner(par)) &&
1388     !(isowner(dcc[idx].nick)))) {
1389 fabian 1.4 /* This check is only important for non-owners */
1390     if (u_pass_match(u, "-")) {
1391 ite 1.89 dprintf(idx,
1392 wcc 1.92 _("No password set for user. You may not .su to them.\n"));
1393 stdarg 1.103 return(0);
1394 fabian 1.4 }
1395 segfault 1.1 chanout_but(-1, dcc[idx].u.chat->channel,
1396     "*** %s left the party line.\n", dcc[idx].nick);
1397 fabian 1.22 /* Store the old nick in the away section, for weenies who can't get
1398     * their password right ;)
1399     */
1400 segfault 1.1 if (dcc[idx].u.chat->away != NULL)
1401 tothwolf 1.70 free(dcc[idx].u.chat->away);
1402 tothwolf 1.71 dcc[idx].u.chat->away = calloc(1, strlen(dcc[idx].nick) + 1);
1403 segfault 1.1 strcpy(dcc[idx].u.chat->away, dcc[idx].nick);
1404 tothwolf 1.71 dcc[idx].u.chat->su_nick = calloc(1, strlen(dcc[idx].nick) + 1);
1405 segfault 1.1 strcpy(dcc[idx].u.chat->su_nick, dcc[idx].nick);
1406     dcc[idx].user = u;
1407     strcpy(dcc[idx].nick, par);
1408 fabian 1.33 /* Display password prompt and turn off echo (send IAC WILL ECHO). */
1409 segfault 1.1 dprintf(idx, "Enter password for %s%s\n", par,
1410 fabian 1.33 (dcc[idx].status & STAT_TELNET) ? TLN_IAC_C TLN_WILL_C
1411     TLN_ECHO_C : "");
1412 segfault 1.1 dcc[idx].type = &DCC_CHAT_PASS;
1413     } else if (atr & USER_OWNER) {
1414     chanout_but(-1, dcc[idx].u.chat->channel,
1415     "*** %s left the party line.\n", dcc[idx].nick);
1416 ite 1.89 dprintf(idx, _("Setting your username to %s.\n"), par);
1417 segfault 1.1 if (atr & USER_MASTER)
1418     dcc[idx].u.chat->con_flags = conmask;
1419 tothwolf 1.71 dcc[idx].u.chat->su_nick = calloc(1, strlen(dcc[idx].nick) + 1);
1420 segfault 1.1 strcpy(dcc[idx].u.chat->su_nick, dcc[idx].nick);
1421     dcc[idx].user = u;
1422     strcpy(dcc[idx].nick, par);
1423     dcc_chatter(idx);
1424     }
1425     }
1426     }
1427 stdarg 1.103 return(1);
1428 segfault 1.1 }
1429    
1430 stdarg 1.108 static int cmd_fixcodes(user_t *u, int idx, char *par)
1431 segfault 1.1 {
1432     if (dcc[idx].status & STAT_ECHO) {
1433     dcc[idx].status |= STAT_TELNET;
1434     dcc[idx].status &= ~STAT_ECHO;
1435 ite 1.89 dprintf(idx, _("Turned on telnet codes\n"));
1436 segfault 1.1 putlog(LOG_CMDS, "*", "#%s# fixcodes (telnet on)", dcc[idx].nick);
1437 stdarg 1.103 return(0);
1438 segfault 1.1 }
1439     if (dcc[idx].status & STAT_TELNET) {
1440     dcc[idx].status |= STAT_ECHO;
1441     dcc[idx].status &= ~STAT_TELNET;
1442 ite 1.89 dprintf(idx, _("Turned off telnet codes\n"));
1443 segfault 1.1 putlog(LOG_CMDS, "*", "#%s# fixcodes (telnet off)", dcc[idx].nick);
1444 stdarg 1.103 return(0);
1445 segfault 1.1 }
1446 stdarg 1.103 return(1);
1447 segfault 1.1 }
1448    
1449 stdarg 1.108 static int cmd_page(user_t *u, int idx, char *par)
1450 segfault 1.1 {
1451     int a;
1452 fabian 1.2 module_entry *me;
1453 segfault 1.1
1454     if (!par[0]) {
1455     if (dcc[idx].status & STAT_PAGE) {
1456 ite 1.89 dprintf(idx, _("Currently paging outputs to %d lines.\n"),
1457 segfault 1.1 dcc[idx].u.chat->max_line);
1458     } else
1459 ite 1.89 dprintf(idx, _("You don't have paging on.\n"));
1460 stdarg 1.103 return(0);
1461 segfault 1.1 }
1462     a = atoi(par);
1463 tothwolf 1.74 if ((!a && !par[0]) || !strcasecmp(par, "off")) {
1464 segfault 1.1 dcc[idx].status &= ~STAT_PAGE;
1465     dcc[idx].u.chat->max_line = 0x7ffffff; /* flush_lines needs this */
1466     while (dcc[idx].u.chat->buffer)
1467     flush_lines(idx, dcc[idx].u.chat);
1468 ite 1.89 dprintf(idx, _("Paging turned off.\n"));
1469 segfault 1.1 putlog(LOG_CMDS, "*", "#%s# page off", dcc[idx].nick);
1470 fabian 1.2 } else if (a > 0) {
1471 ite 1.98 dprintf(idx, P_("Paging turned on, stopping every %d line.\n",
1472     "Paging turned on, stopping every %d lines.\n", a), a);
1473 segfault 1.1 dcc[idx].status |= STAT_PAGE;
1474     dcc[idx].u.chat->max_line = a;
1475     dcc[idx].u.chat->line_count = 0;
1476     dcc[idx].u.chat->current_lines = 0;
1477     putlog(LOG_CMDS, "*", "#%s# page %d", dcc[idx].nick, a);
1478 fabian 1.2 } else {
1479     dprintf(idx, "Usage: page <off or #>\n");
1480 stdarg 1.103 return(0);
1481 fabian 1.2 }
1482 fabian 1.22 /* New style autosave here too -- rtc, 09/28/1999*/
1483 fabian 1.2 if ((me = module_find("console", 1, 1))) {
1484     Function *func = me->funcs;
1485     (func[CONSOLE_DOSTORE]) (idx);
1486 segfault 1.1 }
1487 stdarg 1.103 return(1);
1488 segfault 1.1 }
1489    
1490 stdarg 1.108 static int cmd_module(user_t *u, int idx, char *par)
1491 segfault 1.1 {
1492     do_module_report(idx, 2, par[0] ? par : NULL);
1493 stdarg 1.103 return(1);
1494 segfault 1.1 }
1495    
1496 stdarg 1.108 static int cmd_loadmod(user_t *u, int idx, char *par)
1497 segfault 1.1 {
1498     const char *p;
1499    
1500 guppy 1.80 if (!isowner(dcc[idx].nick)) {
1501 ite 1.63 dprintf(idx, _("What? You need .help\n"));
1502 stdarg 1.103 return(0);
1503 segfault 1.1 }
1504     if (!par[0]) {
1505 ite 1.63 dprintf(idx, "%s: loadmod <module>\n", _("Usage"));
1506 segfault 1.1 } else {
1507     p = module_load(par);
1508     if (p)
1509 ite 1.63 dprintf(idx, "%s: %s %s\n", par, _("Error loading module:"), p);
1510 segfault 1.1 else {
1511 ite 1.63 dprintf(idx, _("Module loaded: %-16s"), par);
1512 fabian 1.28 dprintf(idx, "\n");
1513 segfault 1.1 }
1514     }
1515 stdarg 1.103 return(1);
1516 segfault 1.1 }
1517    
1518 stdarg 1.108 static int cmd_unloadmod(user_t *u, int idx, char *par)
1519 segfault 1.1 {
1520     char *p;
1521    
1522 guppy 1.80 if (!isowner(dcc[idx].nick)) {
1523 ite 1.63 dprintf(idx, _("What? You need .help\n"));
1524 stdarg 1.103 return(0);
1525 segfault 1.1 }
1526     if (!par[0]) {
1527 ite 1.63 dprintf(idx, "%s: unloadmod <module>\n", _("Usage"));
1528 segfault 1.1 } else {
1529     p = module_unload(par, dcc[idx].nick);
1530     if (p)
1531 ite 1.63 dprintf(idx, "%s %s: %s\n", _("Error unloading module:"), par, p);
1532 segfault 1.1 else {
1533 ite 1.63 dprintf(idx, "%s %s\n", _("Module unloaded:"), par);
1534 segfault 1.1 }
1535     }
1536 stdarg 1.103 return(1);
1537 segfault 1.1 }
1538    
1539 stdarg 1.108 static int cmd_pls_ignore(user_t *u, int idx, char *par)
1540 segfault 1.1 {
1541 fabian 1.38 char *who;
1542     char s[UHOSTLEN];
1543     unsigned long int expire_time = 0;
1544 segfault 1.1
1545     if (!par[0]) {
1546 fabian 1.38 dprintf(idx,
1547 guppy 1.55 "Usage: +ignore <hostmask> [%%<XdXhXm>] [comment]\n");
1548 stdarg 1.103 return(0);
1549 segfault 1.1 }
1550 fabian 1.38
1551 segfault 1.1 who = newsplit(&par);
1552 fabian 1.38 if (par[0] == '%') {
1553     char *p, *p_expire;
1554     unsigned long int expire_foo;
1555    
1556     p = newsplit(&par);
1557     p_expire = p + 1;
1558     while (*(++p) != 0) {
1559     switch (tolower(*p)) {
1560     case 'd':
1561     *p = 0;
1562     expire_foo = strtol(p_expire, NULL, 10);
1563     if (expire_foo > 365)
1564     expire_foo = 365;
1565     expire_time += 86400 * expire_foo;
1566     p_expire = p + 1;
1567     break;
1568     case 'h':
1569     *p = 0;
1570     expire_foo = strtol(p_expire, NULL, 10);
1571     if (expire_foo > 8760)
1572     expire_foo = 8760;
1573     expire_time += 3600 * expire_foo;
1574     p_expire = p + 1;
1575     break;
1576     case 'm':
1577     *p = 0;
1578     expire_foo = strtol(p_expire, NULL, 10);
1579     if (expire_foo > 525600)
1580     expire_foo = 525600;
1581     expire_time += 60 * expire_foo;
1582     p_expire = p + 1;
1583     }
1584     }
1585     }
1586 segfault 1.1 if (!par[0])
1587     par = "requested";
1588     else if (strlen(par) > 65)
1589     par[65] = 0;
1590 fabian 1.6 if (strlen(who) > UHOSTMAX - 4)
1591     who[UHOSTMAX - 4] = 0;
1592 fabian 1.38
1593     /* Fix missing ! or @ BEFORE continuing */
1594 segfault 1.1 if (!strchr(who, '!')) {
1595     if (!strchr(who, '@'))
1596     simple_sprintf(s, "%s!*@*", who);
1597     else
1598     simple_sprintf(s, "*!%s", who);
1599     } else if (!strchr(who, '@'))
1600     simple_sprintf(s, "%s@*", who);
1601     else
1602     strcpy(s, who);
1603 fabian 1.38
1604     if (match_ignore(s))
1605 ite 1.89 dprintf(idx, _("That already matches an existing ignore.\n"));
1606 fabian 1.38 else {
1607     dprintf(idx, "Now ignoring: %s (%s)\n", s, par);
1608     addignore(s, dcc[idx].nick, par, expire_time ? now + expire_time : 0L);
1609 segfault 1.1 }
1610 stdarg 1.103 return(1);
1611 segfault 1.1 }
1612    
1613 stdarg 1.108 static int cmd_mns_ignore(user_t *u, int idx, char *par)
1614 segfault 1.1 {
1615 fabian 1.6 char buf[UHOSTLEN];
1616 segfault 1.1
1617     if (!par[0]) {
1618     dprintf(idx, "Usage: -ignore <hostmask | ignore #>\n");
1619 stdarg 1.103 return(0);
1620 segfault 1.1 }
1621 ite 1.97 strlcpy(buf, par, sizeof buf);
1622 segfault 1.1 if (delignore(buf)) {
1623 ite 1.89 dprintf(idx, _("No longer ignoring: %s\n"), buf);
1624 segfault 1.1 } else
1625 ite 1.89 dprintf(idx, _("That ignore cannot be found.\n"));
1626 stdarg 1.103 return(1);
1627 segfault 1.1 }
1628    
1629 stdarg 1.108 static int cmd_ignores(user_t *u, int idx, char *par)
1630 segfault 1.1 {
1631     tell_ignores(idx, par);
1632 stdarg 1.103 return(1);
1633 segfault 1.1 }
1634    
1635 stdarg 1.108 static int cmd_pls_user(user_t *u, int idx, char *par)
1636 segfault 1.1 {
1637     char *handle, *host;
1638    
1639     if (!par[0]) {
1640 ite 1.91 dprintf(idx, "Usage: +user <handle> [hostmask]\n");
1641 stdarg 1.103 return(0);
1642 segfault 1.1 }
1643     handle = newsplit(&par);