%s

/* -*- 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 "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; GList *addresses; gchar *from_address; gchar *my_address; }; /* HTML Strings */ #define HTML_BODY_START "" #define HTML_SEP "

" #define HTML_BODY_END "" #define HTML_FOOTER "" extern EvolutionShellClient *global_shell_client; /* 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 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; 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 (char *uri) { CalClient *client; gboolean success = FALSE; client = cal_client_new (); gtk_signal_connect (GTK_OBJECT (client), "cal_opened", start_calendar_server_cb, &success); cal_client_open_calendar (client, uri, TRUE); /* run a sub event loop to turn cal-client's async load notification into a synchronous call */ gtk_main (); if (success) return client; gtk_object_unref (GTK_OBJECT (client)); return NULL; } static CalClient * start_default_server (gboolean tasks) { CalClient *client; gboolean success = FALSE; client = cal_client_new (); gtk_signal_connect (GTK_OBJECT (client), "cal_opened", start_calendar_server_cb, &success); if (tasks) { if (!cal_client_open_default_tasks (client, FALSE)) goto error; } else { if (!cal_client_open_default_calendar (client, FALSE)) goto error; } /* run a sub event loop to turn cal-client's async load notification into a synchronous call */ gtk_main (); if (success) return client; error: gtk_object_unref (GTK_OBJECT (client)); return NULL; } static GPtrArray * get_servers (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 (); bonobo_object_ref (BONOBO_OBJECT (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; storage = storage_list->_buffer[i]; folder_list = GNOME_Evolution_Storage__get_folderList (storage, &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 (strcmp (possible_types[k], folder.type)) continue; uri = cal_util_expand_uri (folder.physicalUri, tasks); client = start_calendar_server (uri); if (client != NULL) g_ptr_array_add (servers, client); g_free (uri); break; } } CORBA_free (folder_list); } bonobo_object_unref (BONOBO_OBJECT (shell_client)); return servers; } 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; CalComponent *found_comp; CalClientGetStatus status; client = g_ptr_array_index (servers, i); status = cal_client_get_object (client, uid, &found_comp); if (status == CAL_CLIENT_GET_SUCCESS) { gtk_object_unref (GTK_OBJECT (found_comp)); gtk_object_ref (GTK_OBJECT (client)); return client; } } return NULL; } static void init (EItipControl *itip) { EItipControlPrivate *priv; GtkWidget *scrolled_window; priv = g_new0 (EItipControlPrivate, 1); itip->priv = priv; /* Addresses */ priv->addresses = itip_addresses_get (); /* Initialize the cal clients */ priv->event_clients = NULL; priv->event_client = NULL; priv->task_clients = NULL; priv->task_client = NULL; /* 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), "object_requested", GTK_SIGNAL_FUNC (object_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; g_free (priv->my_address); 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; int i; priv = itip->priv; clean_up (itip); itip_addresses_free (priv->addresses); priv->addresses = NULL; if (priv->event_clients) { for (i = 0; i < priv->event_clients->len; i++) gtk_object_unref (GTK_OBJECT (g_ptr_array_index (priv->event_clients, i))); g_ptr_array_free (priv->event_clients, TRUE); } if (priv->task_clients) { for (i = 0; i < priv->task_clients->len; i++) gtk_object_unref (GTK_OBJECT (g_ptr_array_index (priv->task_clients, i))); g_ptr_array_free (priv->task_clients, TRUE); } 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; char *my_alt_address = NULL; 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)) { icalvalue *value; icalparameter *param; const char *attendee, *name; char *attendee_clean, *name_clean; GList *l; 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; } for (l = priv->addresses; l != NULL; l = l->next) { ItipAddress *a = l->data; /* Check for a matching address */ if (attendee_clean != NULL && !g_strcasecmp (a->address, attendee_clean)) { priv->my_address = g_strdup (a->address); g_free (attendee_clean); g_free (name_clean); return; } /* Check for a matching cname to fall back on */ if (name_clean != NULL && !g_strcasecmp (a->name, name_clean)) my_alt_address = g_strdup (attendee_clean); } g_free (attendee_clean); g_free (name_clean); } 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) { 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) { /* 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, and we need to convert to UTF-8. If it isn't a builtin timezone name, we use it as-is, as it is already UTF-8. */ if (icaltimezone_get_builtin_timezone (display_name)) { strcat (buffer, U_(display_name)); } else { 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) { write_label_piece (itip, &datetime, buffer, 1024, U_("Starts: "), "
"); 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, 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_("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_("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; const char *string; 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); html = e_text_to_html (text.value ? text.value : U_("None"), E_TEXT_TO_HTML_CONVERT_NL); gtk_html_stream_printf (html_stream, "%s
%s

", U_("Summary:"), html); g_free (html); /* Location */ cal_component_get_location (priv->comp, &string); if (string != NULL) { html = e_text_to_html (string, E_TEXT_TO_HTML_CONVERT_NL); gtk_html_stream_printf (html_stream, "%s
%s

", U_("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
", U_("Status:")); switch (a->status) { case ICAL_PARTSTAT_ACCEPTED: gtk_html_stream_printf (html_stream, "%s

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

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

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

", U_("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 = e_text_to_html (text.value, E_TEXT_TO_HTML_CONVERT_NL); gtk_html_stream_printf (html_stream, "%s
%s", U_("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 (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 ("", U_("Choose an action:"), U_("Update"), U_("OK")); if (selector) { char *sel; sel = g_strconcat (html, "