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