forked from extern/egroupware
439 lines
13 KiB
PHP
439 lines
13 KiB
PHP
|
<?php
|
||
|
|
/**************************************************************************\
|
||
|
|
* phpGroupWare - Setup *
|
||
|
|
* http://www.phpgroupware.org *
|
||
|
|
* -------------------------------------------- *
|
||
|
|
* This file written by Dan Kuykendall<seek3r@phpgroupware.org> *
|
||
|
|
* and Miles Lott<milosch@phpgroupware.org> *
|
||
|
|
* -------------------------------------------- *
|
||
|
|
* 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$ */
|
||
|
|
|
||
|
|
class setup_detection
|
||
|
|
{
|
||
|
|
function get_versions()
|
||
|
|
{
|
||
|
|
$d = dir(PHPGW_SERVER_ROOT);
|
||
|
|
while($entry=$d->read())
|
||
|
|
{
|
||
|
|
if(!ereg('setup',$entry) && is_dir(PHPGW_SERVER_ROOT . '/' . $entry))
|
||
|
|
{
|
||
|
|
$f = PHPGW_SERVER_ROOT . '/' . $entry . '/setup/setup.inc.php';
|
||
|
|
if (@file_exists ($f))
|
||
|
|
{
|
||
|
|
include($f);
|
||
|
|
$setup_info[$entry]['filename'] = $f;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$d->close();
|
||
|
|
|
||
|
|
// _debug_array($setup_info);
|
||
|
|
@ksort($setup_info);
|
||
|
|
return $setup_info;
|
||
|
|
}
|
||
|
|
|
||
|
|
function get_db_versions($setup_info='')
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->Halt_On_Error = 'no';
|
||
|
|
$tables = $GLOBALS['phpgw_setup']->db->table_names();
|
||
|
|
while(list($key,$val) = @each($tables))
|
||
|
|
{
|
||
|
|
$tname[] = $val['table_name'];
|
||
|
|
}
|
||
|
|
$newapps = in_array('phpgw_applications',$tname);
|
||
|
|
$oldapps = in_array('applications',$tname);
|
||
|
|
|
||
|
|
if((is_array($tables)) && (count($tables) > 0) && ($newapps || $oldapps))
|
||
|
|
{
|
||
|
|
/* one of these tables exists. checking for post/pre beta version */
|
||
|
|
if($newapps)
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->query('SELECT * FROM phpgw_applications',__LINE__,__FILE__);
|
||
|
|
while(@$GLOBALS['phpgw_setup']->db->next_record())
|
||
|
|
{
|
||
|
|
$setup_info[$GLOBALS['phpgw_setup']->db->f('app_name')]['currentver'] = $GLOBALS['phpgw_setup']->db->f('app_version');
|
||
|
|
$setup_info[$GLOBALS['phpgw_setup']->db->f('app_name')]['enabled'] = $GLOBALS['phpgw_setup']->db->f('app_enabled');
|
||
|
|
}
|
||
|
|
/* This is to catch old setup installs that did not have phpgwapi listed as an app */
|
||
|
|
$tmp = $setup_info['phpgwapi']['version']; /* save the file version */
|
||
|
|
if(!@$setup_info['phpgwapi']['currentver'])
|
||
|
|
{
|
||
|
|
$setup_info['phpgwapi']['currentver'] = $setup_info['admin']['currentver'];
|
||
|
|
$setup_info['phpgwapi']['version'] = $setup_info['admin']['currentver'];
|
||
|
|
$setup_info['phpgwapi']['enabled'] = $setup_info['admin']['enabled'];
|
||
|
|
// _debug_array($setup_info['phpgwapi']);exit;
|
||
|
|
// There seems to be a problem here. If ['phpgwapi']['currentver'] is set,
|
||
|
|
// The GLOBALS never gets set.
|
||
|
|
$GLOBALS['setup_info'] = $setup_info;
|
||
|
|
$GLOBALS['phpgw_setup']->register_app('phpgwapi');
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$GLOBALS['setup_info'] = $setup_info;
|
||
|
|
}
|
||
|
|
$setup_info['phpgwapi']['version'] = $tmp; /* restore the file version */
|
||
|
|
}
|
||
|
|
elseif($oldapps)
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->query('select * from applications');
|
||
|
|
while(@$GLOBALS['phpgw_setup']->db->next_record())
|
||
|
|
{
|
||
|
|
if($GLOBALS['phpgw_setup']->db->f('app_name') == 'admin')
|
||
|
|
{
|
||
|
|
$setup_info['phpgwapi']['currentver'] = $GLOBALS['phpgw_setup']->db->f('app_version');
|
||
|
|
}
|
||
|
|
$setup_info[$GLOBALS['phpgw_setup']->db->f('app_name')]['currentver'] = $GLOBALS['phpgw_setup']->db->f('app_version');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
// _debug_array($setup_info);
|
||
|
|
return $setup_info;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* app status values:
|
||
|
|
U Upgrade required/available
|
||
|
|
R upgrade in pRogress
|
||
|
|
C upgrade Completed successfully
|
||
|
|
D Dependency failure
|
||
|
|
P Post-install dependency failure
|
||
|
|
F upgrade Failed
|
||
|
|
V Version mismatch at end of upgrade (Not used, proposed only)
|
||
|
|
M Missing files at start of upgrade (Not used, proposed only)
|
||
|
|
*/
|
||
|
|
function compare_versions($setup_info)
|
||
|
|
{
|
||
|
|
reset ($setup_info);
|
||
|
|
while(list($key, $value) = each($setup_info))
|
||
|
|
{
|
||
|
|
//echo '<br>'.$setup_info[$key]['name'].'STATUS: '.$setup_info[$key]['status'];
|
||
|
|
/* Only set this if it has not already failed to upgrade - Milosch */
|
||
|
|
if(!( (@$setup_info[$key]['status'] == 'F') || (@$setup_info[$key]['status'] == 'C') ))
|
||
|
|
{
|
||
|
|
//if ($setup_info[$key]['currentver'] > $setup_info[$key]['version'])
|
||
|
|
if($GLOBALS['phpgw_setup']->amorethanb($setup_info[$key]['currentver'],@$setup_info[$key]['version']))
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'V';
|
||
|
|
}
|
||
|
|
elseif(@$setup_info[$key]['currentver'] == @$setup_info[$key]['version'])
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'C';
|
||
|
|
}
|
||
|
|
elseif($GLOBALS['phpgw_setup']->alessthanb(@$setup_info[$key]['currentver'],@$setup_info[$key]['version']))
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'U';
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'U';
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
// _debug_array($setup_info);
|
||
|
|
return $setup_info;
|
||
|
|
}
|
||
|
|
|
||
|
|
function check_depends($setup_info)
|
||
|
|
{
|
||
|
|
reset($setup_info);
|
||
|
|
/* Run the list of apps */
|
||
|
|
while(list ($key, $value) = each ($setup_info))
|
||
|
|
{
|
||
|
|
/* Does this app have any depends */
|
||
|
|
if(isset($value['depends']))
|
||
|
|
{
|
||
|
|
/* If so find out which apps it depends on */
|
||
|
|
while(list($depkey, $depvalue) = each($value['depends']))
|
||
|
|
{
|
||
|
|
/* I set this to False until we find a compatible version of this app */
|
||
|
|
$setup_info['depends'][$depkey]['status'] = False;
|
||
|
|
/* Now we loop thru the versions looking for a compatible version */
|
||
|
|
while(list ($depskey, $depsvalue) = each($value['depends'][$depkey]['versions']))
|
||
|
|
{
|
||
|
|
$major = $GLOBALS['phpgw_setup']->get_major($setup_info[$value['depends'][$depkey]['appname']]['currentver']);
|
||
|
|
if ($major == $depsvalue)
|
||
|
|
{
|
||
|
|
$setup_info['depends'][$depkey]['status'] = True;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
/*
|
||
|
|
Finally, we loop through the dependencies again to look for apps that still have a failure status
|
||
|
|
If we find one, we set the apps overall status as a dependency failure.
|
||
|
|
*/
|
||
|
|
reset($value['depends']);
|
||
|
|
while(list($depkey, $depvalue) = each($value['depends']))
|
||
|
|
{
|
||
|
|
if ($setup_info['depends'][$depkey]['status'] == False)
|
||
|
|
{
|
||
|
|
/* Only set this if it has not already failed to upgrade - Milosch */
|
||
|
|
if($setup_info[$key]['status'] != 'F')//&& $setup_info[$key]['status'] != 'C')
|
||
|
|
{
|
||
|
|
if($setup_info[$key]['status'] == 'C')
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'D';
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$setup_info[$key]['status'] = 'P';
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return $setup_info;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
Called during the mass upgrade routine (Stage 1) to check for apps
|
||
|
|
that wish to be excluded from this process.
|
||
|
|
*/
|
||
|
|
function upgrade_exclude($setup_info)
|
||
|
|
{
|
||
|
|
@reset ($setup_info);
|
||
|
|
while(list($key,$value) = @each($setup_info))
|
||
|
|
{
|
||
|
|
if(isset($value['no_mass_update']))
|
||
|
|
{
|
||
|
|
unset($setup_info[$key]);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return $setup_info;
|
||
|
|
}
|
||
|
|
|
||
|
|
function check_header()
|
||
|
|
{
|
||
|
|
if(!file_exists('../header.inc.php'))
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage One';
|
||
|
|
return '1';
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (!isset($GLOBALS['phpgw_info']['server']['header_admin_password']))
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage One (No header admin password set)';
|
||
|
|
return '2';
|
||
|
|
}
|
||
|
|
elseif (!isset($GLOBALS['phpgw_domain']))
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage One (Upgrade your header.inc.php)';
|
||
|
|
return '3';
|
||
|
|
}
|
||
|
|
elseif ($GLOBALS['phpgw_info']['server']['versions']['header'] != $GLOBALS['phpgw_info']['server']['versions']['current_header'])
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage One (Upgrade your header.inc.php)';
|
||
|
|
return '3';
|
||
|
|
}
|
||
|
|
}
|
||
|
|
/* header.inc.php part settled. Moving to authentication */
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage One (Completed)';
|
||
|
|
return '10';
|
||
|
|
}
|
||
|
|
|
||
|
|
function check_db()
|
||
|
|
{
|
||
|
|
$setup_info = $GLOBALS['setup_info'];
|
||
|
|
|
||
|
|
$GLOBALS['phpgw_setup']->db->Halt_On_Error = 'no';
|
||
|
|
// _debug_array($setup_info);
|
||
|
|
|
||
|
|
if(!isset($setup_info['phpgwapi']['currentver']))
|
||
|
|
{
|
||
|
|
$setup_info = $this->get_db_versions($setup_info);
|
||
|
|
}
|
||
|
|
// _debug_array($setup_info);
|
||
|
|
if (isset($setup_info['phpgwapi']['currentver']))
|
||
|
|
{
|
||
|
|
if($setup_info['phpgwapi']['currentver'] == $setup_info['phpgwapi']['version'])
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 1 (Tables Complete)';
|
||
|
|
return 10;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 1 (Tables need upgrading)';
|
||
|
|
return 4;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
/* no tables, so checking if we can create them */
|
||
|
|
$GLOBALS['phpgw_setup']->db->query('CREATE TABLE phpgw_testrights ( testfield varchar(5) NOT NULL )');
|
||
|
|
if(!$GLOBALS['phpgw_setup']->db->Errno)
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->query('DROP TABLE phpgw_testrights');
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 3 (Install Applications)';
|
||
|
|
return 3;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 1 (Create Database)';
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
function check_config()
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->Halt_On_Error = 'no';
|
||
|
|
if($GLOBALS['phpgw_info']['setup']['stage']['db'] != 10)
|
||
|
|
{
|
||
|
|
return '';
|
||
|
|
}
|
||
|
|
|
||
|
|
/* Since 0.9.10pre6 config table is named as phpgw_config */
|
||
|
|
$config_table = 'config';
|
||
|
|
$ver = explode('.',$GLOBALS['phpgw_info']['server']['versions']['phpgwapi']);
|
||
|
|
|
||
|
|
if(ereg("([0-9]+)(pre)([0-9]+)",$ver[2],$regs))
|
||
|
|
{
|
||
|
|
if(($regs[1] == '10') && ($regs[3] >= '6'))
|
||
|
|
{
|
||
|
|
$config_table = 'phpgw_config';
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
@$GLOBALS['phpgw_setup']->db->query("select config_value from $config_table where config_name='freshinstall'");
|
||
|
|
$GLOBALS['phpgw_setup']->db->next_record();
|
||
|
|
$configed = $GLOBALS['phpgw_setup']->db->f('config_value');
|
||
|
|
if($configed)
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 2 (Needs Configuration)';
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 2 (Configuration OK)';
|
||
|
|
return 10;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
function check_lang()
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_setup']->db->Halt_On_Error = 'no';
|
||
|
|
if($GLOBALS['phpgw_info']['setup']['stage']['db'] != 10)
|
||
|
|
{
|
||
|
|
return '';
|
||
|
|
}
|
||
|
|
|
||
|
|
if($GLOBALS['phpgw_setup']->alessthanb($GLOBALS['setup_info']['phpgwapi']['currentver'], '0.9.15.002'))
|
||
|
|
{
|
||
|
|
$langtbl = 'lang';
|
||
|
|
$langstbl = 'languages';
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$langtbl = 'phpgw_lang';
|
||
|
|
$langstbl = 'phpgw_languages';
|
||
|
|
}
|
||
|
|
|
||
|
|
$GLOBALS['phpgw_setup']->db->query("SELECT DISTINCT lang FROM $langtbl",__LINE__,__FILE__);
|
||
|
|
if($GLOBALS['phpgw_setup']->db->num_rows() == 0)
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 3 (No languages installed)';
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
while(@$GLOBALS['phpgw_setup']->db->next_record())
|
||
|
|
{
|
||
|
|
$GLOBALS['phpgw_info']['setup']['installed_langs'][$GLOBALS['phpgw_setup']->db->f('lang')] = $GLOBALS['phpgw_setup']->db->f('lang');
|
||
|
|
}
|
||
|
|
reset($GLOBALS['phpgw_info']['setup']['installed_langs']);
|
||
|
|
while(list($key, $value) = each($GLOBALS['phpgw_info']['setup']['installed_langs']))
|
||
|
|
{
|
||
|
|
$sql = "SELECT lang_name FROM $langstbl WHERE lang_id = '".$value."';";
|
||
|
|
$GLOBALS['phpgw_setup']->db->query($sql);
|
||
|
|
$GLOBALS['phpgw_setup']->db->next_record();
|
||
|
|
$GLOBALS['phpgw_info']['setup']['installed_langs'][$value] = $GLOBALS['phpgw_setup']->db->f('lang_name');
|
||
|
|
}
|
||
|
|
$GLOBALS['phpgw_info']['setup']['header_msg'] = 'Stage 3 (Completed)';
|
||
|
|
return 10;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
@function check_app_tables
|
||
|
|
@abstract Verify that all of an app's tables exist in the db
|
||
|
|
@param $appname
|
||
|
|
@param $any optional, set to True to see if any of the apps tables are installed
|
||
|
|
*/
|
||
|
|
function check_app_tables($appname,$any=False)
|
||
|
|
{
|
||
|
|
$none = 0;
|
||
|
|
$setup_info = $GLOBALS['setup_info'];
|
||
|
|
|
||
|
|
if(@$setup_info[$appname]['tables'])
|
||
|
|
{
|
||
|
|
/* Make a copy, else we send some callers into an infinite loop */
|
||
|
|
$copy = $setup_info;
|
||
|
|
$GLOBALS['phpgw_setup']->db->Halt_On_Error = 'no';
|
||
|
|
$tablenames = $GLOBALS['phpgw_setup']->db->table_names();
|
||
|
|
while(list($key,$val) = @each($tablenames))
|
||
|
|
{
|
||
|
|
$tables[] = $val['table_name'];
|
||
|
|
}
|
||
|
|
while(list($key,$val) = @each($copy[$appname]['tables']))
|
||
|
|
{
|
||
|
|
if($GLOBALS['DEBUG'])
|
||
|
|
{
|
||
|
|
echo '<br>check_app_tables(): Checking: ' . $appname . ',table: ' . $val;
|
||
|
|
}
|
||
|
|
if(!in_array($val,$tables))
|
||
|
|
{
|
||
|
|
if($GLOBALS['DEBUG'])
|
||
|
|
{
|
||
|
|
echo '<br>check_app_tables(): ' . $val . ' missing!';
|
||
|
|
}
|
||
|
|
if(!$any)
|
||
|
|
{
|
||
|
|
return False;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$none++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if($any)
|
||
|
|
{
|
||
|
|
if($GLOBALS['DEBUG'])
|
||
|
|
{
|
||
|
|
echo '<br>check_app_tables(): Some tables installed';
|
||
|
|
}
|
||
|
|
return True;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if($none && $any)
|
||
|
|
{
|
||
|
|
if($GLOBALS['DEBUG'])
|
||
|
|
{
|
||
|
|
echo '<br>check_app_tables(): No tables installed';
|
||
|
|
}
|
||
|
|
return False;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if($GLOBALS['DEBUG'])
|
||
|
|
{
|
||
|
|
echo '<br>check_app_tables(): All tables installed';
|
||
|
|
}
|
||
|
|
return True;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
?>
|