/* -*- 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 "calendar-config.h" #include "itip-utils.h" #include "e-itip-control.h" struct _EItipControlPrivate { GtkWidget *html; GtkWidget *count; GtkWidget *next; GtkWidget *prev; CalClient *event_client; 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; GList *addresses; gchar *from_address; gchar *my_address; }; /* HTML Strings */ #define HTML_BODY_START "" #define HTML_SEP "
" #define HTML_BODY_END "" #define HTML_FOOTER "" /* We don't use these now, as we need to be able to translate the text. But I've left these here, in case there are problems with the new code. */ #if 0 #define PUBLISH_OPTIONS "
Choose an action:     \
" #define REQUEST_OPTIONS "
Choose an action:   \ RSVP  \
\
" #define REQUEST_FB_OPTIONS "
Choose an action:    \
" #define REPLY_OPTIONS "
Choose an action:    \
" #define REFRESH_OPTIONS "
Choose an action:    \
" #define CANCEL_OPTIONS "
Choose an action:    \
" #endif static void class_init (EItipControlClass *klass); static void init (EItipControl *itip); static void destroy (GtkObject *obj); static void prev_clicked_cb (GtkWidget *widget, gpointer data); static void next_clicked_cb (GtkWidget *widget, gpointer data); static void url_requested_cb (GtkHTML *html, const gchar *url, GtkHTMLStream *handle, 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; GtkType e_itip_control_get_type (void) { static GtkType type = 0; if (type == 0) { static const GtkTypeInfo info = { "EItipControl", sizeof (EItipControl), sizeof (EItipControlClass), (GtkClassInitFunc) class_init, (GtkObjectInitFunc) init, /* reserved_1 */ NULL, /* reserved_2 */ NULL, (GtkClassInitFunc) NULL, }; type = gtk_type_unique (gtk_vbox_get_type (), &info); } return type; } static void class_init (EItipControlClass *klass) { GtkObjectClass *object_class; object_class = GTK_OBJECT_CLASS (klass); parent_class = gtk_type_class (gtk_vbox_get_type ()); object_class->destroy = destroy; } /* Calendar Server routines */ static void start_calendar_server_cb (CalClient *cal_client, CalClientOpenStatus status, gpointer data) { gboolean *success = data; if (status == CAL_CLIENT_OPEN_SUCCESS) *success = TRUE; else *success = FALSE; gtk_main_quit (); /* end the sub event loop */ } static CalClient * start_calendar_server (gchar *uri, gboolean tasks) { CalClient *client; char *cal_uri; gboolean success; client = cal_client_new (); if (uri) cal_uri = g_strdup (uri); else { if (tasks) cal_uri = g_concat_dir_and_file ( g_get_home_dir (), "evolution/local/Tasks/tasks.ics"); else cal_uri = g_concat_dir_and_file ( g_get_home_dir (), "evolution/local/Calendar/calendar.ics"); } gtk_signal_connect (GTK_OBJECT (client), "cal_opened", start_calendar_server_cb, &success); if (!cal_client_open_calendar (client, cal_uri, FALSE)) return NULL; /* run a sub event loop to turn cal-client's async load notification into a synchronous call */ gtk_main (); if (success) return client; return NULL; } static void init (EItipControl *itip) { EItipControlPrivate *priv; GtkWidget *hbox, *scrolled_window; priv = g_new0 (EItipControlPrivate, 1); itip->priv = priv; /* Addresses */ priv->addresses = itip_addresses_get (); /* Header */ priv->prev = gnome_stock_button (GNOME_STOCK_BUTTON_PREV); gtk_widget_show (priv->prev); priv->next = gnome_stock_button (GNOME_STOCK_BUTTON_NEXT); gtk_widget_show (priv->next); hbox = gtk_hbox_new (FALSE, 0); gtk_box_pack_start (GTK_BOX (hbox), priv->prev, FALSE, FALSE, 4); gtk_box_pack_start (GTK_BOX (hbox), priv->count, TRUE, TRUE, 4); gtk_box_pack_start (GTK_BOX (hbox), priv->next, FALSE, FALSE, 4); gtk_widget_show (hbox); gtk_signal_connect (GTK_OBJECT (priv->prev), "clicked", GTK_SIGNAL_FUNC (prev_clicked_cb), itip); gtk_signal_connect (GTK_OBJECT (priv->next), "clicked", GTK_SIGNAL_FUNC (next_clicked_cb), itip); /* Get the cal clients */ priv->event_client = start_calendar_server ( calendar_config_get_default_uri (), FALSE); if (priv->event_client == NULL) g_warning ("Unable to start calendar client"); priv->task_client = start_calendar_server ( calendar_config_get_default_tasks_uri (), FALSE); if (priv->task_client == NULL) g_warning ("Unable to start calendar client"); /* Html Widget */ priv->html = gtk_html_new (); gtk_html_set_default_content_type (GTK_HTML (priv->html), "text/html; charset=utf-8"); 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_widget_set_usize (scrolled_window, 600, 400); gtk_box_pack_start (GTK_BOX (itip), scrolled_window, FALSE, FALSE, 4); gtk_signal_connect (GTK_OBJECT (priv->html), "url_requested", url_requested_cb, itip); gtk_signal_connect (GTK_OBJECT (priv->html), "submit", ok_clicked_cb, itip); } static void clean_up (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; g_free (priv->vcalendar); priv->vcalendar = NULL; if (priv->comp) gtk_object_unref (GTK_OBJECT (priv->comp)); priv->comp = NULL; icalcomponent_free (priv->top_level); priv->top_level = NULL; icalcomponent_free (priv->main_comp); priv->main_comp = NULL; priv->ical_comp = NULL; priv->current = 0; priv->total = 0; priv->my_address = NULL; g_free (priv->from_address); priv->from_address = NULL; } static void destroy (GtkObject *obj) { EItipControl *itip = E_ITIP_CONTROL (obj); EItipControlPrivate *priv; priv = itip->priv; clean_up (itip); itip_addresses_free (priv->addresses); priv->addresses = NULL; gtk_object_unref (GTK_OBJECT (priv->event_client)); gtk_object_unref (GTK_OBJECT (priv->task_client)); g_free (priv); if (GTK_OBJECT_CLASS (parent_class)->destroy) (* GTK_OBJECT_CLASS (parent_class)->destroy) (obj); } GtkWidget * e_itip_control_new (void) { return gtk_type_new (E_TYPE_ITIP_CONTROL); } static void find_my_address (EItipControl *itip, icalcomponent *ical_comp) { EItipControlPrivate *priv; icalproperty *prop; const char *attendee, *text; icalvalue *value; priv = itip->priv; for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); prop != NULL; prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { GList *l; value = icalproperty_get_value (prop); if (!value) continue; attendee = icalvalue_get_string (value); text = itip_strip_mailto (attendee); for (l = priv->addresses; l != NULL; l = l->next) { ItipAddress *a = l->data; if (!strcmp (a->address, text)) { priv->my_address = a->address; return; } } } } static icalproperty * find_attendee (icalcomponent *ical_comp, const char *address) { icalproperty *prop; const char *attendee, *text; icalvalue *value; g_return_val_if_fail (address != NULL, NULL); for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY); prop != NULL; prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY)) { value = icalproperty_get_value (prop); if (!value) continue; attendee = icalvalue_get_string (value); text = itip_strip_mailto (attendee); if (strstr (text, address)) break; } return prop; } static icalparameter_partstat find_attendee_partstat (icalcomponent *ical_comp, const char *address) { icalproperty *prop; prop = find_attendee (ical_comp, address); if (prop != NULL) { icalparameter *param; param = icalproperty_get_first_parameter (prop, ICAL_PARTSTAT_PARAMETER); if (param != NULL) return icalparameter_get_partstat (param); } return ICAL_PARTSTAT_NONE; } static void set_label (EItipControl *itip) { EItipControlPrivate *priv; gchar *text; priv = itip->priv; text = g_strdup_printf ("%d of %d", priv->current, priv->total); gtk_label_set_text (GTK_LABEL (priv->count), text); } static void set_button_status (EItipControl *itip) { EItipControlPrivate *priv; priv = itip->priv; if (priv->current == priv->total) gtk_widget_set_sensitive (priv->next, FALSE); else gtk_widget_set_sensitive (priv->next, TRUE); if (priv->current == 1) gtk_widget_set_sensitive (priv->prev, FALSE); else gtk_widget_set_sensitive (priv->prev, TRUE); } static void write_label_piece (EItipControl *itip, CalComponentDateTime *dt, char *buffer, int size, const char *stext, const char *etext) { EItipControlPrivate *priv; struct tm tmp_tm; char time_buf[64], *time_utf8; 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 (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)); time_utf8 = e_utf8_from_locale_string (time_buf); strcat (buffer, time_utf8); g_free (time_utf8); 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) { display_name = icaltimezone_get_display_name (zone); /* These are ASCII strings, so should be OK as UTF-8.*/ if (display_name) { strcat (buffer, " "); strcat (buffer, display_name); } } if (etext != NULL) strcat (buffer, etext); } 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) { switch (type) { case CAL_COMPONENT_EVENT: write_label_piece (itip, &datetime, buffer, 1024, U_("Meeting begins: "), "
"); break; case CAL_COMPONENT_TODO: write_label_piece (itip, &datetime, buffer, 1024, U_("Task begins: "), "
"); break; case CAL_COMPONENT_FREEBUSY: write_label_piece (itip, &datetime, buffer, 1024, U_("Free/Busy info begins: "), "
"); break; default: write_label_piece (itip, &datetime, buffer, 1024, U_("Begins: "), "
"); } 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){ switch (type) { case CAL_COMPONENT_EVENT: write_label_piece (itip, &datetime, buffer, 1024, U_("Meeting ends: "), "
"); break; case CAL_COMPONENT_FREEBUSY: write_label_piece (itip, &datetime, buffer, 1024, U_("Free/Busy info ends: "), "
"); break; default: write_label_piece (itip, &datetime, buffer, 1024, U_("Ends: "), "
"); } gtk_html_write (html, html_stream, buffer, strlen (buffer)); wrote = TRUE; } cal_component_free_datetime (&datetime); 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, U_("Task Completed: "), "
"); 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, U_("Task Due: "), "
"); 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", U_("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, U_("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; gchar *html; const gchar *const_html; priv = itip->priv; /* Html widget */ html_stream = gtk_html_begin (GTK_HTML (priv->html)); gtk_html_stream_printf (html_stream, "%s", U_("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, U_("An unknown person")); } break; case ICAL_METHOD_PUBLISH: case ICAL_METHOD_REQUEST: 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, U_("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 = U_("
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); gtk_html_stream_printf (html_stream, "%s %s

", U_("Summary:"), text.value ? text.value : U_("None")); /* Description */ cal_component_get_description_list (priv->comp, &l); if (l) text = *((CalComponentText *)l->data); if (l && text.value) { gtk_html_stream_printf (html_stream, "%s %s", U_("Description:"), text.value); } cal_component_free_text_list (l); /* Separator */ gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_SEP, strlen (HTML_SEP)); /* Options */ if (options != NULL) 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 () { return g_strdup_printf ("
%s " "    " "" "
", U_("Choose an action:"), U_("Update"), U_("OK")); } static char* get_request_options () { return g_strdup_printf ("
%s " "  " "%s  " "
" "
", U_("Choose an action:"), U_("Accept"), U_("Tentatively accept"), U_("Decline"), U_("RSVP"), U_("OK")); } static char* get_request_fb_options () { return g_strdup_printf ("
%s " "    " "" "
", U_("Choose an action:"), U_("Send Free/Busy Information"), U_("OK")); } static char* get_reply_options () { return g_strdup_printf ("
%s " "    " "" "
", U_("Choose an action:"), U_("Update respondent status"), U_("OK")); } #if 0 static char* get_refresh_options () { return g_strdup_printf ("
%s " "    " "" "
", U_("Choose an action:"), U_("Send Latest Information"), U_("OK")); } #endif static char* get_cancel_options () { return g_strdup_printf ("
%s " "    " "" "
", U_("Choose an action:"), U_("Cancel"), U_("OK")); } static void show_current_event (EItipControl *itip) { EItipControlPrivate *priv; const gchar *itip_title, *itip_desc; char *options; priv = itip->priv; switch (priv->method) { case ICAL_METHOD_PUBLISH: itip_desc = U_("%s has published meeting information."); itip_title = U_("Meeting Information"); options = get_publish_options (); break; case ICAL_METHOD_REQUEST: itip_desc = U_("%s requests your presence at a meeting."); itip_title = U_("Meeting Proposal"); options = get_request_options (); break; case ICAL_METHOD_ADD: itip_desc = U_("%s wishes to add to an existing meeting."); itip_title = U_("Meeting Update"); options = get_publish_options (); break; case ICAL_METHOD_REFRESH: itip_desc = U_("%s wishes to receive the latest meeting information."); itip_title = U_("Meeting Update Request"); options = get_publish_options (); break; case ICAL_METHOD_REPLY: itip_desc = U_("%s has replied to a meeting request."); itip_title = U_("Meeting Reply"); options = get_reply_options (); break; case ICAL_METHOD_CANCEL: itip_desc = U_("%s has cancelled a meeting."); itip_title = U_("Meeting Cancellation"); options = get_cancel_options (); break; default: itip_desc = U_("%s has sent an unintelligible message."); itip_title = U_("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; switch (priv->method) { case ICAL_METHOD_PUBLISH: itip_desc = U_("%s has published task information."); itip_title = U_("Task Information"); options = get_publish_options (); break; case ICAL_METHOD_REQUEST: itip_desc = U_("%s requests you perform a task."); itip_title = U_("Task Proposal"); options = get_request_options (); break; case ICAL_METHOD_ADD: itip_desc = U_("%s wishes to add to an existing task."); itip_title = U_("Task Update"); options = get_publish_options (); break; case ICAL_METHOD_REFRESH: itip_desc = U_("%s wishes to receive the latest task information."); itip_title = U_("Task Update Request"); options = get_publish_options (); break; case ICAL_METHOD_REPLY: itip_desc = U_("%s has replied to a task assignment."); itip_title = U_("Task Reply"); options = get_reply_options (); break; case ICAL_METHOD_CANCEL: itip_desc = U_("%s has cancelled a task."); itip_title = U_("Task Cancellation"); options = get_cancel_options (); break; default: itip_desc = U_("%s has sent an unintelligible message."); itip_title = U_("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 = U_("%s has published free/busy information."); itip_title = U_("Free/Busy Information"); options = NULL; break; case ICAL_METHOD_REQUEST: itip_desc = U_("%s requests your free/busy information."); itip_title = U_("Free/Busy Request"); options = get_request_fb_options (); break; case ICAL_METHOD_REPLY: itip_desc = U_("%s has replied to a free/busy request."); itip_title = U_("Free/Busy Reply"); options = NULL; break; default: itip_desc = U_("%s has sent an unintelligible message."); itip_title = U_("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 icalcomponent * get_prev (icalcompiter *iter) { icalcomponent *ret = NULL; icalcomponent_kind kind = ICAL_NO_COMPONENT; while (kind != ICAL_VEVENT_COMPONENT && kind != ICAL_VTODO_COMPONENT && kind != ICAL_VFREEBUSY_COMPONENT) { icalcompiter_prior (iter); ret = icalcompiter_deref (iter); kind = icalcomponent_isa (ret); } return ret; } static void show_current (EItipControl *itip) { EItipControlPrivate *priv; CalComponentVType type; icalcomponent *alarm_comp; icalcompiter alarm_iter; priv = itip->priv; set_label (itip); set_button_status (itip); if (priv->comp) gtk_object_unref (GTK_OBJECT (priv->comp)); /* 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, U_("The message does not appear to be properly formed")); gtk_object_unref (GTK_OBJECT (priv->comp)); priv->comp = NULL; return; }; type = cal_component_get_vtype (priv->comp); switch (type) { case CAL_COMPONENT_EVENT: show_current_event (itip); break; case CAL_COMPONENT_TODO: show_current_todo (itip); break; case CAL_COMPONENT_FREEBUSY: show_current_freebusy (itip); break; default: write_error_html (itip, U_("The message contains only unsupported requests.")); } find_my_address (itip, priv->ical_comp); } 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); priv->comp = NULL; priv->total = 0; priv->current = 0; 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, U_("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, U_("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, U_("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; } static void 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); } } static void update_item (EItipControl *itip) { EItipControlPrivate *priv; icalcomponent *clone; CalClient *client; CalComponentVType type; GtkWidget *dialog; priv = itip->priv; 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); if (!cal_client_update_objects (client, priv->top_level)) 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); } static void update_attendee_status (EItipControl *itip) { EItipControlPrivate *priv; CalClient *client; CalClientGetStatus status; CalComponent *comp; CalComponentVType type; const char *uid; GtkWidget *dialog; priv = itip->priv; type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) client = priv->task_client; else client = priv->event_client; /* Obtain our version */ cal_component_get_uid (priv->comp, &uid); status = cal_client_get_object (client, uid, &comp); if (status == CAL_CLIENT_GET_SUCCESS) { GSList *attendees; cal_component_get_attendee_list (priv->comp, &attendees); if (attendees != NULL) { CalComponentAttendee *a = attendees->data; icalparameter_partstat partstat; partstat = find_attendee_partstat (priv->ical_comp, itip_strip_mailto (a->value)); if (partstat != ICAL_PARTSTAT_NONE) { change_status (cal_component_get_icalcomponent (comp), itip_strip_mailto (a->value), partstat); cal_component_rescan (comp); } else { dialog = gnome_warning_dialog (_("Attendee status could " "not be updated because " "of an invalid status!\n")); goto cleanup; } } if (!cal_client_update_object (client, comp)) dialog = gnome_warning_dialog (_("Attendee status ould not be updated!\n")); else dialog = gnome_ok_dialog (_("Attendee status updated\n")); } else { dialog = gnome_warning_dialog (_("Attendee status can not be updated " "because the item no longer exists")); } cleanup: gtk_object_unref (GTK_OBJECT (comp)); gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } static void remove_item (EItipControl *itip) { EItipControlPrivate *priv; CalClient *client; CalComponentVType type; const char *uid; GtkWidget *dialog; priv = itip->priv; type = cal_component_get_vtype (priv->comp); if (type == CAL_COMPONENT_TODO) client = priv->task_client; else client = priv->event_client; cal_component_get_uid (priv->comp, &uid); if (cal_client_remove_object (client, uid)) dialog = gnome_ok_dialog (_("Removal Complete")); gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } static void send_item (EItipControl *itip) { EItipControlPrivate *priv; CalComponent *comp; CalComponentVType type; const char *uid; CalClientGetStatus status; GtkWidget *dialog; priv = itip->priv; type = cal_component_get_vtype (priv->comp); cal_component_get_uid (priv->comp, &uid); switch (type) { case CAL_COMPONENT_EVENT: status = cal_client_get_object (priv->event_client, uid, &comp); break; case CAL_COMPONENT_TODO: status = cal_client_get_object (priv->task_client, uid, &comp); break; default: status = CAL_CLIENT_GET_NOT_FOUND; } if (status == CAL_CLIENT_GET_SUCCESS) { itip_send_comp (CAL_COMPONENT_METHOD_PUBLISH, 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; 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); comp_list = cal_client_get_free_busy (priv->event_client, NULL, start, end); if (comp_list) { GList *l; for (l = comp_list; l; l = l->next) { CalComponent *comp = CAL_COMPONENT (l->data); itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp); gtk_object_unref (GTK_OBJECT (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 prev_clicked_cb (GtkWidget *widget, gpointer data) { EItipControl *itip = E_ITIP_CONTROL (data); EItipControlPrivate *priv; priv = itip->priv; priv->current--; priv->ical_comp = get_prev (&priv->iter); show_current (itip); } static void next_clicked_cb (GtkWidget *widget, gpointer data) { EItipControl *itip = E_ITIP_CONTROL (data); EItipControlPrivate *priv; priv = itip->priv; priv->current++; priv->ical_comp = get_next (&priv->iter); show_current (itip); } 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_ICONSDIR, 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); } 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; 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': change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_ACCEPTED); cal_component_rescan (priv->comp); update_item (itip); break; case 'T': change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_TENTATIVE); cal_component_rescan (priv->comp); update_item (itip); break; case 'D': change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_DECLINED); cal_component_rescan (priv->comp); remove_item (itip); break; case 'F': send_freebusy (itip); break; case 'R': update_attendee_status (itip); break; case 'S': send_item (itip); break; case 'C': remove_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) { CalComponent *comp = NULL; comp = cal_component_clone (priv->comp); if (comp == NULL) return; if (priv->my_address != NULL) { icalcomponent *ical_comp; icalproperty *prop; const char *attendee, *text; icalvalue *value; 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)) { value = icalproperty_get_value (prop); if (!value) continue; attendee = icalvalue_get_string (value); text = itip_strip_mailto (attendee); if (!strstr (text, priv->my_address)) { icalcomponent_remove_property (ical_comp, prop); icalproperty_free (prop); } } cal_component_rescan (comp); itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp); } else { GtkWidget *dialog; dialog = gnome_warning_dialog (_("Unable to find any of your identities " "in the attendees list!\n")); gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); } gtk_object_unref (GTK_OBJECT (comp)); } }