X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fredirect.php;h=d8253f638c8f2e2c4f3fb6a67a3bb557d342df38;hp=077e0a7ed0d50d17af737b3c69d829fcb936fe91;hb=f2ad47f19d5b71cca9d4d50095d0f9306d5e74cf;hpb=2670726539f57cabdb35a74e74e3031d42c8875f diff --git a/src/redirect.php b/src/redirect.php index 077e0a7e..d8253f63 100644 --- a/src/redirect.php +++ b/src/redirect.php @@ -1,191 +1,222 @@ - * - * Copyright (c) 1999-2002 The SquirrelMail Project Team - * Licensed under the GNU GPL. For full terms see the file COPYING. - * * Prevents users from reposting their form data after a successful logout. * - * $Id$ + * Derived from webmail.php by Ralf Kraudelt + * + * @copyright 1999-2010 The SquirrelMail Project Team + * @license http://opensource.org/licenses/gpl-license.php GNU Public License + * @version $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 require_once below looks. ***/ -/*** + 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. ***/ -/*****************************************************************/ - -require_once('../functions/i18n.php'); -require_once('../functions/strings.php'); -require_once('../config/config.php'); -require_once('../functions/prefs.php'); -require_once('../functions/imap.php'); -require_once('../functions/plugin.php'); -require_once('../functions/constants.php'); -require_once('../functions/page_header.php'); - -// Remove slashes if PHP added them -if (get_magic_quotes_gpc()) { - global $REQUEST_METHOD; - - if ($REQUEST_METHOD == "POST") { - global $HTTP_POST_VARS; - RemoveSlashes($HTTP_POST_VARS); - } else if ($REQUEST_METHOD == "GET") { - global $HTTP_GET_VARS; - RemoveSlashes($HTTP_GET_VARS); - } -} - - -function attachment_common_parse($str, $debug) { - global $attachment_common_types, $attachment_common_types_parsed; - - $attachment_common_types_parsed[$str] = true; - $types = explode(', ', $str); - - foreach ($types as $val) { - // Ignore the ";q=1.0" stuff - if (strpos($val, ';') !== false) - $val = substr($val, 0, strpos($val, ';')); - - if (! isset($attachment_common_types[$val])) { - $attachment_common_types[$val] = true; - } - } -} +/** This is the redirect page */ +define('PAGE_NAME', 'redirect'); +/** + * Include the SquirrelMail initialization file. + */ +require('../include/init.php'); -/* Before starting the session, the base URI must be known. Assuming */ -/* that this file is in the src/ subdirectory (or something). */ -ereg ("(^.*/)[^/]+/[^/]+$", $PHP_SELF, $regs); -$base_uri = $regs[1]; +/* SquirrelMail required files. */ +require_once(SM_PATH . 'functions/imap_general.php'); +require_once(SM_PATH . 'functions/strings.php'); +// Disable browser caching +// +header('Cache-Control: no-cache, no-store, must-revalidate, max-age=0'); header('Pragma: no-cache'); +header('Expires: Sat, 1 Jan 2000 00:00:00 GMT'); $location = get_location(); -session_set_cookie_params (0, $base_uri); -session_start(); +// session_set_cookie_params (0, $base_uri); -session_unregister ('user_is_logged_in'); -session_register ('base_uri'); +sqsession_unregister ('user_is_logged_in'); +sqsession_register ($base_uri, 'base_uri'); -if (! isset($squirrelmail_language) || - $squirrelmail_language == '' ) { +/* get globals we me need */ +sqGetGlobalVar('login_username', $login_username); +sqGetGlobalVar('secretkey', $secretkey); +if(!sqGetGlobalVar('squirrelmail_language', $squirrelmail_language) || $squirrelmail_language == '') { $squirrelmail_language = $squirrelmail_default_language; } +if (!sqgetGlobalVar('mailtodata', $mailtodata)) { + $mailtodata = ''; +} + +/* end of get globals */ + set_up_language($squirrelmail_language, true); /* Refresh the language cookie. */ -setcookie('squirrelmail_language', $squirrelmail_language, time()+2592000,$base_uri); +sqsetcookie('squirrelmail_language', $squirrelmail_language, time()+2592000, + $base_uri); if (!isset($login_username)) { - displayHtmlHeader( _("You must be logged in to access this page.") ); - echo "\n" . - "
 
\n" . - "
\n" . - '' . _("You must be logged in to access this page.") . "
" . - '' . _("Go to the login page") . "\n" . - "
\n" . - "\n"; + logout_error( _("You must be logged in to access this page.") ); exit; } -if (!session_is_registered('user_is_logged_in')) { - do_hook ('login_before'); +do_hook('login_before', $null); - $onetimepad = OneTimePadCreate(strlen($secretkey)); - $key = OneTimePadEncrypt($secretkey, $onetimepad); - session_register('onetimepad'); +$onetimepad = OneTimePadCreate(strlen($secretkey)); +$key = OneTimePadEncrypt($secretkey, $onetimepad); - /* Verify that username and password are correct. */ - if ($force_username_lowercase) { - $login_username = strtolower($login_username); - } +/* remove redundant spaces */ +$login_username = trim($login_username); - $imapConnection = sqimap_login($login_username, $key, $imapServerAddress, $imapPort, 0); - if (!$imapConnection) { - displayHtmlHeader( _("There was an error contacting the mail server.") ); - echo "\n". - "

\n". - "
\n". - '' . _("There was an error contacting the mail server.") . "
\n". - _("Contact your administrator for help.") . "\n". - "
\n". - "\n"; - exit; - } else { - $delimiter = sqimap_get_delimiter ($imapConnection); - } - sqimap_logout($imapConnection); - session_register('delimiter'); +/* Case-normalise username if so desired */ +if ($force_username_lowercase) { + $login_username = strtolower($login_username); +} - $username = $login_username; - session_register ('username'); - setcookie('key', $key, 0, $base_uri); - do_hook ('login_verified'); +/* Verify that username and password are correct. */ +$imapConnection = sqimap_login($login_username, $key, $imapServerAddress, $imapPort, 0); +/* From now on we are logged it. If the login failed then sqimap_login handles it */ +/** + * Regenerate session id to make sure that authenticated session uses + * different ID than one used before user authenticated. This is a + * countermeasure against session fixation attacks. + * NB: session_regenerate_id() was added in PHP 4.3.2 (and new session + * cookie is only sent out in this call as of PHP 4.3.3), but PHP 4 + * is not vulnerable to session fixation problems in SquirrelMail + * because it prioritizes $base_uri subdirectory cookies differently + * than PHP 5, which is otherwise vulnerable. If we really want to, + * we could define our own session_regenerate_id() when one does not + * exist, but there seems to be no reason to do so. + */ +sqsession_is_active(); +if (function_exists('session_regenerate_id')) { + session_regenerate_id(); } +/** +* The cookie part. session_start and session_regenerate_session normally set +* their own cookie. SquirrelMail sets another cookie which overwites the +* php cookies. The sqsetcookie function sets the cookie by using the header +* function which gives us full control how the cookie is set. We do that +* to add the HttpOnly cookie attribute which blocks javascript access on +* IE6 SP1. +*/ +sqsetcookie(session_name(),session_id(),false,$base_uri); +sqsetcookie('key', $key, false, $base_uri); + +sqsession_register($onetimepad, 'onetimepad'); + +$sqimap_capabilities = sqimap_capability($imapConnection); + +/* Server side sorting control */ +if (isset($sqimap_capabilities['SORT']) && $sqimap_capabilities['SORT'] == true && + isset($disable_server_sort) && $disable_server_sort) { + unset($sqimap_capabilities['SORT']); +} + +/* Thread sort control */ +if (isset($sqimap_capabilities['THREAD']) && $sqimap_capabilities['THREAD'] == true && + isset($disable_thread_sort) && $disable_thread_sort) { + unset($sqimap_capabilities['THREAD']); +} + +sqsession_register($sqimap_capabilities, 'sqimap_capabilities'); +$delimiter = sqimap_get_delimiter ($imapConnection); + +if (isset($sqimap_capabilities['NAMESPACE']) && $sqimap_capabilities['NAMESPACE'] == true) { + $namespace = sqimap_get_namespace($imapConnection); + sqsession_register($namespace, 'sqimap_namespace'); +} + +sqimap_logout($imapConnection); +sqsession_register($delimiter, 'delimiter'); + +$username = $login_username; +sqsession_register ($username, 'username'); +do_hook('login_verified', $null); + /* Set the login variables. */ $user_is_logged_in = true; $just_logged_in = true; /* And register with them with the session. */ -session_register ('user_is_logged_in'); -session_register ('just_logged_in'); +sqsession_register ($user_is_logged_in, 'user_is_logged_in'); +sqsession_register ($just_logged_in, 'just_logged_in'); /* parse the accepted content-types of the client */ $attachment_common_types = array(); $attachment_common_types_parsed = array(); -session_register('attachment_common_types'); -session_register('attachment_common_types_parsed'); +sqsession_register($attachment_common_types, 'attachment_common_types'); +sqsession_register($attachment_common_types_parsed, 'attachment_common_types_parsed'); -$debug = false; -if (isset($HTTP_SERVER_VARS['HTTP_ACCEPT']) && - !isset($attachment_common_types_parsed[$HTTP_SERVER_VARS['HTTP_ACCEPT']])) - attachment_common_parse($HTTP_SERVER_VARS['HTTP_ACCEPT'], $debug); -if (isset($HTTP_ACCEPT) && - !isset($attachment_common_types_parsed[$HTTP_ACCEPT])) - attachment_common_parse($HTTP_ACCEPT, $debug); +if ( sqgetGlobalVar('HTTP_ACCEPT', $http_accept, SQ_SERVER) && + !isset($attachment_common_types_parsed[$http_accept]) ) { + attachment_common_parse($http_accept); +} +// having just logged in, need to synch the template file cache +// so the right template set is displayed (per user prefs) +require(SM_PATH . 'include/load_prefs.php'); +global $sTemplateID; +Template::cache_template_file_hierarchy($sTemplateID, TRUE); /* Complete autodetection of Javascript. */ -$javascript_setting = getPref - ($data_dir, $username, 'javascript_setting', SMPREF_JS_AUTODETECT); -$js_autodetect_results = (isset($js_autodetect_results) ? - $js_autodetect_results : SMPREF_JS_OFF); -if ($javascript_setting == SMPREF_JS_AUTODETECT) { - if ($js_autodetect_results == SMPREF_JS_ON) { - setPref($data_dir, $username, 'javascript_on', SMPREF_JS_ON); - } else { - setPref($data_dir, $username, 'javascript_on', SMPREF_JS_OFF); +checkForJavascript(); + +/* Compute the URL to forward the user to. */ +$redirect_url = $location . '/webmail.php'; + +if ( sqgetGlobalVar('session_expired_location', $session_expired_location, SQ_SESSION) ) { + sqsession_unregister('session_expired_location'); + if ( $session_expired_location == 'compose' ) { + $compose_new_win = getPref($data_dir, $username, 'compose_new_win', 0); + if ($compose_new_win) { + // do not prefix $location here because $session_expired_location is set to the PAGE_NAME + // of the last page + $redirect_url = $location . '/' . $session_expired_location . '.php'; + } else { + $redirect_url = $location . '/webmail.php?right_frame=' . urlencode($session_expired_location . '.php'); + } + } else if ($session_expired_location != 'webmail' + && $session_expired_location != 'left_main') { + $redirect_url = $location . '/webmail.php?right_frame=' . urlencode($session_expired_location . '.php'); } -} else { - setPref($data_dir, $username, 'javascript_on', SMPREF_JS_OFF); + unset($session_expired_location); } -/* Compute the URL to forward the user to. */ -if(isset($rcptemail)) { - $redirect_url = 'webmail.php?right_frame=compose.php&rcptaddress='; - $redirect_url .= urlencode($rcptemail); -} else { - $redirect_url = 'webmail.php'; +if($mailtodata != '') { + $redirect_url = $location . '/webmail.php?right_frame=compose.php&mailtodata='; + $redirect_url .= urlencode($mailtodata); } -/* Send them off to the appropriate page. */ +/* Write session data and send them off to the appropriate page. */ +session_write_close(); header("Location: $redirect_url"); +exit; + +/* --------------------- end main ----------------------- */ -?> +function attachment_common_parse($str) { + global $attachment_common_types, $attachment_common_types_parsed; + + /* + * Replace ", " with "," and explode on that as Mozilla 1.x seems to + * use "," to seperate whilst IE, and earlier versions of Mozilla use + * ", " to seperate + */ + + $str = str_replace( ', ' , ',' , $str ); + $types = explode(',', $str); + + foreach ($types as $val) { + // Ignore the ";q=1.0" stuff + if (strpos($val, ';') !== false) { + $val = substr($val, 0, strpos($val, ';')); + } + if (! isset($attachment_common_types[$val])) { + $attachment_common_types[$val] = true; + } + } + sqsession_register($attachment_common_types, 'attachment_common_types'); + + /* mark as parsed */ + $attachment_common_types_parsed[$str] = true; +}