path: root/calendar/modules/e-memo-shell-module.c

/*
 * e-memo-shell-module.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/>  
 *
 *
 * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com)
 *
 */

#include <string.h>
#include <glib/gi18n.h>
#include <libecal/e-cal.h>
#include <libedataserver/e-url.h>
#include <libedataserver/e-source.h>
#include <libedataserver/e-source-list.h>
#include <libedataserver/e-source-group.h>

#include "shell/e-shell.h"
#include "shell/e-shell-module.h"
#include "shell/e-shell-window.h"

#include "calendar/common/authentication.h"
#include "calendar/gui/calendar-config.h"
#include "calendar/gui/comp-util.h"
#include "calendar/gui/dialogs/calendar-setup.h"
#include "calendar/gui/dialogs/memo-editor.h"

#include "e-memo-shell-view.h"
#include "e-memo-shell-module-migrate.h"

#define MODULE_NAME     "memos"
#define MODULE_ALIASES      ""
#define MODULE_SCHEMES      "memo"
#define MODULE_SORT_ORDER   500

#define WEB_BASE_URI        "webcal://"
#define PERSONAL_RELATIVE_URI   "system"

/* Module Entry Point */
void e_shell_module_init (GTypeModule *type_module);

static void
memo_module_ensure_sources (EShellModule *shell_module)
{
    /* XXX This is basically the same algorithm across all modules.
     *     Maybe we could somehow integrate this into EShellModule? */

    ESourceList *source_list;
    ESourceGroup *on_this_computer;
    ESourceGroup *on_the_web;
    ESource *personal;
    GSList *groups, *iter;
    const gchar *data_dir;
    gchar *base_uri;
    gchar *filename;

    on_this_computer = NULL;
    on_the_web = NULL;
    personal = NULL;

    if (!e_cal_get_sources (&source_list, E_CAL_SOURCE_TYPE_JOURNAL, NULL)) {
        g_warning ("Could not get memo sources from GConf!");
        return;
    }

    /* Share the source list with all memo views.  This is
     * accessible via e_memo_shell_view_get_source_list().
     * Note: EShellModule takes ownership of the reference.
     *
     * XXX I haven't yet decided if I want to add a proper
     *     EShellModule API for this.  The mail module would
     *     not use it. */
    g_object_set_data_full (
        G_OBJECT (shell_module), "source-list",
        source_list, (GDestroyNotify) g_object_unref);

    data_dir = e_shell_module_get_data_dir (shell_module);
    filename = g_build_filename (data_dir, "local", NULL);
    base_uri = g_filename_to_uri (filename, NULL, NULL);
    g_free (filename);

    groups = e_source_list_peek_groups (source_list);
    for (iter = groups; iter != NULL; iter = iter->next) {
        ESourceGroup *source_group = iter->data;
        const gchar *group_base_uri;

        group_base_uri = e_source_group_peek_base_uri (source_group);

        /* Compare only "file://" part.  If the user's home
         * changes, we do not want to create another group. */
        if (on_this_computer == NULL &&
            strncmp (base_uri, group_base_uri, 7) == 0)
            on_this_computer = source_group;

        else if (on_the_web == NULL &&
            strcmp (WEB_BASE_URI, group_base_uri) == 0)
            on_the_web = source_group;
    }

    if (on_this_computer != NULL) {
        GSList *sources;
        const gchar *group_base_uri;

        sources = e_source_group_peek_sources (on_this_computer);
        group_base_uri = e_source_group_peek_base_uri (on_this_computer);

        /* Make sure this group includes a "Personal" source. */
        for (iter = sources; iter != NULL; iter = iter->next) {
            ESource *source = iter->data;
            const gchar *relative_uri;

            relative_uri = e_source_peek_relative_uri (source);
            if (relative_uri == NULL)
                continue;

            if (strcmp (PERSONAL_RELATIVE_URI, relative_uri) != 0)
                continue;

            personal = source;
            break;
        }

        /* Make sure we have the correct base URI.  This can
         * change when the user's home directory changes. */
        if (strcmp (base_uri, group_base_uri) != 0) {
            e_source_group_set_base_uri (
                on_this_computer, base_uri);

            /* XXX We shouldn't need this sync call here as
             *     set_base_uri() results in synching to GConf,
             *     but that happens in an idle loop and too late
             *     to prevent the user from seeing a "Cannot
             *     Open ... because of invalid URI" error. */
            e_source_list_sync (source_list, NULL);
        }

    } else {
        ESourceGroup *source_group;
        const gchar *name;

        name = _("On This Computer");
        source_group = e_source_group_new (name, base_uri);
        e_source_list_add_group (source_list, source_group, -1);
        g_object_unref (source_group);
    }

    if (personal == NULL) {
        ESource *source;
        GSList *selected;
        const gchar *name;
        gchar *primary;

        name = _("Personal");
        source = e_source_new (name, PERSONAL_RELATIVE_URI);
        e_source_group_add_source (on_this_computer, source, -1);
        g_object_unref (source);

        primary = calendar_config_get_primary_memos ();
        selected = calendar_config_get_memos_selected ();

        if (primary == NULL && selected == NULL) {
            const gchar *uid;

            uid = e_source_peek_uid (source);
            selected = g_slist_prepend (NULL, g_strdup (uid));

            calendar_config_set_primary_memos (uid);
            calendar_config_set_memos_selected (selected);
        }

        g_slist_foreach (selected, (GFunc) g_free, NULL);
        g_slist_free (selected);
        g_free (primary);
    }

    if (on_the_web == NULL) {
        ESourceGroup *source_group;
        const gchar *name;

        name = _("On The Web");
        source_group = e_source_group_new (name, WEB_BASE_URI);
        e_source_list_add_group (source_list, source_group, -1);
        g_object_unref (source_group);
    }

    g_free (base_uri);
}

static void
memo_module_cal_opened_cb (ECal *cal,
                           ECalendarStatus status,
                           GtkAction *action)
{
    ECalComponent *comp;
    CompEditor *editor;
    CompEditorFlags flags = 0;
    const gchar *action_name;

    /* XXX Handle errors better. */
    if (status != E_CALENDAR_STATUS_OK)
        return;

    action_name = gtk_action_get_name (action);

    flags |= COMP_EDITOR_NEW_ITEM;
    if (strcmp (action_name, "memo-shared-new") == 0) {
        flags |= COMP_EDITOR_IS_SHARED;
        flags |= COMP_EDITOR_USER_ORG;
    }

    editor = memo_editor_new (cal, flags);
    comp = cal_comp_memo_new_with_defaults (cal);
    comp_editor_edit_comp (editor, comp);

    gtk_window_present (GTK_WINDOW (editor));

    g_object_unref (comp);
    g_object_unref (cal);
}

static void
action_memo_new_cb (GtkAction *action,
                    EShellWindow *shell_window)
{
    ECal *cal = NULL;
    ECalSourceType source_type;
    ESourceList *source_list;
    gchar *uid;

    /* This callback is used for both memos and shared memos. */

    source_type = E_CAL_SOURCE_TYPE_JOURNAL;

    if (!e_cal_get_sources (&source_list, source_type, NULL)) {
        g_warning ("Could not get memo sources from GConf!");
        return;
    }

    uid = calendar_config_get_primary_memos ();

    if (uid != NULL) {
        ESource *source;

        source = e_source_list_peek_source_by_uid (source_list, uid);
        if (source != NULL)
            cal = auth_new_cal_from_source (source, source_type);
        g_free (uid);
    }

    if (cal == NULL)
        cal = auth_new_cal_from_default (source_type);

    g_return_if_fail (cal != NULL);

    g_signal_connect (
        cal, "cal-opened",
        G_CALLBACK (memo_module_cal_opened_cb), action);

    e_cal_open_async (cal, FALSE);
}

static void
action_memo_list_new_cb (GtkAction *action,
                         EShellWindow *shell_window)
{
    calendar_setup_new_memo_list (GTK_WINDOW (shell_window));
}

static GtkActionEntry item_entries[] = {

    { "memo-new",
      "stock_insert-note",
      N_("Mem_o"),  /* XXX Need C_() here */
      "<Shift><Control>o",
      N_("Create a new memo"),
      G_CALLBACK (action_memo_new_cb) },

    { "memo-shared-new",
      "stock_insert-note",
      N_("_Shared Memo"),
      "<Shift><Control>h",
      N_("Create a new shared memo"),
      G_CALLBACK (action_memo_new_cb) }
};

static GtkActionEntry source_entries[] = {

    { "memo-list-new",
      "stock_notes",
      N_("Memo Li_st"),
      NULL,
      N_("Create a new memo list"),
      G_CALLBACK (action_memo_list_new_cb) }
};

static gboolean
memo_module_handle_uri (EShellModule *shell_module,
                        const gchar *uri)
{
    CompEditor *editor;
    CompEditorFlags flags = 0;
    ECal *client;
    ECalComponent *comp;
    ESource *source;
    ESourceList *source_list;
    ECalSourceType source_type;
    EUri *euri;
    icalcomponent *icalcomp;
    const gchar *cp;
    gchar *source_uid = NULL;
    gchar *comp_uid = NULL;
    gchar *comp_rid = NULL;
    gboolean handled = FALSE;
    GError *error = NULL;

    source_type = E_CAL_SOURCE_TYPE_JOURNAL;

    if (strncmp (uri, "memo:", 5) != 0)
        return FALSE;

    euri = e_uri_new (uri);
    cp = euri->query;
    if (cp == NULL)
        goto exit;

    while (*cp != '\0') {
        gchar *header;
        gchar *content;
        gsize header_len;
        gsize content_len;

        header_len = strcspn (cp, "=&");

        /* If it's malformed, give up. */
        if (cp[header_len] != '=')
            break;

        header = (gchar *) cp;
        header[header_len] = '\0';
        cp += header_len + 1;

        content_len = strcspn (cp, "&");

        content = g_strndup (cp, content_len);
        if (g_ascii_strcasecmp (header, "source-uid") == 0)
            source_uid = g_strdup (content);
        else if (g_ascii_strcasecmp (header, "comp-uid") == 0)
            comp_uid = g_strdup (content);
        else if (g_ascii_strcasecmp (header, "comp-rid") == 0)
            comp_rid = g_strdup (content);
        g_free (content);

        cp += content_len;
        if (*cp == '&') {
            cp++;
            if (strcmp (cp, "amp;") == 0)
                cp += 4;
        }
    }

    if (source_uid == NULL || comp_uid == NULL)
        goto exit;

    /* URI is valid, so consider it handled.  Whether
     * we successfully open it is another matter... */
    handled = TRUE;

    if (!e_cal_get_sources (&source_list, source_type, NULL)) {
        g_printerr ("Could not get memo sources from GConf!\n");
        goto exit;
    }

    source = e_source_list_peek_source_by_uid (source_list, source_uid);
    if (source == NULL) {
        g_printerr ("No source for UID `%s'\n", source_uid);
        g_object_unref (source_list);
        goto exit;
    }

    client = auth_new_cal_from_source (source, source_type);
    if (client == NULL || !e_cal_open (client, TRUE, &error)) {
        g_printerr ("%s\n", error->message);
        g_object_unref (source_list);
        g_error_free (error);
        goto exit;
    }

    /* XXX Copied from e_memo_shell_view_open_memo().
     *     Clearly a new utility function is needed. */

    editor = comp_editor_find_instance (comp_uid);

    if (editor != NULL)
        goto present;

    if (!e_cal_get_object (client, comp_uid, comp_rid, &icalcomp, &error)) {
        g_printerr ("%s\n", error->message);
        g_object_unref (source_list);
        g_error_free (error);
        goto exit;
    }

    comp = e_cal_component_new ();
    e_cal_component_set_icalcomponent (comp, icalcomp);

    if (e_cal_component_has_organizer (comp))
        flags |= COMP_EDITOR_IS_SHARED;

    if (itip_organizer_is_user (comp, client))
        flags |= COMP_EDITOR_USER_ORG;

    editor = memo_editor_new (client, flags);
    comp_editor_edit_comp (editor, comp);

    g_object_unref (comp);

present:
    gtk_window_present (GTK_WINDOW (editor));

    g_object_unref (source_list);
    g_object_unref (client);

exit:
    g_free (source_uid);
    g_free (comp_uid);
    g_free (comp_rid);

    e_uri_free (euri);

    return handled;
}

static void
memo_module_window_created (EShellModule *shell_module,
                            EShellWindow *shell_window)
{
    const gchar *module_name;

    module_name = G_TYPE_MODULE (shell_module)->name;

    e_shell_window_register_new_item_actions (
        shell_window, module_name,
        item_entries, G_N_ELEMENTS (item_entries));

    e_shell_window_register_new_source_actions (
        shell_window, module_name,
        source_entries, G_N_ELEMENTS (source_entries));
}

static EShellModuleInfo module_info = {

    MODULE_NAME,
    MODULE_ALIASES,
    MODULE_SCHEMES,
    MODULE_SORT_ORDER,

    /* is_busy */ NULL,
    /* shutdown */ NULL,
    e_memo_shell_module_migrate
};

void
e_shell_module_init (GTypeModule *type_module)
{
    EShell *shell;
    EShellModule *shell_module;

    shell_module = E_SHELL_MODULE (type_module);
    shell = e_shell_module_get_shell (shell_module);

    e_shell_module_set_info (
        shell_module, &module_info,
        e_memo_shell_view_get_type (type_module));

    memo_module_ensure_sources (shell_module);

    g_signal_connect_swapped (
        shell, "handle-uri",
        G_CALLBACK (memo_module_handle_uri), shell_module);

    g_signal_connect_swapped (
        shell, "window-created",
        G_CALLBACK (memo_module_window_created), shell_module);
}