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