static gint
sort_event_data (gconstpointer a,
gconstpointer b,
gpointer user_data)
{
ECalComponent *comp1, *comp2;
ECalComponentDateTime date1, date2;
gint result;
comp1 = ((GcalEventData*) a)->event_component;
comp2 = ((GcalEventData*) b)->event_component;
e_cal_component_get_dtstart (comp1, &date1);
e_cal_component_get_dtstart (comp2, &date2);
if (date1.tzid != NULL)
date1.value->zone = icaltimezone_get_builtin_timezone_from_tzid (date1.tzid);
if (date2.tzid != NULL)
date2.value->zone = icaltimezone_get_builtin_timezone_from_tzid (date2.tzid);
result = icaltime_compare_with_current (date1.value, date2.value, user_data);
e_cal_component_free_datetime (&date1);
e_cal_component_free_datetime (&date2);
return result;
}
static gboolean
activate_result_cb (GcalShellSearchProvider *search_provider,
GDBusMethodInvocation *invocation,
gchar *result,
gchar **terms,
guint32 timestamp,
GcalShellSearchProvider2 *skel)
{
GcalShellSearchProviderPrivate *priv;
GApplication *application;
GcalEventData *data;
ECalComponentDateTime dtstart;
priv = search_provider->priv;
application = g_application_get_default ();
data = gcal_manager_get_event_from_shell_search (priv->manager, result);
e_cal_component_get_dtstart (data->event_component, &dtstart);
if (dtstart.tzid != NULL)
dtstart.value->zone = icaltimezone_get_builtin_timezone_from_tzid (dtstart.tzid);
gcal_application_set_uuid (GCAL_APPLICATION (application), result);
gcal_application_set_initial_date (GCAL_APPLICATION (application), dtstart.value);
e_cal_component_free_datetime (&dtstart);
g_application_activate (application);
g_object_unref (data->event_component);
g_free (data);
return TRUE;
}
void
dates_details_time_end_cb (GtkWidget *source, DatesData *d)
{
ECalComponentDateTime start, end;
struct icaltimetype oend;
e_cal_component_get_dtend (d->comp, &end);
oend = *end.value;
dates_details_time_cb (d, &end);
/* If end <= start, adjust start */
e_cal_component_get_dtstart (d->comp, &start);
if (icaltime_compare (*end.value, *start.value) <= 0) {
struct icaldurationtype duration =
icaltime_subtract (*end.value, oend);
*start.value = icaltime_add (*end.value, duration);
e_cal_component_set_dtstart (d->comp, &start);
dates_details_update_time_label (d, d->details_start_label,
start.value);
}
e_cal_component_set_dtend (d->comp, &end);
dates_details_update_time_label (d, d->details_end_label,
end.value);
e_cal_component_free_datetime (&end);
e_cal_component_free_datetime (&start);
}
/* (has-start?)
*
* A boolean value for components that have/don't have filled start date/time.
*
* Returns: whether the component has start date/time filled
*/
static ESExpResult *
func_has_start (ESExp *esexp,
gint argc,
ESExpResult **argv,
gpointer data)
{
SearchContext *ctx = data;
ESExpResult *result;
ECalComponentDateTime dt;
/* Check argument types */
if (argc != 0) {
e_sexp_fatal_error (
esexp, _("\"%s\" expects no arguments"),
"has-start");
return NULL;
}
e_cal_component_get_dtstart (ctx->comp, &dt);
result = e_sexp_result_new (esexp, ESEXP_RES_BOOL);
result->value.boolean = dt.value != NULL;
e_cal_component_free_datetime (&dt);
return result;
}
static gboolean
cal_searching_got_instance_cb (ECalComponent *comp,
time_t instance_start,
time_t instance_end,
gpointer user_data)
{
struct GenerateInstancesData *gid = user_data;
ECalShellViewPrivate *priv;
ECalComponentDateTime dt;
time_t *value;
g_return_val_if_fail (gid != NULL, FALSE);
if (g_cancellable_is_cancelled (gid->cancellable))
return FALSE;
g_return_val_if_fail (gid->cal_shell_view != NULL, FALSE);
g_return_val_if_fail (gid->cal_shell_view->priv != NULL, FALSE);
e_cal_component_get_dtstart (comp, &dt);
if (dt.tzid && dt.value) {
icaltimezone *zone = NULL;
e_cal_client_get_timezone_sync (
gid->client, dt.tzid, &zone, gid->cancellable, NULL);
if (g_cancellable_is_cancelled (gid->cancellable))
return FALSE;
if (zone)
instance_start = icaltime_as_timet_with_zone (*dt.value, zone);
}
e_cal_component_free_datetime (&dt);
priv = gid->cal_shell_view->priv;
value = g_new (time_t, 1);
*value = instance_start;
if (!g_slist_find_custom (priv->search_hit_cache, value, cal_time_t_ptr_compare))
priv->search_hit_cache = g_slist_append (priv->search_hit_cache, value);
else
g_free (value);
return TRUE;
}
void
dates_event_moved_cb (DatesView *view, ECalComponent *comp, DatesData *d)
{
ECalComponentDateTime start, end;
struct icaldurationtype duration = icaldurationtype_null_duration ();
if (d->comp) g_object_unref (d->comp);
d->comp = g_object_ref (comp);
e_cal_component_get_dtstart (d->comp, &start);
if (!start.value->is_date) {
e_cal_component_get_dtend (d->comp, &end);
duration = icaltime_subtract (*end.value, *start.value);
*end.value = icaltime_add (*start.value, duration);
e_cal_component_set_dtstart (d->comp, &start);
e_cal_component_set_dtend (d->comp, &end);
e_cal_component_free_datetime (&end);
}
e_cal_component_free_datetime (&start);
dates_commit_event_cb (NULL, d, CALOBJ_MOD_THIS);
}
gboolean
datetime_is_date_only (ECalComponent *comp,
gboolean datetime_check)
{
ECalComponentDateTime dt;
gboolean is_date_only;
g_return_val_if_fail (E_IS_CAL_COMPONENT (comp), FALSE);
dt.value = NULL;
if (datetime_check == DATETIME_CHECK_DTSTART)
e_cal_component_get_dtstart (comp, &dt);
else
e_cal_component_get_dtend (comp, &dt);
is_date_only = dt.value && dt.value->is_date;
e_cal_component_free_datetime (&dt);
return is_date_only;
}
/* Generates the absolute triggers for a component */
static void
generate_absolute_triggers (ECalComponent *comp,
struct alarm_occurrence_data *aod,
ECalRecurResolveTimezoneFn resolve_tzid,
gpointer user_data,
icaltimezone *default_timezone)
{
GList *l;
ECalComponentDateTime dt_start, dt_end;
e_cal_component_get_dtstart (comp, &dt_start);
e_cal_component_get_dtend (comp, &dt_end);
for (l = aod->alarm_uids; l; l = l->next) {
const gchar *auid;
ECalComponentAlarm *alarm;
ECalComponentAlarmAction action;
ECalComponentAlarmRepeat repeat;
ECalComponentAlarmTrigger trigger;
time_t abs_time;
time_t occur_start, occur_end;
icaltimezone *zone;
gint i;
auid = l->data;
alarm = e_cal_component_get_alarm (comp, auid);
g_return_if_fail (alarm != NULL);
e_cal_component_alarm_get_action (alarm, &action);
e_cal_component_alarm_get_trigger (alarm, &trigger);
e_cal_component_alarm_get_repeat (alarm, &repeat);
e_cal_component_alarm_free (alarm);
for (i = 0; aod->omit[i] != -1; i++) {
if (aod->omit[i] == action)
break;
}
if (aod->omit[i] != -1)
continue;
if (trigger.type != E_CAL_COMPONENT_ALARM_TRIGGER_ABSOLUTE)
continue;
/* Absolute triggers are always in UTC;
* see RFC 2445 section 4.8.6.3 */
zone = icaltimezone_get_utc_timezone ();
abs_time = icaltime_as_timet_with_zone (trigger.u.abs_time, zone);
/* No particular occurrence, so just use the times from the
* component */
if (dt_start.value) {
if (dt_start.tzid && !dt_start.value->is_date)
zone = (* resolve_tzid) (dt_start.tzid, user_data);
else
zone = default_timezone;
occur_start = icaltime_as_timet_with_zone (
*dt_start.value, zone);
} else
occur_start = -1;
if (dt_end.value) {
if (dt_end.tzid && !dt_end.value->is_date)
zone = (* resolve_tzid) (dt_end.tzid, user_data);
else
zone = default_timezone;
occur_end = icaltime_as_timet_with_zone (*dt_end.value, zone);
} else
occur_end = -1;
/* Add repeating alarms */
if (repeat.repetitions != 0) {
gint i;
time_t repeat_time;
repeat_time = icaldurationtype_as_int (repeat.duration);
for (i = 0; i < repeat.repetitions; i++) {
time_t t;
t = abs_time + (i + 1) * repeat_time;
if (t >= aod->start && t < aod->end)
add_trigger (
aod, auid, t,
occur_start, occur_end);
}
}
/* Add the trigger itself */
if (abs_time >= aod->start && abs_time < aod->end)
add_trigger (aod, auid, abs_time, occur_start, occur_end);
}
e_cal_component_free_datetime (&dt_start);
e_cal_component_free_datetime (&dt_end);
}
/**
* e_cal_util_get_component_occur_times:
* @comp: an #ECalComponent
* @start: (out): Location to store the start time
* @end: (out): Location to store the end time
* @tz_cb: (closure tz_cb_data) (scope call): The #ECalRecurResolveTimezoneFn to call
* @tz_cb_data: (closure): User data to be passed to the @tz_cb callback
* @default_timezone: The default timezone
* @kind: the type of component, indicated with an icalcomponent_kind
*
* Find out when the component starts and stops, being careful about
* recurrences.
*
* Since: 2.32
**/
void
e_cal_util_get_component_occur_times (ECalComponent *comp,
time_t *start,
time_t *end,
ECalRecurResolveTimezoneFn tz_cb,
gpointer tz_cb_data,
const icaltimezone *default_timezone,
icalcomponent_kind kind)
{
struct icalrecurrencetype ir;
ECalComponentDateTime dt_start, dt_end;
g_return_if_fail (comp != NULL);
g_return_if_fail (start != NULL);
g_return_if_fail (end != NULL);
e_cal_recur_ensure_end_dates (comp, FALSE, tz_cb, tz_cb_data);
/* Get dtstart of the component and convert it to UTC */
e_cal_component_get_dtstart (comp, &dt_start);
if ((*start = componenttime_to_utc_timet (&dt_start, tz_cb, tz_cb_data, default_timezone)) == -1)
*start = _TIME_MIN;
e_cal_component_free_datetime (&dt_start);
/* find out end date of component */
*end = _TIME_MAX;
if (kind == ICAL_VTODO_COMPONENT) {
/* max from COMPLETED and DUE properties */
struct icaltimetype *tt = NULL;
time_t completed_time = -1, due_time = -1, max_time;
ECalComponentDateTime dt_due;
e_cal_component_get_completed (comp, &tt);
if (tt) {
/* COMPLETED must be in UTC. */
completed_time = icaltime_as_timet_with_zone (
*tt, icaltimezone_get_utc_timezone ());
e_cal_component_free_icaltimetype (tt);
}
e_cal_component_get_due (comp, &dt_due);
if (dt_due.value != NULL)
due_time = componenttime_to_utc_timet (
&dt_due, tz_cb, tz_cb_data,
default_timezone);
e_cal_component_free_datetime (&dt_due);
max_time = MAX (completed_time, due_time);
if (max_time != -1)
*end = max_time;
} else {
/* ALARMS, EVENTS: DTEND and reccurences */
if (e_cal_component_has_recurrences (comp)) {
GSList *rrules = NULL;
GSList *exrules = NULL;
GSList *elem;
GSList *rdates = NULL;
/* Do the RRULEs, EXRULEs and RDATEs*/
e_cal_component_get_rrule_property_list (comp, &rrules);
e_cal_component_get_exrule_property_list (comp, &exrules);
e_cal_component_get_rdate_list (comp, &rdates);
for (elem = rrules; elem; elem = elem->next) {
time_t rule_end;
icaltimezone *utc_zone;
icalproperty *prop = elem->data;
ir = icalproperty_get_rrule (prop);
utc_zone = icaltimezone_get_utc_timezone ();
rule_end = e_cal_recur_obtain_enddate (
&ir, prop, utc_zone, TRUE);
if (rule_end == -1) /* repeats forever */
*end = _TIME_MAX;
else if (rule_end > *end) /* new maximum */
*end = rule_end;
}
/* Do the EXRULEs. */
for (elem = exrules; elem; elem = elem->next) {
icalproperty *prop = elem->data;
time_t rule_end;
icaltimezone *utc_zone;
ir = icalproperty_get_exrule (prop);
utc_zone = icaltimezone_get_utc_timezone ();
rule_end = e_cal_recur_obtain_enddate (
&ir, prop, utc_zone, TRUE);
if (rule_end == -1) /* repeats forever */
*end = _TIME_MAX;
else if (rule_end > *end)
*end = rule_end;
}
/* Do the RDATEs */
for (elem = rdates; elem; elem = elem->next) {
ECalComponentPeriod *p = elem->data;
time_t rdate_end = _TIME_MAX;
/* FIXME: We currently assume RDATEs are in the same timezone
* as DTSTART. We should get the RDATE timezone and convert
* to the DTSTART timezone first. */
/* Check if the end date or duration is set, libical seems to set
* second to -1 to denote an unset time */
if (p->type != E_CAL_COMPONENT_PERIOD_DATETIME || p->u.end.second != -1)
rdate_end = icaltime_as_timet (icaltime_add (p->start, p->u.duration));
else
rdate_end = icaltime_as_timet (p->u.end);
if (rdate_end == -1) /* repeats forever */
*end = _TIME_MAX;
else if (rdate_end > *end)
*end = rdate_end;
}
e_cal_component_free_period_list (rdates);
}
/* Get dtend of the component and convert it to UTC */
e_cal_component_get_dtend (comp, &dt_end);
if (dt_end.value) {
time_t dtend_time;
dtend_time = componenttime_to_utc_timet (
&dt_end, tz_cb, tz_cb_data, default_timezone);
if (dtend_time == -1 || (dtend_time > *end))
*end = dtend_time;
}
e_cal_component_free_datetime (&dt_end);
}
}
static void
do_save_calendar_rdf (FormatHandler *handler,
ESourceSelector *selector,
ECalClientSourceType type,
gchar *dest_uri)
{
/*
* According to some documentation about CSV, newlines 'are' allowed
* in CSV-files. But you 'do' have to put the value between quotes.
* The helper 'string_needsquotes' will check for that
*
* http://www.creativyst.com/Doc/Articles/CSV/CSV01.htm
* http://www.creativyst.com/cgi-bin/Prod/15/eg/csv2xml.pl
*/
ESource *primary_source;
EClient *source_client;
GError *error = NULL;
GSList *objects = NULL;
gchar *temp = NULL;
GOutputStream *stream;
if (!dest_uri)
return;
/* open source client */
primary_source = e_source_selector_ref_primary_selection (selector);
source_client = e_cal_client_connect_sync (
primary_source, type, NULL, &error);
g_object_unref (primary_source);
/* Sanity check. */
g_return_if_fail (
((source_client != NULL) && (error == NULL)) ||
((source_client == NULL) && (error != NULL)));
if (source_client == NULL) {
display_error_message (
gtk_widget_get_toplevel (GTK_WIDGET (selector)),
error->message);
g_error_free (error);
return;
}
stream = open_for_writing (GTK_WINDOW (gtk_widget_get_toplevel (GTK_WIDGET (selector))), dest_uri, &error);
if (stream && e_cal_client_get_object_list_as_comps_sync (E_CAL_CLIENT (source_client), "#t", &objects, NULL, NULL)) {
GSList *iter;
xmlBufferPtr buffer = xmlBufferCreate ();
xmlDocPtr doc = xmlNewDoc ((xmlChar *) "1.0");
xmlNodePtr fnode;
doc->children = xmlNewDocNode (doc, NULL, (const guchar *)"rdf:RDF", NULL);
xmlSetProp (doc->children, (const guchar *)"xmlns:rdf", (const guchar *)"http://www.w3.org/1999/02/22-rdf-syntax-ns#");
xmlSetProp (doc->children, (const guchar *)"xmlns", (const guchar *)"http://www.w3.org/2002/12/cal/ical#");
fnode = xmlNewChild (doc->children, NULL, (const guchar *)"Vcalendar", NULL);
/* Should Evolution publicise these? */
xmlSetProp (fnode, (const guchar *)"xmlns:x-wr", (const guchar *)"http://www.w3.org/2002/12/cal/prod/Apple_Comp_628d9d8459c556fa#");
xmlSetProp (fnode, (const guchar *)"xmlns:x-lic", (const guchar *)"http://www.w3.org/2002/12/cal/prod/Apple_Comp_628d9d8459c556fa#");
/* Not sure if it's correct like this */
xmlNewChild (fnode, NULL, (const guchar *)"prodid", (const guchar *)"-//" PACKAGE_STRING "//iCal 1.0//EN");
/* Assuming GREGORIAN is the only supported calendar scale */
xmlNewChild (fnode, NULL, (const guchar *)"calscale", (const guchar *)"GREGORIAN");
temp = calendar_config_get_timezone ();
xmlNewChild (fnode, NULL, (const guchar *)"x-wr:timezone", (guchar *) temp);
g_free (temp);
xmlNewChild (fnode, NULL, (const guchar *)"method", (const guchar *)"PUBLISH");
xmlNewChild (fnode, NULL, (const guchar *)"x-wr:relcalid", (guchar *) e_source_get_uid (primary_source));
xmlNewChild (fnode, NULL, (const guchar *)"x-wr:calname", (guchar *) e_source_get_display_name (primary_source));
/* Version of this RDF-format */
xmlNewChild (fnode, NULL, (const guchar *)"version", (const guchar *)"2.0");
for (iter = objects; iter; iter = iter->next) {
ECalComponent *comp = iter->data;
const gchar *temp_constchar;
gchar *tmp_str = NULL;
GSList *temp_list;
ECalComponentDateTime temp_dt;
struct icaltimetype *temp_time;
gint *temp_int;
ECalComponentText temp_comptext;
xmlNodePtr c_node = xmlNewChild (fnode, NULL, (const guchar *)"component", NULL);
xmlNodePtr node = xmlNewChild (c_node, NULL, (const guchar *)"Vevent", NULL);
/* Getting the stuff */
e_cal_component_get_uid (comp, &temp_constchar);
tmp_str = g_strdup_printf ("#%s", temp_constchar);
xmlSetProp (node, (const guchar *)"about", (guchar *) tmp_str);
g_free (tmp_str);
add_string_to_rdf (node, "uid",temp_constchar);
e_cal_component_get_summary (comp, &temp_comptext);
add_string_to_rdf (node, "summary", temp_comptext.value);
e_cal_component_get_description_list (comp, &temp_list);
add_list_to_rdf (node, "description", temp_list, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_categories_list (comp, &temp_list);
add_list_to_rdf (node, "categories", temp_list, CONSTCHAR);
if (temp_list)
e_cal_component_free_categories_list (temp_list);
e_cal_component_get_comment_list (comp, &temp_list);
add_list_to_rdf (node, "comment", temp_list, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_completed (comp, &temp_time);
add_time_to_rdf (node, "completed", temp_time);
if (temp_time)
e_cal_component_free_icaltimetype (temp_time);
e_cal_component_get_created (comp, &temp_time);
add_time_to_rdf (node, "created", temp_time);
if (temp_time)
e_cal_component_free_icaltimetype (temp_time);
e_cal_component_get_contact_list (comp, &temp_list);
add_list_to_rdf (node, "contact", temp_list, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_dtstart (comp, &temp_dt);
add_time_to_rdf (node, "dtstart", temp_dt.value ? temp_dt.value : NULL);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_dtend (comp, &temp_dt);
add_time_to_rdf (node, "dtend", temp_dt.value ? temp_dt.value : NULL);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_due (comp, &temp_dt);
add_time_to_rdf (node, "due", temp_dt.value ? temp_dt.value : NULL);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_percent (comp, &temp_int);
add_nummeric_to_rdf (node, "percentComplete", temp_int);
e_cal_component_get_priority (comp, &temp_int);
add_nummeric_to_rdf (node, "priority", temp_int);
e_cal_component_get_url (comp, &temp_constchar);
add_string_to_rdf (node, "URL", temp_constchar);
if (e_cal_component_has_attendees (comp)) {
e_cal_component_get_attendee_list (comp, &temp_list);
add_list_to_rdf (node, "attendee", temp_list, ECALCOMPONENTATTENDEE);
if (temp_list)
e_cal_component_free_attendee_list (temp_list);
}
e_cal_component_get_location (comp, &temp_constchar);
add_string_to_rdf (node, "location", temp_constchar);
e_cal_component_get_last_modified (comp, &temp_time);
add_time_to_rdf (node, "lastModified",temp_time);
/* Important note!
* The documentation is not requiring this!
*
* if (temp_time) e_cal_component_free_icaltimetype (temp_time);
*
* Please uncomment and fix documentation if untrue
* http://www.gnome.org/projects/evolution/developer-doc/libecal/ECalComponent.html
* #e-cal-component-get-last-modified
*/
}
/* I used a buffer rather than xmlDocDump: I want gio support */
xmlNodeDump (buffer, doc, doc->children, 2, 1);
g_output_stream_write_all (stream, xmlBufferContent (buffer), xmlBufferLength (buffer), NULL, NULL, &error);
g_output_stream_close (stream, NULL, NULL);
e_cal_client_free_ecalcomp_slist (objects);
xmlBufferFree (buffer);
xmlFreeDoc (doc);
}
if (stream)
g_object_unref (stream);
g_object_unref (source_client);
if (error != NULL) {
display_error_message (
gtk_widget_get_toplevel (GTK_WIDGET (selector)),
error->message);
g_error_free (error);
}
}
static void
do_save_calendar_csv (FormatHandler *handler,
ESourceSelector *selector,
ECalClientSourceType type,
gchar *dest_uri)
{
/*
* According to some documentation about CSV, newlines 'are' allowed
* in CSV-files. But you 'do' have to put the value between quotes.
* The helper 'string_needsquotes' will check for that
*
* http://www.creativyst.com/Doc/Articles/CSV/CSV01.htm
* http://www.creativyst.com/cgi-bin/Prod/15/eg/csv2xml.pl
*/
ESource *primary_source;
EClient *source_client;
GError *error = NULL;
GSList *objects = NULL;
GOutputStream *stream;
GString *line = NULL;
CsvConfig *config = NULL;
CsvPluginData *d = handler->data;
const gchar *tmp = NULL;
if (!dest_uri)
return;
/* open source client */
primary_source = e_source_selector_ref_primary_selection (selector);
source_client = e_cal_client_connect_sync (
primary_source, type, NULL, &error);
g_object_unref (primary_source);
/* Sanity check. */
g_return_if_fail (
((source_client != NULL) && (error == NULL)) ||
((source_client == NULL) && (error != NULL)));
if (source_client == NULL) {
display_error_message (
gtk_widget_get_toplevel (GTK_WIDGET (selector)),
error);
g_error_free (error);
return;
}
config = g_new (CsvConfig, 1);
tmp = gtk_entry_get_text (GTK_ENTRY (d->delimiter_entry));
config->delimiter = userstring_to_systemstring (tmp ? tmp:", ");
tmp = gtk_entry_get_text (GTK_ENTRY (d->newline_entry));
config->newline = userstring_to_systemstring (tmp ? tmp:"\\n");
tmp = gtk_entry_get_text (GTK_ENTRY (d->quote_entry));
config->quote = userstring_to_systemstring (tmp ? tmp:"\"");
config->header = gtk_toggle_button_get_active (
GTK_TOGGLE_BUTTON (d->header_check));
stream = open_for_writing (
GTK_WINDOW (gtk_widget_get_toplevel (GTK_WIDGET (selector))),
dest_uri, &error);
if (stream && e_cal_client_get_object_list_as_comps_sync (E_CAL_CLIENT (source_client), "#t", &objects, NULL, NULL)) {
GSList *iter;
if (config->header) {
gint i = 0;
static const gchar *labels[] = {
N_("UID"),
N_("Summary"),
N_("Description List"),
N_("Categories List"),
N_("Comment List"),
N_("Completed"),
N_("Created"),
N_("Contact List"),
N_("Start"),
N_("End"),
N_("Due"),
N_("percent Done"),
N_("Priority"),
N_("URL"),
N_("Attendees List"),
N_("Location"),
N_("Modified"),
};
line = g_string_new ("");
for (i = 0; i < G_N_ELEMENTS (labels); i++) {
if (i > 0)
g_string_append (line, config->delimiter);
g_string_append (line, _(labels[i]));
}
g_string_append (line, config->newline);
g_output_stream_write_all (
stream, line->str, line->len,
NULL, NULL, NULL);
g_string_free (line, TRUE);
}
for (iter = objects; iter; iter = iter->next) {
ECalComponent *comp = iter->data;
gchar *delimiter_temp = NULL;
const gchar *temp_constchar;
GSList *temp_list;
ECalComponentDateTime temp_dt;
struct icaltimetype *temp_time;
gint *temp_int;
ECalComponentText temp_comptext;
line = g_string_new ("");
/* Getting the stuff */
e_cal_component_get_uid (comp, &temp_constchar);
line = add_string_to_csv (line, temp_constchar, config);
e_cal_component_get_summary (comp, &temp_comptext);
line = add_string_to_csv (
line, temp_comptext.value, config);
e_cal_component_get_description_list (comp, &temp_list);
line = add_list_to_csv (
line, temp_list, config, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_categories_list (comp, &temp_list);
line = add_list_to_csv (
line, temp_list, config, CONSTCHAR);
if (temp_list)
e_cal_component_free_categories_list (temp_list);
e_cal_component_get_comment_list (comp, &temp_list);
line = add_list_to_csv (
line, temp_list, config, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_completed (comp, &temp_time);
line = add_time_to_csv (line, temp_time, config);
if (temp_time)
e_cal_component_free_icaltimetype (temp_time);
e_cal_component_get_created (comp, &temp_time);
line = add_time_to_csv (line, temp_time, config);
if (temp_time)
e_cal_component_free_icaltimetype (temp_time);
e_cal_component_get_contact_list (comp, &temp_list);
line = add_list_to_csv (
line, temp_list, config, ECALCOMPONENTTEXT);
if (temp_list)
e_cal_component_free_text_list (temp_list);
e_cal_component_get_dtstart (comp, &temp_dt);
line = add_time_to_csv (
line, temp_dt.value ?
temp_dt.value : NULL, config);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_dtend (comp, &temp_dt);
line = add_time_to_csv (
line, temp_dt.value ?
temp_dt.value : NULL, config);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_due (comp, &temp_dt);
line = add_time_to_csv (
line, temp_dt.value ?
temp_dt.value : NULL, config);
e_cal_component_free_datetime (&temp_dt);
e_cal_component_get_percent (comp, &temp_int);
line = add_nummeric_to_csv (line, temp_int, config);
e_cal_component_get_priority (comp, &temp_int);
line = add_nummeric_to_csv (line, temp_int, config);
e_cal_component_get_url (comp, &temp_constchar);
line = add_string_to_csv (line, temp_constchar, config);
if (e_cal_component_has_attendees (comp)) {
e_cal_component_get_attendee_list (comp, &temp_list);
line = add_list_to_csv (
line, temp_list, config,
ECALCOMPONENTATTENDEE);
if (temp_list)
e_cal_component_free_attendee_list (temp_list);
} else {
line = add_list_to_csv (
line, NULL, config,
ECALCOMPONENTATTENDEE);
}
e_cal_component_get_location (comp, &temp_constchar);
line = add_string_to_csv (line, temp_constchar, config);
e_cal_component_get_last_modified (comp, &temp_time);
/* Append a newline (record delimiter) */
delimiter_temp = config->delimiter;
config->delimiter = config->newline;
line = add_time_to_csv (line, temp_time, config);
/* And restore for the next record */
config->delimiter = delimiter_temp;
/* Important note!
* The documentation is not requiring this!
*
* if (temp_time)
* e_cal_component_free_icaltimetype (temp_time);
*
* Please uncomment and fix documentation if untrue
* http://www.gnome.org/projects/evolution/
* developer-doc/libecal/ECalComponent.html
* #e-cal-component-get-last-modified
*/
g_output_stream_write_all (
stream, line->str, line->len,
NULL, NULL, &error);
/* It's written, so we can free it */
g_string_free (line, TRUE);
}
g_output_stream_close (stream, NULL, NULL);
e_cal_client_free_ecalcomp_slist (objects);
}
if (stream)
g_object_unref (stream);
g_object_unref (source_client);
g_free (config->delimiter);
g_free (config->quote);
g_free (config->newline);
g_free (config);
if (error != NULL) {
display_error_message (
gtk_widget_get_toplevel (GTK_WIDGET (selector)),
error);
g_error_free (error);
}
}
static void
cal_component_preview_write_html (ECalComponentPreview *preview,
GString *buffer)
{
ECalClient *client;
ECalComponent *comp;
icaltimezone *default_zone;
ECalComponentText text;
ECalComponentDateTime dt;
gchar *str;
GString *string;
GSList *list, *iter;
icalcomponent *icalcomp;
icalproperty *icalprop;
icalproperty_status status;
const gchar *location;
gint *priority_value;
client = preview->priv->client;
comp = preview->priv->comp;
default_zone = preview->priv->timezone;
/* write document header */
e_cal_component_get_summary (comp, &text);
g_string_append (buffer, HTML_HEADER);
g_string_append (buffer, "<body class=\"-e-web-view-background-color -e-web-view-text-color\">");
if (text.value)
g_string_append_printf (buffer, "<h2>%s</h2>", text.value);
else
g_string_append_printf (buffer, "<h2><i>%s</i></h2>",_("Untitled"));
g_string_append (buffer, "<table border=\"0\" cellspacing=\"5\">");
/* write icons for the categories */
string = g_string_new (NULL);
e_cal_component_get_categories_list (comp, &list);
if (list != NULL)
g_string_append_printf (buffer, "<tr><th>%s</th><td>", _("Categories:"));
for (iter = list; iter != NULL; iter = iter->next) {
const gchar *category = iter->data;
gchar *icon_file;
icon_file = e_categories_dup_icon_file_for (category);
if (icon_file && g_file_test (icon_file, G_FILE_TEST_EXISTS)) {
gchar *uri;
uri = g_filename_to_uri (icon_file, NULL, NULL);
g_string_append_printf (
buffer, "<img alt=\"%s\" src=\"evo-%s\">",
category, uri);
g_free (uri);
} else {
if (iter != list)
g_string_append_len (string, ", ", 2);
g_string_append (string, category);
}
g_free (icon_file);
}
if (string->len > 0)
g_string_append_printf (buffer, "%s", string->str);
if (list != NULL)
g_string_append (buffer, "</td></tr>");
e_cal_component_free_categories_list (list);
g_string_free (string, TRUE);
/* write location */
e_cal_component_get_location (comp, &location);
if (location)
g_string_append_printf (
buffer, "<tr><th>%s</th><td>%s</td></tr>",
_("Summary:"), text.value);
/* write start date */
e_cal_component_get_dtstart (comp, &dt);
if (dt.value != NULL) {
str = timet_to_str_with_zone (&dt, client, default_zone);
g_string_append_printf (
buffer, "<tr><th>%s</th><td>%s</td></tr>",
_("Start Date:"), str);
g_free (str);
}
e_cal_component_free_datetime (&dt);
/* write end date */
e_cal_component_get_dtend (comp, &dt);
if (dt.value != NULL) {
str = timet_to_str_with_zone (&dt, client, default_zone);
g_string_append_printf (
buffer,"<tr><th>%s</th><td>%s</td></tr>",
_("End Date:"), str);
g_free (str);
}
e_cal_component_free_datetime (&dt);
/* write Due Date */
e_cal_component_get_due (comp, &dt);
if (dt.value != NULL) {
str = timet_to_str_with_zone (&dt, client, default_zone);
g_string_append_printf (
buffer, "<tr><th>%s</th><td>%s</td></tr>",
_("Due Date:"), str);
g_free (str);
}
e_cal_component_free_datetime (&dt);
/* write status */
icalcomp = e_cal_component_get_icalcomponent (comp);
icalprop = icalcomponent_get_first_property (
icalcomp, ICAL_STATUS_PROPERTY);
if (icalprop != NULL) {
g_string_append_printf (
buffer, "<tr><th>%s</th>",
_("Status:"));
e_cal_component_get_status (comp, &status);
switch (status) {
case ICAL_STATUS_INPROCESS :
str = g_strdup (_("In Progress"));
break;
case ICAL_STATUS_COMPLETED :
str = g_strdup (_("Completed"));
break;
case ICAL_STATUS_CANCELLED :
str = g_strdup (_("Cancelled"));
break;
case ICAL_STATUS_NONE :
default :
str = g_strdup (_("Not Started"));
break;
}
g_string_append_printf (buffer, "<td>%s</td></tr>", str);
g_free (str);
}
/* write priority */
e_cal_component_get_priority (comp, &priority_value);
if (priority_value && *priority_value != 0) {
g_string_append_printf (
buffer, "<tr><th>%s</th>",
_("Priority:"));
if (*priority_value <= 4)
str = g_strdup (_("High"));
else if (*priority_value == 5)
str = g_strdup (_("Normal"));
else
str = g_strdup (_("Low"));
g_string_append_printf (buffer, "<td>%s</td></tr>", str);
g_free (str);
}
if (priority_value)
e_cal_component_free_priority (priority_value);
/* write description and URL */
g_string_append (buffer, "<tr><td colspan=\"2\"><hr></td></tr>");
e_cal_component_get_description_list (comp, &list);
if (list) {
GSList *node;
g_string_append_printf (
buffer, "<tr><th>%s</th>",
_("Description:"));
g_string_append (buffer, "<td class=\"description\">");
for (node = list; node != NULL; node = node->next) {
gchar *html;
text = * (ECalComponentText *) node->data;
html = camel_text_to_html (
text.value ? text.value : "",
CAMEL_MIME_FILTER_TOHTML_CONVERT_NL |
CAMEL_MIME_FILTER_TOHTML_CONVERT_SPACES |
CAMEL_MIME_FILTER_TOHTML_CONVERT_URLS |
CAMEL_MIME_FILTER_TOHTML_CONVERT_ADDRESSES, 0);
if (html)
g_string_append_printf (buffer, "%s", html);
g_free (html);
}
g_string_append (buffer, "</td></tr>");
e_cal_component_free_text_list (list);
}
/* URL */
e_cal_component_get_url (comp, (const gchar **) &str);
if (str) {
g_string_append_printf (
buffer, "<tr><th>%s</th><td><a href=\"%s\">%s</a></td></tr>",
_("Web Page:"), str, str);
}
g_string_append (buffer, "</table>");
/* close document */
g_string_append (buffer, "</body></html>");
}
static GtkWidget *
ical_get_preview (icalcomponent *icalcomp)
{
GtkWidget *preview;
GtkTreeView *tree_view;
GtkTreeSelection *selection;
GtkListStore *store;
GtkTreeIter iter;
GHashTable *timezones;
icalcomponent *subcomp;
icaltimezone *users_zone;
if (!icalcomp || !is_icalcomp_usable (icalcomp))
return NULL;
store = gtk_list_store_new (4, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, E_TYPE_CAL_COMPONENT);
timezones = g_hash_table_new_full (g_str_hash, g_str_equal, NULL, free_zone_cb);
users_zone = get_users_timezone ();
/* get timezones first */
for (subcomp = icalcomponent_get_first_component (icalcomp, ICAL_VTIMEZONE_COMPONENT);
subcomp;
subcomp = icalcomponent_get_next_component (icalcomp, ICAL_VTIMEZONE_COMPONENT)) {
icaltimezone *zone = icaltimezone_new ();
if (!icaltimezone_set_component (zone, icalcomponent_new_clone (subcomp)) || !icaltimezone_get_tzid (zone)) {
icaltimezone_free (zone, 1);
} else {
g_hash_table_insert (timezones, (gchar *) icaltimezone_get_tzid (zone), zone);
}
}
/* then each component */
for (subcomp = icalcomponent_get_first_component (icalcomp, ICAL_ANY_COMPONENT);
subcomp;
subcomp = icalcomponent_get_next_component (icalcomp, ICAL_ANY_COMPONENT)) {
icalcomponent_kind kind = icalcomponent_isa (subcomp);
if (kind == ICAL_VEVENT_COMPONENT ||
kind == ICAL_VTODO_COMPONENT ||
kind == ICAL_VJOURNAL_COMPONENT) {
ECalComponent *comp = e_cal_component_new ();
ECalComponentText summary = { 0 };
ECalComponentDateTime dt = { 0 };
gchar *formatted_dt;
if (!e_cal_component_set_icalcomponent (comp, icalcomponent_new_clone (subcomp))) {
g_object_unref (comp);
continue;
}
e_cal_component_get_summary (comp, &summary);
e_cal_component_get_dtstart (comp, &dt);
formatted_dt = format_dt (&dt, timezones, users_zone);
gtk_list_store_append (store, &iter);
gtk_list_store_set (
store, &iter,
0, kind == ICAL_VEVENT_COMPONENT ? (e_cal_component_has_attendees (comp) ? C_("iCalImp", "Meeting") : C_("iCalImp", "Event")) :
kind == ICAL_VTODO_COMPONENT ? C_("iCalImp", "Task") :
kind == ICAL_VJOURNAL_COMPONENT ? C_("iCalImp", "Memo") : "??? Other ???",
1, formatted_dt ? formatted_dt : "",
2, summary.value && *summary.value ? summary.value : summary.altrep && *summary.altrep ? summary.altrep : "",
3, comp,
-1);
g_free (formatted_dt);
e_cal_component_free_datetime (&dt);
g_object_unref (comp);
}
}
if (!gtk_tree_model_get_iter_first (GTK_TREE_MODEL (store), &iter)) {
g_object_unref (store);
g_hash_table_destroy (timezones);
return NULL;
}
preview = e_web_view_preview_new ();
gtk_widget_show (preview);
g_object_set_data_full (G_OBJECT (preview), "iCalImp-timezones", timezones, (GDestroyNotify) g_hash_table_destroy);
g_object_set_data (G_OBJECT (preview), "iCalImp-userszone", users_zone);
tree_view = e_web_view_preview_get_tree_view (E_WEB_VIEW_PREVIEW (preview));
g_return_val_if_fail (tree_view != NULL, NULL);
gtk_tree_view_set_model (tree_view, GTK_TREE_MODEL (store));
g_object_unref (store);
/* Translators: Column header for a component type; it can be Event, Task or Memo */
gtk_tree_view_insert_column_with_attributes (
tree_view, -1, C_("iCalImp", "Type"),
gtk_cell_renderer_text_new (), "text", 0, NULL);
/* Translators: Column header for a component start date/time */
gtk_tree_view_insert_column_with_attributes (
tree_view, -1, C_("iCalImp", "Start"),
gtk_cell_renderer_text_new (), "text", 1, NULL);
/* Translators: Column header for a component summary */
gtk_tree_view_insert_column_with_attributes (
tree_view, -1, C_("iCalImp", "Summary"),
gtk_cell_renderer_text_new (), "text", 2, NULL);
if (gtk_tree_model_iter_n_children (GTK_TREE_MODEL (store), NULL) > 1)
e_web_view_preview_show_tree_view (E_WEB_VIEW_PREVIEW (preview));
selection = gtk_tree_view_get_selection (tree_view);
gtk_tree_selection_select_iter (selection, &iter);
g_signal_connect (
selection, "changed",
G_CALLBACK (preview_selection_changed_cb), preview);
preview_selection_changed_cb (selection, E_WEB_VIEW_PREVIEW (preview));
return preview;
}
CamelMimeMessage *
scalix_appointment_to_mime_message (ScalixObject * object)
{
CamelMimeMessage *message;
CamelMultipart *multipart;
CamelMimePart *part;
CamelMedium *medium;
CamelStream *stream;
CamelDataWrapper *wrapper;
ECalComponentDateTime dtstart, dtend;
ECalComponent *comp;
ECalComponentText text;
icalcomponent_kind kind;
icalcomponent *icalcomp, *toplevel_comp;
icaltimezone *zone = NULL;
GSList *attachment_list = NULL;
GSList *attachment_list_new = NULL;
GSList *siter = NULL;
GList *part_list = NULL;
GList *iter = NULL;
char *msgid;
char *str, *meeting_status;
const char *ouid = NULL;
char *file_contents = NULL;
char *full_path, *filename, *mime_filename;
char *cid;
int size;
g_object_get (SCALIX_APPOINTMENT (object), "timezone", &zone, NULL);
comp = E_CAL_COMPONENT (scalix_object_clone (object));
message = camel_mime_message_new ();
medium = CAMEL_MEDIUM (message);
camel_medium_add_header (medium, "X-Scalix-Class", "IPM.Appointment");
/* Preserve msg id if there is already one */
if (scalix_appointment_get (SCALIX_APPOINTMENT (comp),
X_SCALIX_MSG_ID, &msgid)) {
scalix_appointment_unset (SCALIX_APPOINTMENT (comp), X_SCALIX_MSG_ID);
} else {
msgid = camel_header_msgid_generate ();
}
camel_mime_message_set_message_id (message, msgid);
/* subject */
e_cal_component_get_summary (comp, &text);
if (text.value != NULL) {
camel_mime_message_set_subject (message, text.value);
}
/* start day */
e_cal_component_get_dtstart (comp, &dtstart);
if (!icaltime_get_timezone (*dtstart.value))
icaltime_set_timezone (dtstart.value,
icaltimezone_get_builtin_timezone_from_tzid
(dtstart.tzid));
/* end day */
e_cal_component_get_dtend (comp, &dtend);
if (!icaltime_get_timezone (*dtend.value))
icaltime_set_timezone (dtend.value,
icaltimezone_get_builtin_timezone_from_tzid
(dtend.tzid));
/* set From: and Sender: */
if (e_cal_component_has_organizer (comp)) {
ECalComponentOrganizer organizer;
e_cal_component_get_organizer (comp, &organizer);
if (!strncasecmp (organizer.value, "MAILTO:", 7)) {
camel_medium_add_header (medium, "Sender", organizer.value + 7);
camel_medium_add_header (medium, "From", organizer.value + 7);
}
}
/* set the appropriate recipient headers from the recipient table */
if (e_cal_component_has_attendees (comp)
&& e_cal_component_has_organizer (comp)) {
GSList *iter, *attendees = NULL;
CamelInternetAddress *recipients_to = NULL;
CamelInternetAddress *recipients_cc = NULL;
meeting_status = "1";
e_cal_component_get_attendee_list (comp, &attendees);
for (iter = attendees; iter; iter = iter->next) {
ECalComponentAttendee *attendee = iter->data;
const char *mail = NULL;
/* attendee entries must start with MAILTO: */
if (strncasecmp (attendee->value, "MAILTO:", 7)) {
continue;
}
mail = attendee->value + 7;
if (attendee->role == ICAL_ROLE_REQPARTICIPANT) {
if (recipients_to == NULL) {
recipients_to = camel_internet_address_new ();
}
camel_internet_address_add (recipients_to, attendee->cn, mail);
} else if (attendee->role == ICAL_ROLE_OPTPARTICIPANT) {
if (recipients_cc == NULL) {
recipients_cc = camel_internet_address_new ();
}
camel_internet_address_add (recipients_cc, attendee->cn, mail);
} else {
continue;
}
}
if (recipients_to != NULL) {
camel_mime_message_set_recipients (message, "To", recipients_to);
camel_object_unref (recipients_to);
}
if (recipients_cc != NULL) {
camel_mime_message_set_recipients (message, "Cc", recipients_cc);
camel_object_unref (recipients_cc);
}
} else {
meeting_status = "0";
}
/* Clear properties */
scalix_appointment_unset (SCALIX_APPOINTMENT (comp), X_SCALIX_IMAP_UID);
/* Render the text/calendar */
e_cal_component_commit_sequence (comp);
icalcomp = e_cal_component_get_icalcomponent (comp);
kind = icalcomponent_isa (icalcomp);
if (kind != ICAL_VCALENDAR_COMPONENT) {
/* If its not a VCALENDAR, make it one to simplify below */
toplevel_comp = e_cal_util_new_top_level ();
icalcomponent_add_component (toplevel_comp, icalcomp);
icalcomp = toplevel_comp;
}
/* set METHOD to PUSBLISH */
icalcomponent_set_method (icalcomp, ICAL_METHOD_PUBLISH);
/* Add the VTIMEZONE components for start- and/or end-times */
if (zone) {
icalcomponent_add_component (icalcomp,
icaltimezone_get_component (zone));
} else if (dtstart.tzid) {
icalcomponent_add_component (icalcomp,
icaltimezone_get_component
(icaltimezone_get_builtin_timezone_from_tzid
(dtstart.tzid)));
}
if (dtstart.tzid && dtend.tzid && strcmp (dtstart.tzid, dtend.tzid) != 0) {
icalcomponent_add_component (icalcomp,
icaltimezone_get_component
(icaltimezone_get_builtin_timezone_from_tzid
(dtend.tzid)));
}
/* FIXME: do we leek icalcomponents here? */
if (e_cal_component_has_attachments (comp)) {
multipart = camel_multipart_new ();
camel_multipart_set_boundary (multipart, NULL);
e_cal_component_get_uid (comp, &ouid);
e_cal_component_get_attachment_list (comp, &attachment_list);
for (siter = attachment_list; siter; siter = siter->next) {
if (siter->data == NULL)
continue;
if (strstr (siter->data, "file://") != siter->data)
continue;
full_path = ((char *) siter->data) + strlen ("file://");
filename = g_strrstr (full_path, "/") + 1;
mime_filename = filename + strlen (ouid) + 1;
size = 0;
file_contents = get_file_contents (full_path, &size);
if (file_contents == NULL)
continue;
stream = camel_stream_mem_new_with_buffer (file_contents, size);
wrapper = camel_data_wrapper_new ();
camel_data_wrapper_construct_from_stream (wrapper, stream);
camel_object_unref (stream);
part = camel_mime_part_new ();
camel_medium_set_content_object (CAMEL_MEDIUM (part), wrapper);
camel_mime_part_set_filename (part, mime_filename);
camel_mime_part_set_encoding (part, CAMEL_TRANSFER_ENCODING_BASE64);
cid = camel_header_msgid_generate ();
camel_mime_part_set_content_id (part, cid);
camel_mime_part_set_description (part, mime_filename);
camel_mime_part_set_disposition (part, "attachment");
part_list = g_list_append (part_list, part);
attachment_list_new = g_slist_append (attachment_list_new,
g_strdup_printf ("CID:%s",
cid));
g_free (cid);
}
e_cal_component_set_attachment_list (comp, attachment_list_new);
str = icalcomponent_as_ical_string (icalcomp);
part = camel_mime_part_new ();
camel_mime_part_set_content (part,
str,
strlen (str),
"text/calendar; method=PUBLISH; charset=UTF-8");
part_list = g_list_prepend (part_list, part);
for (iter = part_list; iter; iter = iter->next) {
part = (CamelMimePart *) iter->data;
camel_multipart_add_part (multipart, part);
camel_object_unref (part);
}
camel_medium_set_content_object (CAMEL_MEDIUM (message),
CAMEL_DATA_WRAPPER (multipart));
camel_object_unref (multipart);
g_slist_free (attachment_list);
g_slist_free (attachment_list_new);
g_list_free (part_list);
} else {
str = icalcomponent_as_ical_string (icalcomp);
camel_mime_part_set_content (CAMEL_MIME_PART (message),
str,
strlen (str),
"text/calendar; method=PUBLISH; charset=UTF-8");
}
scalix_appointment_set (SCALIX_APPOINTMENT (object),
X_SCALIX_MSG_ID, msgid);
return message;
}
static void
dates_fill_details_dialog (DatesView *view, DatesData *d)
{
const gchar *location = NULL;
gchar *string = NULL;
GSList *text_list;
ECalComponentDateTime time;
struct tm timem;
gchar time_text[256];
GtkTextBuffer *buffer;
ECalComponentText summary;
GtkWidget *widget;
icaltimezone* from_zone;
/* Set summary entry */
e_cal_component_get_summary (d->comp, &summary);
widget = d->details_summary_entry;
if (summary.value)
gtk_entry_set_text (GTK_ENTRY (widget), summary.value);
else if (summary.altrep)
gtk_entry_set_text (GTK_ENTRY (widget), summary.altrep);
else
gtk_entry_set_text (GTK_ENTRY (widget), "");
/* Set event description textview */
/* NOTE: Docs say that only journal entries can have more than one
* description, so just use text_list->data
*/
e_cal_component_get_location (d->comp, &location);
e_cal_component_get_description_list (d->comp, &text_list);
buffer = gtk_text_view_get_buffer (
GTK_TEXT_VIEW (d->details_textview));
/* NOTE: If there's a location property, we move it to the description
*/
if (location)
string = g_strconcat (location, "\n", NULL);
gtk_text_buffer_set_text (buffer, string ? string : "", -1);
g_free (string);
if (text_list) {
ECalComponentText *desc = text_list->data;
if (desc->value) {
GtkTextIter iter;
gtk_text_buffer_get_end_iter (buffer, &iter);
gtk_text_buffer_insert (buffer, &iter, desc->value, -1);
}
e_cal_component_free_text_list (text_list);
}
/* Set time buttons and dialog */
e_cal_component_get_dtstart (d->comp, &time);
from_zone = icaltimezone_get_builtin_timezone_from_tzid (time.tzid);
timem = icaltimetype_to_tm_with_zone (time.value, from_zone, dates_view_get_zone(view));
strftime (time_text, 256, TIME_MARKUP, &timem);
gtk_label_set_markup (GTK_LABEL (d->details_start_label), time_text);
e_cal_component_free_datetime (&time);
e_cal_component_get_dtend (d->comp, &time);
from_zone = icaltimezone_get_builtin_timezone_from_tzid (time.tzid);
timem = icaltimetype_to_tm_with_zone (time.value, from_zone, dates_view_get_zone(view));
strftime (time_text, 256, TIME_MARKUP, &timem);
gtk_label_set_markup (GTK_LABEL (d->details_end_label),
time_text);
e_cal_component_free_datetime (&time);
}
/** Sync cache changes to the server and unmark them.
*
* @param cb 3E calendar backend.
*
* @return TRUE on success.
*
* @todo Conflict resolution.
*/
gboolean e_cal_backend_3e_sync_cache_to_server(ECalBackend3e *cb)
{
GError *local_err = NULL;
GSList *components, *iter;
if (!e_cal_backend_3e_open_connection(cb, &local_err))
{
g_warning("Sync failed. Can't open connection to the 3e server. (%s)", local_err ? local_err->message : "Unknown error");
g_clear_error(&local_err);
return FALSE;
}
g_static_rw_lock_reader_lock(&cb->priv->cache_lock);
components = e_cal_backend_store_get_components(cb->priv->store);
g_static_rw_lock_reader_unlock(&cb->priv->cache_lock);
for (iter = components; iter && !e_cal_backend_3e_sync_should_stop(cb); iter = iter->next)
{
ECalComponent *comp = E_CAL_COMPONENT(iter->data);
ECalComponent *remote_comp;
ECalComponentId *id = e_cal_component_get_id(comp);
ECalComponentVType type = e_cal_component_get_vtype (comp);
ECalComponentCacheState state = e_cal_component_get_cache_state(comp);
/* remove client properties before sending component to the server */
e_cal_component_set_outofsync (comp, FALSE);
e_cal_component_set_cache_state(comp, E_CAL_COMPONENT_CACHE_STATE_NONE);
remote_comp = e_cal_component_clone(comp);
char *remote_object = e_cal_component_get_as_string(remote_comp);
char *object = e_cal_component_get_as_string(comp);
if (type == E_CAL_COMPONENT_EVENT && !e_cal_backend_3e_convert_attachment_uris_to_remote(cb, remote_comp))
goto next;
if (type == E_CAL_COMPONENT_EVENT && (state == E_CAL_COMPONENT_CACHE_STATE_CREATED || state == E_CAL_COMPONENT_CACHE_STATE_MODIFIED))
{
if (!e_cal_backend_3e_upload_attachments(cb, remote_comp, &local_err))
{
e_cal_backend_notify_gerror_error(E_CAL_BACKEND(cb), "3e attachemnts sync failure", local_err);
g_clear_error(&local_err);
goto next;
}
/* add timezone */
const icaltimezone *zone = NULL;
ECalComponentDateTime datetime;
e_cal_component_get_dtstart (comp, &datetime);
g_static_rw_lock_reader_lock (&cb->priv->cache_lock);
zone = e_cal_backend_store_get_timezone (cb->priv->store, datetime.tzid);
g_static_rw_lock_reader_unlock (&cb->priv->cache_lock);
e_cal_component_free_datetime (&datetime);
if (zone)
{
icalcomponent *zone_comp = icaltimezone_get_component (zone);
char *object = icalcomponent_as_ical_string (zone_comp);
ESClient_addObject (cb->priv->conn, cb->priv->calspec, object, &local_err);
if (local_err)
g_clear_error (&local_err);
}
}
switch (state)
{
case E_CAL_COMPONENT_CACHE_STATE_CREATED:
{
ESClient_addObject(cb->priv->conn, cb->priv->calspec, remote_object, &local_err);
if (local_err)
{
e_cal_backend_notify_gerror_error(E_CAL_BACKEND(cb), "3e sync failure", local_err);
g_clear_error(&local_err);
break;
}
char *new_object = e_cal_component_get_as_string(comp);
e_cal_backend_notify_object_modified(E_CAL_BACKEND(cb), object, new_object);
g_free(new_object);
g_static_rw_lock_writer_lock(&cb->priv->cache_lock);
e_cal_backend_store_put_component(cb->priv->store, comp);
g_static_rw_lock_writer_unlock(&cb->priv->cache_lock);
break;
}
case E_CAL_COMPONENT_CACHE_STATE_MODIFIED:
{
ESClient_updateObject(cb->priv->conn, cb->priv->calspec, remote_object, &local_err);
if (local_err)
{
e_cal_backend_notify_gerror_error(E_CAL_BACKEND(cb), "3e sync failure", local_err);
g_clear_error(&local_err);
break;
}
char *new_object = e_cal_component_get_as_string(comp);
e_cal_backend_notify_object_modified(E_CAL_BACKEND(cb), object, new_object);
g_free(new_object);
g_static_rw_lock_writer_lock(&cb->priv->cache_lock);
e_cal_backend_store_put_component(cb->priv->store, comp);
g_static_rw_lock_writer_unlock(&cb->priv->cache_lock);
break;
}
case E_CAL_COMPONENT_CACHE_STATE_REMOVED:
{
char *oid = id->rid ? g_strdup_printf("%s@%s", id->uid, id->rid) : g_strdup(id->uid);
ESClient_deleteObject(cb->priv->conn, cb->priv->calspec, oid, &local_err);
g_free(oid);
if (local_err)
{
// ignore the error if component doesn't exist anymore
if (local_err->code == ES_XMLRPC_ERROR_UNKNOWN_COMPONENT)
{
g_clear_error(&local_err);
local_err = NULL;
}
else
{
e_cal_backend_notify_gerror_error(E_CAL_BACKEND(cb), "3e sync failure", local_err);
g_clear_error(&local_err);
break;
}
}
g_static_rw_lock_writer_lock(&cb->priv->cache_lock);
e_cal_backend_store_remove_component(cb->priv->store, id->uid, id->rid);
g_static_rw_lock_writer_unlock(&cb->priv->cache_lock);
break;
}
case E_CAL_COMPONENT_CACHE_STATE_NONE:
default:
break;
}
next:
g_object_unref(comp);
g_object_unref(remote_comp);
e_cal_component_free_id(id);
g_free(object);
g_free(remote_object);
}
g_slist_free(components);
e_cal_backend_3e_close_connection(cb);
return TRUE;
}
static void
set_itip_view (SunOneInvitationList *list, int row)
{
SunOneInvitationListPrivate *priv = list->priv;
ECalComponent *comp;
ECalComponentText text;
const char *string;
ECalComponentDateTime datetime;
GString *gstring = NULL;
GSList *description_list, *l;
SunOneItipView *itip_view;
ECalComponentOrganizer organizer;
if (row == -1) {
if (GTK_WIDGET_VISIBLE (priv->control))
gtk_widget_hide (priv->control);
return;
}
comp = sunone_invitation_list_model_get_comp (priv->model, row);
if (!comp)
return;
itip_view = (SunOneItipView *)priv->control;
sunone_itip_view_set_mode (itip_view, SUNONE_ITIP_VIEW_MODE_REQUEST);
sunone_itip_view_set_item_type (itip_view, E_CAL_SOURCE_TYPE_EVENT);
e_cal_component_get_organizer (comp, &organizer);
sunone_itip_view_set_organizer (itip_view, organizer.cn ? organizer.cn : itip_strip_mailto (organizer.value));
sunone_itip_view_set_sentby (itip_view, organizer.sentby);
e_cal_component_get_summary (comp, &text);
sunone_itip_view_set_summary (itip_view, text.value ? text.value : _("None"));
e_cal_component_get_location (comp, &string);
sunone_itip_view_set_location (itip_view, string);
e_cal_component_get_description_list (comp, &description_list);
for (l = description_list; l; l = l->next) {
ECalComponentText *text = l->data;
if (!gstring && text->value)
gstring = g_string_new (text->value);
else if (text->value)
g_string_append_printf (gstring, "\n\n%s", text->value);
}
e_cal_component_free_text_list (description_list);
if (gstring) {
sunone_itip_view_set_description (itip_view, gstring->str);
g_string_free (gstring, TRUE);
} else
sunone_itip_view_set_description (itip_view, NULL);
e_cal_component_get_dtstart (comp, &datetime);
if (datetime.value) {
struct tm start_tm;
start_tm = icaltimetype_to_tm_with_zone (datetime.value, icaltimezone_get_utc_timezone (), priv->model->zone);
sunone_itip_view_set_start (itip_view, &start_tm);
}
e_cal_component_free_datetime (&datetime);
e_cal_component_get_dtend (comp, &datetime);
if (datetime.value) {
struct tm end_tm;
end_tm = icaltimetype_to_tm_with_zone (datetime.value, icaltimezone_get_utc_timezone (), priv->model->zone);
sunone_itip_view_set_end (itip_view, &end_tm);
}
e_cal_component_free_datetime (&datetime);
/* Recurrence info */
sunone_itip_view_clear_upper_info_items (itip_view);
if (e_cal_component_has_recurrences (comp)) {
sunone_itip_view_add_upper_info_item (itip_view, SUNONE_ITIP_VIEW_INFO_ITEM_TYPE_INFO, "This meeting recurs");
}
sunone_itip_view_set_status (itip_view, NULL);
sunone_itip_view_set_comment (itip_view, NULL);
sunone_itip_view_set_show_rsvp (itip_view, FALSE);
if (!GTK_WIDGET_VISIBLE (priv->control))
gtk_widget_show (priv->control);
}
static gboolean
get_result_metas_cb (GcalShellSearchProvider *search_provider,
GDBusMethodInvocation *invocation,
gchar **results,
GcalShellSearchProvider2 *skel)
{
GcalShellSearchProviderPrivate *priv;
gint i;
gchar *uuid, *desc;
const gchar* location;
g_autoptr(GTimeZone) tz;
g_autoptr (GDateTime) datetime;
g_autoptr (GDateTime) local_datetime;
ECalComponentDateTime dtstart;
gchar *start_date;
ECalComponentText summary;
GdkRGBA color;
GVariantBuilder abuilder, builder;
GVariant *icon_variant;
GcalEventData *data;
GdkPixbuf *gicon;
priv = search_provider->priv;
g_variant_builder_init (&abuilder, G_VARIANT_TYPE ("aa{sv}"));
for (i = 0; i < g_strv_length (results); i++)
{
uuid = results[i];
data = g_hash_table_lookup (priv->events, uuid);
g_variant_builder_init (&builder, G_VARIANT_TYPE ("a{sv}"));
g_variant_builder_add (&builder, "{sv}", "id", g_variant_new_string (uuid));
e_cal_component_get_summary (data->event_component, &summary);
g_variant_builder_add (&builder, "{sv}", "name", g_variant_new_string (summary.value));
get_color_name_from_source (data->source, &color);
gicon = get_circle_pixbuf_from_color (&color, 128);
icon_variant = g_icon_serialize (G_ICON (gicon));
g_variant_builder_add (&builder, "{sv}", "icon", icon_variant);
g_object_unref (gicon);
g_variant_unref (icon_variant);
e_cal_component_get_dtstart (data->event_component, &dtstart);
if (dtstart.tzid != NULL)
tz = g_time_zone_new (dtstart.tzid);
else if (dtstart.value->zone != NULL)
tz = g_time_zone_new (icaltimezone_get_tzid ((icaltimezone*) dtstart.value->zone));
else
tz = g_time_zone_new_local ();
datetime = g_date_time_new (tz,
dtstart.value->year, dtstart.value->month, dtstart.value->day,
dtstart.value->hour, dtstart.value->minute, dtstart.value->second);
local_datetime = g_date_time_to_local (datetime);
/* FIXME: respect 24h time format */
start_date = g_date_time_format (local_datetime,
(dtstart.value->is_date == 1) ? "%x" : "%c");
e_cal_component_free_datetime (&dtstart);
e_cal_component_get_location (data->event_component, &location);
if (location != NULL)
desc = g_strconcat (start_date, ". ", location, NULL);
else
desc = g_strdup (start_date);
g_variant_builder_add (&builder, "{sv}", "description", g_variant_new_string (desc));
g_free (start_date);
g_free (desc);
g_variant_builder_add_value (&abuilder, g_variant_builder_end (&builder));
}
g_dbus_method_invocation_return_value (invocation, g_variant_new ("(aa{sv})", &abuilder));
return TRUE;
}
static void
gcal_year_view_component_added (ECalDataModelSubscriber *subscriber,
ECalClient *client,
ECalComponent *comp)
{
GcalYearViewPrivate *priv;
GcalYearView *year_view = GCAL_YEAR_VIEW (subscriber);
GcalEventData *data;
GList **days_widgets_array;
GList *l;
gint i, days_span;
ECalComponentDateTime date;
time_t event_start, event_end, range_start, range_end;
icaltimezone *zone;
priv = year_view->priv;
update_selected_dates_from_button_data (year_view);
days_span = icaltime_day_of_year(*(priv->end_selected_date)) - icaltime_day_of_year(*(priv->start_selected_date)) + 1;
days_widgets_array = g_new0 (GList*, days_span);
data = g_new0 (GcalEventData, 1);
data->source = e_client_get_source (E_CLIENT (client));
data->event_component = e_cal_component_clone (comp);
/* check if event belongs to range */
zone = gcal_manager_get_system_timezone (priv->manager);
range_start = icaltime_as_timet_with_zone (*(priv->start_selected_date), zone);
range_end = icaltime_as_timet_with_zone (*(priv->end_selected_date), zone);
e_cal_component_get_dtstart (comp, &date);
event_start = icaltime_as_timet_with_zone (*(date.value), date.value->zone != NULL ? date.value->zone : zone);
e_cal_component_free_datetime (&date);
e_cal_component_get_dtend (comp, &date);
if (date.value != NULL)
event_end = icaltime_as_timet_with_zone (*(date.value), date.value->zone != NULL ? date.value->zone : zone);
else
event_end = event_start;
e_cal_component_free_datetime (&date);
if (!((event_start <= range_start && event_end >= range_end) ||
(event_start >= range_start && event_end <= range_end) ||
(event_start >= range_start && event_start <= range_end) ||
(event_end >= range_start && event_end <= range_end)))
{
g_object_unref (data->event_component);
goto out;
}
add_event_to_day_array (year_view, data, days_widgets_array, days_span);
gtk_stack_set_visible_child_name (GTK_STACK (priv->navigator_stack), "events-list");
for (i = 0; i < days_span; i++)
{
GList *current_day = days_widgets_array[i];
for (l = current_day; l != NULL; l = g_list_next (l))
{
GtkWidget *child_widget = l->data;
gtk_widget_show (child_widget);
g_signal_connect (child_widget, "activate", G_CALLBACK (event_activated), year_view);
g_object_set_data (G_OBJECT (child_widget), "shift", GINT_TO_POINTER (i));
gtk_container_add (GTK_CONTAINER (priv->events_sidebar), child_widget);
}
g_list_free (current_day);
}
out:
g_free (data);
g_free (days_widgets_array);
}
static void
preview_comp (EWebViewPreview *preview,
ECalComponent *comp)
{
ECalComponentText text = { 0 };
ECalComponentDateTime dt;
ECalComponentClassification classif;
const gchar *str;
gchar *tmp;
gint percent;
gboolean have;
GHashTable *timezones;
icaltimezone *users_zone;
GSList *slist, *l;
g_return_if_fail (preview != NULL);
g_return_if_fail (comp != NULL);
timezones = g_object_get_data (G_OBJECT (preview), "iCalImp-timezones");
users_zone = g_object_get_data (G_OBJECT (preview), "iCalImp-userszone");
str = NULL;
switch (e_cal_component_get_vtype (comp)) {
case E_CAL_COMPONENT_EVENT:
str = e_cal_component_has_attendees (comp) ? C_("iCalImp", "Meeting") : C_("iCalImp", "Event");
break;
case E_CAL_COMPONENT_TODO:
str = C_("iCalImp", "Task");
break;
case E_CAL_COMPONENT_JOURNAL:
str = C_("iCalImp", "Memo");
break;
default:
str = "??? Other ???";
break;
}
have = FALSE;
if (e_cal_component_has_recurrences (comp)) {
e_web_view_preview_add_section (preview, have ? NULL : str, C_("iCalImp", "has recurrences"));
have = TRUE;
}
if (e_cal_component_is_instance (comp)) {
e_web_view_preview_add_section (preview, have ? NULL : str, C_("iCalImp", "is an instance"));
have = TRUE;
}
if (e_cal_component_has_alarms (comp)) {
e_web_view_preview_add_section (preview, have ? NULL : str, C_("iCalImp", "has reminders"));
have = TRUE;
}
if (e_cal_component_has_attachments (comp)) {
e_web_view_preview_add_section (preview, have ? NULL : str, C_("iCalImp", "has attachments"));
have = TRUE;
}
if (!have) {
e_web_view_preview_add_section (preview, str, "");
}
str = NULL;
classif = E_CAL_COMPONENT_CLASS_NONE;
e_cal_component_get_classification (comp, &classif);
if (classif == E_CAL_COMPONENT_CLASS_PUBLIC) {
/* Translators: Appointment's classification */
str = C_("iCalImp", "Public");
} else if (classif == E_CAL_COMPONENT_CLASS_PRIVATE) {
/* Translators: Appointment's classification */
str = C_("iCalImp", "Private");
} else if (classif == E_CAL_COMPONENT_CLASS_CONFIDENTIAL) {
/* Translators: Appointment's classification */
str = C_("iCalImp", "Confidential");
}
if (str)
/* Translators: Appointment's classification section name */
e_web_view_preview_add_section (preview, C_("iCalImp", "Classification"), str);
e_cal_component_get_summary (comp, &text);
if ((text.value && *text.value) || (text.altrep && *text.altrep))
/* Translators: Appointment's summary */
e_web_view_preview_add_section (preview, C_("iCalImp", "Summary"), (text.value && *text.value) ? text.value : text.altrep);
str = NULL;
e_cal_component_get_location (comp, &str);
if (str && *str)
/* Translators: Appointment's location */
e_web_view_preview_add_section (preview, C_("iCalImp", "Location"), str);
dt.value = NULL;
e_cal_component_get_dtstart (comp, &dt);
if (dt.value) {
tmp = format_dt (&dt, timezones, users_zone);
if (tmp)
/* Translators: Appointment's start time */
e_web_view_preview_add_section (preview, C_("iCalImp", "Start"), tmp);
g_free (tmp);
}
e_cal_component_free_datetime (&dt);
dt.value = NULL;
e_cal_component_get_due (comp, &dt);
if (dt.value) {
tmp = format_dt (&dt, timezones, users_zone);
if (tmp)
/* Translators: 'Due' like the time due a task should be finished */
e_web_view_preview_add_section (preview, C_("iCalImp", "Due"), tmp);
g_free (tmp);
} else {
e_cal_component_free_datetime (&dt);
dt.value = NULL;
e_cal_component_get_dtend (comp, &dt);
if (dt.value) {
tmp = format_dt (&dt, timezones, users_zone);
if (tmp)
/* Translators: Appointment's end time */
e_web_view_preview_add_section (preview, C_("iCalImp", "End"), tmp);
g_free (tmp);
}
}
e_cal_component_free_datetime (&dt);
str = NULL;
e_cal_component_get_categories (comp, &str);
if (str && *str)
/* Translators: Appointment's categories */
e_web_view_preview_add_section (preview, C_("iCalImp", "Categories"), str);
percent = e_cal_component_get_percent_as_int (comp);
if (percent >= 0) {
tmp = NULL;
if (percent == 100) {
icaltimetype *completed = NULL;
e_cal_component_get_completed (comp, &completed);
if (completed) {
dt.tzid = "UTC";
dt.value = completed;
tmp = format_dt (&dt, timezones, users_zone);
e_cal_component_free_icaltimetype (completed);
}
}
if (!tmp)
tmp = g_strdup_printf ("%d%%", percent);
/* Translators: Appointment's complete value (either percentage, or a date/time of a completion) */
e_web_view_preview_add_section (preview, C_("iCalImp", "Completed"), tmp);
g_free (tmp);
}
str = NULL;
e_cal_component_get_url (comp, &str);
if (str && *str)
/* Translators: Appointment's URL */
e_web_view_preview_add_section (preview, C_("iCalImp", "URL"), str);
if (e_cal_component_has_organizer (comp)) {
ECalComponentOrganizer organizer = { 0 };
e_cal_component_get_organizer (comp, &organizer);
if (organizer.value && *organizer.value) {
if (organizer.cn && *organizer.cn) {
tmp = g_strconcat (organizer.cn, " <", strip_mailto (organizer.value), ">", NULL);
/* Translators: Appointment's organizer */
e_web_view_preview_add_section (preview, C_("iCalImp", "Organizer"), tmp);
g_free (tmp);
} else {
e_web_view_preview_add_section (preview, C_("iCalImp", "Organizer"), strip_mailto (organizer.value));
}
}
}
if (e_cal_component_has_attendees (comp)) {
GSList *attendees = NULL, *a;
have = FALSE;
e_cal_component_get_attendee_list (comp, &attendees);
for (a = attendees; a; a = a->next) {
ECalComponentAttendee *attnd = a->data;
if (!attnd || !attnd->value || !*attnd->value)
continue;
if (attnd->cn && *attnd->cn) {
tmp = g_strconcat (attnd->cn, " <", strip_mailto (attnd->value), ">", NULL);
/* Translators: Appointment's attendees */
e_web_view_preview_add_section (preview, have ? NULL : C_("iCalImp", "Attendees"), tmp);
g_free (tmp);
} else {
e_web_view_preview_add_section (preview, have ? NULL : C_("iCalImp", "Attendees"), strip_mailto (attnd->value));
}
have = TRUE;
}
e_cal_component_free_attendee_list (attendees);
}
slist = NULL;
e_cal_component_get_description_list (comp, &slist);
for (l = slist; l; l = l->next) {
ECalComponentText *txt = l->data;
e_web_view_preview_add_section (preview, l != slist ? NULL : C_("iCalImp", "Description"), (txt && txt->value) ? txt->value : "");
}
e_cal_component_free_text_list (slist);
}
