apps/irssi/src/core/nicklist.c

   1 /*
   2  nicklist.c : irssi
   3
   4     Copyright (C) 1999-2000 Timo Sirainen
   5
   6     This program 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 along
  17     with this program; if not, write to the Free Software Foundation, Inc.,
  18     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19 */
  20
  21 #include "module.h"
  22 #include "signals.h"
  23 #include "misc.h"
  24
  25 #include "servers.h"
  26 #include "channels.h"
  27 #include "nicklist.h"
  28 #include "masks.h"
  29
  30 #define isalnumhigh(a) \
  31         (i_isalnum(a) || (unsigned char) (a) >= 128)
  32
  33 static void nick_hash_add(CHANNEL_REC *channel, NICK_REC *nick)
  34 {
  35         NICK_REC *list;
  36
  37         nick->next = NULL;
  38
  39         list = g_hash_table_lookup(channel->nicks, nick->nick);
  40         if (list == NULL)
  41                 g_hash_table_insert(channel->nicks, nick->nick, nick);
  42         else {
  43                 /* multiple nicks with same name */
  44                 while (list->next != NULL)
  45                         list = list->next;
  46                 list->next = nick;
  47         }
  48
  49         if (nick == channel->ownnick) {
  50                 /* move our own nick to beginning of the nick list.. */
  51                 nicklist_set_own(channel, nick);
  52         }
  53 }
  54
  55 static void nick_hash_remove(CHANNEL_REC *channel, NICK_REC *nick)
  56 {
  57         NICK_REC *list;
  58
  59         list = g_hash_table_lookup(channel->nicks, nick->nick);
  60         if (list == NULL)
  61                 return;
  62
  63         if (list == nick || list->next == NULL) {
  64                 g_hash_table_remove(channel->nicks, nick->nick);
  65                 if (list->next != NULL) {
  66                         g_hash_table_insert(channel->nicks, nick->next->nick,
  67                                             nick->next);
  68                 }
  69         } else {
  70                 while (list->next != nick)
  71                         list = list->next;
  72                 list->next = nick->next;
  73         }
  74 }
  75
  76 /* Add new nick to list */
  77 void nicklist_insert(CHANNEL_REC *channel, NICK_REC *nick)
  78 {
  79         /*MODULE_DATA_INIT(nick);*/
  80
  81         nick->type = module_get_uniq_id("NICK", 0);
  82         nick->chat_type = channel->chat_type;
  83
  84         nick_hash_add(channel, nick);
  85         signal_emit("nicklist new", 2, channel, nick);
  86 }
  87
  88 /* Set host address for nick */
  89 void nicklist_set_host(CHANNEL_REC *channel, NICK_REC *nick, const char *host)
  90 {
  91         g_return_if_fail(channel != NULL);
  92         g_return_if_fail(nick != NULL);
  93         g_return_if_fail(host != NULL);
  94
  95         g_free_not_null(nick->host);
  96         nick->host = g_strdup(host);
  97
  98         signal_emit("nicklist host changed", 2, channel, nick);
  99 }
 100
 101 static void nicklist_destroy(CHANNEL_REC *channel, NICK_REC *nick)
 102 {
 103         signal_emit("nicklist remove", 2, channel, nick);
 104
 105         if (channel->ownnick == nick)
 106                 channel->ownnick = NULL;
 107
 108         /*MODULE_DATA_DEINIT(nick);*/
 109         g_free(nick->nick);
 110         g_free_not_null(nick->realname);
 111         g_free_not_null(nick->host);
 112         g_free(nick);
 113 }
 114
 115 /* Remove nick from list */
 116 void nicklist_remove(CHANNEL_REC *channel, NICK_REC *nick)
 117 {
 118         g_return_if_fail(IS_CHANNEL(channel));
 119         g_return_if_fail(nick != NULL);
 120
 121         nick_hash_remove(channel, nick);
 122         nicklist_destroy(channel, nick);
 123 }
 124
 125 static void nicklist_rename_list(SERVER_REC *server, void *new_nick_id,
 126                                  const char *old_nick, const char *new_nick,
 127                                  GSList *nicks)
 128 {
 129         CHANNEL_REC *channel;
 130         NICK_REC *nickrec;
 131         GSList *tmp;
 132
 133         for (tmp = nicks; tmp != NULL; tmp = tmp->next->next) {
 134                 channel = tmp->data;
 135                 nickrec = tmp->next->data;
 136
 137                 /* remove old nick from hash table */
 138                 nick_hash_remove(channel, nickrec);
 139
 140                 if (new_nick_id != NULL)
 141                         nickrec->unique_id = new_nick_id;
 142
 143                 g_free(nickrec->nick);
 144                 nickrec->nick = g_strdup(new_nick);
 145
 146                 /* add new nick to hash table */
 147                 nick_hash_add(channel, nickrec);
 148
 149                 signal_emit("nicklist changed", 3, channel, nickrec, old_nick);
 150         }
 151         g_slist_free(nicks);
 152 }
 153
 154 void nicklist_rename(SERVER_REC *server, const char *old_nick,
 155                      const char *new_nick)
 156 {
 157         nicklist_rename_list(server, NULL, old_nick, new_nick,
 158                              nicklist_get_same(server, old_nick));
 159 }
 160
 161 void nicklist_rename_unique(SERVER_REC *server,
 162                             void *old_nick_id, const char *old_nick,
 163                             void *new_nick_id, const char *new_nick)
 164 {
 165         nicklist_rename_list(server, new_nick_id, old_nick, new_nick,
 166                              nicklist_get_same_unique(server, old_nick_id));
 167 }
 168
 169 static NICK_REC *nicklist_find_wildcards(CHANNEL_REC *channel,
 170                                          const char *mask)
 171 {
 172         GSList *nicks, *tmp;
 173         NICK_REC *nick;
 174
 175         nicks = nicklist_getnicks(channel);
 176         nick = NULL;
 177         for (tmp = nicks; tmp != NULL; tmp = tmp->next) {
 178                 nick = tmp->data;
 179
 180                 if (mask_match_address(channel->server, mask,
 181                                        nick->nick, nick->host))
 182                         break;
 183         }
 184         g_slist_free(nicks);
 185         return tmp == NULL ? NULL : nick;
 186 }
 187
 188 GSList *nicklist_find_multiple(CHANNEL_REC *channel, const char *mask)
 189 {
 190         GSList *nicks, *tmp, *next;
 191
 192         g_return_val_if_fail(IS_CHANNEL(channel), NULL);
 193         g_return_val_if_fail(mask != NULL, NULL);
 194
 195         nicks = nicklist_getnicks(channel);
 196         for (tmp = nicks; tmp != NULL; tmp = next) {
 197                 NICK_REC *nick = tmp->data;
 198
 199                 next = tmp->next;
 200                 if (!mask_match_address(channel->server, mask,
 201                                         nick->nick, nick->host))
 202                         nicks = g_slist_remove(nicks, tmp->data);
 203         }
 204
 205         return nicks;
 206 }
 207
 208 /* Find nick */
 209 NICK_REC *nicklist_find(CHANNEL_REC *channel, const char *nick)
 210 {
 211         g_return_val_if_fail(IS_CHANNEL(channel), NULL);
 212         g_return_val_if_fail(nick != NULL, NULL);
 213
 214         return g_hash_table_lookup(channel->nicks, nick);
 215 }
 216
 217 NICK_REC *nicklist_find_unique(CHANNEL_REC *channel, const char *nick,
 218                                void *id)
 219 {
 220         NICK_REC *rec;
 221
 222         g_return_val_if_fail(IS_CHANNEL(channel), NULL);
 223         g_return_val_if_fail(nick != NULL, NULL);
 224
 225         rec = g_hash_table_lookup(channel->nicks, nick);
 226         while (rec != NULL && rec->unique_id != id)
 227                 rec = rec->next;
 228
 229         return rec;
 230 }
 231
 232 /* Find nick mask, wildcards allowed */
 233 NICK_REC *nicklist_find_mask(CHANNEL_REC *channel, const char *mask)
 234 {
 235         NICK_REC *nickrec;
 236         char *nick, *host;
 237
 238         g_return_val_if_fail(IS_CHANNEL(channel), NULL);
 239         g_return_val_if_fail(mask != NULL, NULL);
 240
 241         nick = g_strdup(mask);
 242         host = strchr(nick, '!');
 243         if (host != NULL) *host++ = '\0';
 244
 245         if (strchr(nick, '*') || strchr(nick, '?')) {
 246                 g_free(nick);
 247                 return nicklist_find_wildcards(channel, mask);
 248         }
 249
 250         nickrec = g_hash_table_lookup(channel->nicks, nick);
 251
 252         if (host != NULL) {
 253                 while (nickrec != NULL) {
 254                         if (nickrec->host != NULL &&
 255                             match_wildcards(host, nickrec->host))
 256                                 break; /* match */
 257                         nickrec = nickrec->next;
 258                 }
 259         }
 260         g_free(nick);
 261         return nickrec;
 262 }
 263
 264 static void get_nicks_hash(gpointer key, NICK_REC *rec, GSList **list)
 265 {
 266         while (rec != NULL) {
 267                 *list = g_slist_append(*list, rec);
 268                 rec = rec->next;
 269         }
 270 }
 271
 272 /* Get list of nicks */
 273 GSList *nicklist_getnicks(CHANNEL_REC *channel)
 274 {
 275         GSList *list;
 276
 277         g_return_val_if_fail(IS_CHANNEL(channel), NULL);
 278
 279         list = NULL;
 280         g_hash_table_foreach(channel->nicks, (GHFunc) get_nicks_hash, &list);
 281         return list;
 282 }
 283
 284 typedef struct {
 285         CHANNEL_REC *channel;
 286         const char *nick;
 287         GSList *list;
 288 } NICKLIST_GET_SAME_REC;
 289
 290 static void get_nicks_same_hash(gpointer key, NICK_REC *nick,
 291                                 NICKLIST_GET_SAME_REC *rec)
 292 {
 293         while (nick != NULL) {
 294                 if (g_strcasecmp(nick->nick, rec->nick) == 0) {
 295                         rec->list = g_slist_append(rec->list, rec->channel);
 296                         rec->list = g_slist_append(rec->list, nick);
 297                 }
 298
 299                 nick = nick->next;
 300         }
 301 }
 302
 303 GSList *nicklist_get_same(SERVER_REC *server, const char *nick)
 304 {
 305         NICKLIST_GET_SAME_REC rec;
 306         GSList *tmp;
 307
 308         g_return_val_if_fail(IS_SERVER(server), NULL);
 309
 310         rec.nick = nick;
 311         rec.list = NULL;
 312         for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
 313                 rec.channel = tmp->data;
 314                 g_hash_table_foreach(rec.channel->nicks,
 315                                      (GHFunc) get_nicks_same_hash, &rec);
 316         }
 317         return rec.list;
 318 }
 319
 320 typedef struct {
 321         CHANNEL_REC *channel;
 322         void *id;
 323         GSList *list;
 324 } NICKLIST_GET_SAME_UNIQUE_REC;
 325
 326 static void get_nicks_same_hash_unique(gpointer key, NICK_REC *nick,
 327                                        NICKLIST_GET_SAME_UNIQUE_REC *rec)
 328 {
 329         while (nick != NULL) {
 330                 if (nick->unique_id == rec->id) {
 331                         rec->list = g_slist_append(rec->list, rec->channel);
 332                         rec->list = g_slist_append(rec->list, nick);
 333                         break;
 334                 }
 335
 336                 nick = nick->next;
 337         }
 338 }
 339
 340 GSList *nicklist_get_same_unique(SERVER_REC *server, void *id)
 341 {
 342         NICKLIST_GET_SAME_UNIQUE_REC rec;
 343         GSList *tmp;
 344
 345         g_return_val_if_fail(IS_SERVER(server), NULL);
 346         g_return_val_if_fail(id != NULL, NULL);
 347
 348         rec.id = id;
 349         rec.list = NULL;
 350         for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
 351                 rec.channel = tmp->data;
 352                 g_hash_table_foreach(rec.channel->nicks,
 353                                      (GHFunc) get_nicks_same_hash_unique,
 354                                      &rec);
 355         }
 356         return rec.list;
 357 }
 358
 359 /* nick record comparision for sort functions */
 360 int nicklist_compare(NICK_REC *p1, NICK_REC *p2, const char *nick_prefix)
 361 {
 362         int i;
 363
 364         if (p1 == NULL) return -1;
 365         if (p2 == NULL) return 1;
 366
 367         if (p1->prefixes[0] == p2->prefixes[0])
 368                 return g_strcasecmp(p1->nick, p2->nick);
 369
 370         if (!p1->prefixes[0])
 371                 return 1;
 372         if (!p2->prefixes[0])
 373                 return -1;
 374
 375         /* They aren't equal.  We've taken care of that already.
 376          * The first one we encounter in this list is the greater.
 377          */
 378
 379         for (i = 0; nick_prefix[i] != '\0'; i++) {
 380                 if (p1->prefixes[0] == nick_prefix[i])
 381                         return -1;
 382                 if (p2->prefixes[0] == nick_prefix[i])
 383                         return 1;
 384         }
 385
 386         /* we should never have gotten here... */
 387         return g_strcasecmp(p1->nick, p2->nick);
 388 }
 389
 390 static void nicklist_update_flags_list(SERVER_REC *server, int gone,
 391                                        int serverop, GSList *nicks)
 392 {
 393         GSList *tmp;
 394         CHANNEL_REC *channel;
 395         NICK_REC *rec;
 396
 397         g_return_if_fail(IS_SERVER(server));
 398
 399         for (tmp = nicks; tmp != NULL; tmp = tmp->next->next) {
 400                 channel = tmp->data;
 401                 rec = tmp->next->data;
 402
 403                 rec->last_check = time(NULL);
 404
 405                 if (gone != -1 && (int)rec->gone != gone) {
 406                         rec->gone = gone;
 407                         signal_emit("nicklist gone changed", 2, channel, rec);
 408                 }
 409
 410                 if (serverop != -1 && (int)rec->serverop != serverop) {
 411                         rec->serverop = serverop;
 412                         signal_emit("nicklist serverop changed", 2, channel, rec);
 413                 }
 414         }
 415         g_slist_free(nicks);
 416 }
 417
 418 void nicklist_update_flags(SERVER_REC *server, const char *nick,
 419                            int gone, int serverop)
 420 {
 421         nicklist_update_flags_list(server, gone, serverop,
 422                                    nicklist_get_same(server, nick));
 423 }
 424
 425 void nicklist_update_flags_unique(SERVER_REC *server, void *id,
 426                                   int gone, int serverop)
 427 {
 428         nicklist_update_flags_list(server, gone, serverop,
 429                                    nicklist_get_same_unique(server, id));
 430 }
 431
 432 /* Specify which nick in channel is ours */
 433 void nicklist_set_own(CHANNEL_REC *channel, NICK_REC *nick)
 434 {
 435         NICK_REC *first, *next;
 436
 437         channel->ownnick = nick;
 438
 439         /* move our nick in the list to first, makes some things easier
 440            (like handling multiple identical nicks in fe-messages.c) */
 441         first = g_hash_table_lookup(channel->nicks, nick->nick);
 442         if (first->next == NULL)
 443                 return;
 444
 445         next = nick->next;
 446         nick->next = first;
 447
 448         while (first->next != nick)
 449                 first = first->next;
 450         first->next = next;
 451
 452         g_hash_table_insert(channel->nicks, nick->nick, nick);
 453 }
 454
 455 static void sig_channel_created(CHANNEL_REC *channel)
 456 {
 457         g_return_if_fail(IS_CHANNEL(channel));
 458
 459         channel->nicks = g_hash_table_new((GHashFunc) g_istr_hash,
 460                                           (GCompareFunc) g_istr_equal);
 461 }
 462
 463 static void nicklist_remove_hash(gpointer key, NICK_REC *nick,
 464                                  CHANNEL_REC *channel)
 465 {
 466         NICK_REC *next;
 467
 468         while (nick != NULL) {
 469                 next = nick->next;
 470                 nicklist_destroy(channel, nick);
 471                 nick = next;
 472         }
 473 }
 474
 475 static void sig_channel_destroyed(CHANNEL_REC *channel)
 476 {
 477         g_return_if_fail(IS_CHANNEL(channel));
 478
 479         g_hash_table_foreach(channel->nicks,
 480                              (GHFunc) nicklist_remove_hash, channel);
 481         g_hash_table_destroy(channel->nicks);
 482 }
 483
 484 static NICK_REC *nick_nfind(CHANNEL_REC *channel, const char *nick, int len)
 485 {
 486         NICK_REC *rec;
 487         char *tmpnick;
 488
 489         tmpnick = g_strndup(nick, len);
 490         rec = g_hash_table_lookup(channel->nicks, tmpnick);
 491
 492         if (rec != NULL) {
 493                 /* if there's multiple, get the one with identical case */
 494                 while (rec->next != NULL) {
 495                         if (strcmp(rec->nick, tmpnick) == 0)
 496                                 break;
 497                         rec = rec->next;
 498                 }
 499         }
 500
 501         g_free(tmpnick);
 502         return rec;
 503 }
 504
 505 /* Check is `msg' is meant for `nick'. */
 506 int nick_match_msg(CHANNEL_REC *channel, const char *msg, const char *nick)
 507 {
 508         const char *msgstart, *orignick;
 509         int len, fullmatch;
 510
 511         g_return_val_if_fail(nick != NULL, FALSE);
 512         g_return_val_if_fail(msg != NULL, FALSE);
 513
 514         if (channel != NULL && channel->server->nick_match_msg != NULL)
 515                 return channel->server->nick_match_msg(msg, nick);
 516
 517         /* first check for identical match */
 518         len = strlen(nick);
 519         if (g_strncasecmp(msg, nick, len) == 0 && !isalnumhigh((int) msg[len]))
 520                 return TRUE;
 521
 522         orignick = nick;
 523         for (;;) {
 524                 nick = orignick;
 525                 msgstart = msg;
 526                 fullmatch = TRUE;
 527
 528                 /* check if it matches for alphanumeric parts of nick */
 529                 while (*nick != '\0' && *msg != '\0') {
 530                         if (i_toupper(*nick) == i_toupper(*msg)) {
 531                                 /* total match */
 532                                 msg++;
 533                         } else if (i_isalnum(*msg) && !i_isalnum(*nick)) {
 534                                 /* some strange char in your nick, pass it */
 535                                 fullmatch = FALSE;
 536                         } else
 537                                 break;
 538
 539                         nick++;
 540                 }
 541
 542                 if (msg != msgstart && !isalnumhigh(*msg)) {
 543                         /* at least some of the chars in line matched the
 544                            nick, and msg continue with non-alphanum character,
 545                            this might be for us.. */
 546                         if (*nick != '\0') {
 547                                 /* remove the rest of the non-alphanum chars
 548                                    from nick and check if it then matches. */
 549                                 fullmatch = FALSE;
 550                                 while (*nick != '\0' && !i_isalnum(*nick))
 551                                         nick++;
 552                         }
 553
 554                         if (*nick == '\0') {
 555                                 /* yes, match! */
 556                                 break;
 557                         }
 558                 }
 559
 560                 /* no match. check if this is a message to multiple people
 561                    (like nick1,nick2: text) */
 562                 while (*msg != '\0' && *msg != ' ' && *msg != ',') msg++;
 563
 564                 if (*msg != ',') {
 565                         nick = orignick;
 566                         break;
 567                 }
 568
 569                 msg++;
 570         }
 571
 572         if (*nick != '\0')
 573                 return FALSE; /* didn't match */
 574
 575         if (fullmatch)
 576                 return TRUE; /* matched without fuzzyness */
 577
 578         if (channel != NULL) {
 579                 /* matched with some fuzzyness .. check if there's an exact match
 580                    for some other nick in the same channel. */
 581                 return nick_nfind(channel, msgstart, (int) (msg-msgstart)) == NULL;
 582         } else {
 583                 return TRUE;
 584         }
 585 }
 586
 587 void nicklist_init(void)
 588 {
 589         signal_add_first("channel created", (SIGNAL_FUNC) sig_channel_created);
 590         signal_add("channel destroyed", (SIGNAL_FUNC) sig_channel_destroyed);
 591 }
 592
 593 void nicklist_deinit(void)
 594 {
 595         signal_remove("channel created", (SIGNAL_FUNC) sig_channel_created);
 596         signal_remove("channel destroyed", (SIGNAL_FUNC) sig_channel_destroyed);
 597
 598         module_uniq_destroy("NICK");
 599 }