2 * Administrative screen to add/change/delete user accounts
13 #include <sys/types.h>
15 #include <sys/socket.h>
18 #include <netinet/in.h>
27 #include "webserver.h"
33 void select_user_to_edit(char *message, char *preselect)
38 output_headers(3); /* No room banner on this screen */
40 if (message != NULL) wprintf(message);
42 wprintf("<TABLE border=0 CELLSPACING=10><TR VALIGN=TOP><TD>\n");
44 svprintf("BOXTITLE", WCS_STRING, "Edit or Delete users");
45 do_template("beginbox");
47 wprintf("To edit an existing user account, select the user "
48 "name from the list and click 'Edit'.<BR><BR>");
51 "<FORM METHOD=\"POST\" ACTION=\"/display_edituser\">\n");
52 wprintf("<SELECT NAME=\"username\" SIZE=10>\n");
56 while (serv_gets(buf), strcmp(buf, "000")) {
57 extract(username, buf, 0);
59 if (preselect != NULL)
60 if (!strcasecmp(username, preselect))
67 wprintf("</SELECT><BR>\n");
69 wprintf("<input type=submit name=sc value=\"Edit configuration\">");
70 wprintf("<input type=submit name=sc value=\"Edit address book entry\">");
71 wprintf("</FORM></CENTER>\n");
72 do_template("endbox");
76 svprintf("BOXTITLE", WCS_STRING, "Add users");
77 do_template("beginbox");
79 wprintf("To create a new user account, enter the desired "
80 "user name in the box below and click 'Create'.<BR><BR>");
82 wprintf("<CENTER><FORM METHOD=\"POST\" ACTION=\"/create_user\">\n");
83 wprintf("New user: ");
84 wprintf("<input type=text name=username><BR>\n"
85 "<input type=submit value=\"Create\">"
86 "</FORM></CENTER>\n");
88 do_template("endbox");
89 wprintf("</TD></TR></TABLE>\n");
97 * Locate the message number of a user's vCard in the current room
99 long locate_user_vcard(char *username, long usernum) {
101 long vcard_msgnum = (-1L);
102 char content_type[SIZ];
104 int already_tried_creating_one = 0;
107 struct stuff_t *next;
111 struct stuff_t *stuff = NULL;
115 /* Search for the user's vCard */
116 serv_puts("MSGS ALL");
118 if (buf[0] == '1') while (serv_gets(buf), strcmp(buf, "000")) {
119 ptr = malloc(sizeof(struct stuff_t));
120 ptr->msgnum = atol(buf);
125 /* Iterate through the message list looking for vCards */
126 while (stuff != NULL) {
127 serv_printf("MSG0 %ld|2", stuff->msgnum);
130 while(serv_gets(buf), strcmp(buf, "000")) {
131 if (!strncasecmp(buf, "part=", 5)) {
132 extract(partnum, &buf[5], 2);
133 extract(content_type, &buf[5], 4);
134 if (!strcasecmp(content_type,
136 vcard_msgnum = stuff->msgnum;
147 /* If there's no vcard, create one */
148 if (vcard_msgnum < 0) if (already_tried_creating_one == 0) {
149 already_tried_creating_one = 1;
150 serv_puts("ENT0 1|||4");
153 serv_puts("Content-type: text/x-vcard");
155 serv_puts("begin:vcard");
156 serv_puts("end:vcard");
162 return(vcard_msgnum);
167 * Display the form for editing a user's address book entry
169 void display_edit_address_book_entry(char *username, long usernum) {
172 char error_message[SIZ];
173 long vcard_msgnum = (-1L);
175 /* Locate the user's config room, creating it if necessary */
176 sprintf(roomname, "%010ld.%s", usernum, USERCONFIGROOM);
177 serv_printf("GOTO %s||1", roomname);
180 serv_printf("CRE8 1|%s|5|||1|", roomname);
182 serv_printf("GOTO %s||1", roomname);
185 sprintf(error_message,
186 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
187 "%s<BR><BR>\n", &buf[4]);
188 select_user_to_edit(error_message, username);
193 vcard_msgnum = locate_user_vcard(username, usernum);
195 if (vcard_msgnum < 0) {
196 sprintf(error_message,
197 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
198 "Could not create/edit vCard"
201 select_user_to_edit(error_message, username);
205 do_edit_vcard(vcard_msgnum, "1", "/select_user_to_edit");
212 * Edit a user. If supplied_username is null, look in the "username"
213 * web variable for the name of the user to edit.
215 * If "is_new" is set to nonzero, this screen will set the web variables
216 * to send the user to the vCard editor next.
218 void display_edituser(char *supplied_username, int is_new) {
220 char error_message[SIZ];
234 if (supplied_username != NULL) {
235 strcpy(username, supplied_username);
238 strcpy(username, bstr("username") );
241 serv_printf("AGUP %s", username);
244 sprintf(error_message,
245 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
246 "%s<BR><BR>\n", &buf[4]);
247 select_user_to_edit(error_message, username);
251 extract(username, &buf[4], 0);
252 extract(password, &buf[4], 1);
253 flags = extract_int(&buf[4], 2);
254 timescalled = extract_int(&buf[4], 3);
255 msgsposted = extract_int(&buf[4], 4);
256 axlevel = extract_int(&buf[4], 5);
257 usernum = extract_long(&buf[4], 6);
258 lastcall = extract_long(&buf[4], 7);
259 purgedays = extract_long(&buf[4], 8);
261 if (!strcmp(bstr("sc"), "Edit address book entry")) {
262 display_edit_address_book_entry(username, usernum);
266 output_headers(3); /* No room banner on this screen */
267 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#007700\"><TR><TD>");
268 wprintf("<SPAN CLASS=\"titlebar\">"
269 "Edit user account: ");
271 wprintf("</SPAN></TD></TR></TABLE>\n");
273 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edituser\">\n"
274 "<INPUT TYPE=\"hidden\" NAME=\"username\" VALUE=\"");
277 wprintf("<INPUT TYPE=\"hidden\" NAME=\"is_new\" VALUE=\"%d\">\n"
278 "<INPUT TYPE=\"hidden\" NAME=\"usernum\" VALUE=\"%ld\">\n",
281 wprintf("<INPUT TYPE=\"hidden\" NAME=\"flags\" VALUE=\"%d\">\n", flags);
283 wprintf("<CENTER><TABLE>");
285 wprintf("<TR><TD>Password</TD><TD>"
286 "<INPUT TYPE=\"password\" NAME=\"password\" VALUE=\"");
288 wprintf("\" MAXLENGTH=\"20\"></TD></TR>\n");
290 wprintf("<TR><TD>Times logged in</TD><TD>"
291 "<INPUT TYPE=\"text\" NAME=\"timescalled\" VALUE=\"");
292 wprintf("%d", timescalled);
293 wprintf("\" MAXLENGTH=\"6\"></TD></TR>\n");
295 wprintf("<TR><TD>Messages posted</TD><TD>"
296 "<INPUT TYPE=\"text\" NAME=\"msgsposted\" VALUE=\"");
297 wprintf("%d", msgsposted);
298 wprintf("\" MAXLENGTH=\"6\"></TD></TR>\n");
300 wprintf("<TR><TD>Access level</TD><TD>"
301 "<SELECT NAME=\"axlevel\">\n");
302 for (i=0; i<7; ++i) {
305 wprintf("SELECTED ");
307 wprintf("VALUE=\"%d\">%d - %s</OPTION>\n",
310 wprintf("</SELECT></TD></TR>\n");
312 wprintf("<TR><TD>User ID number</TD><TD>"
313 "<INPUT TYPE=\"text\" NAME=\"usernum\" VALUE=\"");
314 wprintf("%ld", usernum);
315 wprintf("\" MAXLENGTH=\"7\"></TD></TR>\n");
318 wprintf("<TR><TD>Date/time of last login</TD><TD>"
319 "<SELECT NAME=\"lastcall\">\n");
321 wprintf("<OPTION SELECTED VALUE=\"%ld\">", lastcall);
322 escputs(asctime(localtime(&lastcall)));
323 wprintf("</OPTION>\n");
325 wprintf("<OPTION VALUE=\"%ld\">", now);
326 escputs(asctime(localtime(&now)));
327 wprintf("</OPTION>\n");
329 wprintf("</SELECT></TD></TR>");
331 wprintf("<TR><TD>Auto-purge after days</TD><TD>"
332 "<INPUT TYPE=\"text\" NAME=\"purgedays\" VALUE=\"");
333 wprintf("%d", purgedays);
334 wprintf("\" MAXLENGTH=\"5\"></TD></TR>\n");
336 wprintf("</TABLE>\n");
338 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"OK\">\n"
339 "<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Cancel\">\n"
340 "<BR><BR></FORM>\n");
342 wprintf("</CENTER>\n");
350 void edituser(void) {
355 is_new = atoi(bstr("is_new"));
357 if (strcasecmp(bstr("action"), "OK")) {
358 strcpy(message, "Edit user cancelled.");
363 serv_printf("ASUP %s|%s|%s|%s|%s|%s|%s|%s|%s|",
377 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
378 "%s<BR><BR>\n", &buf[4]);
385 /* If we are in the middle of creating a new user, move on to
386 * the vCard edit screen.
389 display_edit_address_book_entry( bstr("username"), atol(bstr("usernum")) );
392 select_user_to_edit(message, bstr("username"));
399 void create_user(void) {
401 char error_message[SIZ];
404 strcpy(username, bstr("username"));
406 serv_printf("CREU %s", username);
410 /* sprintf(error_message, "<b>User has been created.</b>");
411 select_user_to_edit(error_message, username); */
412 display_edituser(username, 1);
415 sprintf(error_message,
416 "<IMG SRC=\"static/error.gif\" ALIGN=CENTER>"
417 "%s<BR><BR>\n", &buf[4]);
418 select_user_to_edit(error_message, NULL);