New files with utilities for hooking up widgets in Glade-generated

2000-05-19  Federico Mena Quintero  <federico@helixcode.com>

	* e-dialog-widgets.[ch]: New files with utilities for hooking up
	widgets in Glade-generated dialogs.

	* Makefile.am (libeutil_la_SOURCES): Added e-dialog-widgets.[ch].

svn path=/trunk/; revision=3141

4 files changed, 362 insertions, 22 deletions

diff --git a/e-util/ChangeLog b/e-util/ChangeLog
index f9cc14b3ad..2c0ed89a7c 100644
--- a/e-util/ChangeLog
+++ b/e-util/ChangeLog
@@ -1,3 +1,10 @@
+2000-05-19  Federico Mena Quintero  <federico@helixcode.com>
+
+	* e-dialog-widgets.[ch]: New files with utilities for hooking up
+	widgets in Glade-generated dialogs.
+
+	* Makefile.am (libeutil_la_SOURCES): Added e-dialog-widgets.[ch].
+
 2000-05-19  Christopher James Lahey  <clahey@helixcode.com>
 
 	* e-gui-utils.c, e-gui-utils.h: Added e_container_foreach_leaf.
diff --git a/e-util/Makefile.am b/e-util/Makefile.am
index b9e2ac1f3b..a3db4c74ab 100644
--- a/e-util/Makefile.am
+++ b/e-util/Makefile.am
@@ -7,26 +7,28 @@ INCLUDES =					\
 
 noinst_LTLIBRARIES = libeutil.la
 
-libeutil_la_SOURCES = \
-	e-canvas.c	\
-	e-canvas.h	\
-	e-canvas-utils.c\
-	e-canvas-utils.h\
-	e-cursors.c	\
-	e-cursors.h	\
-	e-gui-utils.c	\
-	e-gui-utils.h	\
-	e-html-utils.c	\
-	e-html-utils.h	\
-	e-paned.c	\
-	e-paned.h	\
-	e-popup-menu.c	\
-	e-popup-menu.h	\
-	e-setup.c	\
-	e-setup.h	\
-	e-sexp.c	\
-	e-sexp.h	\
-	e-util.c	\
-	e-util.h	\
-	e-xml-utils.c	\
+libeutil_la_SOURCES =			\
+	e-canvas.c			\
+	e-canvas.h			\
+	e-canvas-utils.c		\
+	e-canvas-utils.h		\
+	e-cursors.c			\
+	e-cursors.h			\
+	e-dialog-widgets.c		\
+	e-dialog-widgets.h		\
+	e-gui-utils.c			\
+	e-gui-utils.h			\
+	e-html-utils.c			\
+	e-html-utils.h			\
+	e-paned.c			\
+	e-paned.h			\
+	e-popup-menu.c			\
+	e-popup-menu.h			\
+	e-setup.c			\
+	e-setup.h			\
+	e-sexp.c			\
+	e-sexp.h			\
+	e-util.c			\
+	e-util.h			\
+	e-xml-utils.c			\
 	e-xml-utils.h
diff --git a/e-util/e-dialog-widgets.c b/e-util/e-dialog-widgets.c
new file mode 100644
index 0000000000..283e6f95b6
--- /dev/null
+++ b/e-util/e-dialog-widgets.c
@@ -0,0 +1,291 @@
+/* Evolution internal utilities - Glade dialog widget utilities
+ *
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Federico Mena-Quintero <federico@gimp.org>
+ *
+ * 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 <config.h>
+#include <gtk/gtkmenu.h>
+#include <gtk/gtkmenuitem.h>
+#include <gtk/gtkoptionmenu.h>
+#include <gtk/gtkradiobutton.h>
+#include <gtk/gtksignal.h>
+#include <gtk/gtkspinbutton.h>
+#include "e-dialog-widgets.h"
+
+
+
+typedef struct {
+	/* Widgets that are hooked */
+	GSList *widgets;
+} DialogHooks;
+
+
+
+/* Destroy handler for the dialog; frees the dialog hooks */
+static void
+dialog_destroy_cb (GtkObject *dialog, gpointer data)
+{
+	DialogHooks *hooks;
+
+	hooks = data;
+
+	g_slist_free (hooks->widgets);
+	hooks->widgets = NULL;
+
+	g_free (hooks);
+	gtk_object_set_data (dialog, "dialog-hooks", NULL);
+}
+
+/* Ensures that the dialog has the necessary attached data to store the widget
+ * hook information.
+ */
+static DialogHooks *
+get_dialog_hooks (GtkWidget *dialog)
+{
+	DialogHooks *hooks;
+
+	hooks = gtk_object_get_data (GTK_OBJECT (dialog), "dialog-hooks");
+	if (!hooks) {
+		hooks = g_new0 (DialogHooks, 1);
+		gtk_object_set_data (GTK_OBJECT (dialog), "dialog-hooks", hooks);
+		gtk_signal_connect (GTK_OBJECT (dialog), "destroy",
+				    GTK_SIGNAL_FUNC (dialog_destroy_cb), hooks);
+	}
+
+	return hooks;
+}
+
+/* Converts an mapped value to the appropriate index in an item group.  The
+ * values for the items are provided as a -1-terminated array.
+ */
+static int
+value_to_index (const int *value_map, int value)
+{
+	int i;
+
+	for (i = 0; value_map[i] != -1; i++)
+		if (value_map[i] == value)
+			return i;
+
+	return -1;
+}
+
+/* Converts an index in an item group to the appropriate mapped value.  See the
+ * function above.
+ */
+static int
+index_to_value (const int *value_map, int index)
+{
+	int i;
+
+	/* We do this the hard way, i.e. not as a simple array reference, to
+	 * check for correctness.
+	 */
+
+	for (i = 0; value_map[i] != -1; i++)
+		if (i == index)
+			return value_map[i];
+
+	return -1;
+}
+
+/* Callback for the "toggled" signal of toggle buttons */
+static void
+toggled_cb (GtkToggleButton *toggle, gpointer data)
+{
+	GnomePropertyBox *pbox;
+
+	pbox = GNOME_PROPERTY_BOX (data);
+
+	/* For radio buttons, we only notify the property box if the button is
+	 * active, because we'll get one call for each of the changed buttons in
+	 * the radio group.
+	 */
+	if (!GTK_IS_RADIO_BUTTON (toggle) || toggle->active)
+		gnome_property_box_changed (pbox);
+}
+
+/* Hooks a radio button group */
+static void
+hook_radio (GtkWidget *dialog, GtkRadioButton *radio, gpointer value_var, gpointer info)
+{
+	GSList *group;
+	int *value;
+	int i;
+	const int *value_map;
+	GSList *l;
+
+	group = gtk_radio_button_group (radio);
+
+	/* Set the value */
+
+	value = (int *) value_var;
+	value_map = (const int *) info;
+
+	i = value_to_index (value_map, *value);
+	if (i != -1) {
+		l = g_slist_nth (group, i);
+		if (!l)
+			g_message ("hook_radio(): could not find index %d in radio group!", i);
+
+		gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (l->data), TRUE);
+	} else
+		g_message ("hook_radio(): could not find value %d in value map!", *value);
+
+	/* Hook to changed */
+
+	if (GNOME_IS_PROPERTY_BOX (dialog))
+		for (l = group; l; l = l->next)
+			gtk_signal_connect (GTK_OBJECT (l->data), "toggled",
+					    GTK_SIGNAL_FUNC (toggled_cb), dialog);
+}
+
+/* Callback for the "activate" signal of menu items */
+static void
+activate_cb (GtkMenuItem *item, gpointer data)
+{
+	GnomePropertyBox *pbox;
+
+	pbox = GNOME_PROPERTY_BOX (data);
+	gnome_property_box_changed (pbox);
+}
+
+/* Hooks an option menu */
+static void
+hook_option_menu (GtkWidget *dialog, GtkOptionMenu *omenu, gpointer value_var, gpointer info)
+{
+	int *value;
+	int i;
+	const int *value_map;
+
+	/* Set the value */
+
+	value = (int *) value_var;
+	value_map = (const int *) info;
+
+	i = value_to_index (value_map, *value);
+	if (i != -1)
+		gtk_option_menu_set_history (omenu, i);
+	else
+		g_message ("hook_option_menu(): could not find value %d in value map!", *value);
+
+	/* Hook to changed */
+
+	if (GNOME_IS_PROPERTY_BOX (dialog)) {
+		GtkMenu *menu;
+		GList *l;
+
+		menu = GTK_MENU (gtk_option_menu_get_menu (omenu));
+
+		for (l = GTK_MENU_SHELL (menu)->children; l; l = l->next)
+			gtk_signal_connect (GTK_OBJECT (l->data), "activate",
+					    GTK_SIGNAL_FUNC (activate_cb), dialog);
+	}
+}
+
+/* Hooks a toggle button */
+static void
+hook_toggle (GtkWidget *dialog, GtkToggleButton *toggle, gpointer value_var, gpointer info)
+{
+	gboolean *value;
+
+	/* Set the value */
+
+	value = (gboolean *) value_var;
+	gtk_toggle_button_set_active (toggle, *value);
+
+	/* Hook to changed */
+
+	if (GNOME_IS_PROPERTY_BOX (dialog))
+		gtk_signal_connect (GTK_OBJECT (toggle), "toggled",
+				    GTK_SIGNAL_FUNC (toggled_cb), dialog);
+}
+
+/* Callback for the "value_changed" signal of the adjustment of a spin button */
+static void
+value_changed_cb (GtkAdjustment *adj, gpointer data)
+{
+	GnomePropertyBox *pbox;
+
+	pbox = GNOME_PROPERTY_BOX (data);
+	gnome_property_box_changed (pbox);
+}
+
+/* Hooks a spin button */
+static void
+hook_spin_button (GtkWidget *dialog, GtkSpinButton *spin, gpointer value_var, gpointer info)
+{
+	double *value;
+	GtkAdjustment *adj;
+
+	/* Set the value */
+
+	value = (double *) value_var;
+	adj = gtk_spin_button_get_adjustment (spin);
+
+	adj->value = *value;
+	gtk_signal_emit_by_name (GTK_OBJECT (adj), "value_changed");
+
+	/* Hook to changed */
+
+	if (GNOME_IS_PROPERTY_BOX (dialog))
+		gtk_signal_connect (GTK_OBJECT (adj), "value_changed",
+				    GTK_SIGNAL_FUNC (value_changed_cb), dialog);
+}
+
+/* Hooks an entry widget */
+static void
+hook_entry (GtkWidget *dialog, GtkEntry *entry, gpointer value_var, gpointer info)
+{
+}
+
+gboolean
+e_dialog_widget_hook_value (GtkWidget *dialog, GtkWidget *widget,
+			    gpointer value_var, gpointer info)
+{
+	DialogHooks *hooks;
+
+	g_return_val_if_fail (dialog != NULL, FALSE);
+	g_return_val_if_fail (widget != NULL, FALSE);
+	g_return_val_if_fail (GTK_IS_WIDGET (widget), FALSE);
+	g_return_val_if_fail (value_var != NULL, FALSE);
+
+	hooks = get_dialog_hooks (dialog);
+
+	/* First check if it is a "group" widget, like a radio button or an
+	 * option menu.  Then we check for normal ungrouped widgets.
+	 */
+
+	if (GTK_IS_RADIO_BUTTON (widget))
+		hook_radio (dialog, GTK_RADIO_BUTTON (widget), value_var, info);
+	else if (GTK_IS_OPTION_MENU (widget))
+		hook_option_menu (dialog, GTK_OPTION_MENU (widget), value_var, info);
+	else if (GTK_IS_TOGGLE_BUTTON (widget))
+		hook_toggle (dialog, GTK_TOGGLE_BUTTON (widget), value_var, info);
+	else if (GTK_IS_SPIN_BUTTON (widget))
+		hook_spin_button (dialog, GTK_SPIN_BUTTON (widget), value_var, info);
+	else if (GTK_IS_ENTRY (widget))
+		hook_entry (dialog, GTK_ENTRY (widget), value_var, info);
+	else
+		return FALSE;
+
+	hooks->widgets = g_slist_prepend (hooks->widgets, widget);
+
+	return TRUE;
+}
diff --git a/e-util/e-dialog-widgets.h b/e-util/e-dialog-widgets.h
new file mode 100644
index 0000000000..13b7a65d22
--- /dev/null
+++ b/e-util/e-dialog-widgets.h
@@ -0,0 +1,40 @@
+/* Evolution internal utilities - Glade dialog widget utilities
+ *
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Federico Mena-Quintero <federico@gimp.org>
+ *
+ * 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.
+ */
+
+#ifndef E_DIALOG_WIDGETS_H
+#define E_DIALOG_WIDGETS_H
+
+#include <glade/glade.h>
+#include <libgnomeui/gnome-propertybox.h>
+
+
+
+gboolean e_dialog_widget_hook_value (GtkWidget *dialog, GtkWidget *widget,
+				     gpointer value_var, gpointer info);
+
+void e_dialog_get_values (GtkWidget *dialog);
+
+gboolean e_dialog_xml_widget_hook_value (GladeXML *xml, GtkWidget *dialog, const char *widget_name,
+					 gpointer value_var, gpointer info);
+
+
+
+#endif