4 * Function to go through an ical component set and convert all non-UTC
5 * date/time properties to UTC. It also strips out any VTIMEZONE
6 * subcomponents afterwards, because they're irrelevant.
8 * Everything here will work on both a fully encapsulated VCALENDAR component
9 * or any type of subcomponent.
14 #include "webserver.h"
17 #ifdef WEBCIT_WITH_CALENDAR_SERVICE
21 * Figure out which time zone needs to be used for timestamps that are
22 * not UTC and do not have a time zone specified.
25 icaltimezone *get_default_icaltimezone(void) {
27 icaltimezone *zone = NULL;
28 char *default_zone_name = serv_info.serv_default_cal_zone;
31 zone = icaltimezone_get_builtin_timezone(default_zone_name);
34 lprintf(1, "Unable to load '%s' time zone. Defaulting to UTC.\n", default_zone_name);
35 zone = icaltimezone_get_utc_timezone();
38 lprintf(1, "Unable to load UTC time zone!\n");
45 * Back end function for ical_dezonify()
47 * We supply this with the master component, the relevant component,
48 * and the property (which will be a DTSTART, DTEND, etc.)
49 * which we want to convert to UTC.
51 void ical_dezonify_backend(icalcomponent *cal,
55 icaltimezone *t = NULL;
57 const char *tzid = NULL;
58 struct icaltimetype TheTime;
59 int utc_declared_as_tzid = 0; /* Component declared 'TZID=GMT' instead of using Z syntax */
61 /* Give me nothing and I will give you nothing in return. */
62 if (cal == NULL) return;
64 /* Hunt for a TZID parameter in this property. */
65 param = icalproperty_get_first_parameter(prop, ICAL_TZID_PARAMETER);
67 /* Get the stringish name of this TZID. */
69 tzid = icalparameter_get_tzid(param);
71 /* Convert it to an icaltimezone type. */
73 lprintf(9, " * Stringy supplied timezone is: '%s'\n", tzid);
74 if ( (!strcasecmp(tzid, "UTC")) || (!strcasecmp(tzid, "GMT")) ) {
75 utc_declared_as_tzid = 1;
76 lprintf(9, " * ...and we handle that internally.\n");
79 t = icalcomponent_get_timezone(cal, tzid);
80 lprintf(9, " * ...and I %s have tzdata for that zone.\n",
88 /* Now we know the timezone. Convert to UTC. */
90 if (icalproperty_isa(prop) == ICAL_DTSTART_PROPERTY) {
91 TheTime = icalproperty_get_dtstart(prop);
93 else if (icalproperty_isa(prop) == ICAL_DTEND_PROPERTY) {
94 TheTime = icalproperty_get_dtend(prop);
96 else if (icalproperty_isa(prop) == ICAL_DUE_PROPERTY) {
97 TheTime = icalproperty_get_due(prop);
99 else if (icalproperty_isa(prop) == ICAL_EXDATE_PROPERTY) {
100 TheTime = icalproperty_get_exdate(prop);
106 lprintf(9, " * Was: %s\n", icaltime_as_ical_string(TheTime));
108 if (TheTime.is_utc) {
109 lprintf(9, " * This property is ALREADY UTC.\n");
112 else if (utc_declared_as_tzid) {
113 lprintf(9, " * Replacing '%s' TZID with 'Z' suffix.\n", tzid);
118 /* Do the conversion. */
120 lprintf(9, " * Timezone prop found. Converting to UTC.\n");
123 lprintf(9, " * Converting default timezone to UTC.\n");
127 // FIXME t = icaltimezone_copy(get_default_icaltimezone());
128 t = get_default_icaltimezone();
130 icaltimezone_convert_time(&TheTime,
132 icaltimezone_get_utc_timezone()
134 icaltimezone_free (t, 1);
138 icalproperty_remove_parameter_by_kind(prop, ICAL_TZID_PARAMETER);
139 lprintf(9, " * Now: %s\n", icaltime_as_ical_string(TheTime));
141 /* Now add the converted property back in. */
142 if (icalproperty_isa(prop) == ICAL_DTSTART_PROPERTY) {
143 icalproperty_set_dtstart(prop, TheTime);
145 else if (icalproperty_isa(prop) == ICAL_DTEND_PROPERTY) {
146 icalproperty_set_dtend(prop, TheTime);
148 else if (icalproperty_isa(prop) == ICAL_DUE_PROPERTY) {
149 icalproperty_set_due(prop, TheTime);
151 else if (icalproperty_isa(prop) == ICAL_EXDATE_PROPERTY) {
152 icalproperty_set_exdate(prop, TheTime);
158 * Recursive portion of ical_dezonify()
160 void ical_dezonify_recurse(icalcomponent *cal, icalcomponent *rcal) {
165 * Recurse through all subcomponents *except* VTIMEZONE ones.
167 for (c=icalcomponent_get_first_component(
168 rcal, ICAL_ANY_COMPONENT);
170 c = icalcomponent_get_next_component(
171 rcal, ICAL_ANY_COMPONENT)
173 if (icalcomponent_isa(c) != ICAL_VTIMEZONE_COMPONENT) {
174 ical_dezonify_recurse(cal, c);
179 * Now look for DTSTART and DTEND properties
181 for (p=icalcomponent_get_first_property(rcal, ICAL_ANY_PROPERTY);
183 p = icalcomponent_get_next_property(rcal, ICAL_ANY_PROPERTY)
186 (icalproperty_isa(p) == ICAL_DTSTART_PROPERTY)
187 || (icalproperty_isa(p) == ICAL_DTEND_PROPERTY)
188 || (icalproperty_isa(p) == ICAL_DUE_PROPERTY)
189 || (icalproperty_isa(p) == ICAL_EXDATE_PROPERTY)
191 ical_dezonify_backend(cal, rcal, p);
198 * Convert all DTSTART and DTEND properties in all subcomponents to UTC.
199 * This function will search any VTIMEZONE subcomponents to learn the
200 * relevant timezone information.
202 void ical_dezonify(icalcomponent *cal) {
203 icalcomponent *vt = NULL;
205 lprintf(9, "ical_dezonify() started\n");
207 /* Convert all times to UTC */
208 ical_dezonify_recurse(cal, cal);
210 /* Strip out VTIMEZONE subcomponents -- we don't need them anymore */
211 while (vt = icalcomponent_get_first_component(
212 cal, ICAL_VTIMEZONE_COMPONENT), vt != NULL) {
213 icalcomponent_remove_component(cal, vt);
214 icalcomponent_free(vt);
217 lprintf(9, "ical_dezonify() completed\n");
221 #endif /* WEBCIT_WITH_CALENDAR_SERVICE */