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)
40 whichmenu = bstr("whichmenu");
42 svprintf("BOXTITLE", WCS_STRING, "Site configuration");
43 do_template("beginbox");
45 if (!strcmp(whichmenu, "")) {
46 wprintf("<TABLE border=0 cellspacing=0 cellpadding=3 width=100%%>\n");
48 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
50 "<A HREF=\"/display_siteconfig?whichmenu=general\">"
51 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
52 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
54 "<A HREF=\"/display_siteconfig?whichmenu=general\">"
56 "General site configuration items"
62 "<A HREF=\"/display_siteconfig?whichmenu=access\">"
63 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
64 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
66 "<A HREF=\"/display_siteconfig?whichmenu=access\">"
68 "Access controls and site policy settings"
72 wprintf("<TR BGCOLOR=\"#CCCCCC\"><TD>"
74 "<A HREF=\"/display_siteconfig?whichmenu=network\">"
75 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
76 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
78 "<A HREF=\"/display_siteconfig?whichmenu=network\">"
86 "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
87 "<IMG BORDER=\"0\" WIDTH=\"48\" HEIGHT=\"48\" "
88 "SRC=\"/static/advanced-icon.gif\" ALT=\" \">"
90 "<A HREF=\"/display_siteconfig?whichmenu=tuning\">"
92 "Advanced server fine-tuning controls"
98 do_template("endbox");
103 if (!strcasecmp(whichmenu, "general")) {
104 wprintf("<CENTER><H2>General site configuration items</H2></CENTER>\n");
107 if (!strcasecmp(whichmenu, "access")) {
108 wprintf("<CENTER><H2>Access controls and site policy settings</H2></CENTER>\n");
111 if (!strcasecmp(whichmenu, "network")) {
112 wprintf("<CENTER><H2>Network services</H2></CENTER>\n");
115 if (!strcasecmp(whichmenu, "tuning")) {
116 wprintf("<CENTER><H2>Advanced server fine-tuning controls</H2></CENTER>\n");
119 serv_printf("CONF get");
122 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#770000\"><TR><TD>");
123 wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
124 wprintf("</TD></TR></TABLE><BR>\n");
125 wprintf("%s<BR>\n", &buf[4]);
126 do_template("endbox");
132 wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
133 wprintf("<TABLE border=0>\n");
136 while (serv_gets(buf), strcmp(buf, "000")) {
139 if (!strcasecmp(whichmenu, "general")) {
140 wprintf("<TR><TD>Node name</TD><TD>");
141 wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
142 wprintf("</TD></TR>\n");
145 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_nodename\" VALUE=\"%s\">", buf);
149 if (!strcasecmp(whichmenu, "general")) {
150 wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
151 wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
152 wprintf("</TD></TR>\n");
155 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_fqdn\" VALUE=\"%s\">", buf);
159 if (!strcasecmp(whichmenu, "general")) {
160 wprintf("<TR><TD>Human-readable node name</TD><TD>");
161 wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
162 wprintf("</TD></TR>\n");
165 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_humannode\" VALUE=\"%s\">", buf);
169 if (!strcasecmp(whichmenu, "general")) {
170 wprintf("<TR><TD>Landline telephone number</TD><TD>");
171 wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
172 wprintf("</TD></TR>\n");
175 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_phonenum\" VALUE=\"%s\">", buf);
179 if (!strcasecmp(whichmenu, "access")) {
180 wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
181 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
182 wprintf("</TD></TR>\n");
185 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_creataide\" VALUE=\"%s\">", buf);
189 if (!strcasecmp(whichmenu, "tuning")) {
190 wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
191 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
192 wprintf("</TD></TR>\n");
195 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sleeping\" VALUE=\"%s\">", buf);
199 if (!strcasecmp(whichmenu, "access")) {
200 wprintf("<TR><TD>Initial access level for new users</TD><TD>");
201 wprintf("<INPUT TYPE=\"text\" NAME=\"c_initax\" MAXLENGTH=\"1\" VALUE=\"%s\">", buf);
202 wprintf("</TD></TR>\n");
205 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_initax\" VALUE=\"%s\">", buf);
209 if (!strcasecmp(whichmenu, "access")) {
210 wprintf("<TR><TD>Require registration for new users</TD><TD>");
211 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
212 wprintf("</TD></TR>\n");
215 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_regiscall\" VALUE=\"%s\">", buf);
219 if (!strcasecmp(whichmenu, "access")) {
220 wprintf("<TR><TD>Quarantine messages from problem users</TD><TD>");
221 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
222 wprintf("</TD></TR>\n");
225 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitdetect\" VALUE=\"%s\">", buf);
229 if (!strcasecmp(whichmenu, "access")) {
230 wprintf("<TR><TD>Name of quarantine room</TD><TD>");
231 wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
232 wprintf("</TD></TR>\n");
235 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_twitroom\" VALUE=\"%s\">", buf);
239 if (!strcasecmp(whichmenu, "general")) {
240 wprintf("<TR><TD>Paginator prompt (for text mode clients)</TD><TD>");
241 wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
242 wprintf("</TD></TR>\n");
245 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_moreprompt\" VALUE=\"%s\">", buf);
249 if (!strcasecmp(whichmenu, "access")) {
250 wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
251 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
252 wprintf("</TD></TR>\n");
255 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_restrict\" VALUE=\"%s\">", buf);
259 if (!strcasecmp(whichmenu, "general")) {
260 wprintf("<TR><TD>Geographic location of this system</TD><TD>");
261 wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
262 wprintf("</TD></TR>\n");
265 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_bbs_city\" VALUE=\"%s\">", buf);
269 if (!strcasecmp(whichmenu, "general")) {
270 wprintf("<TR><TD>Name of system administrator</TD><TD>");
271 wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
272 wprintf("</TD></TR>\n");
275 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_sysadm\" VALUE=\"%s\">", buf);
279 if (!strcasecmp(whichmenu, "tuning")) {
280 wprintf("<TR><TD>Maximum concurrent sessions</TD><TD>");
281 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
282 wprintf("</TD></TR>\n");
285 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxsessions\" VALUE=\"%s\">", buf);
289 if (!strcasecmp(whichmenu, "tuning")) {
290 wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
291 wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
292 wprintf("</TD></TR>\n");
295 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_userpurge\" VALUE=\"%s\">", buf);
299 if (!strcasecmp(whichmenu, "tuning")) {
300 wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
301 wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
302 wprintf("</TD></TR>\n");
305 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_roompurge\" VALUE=\"%s\">", buf);
309 if (!strcasecmp(whichmenu, "access")) {
310 wprintf("<TR><TD>Name of room to log pages</TD><TD>");
311 wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
312 wprintf("</TD></TR>\n");
315 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_logpages\" VALUE=\"%s\">", buf);
319 if (!strcasecmp(whichmenu, "access")) {
320 wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
321 wprintf("<INPUT TYPE=\"text\" NAME=\"c_createax\" MAXLENGTH=\"1\" VALUE=\"%s\">", buf);
322 wprintf("</TD></TR>\n");
325 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_createax\" VALUE=\"%s\">", buf);
329 if (!strcasecmp(whichmenu, "tuning")) {
330 wprintf("<TR><TD>Maximum message length</TD><TD>");
331 wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
332 wprintf("</TD></TR>\n");
335 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_maxmsglen\" VALUE=\"%s\">", buf);
339 if (!strcasecmp(whichmenu, "tuning")) {
340 wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
341 wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
342 wprintf("</TD></TR>\n");
345 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_min_workers\" VALUE=\"%s\">", buf);
349 if (!strcasecmp(whichmenu, "tuning")) {
350 wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
351 wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
352 wprintf("</TD></TR>\n");
355 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_max_workers\" VALUE=\"%s\">", buf);
359 if (!strcasecmp(whichmenu, "network")) {
360 wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
361 wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
362 wprintf("</TD></TR>\n");
365 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_pop3_port\" VALUE=\"%s\">", buf);
369 if (!strcasecmp(whichmenu, "network")) {
370 wprintf("<TR><TD>SMTP listener port (-1 to disable)</TD><TD>");
371 wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
372 wprintf("</TD></TR>\n");
375 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_smtp_port\" VALUE=\"%s\">", buf);
379 if (!strcasecmp(whichmenu, "access")) {
380 wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
381 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
382 wprintf("</TD></TR>\n");
385 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_zap\" VALUE=\"%s\">", buf);
389 if (!strcasecmp(whichmenu, "network")) {
390 wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
391 wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
392 wprintf("</TD></TR>\n");
395 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_imap_port\" VALUE=\"%s\">", buf);
399 if (!strcasecmp(whichmenu, "network")) {
400 wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
401 wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
402 wprintf("</TD></TR>\n");
405 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_net_freq\" VALUE=\"%s\">", buf);
409 if (!strcasecmp(whichmenu, "access")) {
410 wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
411 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
412 wprintf("</TD></TR>\n");
415 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_disable_newu\" VALUE=\"%s\">", buf);
419 if (!strcasecmp(whichmenu, "access")) {
420 wprintf("<TR><TD>Allow system Aides access to mailboxes</TD><TD>");
421 wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_mailboxes\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
422 wprintf("</TD></TR>\n");
425 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_aide_mailboxes\" VALUE=\"%s\">", buf);
429 if (!strcasecmp(whichmenu, "tuning")) {
430 wprintf("<TR><TD>Hour to run database auto-purge (0-23)</TD><TD>");
431 wprintf("<INPUT TYPE=\"text\" NAME=\"c_purge_hour\" MAXLENGTH=\"2\" VALUE=\"%s\">", buf);
432 wprintf("</TD></TR>\n");
435 wprintf("<INPUT TYPE=\"hidden\" NAME=\"c_purge_hour\" VALUE=\"%s\">", buf);
441 wprintf("</TABLE><CENTER>");
442 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
443 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
444 wprintf("</CENTER></FORM>\n");
445 do_template("endbox");
450 void siteconfig(void)
454 if (strcasecmp(bstr("sc"), "OK")) {
455 display_siteconfig();
458 serv_printf("CONF set");
461 strcpy(WC->ImportantMessage, &buf[4]);
462 display_siteconfig();
465 serv_printf("%s", bstr("c_nodename"));
466 serv_printf("%s", bstr("c_fqdn"));
467 serv_printf("%s", bstr("c_humannode"));
468 serv_printf("%s", bstr("c_phonenum"));
469 serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
470 serv_printf("%s", bstr("c_sleeping"));
471 serv_printf("%s", bstr("c_initax"));
472 serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
473 serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
474 serv_printf("%s", bstr("c_twitroom"));
475 serv_printf("%s", bstr("c_moreprompt"));
476 serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
477 serv_printf("%s", bstr("c_bbs_city"));
478 serv_printf("%s", bstr("c_sysadm"));
479 serv_printf("%s", bstr("c_maxsessions"));
480 serv_printf(""); /* networking password -- deprecated */
481 serv_printf("%s", bstr("c_userpurge"));
482 serv_printf("%s", bstr("c_roompurge"));
483 serv_printf("%s", bstr("c_logpages"));
484 serv_printf("%s", bstr("c_createax"));
485 serv_printf("%s", bstr("c_maxmsglen"));
486 serv_printf("%s", bstr("c_min_workers"));
487 serv_printf("%s", bstr("c_max_workers"));
488 serv_printf("%s", bstr("c_pop3_port"));
489 serv_printf("%s", bstr("c_smtp_port"));
490 serv_printf(""); /* moderation filter level -- not yet implemented */
491 serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
492 serv_printf("%s", bstr("c_imap_port"));
493 serv_printf("%s", bstr("c_net_freq"));
494 serv_printf("%s", bstr("c_disable_newu"));
495 serv_printf("%s", bstr("c_aide_mailboxes"));
496 serv_printf("%s", bstr("c_purge_hour"));
498 strcpy(WC->ImportantMessage, "System configuration has been updated.");
499 display_siteconfig();