webcit/siteconfig.c

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