X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Flogin.php;h=e459c0aac24a59eb57fc4188212485b8f5325a7e;hp=09e3d6f0a28d34171709ca0e7a68893953160211;hb=d3b3a524c091171c117c06f1d9342b495f6a0783;hpb=c6d6fe73f0e01b1415594cf719e9f610cc66c38d diff --git a/src/login.php b/src/login.php index 09e3d6f0..e459c0aa 100644 --- a/src/login.php +++ b/src/login.php @@ -1,105 +1,189 @@ "; - echo ""; - echo _("SquirrelMail Login"); - echo "\n"; - echo "\n"; + +/** + * login.php -- simple login screen + * + * 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. + * + * @version $Id$ + * @package squirrelmail + */ + +/** + * Path for SquirrelMail required files. + * @ignore + */ +define('SM_PATH','../'); + +/* SquirrelMail required files. */ +require_once(SM_PATH . 'functions/strings.php'); +require_once(SM_PATH . 'config/config.php'); +require_once(SM_PATH . 'functions/i18n.php'); +require_once(SM_PATH . 'functions/plugin.php'); +require_once(SM_PATH . 'functions/constants.php'); +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 + */ +set_up_language($squirrelmail_language, TRUE, TRUE); + +/** + * Find out the base URI to set cookies. + */ +if (!function_exists('sqm_baseuri')){ + require_once(SM_PATH . 'functions/display_messages.php'); +} +$base_uri = sqm_baseuri(); + +/* + * In case the last session was not terminated properly, make sure + * we get a new one. + */ + +sqsession_destroy(); - echo "
\n"; - echo "
\n"; - echo "
"; - printf (_("SquirrelMail version %s"), $version); - echo "
\n"; - echo _("By the SquirrelMail Development Team"); - echo "
\n"; - echo "\n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo "
\n"; - echo "
"; - printf (_("%s Login"), $org_name); - echo "
\n"; - echo "
\n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo "
\n"; - echo _("Name:"); - echo " \n"; - echo " \n"; - echo "
\n"; - echo _("Password:"); - echo " \n"; - echo " \n"; - echo "
\n"; - echo "
\n"; - echo "
\n"; - echo "
\n"; - echo "\n"; -?> - - +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.").'
'; + if (!$use_imap_tls) { + $string .= _("The use of TLS may allow SquirrelMail to login.").'
'; + } + $string .= _("Please contact your system administrator and report this error."); + error_box($string,$color); + exit; + } +} + +do_hook('login_cookie'); + +/* Output the javascript onload function. */ + +$header = "\n"; + +if (@file_exists($theme[$theme_default]['PATH'])) + @include ($theme[$theme_default]['PATH']); + +displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE ); + +echo "" . + "\n" . '
' . "\n"; + +$username_form_name = 'login_username'; +$password_form_name = 'secretkey'; +do_hook('login_top'); + +$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : ''); + +/* If they don't have a logo, don't bother.. */ +if (isset($org_logo) && $org_logo) { + /* Display width and height like good little people */ + $width_and_height = ''; + if (isset($org_logo_width) && is_numeric($org_logo_width) && + $org_logo_width>0) { + $width_and_height = " width=\"$org_logo_width\""; + } + if (isset($org_logo_height) && is_numeric($org_logo_height) && + $org_logo_height>0) { + $width_and_height .= " height=\"$org_logo_height\""; + } +} + +if(sqgetGlobalVar('mailto', $mailto)) { + $rcptaddress = addHidden('mailto', $mailto); +} else { + $rcptaddress = ''; +} +echo html_tag( 'table', + html_tag( 'tr', + html_tag( 'td', + '
'. + ( isset($org_logo) && $org_logo + ? '' . + sprintf(_(
' . "\n" + : '' ). + ( (isset($hide_sm_attributions) && $hide_sm_attributions) ? '' : + '' . sprintf (_("SquirrelMail version %s"), $version) . '
' ."\n". + ' ' . _("By the SquirrelMail Development Team") . '
' . "\n" ) . + html_tag( 'table', + html_tag( 'tr', + html_tag( 'td', + '' . sprintf (_("%s Login"), $org_name) . "\n", + 'center', $color[0] ) + ) . + html_tag( 'tr', + html_tag( 'td', "\n" . + html_tag( 'table', + html_tag( 'tr', + html_tag( 'td', + _("Name:") , + 'right', '', 'width="30%"' ) . + html_tag( 'td', + addInput($username_form_name, $loginname_value), + 'left', '', 'width="*"' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', + _("Password:") , + 'right', '', 'width="30%"' ) . + html_tag( 'td', + addPwField($password_form_name). + addHidden('js_autodetect_results', SMPREF_JS_OFF). + $rcptaddress . + addHidden('just_logged_in', '1'), + 'left', '', 'width="*"' ) + ) , + 'center', $color[4], 'border="0" width="100%"' ) , + 'left', $color[4] ) + ) . + html_tag( 'tr', + html_tag( 'td', + '
'. addSubmit(_("Login")) .'
', + 'left' ) + ), + '', $color[4], 'border="0" width="350"' ) . '
', + 'center' ) + ) , +'', $color[4], 'border="0" cellspacing="0" cellpadding="0" width="100%"' ); +do_hook('login_form'); +echo '
' . "\n"; +do_hook('login_bottom'); +echo "\n". + "\n"; +?> \ No newline at end of file