* Replaced serv_gets() with serv_getln() - which now requires the caller
[citadel.git] / webcit / auth.c
index 34cb1af3622167e063d0a0f55b0f3dd041414cd6..06150fa1fdd341216976297eed49d2f26fb7a33d 100644 (file)
@@ -1,9 +1,8 @@
 /*
- * auth.c
+ * $Id$
  *
- * This file contains code which relates to authentication of users to Citadel.
+ * Handles authentication of users to a Citadel server.
  *
- * $Id$
  */
 
 
@@ -46,7 +45,8 @@ void display_login(char *mesg)
 {
        char buf[SIZ];
 
-       output_headers(3);
+       output_headers(1, 1, 2, 0, 0, 0, 0);
+       wprintf("<div style=\"position:absolute; top:20px; left:20px; right:20px\">\n");
 
        if (mesg != NULL) if (strlen(mesg) > 0) {
                stresc(buf, mesg, 0, 0);
@@ -59,8 +59,7 @@ void display_login(char *mesg)
 
        do_template("login");
 
-       clear_local_substs();
-       wDumpContent(0);        /* No menu here; not logged in yet! */
+       wDumpContent(2);
 }
 
 
@@ -78,7 +77,7 @@ void become_logged_in(char *user, char *pass, char *serv_response)
        char buf[SIZ];
 
        WC->logged_in = 1;
-       extract(WC->wc_username, &serv_response[4], 0);
+       extract_token(WC->wc_username, &serv_response[4], 0, '|', sizeof WC->wc_username);
        strcpy(WC->wc_password, pass);
        WC->axlevel = extract_int(&serv_response[4], 1);
        if (WC->axlevel >= 6) {
@@ -88,12 +87,12 @@ void become_logged_in(char *user, char *pass, char *serv_response)
        load_preferences();
 
        serv_puts("CHEK");
-       serv_gets(buf);
+       serv_getln(buf, sizeof buf);
        if (buf[0] == '2') {
                WC->new_mail = extract_int(&buf[4], 0);
                WC->need_regi = extract_int(&buf[4], 1);
                WC->need_vali = extract_int(&buf[4], 2);
-               extract(WC->cs_inet_email, &buf[4], 3);
+               extract_token(WC->cs_inet_email, &buf[4], 3, '|', sizeof WC->cs_inet_email);
        }
 }
 
@@ -108,10 +107,10 @@ void do_login(void)
        }
        if (!strcasecmp(bstr("action"), "Login")) {
                serv_printf("USER %s", bstr("name"));
-               serv_gets(buf);
+               serv_getln(buf, sizeof buf);
                if (buf[0] == '3') {
                        serv_printf("PASS %s", bstr("pass"));
-                       serv_gets(buf);
+                       serv_getln(buf, sizeof buf);
                        if (buf[0] == '2') {
                                become_logged_in(bstr("name"),
                                                 bstr("pass"), buf);
@@ -125,12 +124,16 @@ void do_login(void)
                }
        }
        if (!strcasecmp(bstr("action"), "New User")) {
+               if (strlen(bstr("pass")) == 0) {
+                       display_login("Blank passwords are not allowed.");
+                       return;
+               }
                serv_printf("NEWU %s", bstr("name"));
-               serv_gets(buf);
+               serv_getln(buf, sizeof buf);
                if (buf[0] == '2') {
                        become_logged_in(bstr("name"), bstr("pass"), buf);
                        serv_printf("SETP %s", bstr("pass"));
-                       serv_gets(buf);
+                       serv_getln(buf, sizeof buf);
                } else {
                        display_login(&buf[4]);
                        return;
@@ -150,18 +153,52 @@ void do_login(void)
 
 void do_welcome(void)
 {
-       char startpage[SIZ];
+       char buf[SIZ];
+#ifdef XXX_NOT_FINISHED_YET_XXX
+       FILE *fp;
+       int i;
+
+       /*
+        * See if we have to run the first-time setup wizard
+        */
+       if (WC->is_aide) {
+               if (!setup_wizard) {
+                       sprintf(wizard_filename, "setupwiz.%s.%s",
+                               ctdlhost, ctdlport);
+                       for (i=0; i<strlen(wizard_filename); ++i) {
+                               if (    (wizard_filename[i]==' ')
+                                       || (wizard_filename[i] == '/')
+                               ) {
+                                       wizard_filename[i] = '_';
+                               }
+                       }
+       
+                       fp = fopen(wizard_filename, "r");
+                       if (fp != NULL) {
+                               fgets(buf, sizeof buf, fp);
+                               buf[strlen(buf)-1] = 0;
+                               fclose(fp);
+                               if (atoi(buf) == serv_info.serv_rev_level) {
+                                       setup_wizard = 1; /* already run */
+                               }
+                       }
+               }
 
-       get_preference("startpage", startpage);
-       if (strlen(startpage)==0) {
-               strcpy(startpage, "/dotskip&room=_BASEROOM_");
-               set_preference("startpage", startpage);
+               if (!setup_wizard) {
+                       http_redirect("/setup_wizard");
+               }
        }
-
-        svprintf("STARTPAGE", WCS_STRING, startpage);
-
-        do_template("mainframeset");
-        clear_local_substs();
+#endif
+
+       /*
+        * Go to the user's preferred start page
+        */
+       get_preference("startpage", buf, sizeof buf);
+       if (strlen(buf)==0) {
+               strcpy(buf, "/dotskip&room=_BASEROOM_");
+               set_preference("startpage", buf);
+       }
+       http_redirect(buf);
 }
 
 
@@ -183,11 +220,12 @@ void do_logout(void)
        strcpy(WC->wc_password, "");
        strcpy(WC->wc_roomname, "");
 
-       output_headers(2);      /* note "2" causes cookies to be unset */
+       /* Calling output_headers() this way causes the cookies to be un-set */
+       output_headers(1, 1, 0, 1, 0, 0, 0);
 
-       wprintf("<CENTER>");
+       wprintf("<center>");
        serv_puts("MESG goodbye");
-       serv_gets(buf);
+       serv_getln(buf, sizeof buf);
 
        if (WC->serv_sock >= 0) {
                if (buf[0] == '1') {
@@ -203,15 +241,14 @@ void do_logout(void)
                );
        }
 
-       wprintf("<HR><A HREF=\"/\">Log in again</A>&nbsp;&nbsp;&nbsp;"
-               "<A HREF=\"javascript:window.close();\">Close window</A>"
-               "</CENTER>\n");
+       wprintf("<hr /><a href=\"/\">Log in again</A>&nbsp;&nbsp;&nbsp;"
+               "<a href=\"javascript:window.close();\">Close window</A>"
+               "</center>\n");
        wDumpContent(2);
        end_webcit_session();
 }
 
 
-
 /* 
  * validate new users
  */
@@ -222,75 +259,80 @@ void validate(void)
        char buf[SIZ];
        int a;
 
-       output_headers(3);
-
+       output_headers(1, 1, 2, 0, 0, 0, 0);
+       wprintf("<div id=\"banner\">\n"
+               "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
+               "<SPAN CLASS=\"titlebar\">Validate new users</SPAN>"
+               "</TD></TR></TABLE>\n"
+               "</div>\n<div id=\"content\">\n"
+       );
+                                                                                                                            
        strcpy(buf, bstr("user"));
        if (strlen(buf) > 0)
                if (strlen(bstr("axlevel")) > 0) {
                        serv_printf("VALI %s|%s", buf, bstr("axlevel"));
-                       serv_gets(buf);
+                       serv_getln(buf, sizeof buf);
                        if (buf[0] != '2') {
-                               wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+                               wprintf("<b>%s</b><br />\n", &buf[4]);
                        }
                }
        serv_puts("GNUR");
-       serv_gets(buf);
+       serv_getln(buf, sizeof buf);
 
        if (buf[0] != '3') {
-               wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+               wprintf("<b>%s</b><br />\n", &buf[4]);
                wDumpContent(1);
                return;
        }
 
-       wprintf("<CENTER>");
-       do_template("beginbox_nt");
-       wprintf("<CENTER>");
+       wprintf("<div id=\"fix_scrollbar_bug\">"
+               "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>\n");
+       wprintf("<center>");
 
        strcpy(user, &buf[4]);
        serv_printf("GREG %s", user);
-       serv_gets(cmd);
+       serv_getln(cmd, sizeof cmd);
        if (cmd[0] == '1') {
                a = 0;
                do {
-                       serv_gets(buf);
+                       serv_getln(buf, sizeof buf);
                        ++a;
                        if (a == 1)
-                               wprintf("User #%s<BR><H1>%s</H1>",
+                               wprintf("User #%s<br /><H1>%s</H1>",
                                        buf, &cmd[4]);
                        if (a == 2)
-                               wprintf("PW: %s<BR>\n", buf);
+                               wprintf("PW: %s<br />\n", buf);
                        if (a == 3)
-                               wprintf("%s<BR>\n", buf);
+                               wprintf("%s<br />\n", buf);
                        if (a == 4)
-                               wprintf("%s<BR>\n", buf);
+                               wprintf("%s<br />\n", buf);
                        if (a == 5)
                                wprintf("%s, ", buf);
                        if (a == 6)
                                wprintf("%s ", buf);
                        if (a == 7)
-                               wprintf("%s<BR>\n", buf);
+                               wprintf("%s<br />\n", buf);
                        if (a == 8)
-                               wprintf("%s<BR>\n", buf);
+                               wprintf("%s<br />\n", buf);
                        if (a == 9)
                                wprintf("Current access level: %d (%s)\n",
                                        atoi(buf), axdefs[atoi(buf)]);
                } while (strcmp(buf, "000"));
        } else {
-               wprintf("<H1>%s</H1>%s<BR>\n", user, &cmd[4]);
+               wprintf("<H1>%s</H1>%s<br />\n", user, &cmd[4]);
        }
 
-       wprintf("<HR>Select access level for this user:<BR>\n");
+       wprintf("<hr />Select access level for this user:<br />\n");
        for (a = 0; a <= 6; ++a) {
                wprintf("<A HREF=\"/validate&user=");
                urlescputs(user);
                wprintf("&axlevel=%d\">%s</A>&nbsp;&nbsp;&nbsp;\n",
                        a, axdefs[a]);
        }
-       wprintf("<BR>\n");
+       wprintf("<br />\n");
 
        wprintf("</CENTER>\n");
-       do_template("endbox");
-       wprintf("</CENTER>\n");
+       wprintf("</td></tr></table></div>\n");
        wDumpContent(1);
 }
 
@@ -337,18 +379,33 @@ void display_changepw(void)
 {
        char buf[SIZ];
 
-       output_headers(3);
+       output_headers(1, 1, 2, 0, 0, 0, 0);
+       wprintf("<div id=\"banner\">\n"
+               "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
+               "<SPAN CLASS=\"titlebar\">Change your password</SPAN>"
+               "</TD></TR></TABLE>\n"
+               "</div>\n<div id=\"content\">\n"
+       );
+
+       if (strlen(WC->ImportantMessage) > 0) {
+               do_template("beginbox_nt");
+               wprintf("<SPAN CLASS=\"errormsg\">"
+                       "%s</SPAN><br />\n", WC->ImportantMessage);
+               do_template("endbox");
+               strcpy(WC->ImportantMessage, "");
+       }
+
+       wprintf("<div id=\"fix_scrollbar_bug\">"
+               "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>\n");
 
-       svprintf("BOXTITLE", WCS_STRING, "Change your password");
-       do_template("beginbox");
-       wprintf("<CENTER><BR>");
+       wprintf("<CENTER><br />");
        serv_puts("MESG changepw");
-       serv_gets(buf);
+       serv_getln(buf, sizeof buf);
        if (buf[0] == '1') {
                fmout(NULL, "CENTER");
        }
 
-       wprintf("<FORM ACTION=\"changepw\" METHOD=\"POST\">\n");
+       wprintf("<form name=\"changepwform\" action=\"changepw\" method=\"post\">\n");
        wprintf("<CENTER>"
                "<table border=\"0\" cellspacing=\"5\" cellpadding=\"5\" "
                "BGCOLOR=\"#EEEEEE\">"
@@ -356,12 +413,13 @@ void display_changepw(void)
        wprintf("<TD><INPUT TYPE=\"password\" NAME=\"newpass1\" VALUE=\"\" MAXLENGTH=\"20\"></TD></TR>\n");
        wprintf("<TR><TD>Enter it again to confirm:</TD>\n");
        wprintf("<TD><INPUT TYPE=\"password\" NAME=\"newpass2\" VALUE=\"\" MAXLENGTH=\"20\"></TD></TR>\n");
-       wprintf("</TABLE><BR>\n");
-       wprintf("<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Change\">\n"
+
+       wprintf("</TABLE><br />\n");
+       wprintf("<INPUT type=\"submit\" name=\"action\" value=\"Change\">"
                "&nbsp;"
-               "<INPUT type=\"submit\" NAME=\"action\" VALUE=\"Cancel\">\n");
-       wprintf("</CENTER>\n");
-       do_template("endbox");
+               "<INPUT type=\"submit\" name=\"action\" value=\"Cancel\">\n");
+       wprintf("</form></center>\n");
+       wprintf("</td></tr></table></div>\n");
        wDumpContent(1);
 }
 
@@ -379,17 +437,32 @@ void changepw(void)
                display_main_menu();
                return;
        }
+
        strcpy(newpass1, bstr("newpass1"));
        strcpy(newpass2, bstr("newpass2"));
 
        if (strcasecmp(newpass1, newpass2)) {
                strcpy(WC->ImportantMessage, 
                        "They don't match.  Password was not changed.");
-               display_main_menu();
+               display_changepw();
+               return;
+       }
+
+       if (strlen(newpass1) == 0) {
+               strcpy(WC->ImportantMessage, 
+                       "Blank passwords are not allowed.");
+               display_changepw();
                return;
        }
+
        serv_printf("SETP %s", newpass1);
-       serv_gets(buf);
-       strcpy(WC->ImportantMessage, &buf[4]);
-       display_main_menu();
+       serv_getln(buf, sizeof buf);
+       sprintf(WC->ImportantMessage, "%s", &buf[4]);
+       if (buf[0] == '2') {
+               safestrncpy(WC->wc_password, buf, sizeof WC->wc_password);
+               display_main_menu();
+       }
+       else {
+               display_changepw();
+       }
 }