4 * Administrative screen to add/change/delete user accounts
15 #include <sys/types.h>
17 #include <sys/socket.h>
20 #include <netinet/in.h>
29 #include "webserver.h"
35 void select_user_to_edit(char *message, char *preselect)
40 output_headers(1, 1, 0, 0, 0, 0, 0); /* No room banner on this screen */
42 if (message != NULL) wprintf(message);
44 wprintf("<TABLE border=0 CELLSPACING=10><TR VALIGN=TOP><TD>\n");
46 svprintf("BOXTITLE", WCS_STRING, "Edit or Delete users");
47 do_template("beginbox");
49 wprintf("To edit an existing user account, select the user "
50 "name from the list and click 'Edit'.<br /><br />");
53 "<FORM METHOD=\"POST\" ACTION=\"/display_edituser\">\n");
54 wprintf("<SELECT NAME=\"username\" SIZE=10>\n");
58 while (serv_gets(buf), strcmp(buf, "000")) {
59 extract(username, buf, 0);
61 if (preselect != NULL)
62 if (!strcasecmp(username, preselect))
69 wprintf("</SELECT><br />\n");
71 wprintf("<input type=submit name=sc value=\"Edit configuration\">");
72 wprintf("<input type=submit name=sc value=\"Edit address book entry\">");
73 wprintf("</FORM></CENTER>\n");
74 do_template("endbox");
78 svprintf("BOXTITLE", WCS_STRING, "Add users");
79 do_template("beginbox");
81 wprintf("To create a new user account, enter the desired "
82 "user name in the box below and click 'Create'.<br /><br />");
84 wprintf("<CENTER><FORM METHOD=\"POST\" ACTION=\"/create_user\">\n");
85 wprintf("New user: ");
86 wprintf("<input type=text name=username><br />\n"
87 "<input type=submit value=\"Create\">"
88 "</FORM></CENTER>\n");
90 do_template("endbox");
91 wprintf("</TD></TR></TABLE>\n");
99 * Locate the message number of a user's vCard in the current room
101 long locate_user_vcard(char *username, long usernum) {
103 long vcard_msgnum = (-1L);
104 char content_type[SIZ];
106 int already_tried_creating_one = 0;
109 struct stuff_t *next;
113 struct stuff_t *stuff = NULL;
117 /* Search for the user's vCard */
118 serv_puts("MSGS ALL");
120 if (buf[0] == '1') while (serv_gets(buf), strcmp(buf, "000")) {
121 ptr = malloc(sizeof(struct stuff_t));
122 ptr->msgnum = atol(buf);
127 /* Iterate through the message list looking for vCards */
128 while (stuff != NULL) {
129 serv_printf("MSG0 %ld|2", stuff->msgnum);
132 while(serv_gets(buf), strcmp(buf, "000")) {
133 if (!strncasecmp(buf, "part=", 5)) {
134 extract(partnum, &buf[5], 2);
135 extract(content_type, &buf[5], 4);
136 if (!strcasecmp(content_type,
138 vcard_msgnum = stuff->msgnum;
149 /* If there's no vcard, create one */
150 if (vcard_msgnum < 0) if (already_tried_creating_one == 0) {
151 already_tried_creating_one = 1;
152 serv_puts("ENT0 1|||4");
155 serv_puts("Content-type: text/x-vcard");
157 serv_puts("begin:vcard");
158 serv_puts("end:vcard");
164 return(vcard_msgnum);
169 * Display the form for editing a user's address book entry
171 void display_edit_address_book_entry(char *username, long usernum) {
174 char error_message[SIZ];
175 long vcard_msgnum = (-1L);
177 /* Locate the user's config room, creating it if necessary */
178 sprintf(roomname, "%010ld.%s", usernum, USERCONFIGROOM);
179 serv_printf("GOTO %s||1", roomname);
182 serv_printf("CRE8 1|%s|5|||1|", roomname);
184 serv_printf("GOTO %s||1", roomname);
187 sprintf(error_message,
188 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
189 "%s<br /><br />\n", &buf[4]);
190 select_user_to_edit(error_message, username);
195 vcard_msgnum = locate_user_vcard(username, usernum);
197 if (vcard_msgnum < 0) {
198 sprintf(error_message,
199 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
200 "Could not create/edit vCard"
203 select_user_to_edit(error_message, username);
207 do_edit_vcard(vcard_msgnum, "1", "/select_user_to_edit");
214 * Edit a user. If supplied_username is null, look in the "username"
215 * web variable for the name of the user to edit.
217 * If "is_new" is set to nonzero, this screen will set the web variables
218 * to send the user to the vCard editor next.
220 void display_edituser(char *supplied_username, int is_new) {
222 char error_message[SIZ];
236 if (supplied_username != NULL) {
237 strcpy(username, supplied_username);
240 strcpy(username, bstr("username") );
243 serv_printf("AGUP %s", username);
246 sprintf(error_message,
247 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
248 "%s<br /><br />\n", &buf[4]);
249 select_user_to_edit(error_message, username);
253 extract(username, &buf[4], 0);
254 extract(password, &buf[4], 1);
255 flags = extract_int(&buf[4], 2);
256 timescalled = extract_int(&buf[4], 3);
257 msgsposted = extract_int(&buf[4], 4);
258 axlevel = extract_int(&buf[4], 5);
259 usernum = extract_long(&buf[4], 6);
260 lastcall = extract_long(&buf[4], 7);
261 purgedays = extract_long(&buf[4], 8);
263 if (!strcmp(bstr("sc"), "Edit address book entry")) {
264 display_edit_address_book_entry(username, usernum);
268 output_headers(1, 1, 2, 0, 0, 0, 0);
269 wprintf("<div id=\"banner\">\n");
270 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
271 wprintf("<SPAN CLASS=\"titlebar\">"
272 "Edit user account: ");
274 wprintf("</SPAN></TD></TR></TABLE>\n");
275 wprintf("</div>\n<div id=\"content\">\n");
277 do_template("beginbox_nt");
278 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edituser\">\n"
279 "<INPUT TYPE=\"hidden\" NAME=\"username\" VALUE=\"");
282 wprintf("<INPUT TYPE=\"hidden\" NAME=\"is_new\" VALUE=\"%d\">\n"
283 "<INPUT TYPE=\"hidden\" NAME=\"usernum\" VALUE=\"%ld\">\n",
286 wprintf("<INPUT TYPE=\"hidden\" NAME=\"flags\" VALUE=\"%d\">\n", flags);
288 wprintf("<CENTER><TABLE>");
290 wprintf("<TR><TD>Password</TD><TD>"
291 "<INPUT TYPE=\"password\" NAME=\"password\" VALUE=\"");
293 wprintf("\" MAXLENGTH=\"20\"></TD></TR>\n");
295 wprintf("<TR><TD>Times logged in</TD><TD>"
296 "<INPUT TYPE=\"text\" NAME=\"timescalled\" VALUE=\"");
297 wprintf("%d", timescalled);
298 wprintf("\" MAXLENGTH=\"6\"></TD></TR>\n");
300 wprintf("<TR><TD>Messages posted</TD><TD>"
301 "<INPUT TYPE=\"text\" NAME=\"msgsposted\" VALUE=\"");
302 wprintf("%d", msgsposted);
303 wprintf("\" MAXLENGTH=\"6\"></TD></TR>\n");
305 wprintf("<TR><TD>Access level</TD><TD>"
306 "<SELECT NAME=\"axlevel\">\n");
307 for (i=0; i<7; ++i) {
310 wprintf("SELECTED ");
312 wprintf("VALUE=\"%d\">%d - %s</OPTION>\n",
315 wprintf("</SELECT></TD></TR>\n");
317 wprintf("<TR><TD>User ID number</TD><TD>"
318 "<INPUT TYPE=\"text\" NAME=\"usernum\" VALUE=\"");
319 wprintf("%ld", usernum);
320 wprintf("\" MAXLENGTH=\"7\"></TD></TR>\n");
323 wprintf("<TR><TD>Date/time of last login</TD><TD>"
324 "<SELECT NAME=\"lastcall\">\n");
326 wprintf("<OPTION SELECTED VALUE=\"%ld\">", lastcall);
327 escputs(asctime(localtime(&lastcall)));
328 wprintf("</OPTION>\n");
330 wprintf("<OPTION VALUE=\"%ld\">", now);
331 escputs(asctime(localtime(&now)));
332 wprintf("</OPTION>\n");
334 wprintf("</SELECT></TD></TR>");
336 wprintf("<TR><TD>Auto-purge after days</TD><TD>"
337 "<INPUT TYPE=\"text\" NAME=\"purgedays\" VALUE=\"");
338 wprintf("%d", purgedays);
339 wprintf("\" MAXLENGTH=\"5\"></TD></TR>\n");
341 wprintf("</TABLE>\n");
343 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"OK\">\n"
345 "<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Cancel\">\n"
346 "<br /><br /></FORM>\n");
348 wprintf("</CENTER>\n");
349 do_template("endbox");
357 void edituser(void) {
362 is_new = atoi(bstr("is_new"));
364 if (strcasecmp(bstr("action"), "OK")) {
365 strcpy(message, "Edit user cancelled.");
370 serv_printf("ASUP %s|%s|%s|%s|%s|%s|%s|%s|%s|",
384 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
385 "%s<br /><br />\n", &buf[4]);
392 /* If we are in the middle of creating a new user, move on to
393 * the vCard edit screen.
396 display_edit_address_book_entry( bstr("username"), atol(bstr("usernum")) );
399 select_user_to_edit(message, bstr("username"));
406 void create_user(void) {
408 char error_message[SIZ];
411 strcpy(username, bstr("username"));
413 serv_printf("CREU %s", username);
417 /* sprintf(error_message, "<b>User has been created.</b>");
418 select_user_to_edit(error_message, username); */
419 display_edituser(username, 1);
422 sprintf(error_message,
423 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
424 "%s<br /><br />\n", &buf[4]);
425 select_user_to_edit(error_message, NULL);