citadel/ical_dezonify.c

   1 /*
   2  * $Id$
   3  *
   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.
   7  *
   8  */
   9
  10
  11 #include "sysdep.h"
  12 #include <unistd.h>
  13 #include <sys/types.h>
  14 #include <limits.h>
  15 #include <stdio.h>
  16 #include <string.h>
  17 #include <strings.h>
  18 #include "citadel.h"
  19 #include "server.h"
  20 #include "citserver.h"
  21 #include "sysdep_decls.h"
  22 #include "support.h"
  23 #include "config.h"
  24
  25 #ifdef HAVE_ICAL_H
  26 #include <ical.h>
  27 #include "ical_dezonify.h"
  28
  29
  30 /*
  31  * Back end function for ical_dezonify()
  32  *
  33  * We supply this with the master component, the relevant component,
  34  * and the property (which will be a DTSTART, DTEND, etc.)
  35  * which we want to convert to UTC.
  36  */
  37 void ical_dezonify_backend(icalcomponent *cal,
  38                         icalcomponent *rcal,
  39                         icalproperty *prop) {
  40
  41         icaltimezone *t;
  42         icalparameter *param;
  43         const char *tzid;
  44         struct icaltimetype TheTime;
  45
  46         /* Give me nothing and I will give you nothing in return. */
  47         if (cal == NULL) return;
  48
  49         /* Hunt for a TZID parameter in this property. */
  50         param = icalproperty_get_first_parameter(prop, ICAL_TZID_PARAMETER);
  51         if (param == NULL) return;
  52
  53         /* Get the stringish name of this TZID. */
  54         tzid = icalparameter_get_tzid(param);
  55         if (tzid == NULL) return;
  56
  57         /* Convert it to an icaltimezone type. */
  58         t = icalcomponent_get_timezone(cal, tzid);
  59         if (t == NULL) return;
  60
  61         /* Now we know the timezone.  Convert to UTC. */
  62
  63         if (icalproperty_isa(prop) == ICAL_DTSTART_PROPERTY) {
  64                 TheTime = icalproperty_get_dtstart(prop);
  65         }
  66         else if (icalproperty_isa(prop) == ICAL_DTEND_PROPERTY) {
  67                 TheTime = icalproperty_get_dtend(prop);
  68         }
  69         else if (icalproperty_isa(prop) == ICAL_DUE_PROPERTY) {
  70                 TheTime = icalproperty_get_due(prop);
  71         }
  72         else if (icalproperty_isa(prop) == ICAL_EXDATE_PROPERTY) {
  73                 TheTime = icalproperty_get_exdate(prop);
  74         }
  75         else {
  76                 return;
  77         }
  78
  79         /* Do the conversion. */
  80         icaltimezone_convert_time(&TheTime,
  81                                 t,
  82                                 icaltimezone_get_utc_timezone()
  83         );
  84         TheTime.is_utc = 1;
  85         icalproperty_remove_parameter_by_kind(prop, ICAL_TZID_PARAMETER);
  86
  87         /* Now add the converted property back in. */
  88         if (icalproperty_isa(prop) == ICAL_DTSTART_PROPERTY) {
  89                 icalproperty_set_dtstart(prop, TheTime);
  90         }
  91         else if (icalproperty_isa(prop) == ICAL_DTEND_PROPERTY) {
  92                 icalproperty_set_dtend(prop, TheTime);
  93         }
  94         else if (icalproperty_isa(prop) == ICAL_DUE_PROPERTY) {
  95                 icalproperty_set_due(prop, TheTime);
  96         }
  97         else if (icalproperty_isa(prop) == ICAL_EXDATE_PROPERTY) {
  98                 icalproperty_set_exdate(prop, TheTime);
  99         }
 100 }
 101
 102
 103 /*
 104  * Recursive portion of ical_dezonify()
 105  */
 106 void ical_dezonify_recur(icalcomponent *cal, icalcomponent *rcal) {
 107         icalcomponent *c;
 108         icalproperty *p;
 109
 110         /*
 111          * Recurse through all subcomponents *except* VTIMEZONE ones.
 112          */
 113         for (c=icalcomponent_get_first_component(
 114                                         rcal, ICAL_ANY_COMPONENT);
 115                 c != NULL;
 116                 c = icalcomponent_get_next_component(
 117                                         rcal, ICAL_ANY_COMPONENT)
 118         ) {
 119                 if (icalcomponent_isa(c) != ICAL_VTIMEZONE_COMPONENT) {
 120                         ical_dezonify_recur(cal, c);
 121                 }
 122         }
 123
 124         /*
 125          * Now look for DTSTART and DTEND properties
 126          */
 127         for (p=icalcomponent_get_first_property(
 128                                 rcal, ICAL_ANY_PROPERTY);
 129                 p != NULL;
 130                 p = icalcomponent_get_next_property(
 131                                 rcal, ICAL_ANY_PROPERTY)
 132         ) {
 133                 if (
 134                         (icalproperty_isa(p) == ICAL_DTSTART_PROPERTY)
 135                         || (icalproperty_isa(p) == ICAL_DTEND_PROPERTY)
 136                         || (icalproperty_isa(p) == ICAL_DUE_PROPERTY)
 137                         || (icalproperty_isa(p) == ICAL_EXDATE_PROPERTY)
 138                    ) {
 139                         ical_dezonify_backend(cal, rcal, p);
 140                 }
 141         }
 142 }
 143
 144
 145 /*
 146  * Convert all DTSTART and DTEND properties in all subcomponents to UTC.
 147  * This function will search any VTIMEZONE subcomponents to learn the
 148  * relevant timezone information.
 149  */
 150 void ical_dezonify(icalcomponent *cal) {
 151         icalcomponent *vt = NULL;
 152
 153         /* Convert all times to UTC */
 154         ical_dezonify_recur(cal, cal);
 155
 156         /* Strip out VTIMEZONE subcomponents -- we don't need them anymore */
 157         while (vt = icalcomponent_get_first_component(
 158                         cal, ICAL_VTIMEZONE_COMPONENT), vt != NULL) {
 159                 icalcomponent_remove_component(cal, vt);
 160                 icalcomponent_free(vt);
 161         }
 162
 163 }
 164
 165
 166 #endif /* HAVE_ICAL_H */