--- /dev/null
+/*
+ * Administrative screen for site-wide configuration
+ *
+ * Copyright (c) 1996-2021 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"
+
+/*
+ * Expiry policy for the autopurger
+ */
+#define EXPIRE_NEXTLEVEL 0 /* Inherit expiration policy */
+#define EXPIRE_MANUAL 1 /* Don't expire messages at all */
+#define EXPIRE_NUMMSGS 2 /* Keep only latest n messages */
+#define EXPIRE_AGE 3 /* Expire messages after n days */
+
+CtxType CTX_SRVLOG = CTX_NONE;
+
+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;
+ long State;
+ const char *Pos = NULL;
+
+ serv_printf("GPEX %s", ExpirePolicyStrings[which][0].Key);
+ Buf = NewStrBuf();
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatus(Buf, &State) == 2) {
+ Pos = ChrPtr(Buf) + 4;
+ WC->Policy[which].expire_mode = StrBufExtractNext_long(Buf, &Pos, '|');
+ WC->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) {
+ GPEXWhichPolicy which;
+ int CompareWith;
+
+ which = GetTemplateTokenNumber(Target, TP, 2, 0);
+ CompareWith = GetTemplateTokenNumber(Target, TP, 3, 0);
+
+ LoadExpirePolicy(which);
+
+ return WC->Policy[which].expire_mode == CompareWith;
+}
+
+
+void tmplput_ExpireValue(StrBuf *Target, WCTemplputParams *TP) {
+ GPEXWhichPolicy which;
+
+ which = GetTemplateTokenNumber(Target, TP, 0, 0);
+ LoadExpirePolicy(which);
+ StrBufAppendPrintf(Target, "%d", WC->Policy[which].expire_value);
+}
+
+
+void tmplput_ExpireMode(StrBuf *Target, WCTemplputParams *TP) {
+ GPEXWhichPolicy which;
+
+ which = GetTemplateTokenNumber(Target, TP, 2, 0);
+ LoadExpirePolicy(which);
+ StrBufAppendPrintf(Target, "%d", WC->Policy[which].expire_mode);
+}
+
+
+void LoadZoneFiles(void) {
+ icalarray *zones;
+ int z;
+ long len;
+ const char *this_zone;
+ StrBuf *ZName;
+
+ ZoneHash = NewHash(1, NULL);
+ ZName = NewStrBufPlain(HKEY("UTC"));
+ Put(ZoneHash, HKEY("UTC"), ZName, HFreeStrBuf);
+ zones = icaltimezone_get_builtin_timezones();
+ for (z = 0; z < zones->num_elements; ++z) {
+ /* syslog(LOG_DEBUG, "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);
+ Put(ZoneHash, this_zone, len, ZName, HFreeStrBuf);
+ }
+ SortByHashKey(ZoneHash, 0);
+}
+
+
+typedef struct _CfgMapping {
+ int type;
+ int min;
+ int max;
+ const char *defval;
+ const char *Key;
+ long len;
+} CfgMapping;
+
+#define CFG_STR 1
+#define CFG_YES 2
+#define CFG_NO 3
+#define CFG_INT 4
+
+CfgMapping ServerConfig[] = {
+ {CFG_STR, 0, 0, "", HKEY("c_nodename")},
+ {CFG_STR, 0, 0, "", HKEY("c_fqdn")},
+ {CFG_STR, 0, 0, "", HKEY("c_humannode")},
+ {CFG_STR, 0, 0, "", HKEY("c_phonenum")},
+ {CFG_YES, 0, 0, "", HKEY("c_creataide")},
+ {CFG_STR, 0, 0, "", HKEY("c_sleeping")},
+ {CFG_STR, 0, 0, "", HKEY("c_initax")},
+ {CFG_YES, 0, 0, "", HKEY("c_regiscall")},
+ {CFG_YES, 0, 0, "", HKEY("c_twitdetect")},
+ {CFG_STR, 0, 0, "", HKEY("c_twitroom")},
+ {CFG_STR, 0, 0, "", HKEY("c_moreprompt")},
+ {CFG_YES, 0, 0, "", HKEY("c_restrict")},
+ {CFG_STR, 0, 0, "", HKEY("c_bbs_city")},
+ {CFG_STR, 0, 0, "", HKEY("c_sysadm")},
+ {CFG_STR, 0, 0, "", HKEY("c_maxsessions")},
+ {CFG_STR, 0, 0, "", HKEY("reserved1")},
+ {CFG_STR, 0, 0, "", HKEY("c_userpurge")},
+ {CFG_STR, 0, 0, "", HKEY("c_roompurge")},
+ {CFG_STR, 0, 0, "", HKEY("c_logpages")},
+ {CFG_STR, 0, 0, "", HKEY("c_createax")},
+ {CFG_STR, 0, 0, "", HKEY("c_maxmsglen")},
+ {CFG_STR, 0, 0, "", HKEY("c_min_workers")},
+ {CFG_STR, 0, 0, "", HKEY("c_max_workers")},
+ {CFG_STR, 0, 0, "", HKEY("c_pop3_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_smtp_port")},
+ {CFG_INT, CFG_SMTP_FROM_FILTERALL, CFG_SMTP_FROM_REJECT, "0", HKEY("c_rfc822_strict_from")},
+ {CFG_YES, 0, 0, "", HKEY("c_aide_zap")},
+ {CFG_STR, 0, 0, "", HKEY("c_imap_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_net_freq")},
+ {CFG_YES, 0, 0, "", HKEY("c_disable_newu")},
+ {CFG_STR, 0, 0, "", HKEY("reserved2")},
+ {CFG_STR, 0, 0, "", HKEY("c_purge_hour")},
+ {CFG_STR, 0, 0, "", HKEY("c_ldap_host")},
+ {CFG_STR, 0, 0, "", HKEY("c_ldap_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_ldap_base_dn")},
+ {CFG_STR, 0, 0, "", HKEY("c_ldap_bind_dn")},
+ {CFG_STR, 0, 0, "", HKEY("c_ldap_bind_pw")},
+ {CFG_STR, 0, 0, "", HKEY("c_ip_addr")},
+ {CFG_STR, 0, 0, "", HKEY("c_msa_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_imaps_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_pop3s_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_smtps_port")},
+ {CFG_YES, 0, 0, "", HKEY("c_enable_fulltext")},
+ {CFG_YES, 0, 0, "", HKEY("c_auto_cull")},
+ {CFG_YES, 0, 0, "", HKEY("reserved3")},
+ {CFG_YES, 0, 0, "", HKEY("c_allow_spoofing")},
+ {CFG_YES, 0, 0, "", HKEY("c_journal_email")},
+ {CFG_YES, 0, 0, "", HKEY("c_journal_pubmsgs")},
+ {CFG_STR, 0, 0, "", HKEY("c_journal_dest")},
+ {CFG_STR, 0, 0, "", HKEY("c_default_cal_zone")},
+ {CFG_STR, 0, 0, "", HKEY("c_pftcpdict_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_mgesve_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_auth_mode")},
+ {CFG_STR, 0, 0, "", HKEY("c_funambol_host")},
+ {CFG_STR, 0, 0, "", HKEY("c_funambol_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_funambol_source")},
+ {CFG_STR, 0, 0, "", HKEY("c_funambol_auth")},
+ {CFG_YES, 0, 0, "", HKEY("c_rbl_at_greeting")},
+ {CFG_STR, 0, 0, "", HKEY("c_master_user")},
+ {CFG_STR, 0, 0, "", HKEY("c_master_pass")},
+ {CFG_STR, 0, 0, "", HKEY("c_pager_program")},
+ {CFG_YES, 0, 0, "", HKEY("c_imap_keep_from")},
+ {CFG_STR, 0, 0, "", HKEY("c_xmpp_c2s_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_xmpp_s2s_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_pop3_fetch")},
+ {CFG_STR, 0, 0, "", HKEY("c_pop3_fastest")},
+ {CFG_YES, 0, 0, "", HKEY("c_spam_flag_only")},
+ {CFG_YES, 0, 0, "", HKEY("c_guest_logins")},
+ {CFG_STR, 0, 0, "", HKEY("c_port_number")},
+ {CFG_STR, 0, 0, "", HKEY("c_ctdluid")},
+ {CFG_STR, 0, 0, "", HKEY("c_nntp_port")},
+ {CFG_STR, 0, 0, "", HKEY("c_nntps_port")}
+};
+
+
+/*
+ * display all configuration items
+ */
+void load_siteconfig(void) {
+ StrBuf *Buf;
+ HashList *Cfg;
+ long len;
+ int i, j;
+
+ if (WC->ServCfg == NULL)
+ WC->ServCfg = NewHash(1, NULL);
+ Cfg = WC->ServCfg;
+
+ Buf = NewStrBuf();
+
+ serv_printf("CONF get");
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatus(Buf, NULL) != 1) {
+ StrBufCutLeft(Buf, 4);
+ AppendImportantMessage(SKEY(Buf));
+ FreeStrBuf(&Buf);
+ return;
+
+ }
+ j = i = 0;
+ while (len = StrBuf_ServGetln(Buf),
+ (len >= 0) &&
+ ((len != 3) || strcmp(ChrPtr(Buf), "000")))
+ {
+ if (i < (sizeof(ServerConfig) / sizeof(CfgMapping)))
+ {
+ Put(Cfg,
+ ServerConfig[i].Key,
+ ServerConfig[i].len,
+ Buf,
+ HFreeStrBuf);
+ i++;
+ Buf = NewStrBuf();
+ }
+ else {
+ if (j == 0) {
+ syslog(LOG_WARNING, "The server sent more configuration data than this version of webcit is capable of changing. Unknown configuration values will remain unchanged.");
+ }
+ j++;
+ }
+ }
+ FreeStrBuf(&Buf);
+
+ LoadExpirePolicy(roompolicy);
+ LoadExpirePolicy(floorpolicy);
+ LoadExpirePolicy(mailboxespolicy);
+ LoadExpirePolicy(sitepolicy);
+}
+
+
+/*
+ * parse siteconfig changes
+ */
+void siteconfig(void) {
+ int i, value;
+ StrBuf *Line;
+
+ if (strlen(bstr("ok_button")) == 0) {
+ display_aide_menu();
+ return;
+ }
+ Line = NewStrBuf();
+ serv_printf("CONF set");
+ 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) {
+ default:
+ case CFG_STR:
+ serv_putbuf(SBstr(ServerConfig[i].Key, ServerConfig[i].len));
+ break;
+ case CFG_YES:
+ serv_puts(YesBstr(ServerConfig[i].Key,
+ ServerConfig[i].len) ?
+ "1" : "0");
+ break;
+ case CFG_NO:
+ serv_puts(YesBstr(ServerConfig[i].Key,
+ ServerConfig[i].len) ?
+ "0" : "1");
+ break;
+ case CFG_INT:
+ value = IBstr(ServerConfig[i].Key,
+ ServerConfig[i].len);
+ if ((value < ServerConfig[i].min) ||
+ (value > ServerConfig[i].max))
+ value = atol(ServerConfig[i].defval);
+ serv_printf("%d", value);
+ break;
+ }
+ }
+ serv_puts("000");
+
+ SaveExpirePolicyFromHTTP(sitepolicy);
+ SaveExpirePolicyFromHTTP(mailboxespolicy);
+
+ FreeStrBuf(&WC->serv_info->serv_default_cal_zone);
+ WC->serv_info->serv_default_cal_zone = NewStrBufDup(sbstr("c_default_cal_zone"));
+
+ AppendImportantMessage(_("Your system configuration has been updated."), -1);
+ DeleteHash(&WC->ServCfg);
+ display_aide_menu();
+}
+
+
+// if WebCit Classic wasn't obsolete we would replace this with a "CONF GETVAL" type of thing
+void tmplput_servcfg(StrBuf *Target, WCTemplputParams *TP) {
+ void *vBuf;
+ StrBuf *Buf;
+
+ if (WC->is_aide) {
+ if (WC->ServCfg == NULL)
+ load_siteconfig();
+ GetHash(WC->ServCfg, TKEY(0), &vBuf);
+ Buf = (StrBuf*) vBuf;
+ StrBufAppendTemplate(Target, TP, Buf, 1);
+ }
+}
+
+
+int ConditionalServCfg(StrBuf *Target, WCTemplputParams *TP) {
+ void *vBuf;
+ StrBuf *Buf;
+
+ if (WC->is_aide) {
+ if (WC->ServCfg == NULL)
+ load_siteconfig();
+ GetHash(WC->ServCfg, TKEY(2), &vBuf);
+ if (vBuf == NULL) return 0;
+ Buf = (StrBuf*) vBuf;
+ if (TP->Tokens->nParameters == 3) {
+ return 1;
+ }
+ 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 ConditionalServCfgCTXStrBuf(StrBuf *Target, WCTemplputParams *TP) {
+ void *vBuf;
+ StrBuf *Buf;
+ StrBuf *ZoneToCheck = (StrBuf*) CTX(CTX_STRBUF);
+
+ if ((WC->is_aide) || (ZoneToCheck == NULL)) {
+ if (WC->ServCfg == NULL)
+ load_siteconfig();
+ GetHash(WC->ServCfg, TKEY(2), &vBuf);
+ if (vBuf == NULL) return 0;
+ Buf = (StrBuf*) vBuf;
+
+ return strcmp(ChrPtr(Buf), ChrPtr(ZoneToCheck)) == 0;
+ }
+ else return 0;
+}
+
+/*----------------------------------------------------------------------------*
+ * Displaying Logging *
+ *----------------------------------------------------------------------------*/
+typedef struct __LogStatusStruct {
+ int Enable;
+ StrBuf *Name;
+}LogStatusStruct;
+
+void DeleteLogStatusStruct(void *v)
+{
+ LogStatusStruct *Stat = (LogStatusStruct*)v;
+
+ FreeStrBuf(&Stat->Name);
+ free(Stat);
+}
+
+void tmplput_servcfg_LogName(StrBuf *Target, WCTemplputParams *TP)
+{
+ LogStatusStruct *Stat = (LogStatusStruct*) CTX(CTX_SRVLOG);
+ StrBufAppendTemplate(Target, TP, Stat->Name, 1);
+}
+
+
+
+int ConditionalServCfgThisLogEnabled(StrBuf *Target, WCTemplputParams *TP)
+{
+ LogStatusStruct *Stat = (LogStatusStruct*) CTX(CTX_SRVLOG);
+ return Stat->Enable;
+}
+
+HashList *iterate_GetSrvLogEnable(StrBuf *Target, WCTemplputParams *TP)
+{
+ HashList *Hash = NULL;
+ StrBuf *Buf;
+ LogStatusStruct *Stat;
+ const char *Pos;
+ int Done = 0;
+ long len;
+ int num_logs = 0;
+
+ serv_puts("LOGP");
+ Buf = NewStrBuf();
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatus(Buf, NULL) == 1) {
+ Hash = NewHash(1, Flathash);
+ while (!Done) {
+ len = StrBuf_ServGetln(Buf);
+ if ((len <0) ||
+ ((len == 3) &&
+ !strcmp(ChrPtr(Buf), "000")))
+ {
+ Done = 1;
+ break;
+ }
+ Stat = (LogStatusStruct*) malloc (sizeof(LogStatusStruct));
+ Pos = NULL;
+ Stat->Name = NewStrBufPlain(NULL, len);
+ StrBufExtract_NextToken(Stat->Name, Buf, &Pos, '|');
+ Stat->Enable = StrBufExtractNext_int(Buf, &Pos, '|');
+
+ Put(Hash, IKEY(num_logs), Stat, DeleteLogStatusStruct);
+ num_logs++;
+ }
+ }
+ FreeStrBuf(&Buf);
+ return Hash;
+}
+
+
+void
+InitModule_SITECONFIG
+(void)
+{
+ RegisterCTX(CTX_SRVLOG);
+ WebcitAddUrlHandler(HKEY("siteconfig"), "", 0, siteconfig, CTX_NONE);
+
+ RegisterNamespace("SERV:CFG", 1, 2, tmplput_servcfg, NULL, CTX_NONE);
+ RegisterConditional("COND:SERVCFG", 3, ConditionalServCfg, CTX_NONE);
+ RegisterConditional("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);
+
+ REGISTERTokenParamDefine(CFG_SMTP_FROM_FILTERALL);
+ REGISTERTokenParamDefine(CFG_SMTP_FROM_NOFILTER);
+ REGISTERTokenParamDefine(CFG_SMTP_FROM_CORRECT);
+ REGISTERTokenParamDefine(CFG_SMTP_FROM_REJECT);
+
+ RegisterConditional("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);
+ RegisterConditional("COND:SERVCFG:THISLOGENABLE", 4, ConditionalServCfgThisLogEnabled, CTX_SRVLOG);
+ RegisterIterator("SERVCFG:LOGENABLE", 0, NULL, iterate_GetSrvLogEnable, NULL, DeleteHash, CTX_SRVLOG, CTX_NONE, IT_NOFLAG);
+ RegisterNamespace("SERVCFG:LOGNAME", 0, 1, tmplput_servcfg_LogName, NULL, CTX_SRVLOG);
+}
+
+void
+ServerStartModule_SITECONFIG
+(void)
+{
+ LoadZoneFiles();
+}
+
+void
+ServerShutdownModule_SITECONFIG
+(void)
+{
+ DeleteHash(&ZoneHash);
+}
+
+
+void
+SessionDestroyModule_SITECONFIG
+(wcsession *sess)
+{
+ DeleteHash(&sess->ServCfg);
+}
projects / citadel.git / blobdiff