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