src/hash.c

   1 /* hash.c - IRC network state database
   2  * Copyright 2000-2004 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 #include "conf.h"
  22 #include "global.h"
  23 #include "hash.h"
  24 #include "log.h"
  25
  26 struct server *self;
  27 dict_t channels;
  28 dict_t clients;
  29 dict_t servers;
  30 unsigned int max_clients, invis_clients;
  31 unsigned long max_clients_time;
  32 struct userList curr_opers;
  33
  34 static void hash_cleanup(void);
  35
  36 void init_structs(void)
  37 {
  38     channels = dict_new();
  39     clients = dict_new();
  40     servers = dict_new();
  41     userList_init(&curr_opers);
  42     reg_exit_func(hash_cleanup);
  43 }
  44
  45 int userList_contains(struct userList *list, struct userNode *user)
  46 {
  47     unsigned int ii;
  48
  49     for (ii = 0; ii < list->used; ++ii) {
  50         if (user == list->list[ii]) {
  51             return 1;
  52         }
  53     }
  54     return 0;
  55 }
  56
  57 server_link_func_t *slf_list;
  58 unsigned int slf_size = 0, slf_used = 0;
  59
  60 void
  61 reg_server_link_func(server_link_func_t handler)
  62 {
  63     if (slf_used == slf_size) {
  64         if (slf_size) {
  65             slf_size <<= 1;
  66             slf_list = realloc(slf_list, slf_size*sizeof(server_link_func_t));
  67         } else {
  68             slf_size = 8;
  69             slf_list = malloc(slf_size*sizeof(server_link_func_t));
  70         }
  71     }
  72     slf_list[slf_used++] = handler;
  73 }
  74
  75 struct server*
  76 GetServerH(const char *name)
  77 {
  78     return dict_find(servers, name, NULL);
  79 }
  80
  81 new_user_func_t *nuf_list;
  82 unsigned int nuf_size = 0, nuf_used = 0;
  83
  84 void
  85 reg_new_user_func(new_user_func_t handler)
  86 {
  87     if (nuf_used == nuf_size) {
  88         if (nuf_size) {
  89             nuf_size <<= 1;
  90             nuf_list = realloc(nuf_list, nuf_size*sizeof(new_user_func_t));
  91         } else {
  92             nuf_size = 8;
  93             nuf_list = malloc(nuf_size*sizeof(new_user_func_t));
  94         }
  95     }
  96     nuf_list[nuf_used++] = handler;
  97 }
  98
  99 static nick_change_func_t *ncf2_list;
 100 static unsigned int ncf2_size = 0, ncf2_used = 0;
 101
 102 void
 103 reg_nick_change_func(nick_change_func_t handler)
 104 {
 105     if (ncf2_used == ncf2_size) {
 106         if (ncf2_size) {
 107             ncf2_size <<= 1;
 108             ncf2_list = realloc(ncf2_list, ncf2_size*sizeof(nick_change_func_t));
 109         } else {
 110             ncf2_size = 8;
 111             ncf2_list = malloc(ncf2_size*sizeof(nick_change_func_t));
 112         }
 113     }
 114     ncf2_list[ncf2_used++] = handler;
 115 }
 116
 117
 118 del_user_func_t *duf_list;
 119 unsigned int duf_size = 0, duf_used = 0;
 120
 121 void
 122 reg_del_user_func(del_user_func_t handler)
 123 {
 124     if (duf_used == duf_size) {
 125         if (duf_size) {
 126             duf_size <<= 1;
 127             duf_list = realloc(duf_list, duf_size*sizeof(del_user_func_t));
 128         } else {
 129             duf_size = 8;
 130             duf_list = malloc(duf_size*sizeof(del_user_func_t));
 131         }
 132     }
 133     duf_list[duf_used++] = handler;
 134 }
 135
 136 void
 137 unreg_del_user_func(del_user_func_t handler)
 138 {
 139     unsigned int i;
 140     for (i=0; i<duf_used; i++) {
 141         if (duf_list[i] == handler) break;
 142     }
 143     if (i == duf_used) return;
 144     memmove(duf_list+i, duf_list+i+1, (duf_used-i-1)*sizeof(duf_list[0]));
 145     duf_used--;
 146 }
 147
 148 /* reintroduces a user after it has been killed. */
 149 void
 150 ReintroduceUser(struct userNode *user)
 151 {
 152     struct mod_chanmode change;
 153     unsigned int n;
 154
 155     irc_user(user);
 156     mod_chanmode_init(&change);
 157     change.argc = 1;
 158     for (n = 0; n < user->channels.used; n++) {
 159         struct modeNode *mn = user->channels.list[n];
 160         irc_join(user, mn->channel);
 161         if (mn->modes) {
 162             change.args[0].mode = mn->modes;
 163             change.args[0].u.member = mn;
 164             mod_chanmode_announce(user, mn->channel, &change);
 165         }
 166     }
 167 }
 168
 169 void
 170 NickChange(struct userNode* user, const char *new_nick, int no_announce)
 171 {
 172     char *old_nick;
 173     unsigned int nn;
 174
 175     /* don't do anything if there's no change */
 176     old_nick = user->nick;
 177     if (!strncmp(new_nick, old_nick, NICKLEN))
 178         return;
 179
 180     /* remove old entry from clients dictionary */
 181     dict_remove(clients, old_nick);
 182 #if !defined(WITH_PROTOCOL_P10)
 183     /* Remove from uplink's clients dict */
 184     dict_remove(user->uplink->users, old_nick);
 185 #endif
 186     /* and reinsert */
 187     user->nick = strdup(new_nick);
 188     dict_insert(clients, user->nick, user);
 189 #if !defined(WITH_PROTOCOL_P10)
 190     dict_insert(user->uplink->users, user->nick, user);
 191 #endif
 192
 193     /* Make callbacks for nick changes.  Do this with new nick in
 194      * place because that is slightly more useful.  Stop if the user
 195      * gets killed by any of the hooks, so that later hooks do not get
 196      * confused by the user having disappeared.
 197      */
 198     for (nn=0; (nn<ncf2_used) && !user->dead; nn++)
 199         ncf2_list[nn](user, old_nick);
 200     user->timestamp = now;
 201     if (IsLocal(user) && !no_announce)
 202         irc_nick(user, old_nick);
 203     free(old_nick);
 204 }
 205
 206 struct userNode *
 207 GetUserH(const char *nick)
 208 {
 209     return dict_find(clients, nick, NULL);
 210 }
 211
 212 static account_func_t account_func;
 213
 214 void
 215 reg_account_func(account_func_t handler)
 216 {
 217     if (account_func) {
 218         log_module(MAIN_LOG, LOG_WARNING, "Reregistering ACCOUNT handler.");
 219     }
 220     account_func = handler;
 221 }
 222
 223 void
 224 call_account_func(struct userNode *user, const char *stamp, unsigned long timestamp, unsigned long serial)
 225 {
 226     /* We've received an account stamp for a user; notify
 227        NickServ, which registers the sole account_func
 228        right now.
 229
 230        P10 Protocol violation if (user->modes & FLAGS_STAMPED) here.
 231     */
 232     if (account_func)
 233         account_func(user, stamp, timestamp, serial);
 234
 235 #ifdef WITH_PROTOCOL_P10
 236     /* Mark the user so we don't stamp it again. */
 237     user->modes |= FLAGS_STAMPED;
 238 #endif
 239 }
 240
 241 void
 242 StampUser(struct userNode *user, const char *stamp, unsigned long timestamp, unsigned long serial)
 243 {
 244 #ifdef WITH_PROTOCOL_P10
 245     /* The P10 protocol says we can't stamp users who already
 246        have a stamp. */
 247     if (IsStamped(user))
 248         return;
 249 #endif
 250
 251     irc_account(user, stamp, timestamp, serial);
 252     user->modes |= FLAGS_STAMPED;
 253 }
 254
 255 void
 256 assign_fakehost(struct userNode *user, const char *host, const char *ident, int force, int announce)
 257 {
 258     if (host)
 259         safestrncpy(user->fakehost, host, sizeof(user->fakehost));
 260     if (ident)
 261         safestrncpy(user->fakeident, ident, sizeof(user->ident));
 262     if (announce)
 263         irc_fakehost(user, host, ident, force);
 264 }
 265
 266 static new_channel_func_t *ncf_list;
 267 static unsigned int ncf_size = 0, ncf_used = 0;
 268
 269 void
 270 reg_new_channel_func(new_channel_func_t handler)
 271 {
 272     if (ncf_used == ncf_size) {
 273         if (ncf_size) {
 274             ncf_size <<= 1;
 275             ncf_list = realloc(ncf_list, ncf_size*sizeof(ncf_list[0]));
 276         } else {
 277             ncf_size = 8;
 278             ncf_list = malloc(ncf_size*sizeof(ncf_list[0]));
 279         }
 280     }
 281     ncf_list[ncf_used++] = handler;
 282 }
 283
 284 static join_func_t *jf_list;
 285 static unsigned int jf_size = 0, jf_used = 0;
 286
 287 void
 288 reg_join_func(join_func_t handler)
 289 {
 290     if (jf_used == jf_size) {
 291         if (jf_size) {
 292             jf_size <<= 1;
 293             jf_list = realloc(jf_list, jf_size*sizeof(join_func_t));
 294         } else {
 295             jf_size = 8;
 296             jf_list = malloc(jf_size*sizeof(join_func_t));
 297         }
 298     }
 299     jf_list[jf_used++] = handler;
 300 }
 301
 302 int rel_age;
 303
 304 static void
 305 wipeout_channel(struct chanNode *cNode, unsigned long new_time, char **modes, unsigned int modec) {
 306     unsigned int orig_limit;
 307     chan_mode_t orig_modes;
 308     char orig_key[KEYLEN+1];
 309     char orig_apass[KEYLEN+1];
 310     char orig_upass[KEYLEN+1];
 311     unsigned int nn, argc;
 312
 313     /* nuke old topic */
 314     cNode->topic[0] = '\0';
 315     cNode->topic_nick[0] = '\0';
 316     cNode->topic_time = 0;
 317
 318     /* remember the old modes, and update them with the new */
 319     orig_modes = cNode->modes;
 320     orig_limit = cNode->limit;
 321     strcpy(orig_key, cNode->key);
 322     strcpy(orig_upass, cNode->upass);
 323     strcpy(orig_apass, cNode->apass);
 324     cNode->modes = 0;
 325     mod_chanmode(NULL, cNode, modes, modec, 0);
 326     cNode->timestamp = new_time;
 327
 328     /* remove our old ban list, replace it with the new one */
 329     for (nn=0; nn<cNode->banlist.used; nn++)
 330         free(cNode->banlist.list[nn]);
 331     cNode->banlist.used = 0;
 332
 333     /* deop anybody in the channel now, but count services to reop */
 334     for (nn=argc=0; nn<cNode->members.used; nn++) {
 335         struct modeNode *mn = cNode->members.list[nn];
 336         if ((mn->modes & MODE_CHANOP) && IsService(mn->user) && IsLocal(mn->user))
 337             argc++;
 338     }
 339     if (argc) {
 340         struct mod_chanmode *change;
 341
 342         change = mod_chanmode_alloc(argc);
 343         change->modes_clear = 0;
 344         change->modes_set = orig_modes;
 345         change->new_limit = orig_limit;
 346         strcpy(change->new_key, orig_key);
 347         strcpy(change->new_upass, orig_upass);
 348         strcpy(change->new_apass, orig_apass);
 349         for (nn = argc = 0; nn < cNode->members.used; ++nn) {
 350             struct modeNode *mn = cNode->members.list[nn];
 351             if ((mn->modes & MODE_CHANOP) && IsService(mn->user) && IsLocal(mn->user)) {
 352                 change->args[argc].mode = MODE_CHANOP;
 353                 change->args[argc].u.member = mn;
 354                 argc++;
 355             }
 356         }
 357         assert(argc == change->argc);
 358         change->args[0].u.member->modes &= ~MODE_CHANOP;
 359         mod_chanmode_announce(change->args[0].u.member->user, cNode, change);
 360         mod_chanmode_free(change);
 361     }
 362 }
 363
 364 struct chanNode *
 365 AddChannel(const char *name, unsigned long time_, const char *modes, char *banlist)
 366 {
 367     struct chanNode *cNode;
 368     char new_modes[MAXLEN], *argv[MAXNUMPARAMS];
 369     unsigned int nn;
 370
 371     if (!IsChannelName(name)) {
 372         log_module(MAIN_LOG, LOG_ERROR, "Somebody asked to add channel '%s', which isn't a channel name!", name);
 373         return NULL;
 374     }
 375     if (!modes)
 376         modes = "";
 377
 378     safestrncpy(new_modes, modes, sizeof(new_modes));
 379     nn = split_line(new_modes, 0, ArrayLength(argv), argv);
 380     if (!(cNode = GetChannel(name))) {
 381         cNode = calloc(1, sizeof(*cNode) + strlen(name));
 382         strcpy(cNode->name, name);
 383         banList_init(&cNode->banlist);
 384         modeList_init(&cNode->members);
 385         mod_chanmode(NULL, cNode, argv, nn, MCP_FROM_SERVER);
 386         dict_insert(channels, cNode->name, cNode);
 387         cNode->timestamp = time_;
 388         rel_age = 1;
 389     } else if (cNode->timestamp > time_) {
 390         wipeout_channel(cNode, time_, argv, nn);
 391         rel_age = 1;
 392     } else if (cNode->timestamp == time_) {
 393         mod_chanmode(NULL, cNode, argv, nn, MCP_FROM_SERVER);
 394         rel_age = 0;
 395     } else {
 396         rel_age = -1;
 397     }
 398
 399     /* rel_age is the relative ages of our channel data versus what is
 400      * in a BURST command.  1 means ours is younger, 0 means both are
 401      * the same age, -1 means ours is older. */
 402
 403     /* if it's a new or updated channel, make callbacks */
 404     if (rel_age > 0)
 405         for (nn=0; nn<ncf_used; nn++)
 406             ncf_list[nn](cNode);
 407
 408     /* go through list of bans and add each one */
 409     if (banlist && (rel_age >= 0)) {
 410         for (nn=0; banlist[nn];) {
 411             char *ban = banlist + nn;
 412             struct banNode *bn;
 413             while (banlist[nn] != ' ' && banlist[nn])
 414                 nn++;
 415             while (banlist[nn] == ' ')
 416                 banlist[nn++] = 0;
 417             bn = calloc(1, sizeof(*bn));
 418             safestrncpy(bn->ban, ban, sizeof(bn->ban));
 419             safestrncpy(bn->who, "<unknown>", sizeof(bn->who));
 420             bn->set = now;
 421             banList_append(&cNode->banlist, bn);
 422         }
 423     }
 424
 425     return cNode;
 426 }
 427
 428 static del_channel_func_t *dcf_list;
 429 static unsigned int dcf_size = 0, dcf_used = 0;
 430
 431 void
 432 reg_del_channel_func(del_channel_func_t handler)
 433 {
 434     if (dcf_used == dcf_size) {
 435         if (dcf_size) {
 436             dcf_size <<= 1;
 437             dcf_list = realloc(dcf_list, dcf_size*sizeof(dcf_list[0]));
 438         } else {
 439             dcf_size = 8;
 440             dcf_list = malloc(dcf_size*sizeof(dcf_list[0]));
 441         }
 442     }
 443     dcf_list[dcf_used++] = handler;
 444 }
 445
 446 static void
 447 DelChannel(struct chanNode *channel)
 448 {
 449     unsigned int n;
 450
 451     verify(channel);
 452     dict_remove(channels, channel->name);
 453
 454     if (channel->members.used || channel->locks) {
 455         log_module(MAIN_LOG, LOG_ERROR, "Warning: deleting channel %s with %d users and %d locks remaining.", channel->name, channel->members.used, channel->locks);
 456     }
 457
 458     /* go through all channel members and delete them from the channel */
 459     for (n=channel->members.used; n>0; )
 460         DelChannelUser(channel->members.list[--n]->user, channel, NULL, 1);
 461
 462     /* delete all channel bans */
 463     for (n=channel->banlist.used; n>0; )
 464         free(channel->banlist.list[--n]);
 465     channel->banlist.used = 0;
 466
 467     for (n=0; n<dcf_used; n++)
 468         dcf_list[n](channel);
 469
 470     modeList_clean(&channel->members);
 471     banList_clean(&channel->banlist);
 472     free(channel);
 473 }
 474
 475 struct modeNode *
 476 AddChannelUser(struct userNode *user, struct chanNode* channel)
 477 {
 478         struct modeNode *mNode;
 479         unsigned int n;
 480
 481         mNode = GetUserMode(channel, user);
 482         if (mNode)
 483             return mNode;
 484
 485         mNode = malloc(sizeof(*mNode));
 486
 487         /* set up modeNode */
 488         mNode->channel = channel;
 489         mNode->user = user;
 490         mNode->modes = 0;
 491         mNode->oplevel = MAXOPLEVEL;
 492         mNode->idle_since = now;
 493
 494         /* Add modeNode to channel and to user.
 495          * We have to do this before calling join funcs in case the
 496          * modeNode is manipulated (e.g. chanserv ops the user).
 497          */
 498         modeList_append(&channel->members, mNode);
 499         modeList_append(&user->channels, mNode);
 500
 501         if (channel->members.used == 1
 502             && !(channel->modes & MODE_REGISTERED)
 503             && !(channel->modes & MODE_APASS))
 504             mNode->modes |= MODE_CHANOP;
 505
 506         if (IsLocal(user)) {
 507             irc_join(user, channel);
 508         }
 509
 510         for (n=0; (n<jf_used) && !user->dead; n++) {
 511             /* Callbacks return true if they kick or kill the user,
 512              * and we can continue without removing mNode. */
 513             if (jf_list[n](mNode))
 514                 return NULL;
 515         }
 516
 517         return mNode;
 518 }
 519
 520 /* Return negative if *(struct modeNode**)pa is "less than" pb,
 521  * positive if pa is "larger than" pb.  Comparison is based on sorting
 522  * so that non-voiced/non-opped users are first, voiced-only users are
 523  * next, and the "strongest" oplevels are before "weaker" oplevels.
 524  * Within those sets, ordering is arbitrary.
 525  */
 526 int
 527 modeNode_sort(const void *pa, const void *pb)
 528 {
 529         struct modeNode *a = *(struct modeNode**)pa;
 530         struct modeNode *b = *(struct modeNode**)pb;
 531
 532         if (a->modes & MODE_CHANOP) {
 533             if (!(b->modes & MODE_CHANOP))
 534                 return -1;
 535             else if ((b->modes & MODE_VOICE) != (a->modes & MODE_VOICE))
 536                 return (b->modes & MODE_VOICE) - (a->modes & MODE_VOICE);
 537             else if (a->oplevel != b->oplevel)
 538                 return a->oplevel - b->oplevel;
 539         } else if (b->modes & MODE_CHANOP)
 540             return 1;
 541         else if ((b->modes & MODE_VOICE) != (a->modes & MODE_VOICE))
 542             return (b->modes & MODE_VOICE) - (a->modes & MODE_VOICE);
 543
 544         return irccasecmp(a->user->nick, b->user->nick);
 545 }
 546
 547 static part_func_t *pf_list;
 548 static unsigned int pf_size = 0, pf_used = 0;
 549
 550 void
 551 reg_part_func(part_func_t handler)
 552 {
 553     if (pf_used == pf_size) {
 554         if (pf_size) {
 555             pf_size <<= 1;
 556             pf_list = realloc(pf_list, pf_size*sizeof(part_func_t));
 557         } else {
 558             pf_size = 8;
 559             pf_list = malloc(pf_size*sizeof(part_func_t));
 560         }
 561     }
 562     pf_list[pf_used++] = handler;
 563 }
 564
 565 void
 566 unreg_part_func(part_func_t handler)
 567 {
 568     unsigned int i;
 569     for (i=0; i<pf_used; i++)
 570         if (pf_list[i] == handler)
 571             break;
 572     if (i == pf_used)
 573         return;
 574     memmove(pf_list+i, pf_list+i+1, (pf_used-i-1)*sizeof(pf_list[0]));
 575     pf_used--;
 576 }
 577
 578 void
 579 LockChannel(struct chanNode* channel)
 580 {
 581     channel->locks++;
 582 }
 583
 584 void
 585 UnlockChannel(struct chanNode *channel)
 586 {
 587     assert(channel->locks > 0);
 588     if (!--channel->locks && !channel->members.used)
 589         DelChannel(channel);
 590 }
 591
 592 void
 593 DelChannelUser(struct userNode* user, struct chanNode* channel, const char *reason, int deleting)
 594 {
 595     struct modeNode* mNode;
 596     unsigned int n;
 597
 598     if (IsLocal(user) && reason)
 599         irc_part(user, channel, reason);
 600
 601     mNode = GetUserMode(channel, user);
 602
 603     /* Sometimes we get a PART when the user has been KICKed.
 604      * In this case, we get no usermode, and should not try to free it.
 605      */
 606     if (!mNode)
 607         return;
 608
 609     /* remove modeNode from channel and user */
 610     modeList_remove(&channel->members, mNode);
 611     modeList_remove(&user->channels, mNode);
 612
 613     /* make callbacks */
 614     for (n=0; n<pf_used; n++)
 615         pf_list[n](mNode, reason);
 616
 617     /* free memory */
 618     free(mNode);
 619
 620     /* A single check for APASS only should be enough here */
 621     if (!deleting && !channel->members.used && !channel->locks
 622         && !(channel->modes & MODE_REGISTERED) && !(channel->modes & MODE_APASS))
 623         DelChannel(channel);
 624 }
 625
 626 void
 627 KickChannelUser(struct userNode* target, struct chanNode* channel, struct userNode *kicker, const char *why)
 628 {
 629     if (!target || !channel || IsService(target) || !GetUserMode(channel, target))
 630         return;
 631     /* don't remove them from the channel, since the server will send a PART */
 632     irc_kick(kicker, target, channel, why);
 633
 634     if (IsLocal(target))
 635     {
 636         /* NULL reason because we don't want a PART message to be
 637            sent by DelChannelUser. */
 638         DelChannelUser(target, channel, NULL, 0);
 639     }
 640 }
 641
 642 static kick_func_t *kf_list;
 643 static unsigned int kf_size = 0, kf_used = 0;
 644
 645 void
 646 reg_kick_func(kick_func_t handler)
 647 {
 648     if (kf_used == kf_size) {
 649         if (kf_size) {
 650             kf_size <<= 1;
 651             kf_list = realloc(kf_list, kf_size*sizeof(kick_func_t));
 652         } else {
 653             kf_size = 8;
 654             kf_list = malloc(kf_size*sizeof(kick_func_t));
 655         }
 656     }
 657     kf_list[kf_used++] = handler;
 658 }
 659
 660 void
 661 ChannelUserKicked(struct userNode* kicker, struct userNode* victim, struct chanNode* channel)
 662 {
 663     unsigned int n;
 664     struct modeNode *mn;
 665
 666     if (!victim || !channel || IsService(victim) || !GetUserMode(channel, victim))
 667         return;
 668
 669     /* Update the kicker's idle time (kicker may be null if it was a server) */
 670     if (kicker && (mn = GetUserMode(channel, kicker)))
 671         mn->idle_since = now;
 672
 673     for (n=0; n<kf_used; n++)
 674         kf_list[n](kicker, victim, channel);
 675
 676     DelChannelUser(victim, channel, 0, 0);
 677
 678     if (IsLocal(victim))
 679         irc_part(victim, channel, NULL);
 680 }
 681
 682 int ChannelBanExists(struct chanNode *channel, const char *ban)
 683 {
 684     unsigned int n;
 685
 686     for (n = 0; n < channel->banlist.used; n++)
 687         if (match_ircglobs(channel->banlist.list[n]->ban, ban))
 688             return 1;
 689     return 0;
 690 }
 691
 692 static topic_func_t *tf_list;
 693 static unsigned int tf_size = 0, tf_used = 0;
 694
 695 void
 696 reg_topic_func(topic_func_t handler)
 697 {
 698     if (tf_used == tf_size) {
 699         if (tf_size) {
 700             tf_size <<= 1;
 701             tf_list = realloc(tf_list, tf_size*sizeof(topic_func_t));
 702         } else {
 703             tf_size = 8;
 704             tf_list = malloc(tf_size*sizeof(topic_func_t));
 705         }
 706     }
 707     tf_list[tf_used++] = handler;
 708 }
 709
 710 void
 711 SetChannelTopic(struct chanNode *channel, struct userNode *user, const char *topic, int announce)
 712 {
 713     unsigned int n;
 714     struct modeNode *mn;
 715     char old_topic[TOPICLEN+1];
 716
 717     safestrncpy(old_topic, channel->topic, sizeof(old_topic));
 718     safestrncpy(channel->topic, topic, sizeof(channel->topic));
 719     channel->topic_time = now;
 720
 721     if (user) {
 722         safestrncpy(channel->topic_nick, user->nick, sizeof(channel->topic_nick));
 723
 724         /* Update the setter's idle time */
 725         if ((mn = GetUserMode(channel, user)))
 726             mn->idle_since = now;
 727     }
 728
 729     if (announce) {
 730         /* We don't really care if a local user messes with the topic,
 731          * so don't call the tf_list functions. */
 732         irc_topic(user, channel, topic);
 733     } else {
 734         for (n=0; n<tf_used; n++)
 735             /* A topic change handler can return non-zero to indicate
 736              * that it has reverted the topic change, and that further
 737              * hooks should not be called.
 738              */
 739             if (tf_list[n](user, channel, old_topic))
 740                 break;
 741     }
 742 }
 743
 744 struct chanNode *
 745 GetChannel(const char *name)
 746 {
 747     return dict_find(channels, name, NULL);
 748 }
 749
 750 struct modeNode *
 751 GetUserMode(struct chanNode *channel, struct userNode *user)
 752 {
 753     unsigned int n;
 754     struct modeNode *mn = NULL;
 755
 756     verify(channel);
 757     verify(channel->members.list);
 758     verify(user);
 759     verify(user->channels.list);
 760     if (channel->members.used < user->channels.used) {
 761         for (n=0; n<channel->members.used; n++) {
 762             verify(channel->members.list[n]);
 763             if (user == channel->members.list[n]->user) {
 764                 mn = channel->members.list[n];
 765                 break;
 766             }
 767         }
 768     } else {
 769         for (n=0; n<user->channels.used; n++) {
 770             verify(user->channels.list[n]);
 771             if (channel == user->channels.list[n]->channel) {
 772                 mn = user->channels.list[n];
 773                 break;
 774             }
 775         }
 776     }
 777     return mn;
 778 }
 779
 780 DEFINE_LIST(userList, struct userNode*)
 781 DEFINE_LIST(modeList, struct modeNode*)
 782 DEFINE_LIST(banList, struct banNode*)
 783 DEFINE_LIST(channelList, struct chanNode*)
 784 DEFINE_LIST(serverList, struct server*)
 785
 786 static void
 787 hash_cleanup(void)
 788 {
 789     dict_iterator_t it, next;
 790
 791     DelServer(self, 0, NULL);
 792     for (it = dict_first(channels); it; it = next) {
 793         next = iter_next(it);
 794         DelChannel(iter_data(it));
 795     }
 796     dict_delete(channels);
 797     dict_delete(clients);
 798     dict_delete(servers);
 799     userList_clean(&curr_opers);
 800
 801     free(slf_list);
 802     free(nuf_list);
 803     free(ncf2_list);
 804     free(duf_list);
 805     free(ncf_list);
 806     free(jf_list);
 807     free(dcf_list);
 808     free(pf_list);
 809     free(kf_list);
 810     free(tf_list);
 811 }