/*
* Copyright (C) 2000 Helix Code Inc.
*
* Authors: Not Zed <notzed@lostzed.mmc.com.au>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library 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 Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
#include <gtk/gtk.h>
#include <gnome.h>
#include <regex.h>
#include <gal/widgets/e-unicode.h>
#include "filter-input.h"
#include "e-util/e-sexp.h"
#define d(x)
static gboolean validate (FilterElement *fe);
static void xml_create(FilterElement *fe, xmlNodePtr node);
static xmlNodePtr xml_encode(FilterElement *fe);
static int xml_decode(FilterElement *fe, xmlNodePtr node);
static GtkWidget *get_widget(FilterElement *fe);
static void build_code(FilterElement *fe, GString *out, struct _FilterPart *ff);
static void format_sexp(FilterElement *, GString *);
static void filter_input_class_init (FilterInputClass *class);
static void filter_input_init (FilterInput *gspaper);
static void filter_input_finalise (GtkObject *obj);
#define _PRIVATE(x) (((FilterInput *)(x))->priv)
struct _FilterInputPrivate {
};
static FilterElementClass *parent_class;
enum {
LAST_SIGNAL
};
static guint signals[LAST_SIGNAL] = { 0 };
guint
filter_input_get_type (void)
{
static guint type = 0;
if (!type) {
GtkTypeInfo type_info = {
"FilterInput",
sizeof(FilterInput),
sizeof(FilterInputClass),
(GtkClassInitFunc)filter_input_class_init,
(GtkObjectInitFunc)filter_input_init,
(GtkArgSetFunc)NULL,
(GtkArgGetFunc)NULL
};
type = gtk_type_unique(filter_element_get_type (), &type_info);
}
return type;
}
static void
filter_input_class_init (FilterInputClass *class)
{
GtkObjectClass *object_class;
FilterElementClass *filter_element = (FilterElementClass *)class;
object_class = (GtkObjectClass *)class;
parent_class = gtk_type_class(filter_element_get_type ());
object_class->finalize = filter_input_finalise;
/* override methods */
filter_element->validate = validate;
filter_element->xml_create = xml_create;
filter_element->xml_encode = xml_encode;
filter_element->xml_decode = xml_decode;
filter_element->get_widget = get_widget;
filter_element->build_code = build_code;
filter_element->format_sexp = format_sexp;
/* signals */
gtk_object_class_add_signals(object_class, signals, LAST_SIGNAL);
}
static void
filter_input_init (FilterInput *o)
{
o->priv = g_malloc0 (sizeof (*o->priv));
}
static void
filter_input_finalise (GtkObject *obj)
{
FilterInput *o = (FilterInput *)obj;
o = o;
((GtkObjectClass *)(parent_class))->finalize(obj);
}
/**
* filter_input_new:
*
* Create a new FilterInput object.
*
* Return value: A new #FilterInput object.
**/
FilterInput *
filter_input_new (void)
{
FilterInput *o = (FilterInput *)gtk_type_new(filter_input_get_type ());
return o;
}
FilterInput *
filter_input_new_type_name (const char *type)
{
FilterInput *o = filter_input_new ();
o->type = g_strdup (type);
d(printf("new type %s = %p\n", type, o));
return o;
}
void
filter_input_set_value (FilterInput *fi, const char *value)
{
GList *l;
l = fi->values;
while (l) {
g_free (l->data);
l = g_list_next (l);
}
g_list_free (fi->values);
fi->values = g_list_append (NULL, g_strdup (value));
}
static gboolean
validate (FilterElement *fe)
{
FilterInput *fi = (FilterInput *)fe;
gboolean valid = TRUE;
if (!strcmp (fi->type, "regex")) {
regex_t regexpat; /* regex patern */
gint regerr;
char *text;
text = fi->values->data;
regerr = regcomp (®expat, text, REG_EXTENDED | REG_NEWLINE | REG_ICASE);
if (regerr) {
GtkWidget *dialog;
gchar *regmsg, *errmsg;
size_t reglen;
/* regerror gets called twice to get the full error string
length to do proper posix error reporting */
reglen = regerror (regerr, ®expat, 0, 0);
regmsg = g_malloc0 (reglen + 1);
regerror (regerr, ®expat, regmsg, reglen);
errmsg = g_strdup_printf (_("Error in regular expression '%s':\n%s"),
text, regmsg);
g_free (regmsg);
dialog = gnome_ok_dialog (errmsg);
gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
g_free (errmsg);
valid = FALSE;
}
regfree (®expat);
}
return valid;
}
static void
xml_create (FilterElement *fe, xmlNodePtr node)
{
/* parent implementation */
((FilterElementClass *)(parent_class))->xml_create(fe, node);
}
static xmlNodePtr
xml_encode (FilterElement *fe)
{
xmlNodePtr value;
GList *l;
FilterInput *fi = (FilterInput *)fe;
char *type;
type = fi->type ? fi->type : "string";
d(printf ("Encoding %s as xml\n", type));
value = xmlNewNode (NULL, "value");
xmlSetProp (value, "name", fe->name);
xmlSetProp (value, "type", type);
l = fi->values;
while (l) {
xmlNodePtr cur;
char *str = l->data;
cur = xmlNewChild (value, NULL, type, NULL);
xmlNodeSetContent (cur, str);
l = g_list_next (l);
}
return value;
}
static int
xml_decode (FilterElement *fe, xmlNodePtr node)
{
FilterInput *fi = (FilterInput *)fe;
char *name, *str, *type;
xmlNodePtr n;
type = fi->type ? fi->type : "string";
d(printf("Decoding %s from xml %p\n", type, fe));
name = xmlGetProp (node, "name");
d(printf ("Name = %s\n", name));
fe->name = name;
fi->type = xmlGetProp (node, "type");
n = node->childs;
while (n) {
if (!strcmp (n->name, type)) {
str = xmlNodeGetContent (n);
d(printf (" '%s'\n", str));
fi->values = g_list_append (fi->values, str);
} else {
g_warning ("Unknown node type '%s' encountered decoding a %s\n", n->name, type);
}
n = n->next;
}
return 0;
}
static void
entry_changed (GtkEntry *entry, FilterElement *fe)
{
char *new;
FilterInput *fi = (FilterInput *)fe;
GList *l;
new = e_utf8_gtk_entry_get_text(entry);
/* NOTE: entry only supports a single value ... */
l = fi->values;
while (l) {
g_free (l->data);
l = g_list_next (l);
}
g_list_free (fi->values);
fi->values = g_list_append (NULL, new);
}
static GtkWidget *
get_widget (FilterElement *fe)
{
GtkWidget *entry;
FilterInput *fi = (FilterInput *)fe;
entry = gtk_entry_new ();
if (fi->values && fi->values->data) {
e_utf8_gtk_entry_set_text (GTK_ENTRY (entry), fi->values->data);
}
gtk_signal_connect (GTK_OBJECT (entry), "changed", entry_changed, fe);
return entry;
}
static void
build_code (FilterElement *fe, GString *out, struct _FilterPart *ff)
{
return;
}
static void
format_sexp (FilterElement *fe, GString *out)
{
GList *l;
FilterInput *fi = (FilterInput *)fe;
l = fi->values;
while (l) {
e_sexp_encode_string (out, l->data);
l = g_list_next (l);
}
}