4 * This file contains code which relates to authentication of users to Citadel.
31 * Display the login screen
33 void display_login(char *mesg) {
36 printf("HTTP/1.0 200 OK\n");
40 wprintf("<CENTER><TABLE border=0 width=100%><TR><TD>\n");
41 wprintf("<IMG SRC=\"/image&name=hello\">");
42 wprintf("</TD><TD><CENTER>\n");
45 wprintf("<font size=+1><b>%s</b></font>", mesg);
48 serv_puts("MESG hello");
50 if (buf[0]=='1') fmout(NULL);
53 wprintf("</CENTER></TD></TR></TABLE></CENTER>\n");
57 wprintf("<CENTER><FORM ACTION=\"/login\" METHOD=\"POST\">\n");
58 wprintf("<TABLE border><TR>\n");
59 wprintf("<TD>User Name:</TD>\n");
60 wprintf("<TD><INPUT TYPE=\"text\" NAME=\"name\" MAXLENGTH=\"25\">\n");
61 wprintf("</TD></TR><TR>\n");
62 wprintf("<TD>Password:</TD>\n");
63 wprintf("<TD><INPUT TYPE=\"password\" NAME=\"pass\" MAXLENGTH=\"20\"></TD>\n");
64 wprintf("</TR></TABLE>\n");
65 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Login\">\n");
66 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"New User\">\n");
67 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Exit\">\n");
68 wprintf("</FORM></CENTER>\n");
71 wprintf("<LI><EM>If you already have an account on %s,",
72 serv_info.serv_humannode);
73 wprintf("</EM> enter your user name\n");
74 wprintf("and password and click \"<TT>Login</TT>.\"<BR>\n");
75 wprintf("<LI><EM>If you are a new user,</EM>\n");
76 wprintf("enter the name and password you wish to use, and click\n");
77 wprintf("\"New User.\"<BR><LI>");
78 wprintf("<EM>Please log off properly when finished.</EM>");
79 wprintf("<LI>You must use a browser that supports <i>frames</i> ");
80 wprintf("and <i>cookies</i>.\n");
81 wprintf("</EM></UL>\n");
83 wprintf("</BODY></HTML>\n");
91 * This function needs to get called whenever a PASS or NEWU succeeds.
93 void become_logged_in(char *user, char *pass, char *serv_response) {
95 extract(wc_username, &serv_response[4], 0);
96 strcpy(wc_password, pass);
97 axlevel = extract_int(&serv_response[4], 1);
98 if (axlevel >=6) is_aide = 1;
102 void do_login(void) {
106 if (!strcasecmp(bstr("action"), "Exit")) {
110 if (!strcasecmp(bstr("action"), "Login")) {
111 serv_printf("USER %s", bstr("name"));
114 serv_printf("PASS %s", bstr("pass"));
117 become_logged_in(bstr("name"),
121 display_login(&buf[4]);
126 display_login(&buf[4]);
131 if (!strcasecmp(bstr("action"), "New User")) {
132 serv_printf("NEWU %s", bstr("name"));
135 become_logged_in(bstr("name"), bstr("pass"), buf);
136 serv_printf("SETP %s", bstr("pass"));
140 display_login(&buf[4]);
149 need_regi = extract_int(&buf[4], 1);
150 /* FIX also check for new mail etc. here */
156 output_static("frameset.html");
160 display_login("Your password was not accepted.");
165 void do_welcome(void) {
166 printf("HTTP/1.0 200 OK\n");
168 wprintf("<CENTER><H1>");
169 escputs(wc_username);
171 /* FIX add user stats here */
174 /* FIX --- what should we put here? the main menu,
175 * or new messages in the lobby?
179 wprintf("</BODY></HTML>\n");
184 void do_logout(void) {
187 strcpy(wc_username, "");
188 strcpy(wc_password, "");
189 strcpy(wc_roomname, "");
193 printf("HTTP/1.0 200 OK\n");
194 printf("X-WebCit-Session: close\n");
198 serv_puts("MESG goodbye");
201 if (buf[0]=='1') fmout(NULL);
202 else wprintf("Goodbye\n");
204 wprintf("<HR><A HREF=\"/\">Log in again</A>\n");
205 wprintf("</CENTER></BODY></HTML>\n");
218 void validate(void) {
224 printf("HTTP/1.0 200 OK\n");
227 strcpy(buf,bstr("user"));
228 if (strlen(buf)>0) if (strlen(bstr("axlevel"))>0) {
229 serv_printf("VALI %s|%s",buf,bstr("axlevel"));
232 wprintf("<EM>%s</EM><BR>\n", &buf[4]);
240 wprintf("<EM>%s</EM><BR></BODY></HTML>\n", &buf[4]);
245 strcpy(user,&buf[4]);
246 serv_printf("GREG %s",user);
253 if (a==1) wprintf("User #%s<BR><H1>%s</H1>",
255 if (a==2) wprintf("PW: %s<BR>\n",buf);
256 if (a==3) wprintf("%s<BR>\n",buf);
257 if (a==4) wprintf("%s<BR>\n",buf);
258 if (a==5) wprintf("%s, ",buf);
259 if (a==6) wprintf("%s ",buf);
260 if (a==7) wprintf("%s<BR>\n",buf);
261 if (a==8) wprintf("%s<BR>\n",buf);
262 if (a==9) wprintf("Current access level: %d (%s)\n",
263 atoi(buf),axdefs[atoi(buf)]);
264 } while(strcmp(buf,"000"));
267 wprintf("<H1>%s</H1>%s<BR>\n",user,&cmd[4]);
270 wprintf("<CENTER><TABLE border><CAPTION>Select access level:");
271 wprintf("</CAPTION><TR>");
272 for (a=0; a<=6; ++a) {
274 "<TD><A HREF=\"/validate&user=%s&axlevel=%d\">%s</A></TD>\n",
275 urlesc(user), a, axdefs[a]);
277 wprintf("</TR></TABLE><CENTER><BR>\n");
287 * Display form for registration.
288 * (Set during_login to 1 if this registration is being performed during
289 * new user login and will require chaining to the proper screen.)
291 void display_reg(int during_login) {
295 printf("HTTP/1.0 200 OK\n");
298 wprintf("<TABLE WIDTH=100% BORDER=0 BGCOLOR=007700><TR><TD>");
299 wprintf("<FONT SIZE=+1 COLOR=\"FFFFFF\"");
300 wprintf("<B>Enter registration info</B>\n");
301 wprintf("</FONT></TD></TR></TABLE>\n");
304 serv_puts("MESG register");
306 if (buf[0]=='1') fmout(NULL);
308 wprintf("<FORM ACTION=\"/register\" METHOD=\"POST\">\n");
309 wprintf("<INPUT TYPE=\"hidden\" NAME=\"during_login\" VALUE=\"%d\">\n", during_login);
311 serv_puts("GREG _SELF_");
314 wprintf("<EM>%s</EM><BR>\n",&buf[4]);
318 wprintf("<H1>%s</H1><TABLE border>\n",&buf[4]);
320 while (serv_gets(buf), strcmp(buf,"000")) {
324 case 3: wprintf("Real Name:</TD><TD><INPUT TYPE=\"text\" NAME=\"realname\" VALUE=\"%s\" MAXLENGTH=\"29\"><BR>\n",buf);
326 case 4: wprintf("Street Address:</TD><TD><INPUT TYPE=\"text\" NAME=\"address\" VALUE=\"%s\" MAXLENGTH=\"24\"><BR>\n",buf);
328 case 5: wprintf("City/town:</TD><TD><INPUT TYPE=\"text\" NAME=\"city\" VALUE=\"%s\" MAXLENGTH=\"14\"><BR>\n",buf);
330 case 6: wprintf("State/province:</TD><TD><INPUT TYPE=\"text\" NAME=\"state\" VALUE=\"%s\" MAXLENGTH=\"2\"><BR>\n",buf);
332 case 7: wprintf("ZIP code:</TD><TD><INPUT TYPE=\"text\" NAME=\"zip\" VALUE=\"%s\" MAXLENGTH=\"10\"><BR>\n",buf);
334 case 8: wprintf("Telephone:</TD><TD><INPUT TYPE=\"text\" NAME=\"phone\" VALUE=\"%s\" MAXLENGTH=\"14\"><BR>\n",buf);
336 case 9: wprintf("E-Mail:</TD><TD><INPUT TYPE=\"text\" NAME=\"email\" VALUE=\"%s\" MAXLENGTH=\"31\"><BR>\n",buf);
339 wprintf("</TD></TR>\n");
341 wprintf("</TABLE><P>");
343 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Register\">\n");
344 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Cancel\">\n");
345 wprintf("</CENTER></BODY></HTML>\n");
352 void register_user(void) {
355 if (strcmp(bstr("action"),"Register")) {
356 display_error("Cancelled. Registration was not saved.");
363 display_error(&buf[4]);
366 serv_puts(bstr("realname"));
367 serv_puts(bstr("address"));
368 serv_puts(bstr("city"));
369 serv_puts(bstr("state"));
370 serv_puts(bstr("zip"));
371 serv_puts(bstr("phone"));
372 serv_puts(bstr("email"));
375 if (atoi(bstr("during_login"))) {
376 output_static("frameset.html");
379 display_error("Registration information has been saved.");
388 * display form for changing your password
390 void display_changepw(void) {
393 printf("HTTP/1.0 200 OK\n");
396 wprintf("<TABLE WIDTH=100% BORDER=0 BGCOLOR=770000><TR><TD>");
397 wprintf("<FONT SIZE=+1 COLOR=\"FFFFFF\"");
398 wprintf("<B>Change your password</B>\n");
399 wprintf("</FONT></TD></TR></TABLE>\n");
402 serv_puts("MESG changepw");
404 if (buf[0]=='1') fmout(NULL);
406 wprintf("<FORM ACTION=\"changepw\" METHOD=\"POST\">\n");
407 wprintf("<CENTER><TABLE border><TR><TD>Enter new password:</TD>\n");
408 wprintf("<TD><INPUT TYPE=\"password\" NAME=\"newpass1\" VALUE=\"\" MAXLENGTH=\"20\"></TD></TR>\n");
409 wprintf("<TR><TD>Enter it again to confirm:</TD>\n");
410 wprintf("<TD><INPUT TYPE=\"password\" NAME=\"newpass2\" VALUE=\"\" MAXLENGTH=\"20\"></TD></TR>\n");
411 wprintf("</TABLE>\n");
412 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Change\">\n");
413 wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Cancel\">\n");
414 wprintf("</CENTER></BODY></HTML>\n");
421 void changepw(void) {
423 char newpass1[32], newpass2[32];
425 if (strcmp(bstr("action"),"Change")) {
426 display_error("Cancelled. Password was not changed.");
430 strcpy(newpass1, bstr("newpass1"));
431 strcpy(newpass2, bstr("newpass2"));
433 if (strcasecmp(newpass1, newpass2)) {
434 display_error("They don't match. Password was not changed.");
438 serv_printf("SETP %s", newpass1);
440 if (buf[0]=='2') display_success(&buf[4]);
441 else display_error(&buf[4]);