dbe743ecf84b042c2b1ab369e434101180389e52
[citadel.git] / webcit / siteconfig.c
1 /*
2  * Administrative screen for site-wide configuration
3  *
4  */
5
6
7 #include <ctype.h>
8 #include <stdlib.h>
9 #include <unistd.h>
10 #include <stdio.h>
11 #include <fcntl.h>
12 #include <signal.h>
13 #include <sys/types.h>
14 #include <sys/wait.h>
15 #include <sys/socket.h>
16 #include <sys/time.h>
17 #include <limits.h>
18 #include <netinet/in.h>
19 #include <netdb.h>
20 #include <string.h>
21 #include <pwd.h>
22 #include <errno.h>
23 #include <stdarg.h>
24 #include <pthread.h>
25 #include <signal.h>
26 #include "webcit.h"
27
28
29
30
31
32 void display_siteconfig(void)
33 {
34         char buf[SIZ];
35         int i;
36
37         output_headers(3);
38
39         serv_printf("CONF get");
40         serv_gets(buf);
41         if (buf[0] != '1') {
42                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#770000\"><TR><TD>");
43                 wprintf("<SPAN CLASS=\"titlebar\">Error</SPAN>\n");
44                 wprintf("</TD></TR></TABLE><BR>\n");
45                 wprintf("%s<BR>\n", &buf[4]);
46                 wDumpContent(1);
47                 return;
48         }
49
50         svprintf("BOXTITLE", WCS_STRING, "Site configuration");
51         do_template("beginbox");
52
53         wprintf("<FORM METHOD=\"POST\" ACTION=\"/siteconfig\">\n");
54         wprintf("<TABLE border=0>\n");
55
56         i = 0;
57         while (serv_gets(buf), strcmp(buf, "000")) {
58                 switch (++i) {
59                 case 1:
60                         wprintf("<TR><TD>Node name</TD><TD>");
61                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_nodename\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
62                         wprintf("</TD></TR>\n");
63                         break;
64                 case 2:
65                         wprintf("<TR><TD>Fully qualified domain name</TD><TD>");
66                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_fqdn\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
67                         wprintf("</TD></TR>\n");
68                         break;
69                 case 3:
70                         wprintf("<TR><TD>Human-readable node name</TD><TD>");
71                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_humannode\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
72                         wprintf("</TD></TR>\n");
73                         break;
74                 case 4:
75                         wprintf("<TR><TD>Landline telephone number</TD><TD>");
76                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_phonenum\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
77                         wprintf("</TD></TR>\n");
78                         break;
79                 case 5:
80                         wprintf("<TR><TD>Automatically grant room-aide status to users who create private rooms</TD><TD>");
81                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_creataide\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
82                         wprintf("</TD></TR>\n");
83                         break;
84                 case 6:
85                         wprintf("<TR><TD>Server connection idle timeout (in seconds)</TD><TD>");
86                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_sleeping\" MAXLENGTH=\"15\" VALUE=\"%s\">", buf);
87                         wprintf("</TD></TR>\n");
88                         break;
89                 case 7:
90                         wprintf("<TR><TD>Initial access level for new users</TD><TD>");
91                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_initax\" MAXLENGTH=\"1\" VALUE=\"%s\">", buf);
92                         wprintf("</TD></TR>\n");
93                         break;
94                 case 8:
95                         wprintf("<TR><TD>Require registration for new users</TD><TD>");
96                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_regiscall\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
97                         wprintf("</TD></TR>\n");
98                         break;
99                 case 9:
100                         wprintf("<TR><TD>Move problem user messages to twitroom</TD><TD>");
101                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_twitdetect\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
102                         wprintf("</TD></TR>\n");
103                         break;
104                 case 10:
105                         wprintf("<TR><TD>Name of twitroom</TD><TD>");
106                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_twitroom\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
107                         wprintf("</TD></TR>\n");
108                         break;
109                 case 11:
110                         wprintf("<TR><TD>Paginator prompt</TD><TD>");
111                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_moreprompt\" MAXLENGTH=\"79\" VALUE=\"%s\">", buf);
112                         wprintf("</TD></TR>\n");
113                         break;
114                 case 12:
115                         wprintf("<TR><TD>Restrict access to Internet mail</TD><TD>");
116                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_restrict\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
117                         wprintf("</TD></TR>\n");
118                         break;
119                 case 13:
120                         wprintf("<TR><TD>Geographic location of this system</TD><TD>");
121                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_bbs_city\" MAXLENGTH=\"31\" VALUE=\"%s\">", buf);
122                         wprintf("</TD></TR>\n");
123                         break;
124                 case 14:
125                         wprintf("<TR><TD>Name of system administrator</TD><TD>");
126                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_sysadm\" MAXLENGTH=\"25\" VALUE=\"%s\">", buf);
127                         wprintf("</TD></TR>\n");
128                         break;
129                 case 15:
130                         wprintf("<TR><TD>Maximum concurrent sessions</TD><TD>");
131                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxsessions\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
132                         wprintf("</TD></TR>\n");
133                         break;
134
135                 case 17:
136                         wprintf("<TR><TD>Default user purge time (days)</TD><TD>");
137                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_userpurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
138                         wprintf("</TD></TR>\n");
139                         break;
140                 case 18:
141                         wprintf("<TR><TD>Default room purge time (days)</TD><TD>");
142                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_roompurge\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
143                         wprintf("</TD></TR>\n");
144                         break;
145                 case 19:
146                         wprintf("<TR><TD>Name of room to log pages</TD><TD>");
147                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_logpages\" MAXLENGTH=\"63\" VALUE=\"%s\">", buf);
148                         wprintf("</TD></TR>\n");
149                         break;
150                 case 20:
151                         wprintf("<TR><TD>Access level required to create rooms</TD><TD>");
152                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_createax\" MAXLENGTH=\"1\" VALUE=\"%s\">", buf);
153                         wprintf("</TD></TR>\n");
154                         break;
155                 case 21:
156                         wprintf("<TR><TD>Maximum message length</TD><TD>");
157                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_maxmsglen\" MAXLENGTH=\"20\" VALUE=\"%s\">", buf);
158                         wprintf("</TD></TR>\n");
159                         break;
160                 case 22:
161                         wprintf("<TR><TD>Minimum number of worker threads</TD><TD>");
162                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_min_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
163                         wprintf("</TD></TR>\n");
164                         break;
165                 case 23:
166                         wprintf("<TR><TD>Maximum number of worker threads</TD><TD>");
167                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_max_workers\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
168                         wprintf("</TD></TR>\n");
169                         break;
170                 case 24:
171                         wprintf("<TR><TD>POP3 listener port (-1 to disable)</TD><TD>");
172                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_pop3_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
173                         wprintf("</TD></TR>\n");
174                         break;
175                 case 25:
176                         wprintf("<TR><TD>SMTP listener port (-1 to disable)</TD><TD>");
177                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_smtp_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
178                         wprintf("</TD></TR>\n");
179                         break;
180                 case 27:
181                         wprintf("<TR><TD>Allow aides to zap (forget) rooms</TD><TD>");
182                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_zap\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
183                         wprintf("</TD></TR>\n");
184                         break;
185                 case 28:
186                         wprintf("<TR><TD>IMAP listener port (-1 to disable)</TD><TD>");
187                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_imap_port\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
188                         wprintf("</TD></TR>\n");
189                         break;
190                 case 29:
191                         wprintf("<TR><TD>Network run frequency (in seconds)</TD><TD>");
192                         wprintf("<INPUT TYPE=\"text\" NAME=\"c_net_freq\" MAXLENGTH=\"5\" VALUE=\"%s\">", buf);
193                         wprintf("</TD></TR>\n");
194                         break;
195                 case 30:
196                         wprintf("<TR><TD>Disable self-service user account creation</TD><TD>");
197                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_disable_newu\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
198                         wprintf("</TD></TR>\n");
199                         break;
200                 case 31:
201                         wprintf("<TR><TD>Allow system Aides access to mailboxes</TD><TD>");
202                         wprintf("<INPUT TYPE=\"checkbox\" NAME=\"c_aide_mailboxes\" VALUE=\"yes\" %s>", ((atoi(buf) != 0) ? "CHECKED" : ""));
203                         wprintf("</TD></TR>\n");
204                         break;
205                 }
206         }
207
208         wprintf("</TABLE><CENTER>");
209         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"OK\">");
210         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">\n");
211         wprintf("</CENTER></FORM>\n");
212         do_template("endbox");
213         wDumpContent(1);
214 }
215
216
217 void siteconfig(void)
218 {
219         char buf[SIZ];
220
221         if (strcasecmp(bstr("sc"), "OK")) {
222                 display_main_menu();
223                 return;
224         }
225         serv_printf("CONF set");
226         serv_gets(buf);
227         if (buf[0] != '4') {
228                 display_error(&buf[4]);
229                 return;
230         }
231         serv_printf("%s", bstr("c_nodename"));
232         serv_printf("%s", bstr("c_fqdn"));
233         serv_printf("%s", bstr("c_humannode"));
234         serv_printf("%s", bstr("c_phonenum"));
235         serv_printf("%s", ((!strcasecmp(bstr("c_creataide"), "yes") ? "1" : "0")));
236         serv_printf("%s", bstr("c_sleeping"));
237         serv_printf("%s", bstr("c_initax"));
238         serv_printf("%s", ((!strcasecmp(bstr("c_regiscall"), "yes") ? "1" : "0")));
239         serv_printf("%s", ((!strcasecmp(bstr("c_twitdetect"), "yes") ? "1" : "0")));
240         serv_printf("%s", bstr("c_twitroom"));
241         serv_printf("%s", bstr("c_moreprompt"));
242         serv_printf("%s", ((!strcasecmp(bstr("c_restrict"), "yes") ? "1" : "0")));
243         serv_printf("%s", bstr("c_bbs_city"));
244         serv_printf("%s", bstr("c_sysadm"));
245         serv_printf("%s", bstr("c_maxsessions"));
246         serv_printf("");  /* networking password -- deprecated */
247         serv_printf("%s", bstr("c_userpurge"));
248         serv_printf("%s", bstr("c_roompurge"));
249         serv_printf("%s", bstr("c_logpages"));
250         serv_printf("%s", bstr("c_createax"));
251         serv_printf("%s", bstr("c_maxmsglen"));
252         serv_printf("%s", bstr("c_min_workers"));
253         serv_printf("%s", bstr("c_max_workers"));
254         serv_printf("%s", bstr("c_pop3_port"));
255         serv_printf("%s", bstr("c_smtp_port"));
256         serv_printf("");  /* moderation filter level -- not yet implemented */
257         serv_printf("%s", ((!strcasecmp(bstr("c_aide_zap"), "yes") ? "1" : "0")));
258         serv_printf("%s", bstr("c_imap_port"));
259         serv_printf("%s", bstr("c_net_freq"));
260         serv_printf("%s", bstr("c_disable_newu"));
261         serv_printf("%s", bstr("c_aide_mailboxes"));
262         serv_printf("000");
263         display_success("System configuration has been updated.");
264 }