Source for file redirect.php

Documentation is available at redirect.php

  1. <?php
  2.  
  3. /**
  4.  * Prevents users from reposting their form data after a successful logout.
  5.  *
  6.  * Derived from webmail.php by Ralf Kraudelt <[email protected]>
  7.  *
  8.  * @copyright &copy; 1999-2006 The SquirrelMail Project Team
  9.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  10.  * @version $Id: redirect.php,v 1.72.2.13 2006/08/03 15:13:36 kink Exp $
  11.  * @package squirrelmail
  12.  */
  13.  
  14. /**
  15.  * Path for SquirrelMail required files.
  16.  * @ignore
  17.  */
  18. define('SM_PATH','../');
  19.  
  20. /* SquirrelMail required files. */
  21. require_once(SM_PATH . 'functions/global.php');
  22. require_once(SM_PATH . 'functions/i18n.php');
  23. require_once(SM_PATH . 'functions/strings.php');
  24. require_once(SM_PATH . 'config/config.php');
  25. require_once(SM_PATH . 'functions/prefs.php');
  26. require_once(SM_PATH . 'functions/imap.php');
  27. require_once(SM_PATH . 'functions/plugin.php');
  28. require_once(SM_PATH . 'functions/constants.php');
  29. require_once(SM_PATH . 'functions/page_header.php');
  30.  
  31. /* Before starting the session, the base URI must be known. Assuming */
  32. /* that this file is in the src/ subdirectory (or something).        */
  33. if (!function_exists('sqm_baseuri')){
  34.     require_once(SM_PATH . 'functions/display_messages.php');
  35. }
  36. $base_uri = sqm_baseuri();
  37.  
  38. header('Pragma: no-cache');
  39. $location = get_location();
  40.  
  41. session_set_cookie_params (0, $base_uri);
  42. sqsession_is_active();
  43.  
  44. sqsession_unregister ('user_is_logged_in');
  45. sqsession_register ($base_uri, 'base_uri');
  46.  
  47. /* get globals we me need */
  48. sqGetGlobalVar('login_username', $login_username);
  49. sqGetGlobalVar('secretkey', $secretkey);
  50. sqGetGlobalVar('js_autodetect_results', $js_autodetect_results);
  51. if(!sqGetGlobalVar('squirrelmail_language', $squirrelmail_language) || $squirrelmail_language == '') {
  52.     $squirrelmail_language = $squirrelmail_default_language;
  53. }
  54.  
  55. if (!sqgetGlobalVar('mailto', $mailto)) {
  56.     $mailto = '';
  57. }
  58.  
  59.  
  60. /* end of get globals */
  61.  
  62. set_up_language($squirrelmail_language, true);
  63. /* Refresh the language cookie. */
  64. setcookie('squirrelmail_language', $squirrelmail_language, time()+2592000,
  65.           $base_uri);
  66.  
  67. if (!isset($login_username)) {
  68.     include_once(SM_PATH .  'functions/display_messages.php' );
  69.     logout_error( _("You must be logged in to access this page.") );
  70.     exit;
  71. }
  72.  
  73. if (!sqsession_is_registered('user_is_logged_in')) {
  74.     do_hook ('login_before');
  75.  
  76.     $onetimepad = OneTimePadCreate(strlen($secretkey));
  77.     $key = OneTimePadEncrypt($secretkey, $onetimepad);
  78.     sqsession_register($onetimepad, 'onetimepad');
  79.  
  80.     /* remove redundant spaces */
  81.     $login_username = trim($login_username);
  82.  
  83.     /* Verify that username and password are correct. */
  84.     if ($force_username_lowercase) {
  85.         $login_username = strtolower($login_username);
  86.     }
  87.  
  88.     $imapConnection = sqimap_login($login_username, $key, $imapServerAddress, $imapPort, 0);
  89.  
  90.     $sqimap_capabilities = sqimap_capability($imapConnection);
  91.     sqsession_register($sqimap_capabilities, 'sqimap_capabilities');
  92.     $delimiter = sqimap_get_delimiter ($imapConnection);
  93.  
  94.     sqimap_logout($imapConnection);
  95.     sqsession_register($delimiter, 'delimiter');
  96.  
  97.     $username = $login_username;
  98.     sqsession_register ($username, 'username');
  99.     setcookie('key', $key, 0, $base_uri);
  100.     do_hook ('login_verified');
  101.  
  102. }
  103.  
  104. /* Set the login variables. */
  105. $user_is_logged_in = true;
  106. $just_logged_in = true;
  107.  
  108. /* And register with them with the session. */
  109. sqsession_register ($user_is_logged_in, 'user_is_logged_in');
  110. sqsession_register ($just_logged_in, 'just_logged_in');
  111.  
  112. /* parse the accepted content-types of the client */
  113. $attachment_common_types = array();
  114. $attachment_common_types_parsed = array();
  115. sqsession_register($attachment_common_types, 'attachment_common_types');
  116. sqsession_register($attachment_common_types_parsed, 'attachment_common_types_parsed');
  117.  
  118. $debug = false;
  119.  
  120. if ( sqgetGlobalVar('HTTP_ACCEPT', $http_accept, SQ_SERVER) &&
  121.     !isset($attachment_common_types_parsed[$http_accept]) ) {
  122.     attachment_common_parse($http_accept, $debug);
  123. }
  124.  
  125. /* Complete autodetection of Javascript. */
  126. $javascript_setting = getPref
  127.     ($data_dir, $username, 'javascript_setting', SMPREF_JS_AUTODETECT);
  128. $js_autodetect_results = (isset($js_autodetect_results) ?
  129.     $js_autodetect_results : SMPREF_JS_OFF);
  130. /* See if it's set to "Always on" */
  131. $js_pref = SMPREF_JS_ON;
  132. if ($javascript_setting != SMPREF_JS_ON){
  133.     if ($javascript_setting == SMPREF_JS_AUTODETECT) {
  134.         if ($js_autodetect_results == SMPREF_JS_OFF) {
  135.             $js_pref = SMPREF_JS_OFF;
  136.         }
  137.     } else {
  138.         $js_pref = SMPREF_JS_OFF;
  139.     }
  140. }
  141. /* Update the prefs */
  142. setPref($data_dir, $username, 'javascript_on', $js_pref);
  143.  
  144. /* Compute the URL to forward the user to. */
  145. $redirect_url = 'webmail.php';
  146.  
  147. if ( sqgetGlobalVar('session_expired_location', $session_expired_location, SQ_SESSION) ) {
  148.     sqsession_unregister('session_expired_location');
  149.     if ( strpos($session_expired_location, 'compose.php') !== FALSE ) {
  150.         $compose_new_win = getPref($data_dir, $username, 'compose_new_win', 0);
  151.         if ($compose_new_win) {
  152.             $redirect_url = $session_expired_location;
  153.         } elseif ( strpos($session_expired_location, 'webmail.php') === FALSE ) {
  154.             $redirect_url = 'webmail.php?right_frame=compose.php';
  155.         }
  156.     } else {
  157.         $redirect_url = 'webmail.php?right_frame=' . urldecode($session_expired_location);
  158.     }
  159.     unset($session_expired_location);
  160. }
  161.  
  162. if($mailto != '') {
  163.     $redirect_url  = $location . '/webmail.php?right_frame=compose.php&mailto=';
  164.     $redirect_url .= urlencode($mailto);
  165. }
  166.  
  167.  
  168.  
  169. /* Write session data and send them off to the appropriate page. */
  170. session_write_close();
  171. header("Location: $redirect_url");
  172.  
  173. /* --------------------- end main ----------------------- */
  174.  
  175. function attachment_common_parse($str, $debug) {
  176.     global $attachment_common_types, $attachment_common_types_parsed;
  177.  
  178.     $attachment_common_types_parsed[$str] = true;
  179.  
  180.     /*
  181.      * Replace ", " with "," and explode on that as Mozilla 1.x seems to
  182.      * use "," to seperate whilst IE, and earlier versions of Mozilla use
  183.      * ", " to seperate
  184.      */
  185.  
  186.     $str = str_replace( ', ' , ',' , $str );
  187.     $types = explode(',', $str);
  188.  
  189.     foreach ($types as $val) {
  190.         // Ignore the ";q=1.0" stuff
  191.         if (strpos($val, ';') !== false)
  192.             $val = substr($val, 0, strpos($val, ';'));
  193.  
  194.         if (! isset($attachment_common_types[$val])) {
  195.             $attachment_common_types[$val] = true;
  196.         }
  197.     }
  198.     sqsession_register($attachment_common_types, 'attachment_common_types');
  199. }
  200.  
  201. ?>

Documentation generated on Sat, 07 Oct 2006 16:33:12 +0300 by phpDocumentor 1.3.0RC6