'Import' the CalDAV eplugin implementation into evolution. Please refer

2006-01-16  Harish Krishnaswamy <kharish@novell.com>

* caldav*:  'Import' the CalDAV eplugin
implementation into evolution. Please
refer evolution-caldav module in cvs.gnome.org for
prior Change history.

svn path=/trunk/; revision=31208

4 files changed, 369 insertions, 0 deletions

diff --git a/plugins/caldav/ChangeLog b/plugins/caldav/ChangeLog
new file mode 100644
index 0000000000..4292054298
--- /dev/null
+++ b/plugins/caldav/ChangeLog
@@ -0,0 +1,11 @@
+2006-01-16  Harish Krishnaswamy <kharish@novell.com>
+
+	* Makefile.am : Integrate with eplugin make 
+	scripts and add a ChangeLog file for the eplugin.
+	
+2006-01-16  Harish Krishnaswamy <kharish@novell.com>
+
+	* caldav*:  'Import' the CalDAV eplugin 
+	implementation into evolution. Please
+	refer evolution-caldav module in cvs.gnome.org for
+	prior Change history.
diff --git a/plugins/caldav/Makefile.am b/plugins/caldav/Makefile.am
new file mode 100644
index 0000000000..3d982b4233
--- /dev/null
+++ b/plugins/caldav/Makefile.am
@@ -0,0 +1,21 @@
+INCLUDES = 						\
+	$(EVOLUTION_CALENDAR_CFLAGS)			\
+	-I .						\
+	-I$(top_srcdir)	                                \
+	-DCALDAV_GLADEDIR=\""$(gladedir)"\"		
+	
+@EVO_PLUGIN_RULE@
+
+plugin_DATA = org-gnome-evolution-caldav.eplug
+plugin_LTLIBRARIES = liborg-gnome-evolution-caldav.la
+
+liborg_gnome_evolution_caldav_la_SOURCES =        \
+	caldav-source.c
+
+liborg_gnome_evolution_caldav_la_LIBADD = 	\
+	$(EPLUGIN_LIBS)		
+
+liborg_gnome_evolution_caldav_la_LDFLAGS = -module -avoid-version
+
+EXTRA_DIST =				\
+	org-gnome-evolution-caldav.eplug.in
diff --git a/plugins/caldav/caldav-source.c b/plugins/caldav/caldav-source.c
new file mode 100644
index 0000000000..f03f5f50a4
--- /dev/null
+++ b/plugins/caldav/caldav-source.c
@@ -0,0 +1,311 @@
+/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*-
+ * ex: set ts=8: */
+/* Evolution calendar - caldav backend
+ *
+ * Copyright (C) 2005 Novell, Inc.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of version 2 of the GNU General Public
+ * License as published by the Free Software Foundation.
+ *
+ * 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.
+ *
+ * Author: Christian Kellner <gicmo@gnome.org> 
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <glib/gi18n-lib.h>
+#include <glib.h>
+
+#include <gtk/gtk.h>
+
+#include <e-util/e-config.h>
+#include <e-util/e-plugin.h>
+#include <calendar/gui/e-cal-config.h>
+#include <libedataserver/e-url.h>
+#include <libedataserver/e-account-list.h>
+#include <libecal/e-cal.h>
+
+#include <string.h>
+
+/*****************************************************************************/
+/* prototypes */
+int              e_plugin_lib_enable      (EPluginLib                 *ep,
+					   int                         enable);
+
+GtkWidget *      oge_caldav               (EPlugin                    *epl, 
+					   EConfigHookItemFactoryData *data);
+
+/*****************************************************************************/
+/* plugin intialization */
+
+static void
+ensure_caldav_source_group ()
+{
+	ESourceList  *slist;
+	ESourceGroup *group;
+
+	
+	if (!e_cal_get_sources (&slist, E_CAL_SOURCE_TYPE_EVENT, NULL)) {
+		g_warning ("Could not get calendar source list from GConf!");
+		return;
+	}
+
+	group = e_source_list_peek_group_by_name (slist, _("CalDAV"));
+
+	if (group == NULL) {
+		gboolean res;
+		group = e_source_group_new (_("CalDAV"), "caldav://");
+		res = e_source_list_add_group (slist, group, -1);
+		
+		if (res == FALSE) {
+			g_warning ("Could not add CalDAV source group!");	
+		} else {
+			e_source_list_sync (slist, NULL);
+		}
+		
+		g_object_unref (group);
+		g_object_unref (slist);
+	}
+}
+
+int
+e_plugin_lib_enable (EPluginLib *ep, int enable)
+{
+
+	if (enable) {
+		g_print ("CalDAV Eplugin starting up ...\n");
+		ensure_caldav_source_group ();
+	}
+
+	return 0;
+}
+
+
+/*****************************************************************************/
+/* the location field for caldav sources */
+
+/* stolen from calendar-weather eplugin */
+static gchar *
+print_uri_noproto (EUri *uri)
+{
+	gchar *uri_noproto;
+
+	if (uri->port != 0)
+		uri_noproto = g_strdup_printf (
+			"%s%s%s%s%s%s%s:%d%s%s%s",
+			uri->user ? uri->user : "",
+			uri->authmech ? ";auth=" : "",
+			uri->authmech ? uri->authmech : "",
+			uri->passwd ? ":" : "",
+			uri->passwd ? uri->passwd : "",
+			uri->user ? "@" : "",
+			uri->host ? uri->host : "",
+			uri->port,
+			uri->path ? uri->path : "",
+			uri->query ? "?" : "",
+			uri->query ? uri->query : "");
+	else
+		uri_noproto = g_strdup_printf (
+			"%s%s%s%s%s%s%s%s%s%s",
+			uri->user ? uri->user : "",
+			uri->authmech ? ";auth=" : "",
+			uri->authmech ? uri->authmech : "",
+			uri->passwd ? ":" : "",
+			uri->passwd ? uri->passwd : "",
+			uri->user ? "@" : "",
+			uri->host ? uri->host : "",
+			uri->path ? uri->path : "",
+			uri->query ? "?" : "",
+			uri->query ? uri->query : "");
+	return uri_noproto;
+}
+
+static void
+location_changed (GtkEntry *editable, ESource *source)
+{
+	EUri       *euri;
+	char       *ruri;
+	const char *uri;
+
+	uri = gtk_entry_get_text (GTK_ENTRY (editable));
+	
+	euri = e_uri_new (uri);
+	ruri = print_uri_noproto (euri);
+	e_source_set_relative_uri (source, ruri);
+	g_free (ruri);
+	e_uri_free (euri);
+}
+
+static void
+ssl_changed (GtkToggleButton *button, ESource *source)
+{
+	e_source_set_property(source, "ssl", 
+			      gtk_toggle_button_get_active(button) ? "1" : "0");	
+}
+
+static void
+user_changed (GtkEntry *editable, ESource *source)
+{
+	EUri       *euri;
+	char       *uri;
+	char       *ruri;
+	const char *user;
+
+	uri = e_source_get_uri (source); 
+	user = gtk_entry_get_text (GTK_ENTRY (editable));
+	
+	if (uri == NULL) {
+		g_free (uri);
+		return;
+	}
+	
+	euri = e_uri_new (uri);
+	g_free (euri->user);
+
+	if (user != NULL) {
+		euri->user = g_strdup (user);
+		e_source_set_property (source, "auth", "1");
+	} else {
+		e_source_set_property (source, "auth", NULL);
+	}
+
+	e_source_set_property (source, "username", euri->user);	
+	ruri = print_uri_noproto (euri);
+	e_source_set_relative_uri (source, ruri);
+	g_free (ruri);
+	e_uri_free (euri);
+}
+
+GtkWidget *
+oge_caldav  (EPlugin                    *epl, 
+	     EConfigHookItemFactoryData *data)
+{
+	ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
+	ESource      *source;
+	ESourceGroup *group;
+	EUri         *euri;
+	GtkWidget    *parent;
+	GtkWidget    *lurl;
+	GtkWidget    *cssl;
+	GtkWidget    *location;
+	GtkWidget    *widget;
+	GtkWidget    *luser;
+	GtkWidget    *user;
+	char         *uri;
+	char         *username;
+	const char   *ssl_prop;
+	gboolean      ssl_enabled;
+	int           row;
+	
+	source = t->source;
+	group = e_source_peek_group (source);
+	
+	widget = NULL;
+	
+	if (!g_str_has_prefix (e_source_group_peek_base_uri (group), 
+			       "caldav")) {
+		return NULL;
+	}
+	
+	/* Extract the username from the uri so we can prefill the
+	 * dialog right, remove the username from the url then */
+	uri = e_source_get_uri (source);
+	euri = e_uri_new (uri);
+	g_free (uri);
+
+	if (euri == NULL) {
+		return NULL;
+	}
+	
+	username = euri->user;
+	euri->user = NULL;
+	uri = e_uri_to_string (euri, FALSE);
+
+	ssl_prop = e_source_get_property (source, "ssl");	
+	if (ssl_prop && ssl_prop[0] == '1') {
+		ssl_enabled = TRUE;
+	} else {
+		ssl_enabled = FALSE;
+	}
+
+	/* Build up the UI */
+	parent = data->parent;
+	
+	row = GTK_TABLE (parent)->nrows;
+
+	lurl = gtk_label_new_with_mnemonic (_("_URL:"));
+	gtk_widget_show (lurl);
+	gtk_misc_set_alignment (GTK_MISC (lurl), 0.0, 0.5);
+	gtk_table_attach (GTK_TABLE (parent), 
+			  lurl, 0, 1, 
+			  row, row+1, 
+			  GTK_FILL, 0, 0, 0);
+
+	location = gtk_entry_new ();
+	gtk_widget_show (location);
+	gtk_entry_set_text (GTK_ENTRY (location), uri);
+	gtk_table_attach (GTK_TABLE (parent), location,
+			  1, 2, row, row+1,
+			  GTK_EXPAND | GTK_FILL, 0, 0, 0);
+
+	gtk_label_set_mnemonic_widget (GTK_LABEL (lurl), location);
+	
+	g_signal_connect (G_OBJECT (location), 
+			  "changed", 
+			  G_CALLBACK (location_changed),
+			  source);
+
+	cssl = gtk_check_button_new_with_mnemonic (_("Use _SSL"));
+	gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(cssl), ssl_enabled);
+	gtk_widget_show (cssl);
+	gtk_table_attach (GTK_TABLE (parent), 
+			  cssl, 1, 2, 
+			  row + 1, row + 2, 
+			  GTK_FILL, 0, 0, 0);
+
+	g_signal_connect (G_OBJECT (cssl), 
+			  "toggled", 
+			  G_CALLBACK (ssl_changed),
+			  source);
+
+	luser = gtk_label_new_with_mnemonic (_("User_name:"));
+	gtk_widget_show (luser);
+	gtk_misc_set_alignment (GTK_MISC (luser), 0.0, 0.5);
+	gtk_table_attach (GTK_TABLE (parent), 
+			  luser, 0, 1, 
+			  row + 2, row + 3, 
+			  GTK_FILL, 0, 0, 0);
+
+	user = gtk_entry_new ();
+	gtk_widget_show (user);
+	gtk_entry_set_text (GTK_ENTRY (user), username);
+	gtk_table_attach (GTK_TABLE (parent), user,
+			  1, 2, row + 2, row + 3,
+			  GTK_EXPAND | GTK_FILL, 0, 0, 0);
+
+	gtk_label_set_mnemonic_widget (GTK_LABEL (luser), user);
+	
+	g_signal_connect (G_OBJECT (user), 
+			  "changed", 
+			  G_CALLBACK (user_changed),
+			  source);
+	
+	
+        g_free (uri);
+	g_free (username);
+	
+	return widget;	
+}
+
+
diff --git a/plugins/caldav/org-gnome-evolution-caldav.eplug.xml b/plugins/caldav/org-gnome-evolution-caldav.eplug.xml
new file mode 100644
index 0000000000..3d3af286ce
--- /dev/null
+++ b/plugins/caldav/org-gnome-evolution-caldav.eplug.xml
@@ -0,0 +1,26 @@
+<?xml version="1.0"?>
+<e-plugin-list>
+	<e-plugin
+	  type="shlib"
+	  id="org.gnome.evolution.caldav"
+	  location="@PLUGINDIR@/liborg-gnome-evolution-caldav.so"
+	  load-on-startup="true"
+	  domain="@GETTEXT_PACKAGE@"
+	  localedir="@LOCALEDIR@"
+	  name="CalDAV sources">
+  		<author name="Christian Kellner" email="gicmo@gnome.org"/>
+		<description>CalDAV Calendar sources</description>
+
+		<hook class="org.gnome.evolution.calendar.config:1.0">
+            	<group target="source"
+	     	   id="org.gnome.evolution.calendar.calendarProperties">
+		
+	     	 	<item type="item_table"
+		 		path="00.general/00.source/15.caldav"
+		 		factory="oge_caldav"/>
+            
+            </group>
+        </hook>
+	</e-plugin>
+	
+</e-plugin-list>