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