[evolution/account-mgmt: 30/33] Add 'cal-config-webcal' module.

[Matthew Barnes <mbarnes src gnome org>]

commit a6223624d91607d3f7eeac370a492aca8f35d2b3
Author: Matthew Barnes <mbarnes redhat com>
Date:   Fri Feb 4 08:46:37 2011 -0500

    Add 'cal-config-webcal' module.
    
    Registers the "On The Web" backend in ECalSourceConfig widgets.
    
    Replaces the 'calendar-http' plugin.

 configure.ac                                       |    4 +-
 modules/Makefile.am                                |    1 +
 modules/cal-config-webcal/Makefile.am              |   24 ++
 .../evolution-cal-config-webcal.c                  |  221 ++++++++++++++++++++
 plugins/calendar-http/Makefile.am                  |   28 ---
 plugins/calendar-http/calendar-http.c              |  220 -------------------
 .../org-gnome-calendar-http.eplug.xml              |   35 ---
 7 files changed, 248 insertions(+), 285 deletions(-)
---
diff --git a/configure.ac b/configure.ac
index d1acf8d..d7f6868 100644
--- a/configure.ac
+++ b/configure.ac
@@ -1403,7 +1403,7 @@ AC_ARG_ENABLE([plugins],
 	[enable_plugins="$enableval"],[enable_plugins=all])
 
 dnl Add any new plugins here
-plugins_base_always="calendar-http itip-formatter default-source mark-all-read groupwise-features publish-calendar caldav imap-features google-account-setup webdav-account-setup"
+plugins_base_always="itip-formatter default-source mark-all-read groupwise-features publish-calendar caldav imap-features google-account-setup"
 
 plugins_base="$plugins_base_always $SA_JUNK_PLUGIN $BF_JUNK_PLUGIN"
 dist_plugins_base="$plugins_base_always calendar-weather sa-junk-plugin bogo-junk-plugin"
@@ -1746,6 +1746,7 @@ modules/book-config-local/Makefile
 modules/book-config-webdav/Makefile
 modules/cal-config-contacts/Makefile
 modules/cal-config-local/Makefile
+modules/cal-config-webcal/Makefile
 modules/composer-autosave/Makefile
 modules/connman/Makefile
 modules/mailto-handler/Makefile
@@ -1765,7 +1766,6 @@ plugins/backup-restore/Makefile
 plugins/bbdb/Makefile
 plugins/bogo-junk-plugin/Makefile
 plugins/caldav/Makefile
-plugins/calendar-http/Makefile
 plugins/calendar-weather/Makefile
 plugins/dbx-import/Makefile
 plugins/default-source/Makefile
diff --git a/modules/Makefile.am b/modules/Makefile.am
index e9d6317..b153dd8 100644
--- a/modules/Makefile.am
+++ b/modules/Makefile.am
@@ -32,6 +32,7 @@ SUBDIRS = \
 	book-config-webdav \
 	cal-config-contacts \
 	cal-config-local \
+	cal-config-webcal \
 	composer-autosave \
 	mailto-handler \
 	offline-alert \
diff --git a/modules/cal-config-webcal/Makefile.am b/modules/cal-config-webcal/Makefile.am
new file mode 100644
index 0000000..c927058
--- /dev/null
+++ b/modules/cal-config-webcal/Makefile.am
@@ -0,0 +1,24 @@
+module_LTLIBRARIES = libevolution-module-cal-config-webcal.la
+
+libevolution_module_cal_config_webcal_la_CPPFLAGS =		\
+	$(AM_CPPFLAGS)						\
+	-I$(top_srcdir)						\
+	-I$(top_srcdir)/widgets					\
+	-DG_LOG_DOMAIN=\"evolution-cal-config-webcal\"		\
+	$(EVOLUTION_CALENDAR_CFLAGS)				\
+	$(GNOME_PLATFORM_CFLAGS)
+
+libevolution_module_cal_config_webcal_la_SOURCES =		\
+	evolution-cal-config-webcal.c
+
+libevolution_module_cal_config_webcal_la_LIBADD =		\
+	$(top_builddir)/e-util/libeutil.la			\
+	$(top_builddir)/widgets/misc/libemiscwidgets.la		\
+	$(top_builddir)/calendar/gui/libevolution-calendar.la	\
+	$(EVOLUTION_CALENDAR_LIBS)				\
+	$(GNOME_PLATFORM_LIBS)
+
+libevolution_module_cal_config_webcal_la_LDFLAGS =		\
+	-module -avoid-version $(NO_UNDEFINED)
+
+-include $(top_srcdir)/git.mk
diff --git a/modules/cal-config-webcal/evolution-cal-config-webcal.c b/modules/cal-config-webcal/evolution-cal-config-webcal.c
new file mode 100644
index 0000000..ebc736c
--- /dev/null
+++ b/modules/cal-config-webcal/evolution-cal-config-webcal.c
@@ -0,0 +1,221 @@
+/*
+ * evolution-cal-config-webcal.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/>
+ *
+ */
+
+#include <config.h>
+#include <glib/gi18n-lib.h>
+#include <libedataserver/e-source-webdav.h>
+
+#include <e-util/e-extension.h>
+#include <misc/e-interval-chooser.h>
+#include <misc/e-source-config-backend.h>
+#include <calendar/gui/e-cal-source-config.h>
+
+typedef ESourceConfigBackend ECalConfigWebcal;
+typedef ESourceConfigBackendClass ECalConfigWebcalClass;
+
+typedef struct _Context Context;
+
+struct _Context {
+	GtkWidget *url_entry;
+	GtkWidget *user_entry;
+};
+
+/* Module Entry Points */
+void e_module_load (GTypeModule *type_module);
+void e_module_unload (GTypeModule *type_module);
+
+/* Forward Declarations */
+GType e_cal_config_webcal_get_type (void);
+
+G_DEFINE_DYNAMIC_TYPE (
+	ECalConfigWebcal,
+	e_cal_config_webcal,
+	E_TYPE_SOURCE_CONFIG_BACKEND)
+
+static void
+cal_config_webcal_context_free (Context *context)
+{
+	g_object_unref (context->url_entry);
+	g_object_unref (context->user_entry);
+
+	g_slice_free (Context, context);
+}
+
+static gboolean
+cal_config_webcal_uri_to_text (GBinding *binding,
+                               const GValue *source_value,
+                               GValue *target_value,
+                               gpointer user_data)
+{
+	SoupURI *uri;
+	gchar *text;
+
+	uri = g_value_get_boxed (source_value);
+	soup_uri_set_user (uri, NULL);
+
+	text = soup_uri_to_string (uri, FALSE);
+	g_value_set_string (target_value, text);
+	g_free (text);
+
+	return TRUE;
+}
+
+static gboolean
+cal_config_webcal_text_to_uri (GBinding *binding,
+                               const GValue *source_value,
+                               GValue *target_value,
+                               gpointer user_data)
+{
+	ESourceWebdav *extension = user_data;
+	SoupURI *uri;
+	const gchar *text;
+	gchar *user;
+
+	text = g_value_get_string (source_value);
+	uri = soup_uri_new (text);
+
+	if (uri == NULL)
+		return FALSE;
+
+	g_object_get (extension, "user", &user, NULL);
+	soup_uri_set_user (uri, user);
+	g_free (user);
+
+	g_value_set_boxed (target_value, uri);
+	soup_uri_free (uri);
+
+	return TRUE;
+}
+
+static void
+cal_config_webcal_insert_widgets (ESourceConfigBackend *backend,
+                                  ESource *scratch_source)
+{
+	ESourceConfig *config;
+	ESourceExtension *extension;
+	GtkWidget *widget;
+	Context *context;
+	const gchar *extension_name;
+	const gchar *uid;
+
+	context = g_slice_new (Context);
+	uid = e_source_get_uid (scratch_source);
+	config = e_source_config_backend_get_config (backend);
+
+	g_object_set_data_full (
+		G_OBJECT (backend), uid, context,
+		(GDestroyNotify) cal_config_webcal_context_free);
+
+	e_cal_source_config_add_offline_toggle (
+		E_CAL_SOURCE_CONFIG (config), scratch_source);
+
+	widget = gtk_entry_new ();
+	e_source_config_insert_widget (
+		config, scratch_source, _("URL:"), widget);
+	context->url_entry = g_object_ref (widget);
+	gtk_widget_show (widget);
+
+	e_source_config_add_secure_connection (config, scratch_source);
+
+	widget = gtk_entry_new ();
+	e_source_config_insert_widget (
+		config, scratch_source, _("User:"), widget);
+	context->user_entry = g_object_ref (widget);
+	gtk_widget_show (widget);
+
+	e_source_config_add_refresh_interval (config, scratch_source);
+
+	extension_name = E_SOURCE_EXTENSION_WEBDAV_BACKEND;
+	extension = e_source_get_extension (scratch_source, extension_name);
+
+	g_object_bind_property_full (
+		extension, "soup-uri",
+		context->url_entry, "text",
+		G_BINDING_BIDIRECTIONAL |
+		G_BINDING_SYNC_CREATE,
+		cal_config_webcal_uri_to_text,
+		cal_config_webcal_text_to_uri,
+		extension, (GDestroyNotify) NULL);
+
+	g_object_bind_property (
+		extension, "user",
+		context->user_entry, "text",
+		G_BINDING_BIDIRECTIONAL |
+		G_BINDING_SYNC_CREATE);
+}
+
+static gboolean
+cal_config_webcal_check_complete (ESourceConfigBackend *backend,
+                                  ESource *scratch_source)
+{
+	SoupURI *uri;
+	GtkEntry *entry;
+	Context *context;
+	const gchar *uri_string;
+	const gchar *uid;
+	gboolean complete;
+
+	uid = e_source_get_uid (scratch_source);
+	context = g_object_get_data (G_OBJECT (backend), uid);
+	g_return_val_if_fail (context != NULL, FALSE);
+
+	entry = GTK_ENTRY (context->url_entry);
+	uri_string = gtk_entry_get_text (entry);
+
+	uri = soup_uri_new (uri_string);
+	complete = SOUP_URI_VALID_FOR_HTTP (uri);
+
+	if (uri != NULL)
+		soup_uri_free (uri);
+
+	return complete;
+}
+
+static void
+e_cal_config_webcal_class_init (ESourceConfigBackendClass *class)
+{
+	EExtensionClass *extension_class;
+
+	extension_class = E_EXTENSION_CLASS (class);
+	extension_class->extensible_type = E_TYPE_CAL_SOURCE_CONFIG;
+
+	class->backend_name = "webcal";
+	class->insert_widgets = cal_config_webcal_insert_widgets;
+	class->check_complete = cal_config_webcal_check_complete;
+}
+
+static void
+e_cal_config_webcal_class_finalize (ESourceConfigBackendClass *class)
+{
+}
+
+static void
+e_cal_config_webcal_init (ESourceConfigBackend *backend)
+{
+}
+
+G_MODULE_EXPORT void
+e_module_load (GTypeModule *type_module)
+{
+	e_cal_config_webcal_register_type (type_module);
+}
+
+G_MODULE_EXPORT void
+e_module_unload (GTypeModule *type_module)
+{
+}