path: root/calendar/gui/dialogs/comp-editor.c

/* Evolution calendar - Framework for a calendar component editor dialog
 *
 * Copyright (C) 2001 Ximian, Inc.
 *
 * Author: Federico Mena-Quintero <federico@ximian.com>
 *
 * 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.
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
#include <glib.h>
#include <glib/gstdio.h>
#include <gdk/gdkkeysyms.h>
#include <gtk/gtkstock.h>
#include <bonobo/bonobo-ui-util.h>
#include <bonobo/bonobo-widget.h>
#include <libgnome/libgnome.h>
#include <glib/gi18n.h>
#include <libgnomevfs/gnome-vfs-mime.h>
#include <libgnomevfs/gnome-vfs.h>
#include <libgnomeui/gnome-uidefs.h>
#include <libgnomeui/gnome-dialog.h>
#include <libgnomeui/gnome-dialog-util.h>
#include <libgnomeui/gnome-messagebox.h>
#include <e-util/e-dialog-utils.h>
#include <e-util/e-icon-factory.h>
#include <e-util/e-util-private.h>
#include <evolution-shell-component-utils.h>

#include <camel/camel-url.h>
#include <camel/camel-exception.h>
#include <camel/camel-folder.h>
#include <camel/camel-stream-mem.h>
#include <camel/camel-mime-message.h>
#include <camel/camel-file-utils.h>
#include <camel/camel-stream-fs.h>

#include "mail/mail-tools.h"

#include "../print.h"
#include "../comp-util.h"
#include "save-comp.h"
#include "delete-comp.h"
#include "send-comp.h"
#include "changed-comp.h"
#include "cancel-comp.h"
#include "recur-comp.h"
#include "comp-editor.h"
#include "../e-cal-popup.h"
#include "cal-attachment-select-file.h"

#include "e-attachment-bar.h"
#include "misc/e-expander.h"
#include "e-util/e-error.h"


#define d(x) x



/* Private part of the CompEditor structure */
struct _CompEditorPrivate {
    /* Client to use */
    ECal *client;
    
    /* Source client (where comp lives currently) */
    ECal *source_client;

    /* View to listen for changes */
    ECalView *view;

    /* Calendar object/uid we are editing; this is an internal copy */
    ECalComponent *comp;

    /* The pages we have */
    GList *pages;

    /* Notebook to hold the pages */
    GtkNotebook *notebook;

    /* Focussed Widget*/
    GtkWidget *focused_entry;   

    /* Attachment handling */
    GtkWidget *attachment_bar;
    GtkWidget *attachment_scrolled_window;
    GtkWidget *attachment_expander;
    GtkWidget *attachment_expander_label;
    GtkWidget *attachment_expander_icon;
    GtkWidget *attachment_expander_num;

    guint32 attachment_bar_visible : 1;
    
    /* TODO use this flags for setting all the boolean variables 
       below */
    CompEditorFlags flags;
    
    gboolean changed;
    gboolean needs_send;

    CalObjModType mod;
    
    gboolean existing_org;
    gboolean user_org;
    gboolean is_group_item;
    
    gboolean warned;

        char *help_section;
};



static gint comp_editor_key_press_event (GtkWidget *d, GdkEventKey *e);
static void comp_editor_finalize (GObject *object);
static void comp_editor_show_help (CompEditor *editor);

static void real_set_e_cal (CompEditor *editor, ECal *client);
static void real_edit_comp (CompEditor *editor, ECalComponent *comp);
static gboolean real_send_comp (CompEditor *editor, ECalComponentItipMethod method);
static gboolean prompt_and_save_changes (CompEditor *editor, gboolean send);
static void delete_comp (CompEditor *editor);
static void close_dialog (CompEditor *editor);

static void page_changed_cb (GtkObject *obj, gpointer data);
static void needs_send_cb (GtkObject *obj, gpointer data);
static void page_summary_changed_cb (GtkObject *obj, const char *summary, gpointer data);
static void page_dates_changed_cb (GtkObject *obj, CompEditorPageDates *dates, gpointer data);
static void page_focus_in_widget_cb (GtkObject *obj, GtkWidget *widget, gpointer data);
static void page_focus_out_widget_cb (GtkObject *obj, GtkWidget *widget, gpointer data);

static void obj_modified_cb (ECal *client, GList *objs, gpointer data);
static void obj_removed_cb (ECal *client, GList *uids, gpointer data);
static gboolean open_attachment (EAttachmentBar *bar, CompEditor *editor);

G_DEFINE_TYPE (CompEditor, comp_editor, BONOBO_TYPE_WINDOW)

enum {
    DND_TYPE_MESSAGE_RFC822,
    DND_TYPE_X_UID_LIST,
    DND_TYPE_TEXT_URI_LIST,
    DND_TYPE_NETSCAPE_URL,
    DND_TYPE_TEXT_VCARD,
    DND_TYPE_TEXT_CALENDAR,
};

static GtkTargetEntry drop_types[] = {
    { "message/rfc822", 0, DND_TYPE_MESSAGE_RFC822 },
    { "x-uid-list", 0, DND_TYPE_X_UID_LIST },
    { "text/uri-list", 0, DND_TYPE_TEXT_URI_LIST },
    { "_NETSCAPE_URL", 0, DND_TYPE_NETSCAPE_URL },
    { "text/x-vcard", 0, DND_TYPE_TEXT_VCARD },
    { "text/calendar", 0, DND_TYPE_TEXT_CALENDAR },
};

#define num_drop_types (sizeof (drop_types) / sizeof (drop_types[0]))

static struct {
    char *target;
    GdkAtom atom;
    guint32 actions;
} drag_info[] = {
    { "message/rfc822", 0, GDK_ACTION_COPY },
    { "x-uid-list", 0, GDK_ACTION_ASK|GDK_ACTION_MOVE|GDK_ACTION_COPY },
    { "text/uri-list", 0, GDK_ACTION_COPY },
    { "_NETSCAPE_URL", 0, GDK_ACTION_COPY },
    { "text/x-vcard", 0, GDK_ACTION_COPY },
    { "text/calendar", 0, GDK_ACTION_COPY },
};

enum {
    OBJECT_CREATED,
    LAST_SIGNAL
};

static guint comp_editor_signals[LAST_SIGNAL] = { 0 };

static void
attach_message(CompEditor *editor, CamelMimeMessage *msg)
{
    CamelMimePart *mime_part;
    const char *subject;
    guint i;
    char *filename = NULL;

    mime_part = camel_mime_part_new();
    camel_mime_part_set_disposition(mime_part, "inline");
    subject = camel_mime_message_get_subject(msg);
    if (subject) {
        char *desc = g_strdup_printf(_("Attached message - %s"), subject);

        camel_mime_part_set_description(mime_part, desc);
        g_free(desc);
    } else
        camel_mime_part_set_description(mime_part, _("Attached message"));
    
    i = e_attachment_bar_get_num_attachments (E_ATTACHMENT_BAR (editor->priv->attachment_bar));
    i++;
    filename = g_strdup_printf ("email%d",i);
    camel_mime_part_set_filename (mime_part, filename);
    
    camel_medium_set_content_object((CamelMedium *)mime_part, (CamelDataWrapper *)msg);
    camel_mime_part_set_content_type(mime_part, "message/rfc822");
    e_attachment_bar_attach_mime_part(E_ATTACHMENT_BAR(editor->priv->attachment_bar), mime_part);
    camel_object_unref(mime_part);
    g_free (filename);
}

struct _drop_data {
    CompEditor *editor;

    GdkDragContext *context;
    /* Only selection->data and selection->length are valid */
    GtkSelectionData *selection;

    guint32 action;
    guint info;
    guint time;

    unsigned int move:1;
    unsigned int moved:1;
    unsigned int aborted:1;
};

static void
drop_action(CompEditor *editor, GdkDragContext *context, guint32 action, GtkSelectionData *selection, guint info, guint time)
{
    char *tmp, *str, **urls;
    CamelMimePart *mime_part;
    CamelStream *stream;
    CamelURL *url;
    CamelMimeMessage *msg;
    char *content_type;
    int i, success=FALSE, delete=FALSE;

    switch (info) {
    case DND_TYPE_MESSAGE_RFC822:
        d(printf ("dropping a message/rfc822\n"));
        /* write the message(s) out to a CamelStream so we can use it */
        stream = camel_stream_mem_new ();
        camel_stream_write (stream, (char *)selection->data, selection->length);
        camel_stream_reset (stream);
        
        msg = camel_mime_message_new ();
        if (camel_data_wrapper_construct_from_stream((CamelDataWrapper *)msg, stream) != -1) {
            attach_message(editor, msg);
            success = TRUE;
            delete = action == GDK_ACTION_MOVE;
        }

        camel_object_unref(msg);
        camel_object_unref(stream);
        break;
    case DND_TYPE_TEXT_URI_LIST:
    case DND_TYPE_NETSCAPE_URL:
        d(printf ("dropping a text/uri-list\n"));
        tmp = g_strndup ((char *)selection->data, selection->length);
        urls = g_strsplit (tmp, "\n", 0);
        g_free (tmp);
        
        for (i = 0; urls[i] != NULL; i++) {
            str = g_strstrip (urls[i]);
            if (urls[i][0] == '#') {
                g_free(str);
                continue;
            }

            if (!g_ascii_strncasecmp (str, "mailto:", 7)) {
                /* TODO does not handle mailto now */
                g_free (str);
            } else {
                url = camel_url_new (str, NULL);

                if (url == NULL) {
                    g_free (str);
                    continue;
                }

                if (!g_ascii_strcasecmp (url->protocol, "file"))
                    e_attachment_bar_attach
                        (E_ATTACHMENT_BAR (editor->priv->attachment_bar),
                        url->path,
                        "attachment");
                else
                    e_attachment_bar_attach_remote_file
                        (E_ATTACHMENT_BAR (editor->priv->attachment_bar),
                         str, "attachment");

                camel_url_free (url);
                g_free (str);
            }
        }
        
        g_free (urls);
        success = TRUE;
        break;
    case DND_TYPE_TEXT_VCARD:
    case DND_TYPE_TEXT_CALENDAR:
        content_type = gdk_atom_name (selection->type);
        d(printf ("dropping a %s\n", content_type));
        
        mime_part = camel_mime_part_new ();
        camel_mime_part_set_content (mime_part, (char *)selection->data, selection->length, content_type);
        camel_mime_part_set_disposition (mime_part, "inline");
        
        e_attachment_bar_attach_mime_part
            (E_ATTACHMENT_BAR (editor->priv->attachment_bar),
             mime_part);
        
        camel_object_unref (mime_part);
        g_free (content_type);

        success = TRUE;
        break;
    case DND_TYPE_X_UID_LIST: {
        GPtrArray *uids;
        char *inptr, *inend;
        CamelFolder *folder;
        CamelException ex = CAMEL_EXCEPTION_INITIALISER;

        /* NB: This all runs synchronously, could be very slow/hang/block the ui */

        uids = g_ptr_array_new();

        inptr = (char *)selection->data;
        inend = (char *)(selection->data + selection->length);
        while (inptr < inend) {
            char *start = inptr;

            while (inptr < inend && *inptr)
                inptr++;

            if (start > (char *)selection->data)
                g_ptr_array_add(uids, g_strndup(start, inptr-start));

            inptr++;
        }

        if (uids->len > 0) {
            folder = mail_tool_uri_to_folder((char *)selection->data, 0, &ex);
            if (folder) {
                if (uids->len == 1) {
                    msg = camel_folder_get_message(folder, uids->pdata[0], &ex);
                    if (msg == NULL)
                        goto fail;
                    attach_message(editor, msg);
                } else {
                    CamelMultipart *mp = camel_multipart_new();
                    char *desc;
                    char *filename = NULL;
                    guint num;

                    camel_data_wrapper_set_mime_type((CamelDataWrapper *)mp, "multipart/digest");
                    camel_multipart_set_boundary(mp, NULL);
                    for (i=0;i<uids->len;i++) {

                        msg = camel_folder_get_message(folder, uids->pdata[i], &ex);
                        if (msg) {
                            mime_part = camel_mime_part_new();
                            camel_mime_part_set_disposition(mime_part, "inline");
                            camel_medium_set_content_object((CamelMedium *)mime_part, (CamelDataWrapper *)msg);
                            camel_mime_part_set_content_type(mime_part, "message/rfc822");
                            camel_multipart_add_part(mp, mime_part);
                            camel_object_unref(mime_part);
                            camel_object_unref(msg);
                        } else {
                            camel_object_unref(mp);
                            goto fail;
                        }
                    }
                    mime_part = camel_mime_part_new();
                    camel_medium_set_content_object((CamelMedium *)mime_part, (CamelDataWrapper *)mp);
                    /* translators, this count will always be >1 */
                    desc = g_strdup_printf(ngettext("Attached message", "%d attached messages", uids->len), uids->len);
                    camel_mime_part_set_description(mime_part, desc);
                    g_free(desc);
                    
                    num = e_attachment_bar_get_num_attachments (E_ATTACHMENT_BAR (editor->priv->attachment_bar));
                    num++;
                    filename = g_strdup_printf ("email%d", num);
                    camel_mime_part_set_filename (mime_part, filename);

                    e_attachment_bar_attach_mime_part
                        (E_ATTACHMENT_BAR(editor->priv->attachment_bar), mime_part);
                    camel_object_unref(mime_part);
                    camel_object_unref(mp);
                    g_free (filename);
                }
                success = TRUE;
                delete = action == GDK_ACTION_MOVE;
            fail:
                if (camel_exception_is_set(&ex)) {
                    char *name;

                    camel_object_get(folder, NULL, CAMEL_FOLDER_NAME, &name, NULL);
                    e_error_run((GtkWindow *)editor, "mail-editor:attach-nomessages",
                            name?name:(char *)selection->data, camel_exception_get_description(&ex), NULL);
                    camel_object_free(folder, CAMEL_FOLDER_NAME, name);
                }
                camel_object_unref(folder);
            } else {
                e_error_run((GtkWindow *)editor, "mail-editor:attach-nomessages",
                        (char *)selection->data, camel_exception_get_description(&ex), NULL);
            }

            camel_exception_clear(&ex);
        }

        g_ptr_array_free(uids, TRUE);

        break; }
    default:
        d(printf ("dropping an unknown\n"));
        break;
    }

    printf("Drag finished, success %d delete %d\n", success, delete);

    gtk_drag_finish(context, success, delete, time);
}

static void
drop_popup_copy (EPopup *ep, EPopupItem *item, void *data)
{
    struct _drop_data *m = data;
    drop_action(m->editor, m->context, GDK_ACTION_COPY, m->selection, m->info, m->time);
}

static void
drop_popup_move (EPopup *ep, EPopupItem *item, void *data)
{
    struct _drop_data *m = data;
    drop_action(m->editor, m->context, GDK_ACTION_MOVE, m->selection, m->info, m->time);
}

static void
drop_popup_cancel(EPopup *ep, EPopupItem *item, void *data)
{
    struct _drop_data *m = data;
    gtk_drag_finish(m->context, FALSE, FALSE, m->time);
}

static EPopupItem drop_popup_menu[] = {
    { E_POPUP_ITEM, "00.emc.02", N_("_Copy"), drop_popup_copy, NULL, "stock_mail-copy", 0 },
    { E_POPUP_ITEM, "00.emc.03", N_("_Move"), drop_popup_move, NULL, "stock_mail-move", 0 },
    { E_POPUP_BAR, "10.emc" },
    { E_POPUP_ITEM, "99.emc.00", N_("Cancel _Drag"), drop_popup_cancel, NULL, NULL, 0 },
};

static void
drop_popup_free(EPopup *ep, GSList *items, void *data)
{
    struct _drop_data *m = data;

    g_slist_free(items);

    g_object_unref(m->context);
    g_object_unref(m->editor);
    g_free(m->selection->data);
    g_free(m->selection);
    g_free(m);
}

static void
drag_data_received (CompEditor *editor, GdkDragContext *context,
            int x, int y, GtkSelectionData *selection,
            guint info, guint time)
{
    if (selection->data == NULL || selection->length == -1)
        return;

    if (context->action == GDK_ACTION_ASK) {
        ECalPopup *ecp;
        GSList *menus = NULL;
        GtkMenu *menu;
        int i;
        struct _drop_data *m;

        m = g_malloc0(sizeof(*m));
        m->context = context;
        g_object_ref(context);
        m->editor = editor;
        g_object_ref(editor);
        m->action = context->action;
        m->info = info;
        m->time = time;
        m->selection = g_malloc0(sizeof(*m->selection));
        m->selection->data = g_malloc(selection->length);
        memcpy(m->selection->data, selection->data, selection->length);
        m->selection->length = selection->length;

        ecp = e_cal_popup_new("org.gnome.evolution.calendar.editor.popup.drop");
        for (i=0;i<sizeof(drop_popup_menu)/sizeof(drop_popup_menu[0]);i++)
            menus = g_slist_append(menus, &drop_popup_menu[i]);

        e_popup_add_items((EPopup *)ecp, menus, NULL, drop_popup_free, m);
        menu = e_popup_create_menu_once((EPopup *)ecp, NULL, 0);
        gtk_menu_popup(menu, NULL, NULL, NULL, NULL, 0, time);
    } else {
        drop_action(editor, context, context->action, selection, info, time);
    }
}

static gboolean
drag_motion(GObject *o, GdkDragContext *context, gint x, gint y, guint time, CompEditor *editor)
{
    GList *targets;
    GdkDragAction action, actions = 0;

    for (targets = context->targets; targets; targets = targets->next) {
        int i;

        for (i=0;i<sizeof(drag_info)/sizeof(drag_info[0]);i++)
            if (targets->data == (void *)drag_info[i].atom)
                actions |= drag_info[i].actions;
    }

    actions &= context->actions;
    action = context->suggested_action;
    /* we default to copy */
    if (action == GDK_ACTION_ASK && (actions & (GDK_ACTION_MOVE|GDK_ACTION_COPY)) != (GDK_ACTION_MOVE|GDK_ACTION_COPY))
        action = GDK_ACTION_COPY;

    gdk_drag_status(context, action, time);

    return action != 0;
}

/* Class initialization function for the calendar component editor */
static void
comp_editor_class_init (CompEditorClass *klass)
{
    GObjectClass *object_class;
    GtkWidgetClass *widget_class;
    int i;

    for (i=0;i<sizeof(drag_info)/sizeof(drag_info[0]);i++)
        drag_info[i].atom = gdk_atom_intern(drag_info[i].target, FALSE);

    object_class = G_OBJECT_CLASS (klass);
    widget_class = GTK_WIDGET_CLASS (klass);

    klass->set_e_cal = real_set_e_cal;
    klass->edit_comp = real_edit_comp;
    klass->send_comp = real_send_comp;
    klass->object_created = NULL;

    comp_editor_signals[OBJECT_CREATED] =
        g_signal_new ("object_created",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (CompEditorClass, object_created),
                  NULL, NULL,
                  g_cclosure_marshal_VOID__VOID,
                  G_TYPE_NONE, 0);

    widget_class->key_press_event = comp_editor_key_press_event;
    object_class->finalize = comp_editor_finalize;
}

static void
listen_for_changes (CompEditor *editor)
{
    CompEditorPrivate *priv;
    const char *uid = NULL;

    priv = editor->priv;

    /* Discard change listener */
    if (priv->view) {
        g_signal_handlers_disconnect_matched (G_OBJECT (priv->view),
                              G_SIGNAL_MATCH_DATA,
                              0, 0, NULL, NULL,
                              editor);
                
        g_object_unref (priv->view);
        priv->view = NULL;
    }
    
    /* Listen for changes */
    if (priv->comp)
        e_cal_component_get_uid (priv->comp, &uid);

    if (uid) {
        char *query;
        
        query = g_strdup_printf ("(uid? \"%s\")", uid);
        e_cal_get_query (priv->source_client, query, &priv->view, NULL);
        g_free (query);
    }
    
    if (priv->view) {
        g_signal_connect (priv->view, "objects_modified",
                  G_CALLBACK (obj_modified_cb), editor);

        g_signal_connect((priv->view), "objects_removed",
                 G_CALLBACK (obj_removed_cb), editor);

        e_cal_view_start (priv->view);
    }
}

/* This sets the focus to the toplevel, so any field being edited is committed.
   FIXME: In future we may also want to check some of the fields are valid,
   e.g. the EDateEdit fields. */
static void
commit_all_fields (CompEditor *editor)
{
    gtk_window_set_focus (GTK_WINDOW (editor), NULL);
}

static void
send_timezone (gpointer key, gpointer value, gpointer user_data)
{
    icaltimezone *zone = value;
    CompEditor *editor = user_data;

    e_cal_add_timezone (editor->priv->client, zone, NULL);
}

static GSList *
get_attachment_list (CompEditor *editor)
{
    GSList *parts = NULL, *list = NULL, *p = NULL;
    const char *comp_uid = NULL;
    const char *local_store = e_cal_get_local_attachment_store (editor->priv->client);

    e_cal_component_get_uid (editor->priv->comp, &comp_uid);

    parts = e_attachment_bar_get_parts((EAttachmentBar *)editor->priv->attachment_bar);

    for (p = parts; p!=NULL ; p = p->next) {
        CamelDataWrapper *wrapper;
        CamelStream *stream;
        char *attach_file_url;
        char *safe_fname, *utf8_safe_fname;
        char *filename;
    
        wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (p->data));
            
        /* Extract the content from the stream and write it down
         * as a mime part file into the directory denoting the
         * calendar source */
        utf8_safe_fname = camel_file_util_safe_filename (camel_mime_part_get_filename ((CamelMimePart *) p->data));
        safe_fname = g_filename_from_utf8 ((const char *) utf8_safe_fname, -1, NULL, NULL, NULL);
        g_free (utf8_safe_fname);

        filename = g_strdup_printf ("%s-%s", comp_uid, safe_fname);

        attach_file_url = g_build_path ("/", local_store, filename, NULL);

        g_free (filename);
        g_free (safe_fname);

        /* do not overwrite existing files, this will result in truncation */
        filename = g_filename_from_uri (attach_file_url, NULL, NULL);
        if (!g_file_test (filename, G_FILE_TEST_EXISTS)) {
            stream = camel_stream_fs_new_with_name(filename, O_RDWR|O_CREAT|O_TRUNC, 0600);
            if (!stream) {
                /* TODO handle error conditions */
                g_message ("DEBUG: could not open the file to write\n");
                g_free (attach_file_url);
                g_free (filename);
                continue;
            }
        
            if (camel_data_wrapper_decode_to_stream (wrapper, (CamelStream *) stream) == -1) {
                g_free (attach_file_url);
                camel_stream_close (stream);
                camel_object_unref (stream);
                g_message ("DEBUG: could not write to file\n");
            }

            camel_stream_close (stream);
            camel_object_unref (stream);
        }

        list = g_slist_append (list, g_strdup (attach_file_url));
        g_free (attach_file_url);
        g_free (filename);
    }

    if (parts)
        g_slist_free (parts);
    return list;
}

static gboolean
save_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;
    ECalComponent *clone;
    GList *l;
    gboolean result;
    GError *error = NULL;
    GHashTable *timezones;
    const char *orig_uid;
    icalcomponent *icalcomp;

    priv = editor->priv;

    if (!priv->changed)
        return TRUE;

    /* Stop listening because we are about to change things */
    if (priv->view) {
        g_signal_handlers_disconnect_matched (G_OBJECT (priv->view),
                              G_SIGNAL_MATCH_DATA,
                              0, 0, NULL, NULL,
                              editor);

        g_object_unref (priv->view);
        priv->view = NULL;
    }

    /* Update on the server */
    timezones = g_hash_table_new (g_str_hash, g_str_equal);

    clone = e_cal_component_clone (priv->comp);
    for (l = priv->pages; l != NULL; l = l->next) {
        if (!comp_editor_page_fill_component (l->data, clone)) {
            g_object_unref (clone);
            g_hash_table_destroy (timezones);
            comp_editor_show_page (editor, COMP_EDITOR_PAGE (l->data));
            return FALSE;
        }

        /* retrieve all timezones */
        comp_editor_page_fill_timezones (l->data, timezones);
    }
    
    /* If we are not the organizer, we don't update the sequence number */
    if (!e_cal_component_has_organizer (clone) || itip_organizer_is_user (clone, priv->client) || itip_sentby_is_user (clone))
        e_cal_component_commit_sequence (clone);
    else
        e_cal_component_abort_sequence (clone);

    g_object_unref (priv->comp);
    priv->comp = clone;

    e_cal_component_get_uid (priv->comp, &orig_uid);

    /* send timezones */
    g_hash_table_foreach (timezones, (GHFunc) send_timezone, editor);
    g_hash_table_destroy (timezones);
    
    /* Attachments*/
    
    e_cal_component_set_attachment_list (priv->comp,
                         get_attachment_list (editor)); 
    icalcomp = e_cal_component_get_icalcomponent (priv->comp);
    /* send the component to the server */
    if (!cal_comp_is_on_server (priv->comp, priv->client)) {
        result = e_cal_create_object (priv->client, icalcomp, NULL, &error);
        if (result)
            g_signal_emit_by_name (editor, "object_created");
    } else {
        if (priv->mod == CALOBJ_MOD_THIS) {
            e_cal_component_set_rdate_list (priv->comp, NULL);
            e_cal_component_set_rrule_list (priv->comp, NULL);
            e_cal_component_set_exdate_list (priv->comp, NULL);
            e_cal_component_set_exrule_list (priv->comp, NULL);
        }
        result = e_cal_modify_object (priv->client, icalcomp, priv->mod, &error);

        if (result && priv->mod == CALOBJ_MOD_THIS) {
            /* FIXME do we really need to do this ? */
            if ((priv->flags & COMP_EDITOR_DELEGATE) || !e_cal_component_has_organizer (clone) || itip_organizer_is_user (clone, priv->client) || itip_sentby_is_user (clone))
                e_cal_component_commit_sequence (clone);
            else
                e_cal_component_abort_sequence (clone);
        }
    }

    /* If the delay delivery is set, the items will not be created in the server immediately,
       so we need not show them in the view. They will appear as soon as the server creates
       it after the delay period */
    if (result && e_cal_component_has_attendees (priv->comp)) {
        gboolean delay_set = FALSE;
        icalproperty *icalprop;
        icalprop = icalcomponent_get_first_property (icalcomp, ICAL_X_PROPERTY);
        while (icalprop) {
            const char *x_name;

            x_name = icalproperty_get_x_name (icalprop);
            if (!strcmp (x_name, "X-EVOLUTION-OPTIONS-DELAY")) {
                delay_set = TRUE;
                break;
            }

            icalprop = icalcomponent_get_next_property (icalcomp, ICAL_X_PROPERTY);
        }
        if (delay_set)
            return TRUE;
    }
    
    if (!result) {
        GtkWidget *dialog;

        dialog = gtk_message_dialog_new (
            NULL, 0,
            GTK_MESSAGE_ERROR,
            GTK_BUTTONS_OK,
            "%s", (error != NULL) ? error->message :
            _("Could not update object"));
        gtk_dialog_run (GTK_DIALOG(dialog));
        gtk_widget_destroy (dialog);

        if (error)
            g_error_free (error);

        return FALSE;
    } else {
        if (priv->source_client &&
            !e_source_equal (e_cal_get_source (priv->client),
                     e_cal_get_source (priv->source_client)) &&
            cal_comp_is_on_server (priv->comp, priv->source_client)) {
            /* Comp found a new home. Remove it from old one. */
            
            if (e_cal_component_is_instance (priv->comp) || e_cal_component_has_recurrences (priv->comp))
                e_cal_remove_object_with_mod (priv->source_client, orig_uid, NULL,
                        CALOBJ_MOD_ALL, NULL);
            else
                e_cal_remove_object (priv->source_client, orig_uid, NULL);

            /* Let priv->source_client point to new home, so we can move it
             * again this session. */
            g_object_unref (priv->source_client);
            priv->source_client = g_object_ref (priv->client);
            
            listen_for_changes (editor);
        }

        priv->changed = FALSE;
    }

    return TRUE;
}

static gboolean
save_comp_with_send (CompEditor *editor)
{
    CompEditorPrivate *priv;
    gboolean send;
    gboolean delegate;

    priv = editor->priv;
    
    send = priv->changed && priv->needs_send;
    delegate = priv->flags & COMP_EDITOR_DELEGATE;
    
    if (delegate) {
        icalcomponent *icalcomp = e_cal_component_get_icalcomponent (priv->comp);
        icalproperty *icalprop;
         
        icalprop = icalproperty_new_x ("1");
        icalproperty_set_x_name (icalprop, "X-EVOLUTION-DELEGATED");
        icalcomponent_add_property (icalcomp, icalprop);
    }
    
    if (!save_comp (editor))
        return FALSE;

    if ((delegate && !e_cal_get_save_schedules (priv->client)) || (send && send_component_dialog ((GtkWindow *) editor, priv->client, priv->comp, !priv->existing_org))) {
        if ((itip_organizer_is_user (priv->comp, priv->client) || itip_sentby_is_user (priv->comp))) {
            if (e_cal_component_get_vtype (priv->comp) == E_CAL_COMPONENT_JOURNAL)
                return comp_editor_send_comp (editor, E_CAL_COMPONENT_METHOD_PUBLISH);
            else
                return comp_editor_send_comp (editor, E_CAL_COMPONENT_METHOD_REQUEST);
        } else {
            if (!comp_editor_send_comp (editor, E_CAL_COMPONENT_METHOD_REQUEST))
                return FALSE;
            
            if (delegate)
                return comp_editor_send_comp (editor, E_CAL_COMPONENT_METHOD_REPLY);
        }
    }

    return TRUE;
}

static gboolean
prompt_and_save_changes (CompEditor *editor, gboolean send)
{
    CompEditorPrivate *priv;
    gboolean read_only;
    ECalComponent *comp;
    ECalComponentText text;

    priv = editor->priv;

    if (!priv->changed)
        return TRUE;

    switch (save_component_dialog (GTK_WINDOW(editor), priv->comp)) {
    case GTK_RESPONSE_YES: /* Save */
        if (!e_cal_is_read_only (priv->client, &read_only, NULL) || read_only) {
            e_error_run ((GtkWindow *) gtk_widget_get_toplevel (GTK_WIDGET (editor)), "calendar:prompt-read-only-cal", NULL);
            /* don't discard changes when selected readonly calendar */
            return FALSE;
        }

        comp = comp_editor_get_current_comp (editor);
        e_cal_component_get_summary (comp, &text);
        g_object_unref (comp);

        if (!text.value)
            if (!send_component_prompt_subject ((GtkWindow *) editor, priv->client, priv->comp))
                return FALSE;

        if (e_cal_component_is_instance (priv->comp))
            if (!recur_component_dialog (priv->client, priv->comp, &priv->mod, GTK_WINDOW (editor), FALSE))
                return FALSE;
        
        if (send && save_comp_with_send (editor))
            return TRUE;
        else if (!send && save_comp (editor))
            return TRUE;
        else
            return FALSE;
    case GTK_RESPONSE_NO: /* Discard */
        return TRUE;
    case GTK_RESPONSE_CANCEL: /* Cancel */
    default:
        return FALSE;
    }
}

static int
delete_event_cb (GtkWidget *widget, GdkEvent *event, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);

    commit_all_fields (editor);
    
    if (prompt_and_save_changes (editor, TRUE))
        close_dialog (editor);

    return TRUE;
}

static void
attachment_bar_changed_cb (EAttachmentBar *bar,
               void *data)
{
    CompEditor *editor = COMP_EDITOR (data);
    
    guint attachment_num = e_attachment_bar_get_num_attachments (
        E_ATTACHMENT_BAR (editor->priv->attachment_bar));
    if (attachment_num) {
        gchar *num_text = g_strdup_printf (
            ngettext ("<b>%d</b> Attachment", "<b>%d</b> Attachments", attachment_num),
            attachment_num);
        gtk_label_set_markup (GTK_LABEL (editor->priv->attachment_expander_num),
                      num_text);
        g_free (num_text);

        gtk_widget_show (editor->priv->attachment_expander_icon);
        e_expander_set_expanded(E_EXPANDER(editor->priv->attachment_expander),TRUE);
        
    } else {
        gtk_label_set_text (GTK_LABEL (editor->priv->attachment_expander_num), "");
        gtk_widget_hide (editor->priv->attachment_expander_icon);
        e_expander_set_expanded(E_EXPANDER(editor->priv->attachment_expander),FALSE);
    }
    
    
    /* Mark the editor as changed so it prompts about unsaved
           changes on close */
    comp_editor_set_changed (editor, TRUE);

}

static void      
attachment_expander_activate_cb (EExpander *expander,    
                 void *data)     
{    
    CompEditor *editor = COMP_EDITOR (data);     
    gboolean show = e_expander_get_expanded (expander);      
     
    /* Update the expander label */      
    if (show)    
        gtk_label_set_text_with_mnemonic (GTK_LABEL (editor->priv->attachment_expander_label),   
                              _("Hide Attachment _Bar"));    
    else     
        gtk_label_set_text_with_mnemonic (GTK_LABEL (editor->priv->attachment_expander_label),   
                          _("Show Attachment _Bar"));    
}

static gboolean 
open_attachment (EAttachmentBar *bar, CompEditor *editor)
{
    GnomeIconList *icon_list;
    GList *p;
    int num;
    char *attach_file_url;
    GError *error = NULL;
    
    if (E_IS_ATTACHMENT_BAR (bar)) {
        icon_list = GNOME_ICON_LIST (bar);
        p = gnome_icon_list_get_selection (icon_list);
        if (p) {
            EAttachment *attachment;
            GSList *list;
            const char *comp_uid = NULL;
            char *filename = NULL;
            const char *local_store = e_cal_get_local_attachment_store (editor->priv->client);

            e_cal_component_get_uid (editor->priv->comp, &comp_uid);            
            num = GPOINTER_TO_INT (p->data);
            list = e_attachment_bar_get_attachment (bar, num);
            attachment = list->data;
            g_slist_free (list);

            filename = g_strdup_printf ("%s-%s",
                            comp_uid,
                            camel_mime_part_get_filename(attachment->body));

            attach_file_url = g_build_path ("/", local_store, filename, NULL);
            
            /* launch the url now */
            /* TODO should send GError and handle error conditions
             * here */
            gnome_url_show (attach_file_url, &error);
            if (error)
                g_message ("DEBUG: gnome_url_show(%s) failed\n", attach_file_url);

            g_free (filename);
            g_free (attach_file_url); }
        return TRUE;
    } else 
        return FALSE;
}

static  gboolean 
attachment_bar_icon_clicked_cb (EAttachmentBar *bar, GdkEvent *event, CompEditor *editor)
{
    if (E_IS_ATTACHMENT_BAR (bar) && event->type == GDK_2BUTTON_PRESS) 
        if (open_attachment (bar, editor))
                return TRUE;
    return FALSE;
}

/* Callbacks.  */

static void
cab_open(EPopup *ep, EPopupItem *item, void *data)
{
    EAttachmentBar *bar = data;
    CompEditor *editor = COMP_EDITOR (gtk_widget_get_toplevel (GTK_WIDGET (bar)));
    
    if (!open_attachment (bar, editor))
        g_message ("\n Open failed");
}

static void
cab_add(EPopup *ep, EPopupItem *item, void *data)
{
    EAttachmentBar *bar = data;
        CompEditor *editor = COMP_EDITOR (gtk_widget_get_toplevel (GTK_WIDGET (bar)));
    GPtrArray *file_list;
    gboolean is_inline = FALSE;
    int i;

    file_list = comp_editor_select_file_attachments (editor, &is_inline);
    /*TODO add a good implementation here */
    if (!file_list)
        return;
    for (i = 0; i < file_list->len; i++) {
        CamelURL *url;

        url = camel_url_new (file_list->pdata[i], NULL);
        if (url == NULL)
            continue;

        if (!g_ascii_strcasecmp (url->protocol, "file"))
             e_attachment_bar_attach (bar, url->path, is_inline ? "inline" : "attachment");
        else 
             e_attachment_bar_attach_remote_file (bar, file_list->pdata[i], is_inline ? "inline" : "attachment");
        g_free (file_list->pdata[i]);
        camel_url_free (url);
    }
    
    g_ptr_array_free (file_list, TRUE); 
}

static void
cab_properties(EPopup *ep, EPopupItem *item, void *data)
{
    EAttachmentBar *bar = data;
    
    e_attachment_bar_edit_selected(bar);
}

static void
cab_remove(EPopup *ep, EPopupItem *item, void *data)
{
    EAttachmentBar *bar = data;

    e_attachment_bar_remove_selected(bar);
}

/* Popup menu handling.  */
static EPopupItem cab_popups[] = {
    { E_POPUP_ITEM, "10.attach", N_("_Open"), cab_open, NULL, GTK_STOCK_OPEN, E_CAL_POPUP_ATTACHMENTS_ONE},
    { E_POPUP_ITEM, "20.attach", N_("_Remove"), cab_remove, NULL, GTK_STOCK_REMOVE, E_CAL_POPUP_ATTACHMENTS_MANY | E_CAL_POPUP_ATTACHMENTS_MODIFY },
    { E_POPUP_ITEM, "30.attach", N_("_Properties"), cab_properties, NULL, GTK_STOCK_PROPERTIES, E_CAL_POPUP_ATTACHMENTS_ONE },
    { E_POPUP_BAR, "40.attach.00", NULL, NULL, NULL, NULL, E_CAL_POPUP_ATTACHMENTS_MANY|E_CAL_POPUP_ATTACHMENTS_ONE },
    { E_POPUP_ITEM, "40.attach.01", N_("_Add attachment..."), cab_add, NULL, GTK_STOCK_ADD, E_CAL_POPUP_ATTACHMENTS_MODIFY},
};

static void
cab_popup_position(GtkMenu *menu, int *x, int *y, gboolean *push_in, gpointer user_data)
{
    EAttachmentBar *bar = user_data;
    GnomeIconList *icon_list = user_data;
    GList *selection;
    GnomeCanvasPixbuf *image;
    
    gdk_window_get_origin (((GtkWidget*) bar)->window, x, y);
    
    selection = gnome_icon_list_get_selection (icon_list);
    if (selection == NULL)
        return;
    
    image = gnome_icon_list_get_icon_pixbuf_item (icon_list, GPOINTER_TO_INT(selection->data));
    if (image == NULL)
        return;
    
    /* Put menu to the center of icon. */
    *x += (int)(image->item.x1 + image->item.x2) / 2;
    *y += (int)(image->item.y1 + image->item.y2) / 2;
}

static void
cab_popups_free(EPopup *ep, GSList *l, void *data)
{
    g_slist_free(l);
}

/* if id != -1, then use it as an index for target of the popup */
static void
cab_popup(EAttachmentBar *bar, GdkEventButton *event, int id)
{
    GSList *attachments = NULL, *menus = NULL;
    int i;
    ECalPopup *ecp;
    ECalPopupTargetAttachments *t;
    GtkMenu *menu;
    CompEditor *editor = COMP_EDITOR (gtk_widget_get_toplevel (GTK_WIDGET (bar)));

        attachments = e_attachment_bar_get_attachment(bar, id);

    for (i=0;i<sizeof(cab_popups)/sizeof(cab_popups[0]);i++)
        menus = g_slist_prepend(menus, &cab_popups[i]);

    /** @HookPoint-ECalPopup: Calendar Attachment Bar Context Menu
     * @Id: org.gnome.evolution.calendar.attachmentbar.popup
     * @Class: org.gnome.evolution.mail.popup:1.0
     * @Target: ECalPopupTargetAttachments
     *
     * This is the context menu on the calendar attachment bar.
     */
    ecp = e_cal_popup_new("org.gnome.evolution.calendar.attachmentbar.popup");
    e_popup_add_items((EPopup *)ecp, menus, NULL, cab_popups_free, bar);
    t = e_cal_popup_target_new_attachments(ecp, editor, attachments);
    t->target.widget = (GtkWidget *)bar;
    menu = e_popup_create_menu_once((EPopup *)ecp, (EPopupTarget *)t, 0);

    if (event == NULL)
        gtk_menu_popup(menu, NULL, NULL, cab_popup_position, bar, 0, gtk_get_current_event_time());
    else
        gtk_menu_popup(menu, NULL, NULL, NULL, NULL, event->button, event->time);
}

/* GtkWidget methods.  */

static gboolean 
popup_menu_event (GtkWidget *widget)
{
    cab_popup((EAttachmentBar *)widget, NULL, -1);
    return TRUE;
}


static int
button_press_event (GtkWidget *widget, GdkEventButton *event)
{
    EAttachmentBar *bar = (EAttachmentBar *)widget;
    GnomeIconList *icon_list = GNOME_ICON_LIST(widget);
    int icon_number = -1;
    
    if (event->button != 3)
        return FALSE;
    
    if (!gnome_icon_list_get_selection (icon_list)) {
        icon_number = gnome_icon_list_get_icon_at (icon_list, event->x, event->y);
        if (icon_number >= 0) {
            gnome_icon_list_unselect_all(icon_list);
            gnome_icon_list_select_icon (icon_list, icon_number);
        }
    }

    cab_popup(bar, event, icon_number);
    
    return TRUE;
}

static gint
key_press_event(GtkWidget *widget, GdkEventKey *event)
{
    EAttachmentBar *bar = (EAttachmentBar *)widget;
    if (event->keyval == GDK_Delete) {
                e_attachment_bar_remove_selected (bar);
                return TRUE;
        }
                                                                                
        return FALSE;
}

static gint
editor_key_press_event(GtkWidget *widget, GdkEventKey *event, CompEditor *editor)
{
        if (event->keyval == GDK_Escape) {
        commit_all_fields (editor);
        
        if (prompt_and_save_changes (editor, TRUE))
            close_dialog (editor);

                return TRUE;
        }
                                                                                
        return FALSE;
}
/* Menu callbacks */
static void
menu_file_save_cb (BonoboUIComponent *uic,
           void *data,
           const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;
    ECalComponentText text;
    gboolean delegated = FALSE;
    gboolean read_only;
    ECalComponent *comp;

    if (e_attachment_bar_get_download_count (E_ATTACHMENT_BAR (editor->priv->attachment_bar)) ){
        gboolean response = 1;
    /*FIXME: Cannot use mail functions from calendar!!!! */
#if 0   
        ECalComponentVType vtype = e_cal_component_get_vtype(editor->priv->comp);

        if (vtype == E_CAL_COMPONENT_EVENT)
            response = em_utils_prompt_user((GtkWindow *)widget, 
                             NULL, 
                             "calendar:ask-send-event-pending-download", 
                              NULL);
        else
            response = em_utils_prompt_user((GtkWindow *)widget, 
                             NULL, 
                             "calendar:ask-send-task-pending-download", 
                              NULL);
#endif
    if (!response) 
        return;
    }   

    if (!e_cal_is_read_only (priv->client, &read_only, NULL) || read_only) {
        e_error_run ((GtkWindow *) gtk_widget_get_toplevel (GTK_WIDGET (editor)), "calendar:prompt-read-only-cal", NULL);
        return;
    }

    commit_all_fields (editor);
    if (e_cal_component_is_instance (priv->comp))
        if (!recur_component_dialog (priv->client, priv->comp, &priv->mod, GTK_WINDOW (editor), delegated))
            return;

    comp = comp_editor_get_current_comp (editor);
    e_cal_component_get_summary (comp, &text);
    g_object_unref (comp);

    if (!text.value) 
        if (!send_component_prompt_subject ((GtkWindow *) editor, priv->client, priv->comp))
            return;
    if (save_comp_with_send (editor)) 
        close_dialog (editor);

}

static void
menu_file_print_cb (BonoboUIComponent *uic,
           void *data,
           const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;
    ECalComponent *comp;
    GList *l;
    icalcomponent *icalcomp = e_cal_component_get_icalcomponent (priv->comp);
    
    comp = e_cal_component_new ();
    e_cal_component_set_icalcomponent (comp, icalcomponent_new_clone (icalcomp));

    for (l = priv->pages; l != NULL; l = l->next)
         comp_editor_page_fill_component (l->data, comp);
    
    print_comp (comp, priv->client, GTK_PRINT_OPERATION_ACTION_PRINT_DIALOG);

    g_object_unref (comp);  
}

static void
menu_file_print_preview_cb (BonoboUIComponent *uic,
           void *data,
           const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;
    ECalComponent *comp;
    GList *l;
    icalcomponent *icalcomp = e_cal_component_get_icalcomponent (priv->comp);
    
    comp = e_cal_component_new ();
    e_cal_component_set_icalcomponent (comp, icalcomponent_new_clone (icalcomp));
    for (l = priv->pages; l != NULL; l = l->next)
         comp_editor_page_fill_component (l->data, comp);   
    print_comp (comp, priv->client, TRUE);

    g_object_unref (comp);  
}

static void
menu_file_close_cb (BonoboUIComponent *uic,
           void *data,
           const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    
    commit_all_fields (editor);

    if (prompt_and_save_changes (editor, TRUE))
        close_dialog (editor);
}

static void
menu_edit_copy_cb (BonoboUIComponent *uic,
           void *data,
           const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;

    if (GTK_IS_ENTRY (priv->focused_entry))
        gtk_editable_copy_clipboard (GTK_EDITABLE (priv->focused_entry));
    if (GTK_IS_TEXT_VIEW (priv->focused_entry))
        g_signal_emit_by_name (priv->focused_entry, "copy-clipboard");
}

static void
menu_edit_paste_cb (BonoboUIComponent *uic,
            void *data,
            const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;

    if (GTK_IS_ENTRY (priv->focused_entry))
        gtk_editable_paste_clipboard (GTK_EDITABLE (priv->focused_entry));
    if (GTK_IS_TEXT_VIEW (priv->focused_entry))
        g_signal_emit_by_name (priv->focused_entry, "paste-clipboard");


}

static void
menu_edit_selectall_cb (BonoboUIComponent *uic,
            void *data,
            const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    CompEditorPrivate *priv = editor->priv;

    if (GTK_IS_ENTRY (priv->focused_entry)) {
        gtk_editable_set_position (GTK_EDITABLE (priv->focused_entry), -1);
        gtk_editable_select_region (GTK_EDITABLE (priv->focused_entry), 0, -1);
    } 
    if (GTK_IS_TEXT_VIEW (priv->focused_entry)) 
        g_signal_emit_by_name (priv->focused_entry, "select-all", TRUE);
}

static void
menu_edit_cut_cb (BonoboUIComponent *uic,
          void *data,
          const char *path)
{
    CompEditor *editor = data;
    CompEditorPrivate *priv = editor->priv;
    
    if (GTK_IS_ENTRY (priv->focused_entry))
        gtk_editable_cut_clipboard (GTK_EDITABLE (priv->focused_entry));
    if (GTK_IS_TEXT_VIEW (priv->focused_entry))
        g_signal_emit_by_name (priv->focused_entry, "cut-clipboard");


}

static void
menu_insert_attachment_cb (BonoboUIComponent *uic,
               void *data,
               const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    EAttachmentBar *bar = (EAttachmentBar *)editor->priv->attachment_bar;
    GPtrArray *file_list;
    gboolean is_inline = FALSE;
    int i;

    file_list = comp_editor_select_file_attachments (editor, &is_inline);
    /*TODO add a good implementation here */
    if (!file_list)
        return;
    for (i = 0; i < file_list->len; i++) {
        CamelURL *url;

        url = camel_url_new (file_list->pdata[i], NULL);
        if (url == NULL)
            continue;

        if (!g_ascii_strcasecmp (url->protocol, "file"))
             e_attachment_bar_attach (bar, url->path, is_inline ? "inline" : "attachment");
        else 
             e_attachment_bar_attach_remote_file (bar, file_list->pdata[i], is_inline ? "inline" : "attachment");
        g_free (file_list->pdata[i]);
        camel_url_free (url);
    }
    
    g_ptr_array_free (file_list, TRUE);     
}

static void
menu_help_cb (BonoboUIComponent *uic,
          void *data,
          const char *path)
{
    CompEditor *editor = (CompEditor *) data;
    
    comp_editor_show_help (editor);
}

static BonoboUIVerb verbs [] = {

    BONOBO_UI_VERB ("FileSave", menu_file_save_cb),
    BONOBO_UI_VERB ("CalendarPrint", menu_file_print_cb),
    BONOBO_UI_VERB ("CalendarPrintPreview", menu_file_print_preview_cb),        
    BONOBO_UI_VERB ("FileClose", menu_file_close_cb),

    BONOBO_UI_VERB ("EditCopy", menu_edit_copy_cb),
    BONOBO_UI_VERB ("EditPaste", menu_edit_paste_cb),
    BONOBO_UI_VERB ("EditCut", menu_edit_cut_cb),
    BONOBO_UI_VERB ("EditSelectAll", menu_edit_selectall_cb),   
    BONOBO_UI_VERB ("InsertAttachments", menu_insert_attachment_cb),
    
    BONOBO_UI_VERB ("Help", menu_help_cb),
    
    BONOBO_UI_VERB_END
};

static EPixmap pixmaps[] = {
    E_PIXMAP ("/Toolbar/InsertAttachments", "stock_attach", E_ICON_SIZE_LARGE_TOOLBAR),
    E_PIXMAP ("/menu/Insert/Attachments/InsertAttachments", "stock_attach", E_ICON_SIZE_MENU),

    E_PIXMAP_END
};

/* Creates the basic in the editor */
static void
setup_widgets (CompEditor *editor)
{
    CompEditorPrivate *priv;
    GtkWidget *expander_hbox, *vbox;
    GdkPixbuf *attachment_pixbuf;

    priv = editor->priv;

    /* Useful vbox */
    vbox = gtk_vbox_new (FALSE, 0);
    bonobo_window_set_contents (BONOBO_WINDOW (editor), vbox);
    gtk_widget_show (vbox);

    /* Notebook */
    priv->notebook = GTK_NOTEBOOK (gtk_notebook_new ());
    gtk_widget_show (GTK_WIDGET (priv->notebook));
    gtk_box_pack_start (GTK_BOX (vbox), GTK_WIDGET (priv->notebook),
                TRUE, TRUE, 0);
    gtk_notebook_set_show_tabs (priv->notebook, FALSE);

    g_signal_connect (editor, "delete_event", G_CALLBACK (delete_event_cb), editor);
    g_signal_connect (editor, "key_press_event", G_CALLBACK (editor_key_press_event), editor);  

    /*Attachments */
    priv->attachment_scrolled_window = gtk_scrolled_window_new (NULL, NULL);
    gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (priv->attachment_scrolled_window),
                         GTK_SHADOW_IN);
    gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (priv->attachment_scrolled_window),
                    GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
    
    priv->attachment_bar = e_attachment_bar_new (NULL);

    g_signal_connect (priv->attachment_bar, "button_press_event", G_CALLBACK (button_press_event), NULL);
        g_signal_connect (priv->attachment_bar, "key_press_event", G_CALLBACK (key_press_event), NULL);
        g_signal_connect (priv->attachment_bar, "popup-menu", G_CALLBACK (popup_menu_event), NULL);

    GTK_WIDGET_SET_FLAGS (priv->attachment_bar, GTK_CAN_FOCUS);
    gtk_container_add (GTK_CONTAINER (priv->attachment_scrolled_window),
               priv->attachment_bar);
    gtk_widget_show (priv->attachment_bar);
    g_signal_connect (priv->attachment_bar, "changed",
              G_CALLBACK (attachment_bar_changed_cb), editor);
    g_signal_connect (GNOME_ICON_LIST (priv->attachment_bar), "event",
              G_CALLBACK (attachment_bar_icon_clicked_cb), editor);         
    priv->attachment_expander_label =
        gtk_label_new_with_mnemonic (_("Show Attachment _Bar"));
    priv->attachment_expander_num = gtk_label_new ("");
    gtk_label_set_use_markup (GTK_LABEL (priv->attachment_expander_num), TRUE);
    gtk_misc_set_alignment (GTK_MISC (priv->attachment_expander_label), 0.0, 0.5);
    gtk_misc_set_alignment (GTK_MISC (priv->attachment_expander_num), 1.0, 0.5);
    expander_hbox = gtk_hbox_new (FALSE, 0);
    
    attachment_pixbuf = e_icon_factory_get_icon ("stock_attach", E_ICON_SIZE_MENU);
    priv->attachment_expander_icon = gtk_image_new_from_pixbuf (attachment_pixbuf);
    gtk_misc_set_alignment (GTK_MISC (priv->attachment_expander_icon), 1, 0.5);
    gtk_widget_set_size_request (priv->attachment_expander_icon, 100, -1);
    g_object_unref (attachment_pixbuf); 

    gtk_box_pack_start (GTK_BOX (expander_hbox), priv->attachment_expander_label,
                TRUE, TRUE, 0);
    gtk_box_pack_start (GTK_BOX (expander_hbox), priv->attachment_expander_icon,
                TRUE, TRUE, 0);
    gtk_box_pack_start (GTK_BOX (expander_hbox), priv->attachment_expander_num,
                TRUE, TRUE, 0);
    gtk_widget_show_all (expander_hbox);
    gtk_widget_hide (priv->attachment_expander_icon);

    priv->attachment_expander = e_expander_new ("");
    e_expander_set_label_widget (E_EXPANDER (priv->attachment_expander), expander_hbox);
    atk_object_set_name (gtk_widget_get_accessible (priv->attachment_expander), _("Show Attachments"));
    atk_object_set_description (gtk_widget_get_accessible (priv->attachment_expander), _("Press space key to toggle attachment bar"));
    gtk_container_add (GTK_CONTAINER (priv->attachment_expander), priv->attachment_scrolled_window);

    gtk_box_pack_start (GTK_BOX (vbox), priv->attachment_expander, FALSE, FALSE, GNOME_PAD_SMALL);
    gtk_widget_show (priv->attachment_expander);
    e_expander_set_expanded (E_EXPANDER (priv->attachment_expander), FALSE);     
    g_signal_connect_after (priv->attachment_expander, "activate",   
                G_CALLBACK (attachment_expander_activate_cb), editor);
}

/* Object initialization function for the calendar component editor */
static void
comp_editor_init (CompEditor *editor)
{
    CompEditorPrivate *priv;
    BonoboUIContainer *container;
    char *xmlfile;

    priv = g_new0 (CompEditorPrivate, 1);
    editor->priv = priv;

    setup_widgets (editor);

    priv->focused_entry = NULL;
    priv->pages = NULL;
    priv->changed = FALSE;
    priv->needs_send = FALSE;
    priv->mod = CALOBJ_MOD_ALL;
    priv->existing_org = FALSE;
    priv->user_org = FALSE;
    priv->warned = FALSE;
    priv->is_group_item = FALSE;
    priv->help_section = g_strdup ("usage-calendar");

    container = bonobo_window_get_ui_container (BONOBO_WINDOW (editor));
    editor->uic = bonobo_ui_component_new_default ();
    /* FIXME: handle bonobo exceptions */
    bonobo_ui_component_set_container (editor->uic, bonobo_object_corba_objref (BONOBO_OBJECT (container)), NULL);
    
    bonobo_ui_component_add_verb_list_with_data (editor->uic, verbs, editor);

    bonobo_ui_component_freeze (editor->uic, NULL);

    xmlfile = g_build_filename (EVOLUTION_UIDIR,
                    "evolution-editor.xml",
                    NULL);
    bonobo_ui_util_set_ui (editor->uic, PREFIX,
                   xmlfile,
                   "evolution-editor", NULL);
    g_free (xmlfile);

    e_pixmaps_update (editor->uic, pixmaps);
    bonobo_ui_component_thaw (editor->uic, NULL);

    bonobo_ui_component_set_prop (editor->uic, "/commands/FileSave", "sensitive", "0", NULL);

    /* DND support */
    gtk_drag_dest_set (GTK_WIDGET (editor), GTK_DEST_DEFAULT_ALL,  drop_types, num_drop_types, GDK_ACTION_COPY|GDK_ACTION_ASK|GDK_ACTION_MOVE);
    g_signal_connect(editor, "drag_data_received", G_CALLBACK (drag_data_received), NULL);
    g_signal_connect(editor, "drag-motion", G_CALLBACK(drag_motion), editor);

    gtk_window_set_type_hint (GTK_WINDOW (editor), GDK_WINDOW_TYPE_HINT_NORMAL);
}


static gint
comp_editor_key_press_event (GtkWidget *d, GdkEventKey *e)
{
#if 0
    if (e->keyval == GDK_Escape) {
        if (prompt_and_save_changes (COMP_EDITOR (d), TRUE))
            close_dialog (COMP_EDITOR (d));
        return TRUE;
    }
#endif

    if (GTK_WIDGET_CLASS (comp_editor_parent_class)->key_press_event)
        return (* GTK_WIDGET_CLASS (comp_editor_parent_class)->key_press_event) (d, e);

    return FALSE;
}

/* Destroy handler for the calendar component editor */
static void
comp_editor_finalize (GObject *object)
{
    CompEditor *editor;
    CompEditorPrivate *priv;
    GList *l;

    editor = COMP_EDITOR (object);
    priv = editor->priv;

    g_free (priv->help_section);

    if (priv->client) {
        g_object_unref (priv->client);
        priv->client = NULL;
    }
    
    if (priv->source_client) {
        g_object_unref (priv->source_client);
        priv->source_client = NULL;
    }

    if (priv->view) {
        g_signal_handlers_disconnect_matched (G_OBJECT (priv->view),
                              G_SIGNAL_MATCH_DATA,
                              0, 0, NULL, NULL,
                              editor);

        g_object_unref (priv->view);
        priv->view = NULL;
    }

    /* We want to destroy the pages after the widgets get destroyed,
       since they have lots of signal handlers connected to the widgets
       with the pages as the data. */
    for (l = priv->pages; l != NULL; l = l->next)
        g_object_unref (l->data);

    if (priv->comp) {
        g_object_unref (priv->comp);
        priv->comp = NULL;
    }

    g_free (priv);
    editor->priv = NULL;

    if (G_OBJECT_CLASS (comp_editor_parent_class)->finalize)
        (* G_OBJECT_CLASS (comp_editor_parent_class)->finalize) (object);
}

static void
comp_editor_show_help (CompEditor *editor)
{
    GError *error = NULL;
    CompEditorPrivate *priv;

    priv = editor->priv;

    gnome_help_display (
        "evolution.xml", priv->help_section, &error);
    if (error != NULL) {
        g_warning ("%s", error->message);
        g_error_free (error);
    }
}


static void
delete_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;
    const char *uid;

    priv = editor->priv;

    e_cal_component_get_uid (priv->comp, &uid);
    if (e_cal_component_is_instance (priv->comp)|| e_cal_component_has_recurrences (priv->comp))
        e_cal_remove_object_with_mod (priv->client, uid, NULL,
                CALOBJ_MOD_ALL, NULL);
    else
        e_cal_remove_object (priv->client, uid, NULL);
    close_dialog (editor);
}

/* Closes the dialog box and emits the appropriate signals */
static void
close_dialog (CompEditor *editor)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    /* FIXME Unfortunately we do this here because otherwise corba
       calls happen during destruction and we might get a change
       notification back when we are in an inconsistent state */
    if (priv->view)
        g_signal_handlers_disconnect_matched (G_OBJECT (priv->view),
                              G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, editor); 
    
    gtk_widget_destroy (GTK_WIDGET (editor));
}



void
comp_editor_set_existing_org (CompEditor *editor, gboolean existing_org)
{
    CompEditorPrivate *priv;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    priv->existing_org = existing_org;
}

gboolean
comp_editor_get_existing_org (CompEditor *editor)
{
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    priv = editor->priv;

    return priv->existing_org;
}

void
comp_editor_set_user_org (CompEditor *editor, gboolean user_org)
{
    CompEditorPrivate *priv;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    priv->user_org = user_org;
}

gboolean
comp_editor_get_user_org (CompEditor *editor)
{
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    priv = editor->priv;

    return priv->user_org;
}

void
comp_editor_set_group_item (CompEditor *editor, gboolean group_item)
{
    CompEditorPrivate *priv;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    priv->is_group_item = group_item;
}

gboolean
comp_editor_get_group_item (CompEditor *editor)
{
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    priv = editor->priv;

    return priv->is_group_item;
}

/**
 * comp_editor_set_changed:
 * @editor: A component editor
 * @changed: Value to set the changed state to
 *
 * Set the dialog changed state to the given value
 **/
void
comp_editor_set_changed (CompEditor *editor, gboolean changed)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    priv->changed = changed;

    bonobo_ui_component_set_prop (editor->uic, "/commands/FileSave", "sensitive", changed ? "1" : "0"
            , NULL);
}

/**
 * comp_editor_get_changed:
 * @editor: A component editor
 *
 * Gets the changed state of the dialog
 *
 * Return value: A boolean indicating if the dialog is in a changed
 * state
 **/
gboolean
comp_editor_get_changed (CompEditor *editor)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    return priv->changed;
}

void 
comp_editor_set_flags (CompEditor *editor, CompEditorFlags flags)
{
    
    CompEditorPrivate *priv;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    priv->flags = flags;
}


CompEditorFlags 
comp_editor_get_flags (CompEditor *editor)
{
        
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    priv = editor->priv;

    return priv->flags;
}

/**
 * comp_editor_set_needs_send:
 * @editor: A component editor
 * @needs_send: Value to set the needs send state to
 *
 * Set the dialog needs send state to the given value
 **/
void
comp_editor_set_needs_send (CompEditor *editor, gboolean needs_send)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    priv->needs_send = needs_send;
}

/**
 * comp_editor_get_needs_send:
 * @editor: A component editor
 *
 * Gets the needs send state of the dialog
 *
 * Return value: A boolean indicating if the dialog is in a needs send
 * state
 **/
gboolean
comp_editor_get_needs_send (CompEditor *editor)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    return priv->needs_send;
}

static void page_mapped_cb (GtkWidget *page_widget,
                CompEditorPage *page)
{
    GtkWidget *toplevel;

    toplevel = gtk_widget_get_toplevel (page_widget);
    if (!GTK_IS_WINDOW (toplevel))
        return;

    if (page->accel_group) {
        gtk_window_add_accel_group (GTK_WINDOW (toplevel),
                        page->accel_group);
    }
}

static void page_unmapped_cb (GtkWidget *page_widget,
                  CompEditorPage *page)
{
    GtkWidget *toplevel;

    toplevel = gtk_widget_get_toplevel (page_widget);
    if (!GTK_IS_WINDOW (toplevel))
        return;

    if (page->accel_group) {
        gtk_window_remove_accel_group (GTK_WINDOW (toplevel),
                           page->accel_group);
    }
}

/**
 * comp_editor_append_page:
 * @editor: A component editor
 * @page: A component editor page
 * @label: Label of the page. Should be NULL if add is FALSE. 
 * @add: Add's the page into the notebook if TRUE
 *
 * Appends a page to the notebook if add is TRUE else
 * just adds it to the list of pages. 
 **/
void
comp_editor_append_page (CompEditor *editor,
             CompEditorPage *page,
             const char *label,
             gboolean add)
{
    CompEditorPrivate *priv;
    GtkWidget *page_widget;
    GtkWidget *label_widget = NULL;
    gboolean is_first_page;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));
    g_return_if_fail (page != NULL);
    g_return_if_fail (IS_COMP_EDITOR_PAGE (page));

    priv = editor->priv;

    g_object_ref (page);

    /* set the flags */
    page->flags = priv->flags;

    /* If we are editing something, fill the widgets with current info */
    if (priv->comp != NULL) {
        ECalComponent *comp;

        comp = comp_editor_get_current_comp (editor);
        comp_editor_page_fill_widgets (page, comp);
        g_object_unref (comp);
    }

    page_widget = comp_editor_page_get_widget (page);
    g_assert (page_widget != NULL);

    if (label)
        label_widget = gtk_label_new_with_mnemonic (label);

    is_first_page = (priv->pages == NULL);

    priv->pages = g_list_append (priv->pages, page);
    
    if (add)
        gtk_notebook_append_page (priv->notebook, page_widget, label_widget);

    /* Listen for things happening on the page */
    g_signal_connect(page, "changed",
                G_CALLBACK (page_changed_cb), editor);
    g_signal_connect(page, "needs_send",
                G_CALLBACK (needs_send_cb), editor);
    g_signal_connect(page, "summary_changed",
                G_CALLBACK (page_summary_changed_cb), editor);
    g_signal_connect(page, "dates_changed",
                G_CALLBACK (page_dates_changed_cb), editor);
    g_signal_connect(page, "focus_in",
                    G_CALLBACK (page_focus_in_widget_cb), editor);
    g_signal_connect(page, "focus_out",
                G_CALLBACK (page_focus_out_widget_cb), editor);
    /* Listen for when the page is mapped/unmapped so we can
       install/uninstall the appropriate GtkAccelGroup. */
    g_signal_connect((page_widget), "map",
                G_CALLBACK (page_mapped_cb), page);
    g_signal_connect((page_widget), "unmap",
                G_CALLBACK (page_unmapped_cb), page);

    /* The first page is the main page of the editor, so we ask it to focus
     * its main widget.
     */
    if (is_first_page)
        comp_editor_page_focus_main_widget (page);
}

/**
 * comp_editor_remove_page:
 * @editor: A component editor
 * @page: A component editor page
 *
 * Removes the page from the component editor
 **/
void
comp_editor_remove_page (CompEditor *editor, CompEditorPage *page)
{
    CompEditorPrivate *priv;
    GtkWidget *page_widget;
    gint page_num;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));
    g_return_if_fail (page != NULL);
    g_return_if_fail (IS_COMP_EDITOR_PAGE (page));

    priv = editor->priv;

    page_widget = comp_editor_page_get_widget (page);
    page_num = gtk_notebook_page_num (priv->notebook, page_widget);
    if (page_num == -1)
        return;
    
    /* Disconnect all the signals added in append_page(). */
    g_signal_handlers_disconnect_matched (page, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, editor);
    g_signal_handlers_disconnect_matched (page_widget, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, page);

    gtk_notebook_remove_page (priv->notebook, page_num);

    priv->pages = g_list_remove (priv->pages, page);
    g_object_unref (page);
}

/**
 * comp_editor_show_page:
 * @editor:
 * @page:
 *
 *
 **/
void
comp_editor_show_page (CompEditor *editor, CompEditorPage *page)
{
    CompEditorPrivate *priv;
    GtkWidget *page_widget;
    gint page_num;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));
    g_return_if_fail (page != NULL);
    g_return_if_fail (IS_COMP_EDITOR_PAGE (page));

    priv = editor->priv;

    page_widget = comp_editor_page_get_widget (page);
    page_num = gtk_notebook_page_num (priv->notebook, page_widget);
    gtk_notebook_set_current_page (priv->notebook, page_num);
}

/**
 * comp_editor_set_e_cal:
 * @editor: A component editor
 * @client: The calendar client to use
 *
 * Sets the calendar client used by the editor to update components
 **/
void
comp_editor_set_e_cal (CompEditor *editor, ECal *client)
{
    CompEditorClass *klass;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    klass = COMP_EDITOR_CLASS (G_OBJECT_GET_CLASS (editor));

    if (klass->set_e_cal)
        klass->set_e_cal (editor, client);
}

/**
 * comp_editor_get_e_cal:
 * @editor: A component editor
 *
 * Returns the calendar client of the editor
 *
 * Return value: The calendar client of the editor
 **/
ECal *
comp_editor_get_e_cal (CompEditor *editor)
{
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, NULL);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), NULL);

    priv = editor->priv;

    return priv->client;
}

void
comp_editor_set_help_section (CompEditor *editor, const char *section)
{
    CompEditorPrivate *priv;

    priv = editor->priv;

    g_free (priv->help_section);
    priv->help_section = g_strdup (section);
}

/* Creates an appropriate title for the event editor dialog */
static char *
make_title_from_comp (ECalComponent *comp, gboolean is_group_item)
{
    char *title;
    const char *type_string;
    ECalComponentVType type;
    ECalComponentText text;

    if (!comp)
        return g_strdup (_("Edit Appointment"));

    type = e_cal_component_get_vtype (comp);
    switch (type) {
    case E_CAL_COMPONENT_EVENT:
        if (is_group_item)
            type_string = _("Meeting - %s");
        else
            type_string = _("Appointment - %s");
        break;
    case E_CAL_COMPONENT_TODO:
        if (is_group_item)
            type_string = _("Assigned Task - %s");
        else
            type_string = _("Task - %s");
        break;
    case E_CAL_COMPONENT_JOURNAL:
        type_string = _("Journal entry - %s");
        break;
    default:
        g_message ("make_title_from_comp(): Cannot handle object of type %d", type);
        return NULL;
    }

    e_cal_component_get_summary (comp, &text);
    if (text.value) {
        title = g_strdup_printf (type_string, text.value);
    } else {
        title = g_strdup_printf (type_string, _("No summary"));
    }

    return title;
}

/* Creates an appropriate title for the event editor dialog */
static char *
make_title_from_string (ECalComponent *comp, const char *str, gboolean is_group_item)
{
    char *title;
    const char *type_string;
    ECalComponentVType type;

    if (!comp)
        return g_strdup (_("Edit Appointment"));

    type = e_cal_component_get_vtype (comp);
    switch (type) {
    case E_CAL_COMPONENT_EVENT:
        if (is_group_item)
            type_string = _("Meeting - %s");
        else
            type_string = _("Appointment - %s");
        break;
    case E_CAL_COMPONENT_TODO:
        if (is_group_item)
            type_string = _("Assigned Task - %s");  
        else
            type_string = _("Task - %s");
        break;
    case E_CAL_COMPONENT_JOURNAL:
        type_string = _("Journal entry - %s");
        break;
    default:
        g_message ("make_title_from_string(): Cannot handle object of type %d", type);
        return NULL;
    }

    if (str) {
        title = g_strdup_printf (type_string, str);
    } else {
        title = g_strdup_printf (type_string, _("No summary"));
    }

    return title;
}

static const char *
make_icon_from_comp (ECalComponent *comp)
{
    ECalComponentVType type;

    if (!comp)
        return "stock_calendar";

    type = e_cal_component_get_vtype (comp);
    switch (type) {
    case E_CAL_COMPONENT_EVENT:
        return "stock_new-appointment";
    case E_CAL_COMPONENT_TODO:
        return "stock_task";
    default:
        return "stock_calendar";
    }
}

/* Sets the event editor's window title from a calendar component */
static void
set_title_from_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;
    char *title;

    priv = editor->priv;
    title = make_title_from_comp (priv->comp, priv->is_group_item);
    gtk_window_set_title (GTK_WINDOW (editor), title);
    g_free (title);
}

static void
set_title_from_string (CompEditor *editor, const char *str)
{
    CompEditorPrivate *priv;
    char *title;

    priv = editor->priv;
    title = make_title_from_string (priv->comp, str, priv->is_group_item);
    gtk_window_set_title (GTK_WINDOW (editor), title);
    g_free (title);
}

static void
set_icon_from_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;
    const char *icon_name;
    GList *icon_list;

    priv = editor->priv;
    icon_name = make_icon_from_comp (priv->comp);

    icon_list = e_icon_factory_get_icon_list (icon_name);
    if (icon_list) {
        gtk_window_set_icon_list (GTK_WINDOW (editor), icon_list);
        g_list_foreach (icon_list, (GFunc) g_object_unref, NULL);
        g_list_free (icon_list);
    }
}

static char *
attachment_guess_mime_type (const char *file_name)
{
    GnomeVFSFileInfo *info;
    GnomeVFSResult result;
    char *type = NULL;

    info = gnome_vfs_file_info_new ();
    result = gnome_vfs_get_file_info (file_name, info,
                      GNOME_VFS_FILE_INFO_GET_MIME_TYPE |
                      GNOME_VFS_FILE_INFO_FORCE_SLOW_MIME_TYPE |
                      GNOME_VFS_FILE_INFO_FOLLOW_LINKS);
    if (result == GNOME_VFS_OK)
        type = g_strdup (gnome_vfs_file_info_get_mime_type (info));

    gnome_vfs_file_info_unref (info);

    return type;
}

static void 
set_attachment_list (CompEditor *editor, GSList *attach_list)
{
    GSList *p = NULL;
    const char *comp_uid= NULL;

    e_cal_component_get_uid (editor->priv->comp, &comp_uid);

    if (e_attachment_bar_get_num_attachments (E_ATTACHMENT_BAR (editor->priv->attachment_bar))) {
        /* To prevent repopulating the
         * bar due to redraw functions in fill_widget. 
         * Assumes it can be set only once.
         */     
        return;         
    }

    for (p = attach_list; p != NULL; p = p->next) {
        char *attach_filename;
        CamelMimePart *part;
        CamelDataWrapper *wrapper;
        CamelStream *stream;
        struct stat statbuf;
        char *mime_type, *file_name;        
        char *ptr;

        attach_filename = (char *) p->data;
        /* should we assert if g_str_has_prefix (attach_filename, "file://")) 
         * here
        */
        /* get url sans protocol and add it to the bar.
         * how to set the filename properly */      
        file_name = g_filename_from_uri (attach_filename, NULL, NULL);
        
        if (g_stat (file_name, &statbuf) < 0) {
            g_warning ("Cannot attach file %s: %s", file_name, g_strerror (errno));
            g_free (file_name);
            continue;
        }
    
        /* return if it's not a regular file */
        if (!S_ISREG (statbuf.st_mode)) {
            g_warning ("Cannot attach file %s: not a regular file", file_name);
            g_free (file_name);
            return;
        }
        
        stream = camel_stream_fs_new_with_name (file_name, O_RDONLY, 0);
        if (!stream) {
            g_warning ("Cannot attach file %s: %s", file_name, g_strerror (errno));
            g_free (file_name);
            return;
        }

        mime_type = attachment_guess_mime_type (file_name);
        if (mime_type) {
            if (!g_ascii_strcasecmp (mime_type, "message/rfc822")) {
                wrapper = (CamelDataWrapper *) camel_mime_message_new ();
            } else {
                wrapper = camel_data_wrapper_new ();
            }
            
            camel_data_wrapper_construct_from_stream (wrapper, stream);
            camel_data_wrapper_set_mime_type (wrapper, mime_type);
            g_free (mime_type);
        } else {
            wrapper = camel_data_wrapper_new ();
            camel_data_wrapper_construct_from_stream (wrapper, stream);
            camel_data_wrapper_set_mime_type (wrapper, "application/octet-stream");
        }

        camel_object_unref (stream);
        
        part = camel_mime_part_new ();
        camel_medium_set_content_object (CAMEL_MEDIUM (part), wrapper);
        camel_object_unref (wrapper);
    
        camel_mime_part_set_disposition (part, "attachment");

        ptr = strstr (file_name, comp_uid);
        if (ptr) {
            ptr += strlen(comp_uid);
            if (*ptr++ == '-')
                camel_mime_part_set_filename (part, ptr); 
        }
        g_free (file_name);

        e_attachment_bar_attach_mime_part ((EAttachmentBar *) editor->priv->attachment_bar, part);
        e_expander_set_expanded (E_EXPANDER (editor->priv->attachment_expander), TRUE);

        camel_object_unref (part);
    }   
}

static void
fill_widgets (CompEditor *editor)
{
    CompEditorPrivate *priv;
    GList *l;

    priv = editor->priv;

    /*Check if attachments are available here and set them*/
    if (e_cal_component_has_attachments (priv->comp)) {
        GSList *attachment_list = NULL;
        e_cal_component_get_attachment_list (priv->comp, &attachment_list);
        set_attachment_list (editor, attachment_list);
        g_slist_foreach (attachment_list, (GFunc)g_free, NULL);
        g_slist_free (attachment_list);
    }   

    for (l = priv->pages; l != NULL; l = l->next)
        comp_editor_page_fill_widgets (l->data, priv->comp);
}

static void
real_set_e_cal (CompEditor *editor, ECal *client)
{
    CompEditorPrivate *priv;
    GList *elem;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    if (client == priv->client)
        return;

    if (client) {
        g_return_if_fail (E_IS_CAL (client));
        g_return_if_fail (e_cal_get_load_state (client) ==
                  E_CAL_LOAD_LOADED);
        g_object_ref (client);
    }

    if (priv->client)
        g_object_unref (priv->client);

    priv->client = client;
    if (!priv->source_client)
        priv->source_client = g_object_ref (client);

    /* Pass the client to any pages that need it. */
    for (elem = priv->pages; elem; elem = elem->next)
        comp_editor_page_set_e_cal (elem->data, client);
}

static void
real_edit_comp (CompEditor *editor, ECalComponent *comp)
{
    CompEditorPrivate *priv;
    const char *uid;
    
    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    if (priv->comp) {
        g_object_unref (priv->comp);
        priv->comp = NULL;
    }

    if (comp)
        priv->comp = e_cal_component_clone (comp);
    
    priv->existing_org = e_cal_component_has_organizer (comp);
    priv->user_org = (itip_organizer_is_user (comp, priv->client) || itip_sentby_is_user (comp));
    priv->warned = FALSE;
        
    set_title_from_comp (editor);
    set_icon_from_comp (editor);
    e_cal_component_get_uid (comp, &uid);

    fill_widgets (editor);

    priv->changed =FALSE;

    listen_for_changes (editor);
}

/* TODO These functions should be available in e-cal-component.c */
static void
set_attendees_for_delegation (ECalComponent *comp, const char *address, ECalComponentItipMethod method)
{
    icalproperty *prop; 
    icalparameter *param;
    icalcomponent *icalcomp;
    
    icalcomp = e_cal_component_get_icalcomponent (comp);

    for (prop = icalcomponent_get_first_property (icalcomp, ICAL_ATTENDEE_PROPERTY);
            prop;
            prop = icalcomponent_get_next_property (icalcomp, ICAL_ATTENDEE_PROPERTY)) {
        const char *attendee = icalproperty_get_attendee (prop);
        const char *delfrom;

        param = icalproperty_get_first_parameter(prop, ICAL_DELEGATEDFROM_PARAMETER);
        delfrom = icalparameter_get_delegatedfrom (param);
        if (!(g_str_equal (itip_strip_mailto (attendee), address) ||
                ((delfrom && *delfrom) &&
                 g_str_equal (itip_strip_mailto (delfrom), address)))) {
            icalcomponent_remove_property (icalcomp, prop);
        } 

    }

}

static void
get_users_from_memo_comp (ECalComponent *comp, GList **users)
{
    icalcomponent *icalcomp;
    icalproperty *icalprop;
    const char *attendees = NULL;
    char **emails, **iter;

    icalcomp = e_cal_component_get_icalcomponent (comp);
    
    for (icalprop = icalcomponent_get_first_property (icalcomp, ICAL_X_PROPERTY); icalprop; 
            icalprop = icalcomponent_get_next_property (icalcomp, ICAL_X_PROPERTY)) {
        if (g_str_equal (icalproperty_get_x_name (icalprop), "X-EVOLUTION-RECIPIENTS")) {
            break;
        }
    }

    if (icalprop)    {
        attendees = icalproperty_get_x (icalprop);
        emails = g_strsplit (attendees, ";", -1);

        iter = emails;
        while (*iter) {
            *users = g_list_append (*users, g_strdup (*iter));
            iter++;
        }
        g_strfreev (emails);
    }
}

static gboolean
real_send_comp (CompEditor *editor, ECalComponentItipMethod method)
{
    CompEditorPrivate *priv;
    ECalComponent *send_comp;
    char *address = NULL;
    GList *users = NULL;
    
    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    priv = editor->priv;

    send_comp = e_cal_component_clone (priv->comp);

    if (e_cal_component_get_vtype (send_comp) == E_CAL_COMPONENT_JOURNAL) 
        get_users_from_memo_comp (send_comp, &users);
    
    /* The user updates the delegated status to the Organizer, so remove all other attendees */
    if ((priv->flags & COMP_EDITOR_DELEGATE)) {
        address = itip_get_comp_attendee (send_comp, priv->client);

        if (address)
            set_attendees_for_delegation (send_comp, address, method);
    }
    
    if (!e_cal_component_has_attachments (priv->comp)) {
        if (itip_send_comp (method, send_comp, priv->client,
                    NULL, NULL, users)) {
            g_object_unref (send_comp);
            return TRUE;
        }

    } else {
        /* Clone the component with attachments set to CID:...  */
        int num_attachments, i;
        GSList *attach_list = NULL;
        GSList *mime_attach_list;
            
        num_attachments = e_cal_component_get_num_attachments (send_comp);

        for (i = 0; i < num_attachments ; i++) {
            attach_list = g_slist_append (attach_list, g_strdup ("CID:..."));
        }
        e_cal_component_set_attachment_list (send_comp, attach_list);

        /* mime_attach_list is freed by itip_send_comp */
        mime_attach_list = comp_editor_get_mime_attach_list (editor);
        if (itip_send_comp (method, send_comp, priv->client,
                    NULL, mime_attach_list, users)) {
            save_comp (editor);
            g_object_unref (send_comp);
            return TRUE;
        }
    }

    g_object_unref (send_comp);
    g_free (address);
    comp_editor_set_changed (editor, TRUE);
    
    return FALSE;

}


/**
 * comp_editor_edit_comp:
 * @editor: A component editor
 * @comp: A calendar component
 *
 * Starts the editor editing the given component
 **/
void
comp_editor_edit_comp (CompEditor *editor, ECalComponent *comp)
{
    CompEditorClass *klass;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));
    g_return_if_fail (comp != NULL);
    g_return_if_fail (E_IS_CAL_COMPONENT (comp));

    klass = COMP_EDITOR_CLASS (G_OBJECT_GET_CLASS (editor));

    if (klass->edit_comp)
        klass->edit_comp (editor, comp);
}

ECalComponent *
comp_editor_get_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;

    g_return_val_if_fail (editor != NULL, NULL);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), NULL);

    priv = editor->priv;

    return priv->comp;
}

ECalComponent *
comp_editor_get_current_comp (CompEditor *editor)
{
    CompEditorPrivate *priv;
    ECalComponent *comp;
    GList *l;

    g_return_val_if_fail (editor != NULL, NULL);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), NULL);

    priv = editor->priv;

    comp = e_cal_component_clone (priv->comp);
    if (priv->changed) {
        for (l = priv->pages; l != NULL; l = l->next)
            comp_editor_page_fill_component (l->data, comp);
    }

    return comp;
}

/**
 * comp_editor_save_comp:
 * @editor:
 *
 *
 **/
gboolean
comp_editor_save_comp (CompEditor *editor, gboolean send)
{
    return prompt_and_save_changes (editor, send);
}

/**
 * comp_editor_delete_comp:
 * @editor:
 *
 *
 **/
void
comp_editor_delete_comp (CompEditor *editor)
{
    delete_comp (editor);
}

/**
 * comp_editor_send_comp:
 * @editor:
 * @method:
 *
 *
 **/
gboolean
comp_editor_send_comp (CompEditor *editor, ECalComponentItipMethod method)
{
    CompEditorClass *klass;

    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    klass = COMP_EDITOR_CLASS (G_OBJECT_GET_CLASS (editor));

    if (klass->send_comp)
        return klass->send_comp (editor, method);

    return FALSE;
}

gboolean
comp_editor_close (CompEditor *editor)
{
    gboolean close;
    
    g_return_val_if_fail (editor != NULL, FALSE);
    g_return_val_if_fail (IS_COMP_EDITOR (editor), FALSE);

    commit_all_fields (editor);
    
    close = prompt_and_save_changes (editor, TRUE);
    if (close)
        close_dialog (editor);

    return close;
}


/* Utility function to get the mime-attachment list from the attachment
 * bar for sending the comp via itip. The list and its contents must
 * be freed by the caller.
 */
GSList *
comp_editor_get_mime_attach_list (CompEditor *editor) 
{
    struct CalMimeAttach *cal_mime_attach;
    GSList *attach_list = NULL, *l, *parts;

    /* TODO assert sanity of bar */
    parts = e_attachment_bar_get_parts (E_ATTACHMENT_BAR (editor->priv->attachment_bar));
    for (l = parts; l ; l = l->next) {
        
        CamelDataWrapper *wrapper;
        CamelStreamMem *mstream;
        unsigned char *buffer = NULL;
        const char *desc, *disp;

        cal_mime_attach = g_malloc0 (sizeof (struct CalMimeAttach));
        wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (l->data));
        mstream = (CamelStreamMem *) camel_stream_mem_new ();
            
        camel_data_wrapper_decode_to_stream (wrapper, (CamelStream *) mstream);
        buffer = g_memdup (mstream->buffer->data, mstream->buffer->len);
        
        cal_mime_attach->encoded_data = (char *)buffer;
        cal_mime_attach->length = mstream->buffer->len;
        cal_mime_attach->filename = g_strdup (camel_mime_part_get_filename
            ((CamelMimePart *) l->data));
        desc = camel_mime_part_get_description ((CamelMimePart *) l->data);
        if (!desc || *desc == '\0')
            desc = _("attachment");
        cal_mime_attach->description = g_strdup (desc);
        cal_mime_attach->content_type = g_strdup (camel_data_wrapper_get_mime_type (wrapper));
        
        disp = camel_mime_part_get_disposition ((CamelMimePart *)l->data);
        if (disp && !g_ascii_strcasecmp(disp, "inline"))    
            cal_mime_attach->disposition = TRUE;
            
        attach_list = g_slist_append (attach_list, cal_mime_attach);

        camel_object_unref (mstream);
        
    }

    g_slist_free (parts);

    return attach_list;
}

/* Brings attention to a window by raising it and giving it focus */
static void
raise_and_focus (GtkWidget *widget)
{
    g_assert (GTK_WIDGET_REALIZED (widget));
    gdk_window_show (widget->window);
    gtk_widget_grab_focus (widget);
}

/**
 * comp_editor_focus:
 * @editor: A component editor
 *
 * Brings the editor window to the front and gives it focus
 **/
void
comp_editor_focus (CompEditor *editor)
{
    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    gtk_widget_show (GTK_WIDGET (editor));
    raise_and_focus (GTK_WIDGET (editor));
}

/**
 * comp_editor_notify_client_changed:
 * @editor: A component editor.
 * 
 * Makes an editor emit the "client_changed" signal.
 **/
void
comp_editor_notify_client_changed (CompEditor *editor, ECal *client)
{
    GList *l;
    CompEditorPrivate *priv;
    gboolean read_only;

    g_return_if_fail (editor != NULL);
    g_return_if_fail (IS_COMP_EDITOR (editor));

    priv = editor->priv;

    priv->changed = TRUE;
    
    g_object_unref (priv->client);
    priv->client = client;

    comp_editor_set_e_cal (editor, client);
    for (l = priv->pages; l != NULL; l = l->next)
        comp_editor_page_notify_client_changed (COMP_EDITOR_PAGE (l->data), client);

    if (!e_cal_is_read_only (client, &read_only, NULL))
        read_only = TRUE;

    /* FIXME: SRINI: Disable widgets */
}

static void
page_changed_cb (GtkObject *obj, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;

    priv = editor->priv;

    comp_editor_set_changed (editor, TRUE);

    if (!priv->warned && priv->existing_org && !priv->user_org) {
        e_notice (editor, GTK_MESSAGE_INFO,
              _("Changes made to this item may be discarded if an update arrives"));
        priv->warned = TRUE;
    }
    
}

static void
needs_send_cb (GtkObject *obj, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);

    comp_editor_set_needs_send (editor, TRUE);
}

/* Focus out widget callback */
static void 
page_focus_out_widget_cb (GtkObject *obj, GtkWidget *widget, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;

    priv = editor->priv;

    priv->focused_entry = NULL;
}

/* Focus in widget callback*/
static void
page_focus_in_widget_cb (GtkObject *obj, GtkWidget *widget, gpointer data)
{
    
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;

    priv = editor->priv;

    priv->focused_entry = widget;
}
/* Page signal callbacks */
static void
page_summary_changed_cb (GtkObject *obj, const char *summary, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;
    GList *l;

    priv = editor->priv;

    for (l = priv->pages; l != NULL; l = l->next)
        if (obj != l->data)
            comp_editor_page_set_summary (l->data, summary);

    if (!priv->warned && priv->existing_org && !priv->user_org) {
        e_notice (editor, GTK_MESSAGE_INFO,
              _("Changes made to this item may be discarded if an update arrives"));
        priv->warned = TRUE;
    }

    set_title_from_string (editor, summary);
}

static void
page_dates_changed_cb (GtkObject *obj,
               CompEditorPageDates *dates,
               gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;
    GList *l;

    priv = editor->priv;

    for (l = priv->pages; l != NULL; l = l->next)
        if (obj != l->data)
            comp_editor_page_set_dates (l->data, dates);

    if (!priv->warned && priv->existing_org && !priv->user_org) {
        e_notice (editor, GTK_MESSAGE_INFO,
              _("Changes made to this item may be discarded if an update arrives"));
        priv->warned = TRUE;
    }
}

static void
obj_modified_cb (ECal *client, GList *objects, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;
    ECalComponent *comp = NULL;

    priv = editor->priv;

    /* We queried based on a specific UID so we definitely changed */
    if (changed_component_dialog ((GtkWindow *) editor, priv->comp, FALSE, priv->changed)) {
        icalcomponent *icalcomp = icalcomponent_new_clone (objects->data);

        comp = e_cal_component_new ();
        if (e_cal_component_set_icalcomponent (comp, icalcomp)) {
            comp_editor_edit_comp (editor, comp);
        } else {
            GtkWidget *dialog;

            dialog = gtk_message_dialog_new (
                NULL, 0,
                GTK_MESSAGE_ERROR,
                GTK_BUTTONS_OK,
                "%s",
                _("Unable to use current version!"));
            gtk_dialog_run (GTK_DIALOG (dialog));
            gtk_widget_destroy (dialog);
            
            icalcomponent_free (icalcomp);
        }

        g_object_unref (comp);
    }
}

static void
obj_removed_cb (ECal *client, GList *uids, gpointer data)
{
    CompEditor *editor = COMP_EDITOR (data);
    CompEditorPrivate *priv;

    priv = editor->priv;

    if (changed_component_dialog ((GtkWindow *) editor, priv->comp, TRUE, priv->changed))
        close_dialog (editor);
}