Created SILC Runtime Toolkit git repository Part I.
[runtime.git] / apps / irssi / src / core / ignore.c
diff --git a/apps/irssi/src/core/ignore.c b/apps/irssi/src/core/ignore.c
deleted file mode 100644 (file)
index 99986dd..0000000
+++ /dev/null
@@ -1,486 +0,0 @@
-/*
- ignore.c : irssi
-
-    Copyright (C) 1999-2000 Timo Sirainen
-
-    This program is free software; you can redistribute it and/or modify
-    it under the terms of the GNU General Public License as published by
-    the Free Software Foundation; either version 2 of the License, or
-    (at your option) any later version.
-
-    This program is distributed in the hope that it will be useful,
-    but WITHOUT ANY WARRANTY; without even the implied warranty of
-    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-    GNU General Public License for more details.
-
-    You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
-    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-*/
-
-#include "module.h"
-#include "signals.h"
-#include "misc.h"
-#include "levels.h"
-#include "lib-config/iconfig.h"
-#include "settings.h"
-
-#include "masks.h"
-#include "servers.h"
-#include "channels.h"
-#include "nicklist.h"
-#include "nickmatch-cache.h"
-
-#include "ignore.h"
-
-GSList *ignores;
-
-static NICKMATCH_REC *nickmatch;
-static int time_tag;
-
-/* check if `text' contains ignored nick at the start of the line. */
-static int ignore_check_replies_rec(IGNORE_REC *rec, CHANNEL_REC *channel,
-                                   const char *text)
-{
-       GSList *nicks, *tmp;
-
-       nicks = nicklist_find_multiple(channel, rec->mask);
-       if (nicks == NULL) return FALSE;
-
-       for (tmp = nicks; tmp != NULL; tmp = tmp->next) {
-               NICK_REC *nick = tmp->data;
-
-               if (nick_match_msg(channel, text, nick->nick))
-                       return TRUE;
-       }
-       g_slist_free(nicks);
-
-       return FALSE;
-}
-
-static int ignore_check_replies(CHANNEL_REC *chanrec, const char *text)
-{
-       GSList *tmp;
-
-       if (text == NULL || chanrec == NULL)
-               return FALSE;
-
-        /* check reply ignores */
-       for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
-               IGNORE_REC *rec = tmp->data;
-
-               if (rec->mask != NULL && rec->replies &&
-                   ignore_check_replies_rec(rec, chanrec, text))
-                       return TRUE;
-       }
-
-       return FALSE;
-}
-
-static int ignore_match_pattern(IGNORE_REC *rec, const char *text)
-{
-       if (rec->pattern == NULL)
-               return TRUE;
-
-        if (text == NULL)
-               return FALSE;
-
-       if (rec->regexp) {
-#ifdef HAVE_REGEX_H
-               return rec->regexp_compiled &&
-                       regexec(&rec->preg, text, 0, NULL, 0) == 0;
-#else
-                return FALSE;
-#endif
-       }
-
-       return rec->fullword ?
-               stristr_full(text, rec->pattern) != NULL :
-               stristr(text, rec->pattern) != NULL;
-}
-
-#define ignore_match_level(rec, level) \
-        ((level & (rec)->level) != 0)
-
-#define ignore_match_nickmask(rec, nick, nickmask) \
-       ((rec)->mask == NULL || \
-       (strchr((rec)->mask, '!') != NULL ? \
-               match_wildcards((rec)->mask, nickmask) : \
-               match_wildcards((rec)->mask, nick)))
-
-#define ignore_match_server(rec, server) \
-       ((rec)->servertag == NULL || \
-       g_strcasecmp((server)->tag, (rec)->servertag) == 0)
-
-#define ignore_match_channel(rec, channel) \
-       ((rec)->channels == NULL || ((channel) != NULL && \
-               strarray_find((rec)->channels, (channel)) != -1))
-
-static int ignore_check_without_mask(GSList *list, CHANNEL_REC *channel,
-                                    int level, const char *text)
-{
-       GSList *tmp;
-        int len, best_mask, best_match, best_patt;
-
-        best_mask = best_patt = -1; best_match = FALSE;
-       for (tmp = list; tmp != NULL; tmp = tmp->next) {
-               IGNORE_REC *rec = tmp->data;
-
-               if (ignore_match_level(rec, level) &&
-                   ignore_match_pattern(rec, text)) {
-                       len = rec->mask == NULL ? 0 : strlen(rec->mask);
-                       if (len > best_mask) {
-                               best_mask = len;
-                               best_match = !rec->exception;
-                       } else if (len == best_mask && rec->pattern != NULL) {
-                               len = strlen(rec->pattern);
-                               if (len > best_patt) {
-                                       best_patt = len;
-                                       best_match = !rec->exception;
-                               }
-                       }
-               }
-       }
-
-       if (best_match || (level & MSGLEVEL_PUBLIC) == 0)
-               return best_match;
-
-        return ignore_check_replies(channel, text);
-}
-
-int ignore_check(SERVER_REC *server, const char *nick, const char *host,
-                const char *channel, const char *text, int level)
-{
-       CHANNEL_REC *chanrec;
-       NICK_REC *nickrec;
-        IGNORE_REC *rec;
-       GSList *tmp, *list;
-        char *nickmask;
-        int len, best_mask, best_match, best_patt;
-
-       g_return_val_if_fail(server != NULL, 0);
-        if (nick == NULL) nick = "";
-
-       chanrec = server == NULL || channel == NULL ? NULL :
-               channel_find(server, channel);
-       if (chanrec != NULL && nick != NULL &&
-           (nickrec = nicklist_find(chanrec, nick)) != NULL) {
-                /* nick found - check only ignores in nickmatch cache */
-               if (nickrec->host == NULL)
-                       nicklist_set_host(chanrec, nickrec, host);
-
-               list = nickmatch_find(nickmatch, nickrec);
-               return ignore_check_without_mask(list, chanrec, level, text);
-       }
-
-       nickmask = g_strconcat(nick, "!", host, NULL);
-
-        best_mask = best_patt = -1; best_match = FALSE;
-       for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
-               rec = tmp->data;
-
-               if (ignore_match_level(rec, level) &&
-                   ignore_match_server(rec, server) &&
-                   ignore_match_channel(rec, channel) &&
-                   ignore_match_nickmask(rec, nick, nickmask) &&
-                   ignore_match_pattern(rec, text)) {
-                       len = rec->mask == NULL ? 0 : strlen(rec->mask);
-                       if (len > best_mask) {
-                               best_mask = len;
-                               best_match = !rec->exception;
-                       } else if (len == best_mask && rec->pattern != NULL) {
-                               len = strlen(rec->pattern);
-                               if (len > best_patt) {
-                                       best_patt = len;
-                                       best_match = !rec->exception;
-                               }
-                       }
-               }
-       }
-        g_free(nickmask);
-
-       if (best_match || (level & MSGLEVEL_PUBLIC) == 0)
-               return best_match;
-
-        return ignore_check_replies(chanrec, text);
-}
-
-IGNORE_REC *ignore_find(const char *servertag, const char *mask,
-                       char **channels)
-{
-       GSList *tmp;
-       char **chan;
-       int ignore_servertag;
-
-       if (mask != NULL && (*mask == '\0' || strcmp(mask, "*") == 0))
-               mask = NULL;
-
-       ignore_servertag = servertag != NULL && strcmp(servertag, "*") == 0;
-       for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
-               IGNORE_REC *rec = tmp->data;
-
-               if (!ignore_servertag) {
-                       if ((servertag == NULL && rec->servertag != NULL) ||
-                           (servertag != NULL && rec->servertag == NULL))
-                               continue;
-
-                       if (servertag != NULL && g_strcasecmp(servertag, rec->servertag) != 0)
-                               continue;
-               }
-
-               if ((rec->mask == NULL && mask != NULL) ||
-                   (rec->mask != NULL && mask == NULL)) continue;
-
-               if (rec->mask != NULL && g_strcasecmp(rec->mask, mask) != 0)
-                       continue;
-
-               if ((channels == NULL && rec->channels == NULL))
-                       return rec; /* no channels - ok */
-
-               if (channels != NULL && strcmp(*channels, "*") == 0)
-                       return rec; /* ignore channels */
-
-               if (channels == NULL || rec->channels == NULL)
-                       continue; /* other doesn't have channels */
-
-               if (strarray_length(channels) != strarray_length(rec->channels))
-                       continue; /* different amount of channels */
-
-               /* check that channels match */
-               for (chan = channels; *chan != NULL; chan++) {
-                       if (strarray_find(rec->channels, *chan) == -1)
-                                break;
-               }
-
-               if (*chan == NULL)
-                       return rec; /* channels ok */
-       }
-
-       return NULL;
-}
-
-static void ignore_set_config(IGNORE_REC *rec)
-{
-       CONFIG_NODE *node;
-       char *levelstr;
-
-       if (rec->level == 0)
-               return;
-
-       node = iconfig_node_traverse("(ignores", TRUE);
-       node = config_node_section(node, NULL, NODE_TYPE_BLOCK);
-
-       if (rec->mask != NULL) iconfig_node_set_str(node, "mask", rec->mask);
-       if (rec->level) {
-               levelstr = bits2level(rec->level);
-               iconfig_node_set_str(node, "level", levelstr);
-               g_free(levelstr);
-       }
-       iconfig_node_set_str(node, "pattern", rec->pattern);
-       if (rec->exception) iconfig_node_set_bool(node, "exception", TRUE);
-       if (rec->regexp) iconfig_node_set_bool(node, "regexp", TRUE);
-       if (rec->fullword) iconfig_node_set_bool(node, "fullword", TRUE);
-       if (rec->replies) iconfig_node_set_bool(node, "replies", TRUE);
-       if (rec->unignore_time != 0)
-               iconfig_node_set_int(node, "unignore_time", rec->unignore_time);
-       iconfig_node_set_str(node, "servertag", rec->servertag);
-
-       if (rec->channels != NULL && *rec->channels != NULL) {
-               node = config_node_section(node, "channels", NODE_TYPE_LIST);
-               iconfig_node_add_list(node, rec->channels);
-       }
-}
-
-static int ignore_index(IGNORE_REC *find)
-{
-       GSList *tmp;
-       int index;
-
-       index = 0;
-       for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
-               IGNORE_REC *rec = tmp->data;
-
-               if (rec == find)
-                       return index;
-               index++;
-       }
-
-       return -1;
-}
-
-static void ignore_remove_config(IGNORE_REC *rec)
-{
-       CONFIG_NODE *node;
-
-       node = iconfig_node_traverse("ignores", FALSE);
-       if (node != NULL) iconfig_node_list_remove(node, ignore_index(rec));
-}
-
-static void ignore_init_rec(IGNORE_REC *rec)
-{
-#ifdef HAVE_REGEX_H
-       if (rec->regexp_compiled) regfree(&rec->preg);
-       rec->regexp_compiled = !rec->regexp || rec->pattern == NULL ? FALSE :
-               regcomp(&rec->preg, rec->pattern,
-                       REG_EXTENDED|REG_ICASE|REG_NOSUB) == 0;
-#endif
-}
-
-void ignore_add_rec(IGNORE_REC *rec)
-{
-       ignore_init_rec(rec);
-
-       ignores = g_slist_append(ignores, rec);
-       ignore_set_config(rec);
-
-       signal_emit("ignore created", 1, rec);
-       nickmatch_rebuild(nickmatch);
-}
-
-static void ignore_destroy(IGNORE_REC *rec, int send_signal)
-{
-       ignores = g_slist_remove(ignores, rec);
-       if (send_signal)
-               signal_emit("ignore destroyed", 1, rec);
-
-#ifdef HAVE_REGEX_H
-       if (rec->regexp_compiled) regfree(&rec->preg);
-#endif
-       if (rec->channels != NULL) g_strfreev(rec->channels);
-       g_free_not_null(rec->mask);
-       g_free_not_null(rec->servertag);
-       g_free_not_null(rec->pattern);
-       g_free(rec);
-
-       nickmatch_rebuild(nickmatch);
-}
-
-void ignore_update_rec(IGNORE_REC *rec)
-{
-       if (rec->level == 0) {
-               /* unignored everything */
-               ignore_remove_config(rec);
-               ignore_destroy(rec, TRUE);
-       } else {
-               /* unignore just some levels.. */
-               ignore_remove_config(rec);
-               ignores = g_slist_remove(ignores, rec);
-
-               ignores = g_slist_append(ignores, rec);
-               ignore_set_config(rec);
-
-                ignore_init_rec(rec);
-               signal_emit("ignore changed", 1, rec);
-               nickmatch_rebuild(nickmatch);
-       }
-}
-
-static int unignore_timeout(void)
-{
-       GSList *tmp, *next;
-        time_t now;
-
-        now = time(NULL);
-       for (tmp = ignores; tmp != NULL; tmp = next) {
-               IGNORE_REC *rec = tmp->data;
-
-               next = tmp->next;
-               if (rec->unignore_time > 0 && now >= rec->unignore_time) {
-                       rec->level = 0;
-                       ignore_update_rec(rec);
-               }
-       }
-
-       return TRUE;
-}
-
-static void read_ignores(void)
-{
-       IGNORE_REC *rec;
-       CONFIG_NODE *node;
-       GSList *tmp;
-
-       while (ignores != NULL)
-                ignore_destroy(ignores->data, FALSE);
-
-       node = iconfig_node_traverse("ignores", FALSE);
-       if (node == NULL) {
-               nickmatch_rebuild(nickmatch);
-               return;
-       }
-
-       tmp = config_node_first(node->value);
-       for (; tmp != NULL; tmp = config_node_next(tmp)) {
-               node = tmp->data;
-
-               if (node->type != NODE_TYPE_BLOCK)
-                       continue;
-
-               rec = g_new0(IGNORE_REC, 1);
-               ignores = g_slist_append(ignores, rec);
-
-               rec->mask = g_strdup(config_node_get_str(node, "mask", NULL));
-               rec->pattern = g_strdup(config_node_get_str(node, "pattern", NULL));
-               rec->level = level2bits(config_node_get_str(node, "level", ""));
-                rec->exception = config_node_get_bool(node, "exception", FALSE);
-               rec->regexp = config_node_get_bool(node, "regexp", FALSE);
-               rec->fullword = config_node_get_bool(node, "fullword", FALSE);
-               rec->replies = config_node_get_bool(node, "replies", FALSE);
-               rec->unignore_time = config_node_get_int(node, "unignore_time", 0);
-               rec->servertag = g_strdup(config_node_get_str(node, "servertag", 0));
-
-               node = config_node_section(node, "channels", -1);
-               if (node != NULL) rec->channels = config_node_get_list(node);
-
-               ignore_init_rec(rec);
-       }
-
-       nickmatch_rebuild(nickmatch);
-}
-
-static void ignore_nick_cache(GHashTable *list, CHANNEL_REC *channel,
-                             NICK_REC *nick)
-{
-       GSList *tmp, *matches;
-        char *nickmask;
-
-       if (nick->host == NULL)
-               return; /* don't check until host is known */
-
-        matches = NULL;
-       nickmask = g_strconcat(nick->nick, "!", nick->host, NULL);
-       for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
-               IGNORE_REC *rec = tmp->data;
-
-               if (ignore_match_nickmask(rec, nick->nick, nickmask) &&
-                   ignore_match_server(rec, channel->server) &&
-                   ignore_match_channel(rec, channel->name))
-                       matches = g_slist_append(matches, rec);
-       }
-       g_free_not_null(nickmask);
-
-       if (matches == NULL)
-               g_hash_table_remove(list, nick);
-        else
-                g_hash_table_insert(list, nick, matches);
-}
-
-void ignore_init(void)
-{
-       ignores = NULL;
-       nickmatch = nickmatch_init(ignore_nick_cache);
-       time_tag = g_timeout_add(1000, (GSourceFunc) unignore_timeout, NULL);
-
-        read_ignores();
-        signal_add("setup reread", (SIGNAL_FUNC) read_ignores);
-}
-
-void ignore_deinit(void)
-{
-       g_source_remove(time_tag);
-       while (ignores != NULL)
-                ignore_destroy(ignores->data, TRUE);
-        nickmatch_deinit(nickmatch);
-
-       signal_remove("setup reread", (SIGNAL_FUNC) read_ignores);
-}