<?php
/**
- * redirect.php
- * Derived from webmail.php by Ralf Kraudelt <kraude@wiwi.uni-rostock.de>
- *
- * 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$
- */
+* redirect.php
+* Derived from webmail.php by Ralf Kraudelt <kraude@wiwi.uni-rostock.de>
+*
+* Copyright (c) 1999-2004 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.
+*
+* @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');
-
- 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;
- }
- }
+/**
+ * Path for SquirrelMail required files.
+ * @ignore
+ */
+define('SM_PATH','../');
+
+/* SquirrelMail required files. */
+require_once(SM_PATH . 'functions/global.php');
+require_once(SM_PATH . 'functions/i18n.php');
+require_once(SM_PATH . 'functions/strings.php');
+require_once(SM_PATH . 'config/config.php');
+require_once(SM_PATH . 'functions/prefs.php');
+require_once(SM_PATH . 'functions/imap.php');
+require_once(SM_PATH . 'functions/plugin.php');
+require_once(SM_PATH . 'functions/constants.php');
+require_once(SM_PATH . 'functions/page_header.php');
+
+/* Before starting the session, the base URI must be known. Assuming */
+/* that this file is in the src/ subdirectory (or something). */
+if (!function_exists('sqm_baseuri')){
+ require_once(SM_PATH . 'functions/display_messages.php');
+}
+$base_uri = sqm_baseuri();
+
+header('Pragma: no-cache');
+$location = get_location();
+
+session_set_cookie_params (0, $base_uri);
+sqsession_is_active();
+
+sqsession_unregister ('user_is_logged_in');
+sqsession_register ($base_uri, 'base_uri');
+
+/* 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('mailto', $mailto)) {
+ $mailto = '';
+}
+
+/* end of get globals */
+
+set_up_language($squirrelmail_language, true);
+/* Refresh the language cookie. */
+setcookie('squirrelmail_language', $squirrelmail_language, time()+2592000,
+ $base_uri);
+
+if (!isset($login_username)) {
+ include_once(SM_PATH . 'functions/display_messages.php' );
+ logout_error( _("You must be logged in to access this page.") );
+ exit;
+}
+
+if (!sqsession_is_registered('user_is_logged_in')) {
+ do_hook ('login_before');
+
+ $onetimepad = OneTimePadCreate(strlen($secretkey));
+ $key = OneTimePadEncrypt($secretkey, $onetimepad);
+ sqsession_register($onetimepad, 'onetimepad');
+
+ /* remove redundant spaces */
+ $login_username = trim($login_username);
+
+ /* Verify that username and password are correct. */
+ if ($force_username_lowercase) {
+ $login_username = strtolower($login_username);
}
+ $imapConnection = sqimap_login($login_username, $key, $imapServerAddress, $imapPort, 0);
- /* 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];
+ $sqimap_capabilities = sqimap_capability($imapConnection);
+ sqsession_register($sqimap_capabilities, 'sqimap_capabilities');
+ $delimiter = sqimap_get_delimiter ($imapConnection);
- header('Pragma: no-cache');
- $location = get_location();
+ sqimap_logout($imapConnection);
+ sqsession_register($delimiter, 'delimiter');
- session_set_cookie_params (0, $base_uri);
- session_start();
+ $username = $login_username;
+ sqsession_register ($username, 'username');
+ setcookie('key', $key, 0, $base_uri);
+ do_hook ('login_verified');
- session_unregister ('user_is_logged_in');
- session_register ('base_uri');
+}
- if (! isset($squirrelmail_language) ||
- $squirrelmail_language == '' ) {
- $squirrelmail_language = $squirrelmail_default_language;
- }
- set_up_language($squirrelmail_language, true);
- /* Refresh the language cookie. */
- setcookie('squirrelmail_language', $squirrelmail_language, time()+2592000,$base_uri);
-
- if (!isset($login_username)) {
- echo "<HTML><BODY BGCOLOR=\"#ffffff\">\n" .
- "<BR> <BR>\n" .
- "<CENTER>\n" .
- '<B>' . _("You must be logged in to access this page.") . "</B><BR>" .
- '<A HREF="../src/login.php">' . _("Go to the login page") . "</A>\n" .
- "</CENTER>\n" .
- "</BODY></HTML>\n";
- exit;
- }
+/* Set the login variables. */
+$user_is_logged_in = true;
+$just_logged_in = true;
- if (!session_is_registered('user_is_logged_in')) {
- do_hook ('login_before');
+/* And register with them with the session. */
+sqsession_register ($user_is_logged_in, 'user_is_logged_in');
+sqsession_register ($just_logged_in, 'just_logged_in');
- $onetimepad = OneTimePadCreate(strlen($secretkey));
- $key = OneTimePadEncrypt($secretkey, $onetimepad);
- session_register('onetimepad');
+/* parse the accepted content-types of the client */
+$attachment_common_types = array();
+$attachment_common_types_parsed = array();
+sqsession_register($attachment_common_types, 'attachment_common_types');
+sqsession_register($attachment_common_types_parsed, 'attachment_common_types_parsed');
- /* Verify that username and password are correct. */
- if ($force_username_lowercase) {
- $login_username = strtolower($login_username);
- }
-
- $imapConnection = sqimap_login($login_username, $key, $imapServerAddress, $imapPort, 0);
- if (!$imapConnection) {
- echo "<html><body bgcolor=\"#ffffff\">\n".
- "<br> <br>\n".
- "<center>\n".
- '<b>' . _("There was an error contacting the mail server.") . "</b><br>\n".
- _("Contact your administrator for help.") . "\n".
- "</center>\n".
- "</body></html>\n";
- exit;
- } else {
- $delimiter = sqimap_get_delimiter ($imapConnection);
- }
- sqimap_logout($imapConnection);
- session_register('delimiter');
+$debug = false;
- $username = $login_username;
- session_register ('username');
- setcookie('key', $key, 0, $base_uri);
- do_hook ('login_verified');
+if ( sqgetGlobalVar('HTTP_ACCEPT', $http_accept, SQ_SERVER) &&
+ !isset($attachment_common_types_parsed[$http_accept]) ) {
+ attachment_common_parse($http_accept, $debug);
+}
- setPref( $data_dir, $username, 'counter',
- getPref( $data_dir, $username, 'counter', 0 ) + 1 );
- }
+/* Complete autodetection of Javascript. */
+checkForJavascript();
- /* 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');
-
- /* 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');
-
- $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);
-
-
- /* 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);
- }
- } else {
- setPref($data_dir, $username, 'javascript_on', SMPREF_JS_OFF);
- }
+/* Compute the URL to forward the user to. */
+$redirect_url = $location . '/webmail.php';
- /* 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 ( sqgetGlobalVar('session_expired_location', $session_expired_location, SQ_SESSION) ) {
+ sqsession_unregister('session_expired_location');
+ $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 PHP_SELF
+ // of the last page
+ $redirect_url = $session_expired_location;
+ } elseif ( strpos($session_expired_location, 'webmail.php') === FALSE ) {
+ $redirect_url = $location.'/webmail.php?right_frame='.urldecode($session_expired_location);
}
+ unset($session_expired_location);
+}
+if($mailto != '') {
+ $redirect_url = $location . '/webmail.php?right_frame=compose.php&mailto=';
+ $redirect_url .= $mailto;
+}
+
+/* Write session data and send them off to the appropriate page. */
+session_write_close();
+header("Location: $redirect_url");
+
+/* --------------------- end main ----------------------- */
+
+function attachment_common_parse($str, $debug) {
+ global $attachment_common_types, $attachment_common_types_parsed;
+
+ $attachment_common_types_parsed[$str] = true;
- /* Send them off to the appropriate page. */
- header("Location: $redirect_url");
+ /*
+ * 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');
+}
-?>
+?>
\ No newline at end of file
projects / squirrelmail.git / blobdiff