diff options
Diffstat (limited to 'plugins/itip-formatter/itip-formatter.c')
| -rw-r--r-- | plugins/itip-formatter/itip-formatter.c | 3505 |
1 files changed, 0 insertions, 3505 deletions
diff --git a/plugins/itip-formatter/itip-formatter.c b/plugins/itip-formatter/itip-formatter.c deleted file mode 100644 index 6780d09505..0000000000 --- a/plugins/itip-formatter/itip-formatter.c +++ /dev/null @@ -1,3505 +0,0 @@ -/* - * 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/> - * - * - * Authors: - * JP Rosevear <jpr@novell.com> - * - * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com) - * - */ - -#ifdef HAVE_CONFIG_H -#include <config.h> -#endif - -#include <string.h> -#include <gtk/gtk.h> -#include <glib/gi18n.h> - -#include <libecal/libecal.h> -#include <libedataserverui/libedataserverui.h> - -#include <libevolution-utils/e-alert-dialog.h> -#include <e-util/e-mktemp.h> - -#include <shell/e-shell.h> -#include <shell/e-shell-utils.h> - -#include <libemail-utils/mail-mt.h> - -#include <libemail-engine/mail-folder-cache.h> -#include <libemail-engine/mail-tools.h> - -#include <mail/em-format-hook.h> -#include <mail/em-config.h> -#include <mail/em-format-html.h> -#include <mail/em-utils.h> - -#include <misc/e-attachment.h> - -#include <calendar/gui/itip-utils.h> - -#include "e-conflict-search-selector.h" -#include "e-source-conflict-search.h" -#include "itip-view.h" - -#define CONF_KEY_DELETE "delete-processed" - -#define d(x) - -struct _ItipPURI { - EMFormatPURI puri; - - const EMFormatHandler *handle; - CamelFolder *folder; - CamelMimeMessage *msg; - CamelMimePart *part; - - gchar *uid; - - ESourceRegistry *registry; - GHashTable *clients[E_CAL_CLIENT_SOURCE_TYPE_LAST]; - - ECalClient *current_client; - ECalClientSourceType type; - - /* cancelled when freeing the puri */ - GCancellable *cancellable; - - gchar *vcalendar; - ECalComponent *comp; - icalcomponent *main_comp; - icalcomponent *ical_comp; - icalcomponent *top_level; - icalcompiter iter; - icalproperty_method method; - time_t start_time; - time_t end_time; - - gint current; - gint total; - - gchar *calendar_uid; - - gchar *from_address; - gchar *from_name; - gchar *to_address; - gchar *to_name; - gchar *delegator_address; - gchar *delegator_name; - gchar *my_address; - gint view_only; - - guint progress_info_id; - - gboolean delete_message; - /* a reply can only be sent if and only if there is an organizer */ - gboolean has_organizer; - /* - * Usually replies are sent unless the user unchecks that option. - * There are some cases when the default is not to sent a reply - * (but the user can still chose to do so by checking the option): - * - the organizer explicitly set RSVP=FALSE for the current user - * - the event has no ATTENDEEs: that's the case for most non-meeting - * events - * - * The last case is meant for forwarded non-meeting - * events. Traditionally Evolution hasn't offered to send a - * reply, therefore the updated implementation mimics that - * behavior. - * - * Unfortunately some software apparently strips all ATTENDEEs - * when forwarding a meeting; in that case sending a reply is - * also unchecked by default. So the check for ATTENDEEs is a - * tradeoff between sending unwanted replies in cases where - * that wasn't done in the past and not sending a possibly - * wanted reply where that wasn't possible in the past - * (because replies to forwarded events were not - * supported). Overall that should be an improvement, and the - * user can always override the default. - */ - gboolean no_reply_wanted; - - guint update_item_progress_info_id; - guint update_item_error_info_id; - ItipViewResponse update_item_response; - gboolean can_delete_invitation_from_cache; - GHashTable *real_comps; /* ESource's UID -> ECalComponent stored on the server */ -}; - -void format_itip (EPlugin *ep, EMFormatHookTarget *target); -GtkWidget *itip_formatter_page_factory (EPlugin *ep, EConfigHookItemFactoryData *hook_data); -gint e_plugin_lib_enable (EPlugin *ep, gint enable); - -typedef struct { - ItipPURI *puri; - ItipView *view; - GCancellable *cancellable; - gboolean keep_alarm_check; - GHashTable *conflicts; - - gchar *uid; - gchar *rid; - - gchar *sexp; - - gint count; -} FormatItipFindData; - -static gboolean check_is_instance (icalcomponent *icalcomp); - -gint -e_plugin_lib_enable (EPlugin *ep, - gint enable) -{ - return 0; -} - -static icalproperty * -find_attendee (icalcomponent *ical_comp, - const gchar *address) -{ - icalproperty *prop; - - if (address == NULL) - return NULL; - - for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); - prop != NULL; - prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { - gchar *attendee; - gchar *text; - - attendee = icalproperty_get_value_as_string_r (prop); - - if (!attendee) - continue; - - text = g_strdup (itip_strip_mailto (attendee)); - text = g_strstrip (text); - if (text && !g_ascii_strcasecmp (address, text)) { - g_free (text); - g_free (attendee); - break; - } - g_free (text); - g_free (attendee); - } - - return prop; -} - -static icalproperty * -find_attendee_if_sentby (icalcomponent *ical_comp, - const gchar *address) -{ - icalproperty *prop; - - if (address == NULL) - return NULL; - - for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); - prop != NULL; - prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { - icalparameter *param; - const gchar *attendee_sentby; - gchar *text; - - param = icalproperty_get_first_parameter (prop, ICAL_SENTBY_PARAMETER); - if (!param) - continue; - - attendee_sentby = icalparameter_get_sentby (param); - - if (!attendee_sentby) - continue; - - text = g_strdup (itip_strip_mailto (attendee_sentby)); - text = g_strstrip (text); - if (text && !g_ascii_strcasecmp (address, text)) { - g_free (text); - break; - } - g_free (text); - } - - return prop; -} - -static void -find_to_address (ItipPURI *pitip, - icalcomponent *ical_comp, - icalparameter_partstat *status) -{ - ESourceRegistry *registry; - ESourceMailIdentity *extension; - GList *list, *link; - const gchar *extension_name; - - registry = pitip->registry; - extension_name = E_SOURCE_EXTENSION_MAIL_IDENTITY; - - if (pitip->to_address != NULL) - return; - - if (pitip->msg != NULL && pitip->folder != NULL) { - ESource *source; - - source = em_utils_guess_mail_identity ( - registry, pitip->msg, pitip->folder); - - if (source != NULL) { - extension = e_source_get_extension (source, extension_name); - - pitip->to_address = e_source_mail_identity_dup_address (extension); - - g_object_unref (source); - } - } - - if (pitip->to_address != NULL) - return; - - /* Look through the list of attendees to find the user's address */ - - list = e_source_registry_list_sources (registry, extension_name); - - for (link = list; link != NULL; link = g_list_next (link)) { - ESource *source = E_SOURCE (link->data); - icalproperty *prop = NULL; - icalparameter *param; - const gchar *address; - gchar *text; - - if (!e_source_get_enabled (source)) - continue; - - extension = e_source_get_extension (source, extension_name); - address = e_source_mail_identity_get_address (extension); - - prop = find_attendee (ical_comp, address); - if (prop == NULL) - continue; - - param = icalproperty_get_first_parameter (prop, ICAL_CN_PARAMETER); - if (param != NULL) - pitip->to_name = g_strdup (icalparameter_get_cn (param)); - - text = icalproperty_get_value_as_string_r (prop); - - pitip->to_address = g_strdup (itip_strip_mailto (text)); - g_free (text); - g_strstrip (pitip->to_address); - - pitip->my_address = g_strdup (address); - - param = icalproperty_get_first_parameter (prop, ICAL_RSVP_PARAMETER); - if (param != NULL && - icalparameter_get_rsvp (param) == ICAL_RSVP_FALSE) - pitip->no_reply_wanted = TRUE; - - if (status) { - param = icalproperty_get_first_parameter (prop, ICAL_PARTSTAT_PARAMETER); - *status = param ? icalparameter_get_partstat (param) : ICAL_PARTSTAT_NEEDSACTION; - } - - break; - } - - g_list_free_full (list, (GDestroyNotify) g_object_unref); - - if (pitip->to_address != NULL) - return; - - /* If the user's address was not found in the attendee's list, - * then the user might be responding on behalf of his/her delegator. - * In this case, we would want to go through the SENT-BY fields of - * the attendees to find the user's address. - * - * Note: This functionality could have been (easily) implemented - * in the previous loop, but it would hurt the performance for all - * providers in general. Hence, we choose to iterate through the - * accounts list again. - */ - - list = e_source_registry_list_sources (registry, extension_name); - - for (link = list; link != NULL; link = g_list_next (link)) { - ESource *source = E_SOURCE (link->data); - icalproperty *prop = NULL; - icalparameter *param; - const gchar *address; - gchar *text; - - - if (!e_source_get_enabled (source)) - continue; - - extension = e_source_get_extension (source, extension_name); - address = e_source_mail_identity_get_address (extension); - - prop = find_attendee_if_sentby (ical_comp, address); - if (prop == NULL) - continue; - - param = icalproperty_get_first_parameter (prop, ICAL_CN_PARAMETER); - if (param != NULL) - pitip->to_name = g_strdup (icalparameter_get_cn (param)); - - text = icalproperty_get_value_as_string_r (prop); - - pitip->to_address = g_strdup (itip_strip_mailto (text)); - g_free (text); - g_strstrip (pitip->to_address); - - pitip->my_address = g_strdup (address); - - param = icalproperty_get_first_parameter (prop, ICAL_RSVP_PARAMETER); - if (param != NULL && - ICAL_RSVP_FALSE == icalparameter_get_rsvp (param)) - pitip->no_reply_wanted = TRUE; - - if (status) { - param = icalproperty_get_first_parameter (prop, ICAL_PARTSTAT_PARAMETER); - *status = param ? icalparameter_get_partstat (param) : ICAL_PARTSTAT_NEEDSACTION; - } - - break; - } - - g_list_free_full (list, (GDestroyNotify) g_object_unref); -} - -static void -find_from_address (ItipPURI *pitip, - icalcomponent *ical_comp) -{ - GList *list, *link; - icalproperty *prop; - gchar *organizer; - icalparameter *param; - const gchar *extension_name; - const gchar *organizer_sentby; - gchar *organizer_clean = NULL; - gchar *organizer_sentby_clean = NULL; - - prop = icalcomponent_get_first_property (ical_comp, ICAL_ORGANIZER_PROPERTY); - - if (!prop) - return; - - organizer = icalproperty_get_value_as_string_r (prop); - if (organizer) { - organizer_clean = g_strdup (itip_strip_mailto (organizer)); - organizer_clean = g_strstrip (organizer_clean); - g_free (organizer); - } - - param = icalproperty_get_first_parameter (prop, ICAL_SENTBY_PARAMETER); - if (param) { - organizer_sentby = icalparameter_get_sentby (param); - if (organizer_sentby) { - organizer_sentby_clean = g_strdup (itip_strip_mailto (organizer_sentby)); - organizer_sentby_clean = g_strstrip (organizer_sentby_clean); - } - } - - if (!(organizer_sentby_clean || organizer_clean)) - return; - - pitip->from_address = g_strdup (organizer_clean); - - param = icalproperty_get_first_parameter (prop, ICAL_CN_PARAMETER); - if (param) - pitip->from_name = g_strdup (icalparameter_get_cn (param)); - - extension_name = E_SOURCE_EXTENSION_MAIL_IDENTITY; - list = e_source_registry_list_sources (pitip->registry, extension_name); - - for (link = list; link != NULL; link = g_list_next (link)) { - ESource *source = E_SOURCE (link->data); - ESourceMailIdentity *extension; - const gchar *address; - - if (!e_source_get_enabled (source)) - continue; - - extension = e_source_get_extension (source, extension_name); - address = e_source_mail_identity_get_address (extension); - - if (address == NULL) - continue; - - if ((organizer_clean && !g_ascii_strcasecmp (organizer_clean, address)) - || (organizer_sentby_clean && !g_ascii_strcasecmp (organizer_sentby_clean, address))) { - pitip->my_address = g_strdup (address); - - break; - } - } - - g_list_free_full (list, (GDestroyNotify) g_object_unref); - - g_free (organizer_sentby_clean); - g_free (organizer_clean); -} - -static ECalComponent * -get_real_item (ItipPURI *pitip) -{ - ECalComponent *comp = NULL; - ESource *source; - - source = e_client_get_source (E_CLIENT (pitip->current_client)); - if (source) - comp = g_hash_table_lookup (pitip->real_comps, e_source_get_uid (source)); - - if (!comp) { - return NULL; - } - - return e_cal_component_clone (comp); -} - -static void -adjust_item (ItipPURI *pitip, - ECalComponent *comp) -{ - ECalComponent *real_comp; - - real_comp = get_real_item (pitip); - if (real_comp != NULL) { - ECalComponentText text; - const gchar *string; - GSList *l; - - e_cal_component_get_summary (real_comp, &text); - e_cal_component_set_summary (comp, &text); - e_cal_component_get_location (real_comp, &string); - e_cal_component_set_location (comp, string); - e_cal_component_get_description_list (real_comp, &l); - e_cal_component_set_description_list (comp, l); - e_cal_component_free_text_list (l); - - g_object_unref (real_comp); - } else { - ECalComponentText text = {_("Unknown"), NULL}; - - e_cal_component_set_summary (comp, &text); - } -} - -static void -set_buttons_sensitive (ItipPURI *pitip, - ItipView *view) -{ - gboolean read_only = TRUE; - - if (pitip->current_client) - read_only = e_client_is_readonly (E_CLIENT (pitip->current_client)); - - itip_view_set_buttons_sensitive (view, pitip->current_client != NULL && !read_only); -} - -static void -add_failed_to_load_msg (ItipView *view, - ESource *source, - const GError *error) -{ - gchar *msg; - - g_return_if_fail (view != NULL); - g_return_if_fail (source != NULL); - g_return_if_fail (error != NULL); - - /* Translators: The first '%s' is replaced with a calendar name, - * the second '%s' with an error message */ - msg = g_strdup_printf (_("Failed to load the calendar '%s' (%s)"), e_source_get_display_name (source), error->message); - - itip_view_add_lower_info_item (view, ITIP_VIEW_INFO_ITEM_TYPE_WARNING, msg); - - g_free (msg); -} - -static void -cal_opened_cb (GObject *source_object, - GAsyncResult *result, - gpointer user_data) -{ - ESource *source = E_SOURCE (source_object); - ItipView *view = user_data; - ItipPURI *pitip = itip_view_get_puri (view); - ECalClientSourceType source_type; - EClient *client = NULL; - ECalClient *cal_client; - const gchar *uid; - GError *error = NULL; - - e_client_utils_open_new_finish (source, result, &client, &error); - - /* Ignore cancellations. */ - if (g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED) || - g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED)) { - g_warn_if_fail (client == NULL); - g_error_free (error); - return; - - } else if (error != NULL) { - g_warn_if_fail (client == NULL); - add_failed_to_load_msg (view, source, error); - g_error_free (error); - return; - } - - g_return_if_fail (E_IS_CAL_CLIENT (client)); - - cal_client = E_CAL_CLIENT (client); - g_return_if_fail (cal_client != NULL); - - uid = e_source_get_uid (source); - source_type = e_cal_client_get_source_type (cal_client); - g_hash_table_insert ( - pitip->clients[source_type], g_strdup (uid), cal_client); - - if (e_cal_client_check_recurrences_no_master (cal_client)) { - icalcomponent *icalcomp; - gboolean show_recur_check; - - icalcomp = e_cal_component_get_icalcomponent (pitip->comp); - - show_recur_check = check_is_instance (icalcomp); - itip_view_set_show_recur_check (view, show_recur_check); - } - - if (pitip->type == E_CAL_CLIENT_SOURCE_TYPE_MEMOS) { - gboolean needs_decline; - - needs_decline = e_client_check_capability ( - E_CLIENT (client), - CAL_STATIC_CAPABILITY_HAS_UNACCEPTED_MEETING); - itip_view_set_needs_decline (view, needs_decline); - itip_view_set_mode (view, ITIP_VIEW_MODE_PUBLISH); - } - - pitip->current_client = cal_client; - - set_buttons_sensitive (pitip, view); -} - -static void -start_calendar_server (ItipPURI *pitip, - ItipView *view, - ESource *source, - ECalClientSourceType type, - GAsyncReadyCallback func, - gpointer data) -{ - ECalClient *client; - - g_return_if_fail (source != NULL); - - client = g_hash_table_lookup (pitip->clients[type], e_source_get_uid (source)); - if (client) { - pitip->current_client = client; - - itip_view_remove_lower_info_item (view, pitip->progress_info_id); - pitip->progress_info_id = 0; - - set_buttons_sensitive (pitip, view); - - return; - } - - e_client_utils_open_new (source, - type == E_CAL_CLIENT_SOURCE_TYPE_EVENTS ? E_CLIENT_SOURCE_TYPE_EVENTS : - type == E_CAL_CLIENT_SOURCE_TYPE_MEMOS ? E_CLIENT_SOURCE_TYPE_MEMOS : - type == E_CAL_CLIENT_SOURCE_TYPE_TASKS ? E_CLIENT_SOURCE_TYPE_TASKS : E_CLIENT_SOURCE_TYPE_LAST, - TRUE, pitip->cancellable, - func, data); -} - -static void -start_calendar_server_by_uid (ItipPURI *pitip, - ItipView *view, - const gchar *uid, - ECalClientSourceType type) -{ - ESource *source; - - itip_view_set_buttons_sensitive (view, FALSE); - - source = e_source_registry_ref_source (pitip->registry, uid); - if (source != NULL) { - start_calendar_server ( - pitip, view, source, type, cal_opened_cb, view); - g_object_unref (source); - } -} - -static void -source_selected_cb (ItipView *view, - ESource *source, - gpointer data) -{ - ItipPURI *pitip = data; - - itip_view_set_buttons_sensitive (view, FALSE); - - g_return_if_fail (source != NULL); - - start_calendar_server (pitip, view, source, pitip->type, cal_opened_cb, view); -} - -static void -find_cal_update_ui (FormatItipFindData *fd, - ECalClient *cal_client) -{ - ItipPURI *pitip; - ItipView *view; - ESource *source; - - g_return_if_fail (fd != NULL); - - pitip = fd->puri; - view = fd->view; - - /* UI part gone */ - if (g_cancellable_is_cancelled (fd->cancellable)) - return; - - source = cal_client ? e_client_get_source (E_CLIENT (cal_client)) : NULL; - - if (cal_client && g_hash_table_lookup (fd->conflicts, cal_client)) { - itip_view_add_upper_info_item_printf (view, ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("An appointment in the calendar '%s' conflicts with this meeting"), e_source_get_display_name (source)); - } - - /* search for a master object if the detached object doesn't exist in the calendar */ - if (pitip->current_client && pitip->current_client == cal_client) { - itip_view_set_show_keep_alarm_check (view, fd->keep_alarm_check); - - pitip->current_client = cal_client; - - /* Provide extra info, since its not in the component */ - /* FIXME Check sequence number of meeting? */ - /* FIXME Do we need to adjust elsewhere for the delegated calendar item? */ - /* FIXME Need to update the fields in the view now */ - if (pitip->method == ICAL_METHOD_REPLY || pitip->method == ICAL_METHOD_REFRESH) - adjust_item (pitip, pitip->comp); - - /* We clear everything because we don't really care - * about any other info/warnings now we found an - * existing versions */ - itip_view_clear_lower_info_items (view); - pitip->progress_info_id = 0; - - /* FIXME Check read only state of calendar? */ - itip_view_add_lower_info_item_printf (view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Found the appointment in the calendar '%s'"), e_source_get_display_name (source)); - - set_buttons_sensitive (pitip, view); - } else if (!pitip->current_client) - itip_view_set_show_keep_alarm_check (view, FALSE); - - if (pitip->current_client && pitip->current_client == cal_client) { - if (e_cal_client_check_recurrences_no_master (pitip->current_client)) { - icalcomponent *icalcomp = e_cal_component_get_icalcomponent (pitip->comp); - - if (check_is_instance (icalcomp)) - itip_view_set_show_recur_check (view, TRUE); - else - itip_view_set_show_recur_check (view, FALSE); - } - - if (pitip->type == E_CAL_CLIENT_SOURCE_TYPE_MEMOS) { - /* TODO The static capability should be made generic to convey that the calendar contains unaccepted items */ - if (e_client_check_capability (E_CLIENT (pitip->current_client), CAL_STATIC_CAPABILITY_HAS_UNACCEPTED_MEETING)) - itip_view_set_needs_decline (view, TRUE); - else - itip_view_set_needs_decline (view, FALSE); - - itip_view_set_mode (view, ITIP_VIEW_MODE_PUBLISH); - } - } -} - -static void -decrease_find_data (FormatItipFindData *fd) -{ - g_return_if_fail (fd != NULL); - - fd->count--; - d(printf ("Decreasing itip formatter search count to %d\n", fd->count)); - - if (fd->count == 0 && !g_cancellable_is_cancelled (fd->cancellable)) { - gboolean rsvp_enabled = FALSE; - ItipPURI *pitip = fd->puri; - ItipView *view = fd->view; - - itip_view_remove_lower_info_item (view, pitip->progress_info_id); - pitip->progress_info_id = 0; - - /* - * Only allow replies if backend doesn't do that automatically. - * * Only enable it for forwarded invitiations (PUBLISH) or direct - * * invitiations (REQUEST), but not replies (REPLY). - * Replies only make sense for events with an organizer. - */ - if ((!pitip->current_client || !e_cal_client_check_save_schedules (pitip->current_client)) && - (pitip->method == ICAL_METHOD_PUBLISH || pitip->method == ICAL_METHOD_REQUEST) && - pitip->has_organizer) { - rsvp_enabled = TRUE; - } - itip_view_set_show_rsvp_check (view, rsvp_enabled); - - /* default is chosen in extract_itip_data() based on content of the VEVENT */ - itip_view_set_rsvp (view, !pitip->no_reply_wanted); - - if ((pitip->method == ICAL_METHOD_PUBLISH || pitip->method == ICAL_METHOD_REQUEST) - && !pitip->current_client) { - /* Reuse already declared one or rename? */ - ESource *source = NULL; - const gchar *extension_name; - - switch (pitip->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - extension_name = E_SOURCE_EXTENSION_CALENDAR; - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - extension_name = E_SOURCE_EXTENSION_TASK_LIST; - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - extension_name = E_SOURCE_EXTENSION_MEMO_LIST; - break; - default: - g_return_if_reached (); - } - - source = e_source_registry_ref_default_for_extension_name ( - pitip->registry, extension_name); - - itip_view_set_extension_name (view, extension_name); - - g_signal_connect ( - view, "source_selected", - G_CALLBACK (source_selected_cb), pitip); - - if (source != NULL) { - itip_view_set_source (view, source); - g_object_unref (source); - - /* FIXME Shouldn't the buttons be sensitized here? */ - } else { - itip_view_add_lower_info_item (view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, _("Unable to find any calendars")); - itip_view_set_buttons_sensitive (view, FALSE); - } - } else if (!pitip->current_client) { - switch (pitip->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("Unable to find this meeting in any calendar")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("Unable to find this task in any task list")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("Unable to find this memo in any memo list")); - break; - default: - g_assert_not_reached (); - break; - } - } - } - - if (fd->count == 0) { - g_hash_table_destroy (fd->conflicts); - g_object_unref (fd->cancellable); - g_free (fd->uid); - g_free (fd->rid); - if (fd->sexp) - g_free (fd->sexp); - g_free (fd); - } -} - -static void -get_object_without_rid_ready_cb (GObject *source_object, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *cal_client = E_CAL_CLIENT (source_object); - FormatItipFindData *fd = user_data; - icalcomponent *icalcomp = NULL; - GError *error = NULL; - - if (!e_cal_client_get_object_finish (cal_client, result, &icalcomp, &error)) - icalcomp = NULL; - - if (g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED) || - g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) || - g_cancellable_is_cancelled (fd->cancellable)) { - g_clear_error (&error); - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); - return; - } - - g_clear_error (&error); - - if (icalcomp) { - ECalComponent *comp; - - fd->puri->current_client = cal_client; - fd->keep_alarm_check = (fd->puri->method == ICAL_METHOD_PUBLISH || fd->puri->method == ICAL_METHOD_REQUEST) && - (icalcomponent_get_first_component (icalcomp, ICAL_VALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XAUDIOALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XDISPLAYALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XPROCEDUREALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XEMAILALARM_COMPONENT)); - - comp = e_cal_component_new_from_icalcomponent (icalcomp); - if (comp) { - ESource *source = e_client_get_source (E_CLIENT (cal_client)); - - g_hash_table_insert (fd->puri->real_comps, g_strdup (e_source_get_uid (source)), comp); - } - - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); - return; - } - - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); -} - -static void -get_object_with_rid_ready_cb (GObject *source_object, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *cal_client = E_CAL_CLIENT (source_object); - FormatItipFindData *fd = user_data; - icalcomponent *icalcomp = NULL; - GError *error = NULL; - - if (!e_cal_client_get_object_finish (cal_client, result, &icalcomp, &error)) - icalcomp = NULL; - - if (g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED) || - g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) || - g_cancellable_is_cancelled (fd->cancellable)) { - g_clear_error (&error); - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); - return; - } - - g_clear_error (&error); - - if (icalcomp) { - ECalComponent *comp; - - fd->puri->current_client = cal_client; - fd->keep_alarm_check = (fd->puri->method == ICAL_METHOD_PUBLISH || fd->puri->method == ICAL_METHOD_REQUEST) && - (icalcomponent_get_first_component (icalcomp, ICAL_VALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XAUDIOALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XDISPLAYALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XPROCEDUREALARM_COMPONENT) || - icalcomponent_get_first_component (icalcomp, ICAL_XEMAILALARM_COMPONENT)); - - comp = e_cal_component_new_from_icalcomponent (icalcomp); - if (comp) { - ESource *source = e_client_get_source (E_CLIENT (cal_client)); - - g_hash_table_insert (fd->puri->real_comps, g_strdup (e_source_get_uid (source)), comp); - } - - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); - return; - } - - if (fd->rid && *fd->rid) { - e_cal_client_get_object (cal_client, fd->uid, NULL, fd->cancellable, get_object_without_rid_ready_cb, fd); - return; - } - - find_cal_update_ui (fd, cal_client); - decrease_find_data (fd); -} - -static void -get_object_list_ready_cb (GObject *source_object, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *cal_client = E_CAL_CLIENT (source_object); - FormatItipFindData *fd = user_data; - GSList *objects = NULL; - GError *error = NULL; - - if (!e_cal_client_get_object_list_finish (cal_client, result, &objects, &error)) - objects = NULL; - - if (g_cancellable_is_cancelled (fd->cancellable)) { - g_clear_error (&error); - decrease_find_data (fd); - return; - } - - if (error) { - if (g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED) || - g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED)) { - g_error_free (error); - decrease_find_data (fd); - return; - } - - g_error_free (error); - } else { - g_hash_table_insert (fd->conflicts, cal_client, GINT_TO_POINTER (g_slist_length (objects))); - e_cal_client_free_icalcomp_slist (objects); - } - - e_cal_client_get_object (cal_client, fd->uid, fd->rid, fd->cancellable, get_object_with_rid_ready_cb, fd); -} - -static void -find_cal_opened_cb (GObject *source_object, - GAsyncResult *result, - gpointer user_data) -{ - ESource *source = E_SOURCE (source_object); - FormatItipFindData *fd = user_data; - ItipPURI *pitip = fd->puri; - ItipView *view = fd->view; - ECalClientSourceType source_type; - EClient *client = NULL; - ECalClient *cal_client; - gboolean search_for_conflicts = FALSE; - const gchar *extension_name; - const gchar *uid; - GError *error = NULL; - - e_client_utils_open_new_finish (source, result, &client, &error); - - /* Ignore cancellations. */ - if (g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED) || - g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED)) { - g_warn_if_fail (client == NULL); - decrease_find_data (fd); - g_error_free (error); - return; - } - - if (g_cancellable_is_cancelled (fd->cancellable)) { - g_clear_error (&error); - decrease_find_data (fd); - return; - } - - if (error) { - /* FIXME Do we really want to warn here? If we fail - * to find the item, this won't be cleared but the - * selector might be shown */ - g_warn_if_fail (client == NULL); - add_failed_to_load_msg (view, source, error); - decrease_find_data (fd); - g_error_free (error); - return; - } - - g_return_if_fail (E_IS_CAL_CLIENT (client)); - - /* Do not process read-only calendars */ - if (e_client_is_readonly (client)) { - g_object_unref (client); - decrease_find_data (fd); - return; - } - - cal_client = E_CAL_CLIENT (client); - source_type = e_cal_client_get_source_type (cal_client); - - uid = e_source_get_uid (source); - g_hash_table_insert ( - pitip->clients[source_type], g_strdup (uid), cal_client); - - extension_name = E_SOURCE_EXTENSION_CONFLICT_SEARCH; - if (e_source_has_extension (source, extension_name)) { - ESourceConflictSearch *extension; - - extension = e_source_get_extension (source, extension_name); - search_for_conflicts = - (pitip->type == E_CAL_CLIENT_SOURCE_TYPE_EVENTS) && - e_source_conflict_search_get_include_me (extension); - } - - /* Check for conflicts */ - /* If the query fails, we'll just ignore it */ - /* FIXME What happens for recurring conflicts? */ - if (search_for_conflicts) { - e_cal_client_get_object_list ( - cal_client, fd->sexp, - fd->cancellable, - get_object_list_ready_cb, fd); - return; - } - - if (!pitip->current_client) { - e_cal_client_get_object ( - cal_client, fd->uid, fd->rid, - fd->cancellable, - get_object_with_rid_ready_cb, fd); - return; - } - - decrease_find_data (fd); -} - -static void -find_server (ItipPURI *pitip, - ItipView *view, - ECalComponent *comp) -{ - FormatItipFindData *fd = NULL; - const gchar *uid; - gchar *rid = NULL; - CamelStore *parent_store; - ESourceRegistry *registry; - ESource *current_source = NULL; - GList *list, *link; - GList *conflict_list = NULL; - const gchar *extension_name; - const gchar *store_uid; - - g_return_if_fail (pitip->folder != NULL); - - switch (pitip->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - extension_name = E_SOURCE_EXTENSION_CALENDAR; - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - extension_name = E_SOURCE_EXTENSION_TASK_LIST; - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - extension_name = E_SOURCE_EXTENSION_MEMO_LIST; - break; - default: - g_return_if_reached (); - } - - registry = pitip->registry; - list = e_source_registry_list_sources (registry, extension_name); - - e_cal_component_get_uid (comp, &uid); - rid = e_cal_component_get_recurid_as_string (comp); - - /* XXX Not sure what this was trying to do, - * but it propbably doesn't work anymore. - * Some comments would have been helpful. */ - parent_store = camel_folder_get_parent_store (pitip->folder); - store_uid = camel_service_get_uid (CAMEL_SERVICE (parent_store)); - - itip_view_set_buttons_sensitive (view, FALSE); - - for (link = list; link != NULL; link = g_list_next (link)) { - ESource *source = E_SOURCE (link->data); - gboolean search_for_conflicts = FALSE; - const gchar *source_uid; - - extension_name = E_SOURCE_EXTENSION_CONFLICT_SEARCH; - if (e_source_has_extension (source, extension_name)) { - ESourceConflictSearch *extension; - - extension = - e_source_get_extension (source, extension_name); - search_for_conflicts = - e_source_conflict_search_get_include_me (extension); - } - - if (search_for_conflicts) - conflict_list = g_list_prepend ( - conflict_list, g_object_ref (source)); - - if (current_source != NULL) - continue; - - source_uid = e_source_get_uid (source); - if (g_strcmp0 (source_uid, store_uid) == 0) { - current_source = source; - conflict_list = g_list_prepend ( - conflict_list, g_object_ref (source)); - - continue; - } - } - - if (current_source) { - link = conflict_list; - - pitip->progress_info_id = itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_PROGRESS, - _("Opening the calendar. Please wait...")); - } else { - link = list; - pitip->progress_info_id = itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_PROGRESS, - _("Searching for an existing version of this appointment")); - } - - for (; link != NULL; link = g_list_next (link)) { - ESource *source = E_SOURCE (link->data); - - if (!fd) { - gchar *start = NULL, *end = NULL; - - fd = g_new0 (FormatItipFindData, 1); - fd->puri = pitip; - fd->view = view; - fd->cancellable = g_object_ref (pitip->cancellable); - fd->conflicts = g_hash_table_new (g_direct_hash, g_direct_equal); - fd->uid = g_strdup (uid); - fd->rid = rid; - /* avoid free this at the end */ - rid = NULL; - - if (pitip->start_time && pitip->end_time) { - start = isodate_from_time_t (pitip->start_time); - end = isodate_from_time_t (pitip->end_time); - - fd->sexp = g_strdup_printf ("(and (occur-in-time-range? (make-time \"%s\") (make-time \"%s\")) (not (uid? \"%s\")))", - start, end, icalcomponent_get_uid (pitip->ical_comp)); - } - - g_free (start); - g_free (end); - } - fd->count++; - d(printf ("Increasing itip formatter search count to %d\n", fd->count)); - - if (current_source == source) - start_calendar_server ( - pitip, view, source, pitip->type, - find_cal_opened_cb, fd); - else - start_calendar_server ( - pitip, view, source, pitip->type, - find_cal_opened_cb, fd); - } - - g_list_free_full (conflict_list, (GDestroyNotify) g_object_unref); - g_list_free_full (list, (GDestroyNotify) g_object_unref); - - g_free (rid); -} - -static gboolean -change_status (ESourceRegistry *registry, - icalcomponent *ical_comp, - const gchar *address, - icalparameter_partstat status) -{ - icalproperty *prop; - - prop = find_attendee (ical_comp, address); - if (prop) { - icalparameter *param; - - icalproperty_remove_parameter (prop, ICAL_PARTSTAT_PARAMETER); - param = icalparameter_new_partstat (status); - icalproperty_add_parameter (prop, param); - } else { - icalparameter *param; - - if (address != NULL) { - prop = icalproperty_new_attendee (address); - icalcomponent_add_property (ical_comp, prop); - - param = icalparameter_new_role (ICAL_ROLE_OPTPARTICIPANT); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_partstat (status); - icalproperty_add_parameter (prop, param); - } else { - gchar *default_name = NULL; - gchar *default_address = NULL; - - itip_get_default_name_and_address ( - registry, &default_name, &default_address); - - prop = icalproperty_new_attendee (default_address); - icalcomponent_add_property (ical_comp, prop); - - param = icalparameter_new_cn (default_name); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_role (ICAL_ROLE_REQPARTICIPANT); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_partstat (status); - icalproperty_add_parameter (prop, param); - - g_free (default_name); - g_free (default_address); - } - } - - return TRUE; -} - -static void -message_foreach_part (CamelMimePart *part, - GSList **part_list) -{ - CamelDataWrapper *containee; - gint parts, i; - gint go = TRUE; - - if (!part) - return; - - *part_list = g_slist_append (*part_list, part); - - containee = camel_medium_get_content (CAMEL_MEDIUM (part)); - - if (containee == NULL) - return; - - /* using the object types is more accurate than using the mime/types */ - if (CAMEL_IS_MULTIPART (containee)) { - parts = camel_multipart_get_number (CAMEL_MULTIPART (containee)); - for (i = 0; go && i < parts; i++) { - /* Reuse already declared *parts? */ - CamelMimePart *part = camel_multipart_get_part (CAMEL_MULTIPART (containee), i); - - message_foreach_part (part, part_list); - } - } else if (CAMEL_IS_MIME_MESSAGE (containee)) { - message_foreach_part ((CamelMimePart *) containee, part_list); - } -} - -static void -attachment_load_finished (EAttachment *attachment, - GAsyncResult *result, - gpointer user_data) -{ - struct { - GFile *file; - gboolean done; - } *status = user_data; - - /* Should be no need to check for error here. */ - e_attachment_load_finish (attachment, result, NULL); - - status->done = TRUE; -} - -static void -attachment_save_finished (EAttachment *attachment, - GAsyncResult *result, - gpointer user_data) -{ - GError *error = NULL; - - struct { - GFile *file; - gboolean done; - } *status = user_data; - - status->file = e_attachment_save_finish (attachment, result, &error); - status->done = TRUE; - - /* XXX Error handling needs improvement. */ - if (error != NULL) { - g_warning ("%s", error->message); - g_error_free (error); - } -} - -static gchar * -get_uri_for_part (CamelMimePart *mime_part) -{ - EAttachment *attachment; - GFile *temp_directory; - gchar *template; - gchar *path; - - struct { - GFile *file; - gboolean done; - } status; - - /* XXX Error handling leaves much to be desired. */ - - template = g_strdup_printf (PACKAGE "-%s-XXXXXX", g_get_user_name ()); - path = e_mkdtemp (template); - g_free (template); - - if (path == NULL) - return NULL; - - temp_directory = g_file_new_for_path (path); - g_free (path); - - attachment = e_attachment_new (); - e_attachment_set_mime_part (attachment, mime_part); - - status.done = FALSE; - - e_attachment_load_async ( - attachment, (GAsyncReadyCallback) - attachment_load_finished, &status); - - /* Loading should be instantaneous since we already have - * the full content, but we still have to crank the main - * loop until the callback gets triggered. */ - while (!status.done) - gtk_main_iteration (); - - status.file = NULL; - status.done = FALSE; - - e_attachment_save_async ( - attachment, temp_directory, (GAsyncReadyCallback) - attachment_save_finished, &status); - - /* We can't return until we have results, so crank - * the main loop until the callback gets triggered. */ - while (!status.done) - gtk_main_iteration (); - - if (status.file != NULL) { - path = g_file_get_path (status.file); - g_object_unref (status.file); - } else - path = NULL; - - g_object_unref (attachment); - g_object_unref (temp_directory); - - return path; -} - -static void -update_item_progress_info (ItipPURI *pitip, - ItipView *view, - const gchar *message) -{ - if (pitip->update_item_progress_info_id) { - itip_view_remove_lower_info_item (view, pitip->update_item_progress_info_id); - pitip->update_item_progress_info_id = 0; - - if (!message) - itip_view_set_buttons_sensitive (view, TRUE); - } - - if (pitip->update_item_error_info_id) { - itip_view_remove_lower_info_item (view, pitip->update_item_error_info_id); - pitip->update_item_error_info_id = 0; - } - - if (message) { - itip_view_set_buttons_sensitive (view, FALSE); - pitip->update_item_progress_info_id = - itip_view_add_lower_info_item ( - view, - ITIP_VIEW_INFO_ITEM_TYPE_PROGRESS, - message); - } -} - -static void -finish_message_delete_with_rsvp (ItipPURI *pitip, - ItipView *view, - ECalClient *client) -{ - gboolean save_schedules = e_cal_client_check_save_schedules (client); - - if (!save_schedules && pitip->delete_message && pitip->folder) - camel_folder_delete_message (pitip->folder, pitip->uid); - - if (itip_view_get_rsvp (view)) { - ECalComponent *comp = NULL; - icalcomponent *ical_comp; - icalproperty *prop; - icalvalue *value; - const gchar *attendee; - gchar *comment; - GSList *l, *list = NULL; - gboolean found; - - comp = e_cal_component_clone (pitip->comp); - if (comp == NULL) - return; - - if (pitip->to_address == NULL) - find_to_address (pitip, pitip->ical_comp, NULL); - g_assert (pitip->to_address != NULL); - - ical_comp = e_cal_component_get_icalcomponent (comp); - - /* Remove all attendees except the one we are responding as */ - found = FALSE; - for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); - prop != NULL; - prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { - gchar *text; - - value = icalproperty_get_value (prop); - if (!value) - continue; - - attendee = icalvalue_get_string (value); - - text = g_strdup (itip_strip_mailto (attendee)); - text = g_strstrip (text); - - /* We do this to ensure there is at most one - * attendee in the response */ - if (found || g_ascii_strcasecmp (pitip->to_address, text)) - list = g_slist_prepend (list, prop); - else if (!g_ascii_strcasecmp (pitip->to_address, text)) - found = TRUE; - g_free (text); - } - - for (l = list; l; l = l->next) { - prop = l->data; - icalcomponent_remove_property (ical_comp, prop); - icalproperty_free (prop); - } - g_slist_free (list); - - /* Add a comment if there user set one */ - comment = itip_view_get_rsvp_comment (view); - if (comment) { - GSList comments; - ECalComponentText text; - - text.value = comment; - text.altrep = NULL; - - comments.data = &text; - comments.next = NULL; - - e_cal_component_set_comment_list (comp, &comments); - - g_free (comment); - } - - e_cal_component_rescan (comp); - if (itip_send_comp ( - pitip->registry, - E_CAL_COMPONENT_METHOD_REPLY, - comp, pitip->current_client, - pitip->top_level, NULL, NULL, TRUE, FALSE) && - pitip->folder != NULL) { - camel_folder_set_message_flags ( - pitip->folder, pitip->uid, - CAMEL_MESSAGE_ANSWERED, - CAMEL_MESSAGE_ANSWERED); - } - - g_object_unref (comp); - } - - update_item_progress_info (pitip, view, NULL); -} - -static void -receive_objects_ready_cb (GObject *ecalclient, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *client = E_CAL_CLIENT (ecalclient); - ESource *source = e_client_get_source (E_CLIENT (client)); - ItipView *view = user_data; - ItipPURI *pitip = itip_view_get_puri (view); - gboolean save_schedules; - GError *error = NULL; - - if (!e_cal_client_receive_objects_finish (client, result, &error)) { - if (!g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) && - !g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED)) { - update_item_progress_info (pitip, view, NULL); - pitip->update_item_error_info_id = - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Unable to send item to calendar '%s'. %s"), - e_source_get_display_name (source), error ? error->message : _("Unknown error")); - } - g_clear_error (&error); - return; - } - - itip_view_set_extension_name (view, NULL); - - itip_view_clear_lower_info_items (view); - - switch (pitip->update_item_response) { - case ITIP_VIEW_RESPONSE_ACCEPT: - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Sent to calendar '%s' as accepted"), e_source_get_display_name (source)); - break; - case ITIP_VIEW_RESPONSE_TENTATIVE: - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Sent to calendar '%s' as tentative"), e_source_get_display_name (source)); - break; - case ITIP_VIEW_RESPONSE_DECLINE: - /* FIXME some calendars just might not save it at all, is this accurate? */ - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Sent to calendar '%s' as declined"), e_source_get_display_name (source)); - break; - case ITIP_VIEW_RESPONSE_CANCEL: - /* FIXME some calendars just might not save it at all, is this accurate? */ - itip_view_add_lower_info_item_printf ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Sent to calendar '%s' as canceled"), e_source_get_display_name (source)); - break; - default: - g_assert_not_reached (); - break; - } - - /*FIXME Save schedules is misused here, remove it */ - save_schedules = e_cal_client_check_save_schedules (client); - - /* FIXME Remove this and handle this at the groupwise mail provider */ - if (save_schedules && pitip->can_delete_invitation_from_cache && pitip->folder) { - CamelFolderChangeInfo *changes = NULL; - const gchar *tag = NULL; - CamelMessageInfo *mi; - mi = camel_folder_summary_get (pitip->folder->summary, pitip->uid); - if (mi) { - changes = camel_folder_change_info_new (); - - if (itip_view_get_recur_check_state (view)) { - /* Recurring appointment and "apply-to-all" is selected */ - tag = camel_message_info_user_tag (mi, "recurrence-key"); - if (tag) { - gint i; - GPtrArray *known_uids; - - known_uids = camel_folder_summary_get_array (pitip->folder->summary); - for (i = 0; known_uids && i < known_uids->len; i++) { - const gchar *uid = g_ptr_array_index (known_uids, i); - CamelMessageInfo *mi2; - - mi2 = camel_folder_summary_get (pitip->folder->summary, uid); - if (!mi2) - continue; - - if (camel_message_info_user_tag (mi2, "recurrence-key") && - g_str_equal (camel_message_info_user_tag (mi2, "recurrence-key"), tag)) { - camel_folder_summary_remove_uid (pitip->folder->summary, mi2->uid); - camel_folder_change_info_remove_uid (changes, mi2->uid); - } - - camel_message_info_free (mi2); - } - } - } else { - /* Either not a recurring appointment or "apply-to-all" is not selected. So just delete this instance alone */ - camel_folder_summary_remove_uid (pitip->folder->summary, pitip->uid); - camel_folder_change_info_remove_uid (changes, pitip->uid); - } - - camel_folder_changed (pitip->folder, changes); - camel_folder_change_info_free (changes); - camel_message_info_free (mi); - } - } - - finish_message_delete_with_rsvp (pitip, view, client); -} - -static void -update_item (ItipPURI *pitip, - ItipView *view, - ItipViewResponse response) -{ - struct icaltimetype stamp; - icalproperty *prop; - icalcomponent *clone; - ECalComponent *clone_comp; - gchar *str; - - update_item_progress_info (pitip, view, _("Saving changes to the calendar. Please wait...")); - - /* Set X-MICROSOFT-CDO-REPLYTIME to record the time at which - * the user accepted/declined the request. (Outlook ignores - * SEQUENCE in REPLY reponses and instead requires that each - * updated response have a later REPLYTIME than the previous - * one.) This also ends up getting saved in our own copy of - * the meeting, though there's currently no way to see that - * information (unless it's being saved to an Exchange folder - * and you then look at it in Outlook). - */ - stamp = icaltime_current_time_with_zone (icaltimezone_get_utc_timezone ()); - str = icaltime_as_ical_string_r (stamp); - prop = icalproperty_new_x (str); - g_free (str); - icalproperty_set_x_name (prop, "X-MICROSOFT-CDO-REPLYTIME"); - icalcomponent_add_property (pitip->ical_comp, prop); - - clone = icalcomponent_new_clone (pitip->ical_comp); - icalcomponent_add_component (pitip->top_level, clone); - icalcomponent_set_method (pitip->top_level, pitip->method); - - if (!itip_view_get_inherit_alarm_check_state (view)) { - icalcomponent *alarm_comp; - icalcompiter alarm_iter; - - alarm_iter = icalcomponent_begin_component (clone, ICAL_VALARM_COMPONENT); - while ((alarm_comp = icalcompiter_deref (&alarm_iter)) != NULL) { - icalcompiter_next (&alarm_iter); - - icalcomponent_remove_component (clone, alarm_comp); - icalcomponent_free (alarm_comp); - } - } - - clone_comp = e_cal_component_new (); - if (!e_cal_component_set_icalcomponent (clone_comp, clone)) { - update_item_progress_info (pitip, view, NULL); - pitip->update_item_error_info_id = itip_view_add_lower_info_item (view, - ITIP_VIEW_INFO_ITEM_TYPE_ERROR, _("Unable to parse item")); - goto cleanup; - } - - if (itip_view_get_keep_alarm_check_state (view)) { - ECalComponent *real_comp; - GList *alarms, *l; - ECalComponentAlarm *alarm; - - real_comp = get_real_item (pitip); - if (real_comp != NULL) { - alarms = e_cal_component_get_alarm_uids (real_comp); - - for (l = alarms; l; l = l->next) { - alarm = e_cal_component_get_alarm (real_comp, (const gchar *) l->data); - - if (alarm) { - ECalComponentAlarm *aclone = e_cal_component_alarm_clone (alarm); - - if (aclone) { - e_cal_component_add_alarm (clone_comp, aclone); - e_cal_component_alarm_free (aclone); - } - - e_cal_component_alarm_free (alarm); - } - } - - cal_obj_uid_list_free (alarms); - g_object_unref (real_comp); - } - } - - if ((response != ITIP_VIEW_RESPONSE_CANCEL) - && (response != ITIP_VIEW_RESPONSE_DECLINE)) { - GSList *attachments = NULL, *new_attachments = NULL, *l; - CamelMimeMessage *msg = pitip->msg; - - e_cal_component_get_attachment_list (clone_comp, &attachments); - - for (l = attachments; l; l = l->next) { - GSList *parts = NULL, *m; - gchar *uri, *new_uri; - CamelMimePart *part; - - uri = l->data; - - if (!g_ascii_strncasecmp (uri, "cid:...", 7)) { - message_foreach_part ((CamelMimePart *) msg, &parts); - - for (m = parts; m; m = m->next) { - part = m->data; - - /* Skip the actual message and the text/calendar part */ - /* FIXME Do we need to skip anything else? */ - if (part == (CamelMimePart *) msg || part == pitip->part) - continue; - - new_uri = get_uri_for_part (part); - if (new_uri != NULL) - new_attachments = g_slist_append (new_attachments, new_uri); - } - - g_slist_free (parts); - - } else if (!g_ascii_strncasecmp (uri, "cid:", 4)) { - part = camel_mime_message_get_part_by_content_id (msg, uri + 4); - if (part) { - new_uri = get_uri_for_part (part); - if (new_uri != NULL) - new_attachments = g_slist_append (new_attachments, new_uri); - } - - } else { - /* Preserve existing non-cid ones */ - new_attachments = g_slist_append (new_attachments, g_strdup (uri)); - } - } - - g_slist_foreach (attachments, (GFunc) g_free, NULL); - g_slist_free (attachments); - - e_cal_component_set_attachment_list (clone_comp, new_attachments); - } - - pitip->update_item_response = response; - - e_cal_client_receive_objects ( - pitip->current_client, - pitip->top_level, - pitip->cancellable, - receive_objects_ready_cb, - view); - - cleanup: - icalcomponent_remove_component (pitip->top_level, clone); - g_object_unref (clone_comp); -} - -/* TODO These operations should be available in e-cal-component.c */ -static void -set_attendee (ECalComponent *comp, - const gchar *address) -{ - icalproperty *prop; - icalcomponent *icalcomp; - gboolean found = FALSE; - - 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 gchar *attendee = icalproperty_get_attendee (prop); - - if (!(g_str_equal (itip_strip_mailto (attendee), address))) - icalcomponent_remove_property (icalcomp, prop); - else - found = TRUE; - } - - if (!found) { - icalparameter *param; - gchar *temp = g_strdup_printf ("MAILTO:%s", address); - - prop = icalproperty_new_attendee ((const gchar *) temp); - icalcomponent_add_property (icalcomp, prop); - - param = icalparameter_new_partstat (ICAL_PARTSTAT_NEEDSACTION); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_role (ICAL_ROLE_REQPARTICIPANT); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_cutype (ICAL_CUTYPE_INDIVIDUAL); - icalproperty_add_parameter (prop, param); - - param = icalparameter_new_rsvp (ICAL_RSVP_TRUE); - icalproperty_add_parameter (prop, param); - - g_free (temp); - } - -} - -static gboolean -send_comp_to_attendee (ESourceRegistry *registry, - ECalComponentItipMethod method, - ECalComponent *comp, - const gchar *user, - ECalClient *client, - const gchar *comment) -{ - gboolean status; - ECalComponent *send_comp = e_cal_component_clone (comp); - - set_attendee (send_comp, user); - - if (comment) { - GSList comments; - ECalComponentText text; - - text.value = comment; - text.altrep = NULL; - - comments.data = &text; - comments.next = NULL; - - e_cal_component_set_comment_list (send_comp, &comments); - } - - /* FIXME send the attachments in the request */ - status = itip_send_comp ( - registry, method, send_comp, - client, NULL, NULL, NULL, TRUE, FALSE); - - g_object_unref (send_comp); - - return status; -} - -static void -remove_delegate (ItipPURI *pitip, - ItipView *view, - const gchar *delegate, - const gchar *delegator, - ECalComponent *comp) -{ - gboolean status; - gchar *comment = g_strdup_printf (_("Organizer has removed the delegate %s "), itip_strip_mailto (delegate)); - - /* send cancellation notice to delegate */ - status = send_comp_to_attendee ( - pitip->registry, - E_CAL_COMPONENT_METHOD_CANCEL, pitip->comp, - delegate, pitip->current_client, comment); - if (status) - send_comp_to_attendee ( - pitip->registry, - E_CAL_COMPONENT_METHOD_REQUEST, pitip->comp, - delegator, pitip->current_client, comment); - if (status) { - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Sent a cancelation notice to the delegate")); - } else - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Could not send the cancelation notice to the delegate")); - - g_free (comment); - -} - -static void -update_x (ECalComponent *pitip_comp, - ECalComponent *comp) -{ - icalcomponent *itip_icalcomp = e_cal_component_get_icalcomponent (pitip_comp); - icalcomponent *icalcomp = e_cal_component_get_icalcomponent (comp); - - icalproperty *prop = icalcomponent_get_first_property (itip_icalcomp, ICAL_X_PROPERTY); - while (prop) { - const gchar *name = icalproperty_get_x_name (prop); - if (!g_ascii_strcasecmp (name, "X-EVOLUTION-IS-REPLY")) { - icalproperty *new_prop = icalproperty_new_x (icalproperty_get_x (prop)); - icalproperty_set_x_name (new_prop, "X-EVOLUTION-IS-REPLY"); - icalcomponent_add_property (icalcomp, new_prop); - } - prop = icalcomponent_get_next_property (itip_icalcomp, ICAL_X_PROPERTY); - } - - e_cal_component_set_icalcomponent (comp, icalcomp); -} - -static void -modify_object_cb (GObject *ecalclient, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *client = E_CAL_CLIENT (ecalclient); - ItipView *view = user_data; - ItipPURI *pitip = itip_view_get_puri (view); - GError *error = NULL; - - if (!e_cal_client_modify_object_finish (client, result, &error)) { - if (g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) || - g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED)) { - g_clear_error (&error); - return; - } - - update_item_progress_info (pitip, view, NULL); - pitip->update_item_error_info_id = - itip_view_add_lower_info_item_printf ( - view, - ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("Unable to update attendee. %s"), - error ? error->message : _("Unknown error")); - - g_clear_error (&error); - } else { - update_item_progress_info (pitip, view, NULL); - itip_view_add_lower_info_item (view, - ITIP_VIEW_INFO_ITEM_TYPE_INFO, _("Attendee status updated")); - } -} - -static void -update_attendee_status_icalcomp (ItipPURI *pitip, - ItipView *view, - icalcomponent *icalcomp) -{ - ECalComponent *comp; - const gchar *uid = NULL; - gchar *rid; - GSList *attendees; - - e_cal_component_get_uid (pitip->comp, &uid); - rid = e_cal_component_get_recurid_as_string (pitip->comp); - - comp = e_cal_component_new (); - if (!e_cal_component_set_icalcomponent (comp, icalcomp)) { - icalcomponent_free (icalcomp); - - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("The meeting is invalid and cannot be updated")); - } else { - icalcomponent *org_icalcomp; - const gchar *delegate; - - org_icalcomp = e_cal_component_get_icalcomponent (pitip->comp); - - e_cal_component_get_attendee_list (pitip->comp, &attendees); - if (attendees != NULL) { - ECalComponentAttendee *a = attendees->data; - icalproperty *prop, *del_prop; - EShell *shell = e_shell_get_default (); - - prop = find_attendee (icalcomp, itip_strip_mailto (a->value)); - if ((a->status == ICAL_PARTSTAT_DELEGATED) && (del_prop = find_attendee (org_icalcomp, itip_strip_mailto (a->delto))) && !(find_attendee (icalcomp, itip_strip_mailto (a->delto)))) { - gint response; - delegate = icalproperty_get_attendee (del_prop); - response = e_alert_run_dialog_for_args (e_shell_get_active_window (shell), - "org.gnome.itip-formatter:add-delegate", - itip_strip_mailto (a->value), - itip_strip_mailto (delegate), NULL); - if (response == GTK_RESPONSE_YES) { - icalcomponent_add_property (icalcomp, icalproperty_new_clone (del_prop)); - e_cal_component_rescan (comp); - } else if (response == GTK_RESPONSE_NO) { - remove_delegate (pitip, view, delegate, itip_strip_mailto (a->value), comp); - goto cleanup; - } else { - goto cleanup; - } - } - - if (prop == NULL) { - gint response; - - if (a->delfrom && *a->delfrom) { - response = e_alert_run_dialog_for_args (e_shell_get_active_window (shell), - "org.gnome.itip-formatter:add-delegate", - itip_strip_mailto (a->delfrom), - itip_strip_mailto (a->value), NULL); - if (response == GTK_RESPONSE_YES) { - /* Already declared in this function */ - icalproperty *prop = find_attendee (icalcomp, itip_strip_mailto (a->value)); - icalcomponent_add_property (icalcomp,icalproperty_new_clone (prop)); - e_cal_component_rescan (comp); - } else if (response == GTK_RESPONSE_NO) { - remove_delegate (pitip, - view, - itip_strip_mailto (a->value), - itip_strip_mailto (a->delfrom), - comp); - goto cleanup; - } else { - goto cleanup; - } - } - - response = e_alert_run_dialog_for_args ( - e_shell_get_active_window (shell), - "org.gnome.itip-formatter:add-unknown-attendee", NULL); - - if (response == GTK_RESPONSE_YES) { - change_status ( - pitip->registry, icalcomp, - itip_strip_mailto (a->value), - a->status); - e_cal_component_rescan (comp); - } else { - goto cleanup; - } - } else if (a->status == ICAL_PARTSTAT_NONE || a->status == ICAL_PARTSTAT_X) { - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("Attendee status could not be updated because the status is invalid")); - goto cleanup; - } else { - if (a->status == ICAL_PARTSTAT_DELEGATED) { - /* *prop already declared in this function */ - icalproperty *prop, *new_prop; - - prop = find_attendee (icalcomp, itip_strip_mailto (a->value)); - icalcomponent_remove_property (icalcomp, prop); - - new_prop = find_attendee (org_icalcomp, itip_strip_mailto (a->value)); - icalcomponent_add_property (icalcomp, icalproperty_new_clone (new_prop)); - } else - change_status ( - pitip->registry, icalcomp, - itip_strip_mailto (a->value), - a->status); - - e_cal_component_rescan (comp); - } - } - } - - update_x (pitip->comp, comp); - - if (itip_view_get_update (view)) { - e_cal_component_commit_sequence (comp); - itip_send_comp ( - pitip->registry, - E_CAL_COMPONENT_METHOD_REQUEST, - comp, pitip->current_client, - NULL, NULL, NULL, TRUE, FALSE); - } - - update_item_progress_info (pitip, view, _("Saving changes to the calendar. Please wait...")); - - e_cal_client_modify_object ( - pitip->current_client, - icalcomp, rid ? CALOBJ_MOD_THIS : CALOBJ_MOD_ALL, - pitip->cancellable, - modify_object_cb, - view); - - cleanup: - g_object_unref (comp); -} - -static void -update_attendee_status_get_object_without_rid_cb (GObject *ecalclient, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *client = E_CAL_CLIENT (ecalclient); - ItipView *view = user_data; - ItipPURI *pitip = itip_view_get_puri (view); - icalcomponent *icalcomp = NULL; - GError *error = NULL; - - if (!e_cal_client_get_object_finish (client, result, &icalcomp, &error)) { - if (g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) || - g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED)) { - g_clear_error (&error); - return; - } - - g_clear_error (&error); - - update_item_progress_info (pitip, view, NULL); - pitip->update_item_error_info_id = itip_view_add_lower_info_item ( - view, - ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("Attendee status can not be updated because the item no longer exists")); - return; - } - - update_attendee_status_icalcomp (pitip, view, icalcomp); -} - -static void -update_attendee_status_get_object_with_rid_cb (GObject *ecalclient, - GAsyncResult *result, - gpointer user_data) -{ - ECalClient *client = E_CAL_CLIENT (ecalclient); - ItipView *view = user_data; - ItipPURI *pitip = itip_view_get_puri (view); - icalcomponent *icalcomp = NULL; - GError *error = NULL; - - if (!e_cal_client_get_object_finish (client, result, &icalcomp, &error)) { - const gchar *uid; - gchar *rid; - - if (g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED) || - g_error_matches (error, E_CLIENT_ERROR, E_CLIENT_ERROR_CANCELLED)) { - g_clear_error (&error); - return; - } - - g_clear_error (&error); - - e_cal_component_get_uid (pitip->comp, &uid); - rid = e_cal_component_get_recurid_as_string (pitip->comp); - - if (!rid || !*rid) { - g_free (rid); - - update_item_progress_info (pitip, view, NULL); - pitip->update_item_error_info_id = itip_view_add_lower_info_item ( - view, - ITIP_VIEW_INFO_ITEM_TYPE_WARNING, - _("Attendee status can not be updated because the item no longer exists")); - return; - } - - e_cal_client_get_object ( - pitip->current_client, - uid, - NULL, - pitip->cancellable, - update_attendee_status_get_object_without_rid_cb, - view); - - g_free (rid); - return; - } - - update_attendee_status_icalcomp (pitip, view, icalcomp); -} - -static void -update_attendee_status (ItipPURI *pitip, - ItipView *view) -{ - const gchar *uid = NULL; - gchar *rid; - - /* Obtain our version */ - e_cal_component_get_uid (pitip->comp, &uid); - rid = e_cal_component_get_recurid_as_string (pitip->comp); - - update_item_progress_info (pitip, view, _("Saving changes to the calendar. Please wait...")); - - /* search for a master object if the detached object doesn't exist in the calendar */ - e_cal_client_get_object ( - pitip->current_client, - uid, rid, - pitip->cancellable, - update_attendee_status_get_object_with_rid_cb, - view); - - g_free (rid); -} - -static void -send_item (ItipPURI *pitip, - ItipView *view) -{ - ECalComponent *comp; - - comp = get_real_item (pitip); - - if (comp != NULL) { - itip_send_comp ( - pitip->registry, - E_CAL_COMPONENT_METHOD_REQUEST, - comp, pitip->current_client, - NULL, NULL, NULL, TRUE, FALSE); - g_object_unref (comp); - - switch (pitip->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Meeting information sent")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Task information sent")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, - _("Memo information sent")); - break; - default: - g_assert_not_reached (); - break; - } - } else { - switch (pitip->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("Unable to send meeting information, the meeting does not exist")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("Unable to send task information, the task does not exist")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - itip_view_add_lower_info_item ( - view, ITIP_VIEW_INFO_ITEM_TYPE_ERROR, - _("Unable to send memo information, the memo does not exist")); - break; - default: - g_assert_not_reached (); - break; - } - } -} - -static icalcomponent * -get_next (icalcompiter *iter) -{ - icalcomponent *ret = NULL; - icalcomponent_kind kind; - - do { - icalcompiter_next (iter); - ret = icalcompiter_deref (iter); - if (ret == NULL) - break; - kind = icalcomponent_isa (ret); - } while (ret != NULL - && kind != ICAL_VEVENT_COMPONENT - && kind != ICAL_VTODO_COMPONENT - && kind != ICAL_VFREEBUSY_COMPONENT); - - return ret; -} - -static void -attachment_load_finish (EAttachment *attachment, - GAsyncResult *result, - GFile *file) -{ - EShell *shell; - GtkWindow *parent; - - /* XXX Theoretically, this should never fail. */ - e_attachment_load_finish (attachment, result, NULL); - - shell = e_shell_get_default (); - parent = e_shell_get_active_window (shell); - - e_attachment_save_async ( - attachment, file, (GAsyncReadyCallback) - e_attachment_save_handle_error, parent); - - g_object_unref (file); -} - -static void -save_vcalendar_cb (ItipPURI *pitip) -{ - EAttachment *attachment; - EShell *shell; - GFile *file; - const gchar *suggestion; - - g_return_if_fail (pitip != NULL); - g_return_if_fail (pitip->vcalendar != NULL); - g_return_if_fail (pitip->part != NULL); - - suggestion = camel_mime_part_get_filename (pitip->part); - if (suggestion == NULL) { - /* Translators: This is a default filename for a calendar. */ - suggestion = _("calendar.ics"); - } - - shell = e_shell_get_default (); - file = e_shell_run_save_dialog ( - shell, _("Save Calendar"), suggestion, "*.ics:text/calendar", NULL, NULL); - if (file == NULL) - return; - - attachment = e_attachment_new (); - e_attachment_set_mime_part (attachment, pitip->part); - - e_attachment_load_async ( - attachment, (GAsyncReadyCallback) - attachment_load_finish, file); -} - -static void -set_itip_error (ItipView *view, - const gchar *primary, - const gchar *secondary, - gboolean save_btn) -{ - gchar *error; - - error = g_strdup_printf ( - "<div class=\"error\">" - "<p><b>%s</b></p>" - "<p>%s</p>", - primary, secondary); - - itip_view_set_error (view, error, save_btn); - - g_free (error); -} - -static gboolean -extract_itip_data (ItipPURI *pitip, - ItipView *view, - gboolean *have_alarms) -{ - EShell *shell; - EShellSettings *shell_settings; - icalproperty *prop; - icalcomponent_kind kind = ICAL_NO_COMPONENT; - icalcomponent *tz_comp; - icalcompiter tz_iter; - icalcomponent *alarm_comp; - icalcompiter alarm_iter; - ECalComponent *comp; - gboolean use_default_reminder; - - shell = e_shell_get_default (); - shell_settings = e_shell_get_shell_settings (shell); - - if (!pitip->vcalendar) { - set_itip_error (view, - _("The calendar attached is not valid"), - _("The message claims to contain a calendar, but the calendar is not a valid iCalendar."), - FALSE); - - return FALSE; - } - - pitip->top_level = e_cal_util_new_top_level (); - - pitip->main_comp = icalparser_parse_string (pitip->vcalendar); - if (pitip->main_comp == NULL || !is_icalcomp_valid (pitip->main_comp)) { - set_itip_error (view, - _("The calendar attached is not valid"), - _("The message claims to contain a calendar, but the calendar is not a valid iCalendar."), - FALSE); - - if (pitip->main_comp) { - icalcomponent_free (pitip->main_comp); - pitip->main_comp = NULL; - } - - return FALSE; - } - - prop = icalcomponent_get_first_property (pitip->main_comp, ICAL_METHOD_PROPERTY); - if (prop == NULL) { - pitip->method = ICAL_METHOD_PUBLISH; - } else { - pitip->method = icalproperty_get_method (prop); - } - - tz_iter = icalcomponent_begin_component (pitip->main_comp, ICAL_VTIMEZONE_COMPONENT); - while ((tz_comp = icalcompiter_deref (&tz_iter)) != NULL) { - icalcomponent *clone; - - clone = icalcomponent_new_clone (tz_comp); - icalcomponent_add_component (pitip->top_level, clone); - - icalcompiter_next (&tz_iter); - } - - pitip->iter = icalcomponent_begin_component (pitip->main_comp, ICAL_ANY_COMPONENT); - pitip->ical_comp = icalcompiter_deref (&pitip->iter); - if (pitip->ical_comp != NULL) { - kind = icalcomponent_isa (pitip->ical_comp); - if (kind != ICAL_VEVENT_COMPONENT - && kind != ICAL_VTODO_COMPONENT - && kind != ICAL_VFREEBUSY_COMPONENT - && kind != ICAL_VJOURNAL_COMPONENT) - pitip->ical_comp = get_next (&pitip->iter); - } - - if (pitip->ical_comp == NULL) { - set_itip_error (view, - _("The item in the calendar is not valid"), - _("The message does contain a calendar, but the calendar contains no events, tasks or free/busy information"), - FALSE); - - return FALSE; - } - - switch (icalcomponent_isa (pitip->ical_comp)) { - case ICAL_VEVENT_COMPONENT: - pitip->type = E_CAL_CLIENT_SOURCE_TYPE_EVENTS; - pitip->has_organizer = icalcomponent_get_first_property (pitip->ical_comp, ICAL_ORGANIZER_PROPERTY) != NULL; - if (icalcomponent_get_first_property (pitip->ical_comp, ICAL_ATTENDEE_PROPERTY) == NULL) { - /* no attendees: assume that that this is not a meeting and organizer doesn't want a reply */ - pitip->no_reply_wanted = TRUE; - } else { - /* - * if we have attendees, then find_to_address() will check for our RSVP - * and set no_reply_wanted=TRUE if RSVP=FALSE for the current user - */ - } - break; - case ICAL_VTODO_COMPONENT: - pitip->type = E_CAL_CLIENT_SOURCE_TYPE_TASKS; - break; - case ICAL_VJOURNAL_COMPONENT: - pitip->type = E_CAL_CLIENT_SOURCE_TYPE_MEMOS; - break; - default: - set_itip_error (view, - _("The item in the calendar is not valid"), - _("The message does contain a calendar, but the calendar contains no events, tasks or free/busy information"), - FALSE); - - return FALSE; - } - - pitip->total = icalcomponent_count_components (pitip->main_comp, ICAL_VEVENT_COMPONENT); - pitip->total += icalcomponent_count_components (pitip->main_comp, ICAL_VTODO_COMPONENT); - pitip->total += icalcomponent_count_components (pitip->main_comp, ICAL_VFREEBUSY_COMPONENT); - pitip->total += icalcomponent_count_components (pitip->main_comp, ICAL_VJOURNAL_COMPONENT); - - if (pitip->total > 1) { - - set_itip_error (view, - _("The calendar attached contains multiple items"), - _("To process all of these items, the file should be saved and the calendar imported"), - TRUE); - - } if (pitip->total > 0) { - pitip->current = 1; - } else { - pitip->current = 0; - } - - if (icalcomponent_isa (pitip->ical_comp) != ICAL_VJOURNAL_COMPONENT) { - gchar *my_address; - - prop = NULL; - comp = e_cal_component_new (); - e_cal_component_set_icalcomponent (comp, icalcomponent_new_clone (pitip->ical_comp)); - my_address = itip_get_comp_attendee (pitip->registry, comp, NULL); - g_object_unref (comp); - comp = NULL; - - if (!prop) - prop = find_attendee (pitip->ical_comp, my_address); - if (!prop) - prop = find_attendee_if_sentby (pitip->ical_comp, my_address); - if (prop) { - icalparameter *param; - const gchar * delfrom; - - if ((param = icalproperty_get_first_parameter (prop, ICAL_DELEGATEDFROM_PARAMETER))) { - delfrom = icalparameter_get_delegatedfrom (param); - - pitip->delegator_address = g_strdup (itip_strip_mailto (delfrom)); - } - } - g_free (my_address); - prop = NULL; - - /* Determine any delegate sections */ - prop = icalcomponent_get_first_property (pitip->ical_comp, ICAL_X_PROPERTY); - while (prop) { - const gchar *x_name, *x_val; - - x_name = icalproperty_get_x_name (prop); - x_val = icalproperty_get_x (prop); - - if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-CALENDAR-UID")) - pitip->calendar_uid = g_strdup (x_val); - else if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-CALENDAR-URI")) - g_warning (G_STRLOC ": X-EVOLUTION-DELEGATOR-CALENDAR-URI used"); - else if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-ADDRESS")) - pitip->delegator_address = g_strdup (x_val); - else if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-NAME")) - pitip->delegator_name = g_strdup (x_val); - - prop = icalcomponent_get_next_property (pitip->ical_comp, ICAL_X_PROPERTY); - } - - /* Strip out procedural alarms for security purposes */ - alarm_iter = icalcomponent_begin_component (pitip->ical_comp, ICAL_VALARM_COMPONENT); - while ((alarm_comp = icalcompiter_deref (&alarm_iter)) != NULL) { - icalproperty *p; - - icalcompiter_next (&alarm_iter); - - p = icalcomponent_get_first_property (alarm_comp, ICAL_ACTION_PROPERTY); - if (!p || icalproperty_get_action (p) == ICAL_ACTION_PROCEDURE) - icalcomponent_remove_component (pitip->ical_comp, alarm_comp); - - icalcomponent_free (alarm_comp); - } - - if (have_alarms) { - alarm_iter = icalcomponent_begin_component (pitip->ical_comp, ICAL_VALARM_COMPONENT); - *have_alarms = icalcompiter_deref (&alarm_iter) != NULL; - } - } - - pitip->comp = e_cal_component_new (); - if (!e_cal_component_set_icalcomponent (pitip->comp, pitip->ical_comp)) { - g_object_unref (pitip->comp); - pitip->comp = NULL; - - set_itip_error (view, - _("The item in the calendar is not valid"), - _("The message does contain a calendar, but the calendar contains no events, tasks or free/busy information"), - FALSE); - - return FALSE; - }; - - /* Add default reminder if the config says so */ - - use_default_reminder = e_shell_settings_get_boolean ( - shell_settings, "cal-use-default-reminder"); - - if (use_default_reminder) { - ECalComponentAlarm *acomp; - gint interval; - EDurationType units; - ECalComponentAlarmTrigger trigger; - - interval = e_shell_settings_get_int ( - shell_settings, "cal-default-reminder-interval"); - units = e_shell_settings_get_int ( - shell_settings, "cal-default-reminder-units"); - - acomp = e_cal_component_alarm_new (); - - e_cal_component_alarm_set_action (acomp, E_CAL_COMPONENT_ALARM_DISPLAY); - - trigger.type = E_CAL_COMPONENT_ALARM_TRIGGER_RELATIVE_START; - memset (&trigger.u.rel_duration, 0, sizeof (trigger.u.rel_duration)); - - trigger.u.rel_duration.is_neg = TRUE; - - switch (units) { - case E_DURATION_MINUTES: - trigger.u.rel_duration.minutes = interval; - break; - case E_DURATION_HOURS: - trigger.u.rel_duration.hours = interval; - break; - case E_DURATION_DAYS: - trigger.u.rel_duration.days = interval; - break; - default: - g_assert_not_reached (); - } - - e_cal_component_alarm_set_trigger (acomp, trigger); - e_cal_component_add_alarm (pitip->comp, acomp); - - e_cal_component_alarm_free (acomp); - } - - find_from_address (pitip, pitip->ical_comp); - find_to_address (pitip, pitip->ical_comp, NULL); - - return TRUE; -} - -struct _opencal_msg { - MailMsg base; - - gchar *command; /* command line to run */ -}; - -static gchar * -open_calendar__desc (struct _opencal_msg *m, - gint complete) -{ - return g_strdup (_("Opening calendar")); -} - -static void -open_calendar__exec (struct _opencal_msg *m, - GCancellable *cancellable, - GError **error) -{ - if (!g_spawn_command_line_async (m->command, NULL)) { - g_warning ("Could not launch %s", m->command); - } -} - -static void -open_calendar__free (struct _opencal_msg *m) -{ - g_free (m->command); - m->command = NULL; -} - -static MailMsgInfo open_calendar_info = { - sizeof (struct _opencal_msg), - (MailMsgDescFunc) open_calendar__desc, - (MailMsgExecFunc) open_calendar__exec, - (MailMsgDoneFunc) NULL, - (MailMsgFreeFunc) open_calendar__free, -}; - -static gboolean -idle_open_cb (gpointer data) -{ - ItipPURI *pitip = data; - struct _opencal_msg *m; - gchar *start, *end; - - start = isodate_from_time_t (pitip->start_time); - end = isodate_from_time_t (pitip->end_time); - m = mail_msg_new (&open_calendar_info); - m->command = g_strdup_printf ("evolution \"calendar:///?startdate=%s&enddate=%s\"", start, end); - mail_msg_slow_ordered_push (m); - - g_free (start); - g_free (end); - - return FALSE; -} - -static void -view_response_cb (ItipView *view, - ItipViewResponse response, - gpointer data) -{ - ItipPURI *pitip = data; - gboolean status = FALSE; - icalproperty *prop; - ECalComponentTransparency trans; - - if (response == ITIP_VIEW_RESPONSE_SAVE) { - save_vcalendar_cb (pitip); - return; - } - - pitip->can_delete_invitation_from_cache = FALSE; - if (pitip->method == ICAL_METHOD_PUBLISH || pitip->method == ICAL_METHOD_REQUEST) { - if (itip_view_get_free_time_check_state (view)) - e_cal_component_set_transparency (pitip->comp, E_CAL_COMPONENT_TRANSP_TRANSPARENT); - else - e_cal_component_set_transparency (pitip->comp, E_CAL_COMPONENT_TRANSP_OPAQUE); - } else { - e_cal_component_get_transparency (pitip->comp, &trans); - - if (trans == E_CAL_COMPONENT_TRANSP_NONE) - e_cal_component_set_transparency (pitip->comp, E_CAL_COMPONENT_TRANSP_OPAQUE); - } - - if (!pitip->to_address && pitip->current_client != NULL) - e_client_get_backend_property_sync (E_CLIENT (pitip->current_client), CAL_BACKEND_PROPERTY_CAL_EMAIL_ADDRESS, &pitip->to_address, NULL, NULL); - - /* check if it is a recur instance (no master object) and - * add a property */ - if (itip_view_get_recur_check_state (view)) { - prop = icalproperty_new_x ("All"); - icalproperty_set_x_name (prop, "X-GW-RECUR-INSTANCES-MOD-TYPE"); - icalcomponent_add_property (pitip->ical_comp, prop); - } - - switch (response) { - case ITIP_VIEW_RESPONSE_ACCEPT: - if (pitip->type != E_CAL_CLIENT_SOURCE_TYPE_MEMOS) - status = change_status ( - pitip->registry, - pitip->ical_comp, - pitip->to_address, - ICAL_PARTSTAT_ACCEPTED); - else - status = TRUE; - if (status) { - e_cal_component_rescan (pitip->comp); - pitip->can_delete_invitation_from_cache = TRUE; - update_item (pitip, view, response); - } - break; - case ITIP_VIEW_RESPONSE_TENTATIVE: - status = change_status ( - pitip->registry, - pitip->ical_comp, - pitip->to_address, - ICAL_PARTSTAT_TENTATIVE); - if (status) { - e_cal_component_rescan (pitip->comp); - pitip->can_delete_invitation_from_cache = TRUE; - update_item (pitip, view, response); - } - break; - case ITIP_VIEW_RESPONSE_DECLINE: - if (pitip->type != E_CAL_CLIENT_SOURCE_TYPE_MEMOS) - status = change_status ( - pitip->registry, - pitip->ical_comp, - pitip->to_address, - ICAL_PARTSTAT_DECLINED); - else { - prop = icalproperty_new_x ("1"); - icalproperty_set_x_name (prop, "X-GW-DECLINED"); - icalcomponent_add_property (pitip->ical_comp, prop); - status = TRUE; - } - - if (status) { - e_cal_component_rescan (pitip->comp); - pitip->can_delete_invitation_from_cache = TRUE; - update_item (pitip, view, response); - } - break; - case ITIP_VIEW_RESPONSE_UPDATE: - update_attendee_status (pitip, view); - break; - case ITIP_VIEW_RESPONSE_CANCEL: - update_item (pitip, view, response); - break; - case ITIP_VIEW_RESPONSE_REFRESH: - send_item (pitip, view); - break; - case ITIP_VIEW_RESPONSE_OPEN: - g_idle_add (idle_open_cb, pitip); - return; - default: - break; - } -} - -static gboolean -check_is_instance (icalcomponent *icalcomp) -{ - icalproperty *icalprop; - - icalprop = icalcomponent_get_first_property (icalcomp, ICAL_X_PROPERTY); - while (icalprop) { - const gchar *x_name; - - x_name = icalproperty_get_x_name (icalprop); - if (!strcmp (x_name, "X-GW-RECURRENCE-KEY")) { - return TRUE; - } - icalprop = icalcomponent_get_next_property (icalcomp, ICAL_X_PROPERTY); - } - - return FALSE; -} - -static gboolean -in_proper_folder (ESourceRegistry *registry, - CamelFolder *folder) -{ - EShell *shell; - EShellBackend *shell_backend; - EMailBackend *backend; - EMailSession *session; - MailFolderCache *folder_cache; - gboolean res = TRUE; - CamelFolderInfoFlags flags = 0; - - if (!folder) - return FALSE; - - shell = e_shell_get_default (); - shell_backend = e_shell_get_backend_by_name (shell, "mail"); - backend = E_MAIL_BACKEND (shell_backend); - session = e_mail_backend_get_session (backend); - folder_cache = e_mail_session_get_folder_cache (session); - - if (mail_folder_cache_get_folder_info_flags (folder_cache, folder, &flags)) { - /* it should be neither trash nor junk folder, */ - res = ((flags & CAMEL_FOLDER_TYPE_MASK) != CAMEL_FOLDER_TYPE_TRASH && - (flags & CAMEL_FOLDER_TYPE_MASK) != CAMEL_FOLDER_TYPE_JUNK && - /* it can be Inbox */ - ( (flags & CAMEL_FOLDER_TYPE_MASK) == CAMEL_FOLDER_TYPE_INBOX || - /* or any other virtual folder */ - CAMEL_IS_VEE_FOLDER (folder) || - /* or anything else except of sent, outbox or drafts folder */ - (!em_utils_folder_is_sent (registry, folder) && - !em_utils_folder_is_outbox (registry, folder) && - !em_utils_folder_is_drafts (registry, folder)) - )); - } else { - /* cannot check for Inbox folder here */ - res = (folder->folder_flags & (CAMEL_FOLDER_IS_TRASH | CAMEL_FOLDER_IS_JUNK)) == 0 && ( - (CAMEL_IS_VEE_FOLDER (folder)) || ( - !em_utils_folder_is_sent (registry, folder) && - !em_utils_folder_is_outbox (registry, folder) && - !em_utils_folder_is_drafts (registry, folder))); - } - - return res; -} - -static void -init_itip_view (ItipPURI *info, - ItipView *view) -{ - EShell *shell; - EShellSettings *shell_settings; - ESourceRegistry *registry; - ECalComponentText text; - ECalComponentOrganizer organizer; - ECalComponentDateTime datetime; - icaltimezone *from_zone, *to_zone; - GString *gstring = NULL; - GSList *list, *l; - icalcomponent *icalcomp; - const gchar *string, *org; - gint i; - gboolean response_enabled; - gboolean have_alarms = FALSE; - EMFormat *emf = info->puri.emf; - - shell = e_shell_get_default (); - registry = e_shell_get_registry (shell); - shell_settings = e_shell_get_shell_settings (shell); - - info->registry = g_object_ref (registry); - - /* Reset current client before initializing view */ - info->current_client = NULL; - - /* Initialize the ecal hashes */ - for (i = 0; i < E_CAL_CLIENT_SOURCE_TYPE_LAST; i++) - info->clients[i] = g_hash_table_new_full ( - (GHashFunc) g_str_hash, - (GEqualFunc) g_str_equal, - (GDestroyNotify) g_free, - (GDestroyNotify) g_object_unref); - - /* FIXME Handle multiple VEVENTS with the same UID, ie detached instances */ - if (!extract_itip_data (info, view, &have_alarms)) - return; - - response_enabled = in_proper_folder (registry, emf->folder); - - if (!response_enabled) { - itip_view_set_mode (view, ITIP_VIEW_MODE_HIDE_ALL); - } else { - itip_view_set_show_inherit_alarm_check ( - view, - have_alarms && (info->method == ICAL_METHOD_PUBLISH || info->method == ICAL_METHOD_REQUEST)); - - switch (info->method) { - case ICAL_METHOD_PUBLISH: - case ICAL_METHOD_REQUEST: - /* - * Treat meeting request (sent by organizer directly) and - * published evend (forwarded by organizer or attendee) alike: - * if the event has an organizer, then it can be replied to and - * we show the "accept/tentative/decline" choice. - * Otherwise only show "accept". - */ - itip_view_set_mode (view, - info->has_organizer ? - ITIP_VIEW_MODE_REQUEST : - ITIP_VIEW_MODE_PUBLISH); - break; - case ICAL_METHOD_REPLY: - itip_view_set_mode (view, ITIP_VIEW_MODE_REPLY); - break; - case ICAL_METHOD_ADD: - itip_view_set_mode (view, ITIP_VIEW_MODE_ADD); - break; - case ICAL_METHOD_CANCEL: - itip_view_set_mode (view, ITIP_VIEW_MODE_CANCEL); - break; - case ICAL_METHOD_REFRESH: - itip_view_set_mode (view, ITIP_VIEW_MODE_REFRESH); - break; - case ICAL_METHOD_COUNTER: - itip_view_set_mode (view, ITIP_VIEW_MODE_COUNTER); - break; - case ICAL_METHOD_DECLINECOUNTER: - itip_view_set_mode (view, ITIP_VIEW_MODE_DECLINECOUNTER); - break; - case ICAL_METHOD_X : - /* Handle appointment requests from Microsoft Live. This is - * a best-at-hand-now handling. Must be revisited when we have - * better access to the source of such meetings */ - info->method = ICAL_METHOD_REQUEST; - itip_view_set_mode (view, ITIP_VIEW_MODE_REQUEST); - break; - default: - return; - } - } - - itip_view_set_item_type (view, info->type); - - if (response_enabled) { - switch (info->method) { - case ICAL_METHOD_REQUEST: - /* FIXME What about the name? */ - itip_view_set_delegator (view, info->delegator_name ? info->delegator_name : info->delegator_address); - case ICAL_METHOD_PUBLISH: - case ICAL_METHOD_ADD: - case ICAL_METHOD_CANCEL: - case ICAL_METHOD_DECLINECOUNTER: - itip_view_set_show_update_check (view, FALSE); - - /* An organizer sent this */ - e_cal_component_get_organizer (info->comp, &organizer); - org = organizer.cn ? organizer.cn : itip_strip_mailto (organizer.value); - - itip_view_set_organizer (view, org); - if (organizer.sentby) - itip_view_set_organizer_sentby ( - view, itip_strip_mailto (organizer.sentby)); - - if (info->my_address) { - if (!(organizer.value && !g_ascii_strcasecmp (itip_strip_mailto (organizer.value), info->my_address)) - && !(organizer.sentby && !g_ascii_strcasecmp (itip_strip_mailto (organizer.sentby), info->my_address)) - && (info->to_address && g_ascii_strcasecmp (info->to_address, info->my_address))) - itip_view_set_proxy (view, info->to_name ? info->to_name : info->to_address); - } - break; - case ICAL_METHOD_REPLY: - case ICAL_METHOD_REFRESH: - case ICAL_METHOD_COUNTER: - itip_view_set_show_update_check (view, TRUE); - - /* An attendee sent this */ - e_cal_component_get_attendee_list (info->comp, &list); - if (list != NULL) { - ECalComponentAttendee *attendee; - - attendee = list->data; - - itip_view_set_attendee (view, attendee->cn ? attendee->cn : itip_strip_mailto (attendee->value)); - - if (attendee->sentby) - itip_view_set_attendee_sentby (view, itip_strip_mailto (attendee->sentby)); - - if (info->my_address) { - if (!(attendee->value && !g_ascii_strcasecmp (itip_strip_mailto (attendee->value), info->my_address)) - && !(attendee->sentby && !g_ascii_strcasecmp (itip_strip_mailto (attendee->sentby), info->my_address)) - && (info->from_address && g_ascii_strcasecmp (info->from_address, info->my_address))) - itip_view_set_proxy (view, info->from_name ? info->from_name : info->from_address); - } - - e_cal_component_free_attendee_list (list); - } - break; - default: - g_assert_not_reached (); - break; - } - } - - e_cal_component_get_summary (info->comp, &text); - itip_view_set_summary (view, text.value ? text.value : C_("cal-itip", "None")); - - e_cal_component_get_location (info->comp, &string); - itip_view_set_location (view, string); - - /* Status really only applies for REPLY */ - if (response_enabled && info->method == ICAL_METHOD_REPLY) { - e_cal_component_get_attendee_list (info->comp, &list); - if (list != NULL) { - ECalComponentAttendee *a = list->data; - - switch (a->status) { - case ICAL_PARTSTAT_ACCEPTED: - itip_view_set_status (view, _("Accepted")); - break; - case ICAL_PARTSTAT_TENTATIVE: - itip_view_set_status (view, _("Tentatively Accepted")); - break; - case ICAL_PARTSTAT_DECLINED: - itip_view_set_status (view, _("Declined")); - break; - case ICAL_PARTSTAT_DELEGATED: - itip_view_set_status (view, _("Delegated")); - break; - default: - itip_view_set_status (view, _("Unknown")); - } - } - e_cal_component_free_attendee_list (list); - } - - if (info->method == ICAL_METHOD_REPLY - || info->method == ICAL_METHOD_COUNTER - || info->method == ICAL_METHOD_DECLINECOUNTER) { - /* FIXME Check spec to see if multiple comments are actually valid */ - /* Comments for iTIP are limited to one per object */ - e_cal_component_get_comment_list (info->comp, &list); - if (list) { - ECalComponentText *text = list->data; - - if (text->value) { - gchar *html; - - html = camel_text_to_html ( - text->value, - CAMEL_MIME_FILTER_TOHTML_CONVERT_NL | - CAMEL_MIME_FILTER_TOHTML_CONVERT_URLS | - CAMEL_MIME_FILTER_TOHTML_CONVERT_ADDRESSES, - 0); - - itip_view_set_comment (view, html); - - g_free (html); - } - } - e_cal_component_free_text_list (list); - } - - e_cal_component_get_description_list (info->comp, &list); - for (l = list; l; l = l->next) { - ECalComponentText *text = l->data; - - if (!gstring && text->value) - gstring = g_string_new (text->value); - else if (text->value) - g_string_append_printf (gstring, "\n\n%s", text->value); - } - - e_cal_component_free_text_list (list); - - if (gstring) { - gchar *html; - - html = camel_text_to_html ( - gstring->str, - CAMEL_MIME_FILTER_TOHTML_CONVERT_NL | - CAMEL_MIME_FILTER_TOHTML_CONVERT_SPACES | - CAMEL_MIME_FILTER_TOHTML_CONVERT_URLS | - CAMEL_MIME_FILTER_TOHTML_MARK_CITATION | - CAMEL_MIME_FILTER_TOHTML_CONVERT_ADDRESSES, - 0); - - itip_view_set_description (view, html); - g_string_free (gstring, TRUE); - g_free (html); - } - - to_zone = e_shell_settings_get_pointer (shell_settings, "cal-timezone"); - - e_cal_component_get_dtstart (info->comp, &datetime); - info->start_time = 0; - if (datetime.value) { - struct tm start_tm; - - /* If the timezone is not in the component, guess the local time */ - /* Should we guess if the timezone is an olsen name somehow? */ - if (datetime.value->is_utc) - from_zone = icaltimezone_get_utc_timezone (); - else if (!datetime.value->is_utc && datetime.tzid) - from_zone = icalcomponent_get_timezone (info->top_level, datetime.tzid); - else - from_zone = NULL; - - start_tm = icaltimetype_to_tm_with_zone (datetime.value, from_zone, to_zone); - - itip_view_set_start (view, &start_tm, datetime.value->is_date); - info->start_time = icaltime_as_timet_with_zone (*datetime.value, from_zone); - } - - icalcomp = e_cal_component_get_icalcomponent (info->comp); - - /* Set the recurrence id */ - if (check_is_instance (icalcomp) && datetime.value) { - ECalComponentRange *recur_id; - struct icaltimetype icaltime = icaltime_convert_to_zone (*datetime.value, to_zone); - - recur_id = g_new0 (ECalComponentRange, 1); - recur_id->type = E_CAL_COMPONENT_RANGE_SINGLE; - recur_id->datetime.value = &icaltime; - recur_id->datetime.tzid = icaltimezone_get_tzid (to_zone); - e_cal_component_set_recurid (info->comp, recur_id); - g_free (recur_id); /* it's ok to call g_free here */ - } - e_cal_component_free_datetime (&datetime); - - e_cal_component_get_dtend (info->comp, &datetime); - info->end_time = 0; - if (datetime.value) { - struct tm end_tm; - - /* If the timezone is not in the component, guess the local time */ - /* Should we guess if the timezone is an olsen name somehow? */ - if (datetime.value->is_utc) - from_zone = icaltimezone_get_utc_timezone (); - else if (!datetime.value->is_utc && datetime.tzid) - from_zone = icalcomponent_get_timezone (info->top_level, datetime.tzid); - else - from_zone = NULL; - - if (datetime.value->is_date) { - /* RFC says the DTEND is not inclusive, thus subtract one day - * if we have a date */ - - icaltime_adjust (datetime.value, -1, 0, 0, 0); - } - - end_tm = icaltimetype_to_tm_with_zone (datetime.value, from_zone, to_zone); - - itip_view_set_end (view, &end_tm, datetime.value->is_date); - info->end_time = icaltime_as_timet_with_zone (*datetime.value, from_zone); - } - e_cal_component_free_datetime (&datetime); - - /* Recurrence info */ - /* FIXME Better recurring description */ - if (e_cal_component_has_recurrences (info->comp)) { - /* FIXME Tell the user we don't support recurring tasks */ - switch (info->type) { - case E_CAL_CLIENT_SOURCE_TYPE_EVENTS: - itip_view_add_upper_info_item (view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, _("This meeting recurs")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_TASKS: - itip_view_add_upper_info_item (view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, _("This task recurs")); - break; - case E_CAL_CLIENT_SOURCE_TYPE_MEMOS: - itip_view_add_upper_info_item (view, ITIP_VIEW_INFO_ITEM_TYPE_INFO, _("This memo recurs")); - break; - default: - g_assert_not_reached (); - break; - } - } - - if (response_enabled) { - g_signal_connect ( - view, "response", - G_CALLBACK (view_response_cb), info); - - itip_view_set_show_free_time_check (view, info->type == E_CAL_CLIENT_SOURCE_TYPE_EVENTS && (info->method == ICAL_METHOD_PUBLISH || info->method == ICAL_METHOD_REQUEST)); - - if (info->calendar_uid) { - start_calendar_server_by_uid (info, view, info->calendar_uid, info->type); - } else { - find_server (info, view, info->comp); - set_buttons_sensitive (info, view); - } - } -} - -static void -puri_free (EMFormatPURI *puri) -{ - ItipPURI *pitip = (ItipPURI *) puri; - gint i; - - g_cancellable_cancel (pitip->cancellable); - g_object_unref (pitip->cancellable); - - if (pitip->registry != NULL) { - g_object_unref (pitip->registry); - pitip->registry = NULL; - } - - for (i = 0; i < E_CAL_CLIENT_SOURCE_TYPE_LAST; i++) { - g_hash_table_destroy (pitip->clients[i]); - pitip->clients[i] = NULL; - } - - g_free (pitip->vcalendar); - pitip->vcalendar = NULL; - - if (pitip->comp) { - g_object_unref (pitip->comp); - pitip->comp = NULL; - } - - if (pitip->top_level) { - icalcomponent_free (pitip->top_level); - pitip->top_level = NULL; - } - - if (pitip->main_comp) { - icalcomponent_free (pitip->main_comp); - pitip->main_comp = NULL; - } - pitip->ical_comp = NULL; - - g_free (pitip->calendar_uid); - pitip->calendar_uid = NULL; - - g_free (pitip->from_address); - pitip->from_address = NULL; - g_free (pitip->from_name); - pitip->from_name = NULL; - g_free (pitip->to_address); - pitip->to_address = NULL; - g_free (pitip->to_name); - pitip->to_name = NULL; - g_free (pitip->delegator_address); - pitip->delegator_address = NULL; - g_free (pitip->delegator_name); - pitip->delegator_name = NULL; - g_free (pitip->my_address); - pitip->my_address = NULL; - g_free (pitip->uid); - g_hash_table_destroy (pitip->real_comps); -} - -static void -write_itip_view (EMFormat *emf, - EMFormatPURI *puri, - CamelStream *stream, - EMFormatWriterInfo *info, - GCancellable *cancellable) -{ - GString *buffer; - - if (info->mode == EM_FORMAT_WRITE_MODE_PRINTING) { - ItipView *view; - ItipPURI *pitip; - - buffer = g_string_sized_new (1024); - - pitip = (ItipPURI *) puri; - view = itip_view_new (pitip, pitip->registry); - - init_itip_view (pitip, view); - itip_view_write_for_printing (view, buffer); - - /* Destroy the view when the formatter is destroyed */ - g_object_weak_ref ( - G_OBJECT (emf), (GWeakNotify) g_object_unref, view); - - } else if (info->mode == EM_FORMAT_WRITE_MODE_RAW) { - buffer = g_string_sized_new (2048); - - itip_view_write (buffer); - - } else { - gchar *uri; - - uri = em_format_build_mail_uri ( - emf->folder, emf->message_uid, - "part_id", G_TYPE_STRING, puri->uri, - "mode", G_TYPE_INT, EM_FORMAT_WRITE_MODE_RAW, - NULL); - - buffer = g_string_sized_new (256); - g_string_append_printf (buffer, - "<div class=\"part-container\" " - "style=\"border: none; background: none;\">" - "<iframe width=\"100%%\" height=\"auto\"" - " frameborder=\"0\" src=\"%s\" name=\"%s\" id=\"%s\"></iframe>" - "</div>", - uri, puri->uri, puri->uri); - - g_free (uri); - } - - camel_stream_write_string (stream, buffer->str, cancellable, NULL); - - g_string_free (buffer, TRUE); -} - -static void -bind_itip_view (WebKitDOMElement *element, - EMFormatPURI *puri) -{ - if (WEBKIT_DOM_IS_HTML_IFRAME_ELEMENT (element)) { - ItipPURI *pitip = (ItipPURI *) puri; - GString *buffer = g_string_new (""); - WebKitDOMDocument *document; - ItipView *view; - - document = webkit_dom_html_iframe_element_get_content_document ( - WEBKIT_DOM_HTML_IFRAME_ELEMENT (element)); - - view = itip_view_new (pitip, pitip->registry); - - g_object_set_data_full ( - G_OBJECT (element), "view", view, - (GDestroyNotify) g_object_unref); - - itip_view_create_dom_bindings (view, - webkit_dom_document_get_document_element (document)); - - init_itip_view (pitip, view); - g_string_free (buffer, TRUE); - } -} - -void -format_itip (EPlugin *ep, - EMFormatHookTarget *target) -{ - GSettings *settings; - ItipPURI *puri; - CamelDataWrapper *content; - CamelStream *stream; - GByteArray *byte_array; - gint len; - - len = target->part_id->len; - g_string_append_printf (target->part_id, ".itip"); - - /* mark message as containing calendar, thus it will show the icon in message list now on */ - if (target->format->message_uid && target->format->folder && - !camel_folder_get_message_user_flag (target->format->folder, target->format->message_uid, "$has_cal")) - camel_folder_set_message_user_flag (target->format->folder, target->format->message_uid, "$has_cal", TRUE); - - settings = g_settings_new ("org.gnome.evolution.plugin.itip"); - - puri = (ItipPURI *) em_format_puri_new ( - target->format, sizeof (ItipPURI), - target->part, target->part_id->str); - puri->puri.write_func = write_itip_view; - puri->puri.bind_func = bind_itip_view; - puri->puri.free = puri_free; - puri->puri.is_attachment = target->info->is_attachment; - puri->puri.mime_type = g_strdup ("text/html"); - puri->delete_message = g_settings_get_boolean (settings, CONF_KEY_DELETE); - puri->has_organizer = FALSE; - puri->no_reply_wanted = FALSE; - puri->folder = ((EMFormat *) target->format)->folder; - puri->uid = g_strdup (((EMFormat *) target->format)->message_uid); - puri->msg = ((EMFormat *) target->format)->message; - puri->part = target->part; - puri->cancellable = g_cancellable_new (); - puri->real_comps = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_object_unref); - - em_format_add_puri (target->format, (EMFormatPURI *) puri); - - g_object_unref (settings); - - /* This is non-gui thread. Download the part for using in the main thread */ - content = camel_medium_get_content ((CamelMedium *) target->part); - - byte_array = g_byte_array_new (); - stream = camel_stream_mem_new_with_byte_array (byte_array); - camel_data_wrapper_decode_to_stream_sync (content, stream, NULL, NULL); - - if (byte_array->len == 0) - puri->vcalendar = NULL; - else - puri->vcalendar = g_strndup ( - (gchar *) byte_array->data, byte_array->len); - - g_object_unref (stream); - g_string_truncate (target->part_id, len); -} - -static void -delete_toggled_cb (GtkWidget *widget) -{ - GSettings *settings; - gboolean active; - - settings = g_settings_new ("org.gnome.evolution.plugin.itip"); - active = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget)); - g_settings_set_boolean (settings, CONF_KEY_DELETE, active); - g_object_unref (settings); -} - -GtkWidget * -itip_formatter_page_factory (EPlugin *ep, - EConfigHookItemFactoryData *hook_data) -{ - EShell *shell; - ESourceRegistry *registry; - GtkWidget *page; - GtkWidget *tab_label; - GtkWidget *frame; - GtkWidget *frame_label; - GtkWidget *padding_label; - GtkWidget *hbox; - GtkWidget *inner_vbox; - GtkWidget *check; - GtkWidget *label; - GtkWidget *ess; - GtkWidget *scrolledwin; - gchar *str; - GSettings *settings; - - shell = e_shell_get_default (); - registry = e_shell_get_registry (shell); - - /* Create a new notebook page */ - page = gtk_vbox_new (FALSE, 0); - gtk_container_set_border_width (GTK_CONTAINER (page), 12); - tab_label = gtk_label_new (_("Meeting Invitations")); - gtk_notebook_append_page (GTK_NOTEBOOK (hook_data->parent), page, tab_label); - - /* Frame */ - frame = gtk_vbox_new (FALSE, 6); - gtk_box_pack_start (GTK_BOX (page), frame, FALSE, FALSE, 0); - - /* "General" */ - frame_label = gtk_label_new (""); - str = g_strdup_printf ("<span weight=\"bold\">%s</span>", _("General")); - gtk_label_set_markup (GTK_LABEL (frame_label), str); - g_free (str); - gtk_misc_set_alignment (GTK_MISC (frame_label), 0.0, 0.5); - gtk_box_pack_start (GTK_BOX (frame), frame_label, FALSE, FALSE, 0); - - /* Indent/padding */ - hbox = gtk_hbox_new (FALSE, 12); - gtk_box_pack_start (GTK_BOX (frame), hbox, FALSE, TRUE, 0); - padding_label = gtk_label_new (""); - gtk_box_pack_start (GTK_BOX (hbox), padding_label, FALSE, FALSE, 0); - inner_vbox = gtk_vbox_new (FALSE, 6); - gtk_box_pack_start (GTK_BOX (hbox), inner_vbox, FALSE, FALSE, 0); - - /* Delete message after acting */ - settings = g_settings_new ("org.gnome.evolution.plugin.itip"); - - check = gtk_check_button_new_with_mnemonic (_("_Delete message after acting")); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), g_settings_get_boolean (settings, CONF_KEY_DELETE)); - g_signal_connect ( - check, "toggled", - G_CALLBACK (delete_toggled_cb), NULL); - gtk_box_pack_start (GTK_BOX (inner_vbox), check, FALSE, FALSE, 0); - - g_object_unref (settings); - - /* "Conflict searching" */ - frame = gtk_vbox_new (FALSE, 6); - gtk_box_pack_start (GTK_BOX (page), frame, TRUE, TRUE, 24); - - frame_label = gtk_label_new (""); - str = g_strdup_printf ("<span weight=\"bold\">%s</span>", _("Conflict Search")); - gtk_label_set_markup (GTK_LABEL (frame_label), str); - g_free (str); - gtk_misc_set_alignment (GTK_MISC (frame_label), 0.0, 0.5); - gtk_box_pack_start (GTK_BOX (frame), frame_label, FALSE, FALSE, 0); - - /* Indent/padding */ - hbox = gtk_hbox_new (FALSE, 12); - gtk_box_pack_start (GTK_BOX (frame), hbox, TRUE, TRUE, 0); - padding_label = gtk_label_new (""); - gtk_box_pack_start (GTK_BOX (hbox), padding_label, FALSE, FALSE, 0); - inner_vbox = gtk_vbox_new (FALSE, 6); - gtk_box_pack_start (GTK_BOX (hbox), inner_vbox, TRUE, TRUE, 0); - - /* Source selector */ - label = gtk_label_new (_("Select the calendars to search for meeting conflicts")); - gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5); - gtk_box_pack_start (GTK_BOX (inner_vbox), label, FALSE, FALSE, 0); - - scrolledwin = gtk_scrolled_window_new (NULL, NULL); - - gtk_scrolled_window_set_policy ( - GTK_SCROLLED_WINDOW (scrolledwin), - GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - gtk_scrolled_window_set_shadow_type ( - GTK_SCROLLED_WINDOW (scrolledwin), GTK_SHADOW_IN); - gtk_box_pack_start (GTK_BOX (inner_vbox), scrolledwin, TRUE, TRUE, 0); - - ess = e_conflict_search_selector_new (registry); - atk_object_set_name (gtk_widget_get_accessible (ess), _("Conflict Search")); - gtk_container_add (GTK_CONTAINER (scrolledwin), ess); - - gtk_widget_show_all (page); - - return page; -} - |