X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Flogin.php;h=7b541abaf2ffe1a1ebb9ede02305af80acf460ad;hb=4ecd3a703b4c3e74932811686ce21e94744745b8;hp=a069b52d6fc43573181bee139ed0c87acacabcb7;hpb=7c0060c9682434994d0d99d1e48b99a0fa4df84a;p=squirrelmail.git diff --git a/src/login.php b/src/login.php index a069b52d..7b541aba 100644 --- a/src/login.php +++ b/src/login.php @@ -3,166 +3,184 @@ /** * login.php -- simple login screen * - * Copyright (c) 1999-2002 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$ + * @package squirrelmail */ -/*****************************************************************/ -/*** THIS FILE NEEDS TO HAVE ITS FORMATTING FIXED!!! ***/ -/*** PLEASE DO SO AND REMOVE THIS COMMENT SECTION. ***/ -/*** + Base level indent should begin at left margin, as ***/ -/*** the first two lines below look. ***/ -/*** + All identation should consist of four space blocks ***/ -/*** + Tab characters are evil. ***/ -/*** + all comments should use "slash-star ... star-slash" ***/ -/*** style -- no pound characters, no slash-slash style ***/ -/*** + FLOW CONTROL STATEMENTS (if, while, etc) SHOULD ***/ -/*** ALWAYS USE { AND } CHARACTERS!!! ***/ -/*** + Please use ' instead of ", when possible. Note " ***/ -/*** should always be used in _( ) function calls. ***/ -/*** Thank you for your help making the SM code more readable. ***/ -/*****************************************************************/ - -$rcptaddress = ''; -if (isset($emailaddress)) { - if (stristr($emailaddress, 'mailto:')) { - $rcptaddress = substr($emailaddress, 7); - } else { - $rcptaddress = $emailaddress; - } - - if (($pos = strpos($rcptaddress, '?')) !== false) { - $a = substr($rcptaddress, $pos + 1); - $rcptaddress = substr($rcptaddress, 0, $pos); - $a = explode('=', $a, 2); - if (isset($a[1])) { - $name = urldecode($a[0]); - $val = urldecode($a[1]); - global $$name; - $$naame = $val; - } - } +/** Path for SquirrelMail required files. */ +define('SM_PATH','../'); - /* At this point, we have parsed a lot of the mailto stuff. */ - /* Let's do the rest -- CC, BCC, Subject, Body */ - /* Note: They can all be case insensitive */ - foreach ($GLOBALS as $k => $v) { - $key = strtolower($k); - $value = urlencode($v); - if ($key == 'cc') { - $rcptaddress .= '&send_to_cc=' . $value; - } else if ($key == 'bcc') { - $rcptaddress .= '&send_to_bcc=' . $value; - } else if ($key == 'subject') { - $rcptaddress .= '&subject=' . $value; - } else if ($key == 'body') { - $rcptaddress .= '&body=' . $value; - } - } +/* 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'); - /* Double-encode in this fashion to get past redirect.php properly. */ - $rcptaddress = urlencode($rcptaddress); - } +/** + * $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(); + +header('Pragma: no-cache'); - 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'); - - /* - * $squirrelmail_language is set by a cookie when the user selects - * language and logs out - */ - set_up_language($squirrelmail_language, true); - - /* Need the base URI to set the cookies. (Same code as in webmail.php). */ - ereg ("(^.*/)[^/]+/[^/]+$", $PHP_SELF, $regs); - $base_uri = $regs[1]; - @session_destroy(); - - /* - * In case the last session was not terminated properly, make sure - * we get a new one. - */ - $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'); - - do_hook('login_cookie'); - - /* Output the javascript onload function. */ - displayHtmlHeader( "$org_name - " . _("Login"), - "\n", 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) : ''); - - 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"; - if ($rcptaddress != '') { - echo " \n"; +/** + * 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."; + 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\""; } - echo "
\n". - '
\n". - "
\n". - "
\n"; - - do_hook('login_form'); - echo "
\n"; - - do_hook('login_bottom'); - echo "\n". - "\n"; +} + +if(sqgetGlobalVar('mailto', $mailto)) { + $rcptaddress = '' . "\n"; +} 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', + '' , + 'left', '', 'width="*"' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', + _("Password:") , + 'right', '', 'width="30%"' ) . + html_tag( 'td', + '' . "\n" . + '' . "\n" . + $rcptaddress . + '' . "\n", + 'left', '', 'width="*"' ) + ) , + 'center', $color[4], 'border="0" width="100%"' ) , + 'left', $color[4] ) + ) . + html_tag( 'tr', + html_tag( 'td', + '
', + '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"; ?>