2001-01-11 20:41:38 +01:00
< ? php
2001-09-06 21:23:56 +02:00
/************************************************************************** \
* phpGroupWare API - phpgwapi loader *
* This file written by Dan Kuykendall < seek3r @ phpgroupware . org > *
* and Joseph Engo < jengo @ phpgroupware . org > *
* Has a few functions , but primary role is to load the phpgwapi *
2002-05-06 11:05:44 +02:00
* Copyright ( C ) 2000 , 2001 , 2002 Dan Kuykendall *
2001-09-06 21:23:56 +02:00
* -------------------------------------------------------------------------*
* This library is part of the phpGroupWare API *
* http :// www . phpgroupware . org / api *
* ------------------------------------------------------------------------ *
* This library is free software ; you can redistribute it and / or modify it *
* under the terms of the GNU Lesser General Public License as published by *
* the Free Software Foundation ; either version 2.1 of the License , *
* or any later version . *
* This library is distributed in the hope that it will be useful , but *
* WITHOUT ANY WARRANTY ; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . *
* See the GNU Lesser General Public License for more details . *
* You should have received a copy of the GNU Lesser General Public License *
* along with this library ; if not , write to the Free Software Foundation , *
* Inc . , 59 Temple Place , Suite 330 , Boston , MA 02111 - 1307 USA *
\ **************************************************************************/
2001-08-08 16:03:20 +02:00
2001-09-06 10:27:22 +02:00
/* $Id$ */
2001-08-08 16:03:20 +02:00
2001-09-06 10:27:22 +02:00
/**************************************************************************** \
* If running in PHP3 , then load up the support functions file for *
* transparent support . *
\ ****************************************************************************/
2001-08-16 08:32:22 +02:00
2001-09-06 10:27:22 +02:00
if ( floor ( phpversion ()) == 3 )
{
2001-08-16 08:32:22 +02:00
include ( PHPGW_API_INC . '/php3_support_functions.inc.php' );
2001-09-06 10:27:22 +02:00
}
2001-08-16 08:32:22 +02:00
2002-03-01 13:31:50 +01:00
include ( PHPGW_API_INC . '/common_functions.inc.php' );
2002-02-12 10:10:40 +01:00
2001-08-08 16:03:20 +02:00
/*!
@ function lang
@ abstract function to handle multilanguage support
2001-09-06 10:27:22 +02:00
*/
2001-08-08 16:03:20 +02:00
function lang ( $key , $m1 = '' , $m2 = '' , $m3 = '' , $m4 = '' , $m5 = '' , $m6 = '' , $m7 = '' , $m8 = '' , $m9 = '' , $m10 = '' )
{
2001-09-06 21:23:56 +02:00
if ( is_array ( $m1 ))
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$vars = $m1 ;
2001-08-08 02:13:00 +02:00
}
else
{
2001-08-08 16:03:20 +02:00
$vars = array ( $m1 , $m2 , $m3 , $m4 , $m5 , $m6 , $m7 , $m8 , $m9 , $m10 );
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
$value = $GLOBALS [ 'phpgw' ] -> translation -> translate ( " $key " , $vars );
return $value ;
2001-08-08 02:13:00 +02:00
}
2002-05-31 11:25:52 +02:00
function lang_char ()
{
return $GLOBALS [ 'phpgw' ] -> translation -> translator_helper ;
}
2001-08-08 16:03:20 +02:00
2001-09-06 10:27:22 +02:00
/* Just a temp wrapper. ###DELETE_ME#### (Seek3r) */
2001-08-08 16:03:20 +02:00
function check_code ( $code )
{
return $GLOBALS [ 'phpgw' ] -> common -> check_code ( $code );
}
/**************************************************************************** \
* Quick verification of sane environment *
\ ****************************************************************************/
// error_reporting(7);
2001-09-06 10:27:22 +02:00
/* Make sure the header.inc.php is current. */
2001-08-08 16:03:20 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'versions' ][ 'header' ] < $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'versions' ][ 'current_header' ])
{
echo '<center><b>You need to port your settings to the new header.inc.php version.</b></center>' ;
exit ;
}
2001-09-06 10:27:22 +02:00
/* Make sure the developer is following the rules. */
2001-08-08 16:03:20 +02:00
if ( ! isset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ]))
2001-08-08 02:13:00 +02:00
{
2002-05-30 11:47:09 +02:00
$msgstring = '<b>!!! YOU DO NOT HAVE YOUR $GLOBALS[\'phpgw_info\'][\'flags\'][\'currentapp\'] SET !!!<br>!!! PLEASE CORRECT THIS SITUATION !!!</b>' ;
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'msgbox_data' ][ $msgstring ] = False ;
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
magic_quotes_runtime ( false );
2002-02-14 08:29:26 +01:00
@ print_debug ( 'sane environment' , 'messageonly' , 'api' );
2001-08-08 16:03:20 +02:00
/**************************************************************************** \
* Multi - Domain support *
\ ****************************************************************************/
/* make them fix their header */
if ( ! isset ( $GLOBALS [ 'phpgw_domain' ]))
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
echo '<center><b>The administrator must upgrade the header.inc.php file before you can continue.</b></center>' ;
exit ;
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
reset ( $GLOBALS [ 'phpgw_domain' ]);
$default_domain = each ( $GLOBALS [ 'phpgw_domain' ]);
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ] = $default_domain [ 0 ];
unset ( $default_domain ); // we kill this for security reasons
2002-04-30 05:35:52 +02:00
$GLOBALS [ 'login' ] = get_var ( 'login' , Array ( 'POST' ));
$GLOBALS [ 'logindomain' ] = get_var ( 'logindomain' , Array ( 'POST' ));
2001-09-06 10:27:22 +02:00
2001-08-08 16:03:20 +02:00
/* This code will handle virtdomains so that is a user logins with user@domain.com, it will switch into virtualization mode. */
2002-03-26 05:37:03 +01:00
if ( isset ( $domain ) && $domain )
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ] = $domain ;
}
2001-09-06 10:27:22 +02:00
elseif ( isset ( $GLOBALS [ 'login' ]) && isset ( $GLOBALS [ 'logindomain' ]))
2001-08-08 16:03:20 +02:00
{
2001-09-06 10:27:22 +02:00
if ( ! ereg ( " \ @ " , $GLOBALS [ 'login' ]))
2001-08-08 02:13:00 +02:00
{
2001-09-06 10:27:22 +02:00
$GLOBALS [ 'login' ] = $GLOBALS [ 'login' ] . '@' . $GLOBALS [ 'logindomain' ];
2001-08-08 02:13:00 +02:00
}
2001-09-06 10:27:22 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ] = $GLOBALS [ 'logindomain' ];
unset ( $GLOBALS [ 'logindomain' ]);
2001-08-08 02:13:00 +02:00
}
2001-09-06 10:27:22 +02:00
elseif ( isset ( $GLOBALS [ 'login' ]) && ! isset ( $GLOBALS [ 'logindomain' ]))
2001-08-08 02:13:00 +02:00
{
2001-09-06 10:27:22 +02:00
if ( ereg ( " \ @ " , $GLOBALS [ 'login' ]))
2001-08-08 02:13:00 +02:00
{
2001-09-06 10:27:22 +02:00
$login_array = explode ( '@' , $GLOBALS [ 'login' ]);
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ] = $login_array [ 1 ];
2001-08-08 02:13:00 +02:00
}
else
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ] = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ];
2001-09-06 10:27:22 +02:00
$GLOBALS [ 'login' ] = $GLOBALS [ 'login' ] . '@' . $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ];
2001-08-08 02:13:00 +02:00
}
}
2001-08-08 16:03:20 +02:00
if ( @ isset ( $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]]))
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_host' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]][ 'db_host' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_name' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]][ 'db_name' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_user' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]][ 'db_user' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_pass' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]][ 'db_pass' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_type' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ]][ 'db_type' ];
2001-08-08 02:13:00 +02:00
}
else
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_host' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ]][ 'db_host' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_name' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ]][ 'db_name' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_user' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ]][ 'db_user' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_pass' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ]][ 'db_pass' ];
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_type' ] = $GLOBALS [ 'phpgw_domain' ][ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'default_domain' ]][ 'db_type' ];
2001-08-08 02:13:00 +02:00
}
2001-08-07 18:02:55 +02:00
2001-08-08 16:03:20 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] != 'login' && ! $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'show_domain_selectbox' ])
2001-08-08 02:13:00 +02:00
{
2001-09-06 10:27:22 +02:00
unset ( $GLOBALS [ 'phpgw_domain' ]); // we kill this for security reasons
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
unset ( $domain ); // we kill this to save memory
2002-02-14 08:29:26 +01:00
@ print_debug ( 'domain' , $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'domain' ], 'api' );
2001-08-08 16:03:20 +02:00
2002-05-30 23:13:07 +02:00
/**************************************************************************** \
* These lines load up the API , fill up the $GLOBALS [ " phpgw_info " ] array , etc *
\ ****************************************************************************/
2001-08-08 16:03:20 +02:00
/* Load main class */
$GLOBALS [ 'phpgw' ] = CreateObject ( 'phpgwapi.phpgw' );
2002-05-30 23:13:07 +02:00
/************************************************************************ \
* Load up the main instance of the db class . *
\ ************************************************************************/
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db = CreateObject ( 'phpgwapi.db' );
$GLOBALS [ 'phpgw' ] -> db -> Host = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_host' ];
$GLOBALS [ 'phpgw' ] -> db -> Type = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_type' ];
$GLOBALS [ 'phpgw' ] -> db -> Database = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_name' ];
$GLOBALS [ 'phpgw' ] -> db -> User = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_user' ];
$GLOBALS [ 'phpgw' ] -> db -> Password = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'db_pass' ];
if ( $GLOBALS [ 'phpgw' ] -> debug )
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> Debug = 1 ;
2001-08-08 02:13:00 +02:00
}
2001-08-07 18:02:55 +02:00
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> Halt_On_Error = 'no' ;
2001-08-15 04:14:18 +02:00
@ $GLOBALS [ 'phpgw' ] -> db -> query ( " select count(config_name) from phpgw_config " );
2001-08-08 16:03:20 +02:00
if ( ! @ $GLOBALS [ 'phpgw' ] -> db -> next_record ())
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$setup_dir = ereg_replace ( $PHP_SELF , 'index.php' , 'setup/' );
echo '<center><b>Fatal Error:</b> It appears that you have not created the database tables for '
. 'phpGroupWare. Click <a href="' . $setup_dir . '">here</a> to run setup.</center>' ;
exit ;
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> Halt_On_Error = 'yes' ;
2002-05-30 23:13:07 +02:00
/**************************************************************************** \
* These lines fill up the $GLOBALS [ " phpgw_info " ][ " server " ] array *
\ ****************************************************************************/
// An Attempt to speed things up using cache premise
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> query ( " select config_value from phpgw_config WHERE config_app='phpgwapi' and config_name='cache_phpgw_info' " , __LINE__ , __FILE__ );
if ( $GLOBALS [ 'phpgw' ] -> db -> num_rows ())
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> next_record ();
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'cache_phpgw_info' ] = stripslashes ( $GLOBALS [ 'phpgw' ] -> db -> f ( 'config_value' ));
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
$cache_query = " select content from phpgw_app_sessions where "
. " sessionid = '0' and loginid = '0' and app = 'phpgwapi' and location = 'config' " ;
$GLOBALS [ 'phpgw' ] -> db -> query ( $cache_query , __LINE__ , __FILE__ );
$server_info_cache = $GLOBALS [ 'phpgw' ] -> db -> num_rows ();
if ( @ $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'cache_phpgw_info' ] && $server_info_cache )
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> next_record ();
$GLOBALS [ 'phpgw_info' ][ 'server' ] = unserialize ( stripslashes ( $GLOBALS [ 'phpgw' ] -> db -> f ( 'content' )));
2001-08-08 02:13:00 +02:00
}
else
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> query ( " select * from phpgw_config WHERE config_app='phpgwapi' " , __LINE__ , __FILE__ );
while ( $GLOBALS [ 'phpgw' ] -> db -> next_record ())
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'server' ][ $GLOBALS [ 'phpgw' ] -> db -> f ( 'config_name' )] = stripslashes ( $GLOBALS [ 'phpgw' ] -> db -> f ( 'config_value' ));
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
2001-09-06 21:23:56 +02:00
if ( @ isset ( $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'cache_phpgw_info' ]))
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
if ( $server_info_cache )
{
2002-01-13 05:06:40 +01:00
$cache_query = " DELETE FROM phpgw_app_sessions WHERE sessionid='0' and loginid='0' and app='phpgwapi' and location='config' " ;
$GLOBALS [ 'phpgw' ] -> db -> query ( $cache_query , __LINE__ , __FILE__ );
2001-08-08 16:03:20 +02:00
}
2002-01-13 05:06:40 +01:00
$cache_query = 'INSERT INTO phpgw_app_sessions(sessionid,loginid,app,location,content) VALUES('
. " '0','0','phpgwapi','config',' " . addslashes ( serialize ( $GLOBALS [ 'phpgw_info' ][ 'server' ])) . " ') " ;
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> db -> query ( $cache_query , __LINE__ , __FILE__ );
2001-08-08 02:13:00 +02:00
}
}
2001-08-08 16:03:20 +02:00
unset ( $cache_query );
unset ( $server_info_cache );
2002-01-13 05:06:40 +01:00
2001-09-06 10:27:22 +02:00
/************************************************************************ \
* Required classes *
\ ************************************************************************/
2001-08-11 16:49:12 +02:00
$GLOBALS [ 'phpgw' ] -> log = CreateObject ( 'phpgwapi.errorlog' );
2001-09-06 21:23:56 +02:00
$GLOBALS [ 'phpgw' ] -> translation = CreateObject ( 'phpgwapi.translation' );
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> common = CreateObject ( 'phpgwapi.common' );
$GLOBALS [ 'phpgw' ] -> hooks = CreateObject ( 'phpgwapi.hooks' );
$GLOBALS [ 'phpgw' ] -> auth = CreateObject ( 'phpgwapi.auth' );
$GLOBALS [ 'phpgw' ] -> accounts = CreateObject ( 'phpgwapi.accounts' );
$GLOBALS [ 'phpgw' ] -> acl = CreateObject ( 'phpgwapi.acl' );
$GLOBALS [ 'phpgw' ] -> session = CreateObject ( 'phpgwapi.sessions' );
$GLOBALS [ 'phpgw' ] -> preferences = CreateObject ( 'phpgwapi.preferences' );
$GLOBALS [ 'phpgw' ] -> applications = CreateObject ( 'phpgwapi.applications' );
2002-02-14 08:29:26 +01:00
print_debug ( 'main class loaded' , 'messageonly' , 'api' );
2001-09-04 06:52:47 +02:00
if ( ! isset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'included_classes' ][ 'error' ]) ||
! $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'included_classes' ][ 'error' ])
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
include ( PHPGW_INCLUDE_ROOT . '/phpgwapi/inc/class.error.inc.php' );
2001-09-04 06:52:47 +02:00
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'included_classes' ][ 'error' ] = True ;
2001-08-08 16:03:20 +02:00
}
2001-09-06 10:27:22 +02:00
/**************************************************************************** \
* This is a global constant that should be used *
* instead of / or \ in file paths *
\ ****************************************************************************/
2001-08-08 16:03:20 +02:00
define ( 'SEP' , filesystem_separator ());
2001-08-23 06:32:15 +02:00
/***************************************************************************** \
* ACL defines - moved here to work for xml - rpc / soap , also *
\ *****************************************************************************/
define ( 'PHPGW_ACL_READ' , 1 );
define ( 'PHPGW_ACL_ADD' , 2 );
define ( 'PHPGW_ACL_EDIT' , 4 );
define ( 'PHPGW_ACL_DELETE' , 8 );
define ( 'PHPGW_ACL_PRIVATE' , 16 );
2002-01-10 19:18:44 +01:00
define ( 'PHPGW_ACL_GROUP_MANAGERS' , 32 );
2001-08-23 06:32:15 +02:00
2001-09-06 10:27:22 +02:00
/**************************************************************************** \
* Stuff to use if logging in or logging out *
\ ****************************************************************************/
2001-08-08 16:03:20 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] == 'login' || $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] == 'logout' )
{
if ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] == 'login' )
2001-08-08 02:13:00 +02:00
{
2002-05-30 11:47:09 +02:00
if ( @ isset ( $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'enforce_ssl' ]) && $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'enforce_ssl' ] && ! $GLOBALS [ 'HTTP_SERVER_VARS' ][ 'HTTPS' ])
{
2002-05-31 11:25:52 +02:00
$GLOBALS [ 'phpgw' ] -> redirect ( $GLOBALS [ 'HTTP_SERVER_VARS' ][ 'REQUEST_URI' ]);
2002-05-30 11:47:09 +02:00
}
2001-08-08 16:03:20 +02:00
if ( @ $login != '' )
{
$login_array = explode ( " @ " , $login );
2002-02-16 04:58:03 +01:00
print_debug ( 'LID : ' . $login_array [ 0 ], 'messageonly' , 'api' );
2001-08-08 16:03:20 +02:00
$login_id = $GLOBALS [ 'phpgw' ] -> accounts -> name2id ( $login_array [ 0 ]);
2002-02-16 04:58:03 +01:00
print_debug ( 'User ID : ' . $login_id , 'messageonly' , 'api' );
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw' ] -> accounts -> accounts ( $login_id );
$GLOBALS [ 'phpgw' ] -> preferences -> preferences ( $login_id );
}
2001-08-08 02:13:00 +02:00
}
2001-09-06 10:27:22 +02:00
/************************************************************************** \
* Everything from this point on will ONLY happen if *
* the currentapp is not login or logout *
\ **************************************************************************/
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
else
2001-08-08 02:13:00 +02:00
{
2002-05-30 23:13:07 +02:00
/************************************************************************** \
* If users session is not valid , send them to login page *
\ **************************************************************************/
2001-08-08 16:03:20 +02:00
if ( ! $GLOBALS [ 'phpgw' ] -> session -> verify ())
{
2002-05-31 11:25:52 +02:00
$GLOBALS [ 'phpgw' ] -> redirect ( $GLOBALS [ 'phpgw' ] -> session -> link ( '/login.php' , 'code=10' ));
2001-08-08 16:03:20 +02:00
}
2001-08-07 18:02:55 +02:00
2002-05-30 23:13:07 +02:00
/*************************************************************************** \
* Now that we know we have a good session we can load up the datatime class *
\ ***************************************************************************/
2002-04-30 05:35:52 +02:00
$GLOBALS [ 'phpgw' ] -> datetime = CreateObject ( 'phpgwapi.datetime' );
2002-05-30 23:13:07 +02:00
/* Make sure user is keeping his password in order */
/* Maybe we should create a common function in the phpgw_accounts_shared.inc.php file */
/* to get rid of duplicate code. */
if ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'lastpasswd_change' ] == 0 )
{
$message = lang ( 'You are required to change your password during your first login' )
. '<br> Click this image on the navbar: <img src="'
. $GLOBALS [ 'phpgw' ] -> common -> image ( 'preferences' , 'navbar.gif' ) . '">' ;
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'msgbox_data' ][ $message ] = False ;
}
elseif ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'lastpasswd_change' ] < time () - ( 86400 * 30 ))
{
$message = lang ( 'it has been more then x days since you changed your password' , 30 );
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'msgbox_data' ][ $message ] = False ;
}
2002-05-30 11:47:09 +02:00
2002-05-30 23:13:07 +02:00
/************************************************************************* \
* A few hacker resistant constants that will be used throught the program *
\ *************************************************************************/
2001-08-08 16:03:20 +02:00
define ( 'PHPGW_TEMPLATE_DIR' , ExecMethod ( 'phpgwapi.phpgw.common.get_tpl_dir' , 'phpgwapi' ));
define ( 'PHPGW_IMAGES_DIR' , ExecMethod ( 'phpgwapi.phpgw.common.get_image_path' , 'phpgwapi' ));
define ( 'PHPGW_IMAGES_FILEDIR' , ExecMethod ( 'phpgwapi.phpgw.common.get_image_dir' , 'phpgwapi' ));
define ( 'PHPGW_APP_ROOT' , ExecMethod ( 'phpgwapi.phpgw.common.get_app_dir' ));
define ( 'PHPGW_APP_INC' , ExecMethod ( 'phpgwapi.phpgw.common.get_inc_dir' ));
define ( 'PHPGW_APP_TPL' , ExecMethod ( 'phpgwapi.phpgw.common.get_tpl_dir' ));
define ( 'PHPGW_IMAGES' , ExecMethod ( 'phpgwapi.phpgw.common.get_image_path' ));
define ( 'PHPGW_APP_IMAGES_DIR' , ExecMethod ( 'phpgwapi.phpgw.common.get_image_dir' ));
2002-05-30 11:47:09 +02:00
/************************************************************************* \
* These lines load up the templates class and set some default values *
\ *************************************************************************/
$GLOBALS [ 'phpgw' ] -> template = CreateObject ( 'phpgwapi.Template' , PHPGW_TEMPLATE_DIR );
2002-05-30 23:13:07 +02:00
/* load required tpl files */
2002-05-30 11:47:09 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_file ( 'common' , 'common.tpl' );
$GLOBALS [ 'phpgw' ] -> template -> set_file ( 'phpgw' , 'phpgw.tpl' );
$GLOBALS [ 'phpgw' ] -> template -> set_file ( 'msgbox' , 'msgbox.tpl' );
2002-05-30 23:13:07 +02:00
/* These default values will be overridden and appended to as needed by template sets */
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_top_table_height' , '0' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_top_frame_height' , '0' );
2002-05-31 23:22:25 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_top_scrolling' , 'AUTO' );
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_left_table_width' , '0' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_left_frame_width' , '0' );
2002-05-31 23:22:25 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_left_scrolling' , 'AUTO' );
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_right_table_width' , '0' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_right_frame_width' , '0' );
2002-05-31 23:22:25 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_right_scrolling' , 'AUTO' );
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_bottom_table_height' , '0' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_bottom_frame_height' , '0' );
2002-05-31 23:22:25 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_bottom_scrolling' , 'AUTO' );
2002-05-30 11:47:09 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_charset' , lang ( 'charset' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_description' , 'phpGroupWare' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_keywords' , 'phpGroupWare' );
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_base' , $GLOBALS [ 'phpgw' ] -> session -> link ( '/' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_browser_ico' , 'favicon.ico' );
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_website_title' , $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'site_title' ]);
2002-05-30 11:47:09 +02:00
2002-05-30 23:13:07 +02:00
/* This will bring in the template sets parts definitions */
/* We do this so early to allow the template to overwrite */
/* and append to the previous defaults as needed for frames support to work */
if ( file_exists ( PHPGW_TEMPLATE_DIR . '/parts.inc.php' ))
2002-05-30 11:47:09 +02:00
{
2002-05-30 23:13:07 +02:00
include ( PHPGW_TEMPLATE_DIR . '/parts.inc.php' );
2002-05-30 11:47:09 +02:00
}
/************************************************************************* \
2002-05-30 23:13:07 +02:00
* If they are using frames , we need to set the PHPGW_FRAME_PART safely *
2002-05-30 11:47:09 +02:00
\ *************************************************************************/
if ( @ isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ]) &&
( $GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'unsupported' ||
$GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'top' ||
$GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'left' ||
$GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'body' ||
$GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'right' ||
$GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ] == 'bottom'
))
{
define ( 'PHPGW_FRAME_PART' , $GLOBALS [ 'HTTP_GET_VARS' ][ 'framepart' ]);
}
else
{
define ( 'PHPGW_FRAME_PART' , 'start' );
}
2002-05-31 20:37:18 +02:00
//$GLOBALS['phpgw_info']['server']['useframes'] = 'always';
2002-05-30 11:47:09 +02:00
if ((( isset ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'useframes' ]) &&
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'useframes' ] &&
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'useframes' ] == 'allowed' ) ||
$GLOBALS [ 'phpgw_info' ][ 'server' ][ 'useframes' ] == 'always' ) &&
PHPGW_FRAME_PART != 'unsupported' )
{
define ( 'PHPGW_USE_FRAMES' , True );
define ( 'PHPGW_NAVBAR_TARGET' , 'body' );
if ( PHPGW_FRAME_PART == 'start' )
{
2002-05-30 23:13:07 +02:00
/* if just starting up, then we intialize the frameset with the appropriate block */
2002-05-30 11:47:09 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_top_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( 'home.php' , 'framepart=top' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_right_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( 'home.php' , 'framepart=right' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_body_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( 'home.php' , 'framepart=body' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_left_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( 'home.php' , 'framepart=left' ));
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_bottom_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( 'home.php' , 'framepart=bottom' ));
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_unupported_link' , $GLOBALS [ 'phpgw' ] -> session -> link ( $GLOBALS [ 'HTTP_SERVER_VARS' ][ 'SCRIPT_NAME' ], 'framepart=unsupported' ));
2002-05-31 20:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_frames_start' , 'phpgw_main_start' );
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_frames_end' , 'phpgw_main_end' );
2002-05-30 11:47:09 +02:00
}
else
{
2002-05-30 23:13:07 +02:00
/* if we are using frames and not starting then we use the basic block to keep each part in a nice clean html format */
2002-05-31 20:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_basic_start' , 'phpgw_main_start' );
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_basic_end' , 'phpgw_main_end' );
2002-05-30 11:47:09 +02:00
}
}
else
{
2002-05-30 23:13:07 +02:00
/* Not using frames, so we default to tables */
2002-05-30 11:47:09 +02:00
define ( 'PHPGW_USE_FRAMES' , False );
define ( 'PHPGW_NAVBAR_TARGET' , '_self' );
2002-05-31 20:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_tables_start' , 'phpgw_main_start' );
$GLOBALS [ 'phpgw' ] -> template -> set_block ( 'phpgw' , 'phpgw_main_tables_end' , 'phpgw_main_end' );
2002-05-30 11:47:09 +02:00
}
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_head_target' , PHPGW_NAVBAR_TARGET );
2002-04-30 05:35:52 +02:00
/******* Define the GLOBALS['MENUACTION'] *******/
define ( 'MENUACTION' , get_var ( 'menuaction' , Array ( 'GET' )));
2002-05-30 23:13:07 +02:00
/********* This sets the user variables (this should be moved to somewhere else [Seek3r])*********/
2001-08-08 16:03:20 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'private_dir' ] = $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'files_dir' ]
. '/users/' . $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'userid' ];
/* This will make sure that a user has the basic default prefs. If not it will add them */
$GLOBALS [ 'phpgw' ] -> preferences -> verify_basic_settings ();
/********* Optional classes, which can be disabled for performance increases *********/
while ( $phpgw_class_name = each ( $GLOBALS [ 'phpgw_info' ][ 'flags' ]))
2001-08-08 02:13:00 +02:00
{
2001-08-08 16:03:20 +02:00
if ( ereg ( 'enable_' , $phpgw_class_name [ 0 ]))
{
$enable_class = str_replace ( 'enable_' , '' , $phpgw_class_name [ 0 ]);
$enable_class = str_replace ( '_class' , '' , $enable_class );
eval ( '$GLOBALS["phpgw"]->' . $enable_class . ' = createobject(\'phpgwapi.' . $enable_class . '\');' );
}
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
unset ( $enable_class );
reset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ]);
2001-08-07 18:02:55 +02:00
2002-05-30 23:13:07 +02:00
/*************************************************************************** \
* These lines load up the themes data and put them into the templates class *
\ ***************************************************************************/
$GLOBALS [ 'phpgw' ] -> common -> load_theme_data ();
if ( ! PHPGW_USE_FRAMES || ( PHPGW_USE_FRAMES && PHPGW_FRAME_PART != 'body' ))
2002-05-24 12:38:03 +02:00
{
2002-05-30 11:47:09 +02:00
$GLOBALS [ 'phpgw' ] -> common -> navbar ();
2002-05-30 23:13:07 +02:00
}
2001-08-08 16:03:20 +02:00
2002-05-23 23:28:59 +02:00
/************************************************************************* \
2002-05-30 11:47:09 +02:00
* load up top part if appropriate *
2002-05-23 23:28:59 +02:00
\ *************************************************************************/
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES || PHPGW_FRAME_PART == 'top' )
2002-05-23 23:28:59 +02:00
{
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES )
{
$output = 'phpgw_top' ;
}
else
{
$output = 'phpgw_body' ;
}
if ( function_exists ( 'parse_toppart' ))
{
parse_toppart ( $output );
}
if ( PHPGW_USE_FRAMES )
{
$GLOBALS [ 'phpgw' ] -> common -> phpgw_footer ();
}
2002-05-23 23:28:59 +02:00
}
2001-08-08 16:03:20 +02:00
/************************************************************************* \
2002-05-30 11:47:09 +02:00
* load up left part if appropriate *
2001-08-08 16:03:20 +02:00
\ *************************************************************************/
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES || PHPGW_FRAME_PART == 'left' )
{
if ( ! PHPGW_USE_FRAMES )
2001-08-08 02:13:00 +02:00
{
2002-05-30 11:47:09 +02:00
$output = 'phpgw_left' ;
}
else
{
$output = 'phpgw_body' ;
}
if ( function_exists ( 'parse_leftpart' ))
{
parse_leftpart ( $output );
}
if ( PHPGW_USE_FRAMES )
{
$GLOBALS [ 'phpgw' ] -> common -> phpgw_footer ();
2001-08-08 16:03:20 +02:00
}
2001-08-08 02:13:00 +02:00
}
2001-08-08 16:03:20 +02:00
/************************************************************************* \
2002-05-30 11:47:09 +02:00
* load up right part if appropriate *
2001-08-08 16:03:20 +02:00
\ *************************************************************************/
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES || PHPGW_FRAME_PART == 'right' )
{
if ( ! PHPGW_USE_FRAMES )
{
$output = 'phpgw_right' ;
}
else
{
$output = 'phpgw_body' ;
}
if ( function_exists ( 'parse_rightpart' ))
{
parse_rightpart ( $output );
}
if ( PHPGW_USE_FRAMES )
{
$GLOBALS [ 'phpgw' ] -> common -> phpgw_footer ();
}
}
2001-08-08 16:03:20 +02:00
/************************************************************************* \
2002-05-30 11:47:09 +02:00
* load up bottom part if appropriate *
2001-08-08 16:03:20 +02:00
\ *************************************************************************/
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES || PHPGW_FRAME_PART == 'bottom' )
2001-08-08 16:03:20 +02:00
{
2002-05-30 11:47:09 +02:00
if ( ! PHPGW_USE_FRAMES )
{
$output = 'phpgw_bottom' ;
}
else
{
$output = 'phpgw_body' ;
}
if ( function_exists ( 'parse_bottompart' ))
{
parse_bottompart ( $output );
}
if ( PHPGW_USE_FRAMES )
{
2002-05-30 23:13:07 +02:00
$GLOBALS [ 'phpgw' ] -> common -> phpgw_footer ();
2002-05-30 11:47:09 +02:00
}
2001-08-08 16:03:20 +02:00
}
2002-05-30 11:47:09 +02:00
/************************************************************************* \
* load up body / appspace if appropriate *
\ *************************************************************************/
if ( ! PHPGW_USE_FRAMES || PHPGW_FRAME_PART == 'body' )
2001-08-08 16:03:20 +02:00
{
2002-05-31 23:22:25 +02:00
/* parse_bodypart() should not output anything. This is here for them to set body tags and such */
if ( function_exists ( 'parse_bodypart' ))
{
parse_bodypart ();
}
2002-05-30 11:47:09 +02:00
/* Verify that user has rights to the currentapp */
$continue_app_data = True ;
if ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] != 'home' &&
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] != 'preferences' &&
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] != 'about' )
{
// This will need to use ACL in the future
if ( ! $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'apps' ][ $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ]] ||
( @ $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'admin_only' ] &&
! $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'apps' ][ 'admin' ]))
{
$GLOBALS [ 'phpgw' ] -> log -> write ( array ( 'text' => 'W-Permissions, Attempted to access %1' , 'p1' => $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ]));
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'msgbox_data' ][ 'Access not permitted' ] = False ;
$continue_app_data = False ;
$GLOBALS [ 'phpgw' ] -> template -> set_var ( 'phpgw_body' , " user has no rights to this app!!!<br> \n " );
2002-05-30 23:13:07 +02:00
//$GLOBALS['phpgw']->common->phpgw_footer();
$GLOBALS [ 'phpgw' ] -> common -> phpgw_exit ( True );
2002-05-30 11:47:09 +02:00
}
}
if ( $continue_app_data )
{
2002-05-31 20:13:07 +02:00
/* I want to phase this out over time. App apps should put their data into the templates phpgw_body var*/
if ( !@ $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ])
{
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
}
2002-05-30 11:47:09 +02:00
$GLOBALS [ 'phpgw' ] -> template -> set_root ( PHPGW_APP_TPL );
2002-05-31 12:18:57 +02:00
$GLOBALS [ 'phpgw' ] -> template -> halt_on_error = 'report' ;
2002-05-30 11:47:09 +02:00
if ( ! preg_match ( " /phpgwapi/i " , PHPGW_APP_INC ) && file_exists ( PHPGW_APP_INC . '/functions.inc.php' ) && ! MENUACTION )
{
include ( PHPGW_APP_INC . '/functions.inc.php' );
}
}
2001-08-08 16:03:20 +02:00
}
2001-08-08 02:13:00 +02:00
}
2002-05-30 11:47:09 +02:00
2001-08-08 16:03:20 +02:00
error_reporting ( E_ERROR | E_WARNING | E_PARSE );