GNOME.org
 

[evolution-data-server/account-mgmt] online-accounts: Support GOA "exchange" accounts.

commit 7bff950801c113f82199401d0284b378df6f6e5f
Author: Matthew Barnes <mbarnes redhat com>
Date:   Wed May 30 07:22:40 2012 -0400

    online-accounts: Support GOA "exchange" accounts.

 modules/online-accounts/Makefile.am              |    6 +
 modules/online-accounts/goaewsclient.c           |  542 ++++++++++++++++++++++
 modules/online-accounts/goaewsclient.h           |   53 +++
 modules/online-accounts/module-online-accounts.c |   76 ++--
 4 files changed, 646 insertions(+), 31 deletions(-)
---
diff --git a/modules/online-accounts/Makefile.am b/modules/online-accounts/Makefile.am
index 43d707d..54bad0f 100644
--- a/modules/online-accounts/Makefile.am
+++ b/modules/online-accounts/Makefile.am
@@ -7,17 +7,23 @@ module_online_accounts_la_CPPFLAGS = \
 	-I$(top_srcdir) \
 	-DG_LOG_DOMAIN=\"module-online-accounts\" \
 	$(E_BACKEND_CFLAGS) \
+	$(CAMEL_CFLAGS) \
+	$(SOUP_CFLAGS) \
 	$(GOA_CFLAGS) \
 	$(NULL)
 
 module_online_accounts_la_SOURCES = \
 	module-online-accounts.c \
+	goaewsclient.c \
+	goaewsclient.h \
 	$(NULL)
 
 module_online_accounts_la_LIBADD = \
 	$(top_builddir)/libebackend/libebackend-1.2.la \
 	$(top_builddir)/libedataserver/libedataserver-1.2.la \
 	$(E_BACKEND_LIBS) \
+	$(CAMEL_LIBS) \
+	$(SOUP_LIBS) \
 	$(GOA_LIBS) \
 	$(NULL)
 
diff --git a/modules/online-accounts/goaewsclient.c b/modules/online-accounts/goaewsclient.c
new file mode 100644
index 0000000..8445735
--- /dev/null
+++ b/modules/online-accounts/goaewsclient.c
@@ -0,0 +1,542 @@
+/* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
+/*
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This library 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) any later version.
+ *
+ * This library 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 this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+ * Boston, MA 02111-1307, USA.
+ *
+ * Author: Debarshi Ray <debarshir gnome org>
+ */
+
+/* Based on code by the Evolution team.
+ *
+ * This was originally written as a part of evolution-ews:
+ * evolution-ews/src/server/e-ews-connection.c
+ */
+
+#include <config.h>
+#include <glib/gi18n-lib.h>
+
+#include <libsoup/soup.h>
+#include <libxml/xmlIO.h>
+
+#include <libedataserver/e-data-server-util.h>
+
+#include "goaewsclient.h"
+
+typedef struct {
+	GCancellable *cancellable;
+	SoupMessage *msgs[2];
+	SoupSession *session;
+	gulong cancellable_id;
+	xmlOutputBuffer *buf;
+
+	/* results */
+	gchar *as_url;
+	gchar *oab_url;
+} AutodiscoverData;
+
+typedef struct {
+	gchar *password;
+	gchar *username;
+} AutodiscoverAuthData;
+
+static void
+ews_autodiscover_data_free (AutodiscoverData *data)
+{
+	if (data->cancellable_id > 0) {
+		g_cancellable_disconnect (
+			data->cancellable, data->cancellable_id);
+		g_object_unref (data->cancellable);
+	}
+
+	/* soup_session_queue_message stole the references to data->msgs */
+	xmlOutputBufferClose (data->buf);
+	g_object_unref (data->session);
+
+	g_free (data->as_url);
+	g_free (data->oab_url);
+
+	g_slice_free (AutodiscoverData, data);
+}
+
+static void
+ews_autodiscover_auth_data_free (gpointer data,
+                                 GClosure *closure)
+{
+	AutodiscoverAuthData *auth = data;
+
+	g_free (auth->password);
+	g_free (auth->username);
+	g_slice_free (AutodiscoverAuthData, auth);
+}
+
+static gboolean
+ews_check_node (const xmlNode *node,
+                const gchar *name)
+{
+	g_return_val_if_fail (node != NULL, FALSE);
+
+	return (node->type == XML_ELEMENT_NODE) &&
+		(g_strcmp0 ((gchar *) node->name, name) == 0);
+}
+
+static void
+ews_authenticate (SoupSession *session,
+                  SoupMessage *msg,
+                  SoupAuth *auth,
+                  gboolean retrying,
+                  AutodiscoverAuthData *data)
+{
+	if (retrying)
+		return;
+
+	soup_auth_authenticate (auth, data->username, data->password);
+}
+
+static void
+ews_autodiscover_cancelled_cb (GCancellable *cancellable,
+                               AutodiscoverData *data)
+{
+	soup_session_abort (data->session);
+}
+
+static gboolean
+ews_autodiscover_parse_protocol (xmlNode *node,
+                                 AutodiscoverData *data)
+{
+	gboolean got_as_url = FALSE;
+	gboolean got_oab_url = FALSE;
+
+	for (node = node->children; node; node = node->next) {
+		xmlChar *prop;
+
+		if (ews_check_node (node, "ASUrl")) {
+			prop = xmlGetProp (node, node->name);
+			data->as_url = g_strdup ((gchar *) prop);
+			xmlFree (prop);
+			got_as_url = TRUE;
+
+		} else if (ews_check_node (node, "OABUrl")) {
+			prop = xmlGetProp (node, node->name);
+			data->oab_url = g_strdup ((gchar *) prop);
+			xmlFree (prop);
+			got_oab_url = TRUE;
+		}
+
+		if (got_as_url && got_oab_url)
+			break;
+	}
+
+	return (got_as_url && got_oab_url);
+}
+
+static void
+ews_autodiscover_response_cb (SoupSession *session,
+                              SoupMessage *msg,
+                              gpointer user_data)
+{
+	GSimpleAsyncResult *simple;
+	AutodiscoverData *data;
+	gboolean success = FALSE;
+	guint status;
+	gint idx;
+	gsize size;
+	xmlDoc *doc;
+	xmlNode *node;
+	GError *error = NULL;
+
+	simple = G_SIMPLE_ASYNC_RESULT (user_data);
+	data = g_simple_async_result_get_op_res_gpointer (simple);
+
+	status = msg->status_code;
+	if (status == SOUP_STATUS_CANCELLED)
+		return;
+
+	size = sizeof (data->msgs) / sizeof (data->msgs[0]);
+
+	for (idx = 0; idx < size; idx++) {
+		if (data->msgs[idx] == msg)
+			break;
+	}
+	if (idx == size)
+		return;
+
+	data->msgs[idx] = NULL;
+
+	if (status != SOUP_STATUS_OK) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific */
+			_("Code: %u - Unexpected response from server"),
+			status);
+		goto out;
+	}
+
+	soup_buffer_free (
+		soup_message_body_flatten (
+		SOUP_MESSAGE (msg)->response_body));
+
+	g_debug ("The response headers");
+	g_debug ("===================");
+	g_debug ("%s", SOUP_MESSAGE (msg)->response_body->data);
+
+	doc = xmlReadMemory (
+		msg->response_body->data,
+		msg->response_body->length,
+		"autodiscover.xml", NULL, 0);
+	if (doc == NULL) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific */
+			_("Failed to parse autodiscover response XML"));
+		goto out;
+	}
+
+	node = xmlDocGetRootElement (doc);
+	if (g_strcmp0 ((gchar *) node->name, "Autodiscover") != 0) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific */
+			_("Failed to find Autodiscover element"));
+		goto out;
+	}
+
+	for (node = node->children; node; node = node->next) {
+		if (ews_check_node (node, "Response"))
+			break;
+	}
+	if (node == NULL) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific */
+			_("Failed to find Response element"));
+		goto out;
+	}
+
+	for (node = node->children; node; node = node->next) {
+		if (ews_check_node (node, "Account"))
+			break;
+	}
+	if (node == NULL) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific */
+			_("Failed to find Account element"));
+		goto out;
+	}
+
+	for (node = node->children; node; node = node->next) {
+		if (ews_check_node (node, "Protocol")) {
+			success = ews_autodiscover_parse_protocol (node, data);
+			break;
+		}
+	}
+	if (!success) {
+		g_set_error (
+			&error, GOA_ERROR,
+			GOA_ERROR_FAILED, /* TODO: more specific*/
+			_("Failed to find ASUrl and OABUrl in autodiscover response"));
+			goto out;
+	}
+
+	for (idx = 0; idx < size; idx++) {
+		if (data->msgs[idx] != NULL) {
+			/* Since we are cancelling from the same thread
+			 * that we queued the message, the callback (ie.
+			 * this function) will be invoked before
+			 * soup_session_cancel_message returns. */
+			soup_session_cancel_message (
+				data->session, data->msgs[idx],
+				SOUP_STATUS_CANCELLED);
+			data->msgs[idx] = NULL;
+		}
+	}
+
+out:
+	if (error != NULL) {
+		for (idx = 0; idx < size; idx++) {
+			if (data->msgs[idx] != NULL) {
+				/* There's another request outstanding.
+				 * Hope that it has better luck. */
+				g_clear_error (&error);
+				return;
+			}
+		}
+		g_simple_async_result_take_error (simple, error);
+	}
+
+	g_simple_async_result_complete_in_idle (simple);
+	g_object_unref (simple);
+}
+
+static xmlDoc *
+ews_create_autodiscover_xml (const gchar *email)
+{
+	xmlDoc *doc;
+	xmlNode *node;
+	xmlNs *ns;
+
+	doc = xmlNewDoc ((xmlChar *) "1.0");
+
+	node = xmlNewDocNode (doc, NULL, (xmlChar *) "Autodiscover", NULL);
+	xmlDocSetRootElement (doc, node);
+	ns = xmlNewNs (
+		node,
+		(xmlChar *) "http://schemas.microsoft.com/exchange/autodiscover/outlook/requestschema/2006";,
+		NULL);
+
+	node = xmlNewChild (node, ns, (xmlChar *) "Request", NULL);
+	xmlNewChild (node, ns, (xmlChar *) "EMailAddress", (xmlChar *) email);
+	xmlNewChild (
+		node, ns,
+		(xmlChar *) "AcceptableResponseSchema",
+		(xmlChar *) "http://schemas.microsoft.com/exchange/autodiscover/outlook/responseschema/2006a";);
+
+	return doc;
+}
+
+static void
+ews_post_restarted_cb (SoupMessage *msg, gpointer data)
+{
+	xmlOutputBuffer *buf = data;
+
+	/* In violation of RFC2616, libsoup will change a
+	 * POST request to a GET on receiving a 302 redirect. */
+	g_debug ("Working around libsoup bug with redirect");
+	g_object_set (msg, SOUP_MESSAGE_METHOD, "POST", NULL);
+
+	soup_message_set_request (
+		msg, "text/xml; charset=utf-8",
+		SOUP_MEMORY_COPY,
+		(gchar *) buf->buffer->content,
+		buf->buffer->use);
+}
+
+static SoupMessage *
+ews_create_msg_for_url (const gchar *url,
+                        xmlOutputBuffer *buf)
+{
+	SoupMessage *msg;
+
+	msg = soup_message_new (buf != NULL ? "POST" : "GET", url);
+	soup_message_headers_append (
+		msg->request_headers, "User-Agent", "libews/0.1");
+
+	if (buf != NULL) {
+		soup_message_set_request (
+			msg, "text/xml; charset=utf-8",
+			SOUP_MEMORY_COPY,
+			(gchar *) buf->buffer->content,
+			buf->buffer->use);
+		g_signal_connect (
+			msg, "restarted",
+			G_CALLBACK (ews_post_restarted_cb), buf);
+	}
+
+	soup_buffer_free (
+		soup_message_body_flatten (
+		SOUP_MESSAGE (msg)->request_body));
+
+	g_debug ("The request headers");
+	g_debug ("===================");
+	g_debug ("%s", SOUP_MESSAGE (msg)->request_body->data);
+
+	return msg;
+}
+
+void
+goa_ews_autodiscover (GoaObject *goa_object,
+                      GCancellable *cancellable,
+                      GAsyncReadyCallback callback,
+                      gpointer user_data)
+{
+	/* XXX This function is only called if HAVE_GOA_PASSWORD_BASED
+	 *     is defined, so don't worry about a fallback behavior. */
+#ifdef HAVE_GOA_PASSWORD_BASED
+	GoaAccount *goa_account;
+	GoaExchange *goa_exchange;
+	GoaPasswordBased *goa_password;
+	GSimpleAsyncResult *simple;
+	AutodiscoverData *data;
+	AutodiscoverAuthData *auth;
+	gchar *url1;
+	gchar *url2;
+	xmlDoc *doc;
+	xmlOutputBuffer *buf;
+	gchar *email;
+	gchar *host;
+	gchar *password = NULL;
+	GError *error = NULL;
+
+	g_return_if_fail (GOA_IS_OBJECT (goa_object));
+
+	goa_account = goa_object_get_account (goa_object);
+	goa_exchange = goa_object_get_exchange (goa_object);
+	goa_password = goa_object_get_password_based (goa_object);
+
+	email = goa_account_dup_presentation_identity (goa_account);
+	host = goa_exchange_dup_host (goa_exchange);
+
+	doc = ews_create_autodiscover_xml (email);
+	buf = xmlAllocOutputBuffer (NULL);
+	xmlNodeDumpOutput (buf, doc, xmlDocGetRootElement (doc), 0, 1, NULL);
+	xmlOutputBufferFlush (buf);
+
+	url1 = g_strdup_printf (
+		"https://%s/autodiscover/autodiscover.xml";, host);
+	url2 = g_strdup_printf (
+		"https://autodiscover.%s/autodiscover/autodiscover.xml";, host);
+
+	g_free (host);
+	g_free (email);
+
+	/* http://msdn.microsoft.com/en-us/library/ee332364.aspx says we are
+	* supposed to try $domain and then autodiscover.$domain. But some
+	* people have broken firewalls on the former which drop packets
+	* instead of rejecting connections, and make the request take ages
+	* to time out. So run both queries in parallel and let the fastest
+	* (successful) one win. */
+	data = g_slice_new0 (AutodiscoverData);
+	data->buf = buf;
+	data->msgs[0] = ews_create_msg_for_url (url1, buf);
+	data->msgs[1] = ews_create_msg_for_url (url2, buf);
+	data->session = soup_session_async_new_with_options (
+		SOUP_SESSION_USE_NTLM, TRUE,
+		SOUP_SESSION_USE_THREAD_CONTEXT, TRUE, NULL);
+	if (G_IS_CANCELLABLE (cancellable)) {
+		data->cancellable = g_object_ref (cancellable);
+		data->cancellable_id = g_cancellable_connect (
+			data->cancellable,
+			G_CALLBACK (ews_autodiscover_cancelled_cb),
+			data, NULL);
+	}
+
+	simple = g_simple_async_result_new (
+		G_OBJECT (goa_object), callback,
+		user_data, goa_ews_autodiscover);
+
+	g_simple_async_result_set_check_cancellable (simple, cancellable);
+
+	g_simple_async_result_set_op_res_gpointer (
+		simple, data, (GDestroyNotify) ews_autodiscover_data_free);
+
+	goa_password_based_call_get_password_sync (
+		goa_password, "", &password, cancellable, &error);
+
+	/* Sanity check */
+	g_return_if_fail (
+		((password != NULL) && (error == NULL)) ||
+		((password == NULL) && (error != NULL)));
+
+	if (error == NULL) {
+		gchar *username;
+
+		username = goa_account_dup_identity (goa_account);
+
+		auth = g_slice_new0 (AutodiscoverAuthData);
+		auth->username = username;  /* takes ownership */
+		auth->password = password;  /* takes ownership */
+
+		g_signal_connect_data (
+			data->session, "authenticate",
+			G_CALLBACK (ews_authenticate), auth,
+			ews_autodiscover_auth_data_free, 0);
+
+		soup_session_queue_message (
+			data->session, data->msgs[0],
+			ews_autodiscover_response_cb, simple);
+		soup_session_queue_message (
+			data->session, data->msgs[1],
+			ews_autodiscover_response_cb, simple);
+	} else {
+		g_simple_async_result_take_error (simple, error);
+		g_simple_async_result_complete_in_idle (simple);
+		g_object_unref (simple);
+	}
+
+	g_free (url2);
+	g_free (url1);
+	xmlFreeDoc (doc);
+
+	g_object_unref (goa_account);
+	g_object_unref (goa_exchange);
+	g_object_unref (goa_password);
+#endif /* HAVE_GOA_PASSWORD_BASED */
+}
+
+gboolean
+goa_ews_autodiscover_finish (GoaObject *goa_object,
+                             GAsyncResult *result,
+                             gchar **out_as_url,
+                             gchar **out_oab_url,
+                             GError **error)
+{
+	GSimpleAsyncResult *simple;
+	AutodiscoverData *data;
+
+	g_return_val_if_fail (
+		g_simple_async_result_is_valid (
+		result, G_OBJECT (goa_object),
+		goa_ews_autodiscover), FALSE);
+
+	simple = G_SIMPLE_ASYNC_RESULT (result);
+	data = g_simple_async_result_get_op_res_gpointer (simple);
+
+	if (g_simple_async_result_propagate_error (simple, error))
+		return FALSE;
+
+	if (out_as_url != NULL) {
+		*out_as_url = data->as_url;
+		data->as_url = NULL;
+	}
+
+	if (out_oab_url != NULL) {
+		*out_oab_url = data->oab_url;
+		data->oab_url = NULL;
+	}
+
+	return TRUE;
+}
+
+gboolean
+goa_ews_autodiscover_sync (GoaObject *goa_object,
+                           gchar **out_as_url,
+                           gchar **out_oab_url,
+                           GCancellable *cancellable,
+                           GError **error)
+{
+	EAsyncClosure *closure;
+	GAsyncResult *result;
+	gboolean success;
+
+	g_return_val_if_fail (GOA_IS_OBJECT (goa_object), FALSE);
+
+	closure = e_async_closure_new ();
+
+	goa_ews_autodiscover (
+		goa_object, cancellable,
+		e_async_closure_callback, closure);
+
+	result = e_async_closure_wait (closure);
+
+	success = goa_ews_autodiscover_finish (
+		goa_object, result, out_as_url, out_oab_url, error);
+
+	e_async_closure_free (closure);
+
+	return success;
+}
+
diff --git a/modules/online-accounts/goaewsclient.h b/modules/online-accounts/goaewsclient.h
new file mode 100644
index 0000000..7798c59
--- /dev/null
+++ b/modules/online-accounts/goaewsclient.h
@@ -0,0 +1,53 @@
+/* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
+/*
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This library 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) any later version.
+ *
+ * This library 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 this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+ * Boston, MA 02111-1307, USA.
+ *
+ * Author: Debarshi Ray <debarshir gnome org>
+ */
+
+/* XXX This is a rather hacked up version of GoaEwsClient from
+ *     GNOME Online Accounts which returns the discovered URLs. */
+
+#ifndef __GOA_EWS_CLIENT_H__
+#define __GOA_EWS_CLIENT_H__
+
+/* XXX Yeah, yeah... */
+#define GOA_API_IS_SUBJECT_TO_CHANGE
+
+#include <goa/goa.h>
+
+G_BEGIN_DECLS
+
+void		goa_ews_autodiscover		(GoaObject *goa_object,
+						 GCancellable *cancellable,
+						 GAsyncReadyCallback  callback,
+						 gpointer user_data);
+gboolean	goa_ews_autodiscover_finish	(GoaObject *goa_object,
+						 GAsyncResult *result,
+						 gchar **out_as_url,
+						 gchar **out_oab_url,
+						 GError **error);
+gboolean	goa_ews_autodiscover_sync	(GoaObject *goa_object,
+						 gchar **out_as_url,
+						 gchar **out_oab_url,
+						 GCancellable *cancellable,
+						 GError **error);
+
+G_END_DECLS
+
+#endif /* __GOA_EWS_CLIENT_H__ */
diff --git a/modules/online-accounts/module-online-accounts.c b/modules/online-accounts/module-online-accounts.c
index 041c963..9c0100f 100644
--- a/modules/online-accounts/module-online-accounts.c
+++ b/modules/online-accounts/module-online-accounts.c
@@ -26,6 +26,7 @@
 #include <libedataserver/e-uid.h>
 #include <libedataserver/e-data-server-util.h>
 #include <libedataserver/e-source-authentication.h>
+#include <libedataserver/e-source-camel.h>
 #include <libedataserver/e-source-collection.h>
 #include <libedataserver/e-source-goa.h>
 #include <libedataserver/e-source-mail-account.h>
@@ -37,6 +38,8 @@
 #include <libebackend/e-server-side-source.h>
 #include <libebackend/e-source-registry-server.h>
 
+#include "goaewsclient.h"
+
 /* Standard GObject macros */
 #define E_TYPE_ONLINE_ACCOUNTS \
 	(e_online_accounts_get_type ())
@@ -152,26 +155,6 @@ online_accounts_object_is_non_null (GBinding *binding,
 	return TRUE;
 }
 
-static gboolean
-online_accounts_supports_mail (GoaObject *goa_object)
-{
-	GoaMail *goa_mail;
-	gboolean supports_mail = FALSE;
-
-	/* This just sanity checks the GoaObject. */
-
-	goa_mail = goa_object_get_mail (goa_object);
-
-	if (goa_mail != NULL) {
-		supports_mail =
-			goa_mail_get_imap_supported (goa_mail) &&
-			goa_mail_get_smtp_supported (goa_mail);
-		g_object_unref (goa_mail);
-	}
-
-	return supports_mail;
-}
-
 static ESource *
 online_accounts_new_source (EOnlineAccounts *extension)
 {
@@ -203,24 +186,57 @@ online_accounts_config_exchange (EOnlineAccounts *extension,
                                  GoaObject *goa_object)
 {
 #ifdef HAVE_GOA_PASSWORD_BASED
-	GoaExchange *goa_exchange;
 	ESourceExtension *source_extension;
 	const gchar *extension_name;
+	gchar *as_url = NULL;
+	gchar *oab_url = NULL;
+	GError *error = NULL;
 
-	goa_exchange = goa_object_get_exchange (goa_object);
+	if (goa_object_peek_exchange (goa_object) == NULL)
+		return;
+
+	/* XXX GNOME Online Accounts already runs autodiscover to test
+	 *     the user-entered values but doesn't share the discovered
+	 *     URLs.  It only provides us a host name and expects us to
+	 *     re-run autodiscover for ourselves.
+	 *
+	 *     So I've copied a slab of code from GOA which was in turn
+	 *     copied from Evolution-EWS which does the autodiscovery.
+	 *
+	 *     I've already complained to Debarshi Ray about the lack
+	 *     of useful info in GOA's Exchange interface so hopefully
+	 *     it will someday publish discovered URLs and then we can
+	 *     remove this hack. */
+
+	goa_ews_autodiscover_sync (
+		goa_object, &as_url, &oab_url, NULL, &error);
 
-	if (goa_exchange == NULL)
+	if (error != NULL) {
+		g_warning ("%s: %s", G_STRFUNC, error->message);
+		g_error_free (error);
 		return;
+	}
 
-	extension_name = E_SOURCE_EXTENSION_AUTHENTICATION;
+	g_return_if_fail (as_url != NULL);
+	g_return_if_fail (oab_url != NULL);
+
+	/* XXX We don't have direct access to CamelEwsSettings from here
+	 *     since it's defined in Evolution-EWS.  But we can find out
+	 *     its extension name and set properties by name. */
+
+	extension_name = e_source_camel_get_extension_name ("ews");
 	source_extension = e_source_get_extension (source, extension_name);
 
-	g_object_bind_property (
-		goa_exchange, "host",
-		source_extension, "host",
-		G_BINDING_SYNC_CREATE);
+	/* This will be NULL if Evolution-EWS is not installed. */
+	if (source_extension != NULL)
+		g_object_set (
+			source_extension,
+			"hosturl", as_url,
+			"oaburl", oab_url,
+			NULL);
 
-	g_object_unref (goa_exchange);
+	g_free (as_url);
+	g_free (oab_url);
 #endif /* HAVE_GOA_PASSWORD_BASED */
 }
 
@@ -464,8 +480,6 @@ online_accounts_create_collection (EOnlineAccounts *extension,
 	const gchar *account_id;
 	const gchar *parent_uid;
 
-	g_return_if_fail (online_accounts_supports_mail (goa_object));
-
 	server = online_accounts_get_server (extension);
 
 	collection_source = online_accounts_new_source (extension);
[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]