path: root/filter/filter-rule.c

/*
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) version 3.
 *
 * 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with the program; if not, see <http://www.gnu.org/licenses/>  
 *
 *
 * Authors:
 *      Not Zed <notzed@lostzed.mmc.com.au>
 *      Jeffrey Stedfast <fejj@ximian.com>
 *
 * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com)
 *
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <string.h>

#include <gtk/gtk.h>
#include <glib/gi18n.h>

#include "e-util/e-error.h"
#include "filter-rule.h"
#include "rule-context.h"

#define d(x)

static int validate(FilterRule *);
static int rule_eq(FilterRule *fr, FilterRule *cm);
static xmlNodePtr xml_encode (FilterRule *);
static int xml_decode (FilterRule *, xmlNodePtr, RuleContext *);
static void build_code (FilterRule *, GString * out);
static void rule_copy  (FilterRule *dest, FilterRule *src);
static GtkWidget *get_widget (FilterRule * fr, struct _RuleContext *f);

static void filter_rule_class_init (FilterRuleClass *klass);
static void filter_rule_init (FilterRule *fr);
static void filter_rule_finalise (GObject *obj);

#define _PRIVATE(x) (((FilterRule *)(x))->priv)

struct _FilterRulePrivate {
    int frozen;
};

static GObjectClass *parent_class = NULL;

enum {
    CHANGED,
    LAST_SIGNAL
};

static guint signals[LAST_SIGNAL] = { 0 };

GType
filter_rule_get_type (void)
{
    static GType type = 0;

    if (!type) {
        static const GTypeInfo info = {
            sizeof (FilterRuleClass),
            NULL, /* base_class_init */
            NULL, /* base_class_finalize */
            (GClassInitFunc) filter_rule_class_init,
            NULL, /* class_finalize */
            NULL, /* class_data */
            sizeof (FilterRule),
            0,    /* n_preallocs */
            (GInstanceInitFunc) filter_rule_init,
        };

        type = g_type_register_static (G_TYPE_OBJECT, "FilterRule", &info, 0);
    }

    return type;
}

static void
filter_rule_class_init (FilterRuleClass *klass)
{
    GObjectClass *object_class = G_OBJECT_CLASS (klass);

    parent_class = g_type_class_ref (G_TYPE_OBJECT);

    object_class->finalize = filter_rule_finalise;

    /* override methods */
    klass->validate = validate;
    klass->eq = rule_eq;
    klass->xml_encode = xml_encode;
    klass->xml_decode = xml_decode;
    klass->build_code = build_code;
    klass->copy = rule_copy;
    klass->get_widget = get_widget;

    /* signals */
    signals[CHANGED] =
        g_signal_new ("changed",
                  FILTER_TYPE_RULE,
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (FilterRuleClass, changed),
                  NULL,
                  NULL,
                  g_cclosure_marshal_VOID__VOID,
                  G_TYPE_NONE, 0);
}

static void
filter_rule_init (FilterRule *fr)
{
    fr->priv = g_malloc0 (sizeof (*fr->priv));
    fr->enabled = TRUE;
}

static void
filter_rule_finalise (GObject *obj)
{
    FilterRule *fr = (FilterRule *) obj;

    g_free (fr->name);
    g_free (fr->source);
    g_list_foreach (fr->parts, (GFunc)g_object_unref, NULL);
    g_list_free (fr->parts);

    g_free (fr->priv);

    G_OBJECT_CLASS (parent_class)->finalize (obj);
}

/**
 * filter_rule_new:
 *
 * Create a new FilterRule object.
 *
 * Return value: A new #FilterRule object.
 **/
FilterRule *
filter_rule_new (void)
{
    return (FilterRule *) g_object_new (FILTER_TYPE_RULE, NULL, NULL);
}

FilterRule *
filter_rule_clone (FilterRule *base)
{
    FilterRule *rule;

    g_return_val_if_fail (IS_FILTER_RULE (base), NULL);

    rule = g_object_new (G_OBJECT_TYPE (base), NULL, NULL);
    filter_rule_copy (rule, base);

    return rule;
}

void
filter_rule_set_name (FilterRule *fr, const char *name)
{
    g_return_if_fail (IS_FILTER_RULE (fr));

    if ((fr->name && name && strcmp (fr->name, name) == 0)
        || (fr->name == NULL && name == NULL))
        return;

    g_free (fr->name);
    fr->name = g_strdup (name);

    filter_rule_emit_changed (fr);
}

void
filter_rule_set_source (FilterRule *fr, const char *source)
{
    g_return_if_fail (IS_FILTER_RULE (fr));

    if ((fr->source && source && strcmp (fr->source, source) == 0)
        || (fr->source == NULL && source == NULL))
        return;

    g_free (fr->source);
    fr->source = g_strdup (source);

    filter_rule_emit_changed (fr);
}

int
filter_rule_validate (FilterRule *fr)
{
    g_return_val_if_fail (IS_FILTER_RULE (fr), 0);

    return FILTER_RULE_GET_CLASS (fr)->validate (fr);
}

static int
validate (FilterRule *fr)
{
    int valid = TRUE;
    GList *parts;

    if (!fr->name || !*fr->name) {
        /* FIXME: FilterElement should probably have a
                   GtkWidget member pointing to the value gotten with
                   ::get_widget() so that we can get the parent window
                   here. */
        e_error_run(NULL, "filter:no-name", NULL);

        return FALSE;
    }

    /* validate rule parts */
    parts = fr->parts;
    valid = parts != NULL;
    while (parts && valid) {
        valid = filter_part_validate ((FilterPart *) parts->data);
        parts = parts->next;
    }

    return valid;
}

int
filter_rule_eq (FilterRule *fr, FilterRule *cm)
{
    g_return_val_if_fail (IS_FILTER_RULE (fr), 0);
    g_return_val_if_fail (IS_FILTER_RULE (cm), 0);

    return (FILTER_RULE_GET_CLASS (fr) == FILTER_RULE_GET_CLASS (cm))
        && FILTER_RULE_GET_CLASS (fr)->eq (fr, cm);
}

static int
list_eq(GList *al, GList *bl)
{
    int truth = TRUE;

    while (truth && al && bl) {
        FilterPart *a = al->data, *b = bl->data;

        truth = filter_part_eq (a, b);
        al = al->next;
        bl = bl->next;
    }

    return truth && al == NULL && bl == NULL;
}

static int
rule_eq (FilterRule *fr, FilterRule *cm)
{
    return fr->enabled == cm->enabled
        && fr->grouping == cm->grouping
        && fr->threading == fr->threading
        && ((fr->name && cm->name && strcmp (fr->name, cm->name) == 0)
             || (fr->name == NULL && cm->name == NULL))
        && ((fr->source && cm->source && strcmp (fr->source, cm->source) == 0)
             || (fr->source == NULL && cm->source == NULL) )
        && list_eq (fr->parts, cm->parts);
}

xmlNodePtr
filter_rule_xml_encode (FilterRule *fr)
{
    g_return_val_if_fail (IS_FILTER_RULE (fr), NULL);

    return FILTER_RULE_GET_CLASS (fr)->xml_encode (fr);
}

static xmlNodePtr
xml_encode (FilterRule *fr)
{
    xmlNodePtr node, set, work;
    GList *l;

    node = xmlNewNode (NULL, (const unsigned char *)"rule");

    xmlSetProp (node, (const unsigned char *)"enabled", (const unsigned char *)(fr->enabled ? "true" : "false"));

    switch (fr->grouping) {
    case FILTER_GROUP_ALL:
        xmlSetProp (node, (const unsigned char *)"grouping", (const unsigned char *)"all");
        break;
    case FILTER_GROUP_ANY:
        xmlSetProp (node, (const unsigned char *)"grouping", (const unsigned char *)"any");
        break;
    }

    switch (fr->threading) {
    case FILTER_THREAD_NONE:
        break;
    case FILTER_THREAD_ALL:
        xmlSetProp(node, (const unsigned char *)"threading", (const unsigned char *)"all");
        break;
    case FILTER_THREAD_REPLIES:
        xmlSetProp(node, (const unsigned char *)"threading", (const unsigned char *)"replies");
        break;
    case FILTER_THREAD_REPLIES_PARENTS:
        xmlSetProp(node, (const unsigned char *)"threading", (const unsigned char *)"replies_parents");
        break;
    case FILTER_THREAD_SINGLE:
        xmlSetProp(node, (const unsigned char *)"threading", (const unsigned char *)"single");
        break;
    }

    if (fr->source) {
        xmlSetProp (node, (const unsigned char *)"source", (unsigned char *)fr->source);
    } else {
        /* set to the default filter type */
        xmlSetProp (node, (const unsigned char *)"source", (const unsigned char *)"incoming");
    }

    if (fr->name) {
        char *escaped = g_markup_escape_text (fr->name, -1);

        work = xmlNewNode (NULL, (const unsigned char *)"title");
        xmlNodeSetContent (work, (unsigned char *)escaped);
        xmlAddChild (node, work);

        g_free (escaped);
    }

    set = xmlNewNode (NULL, (const unsigned char *)"partset");
    xmlAddChild (node, set);
    l = fr->parts;
    while (l) {
        work = filter_part_xml_encode ((FilterPart *) l->data);
        xmlAddChild (set, work);
        l = l->next;
    }

    return node;
}

static void
load_set (xmlNodePtr node, FilterRule *fr, RuleContext *f)
{
    xmlNodePtr work;
    char *rulename;
    FilterPart *part;

    work = node->children;
    while (work) {
        if (!strcmp ((char *)work->name, "part")) {
            rulename = (char *)xmlGetProp (work, (const unsigned char *)"name");
            part = rule_context_find_part (f, rulename);
            if (part) {
                part = filter_part_clone (part);
                filter_part_xml_decode (part, work);
                filter_rule_add_part (fr, part);
            } else {
                g_warning ("cannot find rule part '%s'\n", rulename);
            }
            xmlFree (rulename);
        } else if (work->type == XML_ELEMENT_NODE) {
            g_warning ("Unknown xml node in part: %s", work->name);
        }
        work = work->next;
    }
}

int
filter_rule_xml_decode (FilterRule *fr, xmlNodePtr node, RuleContext *f)
{
    int res;

    g_return_val_if_fail (IS_FILTER_RULE (fr), 0);
    g_return_val_if_fail (IS_RULE_CONTEXT (f), 0);
    g_return_val_if_fail (node != NULL, 0);

    fr->priv->frozen++;
    res = FILTER_RULE_GET_CLASS (fr)->xml_decode (fr, node, f);
    fr->priv->frozen--;

    filter_rule_emit_changed (fr);

    return res;
}

static int
xml_decode (FilterRule *fr, xmlNodePtr node, RuleContext *f)
{
    xmlNodePtr work;
    char *grouping;
    char *source;

    if (fr->name) {
        g_free (fr->name);
        fr->name = NULL;
    }

    grouping = (char *)xmlGetProp (node, (const unsigned char *)"enabled");
    if (!grouping)
        fr->enabled = TRUE;
    else {
        fr->enabled = strcmp (grouping, "false") != 0;
        xmlFree (grouping);
    }

    grouping = (char *)xmlGetProp (node, (const unsigned char *)"grouping");
    if (!strcmp (grouping, "any"))
        fr->grouping = FILTER_GROUP_ANY;
    else
        fr->grouping = FILTER_GROUP_ALL;
    xmlFree (grouping);

    fr->threading = FILTER_THREAD_NONE;
    if (f->flags & RULE_CONTEXT_THREADING
        && (grouping = (char *)xmlGetProp (node, (const unsigned char *)"threading"))) {
        if (!strcmp(grouping, "all"))
            fr->threading = FILTER_THREAD_ALL;
        else if (!strcmp(grouping, "replies"))
            fr->threading = FILTER_THREAD_REPLIES;
        else if (!strcmp(grouping, "replies_parents"))
            fr->threading = FILTER_THREAD_REPLIES_PARENTS;
        else if (!strcmp(grouping, "single"))
            fr->threading = FILTER_THREAD_SINGLE;
        xmlFree (grouping);
    }

    g_free (fr->source);
    source = (char *)xmlGetProp (node, (const unsigned char *)"source");
    if (source) {
        fr->source = g_strdup (source);
        xmlFree (source);
    } else {
        /* default filter type */
        fr->source = g_strdup ("incoming");
    }

    work = node->children;
    while (work) {
        if (!strcmp ((char *)work->name, "partset")) {
            load_set (work, fr, f);
        } else if (!strcmp ((char *)work->name, "title") || !strcmp ((char *)work->name, "_title")) {
            if (!fr->name) {
                char *str, *decstr = NULL;

                str = (char *)xmlNodeGetContent (work);
                if (str) {
                    decstr = g_strdup (_(str));
                    xmlFree (str);
                }
                fr->name = decstr;
            }
        }
        work = work->next;
    }

    return 0;
}

static void
rule_copy (FilterRule *dest, FilterRule *src)
{
    GList *node;

    dest->enabled = src->enabled;

    g_free (dest->name);
    dest->name = g_strdup (src->name);

    g_free (dest->source);
    dest->source = g_strdup (src->source);

    dest->grouping = src->grouping;
    dest->threading = src->threading;

    if (dest->parts) {
        g_list_foreach (dest->parts, (GFunc) g_object_unref, NULL);
        g_list_free (dest->parts);
        dest->parts = NULL;
    }

    node = src->parts;
    while (node) {
        FilterPart *part;

        part = filter_part_clone (node->data);
        dest->parts = g_list_append (dest->parts, part);
        node = node->next;
    }
}

void
filter_rule_copy (FilterRule *dest, FilterRule *src)
{
    g_return_if_fail (IS_FILTER_RULE (dest));
    g_return_if_fail (IS_FILTER_RULE (src));

    FILTER_RULE_GET_CLASS (dest)->copy (dest, src);

    filter_rule_emit_changed (dest);
}

void
filter_rule_add_part (FilterRule *fr, FilterPart *fp)
{
    g_return_if_fail (IS_FILTER_RULE (fr));
    g_return_if_fail (IS_FILTER_PART (fp));

    fr->parts = g_list_append (fr->parts, fp);

    filter_rule_emit_changed (fr);
}

void
filter_rule_remove_part (FilterRule *fr, FilterPart *fp)
{
    g_return_if_fail (IS_FILTER_RULE (fr));
    g_return_if_fail (IS_FILTER_PART (fp));

    fr->parts = g_list_remove (fr->parts, fp);

    filter_rule_emit_changed (fr);
}

void
filter_rule_replace_part (FilterRule *fr, FilterPart *fp, FilterPart *new)
{
    GList *l;

    g_return_if_fail (IS_FILTER_RULE (fr));
    g_return_if_fail (IS_FILTER_PART (fp));
    g_return_if_fail (IS_FILTER_PART (new));

    l = g_list_find (fr->parts, fp);
    if (l) {
        l->data = new;
    } else {
        fr->parts = g_list_append (fr->parts, new);
    }

    filter_rule_emit_changed (fr);
}

void
filter_rule_build_code (FilterRule *fr, GString *out)
{
    g_return_if_fail (IS_FILTER_RULE (fr));
    g_return_if_fail (out != NULL);

    FILTER_RULE_GET_CLASS (fr)->build_code (fr, out);

    d(printf ("build_code: [%s](%d)", out->str, out->len));
}

void
filter_rule_emit_changed(FilterRule *fr)
{
    g_return_if_fail (IS_FILTER_RULE (fr));

    if (fr->priv->frozen == 0)
        g_signal_emit (fr, signals[CHANGED], 0);
}

static void
build_code (FilterRule *fr, GString *out)
{
    switch (fr->threading) {
    case FILTER_THREAD_NONE:
        break;
    case FILTER_THREAD_ALL:
        g_string_append(out, " (match-threads \"all\" ");
        break;
    case FILTER_THREAD_REPLIES:
        g_string_append(out, " (match-threads \"replies\" ");
        break;
    case FILTER_THREAD_REPLIES_PARENTS:
        g_string_append(out, " (match-threads \"replies_parents\" ");
        break;
    case FILTER_THREAD_SINGLE:
        g_string_append(out, " (match-threads \"single\" ");
        break;
    }

    switch (fr->grouping) {
    case FILTER_GROUP_ALL:
        g_string_append (out, " (and\n  ");
        break;
    case FILTER_GROUP_ANY:
        g_string_append (out, " (or\n  ");
        break;
    default:
        g_warning ("Invalid grouping");
    }

    filter_part_build_code_list (fr->parts, out);
    g_string_append (out, ")\n");

    if (fr->threading != FILTER_THREAD_NONE)
        g_string_append (out, ")\n");
}

static void
fr_grouping_changed(GtkWidget *w, FilterRule *fr)
{
    fr->grouping = gtk_combo_box_get_active (GTK_COMBO_BOX (w));
}

static void
fr_threading_changed(GtkWidget *w, FilterRule *fr)
{
    fr->threading = gtk_combo_box_get_active (GTK_COMBO_BOX (w));
}

struct _part_data {
    FilterRule *fr;
    RuleContext *f;
    FilterPart *part;
    GtkWidget *partwidget, *container;
};

static void
part_combobox_changed (GtkComboBox *combobox, struct _part_data *data)
{
    FilterPart *part = NULL;
    FilterPart *newpart;
    int index, i;

    index = gtk_combo_box_get_active (combobox);
    for (i = 0, part = rule_context_next_part (data->f, part); part && i < index; i++, part = rule_context_next_part (data->f, part)) {
        /* traverse until reached index */
    }

    g_return_if_fail (part != NULL);
    g_return_if_fail (i == index);
    
    /* dont update if we haven't changed */
    if (!strcmp (part->title, data->part->title))
        return;

    /* here we do a widget shuffle, throw away the old widget/rulepart,
       and create another */
    if (data->partwidget)
        gtk_container_remove (GTK_CONTAINER (data->container), data->partwidget);

    newpart = filter_part_clone (part);
    filter_part_copy_values (newpart, data->part);
    filter_rule_replace_part (data->fr, data->part, newpart);
    g_object_unref (data->part);
    data->part = newpart;
    data->partwidget = filter_part_get_widget (newpart);
    if (data->partwidget)
        gtk_box_pack_start (GTK_BOX (data->container), data->partwidget, TRUE, TRUE, 0);
}

static GtkWidget *
get_rule_part_widget (RuleContext *f, FilterPart *newpart, FilterRule *fr)
{
    FilterPart *part = NULL;
    GtkWidget *combobox;
    GtkWidget *hbox;
    GtkWidget *p;
    int index = 0, current = 0;
    struct _part_data *data;

    data = g_malloc0 (sizeof (*data));
    data->fr = fr;
    data->f = f;
    data->part = newpart;

    hbox = gtk_hbox_new (FALSE, 0);
    /* only set to automatically clean up the memory */
    g_object_set_data_full ((GObject *) hbox, "data", data, g_free);

    p = filter_part_get_widget (newpart);

    data->partwidget = p;
    data->container = hbox;

    combobox = gtk_combo_box_new_text ();

    /* sigh, this is a little ugly */
    while ((part = rule_context_next_part (f, part))) {
        gtk_combo_box_append_text (GTK_COMBO_BOX (combobox), _(part->title));

        if (!strcmp (newpart->title, part->title))
            current = index;

        index++;
    }

    gtk_combo_box_set_active (GTK_COMBO_BOX (combobox), current);
    g_signal_connect (combobox, "changed", G_CALLBACK (part_combobox_changed), data);
    gtk_widget_show (combobox);

    gtk_box_pack_start (GTK_BOX (hbox), combobox, FALSE, FALSE, 0);
    if (p)
        gtk_box_pack_start (GTK_BOX (hbox), p, TRUE, TRUE, 0);

    gtk_widget_show_all (hbox);

    return hbox;
}

struct _rule_data {
    FilterRule *fr;
    RuleContext *f;
    GtkWidget *parts;
};

static void
less_parts (GtkWidget *button, struct _rule_data *data)
{
    FilterPart *part;
    GtkWidget *rule;

    if (g_list_length (data->fr->parts) < 1)
        return;

    rule = g_object_get_data ((GObject *) button, "rule");
    part = g_object_get_data ((GObject *) rule, "part");

    /* remove the part from the list */
    filter_rule_remove_part (data->fr, part);
    g_object_unref (part);

    /* and from the display */
    gtk_container_remove (GTK_CONTAINER (data->parts), rule);
    gtk_container_remove (GTK_CONTAINER (data->parts), button);
}

static void
attach_rule (GtkWidget *rule, struct _rule_data *data, FilterPart *part, int row)
{
    GtkWidget *remove;

    gtk_table_attach (GTK_TABLE (data->parts), rule, 0, 1, row, row + 1,
              GTK_EXPAND | GTK_FILL, 0, 0, 0);

    remove = gtk_button_new_from_stock (GTK_STOCK_REMOVE);
    g_object_set_data ((GObject *) remove, "rule", rule);
    g_object_set_data ((GObject *) rule, "part", part);
    /*gtk_button_set_relief (GTK_BUTTON (remove), GTK_RELIEF_NONE);*/
    g_signal_connect (remove, "clicked", G_CALLBACK (less_parts), data);
    gtk_table_attach (GTK_TABLE (data->parts), remove, 1, 2, row, row + 1,
              0, 0, 0, 0);

    gtk_widget_show (remove);
}

static void
do_grab_focus_cb (GtkWidget *widget, gpointer data)
{
    gboolean *done = (gboolean *) data;

    if (*done)
        return;

    if (widget && GTK_WIDGET_CAN_FOCUS (widget)) {
        *done = TRUE;
        gtk_widget_grab_focus (widget);
    }
}

static void
more_parts (GtkWidget *button, struct _rule_data *data)
{
    FilterPart *new;

    /* first make sure that the last part is ok */
    if (data->fr->parts) {
        FilterPart *part;
        GList *l;

        l = g_list_last (data->fr->parts);
        part = l->data;
        if (!filter_part_validate (part))
            return;
    }

    /* create a new rule entry, use the first type of rule */
    new = rule_context_next_part (data->f, NULL);
    if (new) {
        GtkWidget *w;
        int rows;

        new = filter_part_clone (new);
        filter_rule_add_part (data->fr, new);
        w = get_rule_part_widget (data->f, new, data->fr);

        rows = GTK_TABLE (data->parts)->nrows;
        gtk_table_resize (GTK_TABLE (data->parts), rows + 1, 2);
        attach_rule (w, data, new, rows);

        if (GTK_IS_CONTAINER (w)) {
            gboolean done = FALSE;

            gtk_container_foreach (GTK_CONTAINER (w), do_grab_focus_cb, &done);
        } else
            gtk_widget_grab_focus (w);

        /* also scroll down to see new part */
        w = (GtkWidget*) g_object_get_data (G_OBJECT (button), "scrolled-window");
        if (w) {
            GtkAdjustment *adjustment;

            adjustment = gtk_scrolled_window_get_vadjustment (GTK_SCROLLED_WINDOW (w));
            if (adjustment)
                gtk_adjustment_set_value (adjustment, adjustment->upper);
                
        }
    }
}

static void
name_changed (GtkEntry *entry, FilterRule *fr)
{
    g_free (fr->name);
    fr->name = g_strdup (gtk_entry_get_text (entry));
}

GtkWidget *
filter_rule_get_widget (FilterRule *fr, RuleContext *rc)
{
    return FILTER_RULE_GET_CLASS (fr)->get_widget (fr, rc);
}

static void
grab_focus (GtkWidget *entry, gpointer data)
{
    gtk_widget_grab_focus (entry);
}

static GtkWidget *
get_widget (FilterRule *fr, struct _RuleContext *f)
{
    GtkWidget *hbox, *vbox, *parts, *inframe;
    GtkWidget *add, *label, *name, *w;
    GtkWidget *combobox;
    GtkWidget *scrolledwindow;
    GtkObject *hadj, *vadj;
    GList *l;
    gchar *text;
    FilterPart *part;
    struct _rule_data *data;
    int rows, i;

    /* this stuff should probably be a table, but the
       rule parts need to be a vbox */
    vbox = gtk_vbox_new (FALSE, 6);

    label = gtk_label_new_with_mnemonic (_("R_ule name:"));
    name = gtk_entry_new ();
    gtk_label_set_mnemonic_widget ((GtkLabel *)label, name);

    if (!fr->name) {
        fr->name = g_strdup (_("Untitled"));
        gtk_entry_set_text (GTK_ENTRY (name), fr->name);
        /* FIXME: do we want the following code in the future? */
        /*gtk_editable_select_region (GTK_EDITABLE (name), 0, -1);*/
    } else {
        gtk_entry_set_text (GTK_ENTRY (name), fr->name);
    }

    /* evil kludgy hack because gtk sucks */
    g_signal_connect (name, "realize", G_CALLBACK (grab_focus), name);

    hbox = gtk_hbox_new (FALSE, 12);
    gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
    gtk_box_pack_start (GTK_BOX (hbox), name, TRUE, TRUE, 0);
    gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
    g_signal_connect (name, "changed", G_CALLBACK (name_changed), fr);
    gtk_widget_show (label);
    gtk_widget_show (hbox);

    hbox = gtk_hbox_new (FALSE, 12);
    gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
    gtk_widget_show (hbox);

    text = g_strdup_printf("<b>%s</b>", _("Find items that meet the following conditions"));
    label = gtk_label_new (text);
    gtk_label_set_use_markup (GTK_LABEL (label), TRUE);
    gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
    gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
    gtk_widget_show (label);
    g_free(text);

    hbox = gtk_hbox_new (FALSE, 12);
    gtk_box_pack_start (GTK_BOX (vbox), hbox, TRUE, TRUE, 0);
    gtk_widget_show (hbox);

    label = gtk_label_new ("");
    gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
    gtk_widget_show (label);

    inframe = gtk_vbox_new (FALSE, 6);
    gtk_box_pack_start (GTK_BOX (hbox), inframe, TRUE, TRUE, 0);

    /* this is the parts table, it should probably be inside a scrolling list */
    rows = g_list_length (fr->parts);
    parts = gtk_table_new (rows, 2, FALSE);

    /* data for the parts part of the display */
    data = g_malloc0 (sizeof (*data));
    data->f = f;
    data->fr = fr;
    data->parts = parts;

    /* only set to automatically clean up the memory */
    g_object_set_data_full ((GObject *) vbox, "data", data, g_free);

    hbox = gtk_hbox_new (FALSE, 3);

    add = gtk_button_new_with_mnemonic (_("A_dd Condition"));
    gtk_button_set_image (GTK_BUTTON (add), gtk_image_new_from_stock (GTK_STOCK_ADD, GTK_ICON_SIZE_BUTTON));
    g_signal_connect (add, "clicked", G_CALLBACK (more_parts), data);
    gtk_box_pack_start (GTK_BOX (hbox), add, FALSE, FALSE, 0);

    if (f->flags & RULE_CONTEXT_GROUPING) {
        const char *thread_types[] = { N_("If all conditions are met"), N_("If any conditions are met") };

        label = gtk_label_new_with_mnemonic (_("_Find items:"));
        combobox = gtk_combo_box_new_text ();

        for (i=0;i<2;i++) {
            gtk_combo_box_append_text (GTK_COMBO_BOX (combobox), _(thread_types[i]));
        }

        gtk_label_set_mnemonic_widget ((GtkLabel *)label, combobox);
        gtk_combo_box_set_active (GTK_COMBO_BOX (combobox), fr->grouping);
        gtk_widget_show (combobox);

        gtk_box_pack_end (GTK_BOX (hbox), combobox, FALSE, FALSE, 0);
        gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);

        g_signal_connect (combobox, "changed", G_CALLBACK (fr_grouping_changed), fr);
    }

    if (f->flags & RULE_CONTEXT_THREADING) {
        const char *thread_types[] = { N_("None"), N_("All related"), N_("Replies"), N_("Replies and parents"), N_("No reply or parent") };

        label = gtk_label_new_with_mnemonic (_("I_nclude threads"));
        combobox = gtk_combo_box_new_text ();

        for (i=0;i<5;i++) {
            gtk_combo_box_append_text (GTK_COMBO_BOX (combobox), _(thread_types[i]));
        }

        gtk_label_set_mnemonic_widget ((GtkLabel *)label, combobox);
        gtk_combo_box_set_active (GTK_COMBO_BOX (combobox), fr->threading);
        gtk_widget_show (combobox);

        gtk_box_pack_end (GTK_BOX (hbox), combobox, FALSE, FALSE, 0);
        gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);

        g_signal_connect (combobox, "changed", G_CALLBACK (fr_threading_changed), fr);
    }

    gtk_box_pack_start (GTK_BOX (inframe), hbox, FALSE, FALSE, 3);

    l = fr->parts;
    i = 0;
    while (l) {
        part = l->data;
        d(printf ("adding rule %s\n", part->title));
        w = get_rule_part_widget (f, part, fr);
        attach_rule (w, data, part, i++);
        l = g_list_next (l);
    }

    hadj = gtk_adjustment_new (0.0, 0.0, 1.0, 1.0, 1.0, 1.0);
    vadj = gtk_adjustment_new (0.0, 0.0, 1.0, 1.0, 1.0, 1.0);
    scrolledwindow = gtk_scrolled_window_new (GTK_ADJUSTMENT (hadj), GTK_ADJUSTMENT (vadj));
    gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolledwindow),
                    GTK_POLICY_AUTOMATIC,
                    GTK_POLICY_AUTOMATIC);

    gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (scrolledwindow), parts);

    gtk_box_pack_start (GTK_BOX (inframe), scrolledwindow, TRUE, TRUE, 3);

    gtk_widget_show_all (vbox);

    g_object_set_data (G_OBJECT (add), "scrolled-window", scrolledwindow);

    return vbox;
}

FilterRule *
filter_rule_next_list (GList *l, FilterRule *last, const char *source)
{
    GList *node = l;

    if (last != NULL) {
        node = g_list_find (node, last);
        if (node == NULL)
            node = l;
        else
            node = node->next;
    }

    if (source) {
        while (node) {
            FilterRule *rule = node->data;

            if (rule->source && strcmp (rule->source, source) == 0)
                break;
            node = node->next;
        }
    }

    if (node)
        return node->data;

    return NULL;
}

FilterRule *
filter_rule_find_list (GList * l, const char *name, const char *source)
{
    while (l) {
        FilterRule *rule = l->data;

        if (strcmp (rule->name, name) == 0)
            if (source == NULL || (rule->source != NULL && strcmp (rule->source, source) == 0))
                return rule;
        l = l->next;
    }

    return NULL;
}

#ifdef FOR_TRANSLATIONS_ONLY

static char *list[] = {
  N_("Incoming"), N_("Outgoing")
};
#endif