*/
#include "webcit.h"
+#include "webserver.h"
+#include <ctype.h>
+
+
+void display_reg(int during_login);
/*
- * user states
- * the plain text states of a user. filled in at \ function TODO initialize_ax_defs()
- * due to NLS
+ * Access level definitions. This is initialized from a function rather than a
+ * static array so that the strings may be localized.
*/
char *axdefs[7];
void initialize_axdefs(void) {
- axdefs[0] = _("Deleted"); /*!0: an erased user */
- axdefs[1] = _("New User"); /*!1: a new user */
- axdefs[2] = _("Problem User"); /*!2: a trouble maker */
- axdefs[3] = _("Local User"); /*!3: user with normal privileges */
- axdefs[4] = _("Network User"); /*!4: a user that may access network resources */
- axdefs[5] = _("Preferred User");/*!5: a moderator */
- axdefs[6] = _("Aide"); /*!6: chief */
+ axdefs[0] = _("Deleted"); /* an erased user */
+ axdefs[1] = _("New User"); /* a new user */
+ axdefs[2] = _("Problem User"); /* a trouble maker */
+ axdefs[3] = _("Local User"); /* user with normal privileges */
+ axdefs[4] = _("Network User"); /* a user that may access network resources */
+ axdefs[5] = _("Preferred User");/* a moderator */
+ axdefs[6] = _("Aide"); /* chief */
}
if (mesg != NULL) if (!IsEmptyStr(mesg)) {
stresc(buf, SIZ, mesg, 0, 0);
- svprintf("mesg", WCS_STRING, "%s", buf);
+ svprintf(HKEY("MESG"), WCS_STRING, "%s", buf);
}
- svprintf("LOGIN_INSTRUCTIONS", WCS_STRING,
+ svprintf(HKEY("LOGIN_INSTRUCTIONS"), WCS_STRING,
_("<ul>"
"<li><b>If you already have an account on %s</b>, "
"enter your user name and password and click "Login." "
serv_info.serv_humannode
);
- svprintf("USERNAME_BOX", WCS_STRING, "%s", _("User name:"));
- svprintf("PASSWORD_BOX", WCS_STRING, "%s", _("Password:"));
- svprintf("LANGUAGE_BOX", WCS_STRING, "%s", _("Language:"));
- svprintf("LOGIN_BUTTON", WCS_STRING, "%s", _("Login"));
- svprintf("NEWUSER_BUTTON", WCS_STRING, "%s", _("New User"));
- svprintf("EXIT_BUTTON", WCS_STRING, "%s", _("Exit"));
- svprintf("hello", WCS_SERVCMD, "MESG hello");
- svprintf(
"BOXTITLE", WCS_STRING, _("%s - powered by <a href=\"http://www.citadel.org\">Citadel</a>"),
+ svput("USERNAME_BOX", WCS_STRING, _("User name:"));
+ svput("PASSWORD_BOX", WCS_STRING, _("Password:"));
+ svput("LANGUAGE_BOX", WCS_STRING, _("Language:"));
+ svput("LOGIN_BUTTON", WCS_STRING, _("Login"));
+ svput("NEWUSER_BUTTON", WCS_STRING, _("New User"));
+ svput("EXIT_BUTTON", WCS_STRING, _("Exit"));
+ svput("HELLO", WCS_SERVCMD, "MESG hello");
+ svprintf(
HKEY("BOXTITLE"), WCS_STRING, _("%s - powered by <a href=\"http://www.citadel.org\">Citadel</a>"),
serv_info.serv_humannode);
svcallback("DO_LANGUAGE_BOX", offer_languages);
if (serv_info.serv_newuser_disabled) {
- svprintf("NEWUSER_BUTTON_PRE", WCS_STRING, "<div style=\"display:none;\">");
- svprintf("NEWUSER_BUTTON_POST", WCS_STRING, "</div>");
+ svput("NEWUSER_BUTTON_PRE", WCS_STRING, "<div style=\"display:none;\">");
+ svput("NEWUSER_BUTTON_POST", WCS_STRING, "</div>");
+ }
+ else {
+ svput("NEWUSER_BUTTON_PRE", WCS_STRING, "");
+ svput("NEWUSER_BUTTON_POST", WCS_STRING, "");
+ }
+
+ if (serv_info.serv_supports_openid) {
+ svprintf(HKEY("OFFER_OPENID_LOGIN"), WCS_STRING,
+ "<div align=center>"
+ "<a href=\"display_openid_login\">"
+ "<img src=\"static/openid-small.gif\" border=0 valign=middle>"
+ "%s</a>"
+ "</div>"
+ ,
+ "Log in using OpenID"
+ );
}
else {
- svprintf("NEWUSER_BUTTON_PRE", WCS_STRING, "");
- svprintf("NEWUSER_BUTTON_POST", WCS_STRING, "");
+ svput("OFFER_OPENID_LOGIN", WCS_STRING, "");
}
- do_template("login");
+ do_template("login", NULL);
wDumpContent(2);
}
+/*
+ * Display the openid-enabled login screen
+ * mesg = the error message if last attempt failed.
+ */
+void display_openid_login(char *mesg)
+{
+ char buf[SIZ];
+
+ output_headers(1, 1, 2, 0, 0, 0);
+ wprintf("<div id=\"login_screen\">\n");
+
+ if (mesg != NULL) if (!IsEmptyStr(mesg)) {
+ stresc(buf, SIZ, mesg, 0, 0);
+ svprintf(HKEY("MESG"), WCS_STRING, "%s", buf);
+ }
+
+ svprintf(HKEY("LOGIN_INSTRUCTIONS"), WCS_STRING,
+ _("<ul>"
+ "<li>Enter your OpenID URL and click "Login"."
+ "<li><a href=\"http://www.citadel.org/doku.php/documentation:openid\">"
+ "Click here to learn what OpenID is and how Citadel is using it.</a>"
+ "<li>Please log off properly when finished. "
+ "<li>You must use a browser that supports <i>frames</i> and "
+ "<i>cookies</i>. "
+ "<li>Also keep in mind that if your browser is "
+ "configured to block pop-up windows, you will not be able "
+ "to receive any instant messages.<br />"
+ "</ul>")
+ );
+
+ svput("OPENID_BOX", WCS_STRING, _("OpenID URL:"));
+ svput("LANGUAGE_BOX", WCS_STRING, _("Language:"));
+ svput("LOGIN_BUTTON", WCS_STRING, _("Login"));
+ svput("EXIT_BUTTON", WCS_STRING, _("Exit"));
+ svput("HELLO", WCS_SERVCMD, "MESG hello");
+ svprintf(HKEY("BOXTITLE"), WCS_STRING, _("%s - powered by <a href=\"http://www.citadel.org\">Citadel</a>"),
+ serv_info.serv_humannode);
+ svcallback("DO_LANGUAGE_BOX", offer_languages);
+
+ svprintf(HKEY("OFFER_CONVENTIONAL_LOGIN"), WCS_STRING,
+ "<div align=center>"
+ "<a href=\"display_login\">"
+ "%s</a>"
+ "</div>"
+ ,
+ "Log in using a user name and password"
+ );
+
+ do_template("openid_login", NULL);
+ wDumpContent(2);
+}
+
+
+void display_openid_name_request(char *claimed_id, char *username) {
+ char buf[SIZ];
+
+ output_headers(1, 1, 2, 0, 0, 0);
+ wprintf("<div id=\"login_screen\">\n");
+
+ stresc(buf, sizeof buf, claimed_id, 0, 0);
+ svprintf(HKEY("VERIFIED"), WCS_STRING, _("Your OpenID <tt>%s</tt> was successfully verified."),
+ claimed_id);
+ svput("CLAIMED_ID", WCS_STRING, claimed_id);
+
+
+ if (!IsEmptyStr(username)) {
+ stresc(buf, sizeof buf, username, 0, 0);
+ svprintf(HKEY("REASON"), WCS_STRING,
+ _("However, the user name '%s' conflicts with an existing user."), username);
+ }
+ else {
+ svput("REASON", WCS_STRING, "");
+ }
+
+ svput("ACTION_REQUESTED", WCS_STRING, _("Please specify the user name you would like to use."));
+
+ svput("USERNAME_BOX", WCS_STRING, _("User name:"));
+ svput("NEWUSER_BUTTON", WCS_STRING, _("New User"));
+ svput("EXIT_BUTTON", WCS_STRING, _("Exit"));
+
+ svprintf(HKEY("BOXTITLE"), WCS_STRING, _("%s - powered by <a href=\"http://www.citadel.org\">Citadel</a>"),
+ serv_info.serv_humannode);
+
+ do_template("openid_manual_create", NULL);
+ wDumpContent(2);
+}
+
+
+
/* Initialize the session
*
* This function needs to get called whenever the session changes from
void become_logged_in(char *user, char *pass, char *serv_response)
{
char buf[SIZ];
+ StrBuf *FloorDiv;
WC->logged_in = 1;
extract_token(WC->wc_fullname, &serv_response[4], 0, '|', sizeof WC->wc_fullname);
extract_token(WC->cs_inet_email, &buf[4], 3, '|', sizeof WC->cs_inet_email);
}
- get_preference("current_iconbar", buf, sizeof buf);
- WC->current_iconbar = atoi(buf);
+ get_pref_long("current_iconbar", &WC->current_iconbar, current_iconbar_menu);
- get_preference("floordiv_expanded", WC->floordiv_expanded, sizeof WC->floordiv_expanded);
+ get_preference("floordiv_expanded", &FloorDiv);
+ WC->floordiv_expanded = FloorDiv;
}
/*
- * Login Checks
- * the logic to detect invalid passwords not to get on citservers nerves
+ * Perform authentication using a user name and password
*/
void do_login(void)
{
serv_printf("PASS %s", bstr("pass"));
serv_getln(buf, sizeof buf);
if (buf[0] == '2') {
- become_logged_in(bstr("name"),
- bstr("pass"), buf);
+ become_logged_in(bstr("name"), bstr("pass"), buf);
} else {
display_login(&buf[4]);
return;
}
}
if (WC->logged_in) {
+ set_preference("language", NewStrBufPlain(bstr("language"), -1), 1);
if (WC->need_regi) {
display_reg(1);
+ } else if (WC->need_vali) {
+ validate();
} else {
do_welcome();
}
}
+/*
+ * Try to create an account manually after an OpenID was verified
+ */
+void openid_manual_create(void)
+{
+ if (havebstr("exit_action")) {
+ do_logout();
+ return;
+ }
+
+ char buf[1024];
+ if (havebstr("newuser_action")) {
+ serv_printf("OIDC %s", bstr("name"));
+ serv_getln(buf, sizeof buf);
+ if (buf[0] == '2') {
+ char gpass[1024] = "";
+ serv_puts("SETP GENERATE_RANDOM_PASSWORD");
+ serv_getln(gpass, sizeof gpass);
+ become_logged_in(bstr("name"), &gpass[4], buf);
+ }
+ }
+
+ if (WC->logged_in) {
+ if (WC->need_regi) {
+ display_reg(1);
+ } else if (WC->need_vali) {
+ validate();
+ } else {
+ do_welcome();
+ }
+ } else {
+ display_openid_name_request(bstr("openid_url"), bstr("name"));
+ }
+
+}
+
+
+/*
+ * Perform authentication using OpenID
+ * assemble the checkid_setup request and then redirect to the user's identity provider
+ */
+void do_openid_login(void)
+{
+ char buf[4096];
+
+ if (havebstr("language")) {
+ set_selected_language(bstr("language"));
+ go_selected_language();
+ }
+
+ if (havebstr("exit_action")) {
+ do_logout();
+ return;
+ }
+ if (havebstr("login_action")) {
+ snprintf(buf, sizeof buf,
+ "OIDS %s|%s://%s/finalize_openid_login|%s://%s",
+ bstr("openid_url"),
+ (is_https ? "https" : "http"), WC->http_host,
+ (is_https ? "https" : "http"), WC->http_host
+ );
+
+ serv_puts(buf);
+ serv_getln(buf, sizeof buf);
+ if (buf[0] == '2') {
+ lprintf(CTDL_DEBUG, "OpenID server contacted; redirecting to %s\n", &buf[4]);
+ http_redirect(&buf[4]);
+ return;
+ }
+ else {
+ display_openid_login(&buf[4]);
+ return;
+ }
+ }
+
+ /* If we get to this point then something failed. */
+ display_openid_login(_("Your password was not accepted."));
+}
+
+/*
+ * Complete the authentication using OpenID
+ * This function handles the positive or negative assertion from the user's Identity Provider
+ */
+void finalize_openid_login(void)
+{
+ char buf[1024];
+ struct wcsession *WCC = WC;
+ int already_logged_in = (WCC->logged_in) ;
+ int linecount = 0;
+ char result[128] = "";
+ char username[128] = "";
+ char password[128] = "";
+ char logged_in_response[1024] = "";
+ char claimed_id[1024] = "";
+
+ if (havebstr("openid.mode")) {
+ if (!strcasecmp(bstr("openid.mode"), "id_res")) {
+
+ serv_puts("OIDF");
+ serv_getln(buf, sizeof buf);
+
+ if (buf[0] == '8') {
+ urlcontent *u;
+ void *U;
+ long HKLen;
+ const char *HKey;
+ HashPos *Cursor;
+
+ Cursor = GetNewHashPos ();
+ while (GetNextHashPos(WCC->urlstrings, Cursor, &HKLen, &HKey, &U)) {
+ u = (urlcontent*) U;
+ if (!strncasecmp(u->url_key, "openid.", 7)) {
+ serv_printf("%s|%s", &u->url_key[7], ChrPtr(u->url_data));
+ }
+ }
+
+ serv_puts("000");
+
+ linecount = 0;
+ while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
+ if (linecount == 0) safestrncpy(result, buf, sizeof result);
+ if (!strcasecmp(result, "authenticate")) {
+ if (linecount == 1) {
+ safestrncpy(username, buf, sizeof username);
+ }
+ else if (linecount == 2) {
+ safestrncpy(password, buf, sizeof password);
+ }
+ else if (linecount == 3) {
+ safestrncpy(logged_in_response, buf,
+ sizeof logged_in_response);
+ }
+ }
+ else if (!strcasecmp(result, "verify_only")) {
+ if (linecount == 1) {
+ safestrncpy(claimed_id, buf, sizeof claimed_id);
+ }
+ if (linecount == 2) {
+ safestrncpy(username, buf, sizeof username);
+ }
+ }
+ ++linecount;
+ }
+ }
+ }
+ }
+
+ /* If we were already logged in, this was an attempt to associate an OpenID account */
+ if (already_logged_in) {
+ display_openids();
+ return;
+ }
+
+ /* If this operation logged us in, either by connecting with an existing account or by
+ * auto-creating one using Simple Registration Extension, we're already on our way.
+ */
+ if (!strcasecmp(result, "authenticate")) {
+ become_logged_in(username, password, logged_in_response);
+ }
+
+ /* The specified OpenID was verified but the desired user name was either not specified via SRI
+ * or conflicts with an existing user. Either way the user will need to specify a new name.
+ */
+
+ else if (!strcasecmp(result, "verify_only")) {
+ display_openid_name_request(claimed_id, username);
+ }
+
+ /* Did we manage to log in? If so, continue with the normal flow... */
+ if (WC->logged_in) {
+ if (WC->need_regi) {
+ display_reg(1);
+ } else {
+ do_welcome();
+ }
+ } else {
+ display_openid_login(_("Your password was not accepted."));
+ }
+
+}
+
+
/*
- * display the user a welcome screen.
+ * Display a welcome screen to the user.
*
- * if this is the first time login, and the web based setup is enabled,
+ * If this is the first time login, and the web based setup is enabled,
* lead the user through the setup routines
*/
void do_welcome(void)
{
- char buf[SIZ];
+ StrBuf *Buf;
#ifdef XXX_NOT_FINISHED_YET_XXX
FILE *fp;
int i;
/*
* Go to the user's preferred start page
*/
- get_preference("startpage", buf, sizeof buf);
- if (IsEmptyStr(buf)) {
- safestrncpy(buf, "dotskip&room=_BASEROOM_", sizeof buf);
- set_preference("startpage", buf, 1);
+ if (!get_preference("startpage", &Buf)) {
+ Buf = NewStrBuf ();
+ StrBufPrintf(Buf, "dotskip&room=_BASEROOM_");
+ set_preference("startpage", Buf, 1);
}
- if (buf[0] == '/') {
- strcpy(buf, &buf[1]);
+ if (ChrPtr(Buf)[0] == '/') {
+ StrBufCutLeft(Buf, 1);
}
- http_redirect(buf);
+ if (StrLength(Buf) == 0)
+ StrBufAppendBufPlain(Buf, "dotgoto?room=_BASEROOM_", -1, 0);
+ http_redirect(ChrPtr(Buf));
}
* Disconnect from the Citadel server, and end this WebCit session
*/
void end_webcit_session(void) {
- char buf[256];
-
+
if (WC->logged_in) {
- sprintf(buf, "%d", WC->current_iconbar);
- set_preference("current_iconbar", buf, 0);
- set_preference("floordiv_expanded", WC->floordiv_expanded, 1);
+ set_pref_long("current_iconbar", WC->current_iconbar, 0);
}
serv_puts("QUIT");
if (a == 1)
wprintf("#%s<br /><H1>%s</H1>",
buf, &cmd[4]);
- if (a == 2)
- wprintf("PW: %s<br />\n", buf);
+ if (a == 2) {
+ char *pch;
+ int haveChar = 0;
+ int haveNum = 0;
+ int haveOther = 0;
+ int count = 0;
+ pch = buf;
+ while (!IsEmptyStr(pch))
+ {
+ if (isdigit(*pch))
+ haveNum = 1;
+ else if (isalpha(*pch))
+ haveChar = 1;
+ else
+ haveOther = 1;
+ pch ++;
+ }
+ count = pch - buf;
+ if (count > 7)
+ count = 0;
+ switch (count){
+ case 0:
+ pch = _("very weak");
+ break;
+ case 1:
+ pch = _("weak");
+ break;
+ case 2:
+ pch = _("ok");
+ break;
+ case 3:
+ default:
+ pch = _("strong");
+ }
+
+ wprintf("PW: %s<br />\n", pch);
+ }
if (a == 3)
wprintf("%s<br />\n", buf);
if (a == 4)
wprintf(_("Select access level for this user:"));
wprintf("<br />\n");
for (a = 0; a <= 6; ++a) {
- wprintf("<a href=\"validate?nonce=%ld?user=", WC->nonce);
+ wprintf("<a href=\"validate?nonce=%d?user=", WC->nonce);
urlescputs(user);
wprintf("&axlevel=%d\">%s</A> \n",
a, axdefs[a]);
output_headers(1, 1, 1, 0, 0, 0);
- svprintf("BOXTITLE", WCS_STRING, _("Change your password"));
- do_template("beginbox");
+ svput("BOXTITLE", WCS_STRING, _("Change your password"));
+ do_template("beginbox", NULL);
if (!IsEmptyStr(WC->ImportantMessage)) {
wprintf("<span class=\"errormsg\">"
}
wprintf("<form name=\"changepwform\" action=\"changepw\" method=\"post\">\n");
- wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%ld\">\n", WC->nonce);
+ wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
wprintf("<table class=\"altern\" ");
wprintf("<tr class=\"even\"><td>");
wprintf(_("Enter new password:"));
wprintf("</div>\n");
wprintf("</form>\n");
- do_template("endbox");
+ do_template("endbox", NULL);
wDumpContent(1);
}
}
}
+int ConditionalAide(WCTemplateToken *Token, void *Context, int ContextType)
+{
+ return (WC->is_aide == 0);
+}
+
+int ConditionalRoomAide(WCTemplateToken *Token, void *Context, int ContextType)
+{
+ return (WC->is_room_aide == 0);
+}
+
+
+
+void _display_openid_login(void) {display_openid_login(NULL);}
+void _display_reg(void) {display_reg(0);}
-void InitModule_AUTH(void)
+void
+InitModule_AUTH
+(void)
{
- WebcitAddUrlHandler(HKEY("do_welcome"), do_welcome, 0);
- return 0;
+ WebcitAddUrlHandler(HKEY("do_welcome"), do_welcome, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("login"), do_login, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("display_openid_login"), _display_openid_login, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("openid_login"), do_openid_login, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("finalize_openid_login"), finalize_openid_login, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("openid_manual_create"), openid_manual_create, ANONYMOUS);
+ WebcitAddUrlHandler(HKEY("do_logout"), do_logout, 0);
+ WebcitAddUrlHandler(HKEY("validate"), validate, 0);
+ WebcitAddUrlHandler(HKEY("display_reg"), _display_reg, 0);
+ WebcitAddUrlHandler(HKEY("display_changepw"), display_changepw, 0);
+ WebcitAddUrlHandler(HKEY("changepw"), changepw, 0);
+ WebcitAddUrlHandler(HKEY("termquit"), do_logout, 0);
+
+ RegisterConditional(HKEY("COND:AIDE"), 2, ConditionalAide, CTX_NONE);
+ RegisterConditional(HKEY("COND:ROOMAIDE"), 2, ConditionalRoomAide, CTX_NONE);
+
+ return ;
}
projects / citadel.git / blobdiff