egroupware_official/setup/config.php

275 lines
8.5 KiB
PHP
Raw Normal View History

2001-07-30 17:59:25 +02:00
<?php
/**************************************************************************\
2004-01-27 21:49:25 +01:00
* eGroupWare - Setup *
* http://www.egroupware.org *
2001-07-30 17:59:25 +02:00
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
$GLOBALS['egw_info'] = array(
'flags' => array(
'noheader' => True,
'nonavbar' => True,
'currentapp' => 'home',
'noapi' => True
));
2001-07-30 17:59:25 +02:00
include('./inc/functions.inc.php');
/*
Authorize the user to use setup app and load the database
Does not return unless user is authorized
*/
if(!$GLOBALS['egw_setup']->auth('Config') || @$_POST['cancel'])
{
Header('Location: index.php');
exit;
}
2001-07-30 17:59:25 +02:00
$tpl_root = $GLOBALS['egw_setup']->html->setup_tpl_dir('setup');
$setup_tpl = CreateObject('setup.Template',$tpl_root);
2001-07-30 17:59:25 +02:00
$setup_tpl->set_file(array(
'T_head' => 'head.tpl',
'T_footer' => 'footer.tpl',
'T_alert_msg' => 'msg_alert_msg.tpl',
'T_config_pre_script' => 'config_pre_script.tpl',
'T_config_post_script' => 'config_post_script.tpl'
));
2001-11-15 00:17:27 +01:00
/* Following to ensure windows file paths are saved correctly */
set_magic_quotes_runtime(0);
$GLOBALS['egw_setup']->loaddb();
2001-07-30 17:59:25 +02:00
/* Check api version, use correct table */
$setup_info = $GLOBALS['egw_setup']->detection->get_db_versions();
if($GLOBALS['egw_setup']->alessthanb($setup_info['phpgwapi']['currentver'], '0.9.10pre7'))
2001-07-30 17:59:25 +02:00
{
$configtbl = 'config';
}
else
{
$configtbl = 'phpgw_config';
}
$newsettings = $_POST['newsettings'];
2004-11-28 19:38:50 +01:00
if(@get_var('submit',Array('POST')) && @$newsettings)
2001-07-30 17:59:25 +02:00
{
2004-11-28 19:38:50 +01:00
/* Load hook file with functions to validate each config (one/none/all) */
$GLOBALS['egw_setup']->hook('config_validate','setup');
2004-11-28 19:38:50 +01:00
2002-08-14 01:39:39 +02:00
$datetime = CreateObject('phpgwapi.datetime');
2003-12-10 12:45:03 +01:00
switch((int)$newsettings['daytime_port'])
2002-08-14 01:39:39 +02:00
{
case 13:
$newsettings['tz_offset'] = $datetime->getntpoffset();
break;
case 80:
$newsettings['tz_offset'] = $datetime->gethttpoffset();
break;
default:
$newsettings['tz_offset'] = $datetime->getbestguess();
break;
}
unset($datetime);
print_debug('TZ_OFFSET',$newsettings['tz_offset']);
$GLOBALS['egw_setup']->db->transaction_begin();
2001-07-30 17:59:25 +02:00
/* This is only temp: */
$GLOBALS['egw_setup']->db->query("DELETE FROM $configtbl WHERE config_name='useframes'");
$GLOBALS['egw_setup']->db->query("INSERT INTO $configtbl (config_app,config_name, config_value) values ('phpgwapi','useframes','never')");
2001-07-30 17:59:25 +02:00
while(list($setting,$value) = @each($newsettings))
2001-07-30 17:59:25 +02:00
{
if($GLOBALS['egw_info']['server']['found_validation_hook'] && @function_exists($setting))
{
2004-11-28 19:38:50 +01:00
call_user_func($setting,$newsettings);
if($GLOBALS['config_error'])
{
$GLOBALS['error'] .= '<br>' . lang($GLOBALS['config_error']) . '&nbsp;';
$GLOBALS['config_error'] = '';
/* Bail out, stop writing config data */
break;
}
else
{
/* echo '<br>Updating: ' . $setting . '=' . $value; */
/* Don't erase passwords, since we also do not print them below */
if($value || (!stristr($setting,'passwd') && !stristr($setting,'password') && !stristr($setting,'root_pw')))
{
@$GLOBALS['egw_setup']->db->query("DELETE FROM $configtbl WHERE config_name='" . $setting . "'");
2004-11-28 19:38:50 +01:00
}
if($value)
{
$GLOBALS['egw_setup']->db->query("INSERT INTO $configtbl (config_app,config_name, config_value) VALUES ('phpgwapi','" . $GLOBALS['egw_setup']->db->db_addslashes($setting)
. "','" . $GLOBALS['egw_setup']->db->db_addslashes($value) . "')");
2004-11-28 19:38:50 +01:00
}
}
}
2004-11-28 19:38:50 +01:00
else
2001-07-30 17:59:25 +02:00
{
2004-11-28 19:38:50 +01:00
if($value || (!stristr($setting,'passwd') && !stristr($setting,'password') && !stristr($setting,'root_pw')))
{
@$GLOBALS['egw_setup']->db->query("DELETE FROM $configtbl WHERE config_name='" . $setting . "'");
2004-11-28 19:38:50 +01:00
}
if($value)
{
$GLOBALS['egw_setup']->db->query("INSERT INTO $configtbl (config_app,config_name, config_value) VALUES ('phpgwapi','" . $GLOBALS['egw_setup']->db->db_addslashes($setting)
. "','" . $GLOBALS['egw_setup']->db->db_addslashes($value) . "')");
2004-11-28 19:38:50 +01:00
}
2001-07-30 17:59:25 +02:00
}
}
2004-11-28 19:38:50 +01:00
if(!$GLOBALS['error'])
2001-07-30 17:59:25 +02:00
{
$GLOBALS['egw_setup']->db->transaction_commit();
2001-07-30 17:59:25 +02:00
2004-11-28 19:38:50 +01:00
/* Add cleaning of app_sessions per skeeter, but with a check for the table being there, just in case */
$tablenames = $GLOBALS['egw_setup']->db->table_names();
2004-11-28 19:38:50 +01:00
while(list($key,$val) = @each($tablenames))
{
$tables[] = $val['table_name'];
}
if(in_array('phpgw_app_sessions',$tables))
{
$GLOBALS['egw_setup']->db->lock(array('phpgw_app_sessions'));
@$GLOBALS['egw_setup']->db->query("DELETE FROM phpgw_app_sessions WHERE sessionid = '0' and loginid = '0' and app = 'phpgwapi' and location = 'config'",__LINE__,__FILE__);
@$GLOBALS['egw_setup']->db->query("DELETE FROM phpgw_app_sessions WHERE app = 'phpgwapi' and location = 'phpgw_info_cache'",__LINE__,__FILE__);
$GLOBALS['egw_setup']->db->unlock();
2004-11-28 19:38:50 +01:00
}
if($newsettings['auth_type'] == 'ldap')
{
Header('Location: '.$newsettings['webserver_url'].'/setup/ldap.php');
exit;
}
else
{
Header('Location: index.php');
exit;
}
2001-07-30 17:59:25 +02:00
}
}
$GLOBALS['egw_setup']->html->show_header(lang('Configuration'),False,'config',$GLOBALS['egw_setup']->ConfigDomain . '(' . $GLOBALS['egw_domain'][$GLOBALS['egw_setup']->ConfigDomain]['db_type'] . ')');
2001-07-30 17:59:25 +02:00
@$GLOBALS['egw_setup']->db->query("SELECT * FROM $configtbl");
while(@$GLOBALS['egw_setup']->db->next_record())
2001-07-30 17:59:25 +02:00
{
$GLOBALS['current_config'][$GLOBALS['egw_setup']->db->f('config_name')] = $GLOBALS['egw_setup']->db->f('config_value');
2001-07-30 17:59:25 +02:00
}
$setup_tpl->pparse('out','T_config_pre_script');
/* Now parse each of the templates we want to show here */
class phpgw
{
var $common;
var $accounts;
var $applications;
var $db;
}
$GLOBALS['egw'] = new phpgw;
$GLOBALS['egw']->common = CreateObject('phpgwapi.common');
$GLOBALS['egw']->db = $GLOBALS['egw_setup']->db;
$t = CreateObject('setup.Template',$GLOBALS['egw']->common->get_tpl_dir('setup'));
2004-11-28 19:38:50 +01:00
$t->set_unknowns('keep');
$t->set_file(array('config' => 'config.tpl'));
$t->set_block('config','body','body');
2004-11-28 19:38:50 +01:00
$vars = $t->get_undefined('body');
$GLOBALS['egw_setup']->hook('config','setup');
2004-11-28 19:38:50 +01:00
while(list($null,$value) = each($vars))
{
$valarray = explode('_',$value);
$type = $valarray[0];
$new = $newval = '';
2004-11-28 19:38:50 +01:00
while($chunk = next($valarray))
{
$new[] = $chunk;
}
$newval = implode(' ',$new);
2004-11-28 19:38:50 +01:00
switch ($type)
{
case 'lang':
$t->set_var($value,lang($newval));
break;
case 'value':
$newval = str_replace(' ','_',$newval);
/* Don't show passwords in the form */
if(strstr($value,'passwd') || strstr($value,'password') || strstr($value,'root_pw'))
{
$t->set_var($value,'');
2004-11-28 19:38:50 +01:00
}
else
{
$t->set_var($value,@$current_config[$newval]);
}
break;
case 'selected':
$configs = array();
$config = '';
$newvals = explode(' ',$newval);
$setting = end($newvals);
for($i=0;$i<(count($newvals) - 1); $i++)
{
$configs[] = $newvals[$i];
}
$config = implode('_',$configs);
/* echo $config . '=' . $current_config[$config]; */
if(@$current_config[$config] == $setting)
{
$t->set_var($value,' selected');
}
else
{
$t->set_var($value,'');
}
break;
case 'hook':
$newval = str_replace(' ','_',$newval);
$t->set_var($value,$newval($current_config));
break;
default:
$t->set_var($value,'');
break;
}
}
if($GLOBALS['error'])
{
if($GLOBALS['error'] == 'badldapconnection')
{
/* Please check the number and dial again :) */
$GLOBALS['egw_setup']->html->show_alert_msg('Error',
2004-11-28 19:38:50 +01:00
lang('There was a problem trying to connect to your LDAP server. <br>'
.'please check your LDAP server configuration') . '.');
}
$GLOBALS['egw_setup']->html->show_alert_msg('Error',$GLOBALS['error']);
2004-11-28 19:38:50 +01:00
}
$t->pfp('out','body');
unset($t);
2003-12-19 13:34:45 +01:00
$setup_tpl->set_var('more_configs',lang('Please login to egroupware and run the admin application for additional site configuration') . '.');
2001-07-30 17:59:25 +02:00
$setup_tpl->set_var('lang_submit',lang('Save'));
$setup_tpl->set_var('lang_cancel',lang('Cancel'));
2001-07-30 17:59:25 +02:00
$setup_tpl->pparse('out','T_config_post_script');
$GLOBALS['egw_setup']->html->show_footer();
2001-07-30 17:59:25 +02:00
?>