Began making changes to do better handling of character sets.
[citadel.git] / webcit / calendar_tools.c
index 49fbcb7642310420283712fec97cf6b07b1bf691..d62cb8296907e4f39606297176ea92b3350e4675 100644 (file)
 /*
  * $Id$
- *
- *
  */
-
-#include <ctype.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <sys/socket.h>
-#include <limits.h>
-#include <netinet/in.h>
-#include <netdb.h>
-#include <string.h>
-#include <pwd.h>
-#include <errno.h>
-#include <stdarg.h>
-#include <pthread.h>
-#include <signal.h>
-#include <time.h>
+/**
+ * \defgroup MiscCal Miscellaneous functions which handle calendar components.
+ * \ingroup Calendaring
+ */
+/*@{*/
 #include "webcit.h"
 #include "webserver.h"
 
-char *months[] = {
-       "January", "February", "March", "April", "May", "June", "July",
-       "August", "September", "October", "November", "December"
+/** Hour strings */
+char *hourname[] = {
+       "12am", "1am", "2am", "3am", "4am", "5am", "6am",
+       "7am", "8am", "9am", "10am", "11am", "12pm",
+       "1pm", "2pm", "3pm", "4pm", "5pm", "6pm",
+       "7pm", "8pm", "9pm", "10pm", "11pm"
 };
 
-char *days[] = {
-       "Sunday", "Monday", "Tuesday", "Wednesday",
-       "Thursday", "Friday", "Saturday"
-};
+#ifdef WEBCIT_WITH_CALENDAR_SERVICE
 
-#ifdef HAVE_ICAL_H
+/**
+ * \brief display and edit date/time
+ * The display_icaltimetype_as_webform() and icaltime_from_webform() functions
+ * handle the display and editing of date/time properties in web pages.  The
+ * first one converts an icaltimetype into valid HTML markup -- a series of form
+ * fields for editing the date and time.  When the user submits the form, the
+ * results can be fed back into the second function, which turns it back into
+ * an icaltimetype.  The "prefix" string required by both functions is prepended
+ * to all field names.  This allows a form to contain more than one date/time
+ * property (for example, a start and end time) by ensuring the field names are
+ * unique within the form.
+ *
+ * \todo NOTE: These functions assume that the icaltimetype being edited is in UTC, and
+ * will convert to/from local time for editing.  "local" in this case is assumed
+ * to be the time zone in which the WebCit server is running.  A future improvement
+ * might be to allow the user to specify his/her timezone.
+ * \param t the time we want to parse
+ * \param prefix ???? \todo
+ */
 
 
 void display_icaltimetype_as_webform(struct icaltimetype *t, char *prefix) {
        int i;
        time_t now;
-       struct tm *tm;
+       struct tm tm_now;
        int this_year;
+       time_t tt;
+       struct tm tm;
        const int span = 10;
+       int all_day_event = 0;
+       time_t monthselect_time;
+       struct tm monthselect_tm;
+       char monthselect_str[32];
+       char calhourformat[16];
+
+       get_preference("calhourformat", calhourformat, sizeof calhourformat);
 
        now = time(NULL);
-       tm = localtime(&now);
-       this_year = tm->tm_year + 1900;
+       localtime_r(&now, &tm_now);
+       this_year = tm_now.tm_year + 1900;
 
        if (t == NULL) return;
+       if (t->is_date) all_day_event = 1;
+       tt = icaltime_as_timet(*t);
+       if (all_day_event) {
+               gmtime_r(&tt, &tm);
+       }
+       else {
+               localtime_r(&tt, &tm);
+       }
 
-       wprintf("Month: ");
+       wprintf(_("Month: "));
        wprintf("<SELECT NAME=\"%s_month\" SIZE=\"1\">\n", prefix);
-       for (i=1; i<=12; ++i) {
+       for (i=0; i<=11; ++i) {
+               monthselect_time = 1137997451 + (i * 2592000);
+               localtime_r(&monthselect_time, &monthselect_tm);
+               wc_strftime(monthselect_str, sizeof monthselect_str, "%B", &monthselect_tm);
                wprintf("<OPTION %s VALUE=\"%d\">%s</OPTION>\n",
-                       ((t->month == i) ? "SELECTED" : ""),
-                       i,
-                       months[i-1]
+                       ((tm.tm_mon == i) ? "SELECTED" : ""),
+                       i+1,
+                       monthselect_str
                );
        }
        wprintf("</SELECT>\n");
 
-       wprintf("Day: ");
+       wprintf(_("Day: "));
        wprintf("<SELECT NAME=\"%s_day\" SIZE=\"1\">\n", prefix);
        for (i=1; i<=31; ++i) {
                wprintf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
-                       ((t->day == i) ? "SELECTED" : ""),
+                       ((tm.tm_mday == i) ? "SELECTED" : ""),
                        i, i
                );
        }
        wprintf("</SELECT>\n");
 
-       wprintf("Year: ");
+       wprintf(_("Year: "));
        wprintf("<SELECT NAME=\"%s_year\" SIZE=\"1\">\n", prefix);
        if ((this_year - t->year) > span) {
                wprintf("<OPTION SELECTED VALUE=\"%d\">%d</OPTION>\n",
@@ -91,70 +112,191 @@ void display_icaltimetype_as_webform(struct icaltimetype *t, char *prefix) {
        }
        wprintf("</SELECT>\n");
 
-       wprintf("Hour: ");
+       wprintf(_("Hour: "));
        wprintf("<SELECT NAME=\"%s_hour\" SIZE=\"1\">\n", prefix);
        for (i=0; i<=23; ++i) {
-               wprintf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
-                       ((t->hour == i) ? "SELECTED" : ""),
-                       i, i
-               );
+
+               if (!strcasecmp(calhourformat, "24")) {
+                       wprintf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
+                               ((tm.tm_hour == i) ? "SELECTED" : ""),
+                               i, i
+                       );
+               }
+               else {
+                       wprintf("<OPTION %s VALUE=\"%d\">%s</OPTION>\n",
+                               ((tm.tm_hour == i) ? "SELECTED" : ""),
+                               i, hourname[i]
+                       );
+               }
+
        }
        wprintf("</SELECT>\n");
 
-       wprintf("Minute: ");
+       wprintf(_("Minute: "));
        wprintf("<SELECT NAME=\"%s_minute\" SIZE=\"1\">\n", prefix);
        for (i=0; i<=59; ++i) {
-               wprintf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
-                       ((t->minute == i) ? "SELECTED" : ""),
-                       i, i
-               );
+               if ( (i % 5 == 0) || (tm.tm_min == i) ) {
+                       wprintf("<OPTION %s VALUE=\"%d\">:%02d</OPTION>\n",
+                               ((tm.tm_min == i) ? "SELECTED" : ""),
+                               i, i
+                       );
+               }
        }
        wprintf("</SELECT>\n");
+}
+
+/**
+ *\brief Get time from form
+ * get the time back from the user and convert it into internal structs.
+ * \param t our time element
+ * \param prefix whats that\todo ????
+ */
+void icaltime_from_webform(struct icaltimetype *t, char *prefix) {
+       char vname[32];
+        time_t tt;
+        struct tm tm;
+       struct icaltimetype t2;
+
+        tt = time(NULL);
+        localtime_r(&tt, &tm);
+
+        sprintf(vname, "%s_month", prefix);     tm.tm_mon = atoi(bstr(vname)) - 1;
+        sprintf(vname, "%s_day", prefix);       tm.tm_mday = atoi(bstr(vname));
+        sprintf(vname, "%s_year", prefix);      tm.tm_year = atoi(bstr(vname)) - 1900;
+        sprintf(vname, "%s_hour", prefix);      tm.tm_hour = atoi(bstr(vname));
+        sprintf(vname, "%s_minute", prefix);    tm.tm_min = atoi(bstr(vname));
+
+        tt = mktime(&tm);
+        t2 = icaltime_from_timet(tt, 0);
+       memcpy(t, &t2, sizeof(struct icaltimetype));
+}
+
+/**
+ *\brief Get time from form
+ * get the time back from the user and convert it into internal structs.
+ * \param t our time element
+ * \param prefix whats that\todo ????
+ */
 
-       wprintf("<INPUT TYPE=\"checkbox\" NAME=\"%s_alldayevent\" "
-               "VALUE=\"yes\" %s> All day event",
-               prefix,
-               ((t->is_date) ? "CHECKED" : ""));
+void icaltime_from_webform_dateonly(struct icaltimetype *t, char *prefix) {
+       char vname[32];
+
+       memset(t, 0, sizeof(struct icaltimetype));
+
+        sprintf(vname, "%s_month", prefix);     t->month = atoi(bstr(vname));
+        sprintf(vname, "%s_day", prefix);       t->day = atoi(bstr(vname));
+        sprintf(vname, "%s_year", prefix);      t->year = atoi(bstr(vname));
+       t->is_utc = 1;
+       t->is_date = 1;
 }
 
 
-struct icaltimetype icaltime_from_webform(char *prefix) {
-       struct icaltimetype t;
-       time_t now;
-       char vname[SIZ];
+/**
+ * \brief Render PAPSTAT
+ * Render a PARTSTAT parameter as a string (and put it in parentheses)
+ * \param buf the string to put it to
+ * \param attendee the attendee to textify
+ */
+void partstat_as_string(char *buf, icalproperty *attendee) {
+       icalparameter *partstat_param;
+       icalparameter_partstat partstat;
 
-       now = time(NULL);
-       t = icaltime_from_timet(now, 0);
-
-       sprintf(vname, "%s_month", prefix);     t.month = atoi(bstr(vname));
-       sprintf(vname, "%s_day", prefix);       t.day = atoi(bstr(vname));
-       sprintf(vname, "%s_year", prefix);      t.year = atoi(bstr(vname));
-       sprintf(vname, "%s_hour", prefix);      t.hour = atoi(bstr(vname));
-       sprintf(vname, "%s_minute", prefix);    t.minute = atoi(bstr(vname));
-
-       sprintf(vname, "%s_alldayevent", prefix);
-       if (!strcasecmp(bstr(vname), "yes")) {
-               t.hour = 0;
-               t.minute = 0;
-               t.is_date = 1;
+       strcpy(buf, _("(status unknown)"));
+
+       partstat_param = icalproperty_get_first_parameter(
+                               attendee,
+                               ICAL_PARTSTAT_PARAMETER
+       );
+       if (partstat_param == NULL) {
+               return;
        }
 
-       t = icaltime_normalize(t);
-       return(t);
+       partstat = icalparameter_get_partstat(partstat_param);
+       switch(partstat) {
+               case ICAL_PARTSTAT_X:
+                       strcpy(buf, "(x)");
+                       break;
+               case ICAL_PARTSTAT_NEEDSACTION:
+                       strcpy(buf, _("(needs action)"));
+                       break;
+               case ICAL_PARTSTAT_ACCEPTED:
+                       strcpy(buf, _("(accepted)"));
+                       break;
+               case ICAL_PARTSTAT_DECLINED:
+                       strcpy(buf, _("(declined)"));
+                       break;
+               case ICAL_PARTSTAT_TENTATIVE:
+                       strcpy(buf, _("(tenative)"));
+                       break;
+               case ICAL_PARTSTAT_DELEGATED:
+                       strcpy(buf, _("(delegated)"));
+                       break;
+               case ICAL_PARTSTAT_COMPLETED:
+                       strcpy(buf, _("(completed)"));
+                       break;
+               case ICAL_PARTSTAT_INPROCESS:
+                       strcpy(buf, _("(in process)"));
+                       break;
+               case ICAL_PARTSTAT_NONE:
+                       strcpy(buf, _("(none)"));
+                       break;
+       }
 }
 
 
-/*
- * Generae a new, globally unique UID parameter for a calendar object.
+/**
+ * \brief embedd
+ * Utility function to encapsulate a subcomponent into a full VCALENDAR
+ * \param subcomp the component to encapsulate
+ * \returns the meta object ???
  */
-void generate_new_uid(char *buf) {
-       static int seq = 0;
+icalcomponent *ical_encapsulate_subcomponent(icalcomponent *subcomp) {
+       icalcomponent *encaps;
+
+       /* lprintf(9, "ical_encapsulate_subcomponent() called\n"); */
 
-       sprintf(buf, "%ld-%d@%s",
-               (long)time(NULL),
-               (seq++),
-               serv_info.serv_fqdn);
+       if (subcomp == NULL) {
+               lprintf(3, "ERROR: called with NULL argument!\n");
+               return NULL;
+       }
+
+       /**
+        * If we're already looking at a full VCALENDAR component,
+        * don't bother ... just return itself.
+        */
+       if (icalcomponent_isa(subcomp) == ICAL_VCALENDAR_COMPONENT) {
+               return subcomp;
+       }
+
+       /** Encapsulate the VEVENT component into a complete VCALENDAR */
+       encaps = icalcomponent_new(ICAL_VCALENDAR_COMPONENT);
+       if (encaps == NULL) {
+               lprintf(3, "%s:%d: Error - could not allocate component!\n",
+                       __FILE__, __LINE__);
+               return NULL;
+       }
+
+       /** Set the Product ID */
+       icalcomponent_add_property(encaps, icalproperty_new_prodid(PRODID));
+
+       /** Set the Version Number */
+       icalcomponent_add_property(encaps, icalproperty_new_version("2.0"));
+
+       /** Encapsulate the subcomponent inside */
+       /* lprintf(9, "Doing the encapsulation\n"); */
+       icalcomponent_add_component(encaps, subcomp);
+
+       /** Convert all timestamps to UTC so we don't have to deal with
+        * stupid VTIMEZONE crap.
+        */
+       ical_dezonify(encaps);
+
+       /** Return the object we just created. */
+       return(encaps);
 }
 
 
+
+
 #endif
+/*@}*/