a54faab5b7ce071cac094245bfe8bb43646b0dea
[srvx.git] / src / mod-memoserv.c
1 /* mod-memoserv.c - MemoServ module for srvx
2  * Copyright 2003-2004 Martijn Smit and srvx Development Team
3  *
4  * This file is part of srvx.
5  *
6  * srvx is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with srvx; if not, write to the Free Software Foundation,
18  * Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
19  */
20
21 /* Adds new section to srvx.conf:
22  * "modules" {
23  *     "memoserv" {
24  *         "bot" "NickServ";
25  *         "message_expiry" "30d"; // age when messages are deleted; set
26  *                                 // to 0 to disable message expiration
27  *     };
28  *  };
29  *
30  * After that, to make the module active on an existing bot:
31  * /msg opserv bind nickserv * *memoserv.*
32  *
33  * If you want a dedicated MemoServ bot, make sure the service control
34  * commands are bound to OpServ:
35  * /msg opserv bind opserv service *modcmd.joiner
36  * /msg opserv bind opserv service\ add *modcmd.service\ add
37  * /msg opserv bind opserv service\ rename *modcmd.service\ rename
38  * /msg opserv bind opserv service\ trigger *modcmd.service\ trigger
39  * /msg opserv bind opserv service\ remove *modcmd.service\ remove
40  * Add the bot:
41  * /msg opserv service add MemoServ User-to-user Memorandum Service
42  * /msg opserv bind memoserv help *modcmd.help
43  * Restart srvx with the updated conf file (as above, butwith "bot"
44  * "MemoServ"), and bind the commands to it:
45  * /msg opserv bind memoserv * *memoserv.*
46  * /msg opserv bind memoserv set *modcmd.joiner
47  */
48
49 #include "chanserv.h"
50 #include "conf.h"
51 #include "modcmd.h"
52 #include "saxdb.h"
53 #include "timeq.h"
54
55 #define KEY_SENT "sent"
56 #define KEY_RECIPIENT "to"
57 #define KEY_FROM "from"
58 #define KEY_MESSAGE "msg"
59 #undef KEY_READ /* thanks microsoft! */
60 #define KEY_READ "read"
61
62 static const struct message_entry msgtab[] = {
63     { "MSMSG_CANNOT_SEND", "You cannot send to account $b%s$b." },
64     { "MSMSG_MEMO_SENT", "Message sent to $b%s$b." },
65     { "MSMSG_NO_MESSAGES", "You have no messages." },
66     { "MSMSG_MEMOS_FOUND", "Found $b%d$b matches.\nUse /msg $S READ <ID> to read a message." },
67     { "MSMSG_CLEAN_INBOX", "You have $b%d$b or more messages, please clean out your inbox.\nUse /msg $S READ <ID> to read a message." },
68     { "MSMSG_LIST_HEAD", "$bID$b   $bFrom$b       $bTime Sent$b" },
69     { "MSMSG_LIST_FORMAT", "%-2u     %s           %s" },
70     { "MSMSG_MEMO_HEAD", "Memo %u From $b%s$b, received on %s:" },
71     { "MSMSG_BAD_MESSAGE_ID", "$b%s$b is not a valid message ID (it should be a number between 0 and %u)." },
72     { "MSMSG_NO_SUCH_MEMO", "You have no memo with that ID." },
73     { "MSMSG_MEMO_DELETED", "Memo $b%d$b deleted." },
74     { "MSMSG_EXPIRY_OFF", "I am currently not expiring messages. (turned off)" },
75     { "MSMSG_EXPIRY", "Messages will be expired when they are %s old (%d seconds)." },
76     { "MSMSG_MESSAGES_EXPIRED", "$b%lu$b message(s) expired." },
77     { "MSMSG_MEMOS_INBOX", "You have $b%d$b new message(s) in your inbox and %d old messages.  Use /msg $S LIST to list them." },
78     { "MSMSG_NEW_MESSAGE", "You have a new message from $b%s$b." },
79     { "MSMSG_DELETED_ALL", "Deleted all of your messages." },
80     { "MSMSG_USE_CONFIRM", "Please use /msg $S DELETE * $bCONFIRM$b to delete $uall$u of your messages." },
81     { "MSMSG_STATUS_TOTAL", "I have $b%u$b memos in my database." },
82     { "MSMSG_STATUS_EXPIRED", "$b%ld$b memos expired during the time I am awake." },
83     { "MSMSG_STATUS_SENT", "$b%ld$b memos have been sent." },
84     { "MSMSG_SET_NOTIFY",     "$bNotify:       $b %s" },
85     { "MSMSG_SET_AUTHNOTIFY", "$bAuthNotify:   $b %s" },
86     { "MSMSG_SET_PRIVATE",    "$bPrivate:      $b %s" },
87     { NULL, NULL }
88 };
89
90 struct memo {
91     struct memo_account *recipient;
92     struct memo_account *sender;
93     char *message;
94     unsigned long sent;
95     unsigned int is_read : 1;
96 };
97
98 DECLARE_LIST(memoList, struct memo*);
99 DEFINE_LIST(memoList, struct memo*);
100
101 /* memo_account.flags fields */
102 #define MEMO_NOTIFY_NEW   1
103 #define MEMO_NOTIFY_LOGIN 2
104 #define MEMO_DENY_NONCHANNEL 4
105
106 struct memo_account {
107     struct handle_info *handle;
108     unsigned int flags;
109     struct memoList sent;
110     struct memoList recvd;
111 };
112
113 static struct {
114     struct userNode *bot;
115     unsigned long message_expiry;
116 } memoserv_conf;
117
118 const char *memoserv_module_deps[] = { NULL };
119 static struct module *memoserv_module;
120 static struct log_type *MS_LOG;
121 static unsigned long memosSent, memosExpired;
122 static struct dict *memos; /* memo_account->handle->handle -> memo_account */
123
124 static struct memo_account *
125 memoserv_get_account(struct handle_info *hi)
126 {
127     struct memo_account *ma;
128     if (!hi)
129         return NULL;
130     ma = dict_find(memos, hi->handle, NULL);
131     if (ma)
132         return ma;
133     ma = calloc(1, sizeof(*ma));
134     if (!ma)
135         return ma;
136     ma->handle = hi;
137     ma->flags = MEMO_NOTIFY_NEW | MEMO_NOTIFY_LOGIN;
138     dict_insert(memos, ma->handle->handle, ma);
139     return ma;
140 }
141
142 static void
143 delete_memo(struct memo *memo)
144 {
145     memoList_remove(&memo->recipient->recvd, memo);
146     memoList_remove(&memo->sender->sent, memo);
147     free(memo->message);
148     free(memo);
149 }
150
151 static void
152 delete_memo_account(void *data)
153 {
154     struct memo_account *ma = data;
155
156     while (ma->recvd.used)
157         delete_memo(ma->recvd.list[0]);
158     while (ma->sent.used)
159         delete_memo(ma->sent.list[0]);
160     memoList_clean(&ma->recvd);
161     memoList_clean(&ma->sent);
162     free(ma);
163 }
164
165 void
166 do_expire(void)
167 {
168     dict_iterator_t it;
169     for (it = dict_first(memos); it; it = iter_next(it)) {
170         struct memo_account *acct = iter_data(it);
171         unsigned int ii;
172         for (ii = 0; ii < acct->sent.used; ++ii) {
173             struct memo *memo = acct->sent.list[ii];
174             if ((now - memo->sent) > memoserv_conf.message_expiry) {
175                 delete_memo(memo);
176                 memosExpired++;
177                 ii--;
178             }
179         }
180     }
181 }
182
183 static void
184 expire_memos(UNUSED_ARG(void *data))
185 {
186     if (memoserv_conf.message_expiry) {
187         do_expire();
188         timeq_add(now + memoserv_conf.message_expiry, expire_memos, NULL);
189     }
190 }
191
192 static struct memo*
193 add_memo(unsigned long sent, struct memo_account *recipient, struct memo_account *sender, char *message)
194 {
195     struct memo *memo;
196
197     memo = calloc(1, sizeof(*memo));
198     if (!memo)
199         return NULL;
200
201     memo->recipient = recipient;
202     memoList_append(&recipient->recvd, memo);
203     memo->sender = sender;
204     memoList_append(&sender->sent, memo);
205     memo->sent = sent;
206     memo->message = strdup(message);
207     memosSent++;
208     return memo;
209 }
210
211 static int
212 memoserv_can_send(struct userNode *bot, struct userNode *user, struct memo_account *acct)
213 {
214     extern struct userData *_GetChannelUser(struct chanData *channel, struct handle_info *handle, int override, int allow_suspended);
215     struct userData *dest;
216
217     if (!user->handle_info)
218         return 0;
219     if (!(acct->flags & MEMO_DENY_NONCHANNEL))
220         return 1;
221     for (dest = acct->handle->channels; dest; dest = dest->u_next)
222         if (_GetChannelUser(dest->channel, user->handle_info, 1, 0))
223             return 1;
224     send_message(user, bot, "MSMSG_CANNOT_SEND", acct->handle->handle);
225     return 0;
226 }
227
228 static struct memo *find_memo(struct userNode *user, struct svccmd *cmd, struct memo_account *ma, const char *msgid, unsigned int *id)
229 {
230     unsigned int memoid;
231     if (!isdigit(msgid[0])) {
232         if (ma->recvd.used)
233             reply("MSMSG_BAD_MESSAGE_ID", msgid, ma->recvd.used - 1);
234         else
235             reply("MSMSG_NO_MESSAGES");
236         return NULL;
237     }
238     memoid = atoi(msgid);
239     if (memoid >= ma->recvd.used) {
240         reply("MSMSG_NO_SUCH_MEMO");
241         return NULL;
242     }
243     return ma->recvd.list[*id = memoid];
244 }
245
246 static MODCMD_FUNC(cmd_send)
247 {
248     char *message;
249     struct handle_info *hi;
250     struct memo_account *ma, *sender;
251
252     if (!(hi = modcmd_get_handle_info(user, argv[1])))
253         return 0;
254     if (!(sender = memoserv_get_account(user->handle_info))
255         || !(ma = memoserv_get_account(hi))) {
256         reply("MSG_INTERNAL_FAILURE");
257         return 0;
258     }
259     if (!(memoserv_can_send(cmd->parent->bot, user, ma)))
260         return 0;
261     message = unsplit_string(argv + 2, argc - 2, NULL);
262     add_memo(now, ma, sender, message);
263     if (ma->flags & MEMO_NOTIFY_NEW) {
264         struct userNode *other;
265         for (other = ma->handle->users; other; other = other->next_authed)
266             send_message(other, cmd->parent->bot, "MSMSG_NEW_MESSAGE", user->nick);
267     }
268     reply("MSMSG_MEMO_SENT", ma->handle->handle);
269     return 1;
270 }
271
272 static MODCMD_FUNC(cmd_list)
273 {
274     struct memo_account *ma;
275     struct memo *memo;
276     unsigned int ii;
277     char posted[24];
278     time_t feh;
279
280     if (!(ma = memoserv_get_account(user->handle_info)))
281         return 0;
282     reply("MSMSG_LIST_HEAD");
283     for (ii = 0; (ii < ma->recvd.used) && (ii < 15); ++ii) {
284         memo = ma->recvd.list[ii];
285         feh = memo->sent;
286         strftime(posted, sizeof(posted), "%I:%M %p, %m/%d/%Y", localtime(&feh));
287         reply("MSMSG_LIST_FORMAT", ii, memo->sender->handle->handle, posted);
288     }
289     if (ii == 0)
290         reply("MSG_NONE");
291     else if (ii == 15)
292         reply("MSMSG_CLEAN_INBOX", ii);
293     else
294         reply("MSMSG_MEMOS_FOUND", ii);
295     return 1;
296 }
297
298 static MODCMD_FUNC(cmd_read)
299 {
300     struct memo_account *ma;
301     unsigned int memoid;
302     struct memo *memo;
303     char posted[24];
304     time_t feh;
305
306     if (!(ma = memoserv_get_account(user->handle_info)))
307         return 0;
308     if (!(memo = find_memo(user, cmd, ma, argv[1], &memoid)))
309         return 0;
310     strftime(posted, sizeof(posted), "%I:%M %p, %m/%d/%Y", localtime(&feh));
311     reply("MSMSG_MEMO_HEAD", memoid, memo->sender->handle->handle, posted);
312     send_message_type(4, user, cmd->parent->bot, "%s", memo->message);
313     memo->is_read = 1;
314     return 1;
315 }
316
317 static MODCMD_FUNC(cmd_delete)
318 {
319     struct memo_account *ma;
320     struct memo *memo;
321     unsigned int memoid;
322
323     if (!(ma = memoserv_get_account(user->handle_info)))
324         return 0;
325     if (!irccasecmp(argv[1], "*") || !irccasecmp(argv[1], "all")) {
326         if ((argc < 3) || irccasecmp(argv[2], "confirm")) {
327             reply("MSMSG_USE_CONFIRM");
328             return 0;
329         }
330         while (ma->recvd.used)
331             delete_memo(ma->recvd.list[0]);
332         reply("MSMSG_DELETED_ALL");
333         return 1;
334     }
335
336     if (!(memo = find_memo(user, cmd, ma, argv[1], &memoid)))
337         return 0;
338     delete_memo(memo);
339     reply("MSMSG_MEMO_DELETED", memoid);
340     return 1;
341 }
342
343 static MODCMD_FUNC(cmd_expire)
344 {
345     unsigned long old_expired = memosExpired;
346     do_expire();
347     reply("MSMSG_MESSAGES_EXPIRED", memosExpired - old_expired);
348     return 1;
349 }
350
351 static MODCMD_FUNC(cmd_expiry)
352 {
353     char interval[INTERVALLEN];
354
355     if (!memoserv_conf.message_expiry) {
356         reply("MSMSG_EXPIRY_OFF");
357         return 1;
358     }
359
360     intervalString(interval, memoserv_conf.message_expiry, user->handle_info);
361     reply("MSMSG_EXPIRY", interval, memoserv_conf.message_expiry);
362     return 1;
363 }
364
365 static MODCMD_FUNC(cmd_set_notify)
366 {
367     struct memo_account *ma;
368     char *choice;
369
370     if (!(ma = memoserv_get_account(user->handle_info)))
371         return 0;
372     if (argc > 1) {
373         choice = argv[1];
374         if (enabled_string(choice)) {
375             ma->flags |= MEMO_NOTIFY_NEW;
376         } else if (disabled_string(choice)) {
377             ma->flags &= ~MEMO_NOTIFY_NEW;
378         } else {
379             reply("MSG_INVALID_BINARY", choice);
380             return 0;
381         }
382     }
383
384     choice = (ma->flags & MEMO_NOTIFY_NEW) ? "on" : "off";
385     reply("MSMSG_SET_NOTIFY", choice);
386     return 1;
387 }
388
389 static MODCMD_FUNC(cmd_set_authnotify)
390 {
391     struct memo_account *ma;
392     char *choice;
393
394     if (!(ma = memoserv_get_account(user->handle_info)))
395         return 0;
396     if (argc > 1) {
397         choice = argv[1];
398         if (enabled_string(choice)) {
399             ma->flags |= MEMO_NOTIFY_LOGIN;
400         } else if (disabled_string(choice)) {
401             ma->flags &= ~MEMO_NOTIFY_LOGIN;
402         } else {
403             reply("MSG_INVALID_BINARY", choice);
404             return 0;
405         }
406     }
407
408     choice = (ma->flags & MEMO_NOTIFY_LOGIN) ? "on" : "off";
409     reply("MSMSG_SET_AUTHNOTIFY", choice);
410     return 1;
411 }
412
413 static MODCMD_FUNC(cmd_set_private)
414 {
415     struct memo_account *ma;
416     char *choice;
417
418     if (!(ma = memoserv_get_account(user->handle_info)))
419         return 0;
420     if (argc > 1) {
421         choice = argv[1];
422         if (enabled_string(choice)) {
423             ma->flags |= MEMO_DENY_NONCHANNEL;
424         } else if (disabled_string(choice)) {
425             ma->flags &= ~MEMO_DENY_NONCHANNEL;
426         } else {
427             reply("MSG_INVALID_BINARY", choice);
428             return 0;
429         }
430     }
431
432     choice = (ma->flags & MEMO_DENY_NONCHANNEL) ? "on" : "off";
433     reply("MSMSG_SET_PRIVATE", choice);
434     return 1;
435 }
436
437 static MODCMD_FUNC(cmd_status)
438 {
439     reply("MSMSG_STATUS_TOTAL", dict_size(memos));
440     reply("MSMSG_STATUS_EXPIRED", memosExpired);
441     reply("MSMSG_STATUS_SENT", memosSent);
442     return 1;
443 }
444
445 static void
446 memoserv_conf_read(void)
447 {
448     dict_t conf_node;
449     const char *str;
450
451     str = "modules/memoserv";
452     if (!(conf_node = conf_get_data(str, RECDB_OBJECT))) {
453         log_module(MS_LOG, LOG_ERROR, "config node `%s' is missing or has wrong type.", str);
454         return;
455     }
456
457     str = database_get_data(conf_node, "message_expiry", RECDB_QSTRING);
458     memoserv_conf.message_expiry = str ? ParseInterval(str) : 60*24*30;
459 }
460
461 static int
462 memoserv_saxdb_read(struct dict *db)
463 {
464     char *str;
465     struct handle_info *sender, *recipient;
466     struct record_data *hir;
467     struct memo *memo;
468     dict_iterator_t it;
469     unsigned long sent;
470
471     for (it = dict_first(db); it; it = iter_next(it)) {
472         hir = iter_data(it);
473         if (hir->type != RECDB_OBJECT) {
474             log_module(MS_LOG, LOG_WARNING, "Unexpected rectype %d for %s.", hir->type, iter_key(it));
475             continue;
476         }
477
478         if (!(str = database_get_data(hir->d.object, KEY_SENT, RECDB_QSTRING))) {
479             log_module(MS_LOG, LOG_ERROR, "Date sent not present in memo %s; skipping", iter_key(it));
480             continue;
481         }
482         sent = strtoul(str, NULL, 0);
483
484         if (!(str = database_get_data(hir->d.object, KEY_RECIPIENT, RECDB_QSTRING))) {
485             log_module(MS_LOG, LOG_ERROR, "Recipient not present in memo %s; skipping", iter_key(it));
486             continue;
487         } else if (!(recipient = get_handle_info(str))) {
488             log_module(MS_LOG, LOG_ERROR, "Invalid recipient %s in memo %s; skipping", str, iter_key(it));
489             continue;
490         }
491
492         if (!(str = database_get_data(hir->d.object, KEY_FROM, RECDB_QSTRING))) {
493             log_module(MS_LOG, LOG_ERROR, "Sender not present in memo %s; skipping", iter_key(it));
494             continue;
495         } else if (!(sender = get_handle_info(str))) {
496             log_module(MS_LOG, LOG_ERROR, "Invalid sender %s in memo %s; skipping", str, iter_key(it));
497             continue;
498         }
499
500         if (!(str = database_get_data(hir->d.object, KEY_MESSAGE, RECDB_QSTRING))) {
501             log_module(MS_LOG, LOG_ERROR, "Message not present in memo %s; skipping", iter_key(it));
502             continue;
503         }
504
505         memo = add_memo(sent, memoserv_get_account(recipient), memoserv_get_account(sender), str);
506         if ((str = database_get_data(hir->d.object, KEY_READ, RECDB_QSTRING)))
507             memo->is_read = 1;
508     }
509     return 0;
510 }
511
512 static int
513 memoserv_saxdb_write(struct saxdb_context *ctx)
514 {
515     dict_iterator_t it;
516     struct memo_account *ma;
517     struct memo *memo;
518     char str[7];
519     unsigned int id = 0, ii;
520
521     for (it = dict_first(memos); it; it = iter_next(it)) {
522         ma = iter_data(it);
523         for (ii = 0; ii < ma->recvd.used; ++ii) {
524             memo = ma->recvd.list[ii];
525             saxdb_start_record(ctx, inttobase64(str, id++, sizeof(str)), 0);
526             saxdb_write_int(ctx, KEY_SENT, memo->sent);
527             saxdb_write_string(ctx, KEY_RECIPIENT, memo->recipient->handle->handle);
528             saxdb_write_string(ctx, KEY_FROM, memo->sender->handle->handle);
529             saxdb_write_string(ctx, KEY_MESSAGE, memo->message);
530             if (memo->is_read)
531                 saxdb_write_int(ctx, KEY_READ, 1);
532             saxdb_end_record(ctx);
533         }
534     }
535     return 0;
536 }
537
538 static void
539 memoserv_cleanup(void)
540 {
541     dict_delete(memos);
542 }
543
544 static void
545 memoserv_check_messages(struct userNode *user, UNUSED_ARG(struct handle_info *old_handle))
546 {
547     unsigned int ii, unseen;
548     struct memo_account *ma;
549     struct memo *memo;
550
551     if (!(ma = memoserv_get_account(user->handle_info))
552         || !(ma->flags & MEMO_NOTIFY_LOGIN))
553         return;
554     for (ii = unseen = 0; ii < ma->recvd.used; ++ii) {
555         memo = ma->recvd.list[ii];
556         if (!memo->is_read)
557             unseen++;
558     }
559     if (ma->recvd.used && memoserv_conf.bot)
560         send_message(user, memoserv_conf.bot, "MSMSG_MEMOS_INBOX", unseen, ma->recvd.used - unseen);
561 }
562
563 static void
564 memoserv_rename_account(struct handle_info *hi, const char *old_handle)
565 {
566     struct memo_account *ma;
567     if (!(ma = dict_find(memos, old_handle, NULL)))
568         return;
569     dict_remove2(memos, old_handle, 1);
570     dict_insert(memos, hi->handle, ma);
571 }
572
573 static void
574 memoserv_unreg_account(UNUSED_ARG(struct userNode *user), struct handle_info *handle)
575 {
576     dict_remove(memos, handle->handle);
577 }
578
579 int
580 memoserv_init(void)
581 {
582     MS_LOG = log_register_type("MemoServ", "file:memoserv.log");
583     memos = dict_new();
584     dict_set_free_data(memos, delete_memo_account);
585     reg_auth_func(memoserv_check_messages);
586     reg_handle_rename_func(memoserv_rename_account);
587     reg_unreg_func(memoserv_unreg_account);
588     conf_register_reload(memoserv_conf_read);
589     reg_exit_func(memoserv_cleanup);
590     saxdb_register("MemoServ", memoserv_saxdb_read, memoserv_saxdb_write);
591
592     memoserv_module = module_register("MemoServ", MS_LOG, "mod-memoserv.help", NULL);
593     modcmd_register(memoserv_module, "send", cmd_send, 3, MODCMD_REQUIRE_AUTHED, NULL);
594     modcmd_register(memoserv_module, "list", cmd_list, 1, MODCMD_REQUIRE_AUTHED, NULL);
595     modcmd_register(memoserv_module, "read", cmd_read, 2, MODCMD_REQUIRE_AUTHED, NULL);
596     modcmd_register(memoserv_module, "delete", cmd_delete, 2, MODCMD_REQUIRE_AUTHED, NULL);
597     modcmd_register(memoserv_module, "expire", cmd_expire, 1, MODCMD_REQUIRE_AUTHED, "flags", "+oper", NULL);
598     modcmd_register(memoserv_module, "expiry", cmd_expiry, 1, 0, NULL);
599     modcmd_register(memoserv_module, "status", cmd_status, 1, 0, NULL);
600     modcmd_register(memoserv_module, "set notify", cmd_set_notify, 1, 0, NULL);
601     modcmd_register(memoserv_module, "set authnotify", cmd_set_authnotify, 1, 0, NULL);
602     modcmd_register(memoserv_module, "set private", cmd_set_private, 1, 0, NULL);
603     message_register_table(msgtab);
604
605     if (memoserv_conf.message_expiry)
606         timeq_add(now + memoserv_conf.message_expiry, expire_memos, NULL);
607     return 1;
608 }
609
610 int
611 memoserv_finalize(void) {
612     dict_t conf_node;
613     const char *str;
614
615     str = "modules/memoserv";
616     if (!(conf_node = conf_get_data(str, RECDB_OBJECT))) {
617         log_module(MS_LOG, LOG_ERROR, "config node `%s' is missing or has wrong type.", str);
618         return 0;
619     }
620
621     str = database_get_data(conf_node, "bot", RECDB_QSTRING);
622     if (str)
623         memoserv_conf.bot = GetUserH(str);
624     return 1;
625 }