X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fredirect.php;h=dd9df62d3905f2a01b955010f4b63575204ca257;hp=516b0427272ffae02b54e4a28c5c8a68c5c1c1dd;hb=eb2ae346b59dfcb085536bd4a27e554f414044d6;hpb=5a545dda36125e9f8978dd42315680cebb68e3f0 diff --git a/src/redirect.php b/src/redirect.php index 516b0427..dd9df62d 100644 --- a/src/redirect.php +++ b/src/redirect.php @@ -1,176 +1,206 @@ - * - * Copyright (c) 1999-2001 The Squirrelmail Development 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-2007 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'); - -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'); header('Pragma: no-cache'); $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 the session id to avoid session hyijacking */ +//FIXME! IMPORTANT! SOMEONE PLEASE EXPLAIN THE SECURITY CONCERN HERE; THIS session_destroy() BORKS ANY SESSION INFORMATION ADDED ON THE LOGIN PAGE (SPECIFICALLY THE SESSION RESTORE DATA, BUT ALSO ANYTHING ADDED BY PLUGINS, ETC)... I HAVE DISABLED THIS (AND NOTE THAT THE LOGIN PAGE ALREADY EXECUTES A session_destroy() (see includes/init.php)), SO PLEASE, WHOEVER ADDED THIS, PLEASE ANALYSE THIS SITUATION AND COMMENT ON IF IT IS OK LIKE THIS!! WHAT HIJACKING ISSUES ARE WE SUPPOSED TO BE PREVENTING HERE? +//sqsession_destroy(); +//@sqsession_is_active(); +//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. */ -checkForPrefs($data_dir, $username); -$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; +}