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