1 files changed, 347 insertions, 0 deletions
diff --git a/calendar/gui/tasks-component.c b/calendar/gui/tasks-component.c
new file mode 100644
index 0000000000..5eca87f078
--- /dev/null
+++ b/calendar/gui/tasks-component.c
@@ -0,0 +1,347 @@
+/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
+/* tasks-component.c
+ *
+ * Copyright (C) 2003  Rodrigo Moya
+ *
+ * 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: Rodrigo Moya <rodrigo@ximian.com>
+ */
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#include <errno.h>
+#include <string.h>
+#include <bonobo/bonobo-control.h>
+#include <bonobo/bonobo-i18n.h>
+#include <gconf/gconf-client.h>
+#include "cal-client/cal-client.h"
+#include "e-cal-model.h"
+#include "e-tasks.h"
+#include "tasks-component.h"
+#include "tasks-control.h"
+#include "widgets/misc/e-source-selector.h"
+
+#define PARENT_TYPE bonobo_object_get_type ()
+
+static BonoboObjectClass *parent_class = NULL;
+
+struct _TasksComponentPrivate {
+	char *config_directory;
+	GConfClient *gconf_client;
+	ESourceList *source_list;
+	GSList *source_selection;
+	GtkWidget *tasks;
+};
+
+/* Utility functions.  */
+
+static void
+add_uri_for_source (ESource *source, ETasks *tasks)
+{
+	CalClient *client;
+	ECalModel *model;
+	GError *error = NULL;
+	char *uri = e_source_get_uri (source);
+
+	model = e_calendar_table_get_model (e_tasks_get_calendar_table (tasks));
+	client = e_cal_model_get_client_for_uri (model, uri);
+	if (!client) {
+		client = cal_client_new (uri, CALOBJ_TYPE_TODO);
+		if (cal_client_open (client, TRUE, &error)) {
+			e_cal_model_add_client (model, client);
+		} else {
+			g_warning (G_STRLOC ": Could not open tasks at %s: %s", uri, error->message);
+			g_error_free (error);
+			g_object_unref (client);
+		}
+	}
+
+	g_free (uri);
+}
+
+static void
+remove_uri_for_source (ESource *source, ETasks *tasks)
+{
+	CalClient *client;
+	ECalModel *model;
+	char *uri = e_source_get_uri (source);
+
+	model = e_calendar_table_get_model (e_tasks_get_calendar_table (tasks));
+	client = e_cal_model_get_client_for_uri (model, uri);
+	if (client)
+		e_cal_model_remove_client (model, client);
+
+	g_free (uri);
+}
+
+static gboolean
+is_in_selection (GSList *selection, ESource *source)
+{
+	GSList *l;
+	
+	for (l = selection; l; l = l->next) {
+		ESource *selected_source = l->data;
+		
+		if (!strcmp (e_source_peek_uid (selected_source), e_source_peek_uid (source)))
+			return TRUE;
+	}
+
+	return FALSE;
+}
+
+static void
+update_uris_for_selection (ESourceSelector *selector, TasksComponent *component)
+{
+	TasksComponentPrivate *priv;
+	GSList *selection, *l;
+	
+	selection = e_source_selector_get_selection (selector);
+
+	priv = component->priv;
+	
+	for (l = priv->source_selection; l; l = l->next) {
+		ESource *old_selected_source = l->data;
+
+		if (!is_in_selection (selection, old_selected_source))
+			remove_uri_for_source (old_selected_source, priv->tasks);
+	}	
+	
+	for (l = selection; l; l = l->next) {
+		ESource *selected_source = l->data;
+		
+		add_uri_for_source (selected_source, priv->tasks);
+	}
+
+	e_source_selector_free_selection (priv->source_selection);
+	priv->source_selection = selection;
+}
+
+/* Callbacks.  */
+static void
+source_selection_changed_cb (ESourceSelector *selector, TasksComponent *component)
+{
+	update_uris_for_selection (selector, component);
+}
+
+static void
+primary_source_selection_changed_cb (ESourceSelector *selector, TasksComponent *component)
+{
+	TasksComponentPrivate *priv;
+	ESource *source;
+	CalClient *client;
+	char *uri;
+	ECalModel *model;
+
+	priv = component->priv;
+	
+	source = e_source_selector_peek_primary_selection (selector);
+	if (!source)
+		return;
+
+	/* Set the default */
+	uri = e_source_get_uri (source);
+	model = e_calendar_table_get_model (e_tasks_get_calendar_table (E_TASKS (priv->tasks)));
+	client = e_cal_model_get_client_for_uri (model, uri);
+	if (client)
+		e_cal_model_set_default_client (model, client);
+
+	g_free (uri);
+
+}
+
+/* GObject methods */
+
+static void
+impl_dispose (GObject *object)
+{
+	TasksComponentPrivate *priv = TASKS_COMPONENT (object)->priv;
+
+	if (priv->source_list != NULL) {
+		g_object_unref (priv->source_list);
+		priv->source_list = NULL;
+	}
+
+	if (priv->source_selection != NULL) {
+		e_source_selector_free_selection (priv->source_selection);
+		priv->source_selection = NULL;
+	}
+
+	if (priv->gconf_client != NULL) {
+		g_object_unref (priv->gconf_client);
+		priv->gconf_client = NULL;
+	}
+
+	(* G_OBJECT_CLASS (parent_class)->dispose) (object);
+}
+
+static void
+impl_finalize (GObject *object)
+{
+	TasksComponentPrivate *priv = TASKS_COMPONENT (object)->priv;
+
+	g_free (priv->config_directory);
+	g_free (priv);
+
+	(* G_OBJECT_CLASS (parent_class)->finalize) (object);
+}
+
+/* Evolution::Component CORBA methods */
+
+static void
+control_activate_cb (BonoboControl *control, gboolean activate, gpointer data)
+{
+	ETasks *tasks = data;
+
+	if (activate)
+		tasks_control_activate (control, tasks);
+	else
+		tasks_control_deactivate (control, tasks);
+}
+
+static void
+impl_createControls (PortableServer_Servant servant,
+		     Bonobo_Control *corba_sidebar_control,
+		     Bonobo_Control *corba_view_control,
+		     CORBA_Environment *ev)
+{
+	TasksComponent *component = TASKS_COMPONENT (bonobo_object_from_servant (servant));
+	TasksComponentPrivate *priv;
+	GtkWidget *selector;
+	GtkWidget *selector_scrolled_window;
+	BonoboControl *sidebar_control, *view_control;
+
+	priv = component->priv;
+
+	/* create sidebar selector */
+	selector = e_source_selector_new (priv->source_list);
+	gtk_widget_show (selector);
+
+	selector_scrolled_window = gtk_scrolled_window_new (NULL, NULL);
+	gtk_container_add (GTK_CONTAINER (selector_scrolled_window), selector);
+	gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (selector_scrolled_window),
+					GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
+	gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (selector_scrolled_window),
+					     GTK_SHADOW_IN);
+	gtk_widget_show (selector_scrolled_window);
+
+	sidebar_control = bonobo_control_new (selector_scrolled_window);
+
+	/* create the tasks view */
+	view_control = tasks_control_new ();
+	priv->tasks = bonobo_control_get_widget (view_control);
+	g_signal_connect (view_control, "activate", G_CALLBACK (control_activate_cb), priv->tasks);
+
+	g_signal_connect_object (selector, "selection_changed",
+				 G_CALLBACK (source_selection_changed_cb),
+				 G_OBJECT (component), 0);
+	g_signal_connect_object (selector, "primary_selection_changed",
+				 G_CALLBACK (primary_source_selection_changed_cb),
+				 G_OBJECT (component), 0);
+
+	update_uris_for_selection (E_SOURCE_SELECTOR (selector), component);
+
+	*corba_sidebar_control = CORBA_Object_duplicate (BONOBO_OBJREF (sidebar_control), ev);
+	*corba_view_control = CORBA_Object_duplicate (BONOBO_OBJREF (view_control), ev);
+}
+
+/* Initialization */
+
+static void
+tasks_component_class_init (TasksComponentClass *klass)
+{
+	POA_GNOME_Evolution_Component__epv *epv = &klass->epv;
+	GObjectClass *object_class = G_OBJECT_CLASS (klass);
+
+	parent_class = g_type_class_peek_parent (klass);
+
+	epv->createControls = impl_createControls;
+
+	object_class->dispose = impl_dispose;
+	object_class->finalize = impl_finalize;
+}
+
+static void
+tasks_component_init (TasksComponent *component, TasksComponentClass *klass)
+{
+	TasksComponentPrivate *priv;
+	GSList *groups;
+
+	priv = g_new0 (TasksComponentPrivate, 1);
+	priv->config_directory = g_build_filename (g_get_home_dir (),
+						   ".evolution", "tasks", "config",
+						   NULL);
+
+	/* load the groups from the configuration */
+	priv->gconf_client = gconf_client_get_default ();
+	priv->source_list = e_source_list_new_for_gconf (priv->gconf_client,
+							 "/apps/evolution/tasks/sources");
+
+	/* create default tasks folders if there are no groups */
+	groups = e_source_list_peek_groups (priv->source_list);
+	if (!groups) {
+		ESourceGroup *group;
+		ESource *source;
+		char *base_uri, *new_dir;
+
+		/* create the source group */
+		base_uri = g_build_filename (g_get_home_dir (),
+					     ".evolution/tasks/local/OnThisComputer/",
+					     NULL);
+		group = e_source_group_new (_("On This Computer"), base_uri);
+		e_source_list_add_group (priv->source_list, group, -1);
+
+		/* FIXME: migrate tasks from older setups */
+		new_dir = g_build_filename (base_uri, "Personal/", NULL);
+		if (!e_mkdir_hier (new_dir, 0700)) {
+			source = e_source_new (_("Personal"), "Personal");
+			e_source_group_add_source (group, source, -1);
+		}
+
+		g_free (new_dir);
+		g_free (base_uri);
+	}
+}
+
+/* Public API */
+
+TasksComponent *
+tasks_component_peek (void)
+{
+	static TasksComponent *component = NULL;
+
+	if (component == NULL) {
+		component = g_object_new (tasks_component_get_type (), NULL);
+
+		if (e_mkdir_hier (component->priv->config_directory, 0777) != 0) {
+			g_warning (G_STRLOC ": Cannot create directory %s: %s",
+				   component->priv->config_directory, g_strerror (errno));
+			g_object_unref (component);
+			component = NULL;
+		}
+	}
+
+	return component;
+}
+
+const char *
+tasks_component_peek_config_directory (TasksComponent *component)
+{
+	return (const char *) component->priv->config_directory;
+}
+
+BONOBO_TYPE_FUNC_FULL (TasksComponent, GNOME_Evolution_Component, PARENT_TYPE, tasks_component)