..adding new files..

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@171 dbcabf3a-b0e7-0310-adc4-f8d773084564

1 files changed, 248 insertions, 0 deletions

diff --git a/src/fe-common/irc/fe-ignore.c b/src/fe-common/irc/fe-ignore.c
new file mode 100644
index 00000000..35da7c84
--- /dev/null
+++ b/src/fe-common/irc/fe-ignore.c
@@ -0,0 +1,248 @@
+/*
+ fe-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 "module-formats.h"
+#include "signals.h"
+#include "commands.h"
+#include "levels.h"
+#include "misc.h"
+
+#include "irc.h"
+#include "irc-server.h"
+#include "ignore.h"
+
+static char *ignore_get_key(IGNORE_REC *rec)
+{
+	char *chans, *ret;
+
+	if (rec->channels == NULL)
+		return rec->mask != NULL ? g_strdup(rec->mask) : NULL;
+
+	chans = g_strjoinv(",", rec->channels);
+	if (rec->mask == NULL) return chans;
+
+	ret = g_strdup_printf("%s %s", rec->mask, chans);
+	g_free(chans);
+	return ret;
+}
+
+static char *ignore_get_levels(int level, int xlevel)
+{
+	GString *str;
+	char *levelstr, *p, *ret;
+
+	str = g_string_new(NULL);
+	if (level != 0) {
+		levelstr = bits2level(level);
+		g_string_append(str, levelstr);
+                g_free(levelstr);
+	}
+
+	if (xlevel != 0) {
+		if (str->len > 0) g_string_append_c(str, ' ');
+
+		levelstr = bits2level(xlevel);
+		for (p = levelstr; *p != '\0'; p++) {
+			if (!isspace(*p) && (p == levelstr || isspace(p[-1])))
+				g_string_append_c(str, '^');
+			g_string_append_c(str, *p);
+		}
+		g_free(levelstr);
+	}
+
+	ret = str->str;
+	g_string_free(str, FALSE);
+	return ret;
+}
+
+/* msgs ^notices : level=msgs, xlevel=notices */
+static void ignore_split_levels(const char *levels, int *level, int *xlevel)
+{
+	GString *slevel, *sxlevel;
+	char **levellist, **tmp;
+
+	if (*levels == '\0') return;
+
+        slevel = g_string_new(NULL);
+        sxlevel = g_string_new(NULL);
+
+	levellist = g_strsplit(levels, " ", -1);
+	for (tmp = levellist; *tmp != NULL; tmp++) {
+		if (**tmp == '^')
+			g_string_sprintfa(sxlevel, "%s ", (*tmp)+1);
+		else if (**tmp == '-' && (*tmp)[1] == '^')
+			g_string_sprintfa(sxlevel, "-%s ", (*tmp)+2);
+		else
+			g_string_sprintfa(slevel, "%s ", *tmp);
+	}
+	g_strfreev(levellist);
+
+	*level = combine_level(*level, slevel->str);
+	*xlevel = combine_level(*xlevel, sxlevel->str);
+
+	g_string_free(slevel, TRUE);
+	g_string_free(sxlevel, TRUE);
+}
+
+static void ignore_print(int index, IGNORE_REC *rec)
+{
+	char *key, *levels;
+
+	key = ignore_get_key(rec);
+	levels = ignore_get_levels(rec->level, rec->except_level);
+	printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP,
+		    IRCTXT_IGNORE_LINE, index,
+		    key != NULL ? key : "",
+		    levels != NULL ? levels : "",
+		    rec->fullword ? " -word" : "",
+		    rec->regexp ? " -regexp" : "");
+        g_free(key);
+	g_free(levels);
+}
+
+static void cmd_ignore_show(void)
+{
+	GSList *tmp;
+	int index;
+
+	printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, IRCTXT_IGNORE_HEADER);
+	index = 1;
+	for (tmp = ignores; tmp != NULL; tmp = tmp->next, index++) {
+		IGNORE_REC *rec = tmp->data;
+
+		ignore_print(index, rec);
+	}
+	printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, IRCTXT_IGNORE_FOOTER);
+}
+
+static void cmd_ignore(const char *data)
+{
+	/* /IGNORE [-regexp | -word] [-pattern <pattern>] [-except]
+	           [-channels <channel>] <mask> <levels>
+	   OR
+
+           /IGNORE [-regexp | -word] [-pattern <pattern>] [-except]
+	           <channels> <levels> */
+	char *params, *args, *patternarg, *chanarg, *mask, *levels, *key;
+	char **channels;
+	IGNORE_REC *rec;
+	int new_ignore;
+
+	if (*data == '\0') {
+		cmd_ignore_show();
+		return;
+	}
+
+	args = "pattern channels";
+	params = cmd_get_params(data, 5 | PARAM_FLAG_MULTIARGS | PARAM_FLAG_GETREST,
+				&args, &patternarg, &chanarg, &mask, &levels);
+	if (levels == 0) cmd_param_error(CMDERR_NOT_ENOUGH_PARAMS);
+
+	if (ischannel(*mask)) {
+		chanarg = mask;
+		mask = "";
+	}
+	channels = *chanarg == '\0' ? NULL :
+		g_strsplit(replace_chars(chanarg, ',', ' '), " ", -1);
+
+	rec = ignore_find(NULL, mask, channels);
+	new_ignore = rec == NULL;
+
+	if (rec == NULL) {
+		rec = g_new0(IGNORE_REC, 1);
+
+		rec->mask = *mask == '\0' ? NULL : g_strdup(mask);
+		rec->channels = channels;
+	} else {
+                g_free_and_null(rec->pattern);
+		g_strfreev(channels);
+	}
+
+	if (stristr(args, "-except") != NULL) {
+                rec->except_level = combine_level(rec->except_level, levels);
+	} else {
+		ignore_split_levels(levels, &rec->level, &rec->except_level);
+	}
+
+	rec->pattern = *patternarg == '\0' ? NULL : g_strdup(patternarg);
+	rec->fullword = stristr(args, "-word") != NULL;
+	rec->regexp = stristr(args, "-regexp") != NULL;
+
+        if (rec->level == 0 && rec->except_level == 0)
+		printformat(NULL, NULL, MSGLEVEL_CLIENTNOTICE, IRCTXT_UNIGNORED, rec->mask);
+	else {
+		key = ignore_get_key(rec);
+		levels = ignore_get_levels(rec->level, rec->except_level);
+		printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, IRCTXT_IGNORED, key, levels);
+		g_free(key);
+		g_free(levels);
+	}
+
+	if (new_ignore)
+		ignore_add_rec(rec);
+	else
+		ignore_update_rec(rec);
+
+	g_free(params);
+}
+
+static void cmd_unignore(const char *data)
+{
+	IGNORE_REC *rec;
+	GSList *tmp;
+	char *key;
+
+	if (is_numeric(data, ' ')) {
+		/* with index number */
+		tmp = g_slist_nth(ignores, atol(data)-1);
+		rec = tmp == NULL ? NULL : tmp->data;
+	} else {
+		/* with mask */
+		char *chans[2] = { "*", NULL };
+
+		if (ischannel(*data)) chans[0] = (char *) data;
+		rec = ignore_find("*", ischannel(*data) ? NULL : data, chans);
+	}
+
+	if (rec == NULL)
+		printformat(NULL, NULL, MSGLEVEL_CLIENTNOTICE, IRCTXT_IGNORE_NOT_FOUND, data);
+	else {
+		key = ignore_get_key(rec);
+		printformat(NULL, NULL, MSGLEVEL_CLIENTNOTICE, IRCTXT_UNIGNORED, key);
+		g_free(key);
+
+		rec->level = 0;
+		rec->except_level = 0;
+		ignore_update_rec(rec);
+	}
+}
+
+void fe_ignore_init(void)
+{
+	command_bind("ignore", NULL, (SIGNAL_FUNC) cmd_ignore);
+	command_bind("unignore", NULL, (SIGNAL_FUNC) cmd_unignore);
+}
+
+void fe_ignore_deinit(void)
+{
+	command_unbind("ignore", (SIGNAL_FUNC) cmd_ignore);
+	command_unbind("unignore", (SIGNAL_FUNC) cmd_unignore);
+}