X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=webcit%2Fcalendar_tools.c;h=86da183b8abcca7f6a8666b7e2b99a1ae1142fc5;hb=HEAD;hp=f06b8e09fd6f7401a3301942646226db28127e19;hpb=3fc2504fcc0a240ea2c933f23deaa57b23a02c53;p=citadel.git

diff --git a/webcit/calendar_tools.c b/webcit/calendar_tools.c
index f06b8e09f..488296ca7 100644
--- a/webcit/calendar_tools.c
+++ b/webcit/calendar_tools.c
@@ -1,14 +1,23 @@
 /*
- * $Id$
- *
  * Miscellaneous functions which handle calendar components.
+ *
+ * Copyright (c) 1996-2012 by the citadel.org team
+ *
+ * This program is open source software.  You can redistribute it and/or
+ * modify it under the terms of the GNU General Public License, version 3.
+ *
+ * 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.
  */
 
 #include "webcit.h"
-#include "webserver.h"
+
 #include "time.h"
+#include "calendar.h"
 
-/** Hour strings */
+/* Hour strings */
 char *hourname[] = {
 	"12am", "1am", "2am", "3am", "4am", "5am", "6am",
 	"7am", "8am", "9am", "10am", "11am", "12pm",
@@ -16,8 +25,7 @@ char *hourname[] = {
 	"7pm", "8pm", "9pm", "10pm", "11pm"
 };
 
-/**
- * \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
@@ -28,20 +36,17 @@ char *hourname[] = {
  * 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
+ * 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) {
+void display_icaltimetype_as_webform(struct icaltimetype *t, char *prefix, int date_only) {
+	wcsession *WCC = WC;
 	int i;
 	time_t now;
 	struct tm tm_now;
-	int this_year;
 	time_t tt;
 	struct tm tm;
 	int all_day_event = 0;
@@ -52,7 +57,6 @@ void display_icaltimetype_as_webform(struct icaltimetype *t, char *prefix) {
 
 	now = time(NULL);
 	localtime_r(&now, &tm_now);
-	this_year = tm_now.tm_year + 1900;
 
 	if (t == NULL) return;
 	if (t->is_date) all_day_event = 1;
@@ -64,115 +68,114 @@ void display_icaltimetype_as_webform(struct icaltimetype *t, char *prefix) {
 		localtime_r(&tt, &tm);
 	}
 
-	wprintf("<input type=\"text\" name=\"");
-	wprintf(prefix);
-	wprintf("\" id=\"");
-	wprintf(prefix);
-	wprintf("\" value=\"");
-	wc_strftime(timebuf, 32, "%d/%m/%Y", &tm);
-	wprintf(timebuf);
-	wprintf("\">");
-	wprintf("<script type=\"text/javascript\">\n");
-	wprintf("	var dpck = new DatePicker({\n		");
-	wprintf("relative: '");
-	wprintf(prefix);
-	wprintf("',\n	language: 'en',\n");
-	wprintf("disableFutureDate:	false\n});</script>");
-	wprintf(_("Hour: "));
-	wprintf("<SELECT NAME=\"%s_hour\" SIZE=\"1\">\n", prefix);
+	wc_printf("<input type=\"date\" name=\"");
+	StrBufAppendBufPlain(WCC->WBuf, prefix, -1, 0);
+	wc_printf("\" id=\"");
+	StrBufAppendBufPlain(WCC->WBuf, prefix, -1, 0);
+	wc_printf("\" size=\"10\" maxlength=\"10\" value=\"");
+	wc_strftime(timebuf, 32, "%Y-%m-%d", &tm);
+	StrBufAppendBufPlain(WCC->WBuf, timebuf, -1, 0);
+	wc_printf("\">");
+
+	StrBufAppendPrintf(WC->trailing_javascript, "attachDatePicker('");
+	StrBufAppendPrintf(WC->trailing_javascript, prefix);
+	StrBufAppendPrintf(WC->trailing_javascript, "', '%s');\n", get_selected_language());
+
+	/* If we're editing a date only, we still generate the time boxes, but we hide them.
+	 * This keeps the data model consistent.
+	 */
+	if (date_only) {
+		wc_printf("<div style=\"display:none\">");
+	}
+
+	wc_printf("<span ID=\"");
+	StrBufAppendBufPlain(WCC->WBuf, prefix, -1, 0);
+	wc_printf("_time\">");
+	wc_printf(_("Hour: "));
+	wc_printf("<SELECT NAME=\"%s_hour\" SIZE=\"1\">\n", prefix);
 	for (i=0; i<=23; ++i) {
 
 		if (time_format == WC_TIMEFORMAT_24) {
-			wprintf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
+			wc_printf("<OPTION %s VALUE=\"%d\">%d</OPTION>\n",
 				((tm.tm_hour == i) ? "SELECTED" : ""),
 				i, i
 				);
 		}
 		else {
-			wprintf("<OPTION %s VALUE=\"%d\">%s</OPTION>\n",
+			wc_printf("<OPTION %s VALUE=\"%d\">%s</OPTION>\n",
 				((tm.tm_hour == i) ? "SELECTED" : ""),
 				i, hourname[i]
 				);
 		}
 
 	}
-	wprintf("</SELECT>\n");
+	wc_printf("</SELECT>\n");
 
-	wprintf(_("Minute: "));
-	wprintf("<SELECT NAME=\"%s_minute\" SIZE=\"1\">\n", prefix);
+	wc_printf(_("Minute: "));
+	wc_printf("<SELECT NAME=\"%s_minute\" SIZE=\"1\">\n", prefix);
 	for (i=0; i<=59; ++i) {
 		if ( (i % 5 == 0) || (tm.tm_min == i) ) {
-			wprintf("<OPTION %s VALUE=\"%d\">:%02d</OPTION>\n",
+			wc_printf("<OPTION %s VALUE=\"%d\">:%02d</OPTION>\n",
 				((tm.tm_min == i) ? "SELECTED" : ""),
 				i, i
 				);
 		}
 	}
-	wprintf("</SELECT>\n");
+	wc_printf("</SELECT></span>\n");
+
+	if (date_only) {
+		wc_printf("</div>");
+	}
 }
 
-/**
- *\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 ????
+/*
+ * Get date/time from a web form and convert it into an icaltimetype struct.
  */
 void icaltime_from_webform(struct icaltimetype *t, char *prefix) {
- 	char datebuf[32];
   	char vname[32];
- 	struct tm tm;
- 	/* Stuff tm with some zero values */
-	tm.tm_year = 0;
- 	tm.tm_sec = 0;
- 	tm.tm_min = 0;
- 	tm.tm_hour = 0;
- 	tm.tm_mday = 0;
- 	tm.tm_mon = 0;
- 	int hour = 0;
- 	int minute = 0;
-  	struct icaltimetype t2;
- 	
-	
- 	strptime((char*)BSTR(prefix), "%d/%m/%Y", &tm);
- 	sprintf(vname, "%s_hour", prefix);      hour = IBSTR(vname);
-	sprintf(vname, "%s_minute", prefix);    minute = IBSTR(vname);
- 	tm.tm_hour = hour;
- 	tm.tm_min = minute;
-	strftime(&datebuf[0], 32, "%Y%m%dT%H%M%S", &tm);
- 	t2 = icaltime_from_string(datebuf);
-  	memcpy(t, &t2, sizeof(struct icaltimetype));
+
+	if (!t) return;
+
+ 	/* Stuff with zero values */
+	memset(t, 0, sizeof(struct icaltimetype));
+
+	/* Get the year/month/date all in one shot -- it will be in ISO YYYY-MM-DD format */
+	sscanf((char*)BSTR(prefix), "%04d-%02d-%02d", &t->year, &t->month, &t->day);
+
+	/* hour */
+ 	sprintf(vname, "%s_hour", prefix);
+	t->hour = IBSTR(vname);
+
+	/* minute */
+	sprintf(vname, "%s_minute", prefix);
+	t->minute = IBSTR(vname);
+
+	/* time zone is set to the default zone for this server */
+	t->is_date = 0;
+	t->zone = get_default_icaltimezone();
 }
 
 
-/**
- *\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 ????
+/*
+ * Get date (no time) from a web form and convert it into an icaltimetype struct.
  */
-
 void icaltime_from_webform_dateonly(struct icaltimetype *t, char *prefix) {
- 	struct tm tm;
- 	/* Stuff tm with some zero values */
- 	tm.tm_sec = 0;
- 	tm.tm_min = 0;
-	tm.tm_hour = 0;
- 	tm.tm_mday = 0;
- 	tm.tm_mon = 0;
- 	time_t tm_t;
- 	struct icaltimetype t2; 	
- 	strptime((char *)BSTR(prefix), "%d/%m/%Y", &tm);
- 	tm_t = mktime(&tm);
- 	t2 = icaltime_from_timet(tm_t, 1);
- 	memcpy(t, &t2, sizeof(struct icaltimetype));
+	if (!t) return;
+
+ 	/* Stuff with zero values */
+	memset(t, 0, sizeof(struct icaltimetype));
+
+	/* Get the year/month/date all in one shot -- it will be in ISO YYYY-MM-DD format */
+	sscanf((char*)BSTR(prefix), "%04d-%02d-%02d", &t->year, &t->month, &t->day);
+
+	/* time zone is set to the default zone for this server */
+	t->zone = icaltimezone_get_utc_timezone();
+	t->is_date = 1;
 }
 
 
-/**
- * \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;
@@ -220,56 +223,101 @@ void partstat_as_string(char *buf, icalproperty *attendee) {
 	}
 }
 
-
-/**
- * \brief embedd
- * Utility function to encapsulate a subcomponent into a full VCALENDAR
- * \param subcomp the component to encapsulate
- * \returns the meta object ???
+/*
+ * Utility function to encapsulate a subcomponent into a full VCALENDAR.
+ *
+ * We also scan for any date/time properties that reference timezones, and attach
+ * those timezones along with the supplied subcomponent.  (Increase the size of the array if you need to.)
+ *
+ * Note: if you change anything here, change it in Citadel server's ical_send_out_invitations() too.
  */
 icalcomponent *ical_encapsulate_subcomponent(icalcomponent *subcomp) {
 	icalcomponent *encaps;
-
-	/* lprintf(9, "ical_encapsulate_subcomponent() called\n"); */
+	icalproperty *p;
+	struct icaltimetype t;
+	const icaltimezone *attached_zones[5] = { NULL, NULL, NULL, NULL, NULL };
+	int i;
+	const icaltimezone *z;
+	int num_zones_attached = 0;
+	int zone_already_attached;
 
 	if (subcomp == NULL) {
-		lprintf(3, "ERROR: called with NULL argument!\n");
+		syslog(LOG_WARNING, "ERROR: ical_encapsulate_subcomponent() called with NULL argument\n");
 		return NULL;
 	}
 
-	/**
-	 * If we're already looking at a full VCALENDAR component,
-	 * don't bother ... just return itself.
+	/*
+	 * If we're already looking at a full VCALENDAR component, this is probably an error.
 	 */
 	if (icalcomponent_isa(subcomp) == ICAL_VCALENDAR_COMPONENT) {
+		syslog(LOG_WARNING, "ERROR: component sent to ical_encapsulate_subcomponent() already top level\n");
 		return subcomp;
 	}
 
-	/** Encapsulate the VEVENT component into a complete VCALENDAR */
+	/* search for... */
+	for (p = icalcomponent_get_first_property(subcomp, ICAL_ANY_PROPERTY);
+	     p != NULL;
+	     p = icalcomponent_get_next_property(subcomp, ICAL_ANY_PROPERTY))
+	{
+		if ( (icalproperty_isa(p) == ICAL_COMPLETED_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_CREATED_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DATEMAX_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DATEMIN_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DTEND_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DTSTAMP_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DTSTART_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_DUE_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_EXDATE_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_LASTMODIFIED_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_MAXDATE_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_MINDATE_PROPERTY)
+		  || (icalproperty_isa(p) == ICAL_RECURRENCEID_PROPERTY)
+		) {
+			t = icalproperty_get_dtstart(p);	/*/ it's safe to use dtstart for all of them */
+			if ((icaltime_is_valid_time(t)) && (z=icaltime_get_timezone(t), z)) {
+			
+				zone_already_attached = 0;
+				for (i=0; i<5; ++i) {
+					if (z == attached_zones[i]) {
+						++zone_already_attached;
+						syslog(LOG_DEBUG, "zone already attached!!\n");
+					}
+				}
+				if ((!zone_already_attached) && (num_zones_attached < 5)) {
+					syslog(LOG_DEBUG, "attaching zone %d!\n", num_zones_attached);
+					attached_zones[num_zones_attached++] = z;
+				}
+
+				icalproperty_set_parameter(p,
+					icalparameter_new_tzid(icaltimezone_get_tzid((icaltimezone *)z))
+				);
+			}
+		}
+	}
+
+	/* 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__);
+		syslog(LOG_WARNING, "ERROR: ical_encapsulate_subcomponent() could not allocate component\n");
 		return NULL;
 	}
 
-	/** Set the Product ID */
+	/* Set the Product ID */
 	icalcomponent_add_property(encaps, icalproperty_new_prodid(PRODID));
 
-	/** Set the Version Number */
+	/* 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);
+	/* Attach any timezones we need */
+	if (num_zones_attached > 0) for (i=0; i<num_zones_attached; ++i) {
+		icalcomponent *zc;
+		zc = icalcomponent_new_clone(icaltimezone_get_component((icaltimezone *)attached_zones[i]));
+		icalcomponent_add_component(encaps, zc);
+	}
 
-	/** Convert all timestamps to UTC so we don't have to deal with
-	 * stupid VTIMEZONE crap.
-	 */
-	ical_dezonify(encaps);
+	/* Encapsulate the subcomponent inside */
+	icalcomponent_add_component(encaps, subcomp);
 
-	/** Return the object we just created. */
+	/* Return the object we just created. */
 	return(encaps);
 }
-
-