webcit/siteconfig.c

   1 /*
   2  * $Id$
   3  *
   4  * Administrative screen for site-wide configuration
   5  *
   6  */
   7
   8
   9 #include "webcit.h"
  10
  11
  12 void display_siteconfig(void)
  13 {
  14         char buf[SIZ];
  15         char *whichmenu;
  16         int i, j;
  17
  18         /* expire policy settings */
  19         int sitepolicy = 0;
  20         int sitevalue = 0;
  21         int mboxpolicy = 0;
  22         int mboxvalue = 0;
  23
  24         output_headers(1, 1, 2, 0, 0, 0, 0);
  25         wprintf("<div id=\"banner\">\n"
  26                 "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
  27                 "<SPAN CLASS=\"titlebar\">Site configuration</SPAN>"
  28                 "</TD></TR></TABLE>\n"
  29                 "</div>\n<div id=\"content\">\n"
  30         );
  31
  32         wprintf("<div id=\"fix_scrollbar_bug\">"
  33                 "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>");
  34
  35         whichmenu = bstr("whichmenu");
  36
  37         if (!strcmp(whichmenu, "")) {
  38                 wprintf("<TABLE border=0 cellspacing=0 cellpadding=3 width=100%%>\n");
  39
  40                 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
  41                         "<A HREF=\"/display_siteconfig?whichmenu=general\">"
  42                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  43                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  44                         "</TD><TD>"
  45                         "<A HREF=\"/display_siteconfig?whichmenu=general\">"
  46                         "<B>General</B><br />"
  47                         "General site configuration items"
  48                         "</A></TD></TR>\n"
  49                 );
  50
  51                 wprintf("<TR><TD>"
  52                         "<A HREF=\"/display_siteconfig?whichmenu=access\">"
  53                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  54                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  55                         "</TD><TD>"
  56                         "<A HREF=\"/display_siteconfig?whichmenu=access\">"
  57                         "<B>Access</B><br />"
  58                         "Access controls and site policy settings"
  59                         "</A></TD></TR>\n"
  60                 );
  61
  62                 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
  63                         "<A HREF=\"/display_siteconfig?whichmenu=network\">"
  64                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  65                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  66                         "</TD><TD>"
  67                         "<A HREF=\"/display_siteconfig?whichmenu=network\">"
  68                         "<B>Network</B><br />"
  69                         "Network services"
  70                         "</A></TD></TR>\n"
  71                 );
  72
  73                 wprintf("<TR><TD>"
  74                         "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
  75                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  76                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  77                         "</TD><TD>"
  78                         "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
  79                         "<B>Tuning</B><br />"
  80                         "Advanced server fine-tuning controls"
  81                         "</A></TD></TR>\n"
  82                 );
  83
  84                 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
  85                         "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
  86                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  87                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  88                         "</TD><TD>"
  89                         "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
  90                         "<B>Directory</B><br />"
  91                         "Configure the LDAP connector for Citadel"
  92                         "</A></TD></TR>\n"
  93                 );
  94
  95                 wprintf("<TR><TD>"
  96                         "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
  97                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  98                         "SRC=\"/static/advanpage2_48x.gif\" ALT=\"&nbsp;\">"
  99                         "</TD><TD>"
 100                         "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
 101                         "<B>Auto-purger</B><br />"
 102                         "Configure automatic expiry of old messages"
 103                         "</A></TD></TR>\n"
 104                 );
 105
 106                 wprintf("</TABLE>");
 107                 wprintf("</td></tr></table></center>\n");
 108                 wDumpContent(1);
 109                 return;
 110         }
 111
 112         if (!strcasecmp(whichmenu, "general")) {
 113                 wprintf("<CENTER><H2>General site configuration items</H2></CENTER>\n");
 114         }
 115
 116         if (!strcasecmp(whichmenu, "access")) {
 117                 wprintf("<CENTER><H2>Access controls and site policy settings</H2></CENTER>\n");
 118         }
 119
 120         if (!strcasecmp(whichmenu, "network")) {
 121                 wprintf("<CENTER><H2>Network services</H2>"
 122                         "Changes made on this screen will not take effect until you restart the Citadel server."
 123                         "</CENTER>\n");
 124         }
 125
 126         if (!strcasecmp(whichmenu, "tuning")) {
 127                 wprintf("<CENTER><H2>Advanced server fine-tuning controls</H2></CENTER>\n");
 128         }
 129
 130         if (!strcasecmp(whichmenu, "ldap")) {
 131                 wprintf("<CENTER><H2>Citadel LDAP connector configuration</H2>"
 132                         "Changes made on this screen will not take effect until you restart the Citadel server."
 133                         "</CENTER>\n");
 134         }
 135
 136         if (!strcasecmp(whichmenu, "purger")) {
 137                 wprintf("<CENTER><H2>Message auto-purger settings</H2>"
 138                         "These settings may be overridden on a per-floor or per-room basis."
 139                         "</CENTER>\n");
 140         }
 141
 142         serv_printf("CONF get");
 143         serv_getln(buf, sizeof buf);
 144         if (buf[0] != '1') {
 145                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
 146                 wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
 147                 wprintf("</TD></TR></TABLE><br />\n");
 148                 wprintf("%s<br />\n", &buf[4]);
 149                 do_template("endbox");
 150                 wDumpContent(1);
 151                 return;
 152         }
 153
 154         wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
 155         wprintf("<TABLE border=0>\n");
 156
 157         i = 0;
 158         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
 159                 switch (++i) {
 160                 case 1:
 161                         if (!strcasecmp(whichmenu, "general")) {
 162                                 wprintf("<TR><TD>Node name</TD><TD>");
 163                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 164                                 wprintf("</TD></TR>\n");
 165                         }
 166                         else {
 167                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_nodename\" VALUE=\"%s\">", buf);
 168                         }
 169                         break;
 170                 case 2:
 171                         if (!strcasecmp(whichmenu, "general")) {
 172                                 wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
 173                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 174                                 wprintf("</TD></TR>\n");
 175                         }
 176                         else {
 177                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_fqdn\" VALUE=\"%s\">", buf);
 178                         }
 179                         break;
 180                 case 3:
 181                         if (!strcasecmp(whichmenu, "general")) {
 182                                 wprintf("<TR><TD>Human-readable node name</TD><TD>");
 183                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
 184                                 wprintf("</TD></TR>\n");
 185                         }
 186                         else {
 187                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_humannode\" VALUE=\"%s\">", buf);
 188                         }
 189                         break;
 190                 case 4:
 191                         if (!strcasecmp(whichmenu, "general")) {
 192                                 wprintf("<TR><TD>Landline telephone number</TD><TD>");
 193                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 194                                 wprintf("</TD></TR>\n");
 195                         }
 196                         else {
 197                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_phonenum\" VALUE=\"%s\">", buf);
 198                         }
 199                         break;
 200                 case 5:
 201                         if (!strcasecmp(whichmenu, "access")) {
 202                                 wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
 203                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 204                                 wprintf("</TD></TR>\n");
 205                         }
 206                         else {
 207                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_creataide\" VALUE=\"%s\">", buf);
 208                         }
 209                         break;
 210                 case 6:
 211                         if (!strcasecmp(whichmenu, "tuning")) {
 212                                 wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
 213                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 214                                 wprintf("</TD></TR>\n");
 215                         }
 216                         else {
 217                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sleeping\" VALUE=\"%s\">", buf);
 218                         }
 219                         break;
 220                 case 7:
 221                         if (!strcasecmp(whichmenu, "access")) {
 222                                 wprintf("<TR><TD>Initial access level for new users</TD><TD>");
 223                                 wprintf("<SELECT NAME=\"c_initax\" SIZE=\"1\">\n");
 224                                 for (j=0; j<=6; ++j) {
 225                                         wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
 226                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 227                                                 j, j, axdefs[j]
 228                                         );
 229                                 }
 230                                 wprintf("</SELECT>");
 231                                 wprintf("</TD></TR>\n");
 232                         }
 233                         else {
 234                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_initax\" VALUE=\"%s\">", buf);
 235                         }
 236                         break;
 237                 case 8:
 238                         if (!strcasecmp(whichmenu, "access")) {
 239                                 wprintf("<TR><TD>Require registration for new users</TD><TD>");
 240                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 241                                 wprintf("</TD></TR>\n");
 242                         }
 243                         else {
 244                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_regiscall\" VALUE=\"%s\">", buf);
 245                         }
 246                         break;
 247                 case 9:
 248                         if (!strcasecmp(whichmenu, "access")) {
 249                                 wprintf("<TR><TD>Quarantine messages from problem users</TD><TD>");
 250                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 251                                 wprintf("</TD></TR>\n");
 252                         }
 253                         else {
 254                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitdetect\" VALUE=\"%s\">", buf);
 255                         }
 256                         break;
 257                 case 10:
 258                         if (!strcasecmp(whichmenu, "access")) {
 259                                 wprintf("<TR><TD>Name of quarantine room</TD><TD>");
 260                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 261                                 wprintf("</TD></TR>\n");
 262                         }
 263                         else {
 264                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitroom\" VALUE=\"%s\">", buf);
 265                         }
 266                         break;
 267                 case 11:
 268                         if (!strcasecmp(whichmenu, "general")) {
 269                                 wprintf("<TR><TD>Paginator prompt (for text mode clients)</TD><TD>");
 270                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
 271                                 wprintf("</TD></TR>\n");
 272                         }
 273                         else {
 274                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_moreprompt\" VALUE=\"%s\">", buf);
 275                         }
 276                         break;
 277                 case 12:
 278                         if (!strcasecmp(whichmenu, "access")) {
 279                                 wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
 280                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 281                                 wprintf("</TD></TR>\n");
 282                         }
 283                         else {
 284                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_restrict\" VALUE=\"%s\">", buf);
 285                         }
 286                         break;
 287                 case 13:
 288                         if (!strcasecmp(whichmenu, "general")) {
 289                                 wprintf("<TR><TD>Geographic location of this system</TD><TD>");
 290                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
 291                                 wprintf("</TD></TR>\n");
 292                         }
 293                         else {
 294                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_bbs_city\" VALUE=\"%s\">", buf);
 295                         }
 296                         break;
 297                 case 14:
 298                         if (!strcasecmp(whichmenu, "general")) {
 299                                 wprintf("<TR><TD>Name of system administrator</TD><TD>");
 300                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
 301                                 wprintf("</TD></TR>\n");
 302                         }
 303                         else {
 304                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sysadm\" VALUE=\"%s\">", buf);
 305                         }
 306                         break;
 307                 case 15:
 308                         if (!strcasecmp(whichmenu, "tuning")) {
 309                                 wprintf("<TR><TD>Maximum concurrent sessions (0 = no limit)</TD><TD>");
 310                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 311                                 wprintf("</TD></TR>\n");
 312                         }
 313                         else {
 314                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxsessions\" VALUE=\"%s\">", buf);
 315                         }
 316                         break;
 317                 case 17:
 318                         if (!strcasecmp(whichmenu, "tuning")) {
 319                                 wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
 320                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 321                                 wprintf("</TD></TR>\n");
 322                         }
 323                         else {
 324                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_userpurge\" VALUE=\"%s\">", buf);
 325                         }
 326                         break;
 327                 case 18:
 328                         if (!strcasecmp(whichmenu, "tuning")) {
 329                                 wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
 330                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 331                                 wprintf("</TD></TR>\n");
 332                         }
 333                         else {
 334                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_roompurge\" VALUE=\"%s\">", buf);
 335                         }
 336                         break;
 337                 case 19:
 338                         if (!strcasecmp(whichmenu, "access")) {
 339                                 wprintf("<TR><TD>Name of room to log pages</TD><TD>");
 340                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 341                                 wprintf("</TD></TR>\n");
 342                         }
 343                         else {
 344                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_logpages\" VALUE=\"%s\">", buf);
 345                         }
 346                         break;
 347                 case 20:
 348                         if (!strcasecmp(whichmenu, "access")) {
 349                                 wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
 350                                 wprintf("<SELECT NAME=\"c_createax\" SIZE=\"1\">\n");
 351                                 for (j=0; j<=6; ++j) {
 352                                         wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
 353                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 354                                                 j, j, axdefs[j]
 355                                         );
 356                                 }
 357                                 wprintf("</SELECT>");
 358                                 wprintf("</TD></TR>\n");
 359                         }
 360                         else {
 361                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_createax\" VALUE=\"%s\">", buf);
 362                         }
 363                         break;
 364                 case 21:
 365                         if (!strcasecmp(whichmenu, "tuning")) {
 366                                 wprintf("<TR><TD>Maximum message length</TD><TD>");
 367                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
 368                                 wprintf("</TD></TR>\n");
 369                         }
 370                         else {
 371                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxmsglen\" VALUE=\"%s\">", buf);
 372                         }
 373                         break;
 374                 case 22:
 375                         if (!strcasecmp(whichmenu, "tuning")) {
 376                                 wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
 377                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 378                                 wprintf("</TD></TR>\n");
 379                         }
 380                         else {
 381                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_min_workers\" VALUE=\"%s\">", buf);
 382                         }
 383                         break;
 384                 case 23:
 385                         if (!strcasecmp(whichmenu, "tuning")) {
 386                                 wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
 387                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 388                                 wprintf("</TD></TR>\n");
 389                         }
 390                         else {
 391                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_max_workers\" VALUE=\"%s\">", buf);
 392                         }
 393                         break;
 394                 case 24:
 395                         if (!strcasecmp(whichmenu, "network")) {
 396                                 wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
 397                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 398                                 wprintf("</TD></TR>\n");
 399                         }
 400                         else {
 401                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3_port\" VALUE=\"%s\">", buf);
 402                         }
 403                         break;
 404                 case 25:
 405                         if (!strcasecmp(whichmenu, "network")) {
 406                                 wprintf("<TR><TD>SMTP MTA port (-1 to disable)</TD><TD>");
 407                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 408                                 wprintf("</TD></TR>\n");
 409                         }
 410                         else {
 411                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtp_port\" VALUE=\"%s\">", buf);
 412                         }
 413                         break;
 414                 case 27:
 415                         if (!strcasecmp(whichmenu, "access")) {
 416                                 wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
 417                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 418                                 wprintf("</TD></TR>\n");
 419                         }
 420                         else {
 421                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_zap\" VALUE=\"%s\">", buf);
 422                         }
 423                         break;
 424                 case 28:
 425                         if (!strcasecmp(whichmenu, "network")) {
 426                                 wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
 427                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 428                                 wprintf("</TD></TR>\n");
 429                         }
 430                         else {
 431                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imap_port\" VALUE=\"%s\">", buf);
 432                         }
 433                         break;
 434                 case 29:
 435                         if (!strcasecmp(whichmenu, "network")) {
 436                                 wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
 437                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 438                                 wprintf("</TD></TR>\n");
 439                         }
 440                         else {
 441                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_net_freq\" VALUE=\"%s\">", buf);
 442                         }
 443                         break;
 444                 case 30:
 445                         if (!strcasecmp(whichmenu, "access")) {
 446                                 wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
 447                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 448                                 wprintf("</TD></TR>\n");
 449                         }
 450                         else {
 451                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_disable_newu\" VALUE=\"%s\">", buf);
 452                         }
 453                         break;
 454                 case 31:
 455                         /* niu */
 456                         break;
 457                 case 32:
 458                         if (!strcasecmp(whichmenu, "purger")) {
 459                                 wprintf("<TR><TD>Hour to run database auto-purge</TD><TD>");
 460                                 wprintf("<SELECT NAME=\"c_purge_hour\" SIZE=\"1\">\n");
 461                                 for (j=0; j<=23; ++j) {
 462                                         wprintf("<OPTION %s VALUE=\"%d\">%d:00%s</OPTION>\n",
 463                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 464                                                 j,
 465                                                 ((j == 0) ? 12 : ((j>12) ? j-12 : j)),
 466                                                 ((j >= 12) ? "pm" : "am")
 467                                         );
 468                                 }
 469                                 wprintf("</SELECT>");
 470                                 wprintf("</TD></TR>\n");
 471                         }
 472                         else {
 473                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_purge_hour\" VALUE=\"%s\">", buf);
 474                         }
 475                         break;
 476                 case 33:
 477                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
 478                                 wprintf("<TR><TD>Host name of LDAP server (blank to disable)</TD><TD>");
 479                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_host\" MAXLENGTH=\"127\" VALUE=\"%s\">", buf);
 480                                 wprintf("</TD></TR>\n");
 481                         }
 482                         else {
 483                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_host\" VALUE=\"%s\">", buf);
 484                         }
 485                         break;
 486                 case 34:
 487                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
 488                                 wprintf("<TR><TD>Port number of LDAP server (blank to disable)</TD><TD>");
 489                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_port\" MAXLENGTH=\"127\" VALUE=\"%d\">", atoi(buf));
 490                                 wprintf("</TD></TR>\n");
 491                         }
 492                         else {
 493                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_port\" VALUE=\"%d\">", atoi(buf));
 494                         }
 495                         break;
 496                 case 35:
 497                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
 498                                 wprintf("<TR><TD>Base DN</TD><TD>");
 499                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_base_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
 500                                 wprintf("</TD></TR>\n");
 501                         }
 502                         else {
 503                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_base_dn\" VALUE=\"%s\">", buf);
 504                         }
 505                         break;
 506                 case 36:
 507                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
 508                                 wprintf("<TR><TD>Bind DN</TD><TD>");
 509                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_bind_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
 510                                 wprintf("</TD></TR>\n");
 511                         }
 512                         else {
 513                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_dn\" VALUE=\"%s\">", buf);
 514                         }
 515                         break;
 516                 case 37:
 517                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
 518                                 wprintf("<TR><TD>Password for bind DN</TD><TD>");
 519                                 wprintf("<INPUT TYPE=\"password\" NAME=\"c_ldap_bind_pw\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
 520                                 wprintf("</TD></TR>\n");
 521                         }
 522                         else {
 523                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_pw\" VALUE=\"%s\">", buf);
 524                         }
 525                         break;
 526                 case 38:
 527                         if (!strcasecmp(whichmenu, "network")) {
 528                                 wprintf("<TR><TD>Server IP address (0.0.0.0 for 'any')</TD><TD>");
 529                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ip_addr\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 530                                 wprintf("</TD></TR>\n");
 531                         }
 532                         else {
 533                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ip_addr\" VALUE=\"%s\">", buf);
 534                         }
 535                         break;
 536                 case 39:
 537                         if (!strcasecmp(whichmenu, "network")) {
 538                                 wprintf("<TR><TD>SMTP MSA port (-1 to disable)</TD><TD>");
 539                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_msa_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 540                                 wprintf("</TD></TR>\n");
 541                         }
 542                         else {
 543                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_msa_port\" VALUE=\"%s\">", buf);
 544                         }
 545                         break;
 546                 case 40:
 547                         if (!strcasecmp(whichmenu, "network")) {
 548                                 wprintf("<TR><TD>IMAP over SSL port (-1 to disable)</TD><TD>");
 549                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_imaps_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 550                                 wprintf("</TD></TR>\n");
 551                         }
 552                         else {
 553                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imaps_port\" VALUE=\"%s\">", buf);
 554                         }
 555                         break;
 556                 case 41:
 557                         if (!strcasecmp(whichmenu, "network")) {
 558                                 wprintf("<TR><TD>POP3 over SSL port (-1 to disable)</TD><TD>");
 559                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3s_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 560                                 wprintf("</TD></TR>\n");
 561                         }
 562                         else {
 563                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3s_port\" VALUE=\"%s\">", buf);
 564                         }
 565                         break;
 566                 case 42:
 567                         if (!strcasecmp(whichmenu, "network")) {
 568                                 wprintf("<TR><TD>SMTP over SSL port (-1 to disable)</TD><TD>");
 569                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtps_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 570                                 wprintf("</TD></TR>\n");
 571                         }
 572                         else {
 573                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtps_port\" VALUE=\"%s\">", buf);
 574                         }
 575                         break;
 576                 case 43:
 577                         if (!strcasecmp(whichmenu, "general")) {
 578                                 wprintf("<TR><TD>Enable full text index (warning: resource intensive)</TD><TD>");
 579                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_enable_fulltext\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 580                                 wprintf("</TD></TR>\n");
 581                         }
 582                         else {
 583                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_enable_fulltext\" VALUE=\"%s\">", buf);
 584                         }
 585                         break;
 586                 case 44:
 587                         if (!strcasecmp(whichmenu, "tuning")) {
 588                                 wprintf("<TR><TD>Automatically delete committed database logs</TD><TD>");
 589                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_auto_cull\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 590                                 wprintf("</TD></TR>\n");
 591                         }
 592                         else {
 593                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_auto_cull\" VALUE=\"%s\">", buf);
 594                         }
 595                         break;
 596                 case 45:
 597                         if (!strcasecmp(whichmenu, "network")) {
 598                                 wprintf("<TR><TD>Instantly expunge deleted messages in IMAP</TD><TD>");
 599                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_instant_expunge\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 600                                 wprintf("</TD></TR>\n");
 601                         }
 602                         else {
 603                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_instant_expunge\" VALUE=\"%s\">", buf);
 604                         }
 605                         break;
 606                 case 46:
 607                         if (!strcasecmp(whichmenu, "network")) {
 608                                 wprintf("<TR><TD>Allow unauthenticated SMTP clients to spoof my domains</TD><TD>");
 609                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_allow_spoofing\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 610                                 wprintf("</TD></TR>\n");
 611                         }
 612                         else {
 613                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_allow_spoofing\" VALUE=\"%s\">", buf);
 614                         }
 615                         break;
 616                 }
 617         }
 618
 619         serv_puts("GPEX site");
 620         serv_getln(buf, sizeof buf);
 621         if (buf[0] == '2') {
 622                 sitepolicy = extract_int(&buf[4], 0);
 623                 sitevalue = extract_int(&buf[4], 1);
 624         }
 625
 626         serv_puts("GPEX mailboxes");
 627         serv_getln(buf, sizeof buf);
 628         if (buf[0] == '2') {
 629                 mboxpolicy = extract_int(&buf[4], 0);
 630                 mboxvalue = extract_int(&buf[4], 1);
 631         }
 632
 633         if (!strcasecmp(whichmenu, "purger")) {
 634
 635                 wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
 636
 637                 wprintf("<TR><TD>Default message expire policy for public rooms</TD><TD>");
 638                 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"1\" %s>",
 639                         ((sitepolicy == 1) ? "CHECKED" : "") );
 640                 wprintf("Never automatically expire messages<br />\n");
 641                 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"2\" %s>",
 642                         ((sitepolicy == 2) ? "CHECKED" : "") );
 643                 wprintf("Expire by message count<br />\n");
 644                 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"3\" %s>",
 645                         ((sitepolicy == 3) ? "CHECKED" : "") );
 646                 wprintf("Expire by message age<br />");
 647                 wprintf("Number of messages or days: ");
 648                 wprintf("<INPUT TYPE=\"text\" NAME=\"sitevalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", sitevalue);
 649                 wprintf("</TD></TR>\n");
 650
 651                 wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
 652
 653                 wprintf("<TR><TD>Default message expire policy for private mailboxes</TD><TD>");
 654                 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"0\" %s>",
 655                         ((mboxpolicy == 0) ? "CHECKED" : "") );
 656                 wprintf("Same policy as public rooms<br />\n");
 657                 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"1\" %s>",
 658                         ((mboxpolicy == 1) ? "CHECKED" : "") );
 659                 wprintf("Never automatically expire messages<br />\n");
 660                 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"2\" %s>",
 661                         ((mboxpolicy == 2) ? "CHECKED" : "") );
 662                 wprintf("Expire by message count<br />\n");
 663                 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"3\" %s>",
 664                         ((mboxpolicy == 3) ? "CHECKED" : "") );
 665                 wprintf("Expire by message age<br />");
 666                 wprintf("Number of messages or days: ");
 667                 wprintf("<INPUT TYPE=\"text\" NAME=\"mboxvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", mboxvalue);
 668                 wprintf("</TD></TR>\n");
 669
 670                 wprintf("<TR><TD COLSPAN=2><hr /></TD></TR>\n");
 671
 672         }
 673         else {
 674                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitepolicy\" VALUE=\"%d\">\n", sitepolicy);
 675                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitevalue\" VALUE=\"%d\">\n", sitevalue);
 676                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxpolicy\" VALUE=\"%d\">\n", mboxpolicy);
 677                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxvalue\" VALUE=\"%d\">\n", mboxvalue);
 678         }
 679
 680         wprintf("</TABLE><CENTER>");
 681         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
 682         wprintf("&nbsp;");
 683         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
 684         wprintf("</CENTER></FORM>\n");
 685         wprintf("</td></tr></table></div>\n");
 686         wDumpContent(1);
 687 }
 688
 689
 690 void siteconfig(void)
 691 {
 692         char buf[SIZ];
 693
 694         if (strcasecmp(bstr("sc"), "OK")) {
 695                 display_siteconfig();
 696                 return;
 697         }
 698         serv_printf("CONF set");
 699         serv_getln(buf, sizeof buf);
 700         if (buf[0] != '4') {
 701                 safestrncpy(WC->ImportantMessage, &buf[4], sizeof WC->ImportantMessage);
 702                 display_siteconfig();
 703                 return;
 704         }
 705         serv_printf("%s", bstr("c_nodename"));
 706         serv_printf("%s", bstr("c_fqdn"));
 707         serv_printf("%s", bstr("c_humannode"));
 708         serv_printf("%s", bstr("c_phonenum"));
 709         serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
 710         serv_printf("%s", bstr("c_sleeping"));
 711         serv_printf("%s", bstr("c_initax"));
 712         serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
 713         serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
 714         serv_printf("%s", bstr("c_twitroom"));
 715         serv_printf("%s", bstr("c_moreprompt"));
 716         serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
 717         serv_printf("%s", bstr("c_bbs_city"));
 718         serv_printf("%s", bstr("c_sysadm"));
 719         serv_printf("%s", bstr("c_maxsessions"));
 720         serv_printf("");  /* networking password -- deprecated */
 721         serv_printf("%s", bstr("c_userpurge"));
 722         serv_printf("%s", bstr("c_roompurge"));
 723         serv_printf("%s", bstr("c_logpages"));
 724         serv_printf("%s", bstr("c_createax"));
 725         serv_printf("%s", bstr("c_maxmsglen"));
 726         serv_printf("%s", bstr("c_min_workers"));
 727         serv_printf("%s", bstr("c_max_workers"));
 728         serv_printf("%s", bstr("c_pop3_port"));
 729         serv_printf("%s", bstr("c_smtp_port"));
 730         serv_printf("");  /* moderation filter level -- not yet implemented */
 731         serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
 732         serv_printf("%s", bstr("c_imap_port"));
 733         serv_printf("%s", bstr("c_net_freq"));
 734         serv_printf("%s", ((!strcasecmp(bstr("c_disable_newu"), "yes") ? "1" : "0")));
 735         serv_printf("1");
 736         serv_printf("%s", bstr("c_purge_hour"));
 737         serv_printf("%s", bstr("c_ldap_host"));
 738         serv_printf("%s", bstr("c_ldap_port"));
 739         serv_printf("%s", bstr("c_ldap_base_dn"));
 740         serv_printf("%s", bstr("c_ldap_bind_dn"));
 741         serv_printf("%s", bstr("c_ldap_bind_pw"));
 742         serv_printf("%s", bstr("c_ip_addr"));
 743         serv_printf("%s", bstr("c_msa_port"));
 744         serv_printf("%s", bstr("c_imaps_port"));
 745         serv_printf("%s", bstr("c_pop3s_port"));
 746         serv_printf("%s", bstr("c_smtps_port"));
 747         serv_printf("%s", ((!strcasecmp(bstr("c_enable_fulltext"), "yes") ? "1" : "0")));
 748         serv_printf("%s", ((!strcasecmp(bstr("c_auto_cull"), "yes") ? "1" : "0")));
 749         serv_printf("%s", ((!strcasecmp(bstr("c_instant_expunge"), "yes") ? "1" : "0")));
 750         serv_printf("%s", ((!strcasecmp(bstr("c_allow_spoofing"), "yes") ? "1" : "0")));
 751         serv_printf("000");
 752
 753         serv_printf("SPEX site|%d|%d", atoi(bstr("sitepolicy")), atoi(bstr("sitevalue")));
 754         serv_getln(buf, sizeof buf);
 755         serv_printf("SPEX mailboxes|%d|%d", atoi(bstr("mboxpolicy")), atoi(bstr("mboxvalue")));
 756         serv_getln(buf, sizeof buf);
 757
 758         safestrncpy(WC->ImportantMessage, "System configuration has been updated.",
 759                 sizeof WC->ImportantMessage);
 760         display_siteconfig();
 761 }