1 /* hash.c - IRC network state database
2 * Copyright 2000-2004 srvx Development Team
4 * This file is part of srvx.
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.
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.
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.
30 unsigned int max_clients, invis_clients;
31 unsigned long max_clients_time;
32 struct userList curr_opers;
34 static void hash_cleanup(void);
36 void init_structs(void)
38 channels = dict_new();
41 userList_init(&curr_opers);
42 reg_exit_func(hash_cleanup);
45 int userList_contains(struct userList *list, struct userNode *user)
49 for (ii = 0; ii < list->used; ++ii) {
50 if (user == list->list[ii]) {
57 server_link_func_t *slf_list;
58 unsigned int slf_size = 0, slf_used = 0;
61 reg_server_link_func(server_link_func_t handler)
63 if (slf_used == slf_size) {
66 slf_list = realloc(slf_list, slf_size*sizeof(server_link_func_t));
69 slf_list = malloc(slf_size*sizeof(server_link_func_t));
72 slf_list[slf_used++] = handler;
76 GetServerH(const char *name)
78 return dict_find(servers, name, NULL);
81 new_user_func_t *nuf_list;
82 unsigned int nuf_size = 0, nuf_used = 0;
85 reg_new_user_func(new_user_func_t handler)
87 if (nuf_used == nuf_size) {
90 nuf_list = realloc(nuf_list, nuf_size*sizeof(new_user_func_t));
93 nuf_list = malloc(nuf_size*sizeof(new_user_func_t));
96 nuf_list[nuf_used++] = handler;
99 static nick_change_func_t *ncf2_list;
100 static unsigned int ncf2_size = 0, ncf2_used = 0;
103 reg_nick_change_func(nick_change_func_t handler)
105 if (ncf2_used == ncf2_size) {
108 ncf2_list = realloc(ncf2_list, ncf2_size*sizeof(nick_change_func_t));
111 ncf2_list = malloc(ncf2_size*sizeof(nick_change_func_t));
114 ncf2_list[ncf2_used++] = handler;
118 del_user_func_t *duf_list;
119 unsigned int duf_size = 0, duf_used = 0;
122 reg_del_user_func(del_user_func_t handler)
124 if (duf_used == duf_size) {
127 duf_list = realloc(duf_list, duf_size*sizeof(del_user_func_t));
130 duf_list = malloc(duf_size*sizeof(del_user_func_t));
133 duf_list[duf_used++] = handler;
137 unreg_del_user_func(del_user_func_t handler)
140 for (i=0; i<duf_used; i++) {
141 if (duf_list[i] == handler) break;
143 if (i == duf_used) return;
144 memmove(duf_list+i, duf_list+i+1, (duf_used-i-1)*sizeof(duf_list[0]));
148 /* reintroduces a user after it has been killed. */
150 ReintroduceUser(struct userNode *user)
152 struct mod_chanmode change;
156 mod_chanmode_init(&change);
158 for (n = 0; n < user->channels.used; n++) {
159 struct modeNode *mn = user->channels.list[n];
160 irc_join(user, mn->channel);
162 change.args[0].mode = mn->modes;
163 change.args[0].u.member = mn;
164 mod_chanmode_announce(user, mn->channel, &change);
170 NickChange(struct userNode* user, const char *new_nick, int no_announce)
175 /* don't do anything if there's no change */
176 old_nick = user->nick;
177 if (!strncmp(new_nick, old_nick, NICKLEN))
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);
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);
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.
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);
207 GetUserH(const char *nick)
209 return dict_find(clients, nick, NULL);
212 static account_func_t account_func;
215 reg_account_func(account_func_t handler)
218 log_module(MAIN_LOG, LOG_WARNING, "Reregistering ACCOUNT handler.");
220 account_func = handler;
224 call_account_func(struct userNode *user, const char *stamp, unsigned long timestamp, unsigned long serial)
226 /* We've received an account stamp for a user; notify
227 NickServ, which registers the sole account_func
230 P10 Protocol violation if (user->modes & FLAGS_STAMPED) here.
233 account_func(user, stamp, timestamp, serial);
235 #ifdef WITH_PROTOCOL_P10
236 /* Mark the user so we don't stamp it again. */
237 user->modes |= FLAGS_STAMPED;
242 StampUser(struct userNode *user, const char *stamp, unsigned long timestamp, unsigned long serial)
244 #ifdef WITH_PROTOCOL_P10
245 /* The P10 protocol says we can't stamp users who already
251 irc_account(user, stamp, timestamp, serial);
252 user->modes |= FLAGS_STAMPED;
256 assign_fakehost(struct userNode *user, const char *host, const char *ident, int force, int announce)
259 safestrncpy(user->fakehost, host, sizeof(user->fakehost));
261 safestrncpy(user->fakeident, ident, sizeof(user->ident));
263 irc_fakehost(user, host, ident, force);
266 static new_channel_func_t *ncf_list;
267 static unsigned int ncf_size = 0, ncf_used = 0;
270 reg_new_channel_func(new_channel_func_t handler)
272 if (ncf_used == ncf_size) {
275 ncf_list = realloc(ncf_list, ncf_size*sizeof(ncf_list[0]));
278 ncf_list = malloc(ncf_size*sizeof(ncf_list[0]));
281 ncf_list[ncf_used++] = handler;
284 static join_func_t *jf_list;
285 static unsigned int jf_size = 0, jf_used = 0;
288 reg_join_func(join_func_t handler)
290 if (jf_used == jf_size) {
293 jf_list = realloc(jf_list, jf_size*sizeof(join_func_t));
296 jf_list = malloc(jf_size*sizeof(join_func_t));
299 jf_list[jf_used++] = handler;
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;
314 cNode->topic[0] = '\0';
315 cNode->topic_nick[0] = '\0';
316 cNode->topic_time = 0;
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);
325 mod_chanmode(NULL, cNode, modes, modec, 0);
326 cNode->timestamp = new_time;
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;
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))
340 struct mod_chanmode *change;
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;
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);
365 AddChannel(const char *name, unsigned long time_, const char *modes, char *banlist)
367 struct chanNode *cNode;
368 char new_modes[MAXLEN], *argv[MAXNUMPARAMS];
371 if (!IsChannelName(name)) {
372 log_module(MAIN_LOG, LOG_ERROR, "Somebody asked to add channel '%s', which isn't a channel name!", name);
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_;
389 } else if (cNode->timestamp > time_) {
390 wipeout_channel(cNode, time_, argv, nn);
392 } else if (cNode->timestamp == time_) {
393 mod_chanmode(NULL, cNode, argv, nn, MCP_FROM_SERVER);
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. */
403 /* if it's a new or updated channel, make callbacks */
405 for (nn=0; nn<ncf_used; nn++)
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;
413 while (banlist[nn] != ' ' && banlist[nn])
415 while (banlist[nn] == ' ')
417 bn = calloc(1, sizeof(*bn));
418 safestrncpy(bn->ban, ban, sizeof(bn->ban));
419 safestrncpy(bn->who, "<unknown>", sizeof(bn->who));
421 banList_append(&cNode->banlist, bn);
428 static del_channel_func_t *dcf_list;
429 static unsigned int dcf_size = 0, dcf_used = 0;
432 reg_del_channel_func(del_channel_func_t handler)
434 if (dcf_used == dcf_size) {
437 dcf_list = realloc(dcf_list, dcf_size*sizeof(dcf_list[0]));
440 dcf_list = malloc(dcf_size*sizeof(dcf_list[0]));
443 dcf_list[dcf_used++] = handler;
447 DelChannel(struct chanNode *channel)
452 dict_remove(channels, channel->name);
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);
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);
462 /* delete all channel bans */
463 for (n=channel->banlist.used; n>0; )
464 free(channel->banlist.list[--n]);
465 channel->banlist.used = 0;
467 for (n=0; n<dcf_used; n++)
468 dcf_list[n](channel);
470 modeList_clean(&channel->members);
471 banList_clean(&channel->banlist);
476 AddChannelUser(struct userNode *user, struct chanNode* channel)
478 struct modeNode *mNode;
481 mNode = GetUserMode(channel, user);
485 mNode = malloc(sizeof(*mNode));
487 /* set up modeNode */
488 mNode->channel = channel;
491 mNode->oplevel = MAXOPLEVEL;
492 mNode->idle_since = now;
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).
498 modeList_append(&channel->members, mNode);
499 modeList_append(&user->channels, mNode);
501 if (channel->members.used == 1
502 && !(channel->modes & MODE_REGISTERED)
503 && !(channel->modes & MODE_APASS))
504 mNode->modes |= MODE_CHANOP;
507 irc_join(user, channel);
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))
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.
527 modeNode_sort(const void *pa, const void *pb)
529 struct modeNode *a = *(struct modeNode**)pa;
530 struct modeNode *b = *(struct modeNode**)pb;
532 if (a->modes & MODE_CHANOP) {
533 if (!(b->modes & MODE_CHANOP))
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)
541 else if ((b->modes & MODE_VOICE) != (a->modes & MODE_VOICE))
542 return (b->modes & MODE_VOICE) - (a->modes & MODE_VOICE);
544 return irccasecmp(a->user->nick, b->user->nick);
547 static part_func_t *pf_list;
548 static unsigned int pf_size = 0, pf_used = 0;
551 reg_part_func(part_func_t handler)
553 if (pf_used == pf_size) {
556 pf_list = realloc(pf_list, pf_size*sizeof(part_func_t));
559 pf_list = malloc(pf_size*sizeof(part_func_t));
562 pf_list[pf_used++] = handler;
566 unreg_part_func(part_func_t handler)
569 for (i=0; i<pf_used; i++)
570 if (pf_list[i] == handler)
574 memmove(pf_list+i, pf_list+i+1, (pf_used-i-1)*sizeof(pf_list[0]));
579 LockChannel(struct chanNode* channel)
585 UnlockChannel(struct chanNode *channel)
587 assert(channel->locks > 0);
588 if (!--channel->locks && !channel->members.used)
593 DelChannelUser(struct userNode* user, struct chanNode* channel, const char *reason, int deleting)
595 struct modeNode* mNode;
598 if (IsLocal(user) && reason)
599 irc_part(user, channel, reason);
601 mNode = GetUserMode(channel, user);
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.
609 /* remove modeNode from channel and user */
610 modeList_remove(&channel->members, mNode);
611 modeList_remove(&user->channels, mNode);
614 for (n=0; n<pf_used; n++)
615 pf_list[n](mNode, reason);
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))
627 KickChannelUser(struct userNode* target, struct chanNode* channel, struct userNode *kicker, const char *why)
629 if (!target || !channel || IsService(target) || !GetUserMode(channel, target))
631 /* don't remove them from the channel, since the server will send a PART */
632 irc_kick(kicker, target, channel, why);
636 /* NULL reason because we don't want a PART message to be
637 sent by DelChannelUser. */
638 DelChannelUser(target, channel, NULL, 0);
642 static kick_func_t *kf_list;
643 static unsigned int kf_size = 0, kf_used = 0;
646 reg_kick_func(kick_func_t handler)
648 if (kf_used == kf_size) {
651 kf_list = realloc(kf_list, kf_size*sizeof(kick_func_t));
654 kf_list = malloc(kf_size*sizeof(kick_func_t));
657 kf_list[kf_used++] = handler;
661 ChannelUserKicked(struct userNode* kicker, struct userNode* victim, struct chanNode* channel)
666 if (!victim || !channel || IsService(victim) || !GetUserMode(channel, victim))
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;
673 for (n=0; n<kf_used; n++)
674 kf_list[n](kicker, victim, channel);
676 DelChannelUser(victim, channel, 0, 0);
679 irc_part(victim, channel, NULL);
682 int ChannelBanExists(struct chanNode *channel, const char *ban)
686 for (n = 0; n < channel->banlist.used; n++)
687 if (match_ircglobs(channel->banlist.list[n]->ban, ban))
692 static topic_func_t *tf_list;
693 static unsigned int tf_size = 0, tf_used = 0;
696 reg_topic_func(topic_func_t handler)
698 if (tf_used == tf_size) {
701 tf_list = realloc(tf_list, tf_size*sizeof(topic_func_t));
704 tf_list = malloc(tf_size*sizeof(topic_func_t));
707 tf_list[tf_used++] = handler;
711 SetChannelTopic(struct chanNode *channel, struct userNode *user, const char *topic, int announce)
715 char old_topic[TOPICLEN+1];
717 safestrncpy(old_topic, channel->topic, sizeof(old_topic));
718 safestrncpy(channel->topic, topic, sizeof(channel->topic));
719 channel->topic_time = now;
722 safestrncpy(channel->topic_nick, user->nick, sizeof(channel->topic_nick));
724 /* Update the setter's idle time */
725 if ((mn = GetUserMode(channel, user)))
726 mn->idle_since = now;
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);
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.
739 if (tf_list[n](user, channel, old_topic))
745 GetChannel(const char *name)
747 return dict_find(channels, name, NULL);
751 GetUserMode(struct chanNode *channel, struct userNode *user)
754 struct modeNode *mn = NULL;
757 verify(channel->members.list);
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];
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];
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*)
789 dict_iterator_t it, next;
791 DelServer(self, 0, NULL);
792 for (it = dict_first(channels); it; it = next) {
793 next = iter_next(it);
794 DelChannel(iter_data(it));
796 dict_delete(channels);
797 dict_delete(clients);
798 dict_delete(servers);
799 userList_clean(&curr_opers);