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