/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ /* e-itip-control.c * * Copyright (C) 2001 Ximian, Inc. * * This program is free software; you can redistribute it and/or * modify it under the terms of version 2 of the GNU General Public * License as published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public * License along with this program; if not, write to the * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. * * Author: JP Rosevear */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "dialogs/delete-error.h" #include "calendar-config.h" #include "itip-utils.h" #include "e-itip-control.h" struct _EItipControlPrivate { GtkWidget *html; GPtrArray *event_clients; CalClient *event_client; GPtrArray *task_clients; CalClient *task_client; char *vcalendar; CalComponent *comp; icalcomponent *main_comp; icalcomponent *ical_comp; icalcomponent *top_level; icalcompiter iter; icalproperty_method method; int current; int total; gchar *calendar_uri; EAccountList *accounts; gchar *from_address; gchar *delegator_address; gchar *delegator_name; gchar *my_address; gint view_only; gboolean destroyed; }; /* HTML Strings */ #define HTML_BODY_START "" #define HTML_SEP "
" #define HTML_BODY_END "" #define HTML_FOOTER "" /* We intentionally use "calendar" instead of "calendar / *" here. We * don't want public calendars. */ static const char *calendar_types[] = { "calendar", NULL }; static const char *tasks_types[] = { "tasks", NULL }; static void class_init (EItipControlClass *klass); static void init (EItipControl *itip); static void destroy (GtkObject *obj); static void finalize (GObject *obj); static void url_requested_cb (GtkHTML *html, const gchar *url, GtkHTMLStream *handle, gpointer data); static gboolean object_requested_cb (GtkHTML *html, GtkHTMLEmbedded *eb, gpointer data); static void ok_clicked_cb (GtkHTML *html, const gchar *method, const gchar *url, const gchar *encoding, gpointer data); static GtkVBoxClass *parent_class = NULL; E_MAKE_TYPE (e_itip_control, "EItipControl", EItipControl, class_init, init, GTK_TYPE_VBOX); static void class_init (EItipControlClass *klass) { GObjectClass *object_class; GtkObjectClass *gtkobject_class; object_class = G_OBJECT_CLASS (klass); gtkobject_class = GTK_OBJECT_CLASS (klass); parent_class = g_type_class_peek_parent (klass); gtkobject_class->destroy = destroy; object_class->finalize = finalize; } static CalClient * start_calendar_server (EItipControl *itip, char *uri) { CalClient *client; GError *error = NULL; client = cal_client_new (uri, CALOBJ_TYPE_EVENT); if (!cal_client_open (client, TRUE, &error)) { g_warning (_("start_calendar_server(): %s"), error->message); g_error_free (error); g_object_unref (client); return NULL; } return client; } static gboolean start_default_server (EItipControl *itip, CalClient *client, gboolean tasks) { if (tasks) return cal_client_open_default_tasks (client, FALSE); else return cal_client_open_default_calendar (client, FALSE); } #if 0 /* EPFIXME, rewrite this */ static GPtrArray * get_servers (EItipControl *itip, EvolutionShellClient *shell_client, const char *possible_types[], gboolean tasks) { GNOME_Evolution_StorageRegistry registry; GNOME_Evolution_StorageRegistry_StorageList *storage_list; GPtrArray *servers; int i, j, k; CORBA_Environment ev; servers = g_ptr_array_new (); g_object_ref (shell_client); registry = evolution_shell_client_get_storage_registry_interface (shell_client); CORBA_exception_init (&ev); storage_list = GNOME_Evolution_StorageRegistry_getStorageList (registry, &ev); if (BONOBO_EX (&ev)) { CORBA_exception_free (&ev); return servers; } for (i = 0; i < storage_list->_length; i++) { GNOME_Evolution_Storage storage; GNOME_Evolution_FolderList *folder_list; CORBA_exception_init (&ev); storage = storage_list->_buffer[i]; folder_list = GNOME_Evolution_Storage__get_folderList (storage, &ev); if (BONOBO_EX (&ev)) { CORBA_exception_free (&ev); continue; } CORBA_exception_free (&ev); for (j = 0; j < folder_list->_length; j++) { GNOME_Evolution_Folder folder; folder = folder_list->_buffer[j]; for (k = 0; possible_types[k] != NULL; k++) { CalClient *client; char *uri; if (itip->priv->destroyed) continue; if (strcmp (possible_types[k], folder.type)) continue; uri = cal_util_expand_uri (folder.physicalUri, tasks); client = start_calendar_server (itip, uri); if (client != NULL) g_ptr_array_add (servers, client); g_free (uri); break; } } CORBA_free (folder_list); } g_object_unref (shell_client); return servers; } #endif static CalClient * find_server (GPtrArray *servers, CalComponent *comp) { const char *uid; int i; cal_component_get_uid (comp, &uid); for (i = 0; i < servers->len; i++) { CalClient *client; icalcomponent *icalcomp; client = g_ptr_array_index (servers, i); if (cal_client_get_object (client, uid, NULL, &icalcomp, NULL)) { icalcomponent_free (icalcomp); g_object_ref (client); return client; } } return NULL; } static void html_destroyed (gpointer data) { EItipControl *itip = data; EItipControlPrivate *priv; priv = itip->priv; priv->html = NULL; } static void init (EItipControl *itip) { EItipControlPrivate *priv; GtkWidget *scrolled_window; priv = g_new0 (EItipControlPrivate, 1); itip->priv = priv; /* Addresses */ priv->accounts = itip_addresses_get (); /* Initialize the cal clients */ priv->event_clients = NULL; priv->event_client = NULL; priv->task_clients = NULL; priv->task_client = NULL; /* Other fields to init */ priv->calendar_uri = NULL; priv->from_address = NULL; priv->delegator_address = NULL; priv->delegator_name = NULL; priv->my_address = NULL; priv->view_only = 0; /* Html Widget */ priv->html = gtk_html_new (); gtk_html_set_default_content_type (GTK_HTML (priv->html), "text/html; charset=utf-8"); gtk_html_load_from_string (GTK_HTML (priv->html), " ", 1); gtk_widget_show (priv->html); scrolled_window = gtk_scrolled_window_new (NULL, NULL); gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); gtk_widget_show (scrolled_window); gtk_container_add (GTK_CONTAINER (scrolled_window), priv->html); gtk_object_weakref (GTK_OBJECT (priv->html), html_destroyed, itip); gtk_widget_set_usize (scrolled_window, 600, 400); gtk_box_pack_start (GTK_BOX (itip), scrolled_window, FALSE, FALSE, 6); g_signal_connect (priv->html, "url_requested", G_CALLBACK (url_requested_cb), itip); g_signal_connect (priv->html, "object_requested", G_CALLBACK (object_requested_cb), itip); g_signal_connect (priv->html, "submit", G_CALLBACK (ok_clicked_cb), itip); priv->destroyed = FALSE; } static void clean_up (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; if (!priv) return; g_free (priv->vcalendar); priv->vcalendar = NULL; if (priv->comp) { g_object_unref (priv->comp); priv->comp = NULL; } if (priv->top_level) { icalcomponent_free (priv->top_level); priv->top_level = NULL; } if (priv->main_comp) { icalcomponent_free (priv->main_comp); priv->main_comp = NULL; } priv->ical_comp = NULL; priv->current = 0; priv->total = 0; g_free (priv->calendar_uri); priv->calendar_uri = NULL; g_free (priv->from_address); priv->from_address = NULL; g_free (priv->delegator_address); priv->delegator_address = NULL; g_free (priv->delegator_name); priv->delegator_name = NULL; g_free (priv->my_address); priv->my_address = NULL; } static void destroy (GtkObject *obj) { EItipControl *itip = E_ITIP_CONTROL (obj); EItipControlPrivate *priv; priv = itip->priv; priv->destroyed = TRUE; (* GTK_OBJECT_CLASS (parent_class)->destroy) (obj); } static void finalize (GObject *obj) { EItipControl *itip = E_ITIP_CONTROL (obj); EItipControlPrivate *priv; int i; priv = itip->priv; clean_up (itip); if (priv->html) gtk_object_weakunref (GTK_OBJECT (priv->html), html_destroyed, itip); priv->accounts = NULL; if (priv->event_clients) { for (i = 0; i < priv->event_clients->len; i++) g_object_unref (g_ptr_array_index (priv->event_clients, i)); g_ptr_array_free (priv->event_clients, TRUE); priv->event_client = NULL; priv->event_clients = NULL; } if (priv->task_clients) { for (i = 0; i < priv->task_clients->len; i++) g_object_unref (g_ptr_array_index (priv->task_clients, i)); g_ptr_array_free (priv->task_clients, TRUE); priv->task_client = NULL; priv->task_clients = NULL; } g_free (priv); itip->priv = NULL; if (G_OBJECT_CLASS (parent_class)->finalize) (* G_OBJECT_CLASS (parent_class)->finalize) (obj); } GtkWidget * e_itip_control_new (void) { return g_object_new (E_TYPE_ITIP_CONTROL, NULL); } static void find_my_address (EItipControl *itip, icalcomponent *ical_comp) { EItipControlPrivate *priv; icalproperty *prop; char *my_alt_address = NULL; priv = itip->priv; /* If the mailer told us the address to use, use that */ if (priv->delegator_address != NULL) { priv->my_address = g_strdup (itip_strip_mailto (priv->delegator_address)); priv->my_address = g_strstrip (priv->my_address); return; } for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); prop != NULL; prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { icalvalue *value; icalparameter *param; const char *attendee, *name; char *attendee_clean, *name_clean; EIterator *it; value = icalproperty_get_value (prop); if (value != NULL) { attendee = icalvalue_get_string (value); attendee_clean = g_strdup (itip_strip_mailto (attendee)); attendee_clean = g_strstrip (attendee_clean); } else { attendee = NULL; attendee_clean = NULL; } param = icalproperty_get_first_parameter (prop, ICAL_CN_PARAMETER); if (param != NULL) { name = icalparameter_get_cn (param); name_clean = g_strdup (name); name_clean = g_strstrip (name_clean); } else { name = NULL; name_clean = NULL; } it = e_list_get_iterator((EList *)priv->accounts); while (e_iterator_is_valid(it)) { const EAccount *account = e_iterator_get(it); /* Check for a matching address */ if (attendee_clean != NULL && !g_ascii_strcasecmp (account->id->address, attendee_clean)) { priv->my_address = g_strdup (account->id->address); g_free (attendee_clean); g_free (name_clean); g_free (my_alt_address); g_object_unref(it); return; } /* Check for a matching cname to fall back on */ if (name_clean != NULL && !g_ascii_strcasecmp (account->id->name, name_clean)) my_alt_address = g_strdup (attendee_clean); e_iterator_next(it); } g_free (attendee_clean); g_free (name_clean); g_object_unref(it); } priv->my_address = my_alt_address; } static icalproperty * find_attendee (icalcomponent *ical_comp, const char *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)) { icalvalue *value; const char *attendee; char *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); if (!g_strcasecmp (address, text)) { g_free (text); break; } g_free (text); } return prop; } static void write_label_piece (EItipControl *itip, CalComponentDateTime *dt, char *buffer, int size, const char *stext, const char *etext, gboolean just_date) { EItipControlPrivate *priv; struct tm tmp_tm; char time_buf[64]; icaltimezone *zone = NULL; char *display_name; priv = itip->priv; /* UTC times get converted to the current timezone. This is done for the COMPLETED property, which is always in UTC, and also because Outlook sends simple events as UTC times. */ if (dt->value->is_utc) { char *location = calendar_config_get_timezone (); zone = icaltimezone_get_builtin_timezone (location); icaltimezone_convert_time (dt->value, icaltimezone_get_utc_timezone (), zone); } tmp_tm = icaltimetype_to_tm (dt->value); if (just_date) tmp_tm.tm_hour = tmp_tm.tm_min = tmp_tm.tm_sec = 0; if (stext != NULL) strcat (buffer, stext); e_time_format_date_and_time (&tmp_tm, calendar_config_get_24_hour_format (), FALSE, FALSE, time_buf, sizeof (time_buf)); strcat (buffer, time_buf); if (!dt->value->is_utc && dt->tzid) { zone = icalcomponent_get_timezone (priv->top_level, dt->tzid); } /* Output timezone after time, e.g. " America/New_York". */ if (zone && !just_date) { /* Note that this returns UTF-8, since all iCalendar data is UTF-8. But it probably is not translated. */ display_name = icaltimezone_get_display_name (zone); if (display_name && *display_name) { strcat (buffer, " ["); /* We check if it is one of our builtin timezone names, in which case we call gettext to translate it. */ if (icaltimezone_get_builtin_timezone (display_name)) { strcat (buffer, _(display_name)); } else { strcat (buffer, display_name); } strcat (buffer, "]"); } } if (etext != NULL) strcat (buffer, etext); } static const char * nth (int n) { if (n == -1) return "last"; else if (n < 1 || n > 31) return "?"; else return cal_recur_nth[n]; } static const char *dayname[] = { N_("Sunday"), N_("Monday"), N_("Tuesday"), N_("Wednesday"), N_("Thursday"), N_("Friday"), N_("Saturday") }; static inline char * get_dayname (struct icalrecurrencetype *r, int i) { enum icalrecurrencetype_weekday day; day = icalrecurrencetype_day_day_of_week (r->by_day[i]); g_return_val_if_fail (day > 0 && day < 8, "?"); return _(dayname[day - 1]); } static void write_recurrence_piece (EItipControl *itip, CalComponent *comp, char *buffer, int size) { GSList *rrules; struct icalrecurrencetype *r; int len, i; strcpy (buffer, "Recurring: "); len = strlen (buffer); buffer += len; size -= len; if (!cal_component_has_simple_recurrence (comp)) { strcpy (buffer, _("Yes. (Complex Recurrence)")); return; } cal_component_get_rrule_list (comp, &rrules); g_return_if_fail (rrules && !rrules->next); r = rrules->data; switch (r->freq) { case ICAL_DAILY_RECURRENCE: if (r->interval == 1) strcpy (buffer, _("Every day")); else sprintf (buffer, _("Every %d days"), r->interval); break; case ICAL_WEEKLY_RECURRENCE: if (r->by_day[0] == ICAL_RECURRENCE_ARRAY_MAX) { if (r->interval == 1) strcpy (buffer, _("Every week")); else sprintf (buffer, _("Every %d weeks"), r->interval); } else { if (r->interval == 1) strcpy (buffer, _("Every week on ")); else sprintf (buffer, _("Every %d weeks on "), r->interval); for (i = 1; i < 8 && r->by_day[i] != ICAL_RECURRENCE_ARRAY_MAX; i++) { if (i > 1) strcat (buffer, ", "); strcat (buffer, get_dayname (r, i - 1)); } if (i > 1) strcat (buffer, _(" and ")); strcat (buffer, get_dayname (r, i - 1)); } break; case ICAL_MONTHLY_RECURRENCE: if (r->by_month_day[0] != ICAL_RECURRENCE_ARRAY_MAX) { sprintf (buffer, _("The %s day of "), nth (r->by_month_day[0])); } else { int pos; /* Outlook 2000 uses BYDAY=TU;BYSETPOS=2, and will not accept BYDAY=2TU. So we now use the same as Outlook by default. */ pos = icalrecurrencetype_day_position (r->by_day[0]); if (pos == 0) pos = r->by_set_pos[0]; sprintf (buffer, _("The %s %s of "), nth (pos), get_dayname (r, 0)); } if (r->interval == 1) strcat (buffer, _("every month")); else { len = strlen (buffer); buffer += len; size -= len; sprintf (buffer, _("every %d months"), r->interval); } break; case ICAL_YEARLY_RECURRENCE: if (r->interval == 1) strcpy (buffer, _("Every year")); else { sprintf (buffer, _("Every %d years"), r->interval); } break; default: g_assert_not_reached (); } len = strlen (buffer); buffer += len; size -= len; if (r->count) { sprintf (buffer, _(" a total of %d times"), r->count); } else if (!icaltime_is_null_time (r->until)) { CalComponentDateTime dt; /* FIXME This should get the tzid id, not the whole zone */ dt.value = &r->until; dt.tzid = r->until.zone; write_label_piece (itip, &dt, buffer, size, _(", ending on "), NULL, TRUE); } strcat (buffer, "
"); } static void set_date_label (EItipControl *itip, GtkHTML *html, GtkHTMLStream *html_stream, CalComponent *comp) { EItipControlPrivate *priv; CalComponentDateTime datetime; static char buffer[1024]; gboolean wrote = FALSE, task_completed = FALSE; CalComponentVType type; priv = itip->priv; type = cal_component_get_vtype (comp); buffer[0] = '\0'; cal_component_get_dtstart (comp, &datetime); if (datetime.value) { write_label_piece (itip, &datetime, buffer, 1024, _("Starts: "), "
", FALSE); gtk_html_write (html, html_stream, buffer, strlen(buffer)); wrote = TRUE; } cal_component_free_datetime (&datetime); buffer[0] = '\0'; cal_component_get_dtend (comp, &datetime); if (datetime.value){ write_label_piece (itip, &datetime, buffer, 1024, _("Ends: "), "
", FALSE); gtk_html_write (html, html_stream, buffer, strlen (buffer)); wrote = TRUE; } cal_component_free_datetime (&datetime); buffer[0] = '\0'; if (cal_component_has_recurrences (comp)) { write_recurrence_piece (itip, comp, buffer, 1024); gtk_html_write (html, html_stream, buffer, strlen (buffer)); wrote = TRUE; } buffer[0] = '\0'; datetime.tzid = NULL; cal_component_get_completed (comp, &datetime.value); if (type == CAL_COMPONENT_TODO && datetime.value) { /* Pass TRUE as is_utc, so it gets converted to the current timezone. */ datetime.value->is_utc = TRUE; write_label_piece (itip, &datetime, buffer, 1024, _("Completed: "), "
", FALSE); gtk_html_write (html, html_stream, buffer, strlen (buffer)); wrote = TRUE; task_completed = TRUE; } cal_component_free_datetime (&datetime); buffer[0] = '\0'; cal_component_get_due (comp, &datetime); if (type == CAL_COMPONENT_TODO && !task_completed && datetime.value) { write_label_piece (itip, &datetime, buffer, 1024, _("Due: "), "
", FALSE); gtk_html_write (html, html_stream, buffer, strlen (buffer)); wrote = TRUE; } cal_component_free_datetime (&datetime); if (wrote) gtk_html_stream_printf (html_stream, "
"); } static void set_message (GtkHTML *html, GtkHTMLStream *html_stream, const gchar *message, gboolean err) { if (message == NULL) return; if (err) { gtk_html_stream_printf (html_stream, "%s

", message); } else { gtk_html_stream_printf (html_stream, "%s

", message); } } static void write_error_html (EItipControl *itip, const gchar *itip_err) { EItipControlPrivate *priv; GtkHTMLStream *html_stream; priv = itip->priv; /* Html widget */ html_stream = gtk_html_begin (GTK_HTML (priv->html)); gtk_html_stream_printf (html_stream, "%s", _("iCalendar Information")); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_BODY_START, strlen(HTML_BODY_START)); /* The table */ gtk_html_stream_printf (html_stream, ""); /* The column for the image */ gtk_html_stream_printf (html_stream, ""); gtk_html_stream_printf (html_stream, "
"); /* The image */ gtk_html_stream_printf (html_stream, ""); /* Title */ set_message (GTK_HTML (priv->html), html_stream, _("iCalendar Error"), TRUE); /* Error */ gtk_html_write (GTK_HTML (priv->html), html_stream, itip_err, strlen(itip_err)); /* Clean up */ gtk_html_stream_printf (html_stream, "
"); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_BODY_END, strlen(HTML_BODY_END)); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_FOOTER, strlen(HTML_FOOTER)); gtk_html_end (GTK_HTML (priv->html), html_stream, GTK_HTML_STREAM_OK); } static void write_html (EItipControl *itip, const gchar *itip_desc, const gchar *itip_title, const gchar *options) { EItipControlPrivate *priv; GtkHTMLStream *html_stream; CalComponentText text; CalComponentOrganizer organizer; CalComponentAttendee *attendee; GSList *attendees, *l = NULL; const char *string; gchar *html; const gchar *const_html; priv = itip->priv; if (priv->html == NULL) return; /* Html widget */ html_stream = gtk_html_begin (GTK_HTML (priv->html)); gtk_html_stream_printf (html_stream, "%s", _("iCalendar Information")); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_BODY_START, strlen(HTML_BODY_START)); /* The table */ const_html = ""; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); /* The column for the image */ const_html = ""; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); const_html = "
"; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); /* The image */ const_html = ""; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); switch (priv->method) { case ICAL_METHOD_REFRESH: case ICAL_METHOD_REPLY: /* An attendee sent this */ cal_component_get_attendee_list (priv->comp, &attendees); if (attendees != NULL) { attendee = attendees->data; html = g_strdup_printf (itip_desc, attendee->cn ? attendee->cn : itip_strip_mailto (attendee->value)); } else { html = g_strdup_printf (itip_desc, _("An unknown person")); } break; case ICAL_METHOD_REQUEST: /* The organizer sent this */ cal_component_get_organizer (priv->comp, &organizer); if (priv->delegator_address != NULL) { if (organizer.value != NULL) html = g_strdup_printf (itip_desc, organizer.cn ? organizer.cn : itip_strip_mailto (organizer.value), priv->delegator_name ? priv->delegator_name : priv->delegator_address); else html = g_strdup_printf (itip_desc, _("An unknown person"), priv->delegator_name ? priv->delegator_name : priv->delegator_address); } else { if (organizer.value != NULL) html = g_strdup_printf (itip_desc, organizer.cn ? organizer.cn : itip_strip_mailto (organizer.value)); else html = g_strdup_printf (itip_desc, _("An unknown person")); } break; case ICAL_METHOD_PUBLISH: case ICAL_METHOD_ADD: case ICAL_METHOD_CANCEL: default: /* The organizer sent this */ cal_component_get_organizer (priv->comp, &organizer); if (organizer.value != NULL) html = g_strdup_printf (itip_desc, organizer.cn ? organizer.cn : itip_strip_mailto (organizer.value)); else html = g_strdup_printf (itip_desc, _("An unknown person")); break; } gtk_html_write (GTK_HTML (priv->html), html_stream, html, strlen(html)); g_free (html); /* Describe what the user can do */ const_html = _("
Please review the following information, " "and then select an action from the menu below."); gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); /* Separator */ gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_SEP, strlen (HTML_SEP)); /* Title */ set_message (GTK_HTML (priv->html), html_stream, itip_title, FALSE); /* Date information */ set_date_label (itip, GTK_HTML (priv->html), html_stream, priv->comp); /* Summary */ cal_component_get_summary (priv->comp, &text); html = text.value ? camel_text_to_html (text.value, CAMEL_MIME_FILTER_TOHTML_CONVERT_NL, 0) : _("None"); gtk_html_stream_printf (html_stream, "%s
%s

", _("Summary:"), html); if (text.value) g_free (html); /* Location */ cal_component_get_location (priv->comp, &string); if (string != NULL) { html = camel_text_to_html (string, CAMEL_MIME_FILTER_TOHTML_CONVERT_NL, 0); gtk_html_stream_printf (html_stream, "%s
%s

", _("Location:"), html); g_free (html); } /* Status */ if (priv->method == ICAL_METHOD_REPLY) { GSList *alist; cal_component_get_attendee_list (priv->comp, &alist); if (alist != NULL) { CalComponentAttendee *a = alist->data; gtk_html_stream_printf (html_stream, "%s
", _("Status:")); switch (a->status) { case ICAL_PARTSTAT_ACCEPTED: gtk_html_stream_printf (html_stream, "%s

", _("Accepted")); break; case ICAL_PARTSTAT_TENTATIVE: gtk_html_stream_printf (html_stream, "%s

", _("Tentatively Accepted")); break; case ICAL_PARTSTAT_DECLINED: gtk_html_stream_printf (html_stream, "%s

", _("Declined")); break; default: gtk_html_stream_printf (html_stream, "%s

", _("Unknown")); } } cal_component_free_attendee_list (alist); } /* Description */ cal_component_get_description_list (priv->comp, &l); if (l) text = *((CalComponentText *)l->data); if (l && text.value) { html = camel_text_to_html (text.value, CAMEL_MIME_FILTER_TOHTML_CONVERT_NL, 0); gtk_html_stream_printf (html_stream, "%s
%s", _("Description:"), html); g_free (html); } cal_component_free_text_list (l); /* Separator */ gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_SEP, strlen (HTML_SEP)); /* Options */ if (!e_itip_control_get_view_only (itip)) { if (options != NULL) { const_html = "
"; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen (const_html)); gtk_html_write (GTK_HTML (priv->html), html_stream, options, strlen (options)); } } const_html = "
"; gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html)); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_BODY_END, strlen(HTML_BODY_END)); gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_FOOTER, strlen(HTML_FOOTER)); gtk_html_end (GTK_HTML (priv->html), html_stream, GTK_HTML_STREAM_OK); } static char* get_publish_options (gboolean selector) { char *html; html = g_strdup_printf ("
%s " "    " "" "
", _("Choose an action:"), _("Update"), _("OK")); if (selector) { char *sel; sel = g_strconcat (html, "", NULL); g_free (html); html = sel; } return html; } static char* get_request_options (gboolean selector) { char *html; html = g_strdup_printf ("
%s " "  " "%s  " "
" "
", _("Choose an action:"), _("Accept"), _("Tentatively accept"), _("Decline"), _("RSVP"), _("OK")); if (selector) { char *sel; sel = g_strconcat (html, "", NULL); g_free (html); html = sel; } return html; } static char* get_request_fb_options () { return g_strdup_printf ("
%s " "    " "" "
", _("Choose an action:"), _("Send Free/Busy Information"), _("OK")); } static char* get_reply_options () { return g_strdup_printf ("
%s " "    " "" "
", _("Choose an action:"), _("Update respondent status"), _("OK")); } static char* get_refresh_options () { return g_strdup_printf ("
%s " "    " "" "
", _("Choose an action:"), _("Send Latest Information"), _("OK")); } static char* get_cancel_options () { return g_strdup_printf ("
%s " "    " "" "
", _("Choose an action:"), _("Cancel"), _("OK")); } static CalComponent * get_real_item (EItipControl *itip) { EItipControlPrivate *priv; CalComponent *comp; icalcomponent *icalcomp; CalComponentVType type; gboolean found = FALSE; const char *uid; priv = itip->priv; type = cal_component_get_vtype (priv->comp); cal_component_get_uid (priv->comp, &uid); switch (type) { case CAL_COMPONENT_EVENT: if (priv->event_client != NULL) found = cal_client_get_object (priv->event_client, uid, NULL, &icalcomp, NULL); break; case CAL_COMPONENT_TODO: if (priv->task_client != NULL) found = cal_client_get_object (priv->task_client, uid, NULL, &icalcomp, NULL); break; default: found = FALSE; } if (!found) return NULL; comp = cal_component_new (); if (!cal_component_set_icalcomponent (comp, icalcomp)) { g_object_unref (comp); icalcomponent_free (icalcomp); return NULL; } return comp; } static void adjust_item (EItipControl *itip, CalComponent *comp) { CalComponent *real_comp; real_comp = get_real_item (itip); if (real_comp != NULL) { CalComponentText text; const char *string; GSList *l; cal_component_get_summary (real_comp, &text); cal_component_set_summary (comp, &text); cal_component_get_location (real_comp, &string); cal_component_set_location (comp, string); cal_component_get_description_list (real_comp, &l); cal_component_set_description_list (comp, l); cal_component_free_text_list (l); g_object_unref (real_comp); } else { CalComponentText text = {_("Unknown"), NULL}; cal_component_set_summary (comp, &text); } } static void show_current_event (EItipControl *itip) { EItipControlPrivate *priv; const gchar *itip_title, *itip_desc; char *options; priv = itip->priv; if (priv->calendar_uri) priv->event_client = start_calendar_server (itip, priv->calendar_uri); else priv->event_client = find_server (priv->event_clients, priv->comp); switch (priv->method) { case ICAL_METHOD_PUBLISH: itip_desc = _("%s has published meeting information."); itip_title = _("Meeting Information"); options = get_publish_options (priv->event_client ? FALSE : TRUE); break; case ICAL_METHOD_REQUEST: if (priv->delegator_address != NULL) itip_desc = _("%s requests the presence of %s at a meeting."); else itip_desc = _("%s requests your presence at a meeting."); itip_title = _("Meeting Proposal"); options = get_request_options (priv->event_client ? FALSE : TRUE); break; case ICAL_METHOD_ADD: itip_desc = _("%s wishes to add to an existing meeting."); itip_title = _("Meeting Update"); options = get_publish_options (priv->event_client ? FALSE : TRUE); break; case ICAL_METHOD_REFRESH: itip_desc = _("%s wishes to receive the latest meeting information."); itip_title = _("Meeting Update Request"); options = get_refresh_options (); /* Provide extra info, since its not in the component */ adjust_item (itip, priv->comp); break; case ICAL_METHOD_REPLY: itip_desc = _("%s has replied to a meeting request."); itip_title = _("Meeting Reply"); options = get_reply_options (); /* Provide extra info, since might not be in the component */ adjust_item (itip, priv->comp); break; case ICAL_METHOD_CANCEL: itip_desc = _("%s has cancelled a meeting."); itip_title = _("Meeting Cancellation"); options = get_cancel_options (); /* Provide extra info, since might not be in the component */ adjust_item (itip, priv->comp); break; default: itip_desc = _("%s has sent an unintelligible message."); itip_title = _("Bad Meeting Message"); options = NULL; } write_html (itip, itip_desc, itip_title, options); g_free (options); } static void show_current_todo (EItipControl *itip) { EItipControlPrivate *priv; const gchar *itip_title, *itip_desc; char *options; priv = itip->priv; if (priv->calendar_uri) priv->task_client = start_calendar_server (itip, priv->calendar_uri); else priv->task_client = find_server (priv->task_clients, priv->comp); switch (priv->method) { case ICAL_METHOD_PUBLISH: itip_desc = _("%s has published task information."); itip_title = _("Task Information"); options = get_publish_options (priv->task_client ? FALSE : TRUE); break; case ICAL_METHOD_REQUEST: if (priv->delegator_address != NULL) itip_desc = _("%s requests %s to perform a task."); else itip_desc = _("%s requests you perform a task."); itip_title = _("Task Proposal"); options = get_request_options (priv->task_client ? FALSE : TRUE); break; case ICAL_METHOD_ADD: itip_desc = _("%s wishes to add to an existing task."); itip_title = _("Task Update"); options = get_publish_options (priv->task_client ? FALSE : TRUE); break; case ICAL_METHOD_REFRESH: itip_desc = _("%s wishes to receive the latest task information."); itip_title = _("Task Update Request"); options = get_refresh_options (); /* Provide extra info, since its not in the component */ adjust_item (itip, priv->comp); break; case ICAL_METHOD_REPLY: itip_desc = _("%s has replied to a task assignment."); itip_title = _("Task Reply"); options = get_reply_options (); /* Provide extra info, since might not be in the component */ adjust_item (itip, priv->comp); break; case ICAL_METHOD_CANCEL: itip_desc = _("%s has cancelled a task."); itip_title = _("Task Cancellation"); options = get_cancel_options (); /* Provide extra info, since might not be in the component */ adjust_item (itip, priv->comp); break; default: itip_desc = _("%s has sent an unintelligible message."); itip_title = _("Bad Task Message"); options = NULL; } write_html (itip, itip_desc, itip_title, options); g_free (options); } static void show_current_freebusy (EItipControl *itip) { EItipControlPrivate *priv; const gchar *itip_title, *itip_desc; char *options; priv = itip->priv; switch (priv->method) { case ICAL_METHOD_PUBLISH: itip_desc = _("%s has published free/busy information."); itip_title = _("Free/Busy Information"); options = NULL; break; case ICAL_METHOD_REQUEST: itip_desc = _("%s requests your free/busy information."); itip_title = _("Free/Busy Request"); options = get_request_fb_options (); break; case ICAL_METHOD_REPLY: itip_desc = _("%s has replied to a free/busy request."); itip_title = _("Free/Busy Reply"); options = NULL; break; default: itip_desc = _("%s has sent an unintelligible message."); itip_title = _("Bad Free/Busy Message"); options = NULL; } write_html (itip, itip_desc, itip_title, options); g_free (options); } static icalcomponent * get_next (icalcompiter *iter) { icalcomponent *ret = NULL; icalcomponent_kind kind; do { icalcompiter_next (iter); ret = icalcompiter_deref (iter); kind = icalcomponent_isa (ret); } while (ret != NULL && kind != ICAL_VEVENT_COMPONENT && kind != ICAL_VTODO_COMPONENT && kind != ICAL_VFREEBUSY_COMPONENT); return ret; } static void show_current (EItipControl *itip) { EItipControlPrivate *priv; CalComponentVType type; icalcomponent *alarm_comp; icalcompiter alarm_iter; icalproperty *prop; priv = itip->priv; g_object_ref (itip); if (priv->comp) g_object_unref (priv->comp); if (priv->event_client != NULL) g_object_unref (priv->event_client); priv->event_client = NULL; if (priv->task_client != NULL) g_object_unref (priv->task_client); priv->task_client = NULL; /* Determine any delegate sections */ prop = icalcomponent_get_first_property (priv->ical_comp, ICAL_X_PROPERTY); while (prop) { const char *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-URI")) e_itip_control_set_calendar_uri (itip, x_val); else if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-ADDRESS")) e_itip_control_set_delegator_address (itip, x_val); else if (!strcmp (x_name, "X-EVOLUTION-DELEGATOR-NAME")) e_itip_control_set_delegator_name (itip, x_val); prop = icalcomponent_get_next_property (priv->ical_comp, ICAL_X_PROPERTY); } /* Strip out alarms for security purposes */ alarm_iter = icalcomponent_begin_component (priv->ical_comp, ICAL_VALARM_COMPONENT); while ((alarm_comp = icalcompiter_deref (&alarm_iter)) != NULL) { icalcomponent_remove_component (priv->ical_comp, alarm_comp); icalcompiter_next (&alarm_iter); } priv->comp = cal_component_new (); if (!cal_component_set_icalcomponent (priv->comp, priv->ical_comp)) { write_error_html (itip, _("The message does not appear to be properly formed")); g_object_unref (priv->comp); priv->comp = NULL; g_object_unref (itip); return; }; /* Add default reminder if the config says so */ if (calendar_config_get_use_default_reminder ()) { CalComponentAlarm *acomp; int interval; CalUnits units; CalAlarmTrigger trigger; interval = calendar_config_get_default_reminder_interval (); units = calendar_config_get_default_reminder_units (); acomp = cal_component_alarm_new (); cal_component_alarm_set_action (acomp, CAL_ALARM_DISPLAY); trigger.type = CAL_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 CAL_MINUTES: trigger.u.rel_duration.minutes = interval; break; case CAL_HOURS: trigger.u.rel_duration.hours = interval; break; case CAL_DAYS: trigger.u.rel_duration.days = interval; break; default: g_assert_not_reached (); } cal_component_alarm_set_trigger (acomp, trigger); cal_component_add_alarm (priv->comp, acomp); cal_component_alarm_free (acomp); } type = cal_component_get_vtype (priv->comp); switch (type) { case CAL_COMPONENT_EVENT: if (!priv->event_clients) { priv->event_clients = g_ptr_array_new (); /* EPFIXME */ /* priv->event_clients = get_servers (itip, global_shell_client, calendar_types, FALSE); */ } show_current_event (itip); break; case CAL_COMPONENT_TODO: if (!priv->task_clients) { /* EPFIXME */ /* priv->task_clients = get_servers (itip, global_shell_client, tasks_types, TRUE); */ } show_current_todo (itip); break; case CAL_COMPONENT_FREEBUSY: show_current_freebusy (itip); break; default: write_error_html (itip, _("The message contains only unsupported requests.")); } find_my_address (itip, priv->ical_comp); g_object_unref (itip); } void e_itip_control_set_data (EItipControl *itip, const gchar *text) { EItipControlPrivate *priv; icalproperty *prop; icalcomponent_kind kind = ICAL_NO_COMPONENT; icalcomponent *tz_comp; icalcompiter tz_iter; priv = itip->priv; clean_up (itip); if (text == NULL || *text == '\0') { gtk_html_load_from_string (GTK_HTML (priv->html), " ", 1); return; } priv->vcalendar = g_strdup (text); priv->top_level = cal_util_new_top_level (); priv->main_comp = icalparser_parse_string (priv->vcalendar); if (priv->main_comp == NULL) { write_error_html (itip, _("The attachment does not contain a valid calendar message")); return; } prop = icalcomponent_get_first_property (priv->main_comp, ICAL_METHOD_PROPERTY); if (prop == NULL) { write_error_html (itip, _("The attachment does not contain a valid calendar message")); return; } priv->method = icalproperty_get_method (prop); tz_iter = icalcomponent_begin_component (priv->main_comp, ICAL_VTIMEZONE_COMPONENT); while ((tz_comp = icalcompiter_deref (&tz_iter)) != NULL) { icalcomponent *clone; clone = icalcomponent_new_clone (tz_comp); icalcomponent_add_component (priv->top_level, clone); icalcompiter_next (&tz_iter); } priv->iter = icalcomponent_begin_component (priv->main_comp, ICAL_ANY_COMPONENT); priv->ical_comp = icalcompiter_deref (&priv->iter); kind = icalcomponent_isa (priv->ical_comp); if (kind != ICAL_VEVENT_COMPONENT && kind != ICAL_VTODO_COMPONENT && kind != ICAL_VFREEBUSY_COMPONENT) priv->ical_comp = get_next (&priv->iter); if (priv->ical_comp == NULL) { write_error_html (itip, _("The attachment has no viewable calendar items")); return; } priv->total = icalcomponent_count_components (priv->main_comp, ICAL_VEVENT_COMPONENT); priv->total += icalcomponent_count_components (priv->main_comp, ICAL_VTODO_COMPONENT); priv->total += icalcomponent_count_components (priv->main_comp, ICAL_VFREEBUSY_COMPONENT); if (priv->total > 0) priv->current = 1; else priv->current = 0; show_current (itip); } gchar * e_itip_control_get_data (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return g_strdup (priv->vcalendar); } gint e_itip_control_get_data_size (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; if (priv->vcalendar == NULL) return 0; return strlen (priv->vcalendar); } void e_itip_control_set_from_address (EItipControl *itip, const gchar *address) { EItipControlPrivate *priv; priv = itip->priv; if (priv->from_address) g_free (priv->from_address); priv->from_address = g_strdup (address); } const gchar * e_itip_control_get_from_address (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return priv->from_address; } void e_itip_control_set_view_only (EItipControl *itip, gint view_only) { EItipControlPrivate *priv; priv = itip->priv; priv->view_only = view_only; } gint e_itip_control_get_view_only (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return priv->view_only; } void e_itip_control_set_delegator_address (EItipControl *itip, const gchar *address) { EItipControlPrivate *priv; priv = itip->priv; if (priv->delegator_address) g_free (priv->delegator_address); priv->delegator_address = g_strdup (address); } const gchar * e_itip_control_get_delegator_address (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return priv->delegator_address; } void e_itip_control_set_delegator_name (EItipControl *itip, const gchar *name) { EItipControlPrivate *priv; priv = itip->priv; if (priv->delegator_name) g_free (priv->delegator_name); priv->delegator_name = g_strdup (name); } const gchar * e_itip_control_get_delegator_name (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return priv->delegator_name; } void e_itip_control_set_calendar_uri (EItipControl *itip, const gchar *uri) { EItipControlPrivate *priv; priv = itip->priv; if (priv->calendar_uri) g_free (priv->calendar_uri); priv->calendar_uri = g_strdup (uri); } const gchar * e_itip_control_get_calendar_uri (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; return priv->calendar_uri; } static gboolean change_status (icalcomponent *ical_comp, const char *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 { EAccount *a; a = itip_addresses_get_default (); prop = icalproperty_new_attendee (a->id->address); icalcomponent_add_property (ical_comp, prop); param = icalparameter_new_cn (a->id->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); } } return TRUE; } static void update_item (EItipControl *itip) { EItipControlPrivate *priv; struct icaltimetype stamp; icalproperty *prop; icalcomponent *clone; CalClient *client; CalComponentVType type; GtkWidget *dialog; priv = itip->priv; /* 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 ()); prop = icalproperty_new_x (icaltime_as_ical_string (stamp)); icalproperty_set_x_name (prop, "X-MICROSOFT-CDO-REPLYTIME"); icalcomponent_add_property (priv->ical_comp, prop); type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) client = priv->task_client; else client = priv->event_client; clone = icalcomponent_new_clone (priv->ical_comp); icalcomponent_add_component (priv->top_level, clone); icalcomponent_set_method (priv->top_level, priv->method); /* FIXME Better error dialog */ if (!cal_client_receive_objects (client, priv->top_level, NULL)) { dialog = gnome_warning_dialog (_("Calendar file could not be updated!\n")); } else { dialog = gnome_ok_dialog (_("Update complete\n")); } gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); icalcomponent_remove_component (priv->top_level, clone); } #if 0 static void update_attendee_status (EItipControl *itip) { EItipControlPrivate *priv; CalClient *client; CalClientGetStatus status; CalComponent *comp = NULL; icalcomponent *icalcomp = NULL; CalComponentVType type; const char *uid; GtkWidget *dialog; CalClientResult result; priv = itip->priv; type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) client = priv->task_client; else client = priv->event_client; if (client == NULL) { dialog = gnome_warning_dialog (_("Attendee status can not be updated " "because the item no longer exists")); goto cleanup; } /* Obtain our version */ cal_component_get_uid (priv->comp, &uid); status = cal_client_get_object (client, uid, NULL, &icalcomp); if (status == CAL_CLIENT_GET_SUCCESS) { GSList *attendees; comp = cal_component_new (); if (!cal_component_set_icalcomponent (comp, icalcomp)) { icalcomponent_free (icalcomp); dialog = gnome_warning_dialog (_("Object is invalid and cannot be updated\n")); } else { cal_component_get_attendee_list (priv->comp, &attendees); if (attendees != NULL) { CalComponentAttendee *a = attendees->data; icalproperty *prop; prop = find_attendee (icalcomp, itip_strip_mailto (a->value)); if (prop == NULL) { dialog = gnome_question_dialog_modal (_("This response is not from a current " "attendee. Add as an attendee?"), NULL, NULL); if (gnome_dialog_run_and_close (GNOME_DIALOG (dialog)) == GNOME_YES) { change_status (icalcomp, itip_strip_mailto (a->value), a->status); cal_component_rescan (comp); } else { goto cleanup; } } else if (a->status == ICAL_PARTSTAT_NONE || a->status == ICAL_PARTSTAT_X) { dialog = gnome_warning_dialog (_("Attendee status could " "not be updated because " "of an invalid status!\n")); goto cleanup; } else { change_status (icalcomp, itip_strip_mailto (a->value), a->status); cal_component_rescan (comp); } } } result = cal_client_update_object (client, comp); switch (result) { case CAL_CLIENT_RESULT_INVALID_OBJECT : dialog = gnome_warning_dialog (_("Object is invalid and cannot be updated\n")); break; case CAL_CLIENT_RESULT_CORBA_ERROR : dialog = gnome_warning_dialog (_("There was an error on the CORBA system\n")); break; case CAL_CLIENT_RESULT_NOT_FOUND : dialog = gnome_warning_dialog (_("Object could not be found\n")); break; case CAL_CLIENT_RESULT_PERMISSION_DENIED : dialog = gnome_warning_dialog (_("You don't have the right permissions to update the calendar\n")); break; case CAL_CLIENT_RESULT_SUCCESS : dialog = gnome_ok_dialog (_("Attendee status updated\n")); break; default : dialog = gnome_warning_dialog (_("Attendee status could not be updated!\n")); } } else { dialog = gnome_warning_dialog (_("Attendee status can not be updated " "because the item no longer exists")); } cleanup: if (comp != NULL) g_object_unref (comp); gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } #endif static void remove_item (EItipControl *itip) { EItipControlPrivate *priv; CalClient *client; CalComponentVType type; const char *uid; GtkWidget *dialog; GError *error = NULL; priv = itip->priv; type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) client = priv->task_client; else client = priv->event_client; if (client == NULL) return; cal_component_get_uid (priv->comp, &uid); cal_client_remove_object (client, uid, &error); if (!error || error->code == E_CALENDAR_STATUS_OBJECT_NOT_FOUND) { dialog = gnome_ok_dialog (_("Removal Complete")); gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } else { delete_error_dialog (error, type); } g_clear_error (&error); } static void send_item (EItipControl *itip) { EItipControlPrivate *priv; CalComponent *comp; CalComponentVType vtype; GtkWidget *dialog; priv = itip->priv; comp = get_real_item (itip); vtype = cal_component_get_vtype (comp); if (comp != NULL) { switch (vtype) { case CAL_COMPONENT_EVENT: itip_send_comp (CAL_COMPONENT_METHOD_REQUEST, comp, priv->event_client, NULL); break; case CAL_COMPONENT_TODO: itip_send_comp (CAL_COMPONENT_METHOD_REQUEST, comp, priv->task_client, NULL); break; default: itip_send_comp (CAL_COMPONENT_METHOD_REQUEST, comp, NULL, NULL); } g_object_unref (comp); dialog = gnome_ok_dialog (_("Item sent!\n")); } else { dialog = gnome_warning_dialog (_("The item could not be sent!\n")); } gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } static void send_freebusy (EItipControl *itip) { EItipControlPrivate *priv; CalComponentDateTime datetime; time_t start, end; GtkWidget *dialog; GList *comp_list = NULL; icaltimezone *zone; priv = itip->priv; cal_component_get_dtstart (priv->comp, &datetime); if (datetime.tzid) { zone = icalcomponent_get_timezone (priv->top_level, datetime.tzid); } else { zone = NULL; } start = icaltime_as_timet_with_zone (*datetime.value, zone); cal_component_free_datetime (&datetime); cal_component_get_dtend (priv->comp, &datetime); if (datetime.tzid) { zone = icalcomponent_get_timezone (priv->top_level, datetime.tzid); } else { zone = NULL; } end = icaltime_as_timet_with_zone (*datetime.value, zone); cal_component_free_datetime (&datetime); if (cal_client_get_free_busy (priv->event_client, NULL, start, end, &comp_list, NULL)) { GList *l; for (l = comp_list; l; l = l->next) { CalComponent *comp = CAL_COMPONENT (l->data); itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp, priv->event_client, NULL); g_object_unref (comp); } dialog = gnome_ok_dialog (_("Item sent!\n")); g_list_free (comp_list); } else { dialog = gnome_warning_dialog (_("The item could not be sent!\n")); } gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } static void button_selected_cb (EvolutionFolderSelectorButton *button, GNOME_Evolution_Folder *folder, gpointer data) { EItipControl *itip = E_ITIP_CONTROL (data); EItipControlPrivate *priv; CalComponentVType type; char *uri; priv = itip->priv; type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) uri = cal_util_expand_uri (folder->physicalUri, TRUE); else uri = cal_util_expand_uri (folder->physicalUri, FALSE); g_object_unref (priv->event_client); priv->event_client = start_calendar_server (itip, uri); g_free (uri); } static void url_requested_cb (GtkHTML *html, const gchar *url, GtkHTMLStream *handle, gpointer data) { unsigned char buffer[4096]; int len, fd; char *path; path = g_strdup_printf ("%s/%s", EVOLUTION_IMAGESDIR, url); if ((fd = open (path, O_RDONLY)) == -1) { g_warning ("%s", g_strerror (errno)); goto cleanup; } while ((len = read (fd, buffer, 4096)) > 0) { gtk_html_write (html, handle, buffer, len); } if (len < 0) { /* check to see if we stopped because of an error */ gtk_html_end (html, handle, GTK_HTML_STREAM_ERROR); g_warning ("%s", g_strerror (errno)); goto cleanup; } /* done with no errors */ gtk_html_end (html, handle, GTK_HTML_STREAM_OK); close (fd); cleanup: g_free (path); } typedef struct { EItipControl *itip; GtkHTMLEmbedded *eb; CalClient *client; } ObjectRequestContext; static void default_server_started_cb (CalClient *client, CalClientOpenStatus status, gpointer data) { ObjectRequestContext *context = data; EItipControlPrivate *priv; GtkWidget *button; CalComponentVType vtype; priv = context->itip->priv; if (status != CAL_CLIENT_OPEN_SUCCESS || context->itip->priv->destroyed || context->itip->priv->html == NULL) { g_object_unref (context->client); g_object_unref (context->itip); g_free (context); return; } priv->event_client = client; vtype = cal_component_get_vtype (priv->comp); switch (vtype) { #if 0 /* EPFIXME */ case CAL_COMPONENT_EVENT: button = evolution_folder_selector_button_new ( global_shell_client, _("Select Calendar Folder"), calendar_config_default_calendar_folder (), calendar_types); break; case CAL_COMPONENT_TODO: button = evolution_folder_selector_button_new ( global_shell_client, _("Select Tasks Folder"), calendar_config_default_tasks_folder (), tasks_types); break; #endif default: button = NULL; } g_signal_connect (button, "selected", G_CALLBACK (button_selected_cb), context->itip); gtk_container_add (GTK_CONTAINER (context->eb), button); gtk_widget_show (button); g_object_unref (context->itip); g_free (context); return; } static gboolean object_requested_cb (GtkHTML *html, GtkHTMLEmbedded *eb, gpointer data) { EItipControl *itip = E_ITIP_CONTROL (data); ObjectRequestContext *context; EItipControlPrivate *priv; CalComponentVType vtype; gboolean success; priv = itip->priv; vtype = cal_component_get_vtype (priv->comp); context = g_new0 (ObjectRequestContext, 1); context->itip = itip; context->eb = eb; /* FIXME: use the default URIs */ switch (vtype) { case CAL_COMPONENT_EVENT: context->client = cal_client_new ("", CALOBJ_TYPE_EVENT); success = start_default_server (itip, context->client, FALSE); break; case CAL_COMPONENT_TODO: context->client = cal_client_new ("", CALOBJ_TYPE_TODO); success = start_default_server (itip, context->client, TRUE); break; default: g_free (context); return FALSE; } if (!success) { g_object_unref (context->client); g_free (context); return FALSE; } g_object_ref (itip); return TRUE; } static void ok_clicked_cb (GtkHTML *html, const gchar *method, const gchar *url, const gchar *encoding, gpointer data) { EItipControl *itip = E_ITIP_CONTROL (data); EItipControlPrivate *priv; gchar **fields; gboolean rsvp = FALSE, status = FALSE; int i; priv = itip->priv; fields = g_strsplit (encoding, "&", -1); for (i = 0; fields[i] != NULL; i++) { gchar **key_value; key_value = g_strsplit (fields[i], "=", 2); if (key_value[0] != NULL && !strcmp (key_value[0], "action")) { if (key_value[1] == NULL) break; switch (key_value[1][0]) { case 'U': update_item (itip); break; case 'A': status = change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_ACCEPTED); if (status) { cal_component_rescan (priv->comp); update_item (itip); } break; case 'T': status = change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_TENTATIVE); if (status) { cal_component_rescan (priv->comp); update_item (itip); } break; case 'D': status = change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_DECLINED); if (status) { cal_component_rescan (priv->comp); remove_item (itip); } break; case 'F': send_freebusy (itip); break; case 'R': /* FIXME Make sure this does the right thing in the backend */ update_item (itip); break; case 'S': send_item (itip); break; case 'C': update_item (itip); break; } } if (key_value[0] != NULL && !strcmp (key_value[0], "rsvp")) if (*key_value[1] == '1') rsvp = TRUE; g_strfreev (key_value); } g_strfreev (fields); if (rsvp && status) { CalComponent *comp = NULL; CalComponentVType vtype; icalcomponent *ical_comp; icalproperty *prop; icalvalue *value; const char *attendee; GSList *l, *list = NULL; comp = cal_component_clone (priv->comp); if (comp == NULL) return; vtype = cal_component_get_vtype (comp); if (priv->my_address == NULL) find_my_address (itip, priv->ical_comp); g_assert (priv->my_address != NULL); ical_comp = cal_component_get_icalcomponent (comp); for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); prop != NULL; prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { char *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); if (g_strcasecmp (priv->my_address, text)) list = g_slist_prepend (list, prop); 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); cal_component_rescan (comp); switch (vtype) { case CAL_COMPONENT_EVENT: itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp, priv->event_client, priv->top_level); break; case CAL_COMPONENT_TODO: itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp, priv->task_client, priv->top_level); break; default: itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp, NULL, NULL); } g_object_unref (comp); } }