/*
- * $Id$
- *
* Administrative screen for site-wide configuration
+ *
+ * Copyright (c) 1996-2011 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"
-
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)
+ AppendImportantMessage(_("Higher access is required to access this function."), -1);
+ 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)
+ AppendImportantMessage(_("Higher access is required to access this function."), -1);
+ 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)
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",
+ /* syslog(9, "Location: %-40s tzid: %s\n",
icaltimezone_get_location(icalarray_element_at(zones, z)),
icaltimezone_get_tzid(icalarray_element_at(zones, z))
); */
int type;
const char *Key;
long len;
-}CfgMapping;
+} CfgMapping;
#define CFG_STR 1
#define CFG_YES 2
{CFG_STR, HKEY("c_pop3_fetch")},
{CFG_STR, HKEY("c_pop3_fastest")},
{CFG_YES, HKEY("c_spam_flag_only")},
- {CFG_STR, HKEY("c_xmpps_c2s_port")}
+ {CFG_YES, HKEY("c_guest_logins")}
};
void load_siteconfig(void)
{
wcsession *WCC = WC;
- StrBuf *Buf, *CfgToken;
+ StrBuf *Buf;
HashList *Cfg;
- char buf[SIZ];
long len;
int i;
WCC->ServCfg = NewHash(1, NULL);
Cfg = WCC->ServCfg;
- serv_printf("CONF get");
- serv_getln(buf, sizeof buf);
- i = 0;
Buf = NewStrBuf();
- while ((sizeof(ServerConfig) / sizeof(CfgMapping)) &&
- (len = StrBuf_ServGetln(Buf),
- strcmp(ChrPtr(Buf), "000")) &&
- (i <= sizeof(ServerConfig)))
- {
- Put(Cfg,
- ServerConfig[i].Key,
- ServerConfig[i].len,
- Buf,
- HFreeStrBuf);
- i++;
- if (i <= sizeof(ServerConfig) / sizeof(CfgMapping))
- Buf = NewStrBuf();
- else
- Buf = NULL;
- }
- FreeStrBuf(&Buf);
- serv_puts("GPEX site");
- Buf = NewStrBuf();
- CfgToken = NULL;
+ serv_printf("CONF get");
StrBuf_ServGetln(Buf);
- if (GetServerStatus(Buf, NULL) == 2) {
+ if (GetServerStatus(Buf, NULL) != 1) {
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);
+ AppendImportantMessage(SKEY(Buf));
+ FreeStrBuf(&Buf);
+ return;
}
- serv_puts("GPEX mailboxes");
- StrBuf_ServGetln(Buf);
- if (GetServerStatus(Buf, NULL) == 2) {
- StrBufCutLeft(Buf, 4);
-
- CfgToken = NewStrBuf();
- StrBufExtract_token(CfgToken, Buf, 0, '|');
- Put(Cfg, HKEY("mboxpolicy"), CfgToken, HFreeStrBuf);
+ i = 0;
+ while (len = StrBuf_ServGetln(Buf),
+ (len >= 0)
+ && (i < (sizeof(ServerConfig) / sizeof(CfgMapping)))
+ && ((len != 3) || strcmp(ChrPtr(Buf), "000"))
+ ) {
+ Put(Cfg,
+ ServerConfig[i].Key,
+ ServerConfig[i].len,
+ Buf,
+ HFreeStrBuf
+ );
+ i++;
+ if (i <= sizeof(ServerConfig) / sizeof(CfgMapping)) {
+ Buf = NewStrBuf();
+ }
+ else {
+ Buf = NULL;
+ }
+ }
- CfgToken = NewStrBuf();
- StrBufExtract_token(CfgToken, Buf, 1, '|');
- Put(Cfg, HKEY("mboxvalue"), CfgToken, HFreeStrBuf);
+ if (strcmp(ChrPtr(Buf), "000") != 0)
+ {
+ /* Discard config lines which we don't yet support */
+ while ( (len = StrBuf_ServGetln(Buf),
+ strcmp(ChrPtr(Buf), "000"))
+ ) {
+ }
+ AppendImportantMessage(_("WARNING: Failed to parse Server Config; do you run a to new citserver?"), -1);
+ FreeStrBuf(&Buf);
+ return;
}
FreeStrBuf(&Buf);
+
+ LoadExpirePolicy(sitepolicy);
+ LoadExpirePolicy(mailboxespolicy);
}
-/**
+
+/*
* parse siteconfig changes
*/
void siteconfig(void)
{
wcsession *WCC = WC;
int i;
- char buf[256];
+ StrBuf *Line;
if (strlen(bstr("ok_button")) == 0) {
display_aide_menu();
return;
}
+ Line = NewStrBuf();
serv_printf("CONF set");
- serv_getln(buf, sizeof buf);
- if (buf[0] != '4') {
- safestrncpy(WCC->ImportantMessage, &buf[4], sizeof WCC->ImportantMessage);
+ StrBuf_ServGetln(Line);
+ if (GetServerStatusMsg(Line, NULL, 1, 4) != 4) {
display_aide_menu();
+ FreeStrBuf(&Line);
return;
}
+ FreeStrBuf(&Line);
+
for (i=0; i < (sizeof(ServerConfig) / sizeof(CfgMapping)); i ++)
{
switch (ServerConfig[i].type) {
}
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);
+
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);
+ AppendImportantMessage(_("Your system configuration has been updated."), -1);
DeleteHash(&WCC->ServCfg);
display_aide_menu();
}
if (TP->Tokens->nParameters == 3) {
return 1;
}
- else if (TP->Tokens->Params[3]->Type == TYPE_STR)
- return (strcmp(TP->Tokens->Params[3]->Start, ChrPtr(Buf)) == 0);
- else return (StrTol(Buf) == TP->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(StrBuf *Target, WCTemplputParams *TP)
+int ConditionalServCfgCTXStrBuf(StrBuf *Target, WCTemplputParams *TP)
{
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, TKEY(2), &vBuf);
if (vBuf == NULL) return 0;
Buf = (StrBuf*) vBuf;
- return CompareSubstToStrBuf(Buf, TP->Tokens->Params[3]);
+ return strcmp(ChrPtr(Buf), ChrPtr(ZoneToCheck)) == 0;
}
else return 0;
}
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);
}
projects / citadel.git / blobdiff