webcit/siteconfig.c

   1 /*
   2  * Administrative screen for site-wide configuration
   3  *
   4  */
   5
   6
   7 #include <ctype.h>
   8 #include <stdlib.h>
   9 #include <unistd.h>
  10 #include <stdio.h>
  11 #include <fcntl.h>
  12 #include <signal.h>
  13 #include <sys/types.h>
  14 #include <sys/wait.h>
  15 #include <sys/socket.h>
  16 #include <sys/time.h>
  17 #include <limits.h>
  18 #include <netinet/in.h>
  19 #include <netdb.h>
  20 #include <string.h>
  21 #include <pwd.h>
  22 #include <errno.h>
  23 #include <stdarg.h>
  24 #include <pthread.h>
  25 #include <signal.h>
  26 #include "webcit.h"
  27
  28
  29
  30
  31
  32 void display_siteconfig(void)
  33 {
  34         char buf[SIZ];
  35         char *whichmenu;
  36         int i, j;
  37
  38         output_headers(3);
  39
  40         whichmenu = bstr("whichmenu");
  41
  42         svprintf("BOXTITLE", WCS_STRING, "Site configuration");
  43         do_template("beginbox");
  44
  45         if (!strcmp(whichmenu, "")) {
  46                 wprintf("<TABLE border=0 cellspacing=0 cellpadding=3 width=100%%>\n");
  47
  48                 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
  49                         "</TD><TD>"
  50                         "<A HREF=\"/display_siteconfig?whichmenu=general\">"
  51                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  52                         "SRC=\"/static/advanced-icon.gif\" ALT=\"&nbsp;\">"
  53                         "</TD><TD>"
  54                         "<A HREF=\"/display_siteconfig?whichmenu=general\">"
  55                         "<B>General</B><BR>"
  56                         "General site configuration items"
  57                         "</A></TD></TR>\n"
  58                 );
  59
  60                 wprintf("<TR><TD>"
  61                         "</TD><TD>"
  62                         "<A HREF=\"/display_siteconfig?whichmenu=access\">"
  63                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  64                         "SRC=\"/static/advanced-icon.gif\" ALT=\"&nbsp;\">"
  65                         "</TD><TD>"
  66                         "<A HREF=\"/display_siteconfig?whichmenu=access\">"
  67                         "<B>Access</B><BR>"
  68                         "Access controls and site policy settings"
  69                         "</A></TD></TR>\n"
  70                 );
  71
  72                 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
  73                         "</TD><TD>"
  74                         "<A HREF=\"/display_siteconfig?whichmenu=network\">"
  75                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  76                         "SRC=\"/static/advanced-icon.gif\" ALT=\"&nbsp;\">"
  77                         "</TD><TD>"
  78                         "<A HREF=\"/display_siteconfig?whichmenu=network\">"
  79                         "<B>Network</B><BR>"
  80                         "Network services"
  81                         "</A></TD></TR>\n"
  82                 );
  83
  84                 wprintf("<TR><TD>"
  85                         "</TD><TD>"
  86                         "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
  87                         "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
  88                         "SRC=\"/static/advanced-icon.gif\" ALT=\"&nbsp;\">"
  89                         "</TD><TD>"
  90                         "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
  91                         "<B>Tuning</B><BR>"
  92                         "Advanced server fine-tuning controls"
  93                         "</A></TD></TR>\n"
  94                 );
  95
  96                 wprintf("</TABLE>");
  97
  98                 do_template("endbox");
  99                 wDumpContent(1);
 100                 return;
 101         }
 102
 103         if (!strcasecmp(whichmenu, "general")) {
 104                 wprintf("<CENTER><H2>General site configuration items</H2></CENTER>\n");
 105         }
 106
 107         if (!strcasecmp(whichmenu, "access")) {
 108                 wprintf("<CENTER><H2>Access controls and site policy settings</H2></CENTER>\n");
 109         }
 110
 111         if (!strcasecmp(whichmenu, "network")) {
 112                 wprintf("<CENTER><H2>Network services</H2></CENTER>\n");
 113         }
 114
 115         if (!strcasecmp(whichmenu, "tuning")) {
 116                 wprintf("<CENTER><H2>Advanced server fine-tuning controls</H2></CENTER>\n");
 117         }
 118
 119         serv_printf("CONF get");
 120         serv_gets(buf);
 121         if (buf[0] != '1') {
 122                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#770000\"><TR><TD>");
 123                 wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
 124                 wprintf("</TD></TR></TABLE><BR>\n");
 125                 wprintf("%s<BR>\n", &buf[4]);
 126                 do_template("endbox");
 127                 wDumpContent(1);
 128                 return;
 129         }
 130
 131
 132         wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
 133         wprintf("<TABLE border=0>\n");
 134
 135         i = 0;
 136         while (serv_gets(buf), strcmp(buf, "000")) {
 137                 switch (++i) {
 138                 case 1:
 139                         if (!strcasecmp(whichmenu, "general")) {
 140                                 wprintf("<TR><TD>Node name</TD><TD>");
 141                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 142                                 wprintf("</TD></TR>\n");
 143                         }
 144                         else {
 145                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_nodename\" VALUE=\"%s\">", buf);
 146                         }
 147                         break;
 148                 case 2:
 149                         if (!strcasecmp(whichmenu, "general")) {
 150                                 wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
 151                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 152                                 wprintf("</TD></TR>\n");
 153                         }
 154                         else {
 155                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_fqdn\" VALUE=\"%s\">", buf);
 156                         }
 157                         break;
 158                 case 3:
 159                         if (!strcasecmp(whichmenu, "general")) {
 160                                 wprintf("<TR><TD>Human-readable node name</TD><TD>");
 161                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
 162                                 wprintf("</TD></TR>\n");
 163                         }
 164                         else {
 165                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_humannode\" VALUE=\"%s\">", buf);
 166                         }
 167                         break;
 168                 case 4:
 169                         if (!strcasecmp(whichmenu, "general")) {
 170                                 wprintf("<TR><TD>Landline telephone number</TD><TD>");
 171                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 172                                 wprintf("</TD></TR>\n");
 173                         }
 174                         else {
 175                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_phonenum\" VALUE=\"%s\">", buf);
 176                         }
 177                         break;
 178                 case 5:
 179                         if (!strcasecmp(whichmenu, "access")) {
 180                                 wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
 181                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 182                                 wprintf("</TD></TR>\n");
 183                         }
 184                         else {
 185                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_creataide\" VALUE=\"%s\">", buf);
 186                         }
 187                         break;
 188                 case 6:
 189                         if (!strcasecmp(whichmenu, "tuning")) {
 190                                 wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
 191                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
 192                                 wprintf("</TD></TR>\n");
 193                         }
 194                         else {
 195                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sleeping\" VALUE=\"%s\">", buf);
 196                         }
 197                         break;
 198                 case 7:
 199                         if (!strcasecmp(whichmenu, "access")) {
 200                                 wprintf("<TR><TD>Initial access level for new users</TD><TD>");
 201                                 wprintf("<SELECT NAME=\"c_initax\" SIZE=\"1\">\n");
 202                                 for (j=0; j<=6; ++j) {
 203                                         wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
 204                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 205                                                 j, j, axdefs[j]
 206                                         );
 207                                 }
 208                                 wprintf("</SELECT>");
 209                                 wprintf("</TD></TR>\n");
 210                         }
 211                         else {
 212                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_initax\" VALUE=\"%s\">", buf);
 213                         }
 214                         break;
 215                 case 8:
 216                         if (!strcasecmp(whichmenu, "access")) {
 217                                 wprintf("<TR><TD>Require registration for new users</TD><TD>");
 218                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 219                                 wprintf("</TD></TR>\n");
 220                         }
 221                         else {
 222                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_regiscall\" VALUE=\"%s\">", buf);
 223                         }
 224                         break;
 225                 case 9:
 226                         if (!strcasecmp(whichmenu, "access")) {
 227                                 wprintf("<TR><TD>Quarantine messages from problem users</TD><TD>");
 228                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 229                                 wprintf("</TD></TR>\n");
 230                         }
 231                         else {
 232                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitdetect\" VALUE=\"%s\">", buf);
 233                         }
 234                         break;
 235                 case 10:
 236                         if (!strcasecmp(whichmenu, "access")) {
 237                                 wprintf("<TR><TD>Name of quarantine room</TD><TD>");
 238                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 239                                 wprintf("</TD></TR>\n");
 240                         }
 241                         else {
 242                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitroom\" VALUE=\"%s\">", buf);
 243                         }
 244                         break;
 245                 case 11:
 246                         if (!strcasecmp(whichmenu, "general")) {
 247                                 wprintf("<TR><TD>Paginator prompt (for text mode clients)</TD><TD>");
 248                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
 249                                 wprintf("</TD></TR>\n");
 250                         }
 251                         else {
 252                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_moreprompt\" VALUE=\"%s\">", buf);
 253                         }
 254                         break;
 255                 case 12:
 256                         if (!strcasecmp(whichmenu, "access")) {
 257                                 wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
 258                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 259                                 wprintf("</TD></TR>\n");
 260                         }
 261                         else {
 262                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_restrict\" VALUE=\"%s\">", buf);
 263                         }
 264                         break;
 265                 case 13:
 266                         if (!strcasecmp(whichmenu, "general")) {
 267                                 wprintf("<TR><TD>Geographic location of this system</TD><TD>");
 268                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
 269                                 wprintf("</TD></TR>\n");
 270                         }
 271                         else {
 272                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_bbs_city\" VALUE=\"%s\">", buf);
 273                         }
 274                         break;
 275                 case 14:
 276                         if (!strcasecmp(whichmenu, "general")) {
 277                                 wprintf("<TR><TD>Name of system administrator</TD><TD>");
 278                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
 279                                 wprintf("</TD></TR>\n");
 280                         }
 281                         else {
 282                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sysadm\" VALUE=\"%s\">", buf);
 283                         }
 284                         break;
 285                 case 15:
 286                         if (!strcasecmp(whichmenu, "tuning")) {
 287                                 wprintf("<TR><TD>Maximum concurrent sessions</TD><TD>");
 288                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 289                                 wprintf("</TD></TR>\n");
 290                         }
 291                         else {
 292                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxsessions\" VALUE=\"%s\">", buf);
 293                         }
 294                         break;
 295                 case 17:
 296                         if (!strcasecmp(whichmenu, "tuning")) {
 297                                 wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
 298                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 299                                 wprintf("</TD></TR>\n");
 300                         }
 301                         else {
 302                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_userpurge\" VALUE=\"%s\">", buf);
 303                         }
 304                         break;
 305                 case 18:
 306                         if (!strcasecmp(whichmenu, "tuning")) {
 307                                 wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
 308                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 309                                 wprintf("</TD></TR>\n");
 310                         }
 311                         else {
 312                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_roompurge\" VALUE=\"%s\">", buf);
 313                         }
 314                         break;
 315                 case 19:
 316                         if (!strcasecmp(whichmenu, "access")) {
 317                                 wprintf("<TR><TD>Name of room to log pages</TD><TD>");
 318                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
 319                                 wprintf("</TD></TR>\n");
 320                         }
 321                         else {
 322                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_logpages\" VALUE=\"%s\">", buf);
 323                         }
 324                         break;
 325                 case 20:
 326                         if (!strcasecmp(whichmenu, "access")) {
 327                                 wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
 328                                 wprintf("<SELECT NAME=\"c_createax\" SIZE=\"1\">\n");
 329                                 for (j=0; j<=6; ++j) {
 330                                         wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
 331                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 332                                                 j, j, axdefs[j]
 333                                         );
 334                                 }
 335                                 wprintf("</SELECT>");
 336                                 wprintf("</TD></TR>\n");
 337                         }
 338                         else {
 339                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_createax\" VALUE=\"%s\">", buf);
 340                         }
 341                         break;
 342                 case 21:
 343                         if (!strcasecmp(whichmenu, "tuning")) {
 344                                 wprintf("<TR><TD>Maximum message length</TD><TD>");
 345                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
 346                                 wprintf("</TD></TR>\n");
 347                         }
 348                         else {
 349                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxmsglen\" VALUE=\"%s\">", buf);
 350                         }
 351                         break;
 352                 case 22:
 353                         if (!strcasecmp(whichmenu, "tuning")) {
 354                                 wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
 355                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 356                                 wprintf("</TD></TR>\n");
 357                         }
 358                         else {
 359                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_min_workers\" VALUE=\"%s\">", buf);
 360                         }
 361                         break;
 362                 case 23:
 363                         if (!strcasecmp(whichmenu, "tuning")) {
 364                                 wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
 365                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 366                                 wprintf("</TD></TR>\n");
 367                         }
 368                         else {
 369                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_max_workers\" VALUE=\"%s\">", buf);
 370                         }
 371                         break;
 372                 case 24:
 373                         if (!strcasecmp(whichmenu, "network")) {
 374                                 wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
 375                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 376                                 wprintf("</TD></TR>\n");
 377                         }
 378                         else {
 379                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3_port\" VALUE=\"%s\">", buf);
 380                         }
 381                         break;
 382                 case 25:
 383                         if (!strcasecmp(whichmenu, "network")) {
 384                                 wprintf("<TR><TD>SMTP listener port (-1 to disable)</TD><TD>");
 385                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 386                                 wprintf("</TD></TR>\n");
 387                         }
 388                         else {
 389                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtp_port\" VALUE=\"%s\">", buf);
 390                         }
 391                         break;
 392                 case 27:
 393                         if (!strcasecmp(whichmenu, "access")) {
 394                                 wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
 395                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 396                                 wprintf("</TD></TR>\n");
 397                         }
 398                         else {
 399                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_zap\" VALUE=\"%s\">", buf);
 400                         }
 401                         break;
 402                 case 28:
 403                         if (!strcasecmp(whichmenu, "network")) {
 404                                 wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
 405                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 406                                 wprintf("</TD></TR>\n");
 407                         }
 408                         else {
 409                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imap_port\" VALUE=\"%s\">", buf);
 410                         }
 411                         break;
 412                 case 29:
 413                         if (!strcasecmp(whichmenu, "network")) {
 414                                 wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
 415                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
 416                                 wprintf("</TD></TR>\n");
 417                         }
 418                         else {
 419                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_net_freq\" VALUE=\"%s\">", buf);
 420                         }
 421                         break;
 422                 case 30:
 423                         if (!strcasecmp(whichmenu, "access")) {
 424                                 wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
 425                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 426                                 wprintf("</TD></TR>\n");
 427                         }
 428                         else {
 429                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_disable_newu\" VALUE=\"%s\">", buf);
 430                         }
 431                         break;
 432                 case 31:
 433                         if (!strcasecmp(whichmenu, "access")) {
 434                                 wprintf("<TR><TD>Allow system Aides access to mailboxes</TD><TD>");
 435                                 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_mailboxes\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
 436                                 wprintf("</TD></TR>\n");
 437                         }
 438                         else {
 439                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_mailboxes\" VALUE=\"%s\">", buf);
 440                         }
 441                         break;
 442                 case 32:
 443                         if (!strcasecmp(whichmenu, "tuning")) {
 444                                 wprintf("<TR><TD>Hour to run database auto-purge</TD><TD>");
 445                                 wprintf("<SELECT NAME=\"c_purge_hour\" SIZE=\"1\">\n");
 446                                 for (j=0; j<=23; ++j) {
 447                                         wprintf("<OPTION %s VALUE=\"%d\">%d:00%s</OPTION>\n",
 448                                                 ((atoi(buf) == j) ? "SELECTED" : ""),
 449                                                 j,
 450                                                 ((j == 0) ? 12 : ((j>12) ? j-12 : j)),
 451                                                 ((j >= 12) ? "pm" : "am")
 452                                         );
 453                                 }
 454                                 wprintf("</SELECT>");
 455                                 wprintf("</TD></TR>\n");
 456                         }
 457                         else {
 458                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_purge_hour\" VALUE=\"%s\">", buf);
 459                         }
 460                         break;
 461                 case 33:
 462                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "network")) ) {
 463                                 wprintf("<TR><TD>Host name of LDAP server (blank to disable)</TD><TD>");
 464                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_host\" MAXLENGTH=\"127\" VALUE=\"%s\">", buf);
 465                                 wprintf("</TD></TR>\n");
 466                         }
 467                         else {
 468                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_host\" VALUE=\"%s\">", buf);
 469                         }
 470                         break;
 471                 case 34:
 472                         if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "network")) ) {
 473                                 wprintf("<TR><TD>Port number of LDAP server (blank to disable)</TD><TD>");
 474                                 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_port\" MAXLENGTH=\"127\" VALUE=\"%d\">", atoi(buf));
 475                                 wprintf("</TD></TR>\n");
 476                         }
 477                         else {
 478                                 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_port\" VALUE=\"%d\">", atoi(buf));
 479                         }
 480                         break;
 481                 }
 482         }
 483
 484         wprintf("</TABLE><CENTER>");
 485         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
 486         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
 487         wprintf("</CENTER></FORM>\n");
 488         do_template("endbox");
 489         wDumpContent(1);
 490 }
 491
 492
 493 void siteconfig(void)
 494 {
 495         char buf[SIZ];
 496
 497         if (strcasecmp(bstr("sc"), "OK")) {
 498                 display_siteconfig();
 499                 return;
 500         }
 501         serv_printf("CONF set");
 502         serv_gets(buf);
 503         if (buf[0] != '4') {
 504                 strcpy(WC->ImportantMessage, &buf[4]);
 505                 display_siteconfig();
 506                 return;
 507         }
 508         serv_printf("%s", bstr("c_nodename"));
 509         serv_printf("%s", bstr("c_fqdn"));
 510         serv_printf("%s", bstr("c_humannode"));
 511         serv_printf("%s", bstr("c_phonenum"));
 512         serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
 513         serv_printf("%s", bstr("c_sleeping"));
 514         serv_printf("%s", bstr("c_initax"));
 515         serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
 516         serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
 517         serv_printf("%s", bstr("c_twitroom"));
 518         serv_printf("%s", bstr("c_moreprompt"));
 519         serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
 520         serv_printf("%s", bstr("c_bbs_city"));
 521         serv_printf("%s", bstr("c_sysadm"));
 522         serv_printf("%s", bstr("c_maxsessions"));
 523         serv_printf("");  /* networking password -- deprecated */
 524         serv_printf("%s", bstr("c_userpurge"));
 525         serv_printf("%s", bstr("c_roompurge"));
 526         serv_printf("%s", bstr("c_logpages"));
 527         serv_printf("%s", bstr("c_createax"));
 528         serv_printf("%s", bstr("c_maxmsglen"));
 529         serv_printf("%s", bstr("c_min_workers"));
 530         serv_printf("%s", bstr("c_max_workers"));
 531         serv_printf("%s", bstr("c_pop3_port"));
 532         serv_printf("%s", bstr("c_smtp_port"));
 533         serv_printf("");  /* moderation filter level -- not yet implemented */
 534         serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
 535         serv_printf("%s", bstr("c_imap_port"));
 536         serv_printf("%s", bstr("c_net_freq"));
 537         serv_printf("%s", bstr("c_disable_newu"));
 538         serv_printf("%s", bstr("c_aide_mailboxes"));
 539         serv_printf("%s", bstr("c_purge_hour"));
 540         serv_printf("%s", bstr("c_ldap_host"));
 541         serv_printf("%s", bstr("c_ldap_port"));
 542         serv_printf("000");
 543         strcpy(WC->ImportantMessage, "System configuration has been updated.");
 544         display_siteconfig();
 545 }