/**
* login.php -- simple login screen
*
- * Copyright (c) 1999-2003 The SquirrelMail Project Team
+ * Copyright (c) 1999-2004 The SquirrelMail Project Team
* Licensed under the GNU GPL. For full terms see the file COPYING.
*
* This a simple login screen. Some housekeeping is done to clean
* cookies and find language.
*
- * $Id$
+ * @version $Id$
+ * @package squirrelmail
*/
-/* Path for SquirrelMail required files. */
+/**
+ * Path for SquirrelMail required files.
+ * @ignore
+ */
define('SM_PATH','../');
/* SquirrelMail required files. */
require_once(SM_PATH . 'functions/page_header.php');
require_once(SM_PATH . 'functions/html.php');
require_once(SM_PATH . 'functions/global.php');
+require_once(SM_PATH . 'functions/imap_general.php');
+require_once(SM_PATH . 'functions/forms.php');
-/*
+/**
* $squirrelmail_language is set by a cookie when the user selects
* language and logs out
*/
header('Pragma: no-cache');
+/**
+ * This detects if the IMAP server has logins disabled, and if so,
+ * squelches the display of the login form and puts up a message
+ * explaining the situation.
+ */
+if($imap_auth_mech == 'login') {
+ $imap = sqimap_create_stream($imapServerAddress, $imapPort, $use_imap_tls);
+ $logindisabled = sqimap_capability($imap,'LOGINDISABLED');
+ sqimap_logout($imap);
+ if ($logindisabled) {
+ $string = "The IMAP server is reporting that logins are disabled.<br>";
+ if (!$use_imap_tls) {
+ $string .= "The use of TLS may allow SquirrelMail to login.<br>";
+ }
+ $string .= "Please contact your system administrator.";
+ error_box($string,$color);
+ exit;
+ }
+}
+
do_hook('login_cookie');
/* Output the javascript onload function. */
$header = "<script language=\"JavaScript\" type=\"text/javascript\">\n" .
"<!--\n".
" function squirrelmail_loginpage_onload() {\n".
- " document.forms[0].js_autodetect_results.value = '" . SMPREF_JS_ON . "';\n".
" var textElements = 0;\n".
" for (i = 0; i < document.forms[0].elements.length; i++) {\n".
" if (document.forms[0].elements[i].type == \"text\" || document.forms[0].elements[i].type == \"password\") {\n".
displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" onLoad=\"squirrelmail_loginpage_onload()\">" .
- "\n" . '<form action="redirect.php" method="post">' . "\n";
+ "\n" . '<form action="redirect.php" method="post" onSubmit="document.forms[0].js_autodetect_results.value=\'' . SMPREF_JS_ON .'\';">' . "\n";
$username_form_name = 'login_username';
$password_form_name = 'secretkey';
}
if(sqgetGlobalVar('mailto', $mailto)) {
- $rcptaddress = '<input type="hidden" name="mailto" value="' . urlencode($mailto) . '" />' . "\n";
+ $rcptaddress = addHidden('mailto', $mailto);
} else {
$rcptaddress = '';
}
_("Name:") ,
'right', '', 'width="30%"' ) .
html_tag( 'td',
- '<input type="text" name="' . $username_form_name .'" value="' . $loginname_value .'" />' ,
+ addInput($username_form_name, $loginname_value),
'left', '', 'width="*"' )
) . "\n" .
html_tag( 'tr',
_("Password:") ,
'right', '', 'width="30%"' ) .
html_tag( 'td',
- '<input type="password" name="' . $password_form_name . '" />' . "\n" .
- '<input type="hidden" name="js_autodetect_results" value="SMPREF_JS_OFF" />' . "\n" .
+ addPwField($password_form_name).
+ addHidden('js_autodetect_results', SMPREF_JS_OFF).
$rcptaddress .
- '<input type="hidden" name="just_logged_in" value="1" />' . "\n",
+ addHidden('just_logged_in', '1'),
'left', '', 'width="*"' )
) ,
'center', $color[4], 'border="0" width="100%"' ) ,
) .
html_tag( 'tr',
html_tag( 'td',
- '<center><input type="submit" value="' . _("Login") . '" /></center>',
+ '<center>'. addSubmit(_("Login")) .'</center>',
'left' )
),
'', $color[4], 'border="0" width="350"' ) . '</center>',