X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=webcit%2Fical_subst.c;h=ffacf41f471a3016e5dd818b45d14cdbd24614c0;hb=97bdaff4147703998a868ed6d19232c4342acca4;hp=aceb56c2816fc5d395db745c29e2464287375f6b;hpb=5d38a76f8f06640e3a3f097d584ac52336110f7c;p=citadel.git

diff --git a/webcit/ical_subst.c b/webcit/ical_subst.c
index aceb56c28..ffacf41f4 100644
--- a/webcit/ical_subst.c
+++ b/webcit/ical_subst.c
@@ -12,10 +12,15 @@
 
 #include "webcit.h"
 
-extern IcalEnumMap icalproperty_kind_map[];
+extern IcalKindEnumMap icalproperty_kind_map[];
+extern IcalMethodEnumMap icalproperty_method_map[];
 
 HashList *IcalComponentMap = NULL;
 CtxType CTX_ICAL = CTX_NONE;
+CtxType CTX_ICALPROPERTY = CTX_NONE;
+CtxType CTX_ICALMETHOD = CTX_NONE;
+CtxType CTX_ICALTIME = CTX_NONE;
+CtxType CTX_ICALATTENDEE = CTX_NONE;
 #if 0
 void SortPregetMatter(HashList *Cals)
 {
@@ -51,7 +56,7 @@ void SortPregetMatter(HashList *Cals)
 		return;
 
 	switch (SortMap[i - 1]->map) {
-		///	case 
+		/*	case */
 
 	default:
 		break;
@@ -77,9 +82,264 @@ void SortPregetMatter(HashList *Cals)
 
 void tmplput_ICalItem(StrBuf *Target, WCTemplputParams *TP)
 {
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalproperty *p;
+	icalproperty_kind Kind;
+	const char *str;
+
+	Kind = (icalproperty_kind) GetTemplateTokenNumber(Target, TP, 0, ICAL_ANY_PROPERTY);
+	p = icalcomponent_get_first_property(cal, Kind);
+	if (p != NULL) {
+		str = icalproperty_get_comment (p);
+		StrBufAppendTemplateStr(Target, TP, str, 1);
+	}
+}
+
+void tmplput_CtxICalProperty(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalproperty *p = (icalproperty *) CTX(CTX_ICALPROPERTY);
+	const char *str;
+
+	str = icalproperty_get_comment (p);
+	StrBufAppendTemplateStr(Target, TP, str, 0);
+}
+
+int ReleaseIcalSubCtx(StrBuf *Target, WCTemplputParams *TP)
+{
+	WCTemplputParams *TPP = TP;
+	UnStackContext(TP);
+	free(TPP);
+	return 0;
+}
+int cond_ICalIsA(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalcomponent_kind c = GetTemplateTokenNumber(Target, TP, 2, ICAL_NO_COMPONENT);
+	return icalcomponent_isa(cal) == c;
+}
+
+int cond_ICalHaveItem(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalproperty *p;
+	icalproperty_kind Kind;
+
+	Kind = (icalproperty_kind) GetTemplateTokenNumber(Target, TP, 2, ICAL_ANY_PROPERTY);
+	p = icalcomponent_get_first_property(cal, Kind);
+	if (p != NULL) {
+		WCTemplputParams *DynamicTP;
+	
+		DynamicTP = (WCTemplputParams*) malloc(sizeof(WCTemplputParams));
+		StackDynamicContext (TP, 
+				     DynamicTP, 
+				     p,
+				     CTX_ICALPROPERTY,
+				     0,
+				     TP->Tokens,
+				     ReleaseIcalSubCtx,
+				     TP->Tokens->Params[1]->lvalue);
+
+		return 1;
+	}
+	return 0;
+}
+
+int ReleaseIcalTimeCtx(StrBuf *Target, WCTemplputParams *TP)
+{
+	WCTemplputParams *TPP = TP;
+
+	UnStackContext(TP);
+	free(TPP);
+	return 0;
+}
+
+int cond_ICalHaveTimeItem(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalproperty *p;
+	icalproperty_kind Kind;
+
+	Kind = (icalproperty_kind) GetTemplateTokenNumber(Target, TP, 2, ICAL_ANY_PROPERTY);
+	p = icalcomponent_get_first_property(cal, Kind);
+	if (p != NULL) {
+		struct icaltimetype *t;
+		struct icaltimetype tt;
+		WCTemplputParams *DynamicTP;
+
+		DynamicTP = (WCTemplputParams*) malloc(sizeof(WCTemplputParams) + 
+						       sizeof(struct icaltimetype));
+		t = (struct icaltimetype *) &DynamicTP[1];
+		memset(&tt, 0, sizeof(struct icaltimetype));
+		switch (Kind)
+		{
+		case ICAL_DTSTART_PROPERTY:
+			tt = icalproperty_get_dtstart(p);
+			break;
+		case ICAL_DTEND_PROPERTY:
+			tt = icalproperty_get_dtend(p);
+			break;
+		default:
+			break;
+		}
+		memcpy(t, &tt, sizeof(struct icaltimetype));
+
+		StackDynamicContext (TP, 
+				     DynamicTP, 
+				     t,
+				     CTX_ICALTIME,
+				     0,
+				     TP->Tokens,
+				     ReleaseIcalTimeCtx,
+				     TP->Tokens->Params[1]->lvalue);
+
+		return 1;
+	}
+	return 0;
+}
+
+
+int cond_ICalTimeIsDate(StrBuf *Target, WCTemplputParams *TP)
+{
+	struct icaltimetype *t = (struct icaltimetype *) CTX(CTX_ICALTIME);
+	return t->is_date;
+}
+
+void tmplput_ICalTime_Date(StrBuf *Target, WCTemplputParams *TP)
+{
+	struct tm d_tm;
+	long len;
+	char buf[256];
+	struct icaltimetype *t = (struct icaltimetype *) CTX(CTX_ICALTIME);
+
+	memset(&d_tm, 0, sizeof d_tm);
+	d_tm.tm_year = t->year - 1900;
+	d_tm.tm_mon = t->month - 1;
+	d_tm.tm_mday = t->day;
+	len = wc_strftime(buf, sizeof(buf), "%x", &d_tm);
+	StrBufAppendBufPlain(Target, buf, len, 0);
+}
+void tmplput_ICalTime_Time(StrBuf *Target, WCTemplputParams *TP)
+{
+	long len;
+	char buf[256];
+	struct icaltimetype *t = (struct icaltimetype *) CTX(CTX_ICALTIME);
+        time_t tt;
+
+	tt = icaltime_as_timet(*t);
+	len = webcit_fmt_date(buf, sizeof(buf), tt, DATEFMT_FULL);
+	StrBufAppendBufPlain(Target, buf, len, 0);
+}
+
+void tmplput_ICalDate(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalproperty *p;
+	icalproperty_kind Kind;
+	struct icaltimetype t;
+	time_t tt;
+	char buf[256];
+
+	Kind = (icalproperty_kind) GetTemplateTokenNumber(Target, TP, 0, ICAL_ANY_PROPERTY);
+	p = icalcomponent_get_first_property(cal, Kind);
+	if (p != NULL) {
+		long len;
+		t = icalproperty_get_dtend(p);
+		tt = icaltime_as_timet(t);
+		len = webcit_fmt_date(buf, 256, tt, DATEFMT_FULL);
+		StrBufAppendBufPlain(Target, buf, len, 0);
+	}
+}
 
+void tmplput_CtxICalPropertyDate(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalproperty *p = (icalproperty *) CTX(CTX_ICALPROPERTY);
+	struct icaltimetype t;
+	time_t tt;
+	char buf[256];
+
+	long len;
+	t = icalproperty_get_dtend(p);
+	tt = icaltime_as_timet(t);
+	len = webcit_fmt_date(buf, sizeof(buf), tt, DATEFMT_FULL);
+	StrBufAppendBufPlain(Target, buf, len, 0);
 }
 
+
+
+void render_MIME_ICS_TPL(StrBuf *Target, WCTemplputParams *TP, StrBuf *FoundCharset)
+{
+	wc_mime_attachment *Mime = CTX(CTX_MIME_ATACH);
+	icalproperty_method the_method = ICAL_METHOD_NONE;
+	icalproperty *method = NULL;
+	icalcomponent *cal;
+	icalcomponent *c;
+        WCTemplputParams SubTP;
+        WCTemplputParams SuperTP;
+
+	static int divcount = 0;
+
+	if (StrLength(Mime->Data) == 0) {
+		MimeLoadData(Mime);
+	}
+	if (StrLength(Mime->Data) > 0) {
+		cal = icalcomponent_new_from_string(ChrPtr(Mime->Data));
+	}
+	if (cal == NULL) {
+		StrBufAppendPrintf(Mime->Data, _("There was an error parsing this calendar item."));
+		StrBufAppendPrintf(Mime->Data, "<br>\n");
+		return;
+	}
+
+	putlbstr("divname",  ++divcount);
+
+
+	putbstr("cal_partnum", NewStrBufDup(Mime->PartNum));
+	putlbstr("msgnum", Mime->msgnum);
+
+        memset(&SubTP, 0, sizeof(WCTemplputParams));
+        memset(&SuperTP, 0, sizeof(WCTemplputParams));
+
+	/*//ical_dezonify(cal); */
+
+	/* If the component has subcomponents, recurse through them. */
+	c = icalcomponent_get_first_component(cal, ICAL_ANY_COMPONENT);
+        c = (c != NULL) ? c : cal;
+
+	method = icalcomponent_get_first_property(cal, ICAL_METHOD_PROPERTY);
+	if (method != NULL) {
+		the_method = icalproperty_get_method(method);
+	}
+
+	StackContext (TP,
+		      &SuperTP,
+		      &the_method,
+		      CTX_ICALMETHOD,
+		      0,
+		      TP->Tokens);
+
+	StackContext (&SuperTP, 
+		      &SubTP, 
+		      c,
+		      CTX_ICAL,
+		      0,
+		      SuperTP.Tokens);
+	FlushStrBuf(Mime->Data);
+	DoTemplate(HKEY("ical_attachment_display"), Mime->Data, &SubTP);
+
+	/*/ cal_process_object(Mime->Data, cal, 0, Mime->msgnum, ChrPtr(Mime->PartNum)); */
+
+	/* Free the memory we obtained from libical's constructor */
+	StrBufPlain(Mime->ContentType, HKEY("text/html"));
+	StrBufAppendPrintf(WC->trailing_javascript,
+		"eventEditAllDay();		\n"
+		"RecurrenceShowHide();		\n"
+		"EnableOrDisableCheckButton();	\n"
+	);
+
+	UnStackContext(&SuperTP);
+	UnStackContext(&SubTP);
+	icalcomponent_free(cal);
+}
 void CreateIcalComponendKindLookup(void)
 {
 	int i = 0;
@@ -107,16 +367,84 @@ void CreateIcalComponendKindLookup(void)
 
 
 
+int cond_ICalIsMethod(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalproperty_method *the_method = (icalproperty_method *) CTX(CTX_ICALMETHOD);
+	icalproperty_method which_method;
 
+	which_method = GetTemplateTokenNumber(Target, TP, 2, ICAL_METHOD_X);
+	return *the_method == which_method;
+}
 
 
 
+void tmplput_Conflict(StrBuf *Target, WCTemplputParams *TP)
+{}
 
 
+HashList *iterate_get_ical_attendees(StrBuf *Target, WCTemplputParams *TP)
+{
+	icalcomponent *cal = (icalcomponent *) CTX(CTX_ICAL);
+	icalparameter *partstat_param;
+	icalproperty *p;
+	CalAttendee *Att;
+	HashList *Attendees = NULL;
+	const char *ch;
+	int n = 0;
+
+	/* If the component has attendees, iterate through them. */
+	for (p = icalcomponent_get_first_property(cal, ICAL_ATTENDEE_PROPERTY); 
+	     (p != NULL); 
+	     p = icalcomponent_get_next_property(cal, ICAL_ATTENDEE_PROPERTY)) {
+		ch = icalproperty_get_attendee(p);
+		if ((ch != NULL) && !strncasecmp(ch, "MAILTO:", 7)) {
+			Att = (CalAttendee*) malloc(sizeof(CalAttendee));
+
+			/** screen name or email address */
+			Att->AttendeeStr = NewStrBufPlain(ch + 7, -1);
+			StrBufTrim(Att->AttendeeStr);
+
+			/** participant status */
+			partstat_param = icalproperty_get_first_parameter(
+				p,
+				ICAL_PARTSTAT_PARAMETER
+				);
+			if (partstat_param == NULL) {
+				Att->partstat = ICAL_PARTSTAT_X;
+			}
+			else {
+				Att->partstat = icalparameter_get_partstat(partstat_param);
+			}
+			if (Attendees == NULL)
+				Attendees = NewHash(1, Flathash);
+			Put(Attendees, IKEY(n), Att, DeleteAtt);
+			n++;
+		}
+	}
+	return Attendees;
+}
 
+void tmplput_ICalAttendee(StrBuf *Target, WCTemplputParams *TP)
+{
+	CalAttendee *Att = (CalAttendee*) CTX(CTX_ICALATTENDEE);
+	StrBufAppendTemplate(Target, TP, Att->AttendeeStr, 0);
+}
+int cond_ICalAttendeeState(StrBuf *Target, WCTemplputParams *TP)
+{
+	CalAttendee *Att = (CalAttendee*) CTX(CTX_ICALATTENDEE);
+	icalparameter_partstat which_partstat;
 
-
-
+	which_partstat = GetTemplateTokenNumber(Target, TP, 2, ICAL_PARTSTAT_X);
+	return Att->partstat == which_partstat;
+}
+	/* If the component has subcomponents, recurse through them. * /
+	for (c = icalcomponent_get_first_component(cal, ICAL_ANY_COMPONENT);
+	     (c != 0);
+	     c = icalcomponent_get_next_component(cal, ICAL_ANY_COMPONENT)) {
+		/* Recursively process subcomponent * /
+		cal_process_object(Target, c, recursion_level+1, msgnum, cal_partnum);
+	}
+	*/
 
 
 void 
@@ -124,8 +452,37 @@ InitModule_ICAL_SUBST
 (void)
 {
 	RegisterCTX(CTX_ICAL);
+//*
+	RegisterMimeRenderer(HKEY("text/calendar"), render_MIME_ICS_TPL, 1, 501);
+	RegisterMimeRenderer(HKEY("application/ics"), render_MIME_ICS_TPL, 1, 500);
+//*/
+
 	CreateIcalComponendKindLookup ();
+ 	RegisterConditional("COND:ICAL:PROPERTY", 1, cond_ICalHaveItem, CTX_ICAL);
+ 	RegisterConditional("COND:ICAL:IS:A", 1, cond_ICalIsA, CTX_ICAL);
+
+	RegisterNamespace("ICAL:SERV:CHECK:CONFLICT", 0, 0, tmplput_Conflict, NULL, CTX_ICAL);
+
+	RegisterCTX(CTX_ICALATTENDEE);
+        RegisterIterator("ICAL:ATTENDEES", 0, NULL, iterate_get_ical_attendees, 
+                         NULL, NULL, CTX_ICALATTENDEE, CTX_ICAL, IT_NOFLAG);
+	RegisterNamespace("ICAL:ATTENDEE", 1, 2, tmplput_ICalAttendee, NULL, CTX_ICALATTENDEE);
+ 	RegisterConditional("COND:ICAL:ATTENDEE", 1, cond_ICalAttendeeState, CTX_ICALATTENDEE);
+
+	RegisterCTX(CTX_ICALPROPERTY);
+	RegisterNamespace("ICAL:ITEM", 1, 2, tmplput_ICalItem, NULL, CTX_ICAL);
+	RegisterNamespace("ICAL:PROPERTY:STR", 0, 1, tmplput_CtxICalProperty, NULL, CTX_ICALPROPERTY);
+	RegisterNamespace("ICAL:PROPERTY:DATE", 0, 1, tmplput_CtxICalPropertyDate, NULL, CTX_ICALPROPERTY);
+
+	RegisterCTX(CTX_ICALMETHOD);
+ 	RegisterConditional("COND:ICAL:METHOD", 1, cond_ICalIsMethod, CTX_ICALMETHOD);
 
+
+	RegisterCTX(CTX_ICALTIME);
+ 	RegisterConditional("COND:ICAL:DT:PROPERTY", 1, cond_ICalHaveTimeItem, CTX_ICAL);
+ 	RegisterConditional("COND:ICAL:DT:ISDATE", 0, cond_ICalTimeIsDate, CTX_ICALTIME);
+	RegisterNamespace("ICAL:DT:DATE", 0, 1, tmplput_ICalTime_Date, NULL, CTX_ICALTIME);
+	RegisterNamespace("ICAL:DT:DATETIME", 0, 1, tmplput_ICalTime_Time, NULL, CTX_ICALTIME);
 }
 
 void 
@@ -134,3 +491,7 @@ ServerShutdownModule_ICAL
 {
 	DeleteHash(&IcalComponentMap);
 }
+
+
+
+