Readloop remove special cases
[citadel.git] / webcit / siteconfig.c
index f464698b6ce9b94faa845d974aa56234b6664ff9..bdc3cc20576c288af5bf7d66b9aa481891f9ecf3 100644 (file)
 /*
- * $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 <ctype.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <sys/socket.h>
-#include <sys/time.h>
-#include <limits.h>
-#include <netinet/in.h>
-#include <netdb.h>
-#include <string.h>
-#include <pwd.h>
-#include <errno.h>
-#include <stdarg.h>
-#include <pthread.h>
-#include <signal.h>
 #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)
+{
+       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(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);
+               Put(ZoneHash, this_zone, len, ZName, HFreeStrBuf);
+       }
+       SortByHashKey(ZoneHash, 0);
+}
 
 
+typedef struct _CfgMapping {
+       int type;
+       const char *Key;
+       long len;
+} CfgMapping;
+
+#define CFG_STR 1
+#define CFG_YES 2
+#define CFG_NO 3
+
+CfgMapping ServerConfig[] = {
+       {CFG_STR, HKEY("c_nodename")},
+       {CFG_STR, HKEY("c_fqdn")},
+       {CFG_STR, HKEY("c_humannode")},
+       {CFG_STR, HKEY("c_phonenum")},
+       {CFG_YES, HKEY("c_creataide")},
+       {CFG_STR, HKEY("c_sleeping")},
+       {CFG_STR, HKEY("c_initax")},
+       {CFG_YES, HKEY("c_regiscall")},
+       {CFG_YES, HKEY("c_twitdetect")},
+       {CFG_STR, HKEY("c_twitroom")},
+       {CFG_STR, HKEY("c_moreprompt")},
+       {CFG_YES, HKEY("c_restrict")},
+       {CFG_STR, HKEY("c_bbs_city")},
+       {CFG_STR, HKEY("c_sysadm")},
+       {CFG_STR, HKEY("c_maxsessions")},
+       {CFG_STR, HKEY("reserved1")},
+       {CFG_STR, HKEY("c_userpurge")},
+       {CFG_STR, HKEY("c_roompurge")},
+       {CFG_STR, HKEY("c_logpages")},
+       {CFG_STR, HKEY("c_createax")},
+       {CFG_STR, HKEY("c_maxmsglen")},
+       {CFG_STR, HKEY("c_min_workers")},
+       {CFG_STR, HKEY("c_max_workers")},
+       {CFG_STR, HKEY("c_pop3_port")},
+       {CFG_STR, HKEY("c_smtp_port")},
+       {CFG_NO , HKEY("c_rfc822_strict_from")},        /* note: reverse bool */
+       {CFG_YES, HKEY("c_aide_zap")},
+       {CFG_STR, HKEY("c_imap_port")},
+       {CFG_STR, HKEY("c_net_freq")},
+       {CFG_YES, HKEY("c_disable_newu")},
+       {CFG_STR, HKEY("reserved2")},
+       {CFG_STR, HKEY("c_purge_hour")},
+       {CFG_STR, HKEY("c_ldap_host")},
+       {CFG_STR, HKEY("c_ldap_port")},
+       {CFG_STR, HKEY("c_ldap_base_dn")},
+       {CFG_STR, HKEY("c_ldap_bind_dn")},
+       {CFG_STR, HKEY("c_ldap_bind_pw")},
+       {CFG_STR, HKEY("c_ip_addr")},
+       {CFG_STR, HKEY("c_msa_port")},
+       {CFG_STR, HKEY("c_imaps_port")},
+       {CFG_STR, HKEY("c_pop3s_port")},
+       {CFG_STR, HKEY("c_smtps_port")},
+       {CFG_YES, HKEY("c_enable_fulltext")},
+       {CFG_YES, HKEY("c_auto_cull")},
+       {CFG_YES, HKEY("c_instant_expunge")},
+       {CFG_YES, HKEY("c_allow_spoofing")},
+       {CFG_YES, HKEY("c_journal_email")},
+       {CFG_YES, HKEY("c_journal_pubmsgs")},
+       {CFG_STR, HKEY("c_journal_dest")},
+       {CFG_STR, HKEY("c_default_cal_zone")},
+       {CFG_STR, HKEY("c_pftcpdict_port")},
+       {CFG_STR, HKEY("c_mgesve_port")},
+       {CFG_STR, HKEY("c_auth_mode")},
+       {CFG_STR, HKEY("c_funambol_host")},
+       {CFG_STR, HKEY("c_funambol_port")},
+       {CFG_STR, HKEY("c_funambol_source")},
+       {CFG_STR, HKEY("c_funambol_auth")},
+       {CFG_YES, HKEY("c_rbl_at_greeting")},
+       {CFG_STR, HKEY("c_master_user")},
+       {CFG_STR, HKEY("c_master_pass")},
+       {CFG_STR, HKEY("c_pager_program")},
+       {CFG_YES, HKEY("c_imap_keep_from")},
+       {CFG_STR, HKEY("c_xmpp_c2s_port")},
+       {CFG_STR, HKEY("c_xmpp_s2s_port")},
+       {CFG_STR, HKEY("c_pop3_fetch")},
+       {CFG_STR, HKEY("c_pop3_fastest")},
+       {CFG_YES, HKEY("c_spam_flag_only")},
+       {CFG_YES, HKEY("c_guest_logins")}
+};
 
 
 
-void display_siteconfig(void)
+/*
+ *  display all configuration items
+ */
+void load_siteconfig(void)
 {
-       char buf[SIZ];
-       char *whichmenu;
+       wcsession *WCC = WC;
+       StrBuf *Buf;
+       HashList *Cfg;
+       long len;
        int i, j;
+       
+       if (WCC->ServCfg == NULL)
+               WCC->ServCfg = NewHash(1, NULL);
+       Cfg = WCC->ServCfg;
 
-       /* expire policy settings */
-       int sitepolicy = 0;
-       int sitevalue = 0;
-       int mboxpolicy = 0;
-       int mboxvalue = 0;
-
-       output_headers(1, 1, 2, 0, 0, 0, 0);
-       wprintf("<div id=\"banner\">\n"
-               "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
-               "<SPAN CLASS=\"titlebar\">Site configuration</SPAN>"
-               "</TD></TR></TABLE>\n"
-               "</div>\n<div id=\"content\">\n"
-       );
-
-       wprintf("<div id=\"fix_scrollbar_bug\">"
-               "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>");
-
-       whichmenu = bstr("whichmenu");
-
-       if (!strcmp(whichmenu, "")) {
-               wprintf("<TABLE border=0 cellspacing=0 cellpadding=3 width=100%%>\n");
-
-               wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=general\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=general\">"
-                       "<B>General</B><br />"
-                       "General site configuration items"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("<TR><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=access\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=access\">"
-                       "<B>Access</B><br />"
-                       "Access controls and site policy settings"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=network\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=network\">"
-                       "<B>Network</B><br />"
-                       "Network services"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("<TR><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
-                       "<B>Tuning</B><br />"
-                       "Advanced server fine-tuning controls"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
-                       "<B>Directory</B><br />"
-                       "Configure the LDAP connector for Citadel"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("<TR><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
-                       "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
-                       "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
-                       "</TD><TD>"
-                       "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
-                       "<B>Auto-purger</B><br />"
-                       "Configure automatic expiry of old messages"
-                       "</A></TD></TR>\n"
-               );
-
-               wprintf("</TABLE>");
-               wprintf("</td></tr></table></center>\n");
-               wDumpContent(1);
+       Buf = NewStrBuf();
+
+       serv_printf("CONF get");
+       StrBuf_ServGetln(Buf);
+       if (GetServerStatus(Buf, NULL) != 1) {
+               StrBufCutLeft(Buf, 4);
+               AppendImportantMessage(SKEY(Buf));
+               FreeStrBuf(&Buf);
                return;
+               
        }
-
-       if (!strcasecmp(whichmenu, "general")) {
-               wprintf("<CENTER><H2>General site configuration items</H2></CENTER>\n");
+       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)
+                               AppendImportantMessage(_("WARNING: Failed to parse Server Config; do you run a to new citserver?"), -1);
+                       j++;
+               }
        }
+       FreeStrBuf(&Buf);
 
-       if (!strcasecmp(whichmenu, "access")) {
-               wprintf("<CENTER><H2>Access controls and site policy settings</H2></CENTER>\n");
-       }
+       LoadExpirePolicy(sitepolicy);
+       LoadExpirePolicy(mailboxespolicy);
+}
 
-       if (!strcasecmp(whichmenu, "network")) {
-               wprintf("<CENTER><H2>Network services</H2>"
-                       "Changes made on this screen will not take effect until you restart the Citadel server."
-                       "</CENTER>\n");
-       }
 
-       if (!strcasecmp(whichmenu, "tuning")) {
-               wprintf("<CENTER><H2>Advanced server fine-tuning controls</H2></CENTER>\n");
-       }
 
-       if (!strcasecmp(whichmenu, "ldap")) {
-               wprintf("<CENTER><H2>Citadel LDAP connector configuration</H2>"
-                       "Changes made on this screen will not take effect until you restart the Citadel server."
-                       "</CENTER>\n");
-       }
+/*
+ * parse siteconfig changes 
+ */
+void siteconfig(void)
+{
+       wcsession *WCC = WC;
+       int i;
+       StrBuf *Line;
 
-       if (!strcasecmp(whichmenu, "purger")) {
-               wprintf("<CENTER><H2>Message auto-purger settings</H2>"
-                       "These settings may be overridden on a per-floor or per-room basis."
-                       "</CENTER>\n");
+       if (strlen(bstr("ok_button")) == 0) {
+               display_aide_menu();
+               return;
        }
-
-       serv_printf("CONF get");
-       serv_getln(buf, sizeof buf);
-       if (buf[0] != '1') {
-               wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
-               wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
-               wprintf("</TD></TR></TABLE><br />\n");
-               wprintf("%s<br />\n", &buf[4]);
-               do_template("endbox");
-               wDumpContent(1);
+       Line = NewStrBuf();
+       serv_printf("CONF set");
+       StrBuf_ServGetln(Line);
+       if (GetServerStatusMsg(Line, NULL, 1, 4) != 4) {
+               display_aide_menu();
+               FreeStrBuf(&Line);
                return;
        }
 
-       wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
-       wprintf("<TABLE border=0>\n");
-
-       i = 0;
-       while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
-               switch (++i) {
-               case 1:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Node name</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_nodename\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 2:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_fqdn\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 3:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Human-readable node name</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_humannode\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 4:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Landline telephone number</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_phonenum\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 5:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_creataide\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 6:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sleeping\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 7:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Initial access level for new users</TD><TD>");
-                               wprintf("<SELECT NAME=\"c_initax\" SIZE=\"1\">\n");
-                               for (j=0; j<=6; ++j) {
-                                       wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
-                                               ((atoi(buf) == j) ? "SELECTED" : ""),
-                                               j, j, axdefs[j]
-                                       );
-                               }
-                               wprintf("</SELECT>");
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_initax\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 8:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Require registration for new users</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_regiscall\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 9:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Quarantine messages from problem users</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitdetect\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 10:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Name of quarantine room</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitroom\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 11:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Paginator prompt (for text mode clients)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_moreprompt\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 12:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_restrict\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 13:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Geographic location of this system</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_bbs_city\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 14:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Name of system administrator</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sysadm\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 15:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Maximum concurrent sessions (0 = no limit)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxsessions\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 17:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_userpurge\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 18:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_roompurge\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 19:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Name of room to log pages</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_logpages\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 20:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
-                               wprintf("<SELECT NAME=\"c_createax\" SIZE=\"1\">\n");
-                               for (j=0; j<=6; ++j) {
-                                       wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
-                                               ((atoi(buf) == j) ? "SELECTED" : ""),
-                                               j, j, axdefs[j]
-                                       );
-                               }
-                               wprintf("</SELECT>");
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_createax\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 21:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Maximum message length</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxmsglen\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 22:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_min_workers\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 23:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_max_workers\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 24:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 25:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>SMTP MTA port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtp_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 27:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_zap\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 28:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imap_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 29:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_net_freq\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 30:
-                       if (!strcasecmp(whichmenu, "access")) {
-                               wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_disable_newu\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 31:
-                       /* niu */
-                       break;
-               case 32:
-                       if (!strcasecmp(whichmenu, "purger")) {
-                               wprintf("<TR><TD>Hour to run database auto-purge</TD><TD>");
-                               wprintf("<SELECT NAME=\"c_purge_hour\" SIZE=\"1\">\n");
-                               for (j=0; j<=23; ++j) {
-                                       wprintf("<OPTION %s VALUE=\"%d\">%d:00%s</OPTION>\n",
-                                               ((atoi(buf) == j) ? "SELECTED" : ""),
-                                               j,
-                                               ((j == 0) ? 12 : ((j>12) ? j-12 : j)),
-                                               ((j >= 12) ? "pm" : "am")
-                                       );
-                               }
-                               wprintf("</SELECT>");
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_purge_hour\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 33:
-                       if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
-                               wprintf("<TR><TD>Host name of LDAP server (blank to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_host\" MAXLENGTH=\"127\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_host\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 34:
-                       if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
-                               wprintf("<TR><TD>Port number of LDAP server (blank to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_port\" MAXLENGTH=\"127\" VALUE=\"%d\">", atoi(buf));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_port\" VALUE=\"%d\">", atoi(buf));
-                       }
-                       break;
-               case 35:
-                       if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
-                               wprintf("<TR><TD>Base DN</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_base_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_base_dn\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 36:
-                       if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
-                               wprintf("<TR><TD>Bind DN</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_bind_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_dn\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 37:
-                       if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
-                               wprintf("<TR><TD>Password for bind DN</TD><TD>");
-                               wprintf("<INPUT TYPE=\"password\" NAME=\"c_ldap_bind_pw\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_pw\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 38:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>Server IP address (0.0.0.0 for 'any')</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_ip_addr\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ip_addr\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 39:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>SMTP MSA port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_msa_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_msa_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 40:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>IMAP over SSL port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_imaps_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imaps_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 41:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>POP3 over SSL port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3s_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3s_port\" VALUE=\"%s\">", buf);
-                       }
-                       break;
-               case 42:
-                       if (!strcasecmp(whichmenu, "network")) {
-                               wprintf("<TR><TD>SMTP over SSL port (-1 to disable)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtps_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtps_port\" VALUE=\"%s\">", buf);
-                       }
+       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 43:
-                       if (!strcasecmp(whichmenu, "general")) {
-                               wprintf("<TR><TD>Enable full text index (warning: resource intensive)</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_enable_fulltext\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_enable_fulltext\" VALUE=\"%s\">", buf);
-                       }
+               case CFG_YES:
+                       serv_puts(YesBstr(ServerConfig[i].Key, 
+                                         ServerConfig[i].len) ?
+                                 "1" : "0");
                        break;
-               case 44:
-                       if (!strcasecmp(whichmenu, "tuning")) {
-                               wprintf("<TR><TD>Automatically delete committed database logs</TD><TD>");
-                               wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_auto_cull\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
-                               wprintf("</TD></TR>\n");
-                       }
-                       else {
-                               wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_auto_cull\" VALUE=\"%s\">", buf);
-                       }
+               case CFG_NO:
+                       serv_puts(YesBstr(ServerConfig[i].Key, 
+                                         ServerConfig[i].len) ?
+                                 "0" : "1");
                        break;
                }
        }
+        serv_puts("000");
 
-       serv_puts("GPEX site");
-       serv_getln(buf, sizeof buf);
-       if (buf[0] == '2') {
-               sitepolicy = extract_int(&buf[4], 0);
-               sitevalue = extract_int(&buf[4], 1);
-       }
+       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"));
+
+       AppendImportantMessage(_("Your system configuration has been updated."), -1);
+       DeleteHash(&WCC->ServCfg);
+       display_aide_menu();
+}
 
-       serv_puts("GPEX mailboxes");
-       serv_getln(buf, sizeof buf);
-       if (buf[0] == '2') {
-               mboxpolicy = extract_int(&buf[4], 0);
-               mboxvalue = extract_int(&buf[4], 1);
+void tmplput_servcfg(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+       void *vBuf;
+       StrBuf *Buf;
+
+       if (WCC->is_aide) {
+               if (WCC->ServCfg == NULL)
+                       load_siteconfig();
+               GetHash(WCC->ServCfg, TKEY(0), &vBuf);
+               Buf = (StrBuf*) vBuf;
+               StrBufAppendTemplate(Target, TP, Buf, 1);
        }
+}
 
-       if (!strcasecmp(whichmenu, "purger")) {
-
-               wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
-
-               wprintf("<TR><TD>Default message expire policy for public rooms</TD><TD>");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"1\" %s>",
-                       ((sitepolicy == 1) ? "CHECKED" : "") );
-               wprintf("Never automatically expire messages<br />\n");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"2\" %s>",
-                       ((sitepolicy == 2) ? "CHECKED" : "") );
-               wprintf("Expire by message count<br />\n");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"3\" %s>",
-                       ((sitepolicy == 3) ? "CHECKED" : "") );
-               wprintf("Expire by message age<br />");
-               wprintf("Number of messages or days: ");
-               wprintf("<INPUT TYPE=\"text\" NAME=\"sitevalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", sitevalue);
-               wprintf("</TD></TR>\n");
-
-               wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
-
-               wprintf("<TR><TD>Default message expire policy for private mailboxes</TD><TD>");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"0\" %s>",
-                       ((mboxpolicy == 0) ? "CHECKED" : "") );
-               wprintf("Same policy as public rooms<br />\n");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"1\" %s>",
-                       ((mboxpolicy == 1) ? "CHECKED" : "") );
-               wprintf("Never automatically expire messages<br />\n");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"2\" %s>",
-                       ((mboxpolicy == 2) ? "CHECKED" : "") );
-               wprintf("Expire by message count<br />\n");
-               wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"3\" %s>",
-                       ((mboxpolicy == 3) ? "CHECKED" : "") );
-               wprintf("Expire by message age<br />");
-               wprintf("Number of messages or days: ");
-               wprintf("<INPUT TYPE=\"text\" NAME=\"mboxvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", mboxvalue);
-               wprintf("</TD></TR>\n");
-
-               wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
+int ConditionalServCfg(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+       void *vBuf;
+       StrBuf *Buf;
+
+       if (WCC->is_aide) {
+               if (WCC->ServCfg == NULL)
+                       load_siteconfig();
+               GetHash(WCC->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 {
-               wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitepolicy\" VALUE=\"%d\">\n", sitepolicy);
-               wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitevalue\" VALUE=\"%d\">\n", sitevalue);
-               wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxpolicy\" VALUE=\"%d\">\n", mboxpolicy);
-               wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxvalue\" VALUE=\"%d\">\n", mboxvalue);
+       else return 0;
+}
+
+int ConditionalServCfgCTXStrBuf(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+       void *vBuf;
+       StrBuf *Buf;
+       StrBuf *ZoneToCheck = (StrBuf*) CTX;
+
+       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 strcmp(ChrPtr(Buf), ChrPtr(ZoneToCheck)) == 0;
        }
+       else return 0;
+}
 
-       wprintf("</TABLE><CENTER>");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
-       wprintf("&nbsp;");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
-       wprintf("</CENTER></FORM>\n");
-       wprintf("</td></tr></table></div>\n");
-       wDumpContent(1);
+void 
+InitModule_SITECONFIG
+(void)
+{
+       WebcitAddUrlHandler(HKEY("siteconfig"), "", 0, siteconfig, CTX_NONE);
+
+       RegisterNamespace("SERV:CFG", 1, 2, tmplput_servcfg, NULL, CTX_NONE);
+       RegisterConditional(HKEY("COND:SERVCFG"), 3, ConditionalServCfg, 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 siteconfig(void)
+void 
+ServerShutdownModule_SITECONFIG
+(void)
 {
-       char buf[SIZ];
+       DeleteHash(&ZoneHash);
+}
 
-       if (strcasecmp(bstr("sc"), "OK")) {
-               display_siteconfig();
-               return;
-       }
-       serv_printf("CONF set");
-       serv_getln(buf, sizeof buf);
-       if (buf[0] != '4') {
-               safestrncpy(WC->ImportantMessage, &buf[4], sizeof WC->ImportantMessage);
-               display_siteconfig();
-               return;
-       }
-       serv_printf("%s", bstr("c_nodename"));
-       serv_printf("%s", bstr("c_fqdn"));
-       serv_printf("%s", bstr("c_humannode"));
-       serv_printf("%s", bstr("c_phonenum"));
-       serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
-       serv_printf("%s", bstr("c_sleeping"));
-       serv_printf("%s", bstr("c_initax"));
-       serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
-       serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
-       serv_printf("%s", bstr("c_twitroom"));
-       serv_printf("%s", bstr("c_moreprompt"));
-       serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
-       serv_printf("%s", bstr("c_bbs_city"));
-       serv_printf("%s", bstr("c_sysadm"));
-       serv_printf("%s", bstr("c_maxsessions"));
-       serv_printf("");  /* networking password -- deprecated */
-       serv_printf("%s", bstr("c_userpurge"));
-       serv_printf("%s", bstr("c_roompurge"));
-       serv_printf("%s", bstr("c_logpages"));
-       serv_printf("%s", bstr("c_createax"));
-       serv_printf("%s", bstr("c_maxmsglen"));
-       serv_printf("%s", bstr("c_min_workers"));
-       serv_printf("%s", bstr("c_max_workers"));
-       serv_printf("%s", bstr("c_pop3_port"));
-       serv_printf("%s", bstr("c_smtp_port"));
-       serv_printf("");  /* moderation filter level -- not yet implemented */
-       serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
-       serv_printf("%s", bstr("c_imap_port"));
-       serv_printf("%s", bstr("c_net_freq"));
-       serv_printf("%s", ((!strcasecmp(bstr("c_disable_newu"), "yes") ? "1" : "0")));
-       serv_printf("1");
-       serv_printf("%s", bstr("c_purge_hour"));
-       serv_printf("%s", bstr("c_ldap_host"));
-       serv_printf("%s", bstr("c_ldap_port"));
-       serv_printf("%s", bstr("c_ldap_base_dn"));
-       serv_printf("%s", bstr("c_ldap_bind_dn"));
-       serv_printf("%s", bstr("c_ldap_bind_pw"));
-       serv_printf("%s", bstr("c_ip_addr"));
-       serv_printf("%s", bstr("c_msa_port"));
-       serv_printf("%s", bstr("c_imaps_port"));
-       serv_printf("%s", bstr("c_pop3s_port"));
-       serv_printf("%s", bstr("c_smtps_port"));
-       serv_printf("%s", ((!strcasecmp(bstr("c_enable_fulltext"), "yes") ? "1" : "0")));
-       serv_printf("%s", ((!strcasecmp(bstr("c_auto_cull"), "yes") ? "1" : "0")));
-       serv_printf("000");
-
-       serv_printf("SPEX site|%d|%d", atoi(bstr("sitepolicy")), atoi(bstr("sitevalue")));
-       serv_getln(buf, sizeof buf);
-       serv_printf("SPEX mailboxes|%d|%d", atoi(bstr("mboxpolicy")), atoi(bstr("mboxvalue")));
-       serv_getln(buf, sizeof buf);
-
-       safestrncpy(WC->ImportantMessage, "System configuration has been updated.",
-               sizeof WC->ImportantMessage);
-       display_siteconfig();
+
+void 
+SessionDestroyModule_SITECONFIG
+(wcsession *sess)
+{
+       DeleteHash(&sess->ServCfg);
 }