90f274f853f93278634604f3b2aa72aa5be0aecb
[citadel.git] / 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                 "<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                 _("Push Email")
70         };
71
72         sprintf(general, "<center><h1>%s</h1><table border=\"0\">",
73                         _("General site configuration items")
74         );
75
76         sprintf(access, "<center><h1>%s</h1><table border=\"0\">",
77                         _("Access controls and site policy settings")
78         );
79
80         sprintf(network, "<center><h1>%s</h1><h2>%s</h2><table border=\"0\">",
81                         _("Network services"),
82                         _("Changes made on this screen will not take effect "
83                         "until you restart the Citadel server.")
84         );
85
86         sprintf(tuning, "<center><h1>%s</h1><table border=\"0\">",
87                         _("Advanced server fine-tuning controls")
88         );
89
90         sprintf(directory, "<center><h1>%s</h1><h2>%s</h2><table border=\"0\">",
91                         _("Configure the LDAP connector for Citadel"),
92                         (serv_info.serv_supports_ldap
93                         ?       _("Changes made on this screen will not take effect "
94                                 "until you restart the Citadel server.")
95                         :       _("NOTE: This Citadel server has been built without "
96                                 "LDAP support.  These options will have no effect.")
97                         )
98         );
99
100         sprintf(purger, "<center><h1>%s</h1><h2>%s</h2><table border=\"0\">",
101                         _("Configure automatic expiry of old messages"),
102                         _("These settings may be overridden on a per-floor or per-room basis.")
103         );
104
105         sprintf(idxjnl, "<center><h1>%s</h1><h2>%s</h2><table border=\"0\">",
106                         _("Indexing and Journaling"),
107                         _("Warning: these facilities are resource intensive.")
108         );
109         sprintf(funambol, "<center><h1>%s</h1><table border=\"0\">",
110                 _("Push Email")
111                 );
112
113         wprintf("<form method=\"post\" action=\"siteconfig\">\n");
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(&general[strlen(general)], "<TR><TD>");
532                         sprintf(&general[strlen(general)], _("Use system authentication"));
533                         sprintf(&general[strlen(general)], "</TD><TD><input type=\"checkbox\" NAME=\"c_auth_mode\" VALUE=\"yes\" %s>",
534                                 ((atoi(buf) != 0) ? "CHECKED" : ""));
535                         sprintf(&general[strlen(general)], "</TD></TR>\n");
536                         break;
537                 case 53:
538                         sprintf(&funambol[strlen(funambol)], "<TR><TD>");
539                         sprintf(&funambol[strlen(funambol)], _("Funambol server host (blank to disable)"));
540                         sprintf(&funambol[strlen(funambol)], "</TD><TD>");
541                         sprintf(&funambol[strlen(funambol)], "<input type=\"text\" NAME=\"c_funambol_host\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
542                         sprintf(&funambol[strlen(funambol)], "</TD></TR>\n");
543                         break;
544                 case 54:
545                         sprintf(&funambol[strlen(funambol)], "<TR><TD>");
546                         sprintf(&funambol[strlen(funambol)], _("Funambol server port "));
547                         sprintf(&funambol[strlen(funambol)], "</TD><TD>");
548                         sprintf(&funambol[strlen(funambol)], "<input type=\"text\" NAME=\"c_funambol_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
549                         sprintf(&funambol[strlen(funambol)], "</TD></TR>\n");
550                         break;
551                 case 55:
552                         sprintf(&funambol[strlen(funambol)], "<TR><TD>");
553                         sprintf(&funambol[strlen(funambol)], _("Funambol sync source"));
554                         sprintf(&funambol[strlen(funambol)], "</TD><TD>");
555                         sprintf(&funambol[strlen(funambol)], "<input type=\"text\" NAME=\"c_funambol_source\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
556                         sprintf(&funambol[strlen(funambol)], "</TD></TR>\n");
557                         break;
558                 case 56:
559                         sprintf(&funambol[strlen(funambol)], "<TR><TD>");
560                         sprintf(&funambol[strlen(funambol)], _("Funambol auth details (user:pass in Base64)"));
561                         sprintf(&funambol[strlen(funambol)], "</TD><TD>");
562                         sprintf(&funambol[strlen(funambol)], "<input type=\"text\" NAME=\"c_funambol_auth\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
563                         sprintf(&funambol[strlen(funambol)], "</TD></TR>\n");
564                         break;
565                 }
566         
567         }
568
569         serv_puts("GPEX site");
570         serv_getln(buf, sizeof buf);
571         if (buf[0] == '2') {
572                 sitepolicy = extract_int(&buf[4], 0);
573                 sitevalue = extract_int(&buf[4], 1);
574         }
575
576         serv_puts("GPEX mailboxes");
577         serv_getln(buf, sizeof buf);
578         if (buf[0] == '2') {
579                 mboxpolicy = extract_int(&buf[4], 0);
580                 mboxvalue = extract_int(&buf[4], 1);
581         }
582
583
584         sprintf(&purger[strlen(purger)], "<TR><TD COLSPAN=2><hr /></TD></TR>\n");
585
586         sprintf(&purger[strlen(purger)], "<TR><TD>");
587         sprintf(&purger[strlen(purger)], _("Default message expire policy for public rooms"));
588         sprintf(&purger[strlen(purger)], "</TD><TD>");
589         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"sitepolicy\" VALUE=\"1\" %s>",
590                 ((sitepolicy == 1) ? "CHECKED" : "") );
591         sprintf(&purger[strlen(purger)], _("Never automatically expire messages"));
592         sprintf(&purger[strlen(purger)], "<br />\n");
593         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"sitepolicy\" VALUE=\"2\" %s>",
594                 ((sitepolicy == 2) ? "CHECKED" : "") );
595         sprintf(&purger[strlen(purger)], _("Expire by message count"));
596         sprintf(&purger[strlen(purger)], "<br />\n");
597         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"sitepolicy\" VALUE=\"3\" %s>",
598                 ((sitepolicy == 3) ? "CHECKED" : "") );
599         sprintf(&purger[strlen(purger)], _("Expire by message age"));
600         sprintf(&purger[strlen(purger)], "<br />");
601         sprintf(&purger[strlen(purger)], _("Number of messages or days: "));
602         sprintf(&purger[strlen(purger)], "<input type=\"text\" NAME=\"sitevalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", sitevalue);
603         sprintf(&purger[strlen(purger)], "</TD></TR>\n");
604
605         sprintf(&purger[strlen(purger)], "<TR><TD COLSPAN=2><hr /></TD></TR>\n");
606
607         sprintf(&purger[strlen(purger)], "<TR><TD>");
608         sprintf(&purger[strlen(purger)], _("Default message expire policy for private mailboxes"));
609         sprintf(&purger[strlen(purger)], "</TD><TD>");
610         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"mboxpolicy\" VALUE=\"0\" %s>",
611                 ((mboxpolicy == 0) ? "CHECKED" : "") );
612         sprintf(&purger[strlen(purger)], _("Same policy as public rooms"));
613         sprintf(&purger[strlen(purger)], "<br />\n");
614         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"mboxpolicy\" VALUE=\"1\" %s>",
615                         ((mboxpolicy == 1) ? "CHECKED" : "") );
616         sprintf(&purger[strlen(purger)], _("Never automatically expire messages"));
617         sprintf(&purger[strlen(purger)], "<br />\n");
618         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"mboxpolicy\" VALUE=\"2\" %s>",
619                 ((mboxpolicy == 2) ? "CHECKED" : "") );
620         sprintf(&purger[strlen(purger)], _("Expire by message count"));
621         sprintf(&purger[strlen(purger)], "<br />\n");
622         sprintf(&purger[strlen(purger)], "<input type=\"radio\" NAME=\"mboxpolicy\" VALUE=\"3\" %s>",
623                 ((mboxpolicy == 3) ? "CHECKED" : "") );
624         sprintf(&purger[strlen(purger)], _("Expire by message age"));
625         sprintf(&purger[strlen(purger)], "<br />");
626         sprintf(&purger[strlen(purger)], _("Number of messages or days: "));
627         sprintf(&purger[strlen(purger)], "<input type=\"text\" NAME=\"mboxvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", mboxvalue);
628         sprintf(&purger[strlen(purger)], "</TD></TR>\n");
629
630         sprintf(&purger[strlen(purger)], "<TR><TD COLSPAN=2><hr /></TD></TR>\n");
631
632
633         sprintf(&general[strlen(general)], "</table>");
634         sprintf(&access[strlen(access)], "</table>");
635         sprintf(&network[strlen(network)], "</table>");
636         sprintf(&tuning[strlen(tuning)], "</table>");
637         sprintf(&directory[strlen(directory)], "</table>");
638         sprintf(&purger[strlen(purger)], "</table>");
639         sprintf(&idxjnl[strlen(idxjnl)], "</table>");
640         sprintf(&funambol[strlen(funambol)], "</table");
641
642         tabbed_dialog(8, tabnames);
643
644         begin_tab(0, 7);        client_write(general, strlen(general));          end_tab(0, 7);
645         begin_tab(1, 7);        client_write(access, strlen(access));            end_tab(1, 7);
646         begin_tab(2, 7);        client_write(network, strlen(network));          end_tab(2, 7);
647         begin_tab(3, 7);        client_write(tuning, strlen(tuning));            end_tab(3, 7);
648         begin_tab(4, 7);        client_write(directory, strlen(directory));      end_tab(4, 7);
649         begin_tab(5, 7);        client_write(purger, strlen(purger));            end_tab(5, 7);
650         begin_tab(6, 7);        client_write(idxjnl, strlen(idxjnl));            end_tab(6, 7);
651         begin_tab(7, 8);        client_write(funambol, strlen(funambol));        end_tab(7, 8);
652         wprintf("<div align=\"center\"><br>");
653         wprintf("<input type=\"submit\" NAME=\"ok_button\" VALUE=\"%s\">", _("Save changes"));
654         wprintf("&nbsp;");
655         wprintf("<input type=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">\n", _("Cancel"));
656         wprintf("</div></FORM>\n");
657         wprintf("</td></tr></table></div>\n");
658         wDumpContent(1);
659 }
660
661 /**
662  * parse siteconfig changes 
663  */
664 void siteconfig(void)
665 {
666         char buf[256];
667
668         if (strlen(bstr("ok_button")) == 0) {
669                 display_aide_menu();
670                 return;
671         }
672         serv_printf("CONF set");
673         serv_getln(buf, sizeof buf);
674         if (buf[0] != '4') {
675                 safestrncpy(WC->ImportantMessage, &buf[4], sizeof WC->ImportantMessage);
676                 display_aide_menu();
677                 return;
678         }
679         serv_printf("%s", bstr("c_nodename"));
680         serv_printf("%s", bstr("c_fqdn"));
681         serv_printf("%s", bstr("c_humannode"));
682         serv_printf("%s", bstr("c_phonenum"));
683         serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
684         serv_printf("%s", bstr("c_sleeping"));
685         serv_printf("%s", bstr("c_initax"));
686         serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
687         serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
688         serv_printf("%s", bstr("c_twitroom"));
689         serv_printf("%s", bstr("c_moreprompt"));
690         serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
691         serv_printf("%s", bstr("c_bbs_city"));
692         serv_printf("%s", bstr("c_sysadm"));
693         serv_printf("%s", bstr("c_maxsessions"));
694         serv_printf("");  /* placeholder - this field is not in use */
695         serv_printf("%s", bstr("c_userpurge"));
696         serv_printf("%s", bstr("c_roompurge"));
697         serv_printf("%s", bstr("c_logpages"));
698         serv_printf("%s", bstr("c_createax"));
699         serv_printf("%s", bstr("c_maxmsglen"));
700         serv_printf("%s", bstr("c_min_workers"));
701         serv_printf("%s", bstr("c_max_workers"));
702         serv_printf("%s", bstr("c_pop3_port"));
703         serv_printf("%s", bstr("c_smtp_port"));
704         serv_printf("%s", ((!strcasecmp(bstr("c_rfc822_strict_from"), "yes") ? "0" : "1"))); /* note: reverse bool */
705         serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
706         serv_printf("%s", bstr("c_imap_port"));
707         serv_printf("%s", bstr("c_net_freq"));
708         serv_printf("%s", ((!strcasecmp(bstr("c_disable_newu"), "yes") ? "1" : "0")));
709         serv_printf("1"); /* placeholder - this field is not in use */
710         serv_printf("%s", bstr("c_purge_hour"));
711         serv_printf("%s", bstr("c_ldap_host"));
712         serv_printf("%s", bstr("c_ldap_port"));
713         serv_printf("%s", bstr("c_ldap_base_dn"));
714         serv_printf("%s", bstr("c_ldap_bind_dn"));
715         serv_printf("%s", bstr("c_ldap_bind_pw"));
716         serv_printf("%s", bstr("c_ip_addr"));
717         serv_printf("%s", bstr("c_msa_port"));
718         serv_printf("%s", bstr("c_imaps_port"));
719         serv_printf("%s", bstr("c_pop3s_port"));
720         serv_printf("%s", bstr("c_smtps_port"));
721         serv_printf("%s", ((!strcasecmp(bstr("c_enable_fulltext"), "yes") ? "1" : "0")));
722         serv_printf("%s", ((!strcasecmp(bstr("c_auto_cull"), "yes") ? "1" : "0")));
723         serv_printf("%s", ((!strcasecmp(bstr("c_instant_expunge"), "yes") ? "1" : "0")));
724         serv_printf("%s", ((!strcasecmp(bstr("c_allow_spoofing"), "yes") ? "1" : "0")));
725         serv_printf("%s", ((!strcasecmp(bstr("c_journal_email"), "yes") ? "1" : "0")));
726         serv_printf("%s", ((!strcasecmp(bstr("c_journal_pubmsgs"), "yes") ? "1" : "0")));
727         serv_printf("%s", bstr("c_journal_dest"));
728         serv_printf("%s", bstr("c_default_cal_zone"));
729         serv_printf("%s", bstr("c_pftcpdict_port"));
730         serv_printf("%s", bstr("c_mgesve_port"));
731         serv_printf("%s", ((!strcasecmp(bstr("c_auth_mode"), "yes") ? "1" : "0")));
732         serv_printf("%s", bstr("c_funambol_host"));
733         serv_printf("%s", bstr("c_funambol_port"));
734         serv_printf("%s", bstr("c_funambol_source"));
735         serv_printf("%s", bstr("c_funambol_auth"));
736         serv_printf("000");
737
738         serv_printf("SPEX site|%d|%d", atoi(bstr("sitepolicy")), atoi(bstr("sitevalue")));
739         serv_getln(buf, sizeof buf);
740         serv_printf("SPEX mailboxes|%d|%d", atoi(bstr("mboxpolicy")), atoi(bstr("mboxvalue")));
741         serv_getln(buf, sizeof buf);
742
743         strcpy(serv_info.serv_default_cal_zone, bstr("c_default_cal_zone"));
744
745         safestrncpy(WC->ImportantMessage, _("Your system configuration has been updated."),
746                 sizeof WC->ImportantMessage);
747         display_aide_menu();
748 }
749
750
751 /*@}*/