2 * Administrative screen for site-wide configuration
13 #include <sys/types.h>
15 #include <sys/socket.h>
18 #include <netinet/in.h>
32 void display_siteconfig(void)
38 /* expire policy settings */
46 whichmenu = bstr("whichmenu");
48 svprintf("BOXTITLE", WCS_STRING, "Site configuration");
49 do_template("beginbox");
51 if (!strcmp(whichmenu, "")) {
52 wprintf("<TABLE border=0 cellspacing=0 cellpadding=3 width=100%%>\n");
54 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
55 "<A HREF=\"/display_siteconfig?whichmenu=general\">"
56 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
57 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
59 "<A HREF=\"/display_siteconfig?whichmenu=general\">"
61 "General site configuration items"
66 "<A HREF=\"/display_siteconfig?whichmenu=access\">"
67 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
68 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
70 "<A HREF=\"/display_siteconfig?whichmenu=access\">"
72 "Access controls and site policy settings"
76 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
77 "<A HREF=\"/display_siteconfig?whichmenu=network\">"
78 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
79 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
81 "<A HREF=\"/display_siteconfig?whichmenu=network\">"
88 "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
89 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
90 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
92 "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
94 "Advanced server fine-tuning controls"
98 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
99 "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
100 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
101 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
103 "<A HREF=\"/display_siteconfig?whichmenu=ldap\">"
104 "<B>Directory</B><BR>"
105 "Configure the LDAP connector for Citadel"
110 "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
111 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
112 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
114 "<A HREF=\"/display_siteconfig?whichmenu=purger\">"
115 "<B>Auto-purger</B><BR>"
116 "Configure automatic expiry of old messages"
122 do_template("endbox");
127 if (!strcasecmp(whichmenu, "general")) {
128 wprintf("<CENTER><H2>General site configuration items</H2></CENTER>\n");
131 if (!strcasecmp(whichmenu, "access")) {
132 wprintf("<CENTER><H2>Access controls and site policy settings</H2></CENTER>\n");
135 if (!strcasecmp(whichmenu, "network")) {
136 wprintf("<CENTER><H2>Network services</H2>"
137 "Changes made on this screen will not take effect until you restart the Citadel server."
141 if (!strcasecmp(whichmenu, "tuning")) {
142 wprintf("<CENTER><H2>Advanced server fine-tuning controls</H2></CENTER>\n");
145 if (!strcasecmp(whichmenu, "ldap")) {
146 wprintf("<CENTER><H2>Citadel LDAP connector configuration</H2>"
147 "Changes made on this screen will not take effect until you restart the Citadel server."
151 if (!strcasecmp(whichmenu, "purger")) {
152 wprintf("<CENTER><H2>Message auto-purger settings</H2>"
153 "These settings may be overridden on a per-floor or per-room basis."
157 serv_printf("CONF get");
160 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
161 wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
162 wprintf("</TD></TR></TABLE><BR>\n");
163 wprintf("%s<BR>\n", &buf[4]);
164 do_template("endbox");
169 wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
170 wprintf("<TABLE border=0>\n");
173 while (serv_gets(buf), strcmp(buf, "000")) {
176 if (!strcasecmp(whichmenu, "general")) {
177 wprintf("<TR><TD>Node name</TD><TD>");
178 wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
179 wprintf("</TD></TR>\n");
182 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_nodename\" VALUE=\"%s\">", buf);
186 if (!strcasecmp(whichmenu, "general")) {
187 wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
188 wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
189 wprintf("</TD></TR>\n");
192 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_fqdn\" VALUE=\"%s\">", buf);
196 if (!strcasecmp(whichmenu, "general")) {
197 wprintf("<TR><TD>Human-readable node name</TD><TD>");
198 wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
199 wprintf("</TD></TR>\n");
202 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_humannode\" VALUE=\"%s\">", buf);
206 if (!strcasecmp(whichmenu, "general")) {
207 wprintf("<TR><TD>Landline telephone number</TD><TD>");
208 wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
209 wprintf("</TD></TR>\n");
212 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_phonenum\" VALUE=\"%s\">", buf);
216 if (!strcasecmp(whichmenu, "access")) {
217 wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
218 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
219 wprintf("</TD></TR>\n");
222 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_creataide\" VALUE=\"%s\">", buf);
226 if (!strcasecmp(whichmenu, "tuning")) {
227 wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
228 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
229 wprintf("</TD></TR>\n");
232 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sleeping\" VALUE=\"%s\">", buf);
236 if (!strcasecmp(whichmenu, "access")) {
237 wprintf("<TR><TD>Initial access level for new users</TD><TD>");
238 wprintf("<SELECT NAME=\"c_initax\" SIZE=\"1\">\n");
239 for (j=0; j<=6; ++j) {
240 wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
241 ((atoi(buf) == j) ? "SELECTED" : ""),
245 wprintf("</SELECT>");
246 wprintf("</TD></TR>\n");
249 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_initax\" VALUE=\"%s\">", buf);
253 if (!strcasecmp(whichmenu, "access")) {
254 wprintf("<TR><TD>Require registration for new users</TD><TD>");
255 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
256 wprintf("</TD></TR>\n");
259 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_regiscall\" VALUE=\"%s\">", buf);
263 if (!strcasecmp(whichmenu, "access")) {
264 wprintf("<TR><TD>Quarantine messages from problem users</TD><TD>");
265 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
266 wprintf("</TD></TR>\n");
269 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitdetect\" VALUE=\"%s\">", buf);
273 if (!strcasecmp(whichmenu, "access")) {
274 wprintf("<TR><TD>Name of quarantine room</TD><TD>");
275 wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
276 wprintf("</TD></TR>\n");
279 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitroom\" VALUE=\"%s\">", buf);
283 if (!strcasecmp(whichmenu, "general")) {
284 wprintf("<TR><TD>Paginator prompt (for text mode clients)</TD><TD>");
285 wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
286 wprintf("</TD></TR>\n");
289 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_moreprompt\" VALUE=\"%s\">", buf);
293 if (!strcasecmp(whichmenu, "access")) {
294 wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
295 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
296 wprintf("</TD></TR>\n");
299 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_restrict\" VALUE=\"%s\">", buf);
303 if (!strcasecmp(whichmenu, "general")) {
304 wprintf("<TR><TD>Geographic location of this system</TD><TD>");
305 wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
306 wprintf("</TD></TR>\n");
309 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_bbs_city\" VALUE=\"%s\">", buf);
313 if (!strcasecmp(whichmenu, "general")) {
314 wprintf("<TR><TD>Name of system administrator</TD><TD>");
315 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
316 wprintf("</TD></TR>\n");
319 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sysadm\" VALUE=\"%s\">", buf);
323 if (!strcasecmp(whichmenu, "tuning")) {
324 wprintf("<TR><TD>Maximum concurrent sessions</TD><TD>");
325 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
326 wprintf("</TD></TR>\n");
329 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxsessions\" VALUE=\"%s\">", buf);
333 if (!strcasecmp(whichmenu, "tuning")) {
334 wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
335 wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
336 wprintf("</TD></TR>\n");
339 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_userpurge\" VALUE=\"%s\">", buf);
343 if (!strcasecmp(whichmenu, "tuning")) {
344 wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
345 wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
346 wprintf("</TD></TR>\n");
349 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_roompurge\" VALUE=\"%s\">", buf);
353 if (!strcasecmp(whichmenu, "access")) {
354 wprintf("<TR><TD>Name of room to log pages</TD><TD>");
355 wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
356 wprintf("</TD></TR>\n");
359 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_logpages\" VALUE=\"%s\">", buf);
363 if (!strcasecmp(whichmenu, "access")) {
364 wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
365 wprintf("<SELECT NAME=\"c_createax\" SIZE=\"1\">\n");
366 for (j=0; j<=6; ++j) {
367 wprintf("<OPTION %s VALUE=\"%d\">%d - %s</OPTION>\n",
368 ((atoi(buf) == j) ? "SELECTED" : ""),
372 wprintf("</SELECT>");
373 wprintf("</TD></TR>\n");
376 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_createax\" VALUE=\"%s\">", buf);
380 if (!strcasecmp(whichmenu, "tuning")) {
381 wprintf("<TR><TD>Maximum message length</TD><TD>");
382 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
383 wprintf("</TD></TR>\n");
386 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxmsglen\" VALUE=\"%s\">", buf);
390 if (!strcasecmp(whichmenu, "tuning")) {
391 wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
392 wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
393 wprintf("</TD></TR>\n");
396 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_min_workers\" VALUE=\"%s\">", buf);
400 if (!strcasecmp(whichmenu, "tuning")) {
401 wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
402 wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
403 wprintf("</TD></TR>\n");
406 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_max_workers\" VALUE=\"%s\">", buf);
410 if (!strcasecmp(whichmenu, "network")) {
411 wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
412 wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
413 wprintf("</TD></TR>\n");
416 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3_port\" VALUE=\"%s\">", buf);
420 if (!strcasecmp(whichmenu, "network")) {
421 wprintf("<TR><TD>SMTP MTA port (-1 to disable)</TD><TD>");
422 wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
423 wprintf("</TD></TR>\n");
426 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtp_port\" VALUE=\"%s\">", buf);
430 if (!strcasecmp(whichmenu, "access")) {
431 wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
432 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
433 wprintf("</TD></TR>\n");
436 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_zap\" VALUE=\"%s\">", buf);
440 if (!strcasecmp(whichmenu, "network")) {
441 wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
442 wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
443 wprintf("</TD></TR>\n");
446 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imap_port\" VALUE=\"%s\">", buf);
450 if (!strcasecmp(whichmenu, "network")) {
451 wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
452 wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
453 wprintf("</TD></TR>\n");
456 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_net_freq\" VALUE=\"%s\">", buf);
460 if (!strcasecmp(whichmenu, "access")) {
461 wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
462 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
463 wprintf("</TD></TR>\n");
466 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_disable_newu\" VALUE=\"%s\">", buf);
470 /* placeholder -- there is no option 31 */
473 if (!strcasecmp(whichmenu, "tuning")) {
474 wprintf("<TR><TD>Hour to run database auto-purge</TD><TD>");
475 wprintf("<SELECT NAME=\"c_purge_hour\" SIZE=\"1\">\n");
476 for (j=0; j<=23; ++j) {
477 wprintf("<OPTION %s VALUE=\"%d\">%d:00%s</OPTION>\n",
478 ((atoi(buf) == j) ? "SELECTED" : ""),
480 ((j == 0) ? 12 : ((j>12) ? j-12 : j)),
481 ((j >= 12) ? "pm" : "am")
484 wprintf("</SELECT>");
485 wprintf("</TD></TR>\n");
488 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_purge_hour\" VALUE=\"%s\">", buf);
492 if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
493 wprintf("<TR><TD>Host name of LDAP server (blank to disable)</TD><TD>");
494 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_host\" MAXLENGTH=\"127\" VALUE=\"%s\">", buf);
495 wprintf("</TD></TR>\n");
498 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_host\" VALUE=\"%s\">", buf);
502 if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
503 wprintf("<TR><TD>Port number of LDAP server (blank to disable)</TD><TD>");
504 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_port\" MAXLENGTH=\"127\" VALUE=\"%d\">", atoi(buf));
505 wprintf("</TD></TR>\n");
508 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_port\" VALUE=\"%d\">", atoi(buf));
512 if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
513 wprintf("<TR><TD>Base DN</TD><TD>");
514 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_base_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
515 wprintf("</TD></TR>\n");
518 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_base_dn\" VALUE=\"%s\">", buf);
522 if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
523 wprintf("<TR><TD>Bind DN</TD><TD>");
524 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ldap_bind_dn\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
525 wprintf("</TD></TR>\n");
528 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_dn\" VALUE=\"%s\">", buf);
532 if ( (serv_info.serv_supports_ldap) && (!strcasecmp(whichmenu, "ldap")) ) {
533 wprintf("<TR><TD>Password for bind DN</TD><TD>");
534 wprintf("<INPUT TYPE=\"password\" NAME=\"c_ldap_bind_pw\" MAXLENGTH=\"255\" VALUE=\"%s\">", buf);
535 wprintf("</TD></TR>\n");
538 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ldap_bind_pw\" VALUE=\"%s\">", buf);
542 if (!strcasecmp(whichmenu, "network")) {
543 wprintf("<TR><TD>Server IP address (0.0.0.0 for 'any')</TD><TD>");
544 wprintf("<INPUT TYPE=\"text\" NAME=\"c_ip_addr\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
545 wprintf("</TD></TR>\n");
548 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_ip_addr\" VALUE=\"%s\">", buf);
552 if (!strcasecmp(whichmenu, "network")) {
553 wprintf("<TR><TD>SMTP MSA port (-1 to disable)</TD><TD>");
554 wprintf("<INPUT TYPE=\"text\" NAME=\"c_msa_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
555 wprintf("</TD></TR>\n");
558 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_msa_port\" VALUE=\"%s\">", buf);
564 serv_puts("GPEX site");
567 sitepolicy = extract_int(&buf[4], 0);
568 sitevalue = extract_int(&buf[4], 1);
571 serv_puts("GPEX mailboxes");
574 mboxpolicy = extract_int(&buf[4], 0);
575 mboxvalue = extract_int(&buf[4], 1);
578 if (!strcasecmp(whichmenu, "purger")) {
580 wprintf("<TR><TD COLSPAN=2><HR></TD></TR>\n");
582 wprintf("<TR><TD>Default message expire policy for public rooms</TD><TD>");
583 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"1\" %s>",
584 ((sitepolicy == 1) ? "CHECKED" : "") );
585 wprintf("Never automatically expire messages<BR>\n");
586 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"2\" %s>",
587 ((sitepolicy == 2) ? "CHECKED" : "") );
588 wprintf("Expire by message count<BR>\n");
589 wprintf("<INPUT TYPE=\"radio\" NAME=\"sitepolicy\" VALUE=\"3\" %s>",
590 ((sitepolicy == 3) ? "CHECKED" : "") );
591 wprintf("Expire by message age<BR>");
592 wprintf("Number of messages or days: ");
593 wprintf("<INPUT TYPE=\"text\" NAME=\"sitevalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", sitevalue);
594 wprintf("</TD></TR>\n");
596 wprintf("<TR><TD COLSPAN=2><HR></TD></TR>\n");
598 wprintf("<TR><TD>Default message expire policy for private mailboxes</TD><TD>");
599 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"0\" %s>",
600 ((mboxpolicy == 0) ? "CHECKED" : "") );
601 wprintf("Same policy as public rooms<BR>\n");
602 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"1\" %s>",
603 ((mboxpolicy == 1) ? "CHECKED" : "") );
604 wprintf("Never automatically expire messages<BR>\n");
605 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"2\" %s>",
606 ((mboxpolicy == 2) ? "CHECKED" : "") );
607 wprintf("Expire by message count<BR>\n");
608 wprintf("<INPUT TYPE=\"radio\" NAME=\"mboxpolicy\" VALUE=\"3\" %s>",
609 ((mboxpolicy == 3) ? "CHECKED" : "") );
610 wprintf("Expire by message age<BR>");
611 wprintf("Number of messages or days: ");
612 wprintf("<INPUT TYPE=\"text\" NAME=\"mboxvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", mboxvalue);
613 wprintf("</TD></TR>\n");
615 wprintf("<TR><TD COLSPAN=2><HR></TD></TR>\n");
619 wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitepolicy\" VALUE=\"%d\">\n", sitepolicy);
620 wprintf("<INPUT TYPE=\"hidden\" NAME=\"sitevalue\" VALUE=\"%d\">\n", sitevalue);
621 wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxpolicy\" VALUE=\"%d\">\n", mboxpolicy);
622 wprintf("<INPUT TYPE=\"hidden\" NAME=\"mboxvalue\" VALUE=\"%d\">\n", mboxvalue);
625 wprintf("</TABLE><CENTER>");
626 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
628 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
629 wprintf("</CENTER></FORM>\n");
630 do_template("endbox");
635 void siteconfig(void)
639 if (strcasecmp(bstr("sc"), "OK")) {
640 display_siteconfig();
643 serv_printf("CONF set");
646 strcpy(WC->ImportantMessage, &buf[4]);
647 display_siteconfig();
650 serv_printf("%s", bstr("c_nodename"));
651 serv_printf("%s", bstr("c_fqdn"));
652 serv_printf("%s", bstr("c_humannode"));
653 serv_printf("%s", bstr("c_phonenum"));
654 serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
655 serv_printf("%s", bstr("c_sleeping"));
656 serv_printf("%s", bstr("c_initax"));
657 serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
658 serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
659 serv_printf("%s", bstr("c_twitroom"));
660 serv_printf("%s", bstr("c_moreprompt"));
661 serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
662 serv_printf("%s", bstr("c_bbs_city"));
663 serv_printf("%s", bstr("c_sysadm"));
664 serv_printf("%s", bstr("c_maxsessions"));
665 serv_printf(""); /* networking password -- deprecated */
666 serv_printf("%s", bstr("c_userpurge"));
667 serv_printf("%s", bstr("c_roompurge"));
668 serv_printf("%s", bstr("c_logpages"));
669 serv_printf("%s", bstr("c_createax"));
670 serv_printf("%s", bstr("c_maxmsglen"));
671 serv_printf("%s", bstr("c_min_workers"));
672 serv_printf("%s", bstr("c_max_workers"));
673 serv_printf("%s", bstr("c_pop3_port"));
674 serv_printf("%s", bstr("c_smtp_port"));
675 serv_printf(""); /* moderation filter level -- not yet implemented */
676 serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
677 serv_printf("%s", bstr("c_imap_port"));
678 serv_printf("%s", bstr("c_net_freq"));
679 serv_printf("%s", ((!strcasecmp(bstr("c_disable_newu"), "yes") ? "1" : "0")));
680 serv_printf("1"); /* placeholder -- deprecated */
681 serv_printf("%s", bstr("c_purge_hour"));
682 serv_printf("%s", bstr("c_ldap_host"));
683 serv_printf("%s", bstr("c_ldap_port"));
684 serv_printf("%s", bstr("c_ldap_base_dn"));
685 serv_printf("%s", bstr("c_ldap_bind_dn"));
686 serv_printf("%s", bstr("c_ldap_bind_pw"));
687 serv_printf("%s", bstr("c_ip_addr"));
688 serv_printf("%s", bstr("c_msa_port"));
691 serv_printf("SPEX site|%d|%d", atoi(bstr("sitepolicy")), atoi(bstr("sitevalue")));
693 serv_printf("SPEX mailboxes|%d|%d", atoi(bstr("mboxpolicy")), atoi(bstr("mboxvalue")));
696 strcpy(WC->ImportantMessage, "System configuration has been updated.");
697 display_siteconfig();