X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=webcit%2Fsiteconfig.c;h=de631b4400c3cc72abce7e6bd232e6f01ddbb937;hb=f5c1330914acc193f96892efc191a32ee537dfb5;hp=5cdeae1bc39b60595154518e5a113b6fbabe4196;hpb=47bcaaabae789a2f20de958b84714ff2e23dc5bb;p=citadel.git

diff --git a/webcit/siteconfig.c b/webcit/siteconfig.c
index 5cdeae1bc..de631b440 100644
--- a/webcit/siteconfig.c
+++ b/webcit/siteconfig.c
@@ -1,6 +1,4 @@
 /*
- * $Id$
- *
  * Administrative screen for site-wide configuration
  */
 
@@ -11,6 +9,91 @@
 
 HashList *ZoneHash = NULL;
 
+ConstStr ExpirePolicyString = {CStrOf(roompolicy)     };
+
+ConstStr ExpirePolicyStrings[][2] = {
+	{ { CStrOf(roompolicy)     } , { strof(roompolicy)     "_value", sizeof(strof(roompolicy)     "_value") - 1 } },
+	{ { CStrOf(floorpolicy)    } , { strof(floorpolicy)    "_value", sizeof(strof(floorpolicy)    "_value") - 1 } },
+	{ { CStrOf(sitepolicy)     } , { strof(sitepolicy)     "_value", sizeof(strof(sitepolicy)     "_value") - 1 } },
+	{ { CStrOf(mailboxespolicy)} , { strof(mailboxespolicy)"_value", sizeof(strof(mailboxespolicy)"_value") - 1 } }
+};
+
+void LoadExpirePolicy(GPEXWhichPolicy which)
+{
+	StrBuf *Buf;
+	wcsession *WCC = WC;
+	long State;
+	const char *Pos = NULL;
+
+	serv_printf("GPEX %s", ExpirePolicyStrings[which][0].Key);
+	Buf = NewStrBuf();
+	StrBuf_ServGetln(Buf);
+	WCC->Policy[which].loaded = 1;
+	if (GetServerStatus(Buf, &State) == 2) {
+		Pos = ChrPtr(Buf) + 4;
+		WCC->Policy[which].expire_mode = StrBufExtractNext_long(Buf, &Pos, '|');
+		WCC->Policy[which].expire_value = StrBufExtractNext_long(Buf, &Pos, '|');
+	}
+	else if (State == 550)
+		StrBufAppendBufPlain(WCC->ImportantMsg,
+				     _("Higher access is required to access this function."), -1, 0);
+	FreeStrBuf(&Buf);
+}
+
+void SaveExpirePolicyFromHTTP(GPEXWhichPolicy which)
+{
+	StrBuf *Buf;
+	long State;
+
+	serv_printf("SPEX %s|%d|%d", 
+		            ExpirePolicyStrings[which][0].Key,
+		    ibcstr( ExpirePolicyStrings[which][1] ),
+		    ibcstr( ExpirePolicyStrings[which][1] )  );
+
+	Buf = NewStrBuf();
+	StrBuf_ServGetln(Buf);
+	GetServerStatus(Buf, &State);
+	if (State == 550)
+		StrBufAppendBufPlain(WC->ImportantMsg,
+				     _("Higher access is required to access this function."), -1, 0);
+	FreeStrBuf(&Buf);
+}
+
+int ConditionalExpire(StrBuf *Target, WCTemplputParams *TP)
+{
+	wcsession *WCC = WC;
+	GPEXWhichPolicy which;
+	int CompareWith;
+
+	which = GetTemplateTokenNumber(Target, TP, 2, 0);
+	CompareWith = GetTemplateTokenNumber(Target, TP, 3, 0);
+
+	if (WCC->Policy[which].loaded == 0) LoadExpirePolicy(which);
+	
+	return WCC->Policy[which].expire_mode == CompareWith;
+}
+
+void tmplput_ExpireValue(StrBuf *Target, WCTemplputParams *TP)
+{
+	GPEXWhichPolicy which;
+	wcsession *WCC = WC;
+		
+	which = GetTemplateTokenNumber(Target, TP, 0, 0);
+	if (WCC->Policy[which].loaded == 0) LoadExpirePolicy(which);
+	StrBufAppendPrintf(Target, "%d", WCC->Policy[which].expire_value);
+}
+
+
+void tmplput_ExpireMode(StrBuf *Target, WCTemplputParams *TP)
+{
+	GPEXWhichPolicy which;
+	wcsession *WCC = WC;
+		
+	which = GetTemplateTokenNumber(Target, TP, 2, 0);
+	if (WCC->Policy[which].loaded == 0) LoadExpirePolicy(which);
+	StrBufAppendPrintf(Target, "%d", WCC->Policy[which].expire_mode);
+}
+
 
 
 void LoadZoneFiles(void)
@@ -26,6 +109,10 @@ void LoadZoneFiles(void)
 	Put(ZoneHash, HKEY("UTC"), ZName, HFreeStrBuf);
 	zones = icaltimezone_get_builtin_timezones();
 	for (z = 0; z < zones->num_elements; ++z) {
+		/* lprintf(9, "Location: %-40s tzid: %s\n",
+			icaltimezone_get_location(icalarray_element_at(zones, z)),
+			icaltimezone_get_tzid(icalarray_element_at(zones, z))
+		); */
 		this_zone = icaltimezone_get_location(icalarray_element_at(zones, z));
 		len = strlen(this_zone);
 		ZName = NewStrBufPlain(this_zone, len);
@@ -121,10 +208,9 @@ CfgMapping ServerConfig[] = {
  */
 void load_siteconfig(void)
 {
-	struct wcsession *WCC = WC;
-	StrBuf *Buf, *CfgToken;
+	wcsession *WCC = WC;
+	StrBuf *Buf;
 	HashList *Cfg;
-	char buf[SIZ];
 	long len;
 	int i;
 	
@@ -132,14 +218,21 @@ void load_siteconfig(void)
 		WCC->ServCfg = NewHash(1, NULL);
 	Cfg = WCC->ServCfg;
 
+	Buf = NewStrBuf();
+
 	serv_printf("CONF get");
-	serv_getln(buf, sizeof buf);
+	StrBuf_ServGetln(Buf);
+	if (GetServerStatus(Buf, NULL) != 1) {
+		StrBufCutLeft(Buf, 4);
+		AppendImportantMessage(SKEY(Buf));
+		return;
+		
+	}
 	i = 0;
-	Buf = NewStrBuf();
-	while ((sizeof(ServerConfig) / sizeof(CfgMapping)) &&
-	       (len = StrBuf_ServGetln(Buf),
-		strcmp(ChrPtr(Buf), "000")) && 
-	       (i <= sizeof(ServerConfig))) 
+	while (len = StrBuf_ServGetln(Buf),
+	       (i <= (sizeof(ServerConfig) / sizeof(CfgMapping))) &&
+	       ((len != 3) || (strcmp(ChrPtr(Buf), "000")!= 0))
+		)
 	{
 		Put(Cfg,
 		    ServerConfig[i].Key, 
@@ -152,46 +245,28 @@ void load_siteconfig(void)
 		else
 			Buf = NULL;			
 	}
-	FreeStrBuf(&Buf);
-
-	serv_puts("GPEX site");
-	Buf = NewStrBuf();
-	CfgToken = NULL;
-	StrBuf_ServGetln(Buf);
-	if (ChrPtr(Buf)[0] == '2') {
-		StrBufCutLeft(Buf, 4);
-
-		CfgToken = NewStrBuf();
-		StrBufExtract_token(CfgToken, Buf, 0, '|');
-		Put(Cfg, HKEY("sitepolicy"), CfgToken, HFreeStrBuf);
-
-		CfgToken = NewStrBuf();
-		StrBufExtract_token(CfgToken, Buf, 1, '|');
-		Put(Cfg, HKEY("sitevalue"), CfgToken, HFreeStrBuf);
+	if (strcmp(ChrPtr(Buf), "000")!=0)
+	{
+		/* WHOOOOPSI??? burn the lines we don't understand */
+		while ((len = StrBuf_ServGetln(Buf),
+			strcmp(ChrPtr(Buf), "000"))) {}
+		AppendImportantMessage(_("WARNING: Failed to parse Server Config; do you run a to new citserver?"), -1);
+		return;
 	}
+	FreeStrBuf(&Buf);
 
-	serv_puts("GPEX mailboxes");
-	serv_getln(buf, sizeof buf);
-	if (buf[0] == '2') {
-		StrBufCutLeft(Buf, 4);
-
-		CfgToken = NewStrBuf();
-		StrBufExtract_token(CfgToken, Buf, 0, '|');
-		Put(Cfg, HKEY("mboxpolicy"), CfgToken, HFreeStrBuf);
-
-		CfgToken = NewStrBuf();
-		StrBufExtract_token(CfgToken, Buf, 1, '|');
-		Put(Cfg, HKEY("mboxvalue"), CfgToken, HFreeStrBuf);
-	}
+	LoadExpirePolicy(sitepolicy);
+	LoadExpirePolicy(mailboxespolicy);
 }
 
 
+
 /**
  * parse siteconfig changes 
  */
 void siteconfig(void)
 {
-	struct wcsession *WCC = WC;
+	wcsession *WCC = WC;
 	int i;
 	char buf[256];
 
@@ -228,12 +303,11 @@ void siteconfig(void)
 	}
         serv_puts("000");
 
-	serv_printf("SPEX site|%d|%d", ibstr("sitepolicy"), ibstr("sitevalue"));
-	serv_getln(buf, sizeof buf);
-	serv_printf("SPEX mailboxes|%d|%d", ibstr("mboxpolicy"), ibstr("mboxvalue"));
-	serv_getln(buf, sizeof buf);
+	SaveExpirePolicyFromHTTP(sitepolicy);
+	SaveExpirePolicyFromHTTP(mailboxespolicy);
 
-	strcpy(serv_info.serv_default_cal_zone, bstr("c_default_cal_zone"));
+	FreeStrBuf(&WCC->serv_info->serv_default_cal_zone);
+	WCC->serv_info->serv_default_cal_zone = NewStrBufDup(sbstr("c_default_cal_zone"));
 
 	safestrncpy(WCC->ImportantMessage, _("Your system configuration has been updated."),
 		sizeof WCC->ImportantMessage);
@@ -241,66 +315,68 @@ void siteconfig(void)
 	display_aide_menu();
 }
 
-void tmplput_servcfg(StrBuf *Target, int nArgs, WCTemplateToken *Tokens, void *Context, int ContextType)
+void tmplput_servcfg(StrBuf *Target, WCTemplputParams *TP)
 {
-	struct wcsession *WCC = WC;
+	wcsession *WCC = WC;
 	void *vBuf;
 	StrBuf *Buf;
 
 	if (WCC->is_aide) {
 		if (WCC->ServCfg == NULL)
 			load_siteconfig();
-		GetHash(WCC->ServCfg, 
-			Tokens->Params[0]->Start,
-			Tokens->Params[0]->len, 
-			&vBuf);
+		GetHash(WCC->ServCfg, TKEY(0), &vBuf);
 		Buf = (StrBuf*) vBuf;
-		StrBufAppendTemplate(Target, nArgs, Tokens, Context, ContextType, Buf, 1);
+		StrBufAppendTemplate(Target, TP, Buf, 1);
 	}
 }
 
-int ConditionalServCfg(WCTemplateToken *Tokens, void *Context, int ContextType)
+int ConditionalServCfg(StrBuf *Target, WCTemplputParams *TP)
 {
-	struct wcsession *WCC = WC;
+	wcsession *WCC = WC;
 	void *vBuf;
 	StrBuf *Buf;
 
 	if (WCC->is_aide) {
 		if (WCC->ServCfg == NULL)
 			load_siteconfig();
-		GetHash(WCC->ServCfg, 
-			Tokens->Params[2]->Start,
-			Tokens->Params[2]->len, 
-			&vBuf);
+		GetHash(WCC->ServCfg, TKEY(2), &vBuf);
 		if (vBuf == NULL) return 0;
 		Buf = (StrBuf*) vBuf;
-		if (Tokens->nParameters == 3) {
+		if (TP->Tokens->nParameters == 3) {
 			return 1;
 		}
-		else if (Tokens->Params[3]->Type == TYPE_STR)
-			return (strcmp(Tokens->Params[3]->Start, ChrPtr(Buf)) == 0);
-		else return (StrTol(Buf) == Tokens->Params[3]->lvalue);
+		else if (IS_NUMBER(TP->Tokens->Params[3]->Type))
+			return (StrTol(Buf) == GetTemplateTokenNumber (Target, TP, 3, 0));
+		else
+		{
+			const char *pch;
+			long len;
+			
+			GetTemplateTokenString(Target, TP, 3, &pch, &len);
+		
+			return ((len == StrLength(Buf)) &&
+				(strcmp(pch, ChrPtr(Buf)) == 0));
+		}
+
 	}
 	else return 0;
 }
 
-int ConditionalServCfgSubst(WCTemplateToken *Tokens, void *Context, int ContextType)
+int ConditionalServCfgCTXStrBuf(StrBuf *Target, WCTemplputParams *TP)
 {
-	struct wcsession *WCC = WC;
+	wcsession *WCC = WC;
 	void *vBuf;
 	StrBuf *Buf;
+	StrBuf *ZoneToCheck = (StrBuf*) CTX;
 
-	if (WCC->is_aide) {
+	if ((WCC->is_aide) || (ZoneToCheck == NULL)) {
 		if (WCC->ServCfg == NULL)
 			load_siteconfig();
-		GetHash(WCC->ServCfg, 
-			Tokens->Params[2]->Start,
-			Tokens->Params[2]->len, 
-			&vBuf);
+		GetHash(WCC->ServCfg, TKEY(2), &vBuf);
 		if (vBuf == NULL) return 0;
 		Buf = (StrBuf*) vBuf;
 
-		return CompareSubstToStrBuf(Buf, Tokens->Params[3]);
+		return strcmp(ChrPtr(Buf), ChrPtr(ZoneToCheck)) == 0;
 	}
 	else return 0;
 }
@@ -309,9 +385,46 @@ void
 InitModule_SITECONFIG
 (void)
 {
-	WebcitAddUrlHandler(HKEY("siteconfig"), siteconfig, CTX_NONE);
+	WebcitAddUrlHandler(HKEY("siteconfig"), "", 0, siteconfig, CTX_NONE);
 
-	RegisterNamespace("SERV:CFG", 1, 2, tmplput_servcfg, CTX_NONE);
+	RegisterNamespace("SERV:CFG", 1, 2, tmplput_servcfg, NULL, CTX_NONE);
 	RegisterConditional(HKEY("COND:SERVCFG"), 3, ConditionalServCfg, CTX_NONE);
-	RegisterConditional(HKEY("COND:SERVCFG:SUBST"), 4, ConditionalServCfgSubst, CTX_NONE);
+	RegisterConditional(HKEY("COND:SERVCFG:CTXSTRBUF"), 4, ConditionalServCfgCTXStrBuf, CTX_STRBUF);
+	RegisterIterator("PREF:ZONE", 0, ZoneHash, NULL, NULL, NULL, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
+
+	REGISTERTokenParamDefine(roompolicy);
+	REGISTERTokenParamDefine(floorpolicy);
+	REGISTERTokenParamDefine(sitepolicy);
+	REGISTERTokenParamDefine(mailboxespolicy);
+
+	REGISTERTokenParamDefine(EXPIRE_NEXTLEVEL);
+	REGISTERTokenParamDefine(EXPIRE_MANUAL);
+	REGISTERTokenParamDefine(EXPIRE_NUMMSGS);
+	REGISTERTokenParamDefine(EXPIRE_AGE);
+
+	RegisterConditional(HKEY("COND:EXPIRE:MODE"), 2, ConditionalExpire, CTX_NONE);
+	RegisterNamespace("EXPIRE:VALUE", 1, 2, tmplput_ExpireValue, NULL, CTX_NONE);
+	RegisterNamespace("EXPIRE:MODE", 1, 2, tmplput_ExpireMode, NULL, CTX_NONE);
+}
+
+void 
+ServerStartModule_SITECONFIG
+(void)
+{
+	LoadZoneFiles();
+}
+
+void 
+ServerShutdownModule_SITECONFIG
+(void)
+{
+	DeleteHash(&ZoneHash);
+}
+
+
+void 
+SessionDestroyModule_SITECONFIG
+(wcsession *sess)
+{
+	DeleteHash(&sess->ServCfg);
 }