X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Flogin.php;h=9c9389b7ad2756844dd1be1d3ce6f3b1acba2de3;hp=698262c3c459f6ebd3481b44aeda87bcb156769c;hb=3e6b917e771605772c45369d345860531a3b88bd;hpb=cde4bbd3ba7c534bb38a7a1add749c7013268125 diff --git a/src/login.php b/src/login.php index 698262c3..9c9389b7 100644 --- a/src/login.php +++ b/src/login.php @@ -3,133 +3,186 @@ /** * login.php -- simple login screen * - * Copyright (c) 1999-2002 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$ + * @copyright © 1999-2007 The SquirrelMail Project Team + * @license http://opensource.org/licenses/gpl-license.php GNU Public License + * @version $Id$ + * @package squirrelmail + */ + +// reduces the files included in init.php +$sInitLocation = 'login'; + +/** + * Include the SquirrelMail initialization file. */ -require_once('../functions/strings.php'); -require_once('../config/config.php'); -require_once('../functions/i18n.php'); -require_once('../functions/plugin.php'); -require_once('../functions/constants.php'); -require_once('../functions/page_header.php'); -//require_once('../class/browser.class.php'); - -// initialize some vars -if(!isset($UA)) $UA = ''; -if(!isset($cc)) $cc = ''; -if(!isset($dl)) $dl = ''; -if(!isset($am)) $am = ''; - -//$sniffer_settings = array('check_cookies'=>$cc, -// 'default_language'=>$dl, -// 'allow_masquerading'=>$am); -//$browser = new phpSniff($UA,$sniffer_settings); - -/* +require('../include/init.php'); + + +/* SquirrelMail required files. */ +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); +set_up_language($squirrelmail_language, TRUE, TRUE); /** - * Find out the base URI to set cookies. + * In case the last session was not terminated properly, make sure + * we get a new one, but make sure we preserve session_expired_* */ -if (!function_exists('sqm_baseuri')){ - require_once('../functions/display_messages.php'); +if ( !empty($_SESSION['session_expired_post']) && !empty($_SESSION['session_expired_location']) ) { + $sep = $_SESSION['session_expired_post']; + $sel = $_SESSION['session_expired_location']; + + sqsession_destroy(); + @sqsession_is_active(); + $_SESSION=array(); + sqsession_register($sep, 'session_expired_post'); + sqsession_register($sel, 'session_expired_location'); +} else { + sqsession_destroy(); + @sqsession_is_active(); + $_SESSION=array(); } -$base_uri = sqm_baseuri(); -@session_destroy(); -session_start(); -//session_register('browser'); -/* - * In case the last session was not terminated properly, make sure - * we get a new one. + +/** + * 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. */ -$cookie_params = session_get_cookie_params(); -setcookie(session_name(), '', 0, $cookie_params['path'], - $cookie_params['domain']); -setcookie('username', '', 0, $base_uri); -setcookie('key', '', 0, $base_uri); -header('Pragma: no-cache'); +if($imap_auth_mech == 'login') { + /** + * detect disabled login, only when imapServerAddress contains + * server address and not mapping. See sqimap_get_user_server() + */ + if (substr($imapServerAddress, 0, 4) != "map:") { + $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 plain text logins are disabled.").'
'. + _("Using CRAM-MD5 or DIGEST-MD5 authentication instead may work.").'
'; + if (!$use_imap_tls) { + $string .= _("Also, the use of TLS may allow SquirrelMail to login.").'
'; + } + $string .= _("Please contact your system administrator and report this error."); + error_box($string); + // display footer (closes html tags) and stop script execution + $oTemplate->display('footer.tpl'); + exit; + } + } +} -do_hook('login_cookie'); +do_hook('login_cookie', $null); -/* Output the javascript onload function. */ +$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : ''); -$header = "\n"; -$custom_css = 'none'; + +if (@file_exists($theme[$theme_default]['PATH'])) + @include ($theme[$theme_default]['PATH']); + +if (! isset($color) || ! is_array($color)) { + // Add default color theme, if theme loading fails + $color = array(); + $color[0] = '#dcdcdc'; /* light gray TitleBar */ + $color[1] = '#800000'; /* red */ + $color[2] = '#cc0000'; /* light red Warning/Error Messages */ + $color[4] = '#ffffff'; /* white Normal Background */ + $color[7] = '#0000cc'; /* blue Links */ + $color[8] = '#000000'; /* black Normal text */ +} + displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE ); -/* Set the title of this page. */ -echo ''. - "\n
\n"; -$username_form_name = 'login_username'; -$password_form_name = 'secretkey'; -do_hook('login_top'); -$loginname_value = (isset($loginname) ? htmlspecialchars($loginname) : ''); +/* If they don't have a logo, don't bother.. */ +$logo_str = ''; +if (isset($org_logo) && $org_logo) { + + if (isset($org_logo_width) && is_numeric($org_logo_width) && + $org_logo_width>0) { + $width = $org_logo_width; + } else { + $width = ''; + } + if (isset($org_logo_height) && is_numeric($org_logo_height) && + $org_logo_height>0) { + $height = $org_logo_height; + } else { + $height = ''; + } -/* Display width and height like good little people */ -$width_and_height = ''; -if (isset($org_logo_width) && is_int($org_logo_width) && $org_logo_width>0) { - $width_and_height = " WIDTH=\"$org_logo_width\""; + $logo_str = create_image($org_logo, sprintf(_("%s Logo"), $org_name), + $width, $height, '', 'sqm_loginImage'); + +} + +$sm_attribute_str = ''; +if (isset($hide_sm_attributions) && !$hide_sm_attributions) { + $sm_attribute_str = _("SquirrelMail Webmail")."\n" . + _("By the SquirrelMail Project Team"); } -if (isset($org_logo_height) && is_int($org_logo_height) && $org_logo_height>0) { - $width_and_height .= " HEIGHT=\"$org_logo_height\""; + +if(sqgetGlobalVar('mailtodata', $mailtodata)) { + $mailtofield = addHidden('mailtodata', $mailtodata); +} else { + $mailtofield = ''; } -echo '
'. - " \""
\n". - ( $hide_sm_attributions ? '' : - '' . sprintf (_("SquirrelMail version %s"), $version) . "
\n". - ' ' . _("By the SquirrelMail Development Team") . "
\n" ) . - "
\n". - - "
\n". - "\n". - " ". - " \n". - " \n". - "
\n". - ' ' . sprintf (_("%s Login"), $org_name) . "\n". - "
\n". - " \n". - ' \n". - " \n". - " \n". - " \n". - ' \n". - " \n". - " \n". - "
' . _("Name:") . "\n". - " \n". - "
' . _("Password:") . "\n". - " \n". - " \n". - " \n". - "
\n". - '
\n". - "
\n". - "
\n"; - -do_hook('login_form'); -echo "
\n"; - -do_hook('login_bottom'); -echo "\n". - "\n"; -?> \ No newline at end of file +$password_field = addPwField('secretkey'); +$login_extra = addHidden('js_autodetect_results', SMPREF_JS_OFF). + $mailtofield . + addHidden('just_logged_in', '1'); + +session_write_close(); + +$oTemplate->assign('logo_str', $logo_str); +$oTemplate->assign('logo_path', $org_logo); +$oTemplate->assign('sm_attribute_str', $sm_attribute_str); +// i18n: The %s represents the service provider's name +$oTemplate->assign('org_name_str', sprintf (_("%s Login"), $org_name)); +// i18n: The %s represents the service provider's name +$oTemplate->assign('org_logo_str', sprintf (_("The %s logo"), $org_name)); +$oTemplate->assign('login_field_value', $loginname_value); +$oTemplate->assign('login_extra', $login_extra); + +//FIXME: need to remove *ALL* HTML from this file! +echo ''."\n"; +echo '
'."\n"; +do_hook('login_top', $null); + +$oTemplate->display('login.tpl'); + +//FIXME: need to remove *ALL* HTML from this file! +echo "
\n"; +do_hook('login_bottom', $null); + +// Turn off delayed error handling to make sure all errors are dumped. +$oErrorHandler->setDelayedErrors(false); + +$oTemplate->display('footer.tpl');