2001-01-11 20:41:38 +01:00
|
|
|
<?php
|
2007-11-25 18:26:08 +01:00
|
|
|
/**
|
|
|
|
* eGroupWare API loader
|
|
|
|
*
|
|
|
|
* Rewritten by RalfBecker@outdoor-training.de to store the eGW enviroment
|
|
|
|
* (egw-object and egw_info-array) in a php-session and restore it from
|
|
|
|
* there instead of creating it completly new on each page-request.
|
|
|
|
* The enviroment gets now created by the egw-class
|
2008-04-22 12:11:49 +02:00
|
|
|
*
|
2007-11-25 18:26:08 +01:00
|
|
|
* This file was originaly written by Dan Kuykendall and Joseph Engo
|
|
|
|
* Copyright (C) 2000, 2001 Dan Kuykendall
|
|
|
|
*
|
|
|
|
* @link http://www.egroupware.org
|
|
|
|
* @author Ralf Becker <RalfBecker-AT-outdoor-training.de>
|
|
|
|
* @package api
|
|
|
|
* @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
|
|
|
|
* @version $Id$
|
|
|
|
*/
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
error_reporting(E_ALL & ~E_NOTICE);
|
|
|
|
magic_quotes_runtime(false);
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
$egw_min_php_version = '5.1';
|
|
|
|
if (!function_exists('version_compare') || version_compare(PHP_VERSION,$egw_min_php_version) < 0)
|
|
|
|
{
|
|
|
|
die("eGroupWare requires PHP $egw_min_php_version or greater.<br />Please contact your System Administrator to upgrade PHP!");
|
|
|
|
}
|
|
|
|
// check if eGW's pear repository is installed and prefer it over the other ones
|
2008-04-22 12:11:49 +02:00
|
|
|
if (is_dir(EGW_SERVER_ROOT.'/egw-pear'))
|
2007-11-25 18:26:08 +01:00
|
|
|
{
|
|
|
|
set_include_path(EGW_SERVER_ROOT.'/egw-pear'.PATH_SEPARATOR.get_include_path());
|
|
|
|
//echo "<p align=right>include_path='".get_include_path()."'</p>\n";
|
|
|
|
}
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
if (!defined('EGW_API_INC')) define('EGW_API_INC',PHPGW_API_INC); // this is to support the header upgrade
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
/* Make sure the header.inc.php is current. */
|
|
|
|
if (!isset($GLOBALS['egw_domain']) || $GLOBALS['egw_info']['server']['versions']['header'] < $GLOBALS['egw_info']['server']['versions']['current_header'])
|
|
|
|
{
|
|
|
|
echo '<center><b>You need to update your header.inc.php file to version '.
|
|
|
|
$GLOBALS['egw_info']['server']['versions']['current_header'].
|
|
|
|
' by running <a href="setup/manageheader.php">setup/headeradmin</a>.</b></center>';
|
|
|
|
exit;
|
|
|
|
}
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
/* Make sure the developer is following the rules. */
|
|
|
|
if (!isset($GLOBALS['egw_info']['flags']['currentapp']))
|
|
|
|
{
|
|
|
|
echo "<p><b>!!! YOU DO NOT HAVE YOUR \$GLOBALS['egw_info']['flags']['currentapp'] SET !!!<br>\n";
|
|
|
|
echo '!!! PLEASE CORRECT THIS SITUATION !!!</b></p>';
|
|
|
|
}
|
|
|
|
|
2008-10-08 20:38:30 +02:00
|
|
|
require_once(EGW_API_INC.'/common_functions.inc.php');
|
2007-11-25 18:26:08 +01:00
|
|
|
|
2008-08-07 23:12:44 +02:00
|
|
|
// init eGW's sessions-handler
|
|
|
|
egw_session::init_handler();
|
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
// check if we can restore the eGW enviroment from the php-session
|
2008-08-07 23:12:44 +02:00
|
|
|
if ($_REQUEST[egw_session::EGW_SESSION_NAME])
|
2007-11-25 18:26:08 +01:00
|
|
|
{
|
|
|
|
if ($GLOBALS['egw_info']['flags']['currentapp'] != 'login' && $GLOBALS['egw_info']['flags']['currentapp'] != 'logout')
|
|
|
|
{
|
2008-10-08 20:38:30 +02:00
|
|
|
if (is_array($_SESSION[egw_session::EGW_INFO_CACHE]) && $_SESSION[egw_session::EGW_OBJECT_CACHE] && $_SESSION[egw_session::EGW_REQUIRED_FILES])
|
2001-08-08 02:13:00 +02:00
|
|
|
{
|
2008-03-21 21:11:59 +01:00
|
|
|
// marking the context as restored from the session, used by session->verify to not read the data from the db again
|
2007-11-25 18:26:08 +01:00
|
|
|
$GLOBALS['egw_info']['flags']['restored_from_session'] = true;
|
|
|
|
|
|
|
|
// restoring the egw_info-array
|
2008-10-08 20:38:30 +02:00
|
|
|
$GLOBALS['egw_info'] = array_merge($_SESSION[egw_session::EGW_INFO_CACHE],array('flags' => $GLOBALS['egw_info']['flags']));
|
2007-11-25 18:26:08 +01:00
|
|
|
|
2008-03-21 21:11:59 +01:00
|
|
|
// include required class-definitions
|
2008-10-08 20:38:30 +02:00
|
|
|
if (is_array($_SESSION[egw_session::EGW_REQUIRED_FILES])) // all classes, which can not be autoloaded
|
2005-08-13 15:16:01 +02:00
|
|
|
{
|
2008-10-08 20:38:30 +02:00
|
|
|
foreach($_SESSION[egw_session::EGW_REQUIRED_FILES] as $file)
|
2008-03-21 21:11:59 +01:00
|
|
|
{
|
|
|
|
require_once($file);
|
|
|
|
}
|
2005-08-13 15:16:01 +02:00
|
|
|
}
|
2008-10-08 20:38:30 +02:00
|
|
|
$GLOBALS['egw'] = unserialize($_SESSION[egw_session::EGW_OBJECT_CACHE]);
|
2008-01-25 11:54:51 +01:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
if (is_object($GLOBALS['egw']))
|
|
|
|
{
|
|
|
|
$GLOBALS['egw']->wakeup2(); // adapt the restored egw-object/enviroment to this request (eg. changed current app)
|
|
|
|
|
|
|
|
//printf("<p style=\"position: absolute; right: 0px; top: 0px;\">egw-enviroment restored in %d ms</p>\n",1000*(perfgetmicrotime()-$GLOBALS['egw_info']['flags']['page_start_time']));
|
2008-03-22 17:22:11 +01:00
|
|
|
$GLOBALS['egw_info']['flags']['session_restore_time'] = microtime(true) - $GLOBALS['egw_info']['flags']['page_start_time'];
|
2007-11-25 18:26:08 +01:00
|
|
|
if (is_object($GLOBALS['egw']->translation)) return; // exit this file, as the rest of the file creates a new egw-object and -enviroment
|
|
|
|
}
|
|
|
|
// egw object could NOT be restored from the session, create a new one
|
|
|
|
unset($GLOBALS['egw']);
|
|
|
|
$GLOBALS['egw_info'] = array('flags'=>$GLOBALS['egw_info']['flags']);
|
|
|
|
unset($GLOBALS['egw_info']['flags']['restored_from_session']);
|
2008-10-08 20:38:30 +02:00
|
|
|
unset($_SESSION[egw_session::EGW_INFO_CACHE]);
|
|
|
|
unset($_SESSION[egw_session::EGW_REQUIRED_FILES]);
|
|
|
|
unset($_SESSION[egw_session::EGW_OBJECT_CACHE]);
|
2005-08-13 15:16:01 +02:00
|
|
|
}
|
2007-11-25 18:26:08 +01:00
|
|
|
//echo "<p>could not restore egw_info and the egw-object!!!</p>\n";
|
|
|
|
}
|
|
|
|
else // destroy the session-cache if called by login or logout
|
|
|
|
{
|
2008-10-08 20:38:30 +02:00
|
|
|
unset($_SESSION[egw_session::EGW_INFO_CACHE]);
|
|
|
|
unset($_SESSION[egw_session::EGW_REQUIRED_FILES]);
|
|
|
|
unset($_SESSION[egw_session::EGW_OBJECT_CACHE]);
|
2005-07-17 23:00:49 +02:00
|
|
|
}
|
2007-11-25 18:26:08 +01:00
|
|
|
}
|
|
|
|
print_debug('sane environment','messageonly','api');
|
2005-07-17 23:00:49 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
/****************************************************************************\
|
|
|
|
* Multi-Domain support *
|
|
|
|
\****************************************************************************/
|
2008-10-26 13:18:57 +01:00
|
|
|
$GLOBALS['egw_info']['user']['domain'] = egw_session::search_instance(
|
|
|
|
isset($_POST['login']) ? $_POST['login'] : (isset($_SERVER['PHP_AUTH_USER']) ? $_SERVER['PHP_AUTH_USER'] : $_SERVER['REMOTE_USER']),
|
|
|
|
$_REQUEST['domain'],$GLOBALS['egw_info']['server']['default_domain'],$_SERVER['SERVER_NAME'],$GLOBALS['egw_domain']);
|
2008-08-07 23:12:44 +02:00
|
|
|
|
|
|
|
$GLOBALS['egw_info']['server']['db_host'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_host'];
|
|
|
|
$GLOBALS['egw_info']['server']['db_port'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_port'];
|
|
|
|
$GLOBALS['egw_info']['server']['db_name'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_name'];
|
|
|
|
$GLOBALS['egw_info']['server']['db_user'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_user'];
|
|
|
|
$GLOBALS['egw_info']['server']['db_pass'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_pass'];
|
|
|
|
$GLOBALS['egw_info']['server']['db_type'] = $GLOBALS['egw_domain'][$GLOBALS['egw_info']['user']['domain']]['db_type'];
|
2007-11-25 18:26:08 +01:00
|
|
|
print_debug('domain',@$GLOBALS['egw_info']['user']['domain'],'api');
|
|
|
|
|
|
|
|
// the egw-object instanciates all sub-classes (eg. $GLOBALS['egw']->db) and the egw_info array
|
2008-03-21 21:11:59 +01:00
|
|
|
$GLOBALS['egw'] = new egw(array_keys($GLOBALS['egw_domain']));
|
2007-11-25 18:26:08 +01:00
|
|
|
|
2008-08-07 23:12:44 +02:00
|
|
|
if ($GLOBALS['egw_info']['flags']['currentapp'] != 'login' && !$GLOBALS['egw_info']['server']['show_domain_selectbox'])
|
2007-11-25 18:26:08 +01:00
|
|
|
{
|
2008-08-07 23:12:44 +02:00
|
|
|
unset ($GLOBALS['egw_domain']); // we kill this for security reasons
|
2007-11-25 18:26:08 +01:00
|
|
|
}
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2007-11-25 18:26:08 +01:00
|
|
|
// saving the the egw_info array and the egw-object in the session
|
2008-08-07 23:12:44 +02:00
|
|
|
if ($GLOBALS['egw_info']['flags']['currentapp'] != 'login')
|
2007-11-25 18:26:08 +01:00
|
|
|
{
|
2008-10-08 20:38:30 +02:00
|
|
|
$_SESSION[egw_session::EGW_INFO_CACHE] = $GLOBALS['egw_info'];
|
|
|
|
unset($_SESSION[egw_session::EGW_INFO_CACHE]['flags']); // dont save the flags, they change on each request
|
2005-08-13 15:16:01 +02:00
|
|
|
|
2008-10-08 20:38:30 +02:00
|
|
|
$_SESSION[egw_session::EGW_OBJECT_CACHE] = serialize($GLOBALS['egw']);
|
2007-11-25 18:26:08 +01:00
|
|
|
}
|