891 lines
30 KiB
PHP
Executable File
891 lines
30 KiB
PHP
Executable File
<?php
|
|
/**
|
|
* upgrade_System.php
|
|
* @package workflow.engine.classes
|
|
*
|
|
* ProcessMaker Open Source Edition
|
|
* Copyright (C) 2004 - 2011 Colosa Inc.
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as
|
|
* published by the Free Software Foundation, either version 3 of the
|
|
* License, or (at your option) any later version.
|
|
*
|
|
* This program 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 Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
|
|
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
|
|
*
|
|
*/
|
|
|
|
/**
|
|
* class system for workflow mantanance routines
|
|
*
|
|
* author Erik A.O.<erik@colosa.com>
|
|
* date May 12th, 2010
|
|
* @package workflow.engine.classes
|
|
*
|
|
*/
|
|
|
|
class System {
|
|
|
|
var $sFilename;
|
|
var $sFilesList;
|
|
var $sUpgradeFileList;
|
|
var $aErrors;
|
|
var $aWorkspaces;
|
|
var $sRevision;
|
|
var $sPath;
|
|
var $newSystemClass;
|
|
|
|
/**
|
|
* List currently installed plugins
|
|
*
|
|
* param
|
|
* @return array with the names of the plugins
|
|
*/
|
|
public static function getPlugins() {
|
|
$plugins = array ();
|
|
|
|
foreach (glob(PATH_PLUGINS . "*") as $filename) {
|
|
$info = pathinfo($filename);
|
|
if (array_key_exists("extension", $info) && (strcmp($info["extension"], "php") == 0)) {
|
|
$plugins[] = basename($filename, ".php");
|
|
}
|
|
}
|
|
|
|
sort($plugins, SORT_STRING);
|
|
return $plugins;
|
|
}
|
|
|
|
/**
|
|
* Lists existing workspaces, returning an array of workspaceTools object
|
|
* for each.
|
|
* This is a class method, it does not require an instance.
|
|
*
|
|
* @author Alexandre Rosenfeld <alexandre@colosa.com>
|
|
* @access public
|
|
* @return array of workspace tools objects
|
|
*/
|
|
public static function listWorkspaces() {
|
|
$oDirectory = dir(PATH_DB);
|
|
$aWorkspaces = array();
|
|
foreach (glob(PATH_DB . "*") as $filename) {
|
|
if (is_dir($filename) && file_exists($filename . "/db.php"))
|
|
$aWorkspaces[] = new workspaceTools (basename($filename));
|
|
}
|
|
return $aWorkspaces;
|
|
}
|
|
|
|
/**
|
|
* Get system information
|
|
*
|
|
* param
|
|
* @return array with system information
|
|
*/
|
|
public static function getSysInfo() {
|
|
if( file_exists(PATH_METHODS . 'login/version-pmos.php') ) {
|
|
require_once (PATH_METHODS . 'login/version-pmos.php');
|
|
} else {
|
|
define('PM_VERSION', 'Development Version');
|
|
}
|
|
|
|
$ipe = explode(" ", $_SERVER['SSH_CONNECTION']);
|
|
|
|
if( getenv('HTTP_CLIENT_IP') ) {
|
|
$ip = getenv('HTTP_CLIENT_IP');
|
|
} elseif( getenv('HTTP_X_FORWARDED_FOR') ) {
|
|
$ip = getenv('HTTP_X_FORWARDED_FOR');
|
|
} else {
|
|
$ip = getenv('REMOTE_ADDR');
|
|
}
|
|
|
|
/* For distros with the lsb_release, this returns a one-line description of
|
|
* the distro name, such as "CentOS release 5.3 (Final)" or "Ubuntu 10.10"
|
|
*/
|
|
$distro = exec("lsb_release -d -s 2> /dev/null");
|
|
|
|
/* For distros without lsb_release, we look for *release (such as
|
|
* redhat-release, gentoo-release, SuSE-release, etc) or *version (such as
|
|
* debian_version, slackware-version, etc)
|
|
*/
|
|
if (empty($distro)) {
|
|
foreach (glob("/etc/*release") as $filename) {
|
|
$distro = trim(file_get_contents($filename));
|
|
if (!empty($distro))
|
|
break;
|
|
}
|
|
if (empty($distro)) {
|
|
foreach (glob("/etc/*version") as $filename) {
|
|
$distro = trim(file_get_contents($filename));
|
|
if (!empty($distro))
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* CentOS returns a string with quotes, remove them and append
|
|
* the OS name (such as LINUX, WINNT, DARWIN, etc)
|
|
*/
|
|
$distro = trim($distro, "\"") . " (" . PHP_OS . ")";
|
|
|
|
$Fields = array();
|
|
$Fields['SYSTEM'] = $distro;
|
|
$Fields['PHP'] = phpversion();
|
|
$Fields['PM_VERSION'] = PM_VERSION;
|
|
$Fields['SERVER_ADDR'] = $ipe[2]; //lookup($ipe[2]);
|
|
$Fields['IP'] = $ipe[0]; //lookup($ipe[0]);
|
|
|
|
$Fields['PLUGINS_LIST'] = System::getPlugins();
|
|
|
|
return $Fields;
|
|
}
|
|
|
|
public static function listPoFiles() {
|
|
$folders = glob(PATH_CORE . '/content/translations/*');
|
|
|
|
$items = glob(PATH_CORE . '/content/translations/*.po');
|
|
foreach ($folders as $folder) {
|
|
if (is_dir($folder)) {
|
|
$add = glob($folder . "/*.po");
|
|
$items = array_merge($items, $add);
|
|
}
|
|
}
|
|
|
|
return $items;
|
|
}
|
|
|
|
public static function verifyChecksum() {
|
|
if (!file_exists(PATH_TRUNK . "checksum.txt"))
|
|
return false;
|
|
$lines = explode("\n", file_get_contents(PATH_TRUNK . "checksum.txt"));
|
|
$result = array("diff" => array(), "missing" => array());
|
|
foreach ($lines as $line) {
|
|
if (empty($line))
|
|
continue;
|
|
list($checksum, $empty, $filename) = explode(" ", $line);
|
|
//Skip xmlform because these files always change.
|
|
if (strpos($filename, "/xmlform/") !== false)
|
|
continue;
|
|
if (file_exists(realpath($filename))) {
|
|
if (strcmp($checksum, md5_file(realpath($filename))) != 0) {
|
|
$result['diff'][] = $filename;
|
|
}
|
|
} else {
|
|
$result['missing'][] = $filename;
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* This function checks files to do updated to pm
|
|
*
|
|
*
|
|
* @name verifyFileForUpgrade
|
|
*
|
|
* param
|
|
* @return boolean
|
|
*/
|
|
function verifyFileForUpgrade()
|
|
{
|
|
$upgradeFilename = isset($_FILES['form']['name']['UPGRADE_FILENAME']) ? $_FILES['form']['name']['UPGRADE_FILENAME'] : '';
|
|
$tempFilename = isset($_FILES['form']['tmp_name']['UPGRADE_FILENAME']) ? $_FILES['form']['tmp_name']['UPGRADE_FILENAME'] : '';
|
|
$this->sRevision = str_replace('.tar.gz', '', str_replace('pmos-patch-', '', $upgradeFilename));
|
|
$sTemFilename = $tempFilename;
|
|
$this->sFilename = PATH_DATA . 'upgrade' . PATH_SEP . $upgradeFilename;
|
|
$this->sPath = dirname($this->sFilename) . PATH_SEP;
|
|
G::mk_dir(PATH_DATA . 'upgrade');
|
|
if( ! move_uploaded_file($sTemFilename, $this->sFilename) ) {
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* This function gets files to do updated to pm
|
|
*
|
|
*
|
|
* @name getUpgradedFilesList
|
|
*
|
|
* param
|
|
* @return void
|
|
*/
|
|
function getUpgradedFilesList()
|
|
{
|
|
G::LoadClass('archive');
|
|
$this->sFilesList = new gzip_file($this->sFilename);
|
|
$this->sFilesList->set_options(array (
|
|
'basedir' => dirname($this->sFilename),
|
|
'overwrite' => 1
|
|
));
|
|
$this->sFilesList->extract_files();
|
|
if( count($this->sFilesList->error) > 0 ) {
|
|
$msg = '';
|
|
foreach( $this->sFilesList->error as $key => $val ) {
|
|
$msg .= $val . "\n";
|
|
}
|
|
throw new Exception($msg);
|
|
}
|
|
if( count($this->sFilesList->files) == 0 ) {
|
|
throw new Exception('The uploaded file is an invalid patch file.');
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This function checks to do updated for boot
|
|
*
|
|
*
|
|
* @name verifyForBootstrapUpgrade
|
|
*
|
|
* param
|
|
* @return boolean
|
|
*/
|
|
function verifyForBootstrapUpgrade()
|
|
{
|
|
foreach( $this->sFilesList->files as $sFile ) {
|
|
if( basename($sFile) == 'schema.xml' ) {
|
|
$this->newSystemClass = $sFile;
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* This function updates to the files
|
|
*
|
|
*
|
|
* @name upgrade
|
|
*
|
|
* param
|
|
* @return array
|
|
*/
|
|
function upgrade()
|
|
{
|
|
//get special files
|
|
$sListFile = '';
|
|
$sCheckListFile = '';
|
|
$sPatchVersionFile = '';
|
|
$sPoFile = '';
|
|
$sSchemaFile = '';
|
|
$sSchemaRBACFile = '';
|
|
foreach( $this->sFilesList->files as $sFile ) {
|
|
if( basename($sFile) == 'schema.xml' ) {
|
|
if( strpos($sFile, '/rbac/engine/') === false ) {
|
|
$sOldSchema = '';
|
|
$sSchemaFile = $sFile;
|
|
} else {
|
|
$sOldSchemaRBAC = '';
|
|
$sSchemaRBACFile = $sFile;
|
|
}
|
|
}
|
|
|
|
//files.lst
|
|
if( basename($sFile) == 'files.lst' ) {
|
|
$this->sUpgradeFileList = $sFile;
|
|
}
|
|
|
|
//files.lst
|
|
if( basename($sFile) == 'patch.version.txt' ) {
|
|
$sPatchVersionFile = $sFile;
|
|
}
|
|
|
|
//files.rev.txt
|
|
if( substr(basename($sFile), 0, 6) == 'files.' && substr(basename($sFile), - 4) == '.txt' ) {
|
|
$sCheckListFile = $sFile;
|
|
}
|
|
|
|
//po files
|
|
$sExtension = substr($sFile, strrpos($sFile, '.') + 1, strlen($sFile));
|
|
if( $sExtension == 'po' ) {
|
|
$sPoFile = $sFile;
|
|
}
|
|
}
|
|
|
|
//now getting the current version of PM
|
|
if( file_exists(PATH_METHODS . 'login/version-pmos.php') ) {
|
|
include (PATH_METHODS . 'login/version-pmos.php');
|
|
} else {
|
|
define('PM_VERSION', '1.6-0-development');
|
|
}
|
|
|
|
$pmVersion = explode('-', PM_VERSION);
|
|
array_shift($pmVersion);
|
|
$patchVersion = explode('-', $this->sRevision);
|
|
|
|
if( $sPatchVersionFile != '' && file_exists($sPatchVersionFile) ) {
|
|
$this->sRevision = file_get_contents($sPatchVersionFile);
|
|
$patchVersion = explode('-', $this->sRevision);
|
|
}
|
|
|
|
if( ! file_exists(PATH_DATA . 'log' . PATH_SEP) ) {
|
|
G::mk_dir(PATH_DATA . 'log' . PATH_SEP);
|
|
}
|
|
|
|
//empty query log
|
|
$sqlLog = PATH_DATA . 'log' . PATH_SEP . "query.log";
|
|
$fp = fopen($sqlLog, "w+");
|
|
fwrite($fp, "");
|
|
fclose($fp);
|
|
|
|
$aEnvironmentsUpdated = array ();
|
|
$aEnvironmentsDiff = array ();
|
|
$aErrors = array ();
|
|
|
|
//now will verify each folder and file has permissions to write and add files.
|
|
if( $this->sUpgradeFileList != '' ) {
|
|
$bCopySchema = true;
|
|
$oFile = fopen($this->sUpgradeFileList, 'r');
|
|
while( $sLine = trim(fgets($oFile)) ) {
|
|
$sLine = substr($sLine, 1);
|
|
$aAux = explode(PATH_SEP, $sLine);
|
|
array_shift($aAux);
|
|
$sFilePath = implode(PATH_SEP, $aAux);
|
|
$targetFileName = PATH_TRUNK . $sFilePath;
|
|
if( ! is_dir($this->sPath . 'processmaker' . PATH_SEP . $sFilePath) ) {
|
|
//if we are updating or deleting a file
|
|
if( file_exists($this->sPath . 'processmaker' . PATH_SEP . $sFilePath) ) {
|
|
if( file_exists($targetFileName) ) {
|
|
if( ! is_writable($targetFileName) ) {
|
|
throw (new Exception("File $targetFileName is not writable."));
|
|
}
|
|
} else {
|
|
//verify parent folder, and ask if that folder is writable
|
|
$auxDir = explode('/', $targetFileName);
|
|
array_pop($auxDir);
|
|
$parentDir = implode('/', $auxDir);
|
|
if( ! is_dir($parentDir) ) {
|
|
//throw (new Exception("File $parentDir is an invalid directory."));
|
|
G::mk_dir($parentDir);
|
|
}
|
|
if( ! is_writable($parentDir) ) {
|
|
throw (new Exception("Directory $parentDir is not writable."));
|
|
}
|
|
}
|
|
} else {
|
|
//delete unused files
|
|
if( file_exists($targetFileName) && ! is_writable($targetFileName) ) {
|
|
throw (new Exception("File $targetFileName is not writable."));
|
|
}
|
|
}
|
|
} else {
|
|
$dirName = PATH_TRUNK . $sFilePath;
|
|
if( $dirName[strlen($dirName) - 1] == '/' )
|
|
$dirName = substr($dirName, 0, strlen($dirName) - 1);
|
|
$auxDir = explode('/', $dirName);
|
|
array_pop($auxDir);
|
|
$parentDir = implode('/', $auxDir);
|
|
if( file_exists($dirName) ) {
|
|
if( is_writable($dirName) ) {
|
|
//print "e. ok $dirName <br>";
|
|
} else {
|
|
throw (new Exception("$dirName is not writable"));
|
|
}
|
|
} else {
|
|
if( is_writable($parentDir) ) {
|
|
mkdir($dirName, 0777);
|
|
} else {
|
|
throw (new Exception("$dirName does not exist and parent folder $parentDir is not writable"));
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//processing list file files.lst
|
|
if( $this->sUpgradeFileList != '' ) {
|
|
$bCopySchema = true;
|
|
$oFile = fopen($this->sUpgradeFileList, 'r');
|
|
while( $sLine = trim(fgets($oFile)) ) {
|
|
$action = substr($sLine, 0, 1);
|
|
$sLine = substr($sLine, 1);
|
|
$aAux = explode(PATH_SEP, $sLine);
|
|
array_shift($aAux);
|
|
$sFilePath = implode(PATH_SEP, $aAux);
|
|
$targetFileName = PATH_TRUNK . $sFilePath;
|
|
if( strtoupper($action) != 'D'){
|
|
if( ! is_dir($this->sPath . 'processmaker' . PATH_SEP . $sFilePath) ) {
|
|
if( file_exists($this->sPath . 'processmaker' . PATH_SEP . $sFilePath) ) {
|
|
if( strpos($sFilePath, 'schema.xml') !== false && $bCopySchema ) {
|
|
$bCopySchema = false;
|
|
$sOldSchema = str_replace('schema.xml', 'schema_' . date('Ymd') . '.xml', PATH_TRUNK . $sFilePath);
|
|
$this->pm_copy(PATH_TRUNK . $sFilePath, $sOldSchema);
|
|
}
|
|
if( file_exists($targetFileName) ) {
|
|
if( is_writable($targetFileName) ) {
|
|
$this->pm_copy($this->sPath . 'processmaker' . PATH_SEP . $sFilePath, $targetFileName);
|
|
@chmod($targetFileName, 0666);
|
|
} else
|
|
throw (new Exception("Failed to open file: Permission denied in $targetFileName."));
|
|
} else {
|
|
$this->pm_copy($this->sPath . 'processmaker' . PATH_SEP . $sFilePath, $targetFileName);
|
|
@chmod($targetFileName, 0666);
|
|
}
|
|
} else { //delete unused files
|
|
if( file_exists($targetFileName) ) {
|
|
@unlink($targetFileName);
|
|
}
|
|
}
|
|
} else {
|
|
if( ! file_exists(PATH_TRUNK . $sFilePath) ) {
|
|
mkdir(PATH_TRUNK . $sFilePath, 0777);
|
|
}
|
|
}
|
|
} else if( file_exists(PATH_TRUNK . $sFilePath) && $sFilePath != 'workflow/engine/gulliver' ) {
|
|
@unlink(PATH_TRUNK . $sFilePath);
|
|
}
|
|
}
|
|
}
|
|
|
|
//end files copied.
|
|
$missedFiles = '';
|
|
$distinctFiles = '';
|
|
$missed = 0;
|
|
$distinct = 0;
|
|
//checking files of this installation server with the files in Repository Code.
|
|
if( $sCheckListFile != '' ) {
|
|
$fp = fopen($sCheckListFile, 'r');
|
|
while( ! feof($fp) ) {
|
|
$line = explode(' ', fgets($fp));
|
|
if( count($line) == 3 ) {
|
|
$file = PATH_TRUNK . trim($line[2]);
|
|
if( is_readable($file) ) {
|
|
$size = sprintf("%07d", filesize($file));
|
|
$checksum = sprintf("%010u", crc32(file_get_contents($file)));
|
|
if( ! ($line[0] == $size && $line[1] == $checksum) && substr($file, - 4) != '.xml' ) {
|
|
$distinctFiles .= $file . "\n";
|
|
$distinct ++;
|
|
}
|
|
} else {
|
|
$missedFiles .= $file . "\n";
|
|
$missed ++;
|
|
}
|
|
}
|
|
}
|
|
fclose($fp);
|
|
}
|
|
|
|
if( $missed > 0 )
|
|
$aErrors[] = "Warning: there are $missed missed files. ";
|
|
$aErrors[] = $missedFiles;
|
|
|
|
if( $distinct > 0 ) {
|
|
$aErrors[] = "Warning: there are $distinct files with differences. ";
|
|
$aErrors[] = $distinctFiles;
|
|
}
|
|
|
|
//now include the files and classes needed for upgrade databases, dont move this files, because we
|
|
//are getting the last files in this point. Even the files was in the patch we will take the new ones.
|
|
include PATH_METHODS . PATH_SEP . 'setup' . PATH_SEP . 'upgrade_RBAC.php';
|
|
G::LoadClass('languages');
|
|
G::LoadSystem('database_mysql');
|
|
|
|
$bForceXml = true;
|
|
$bParseSchema = true;
|
|
$bParseSchemaRBAC = true;
|
|
$oDirectory = dir(PATH_DB);
|
|
|
|
//count db.php files ( workspaces )
|
|
$aWorkspaces = array ();
|
|
while( ($sObject = $oDirectory->read()) ) {
|
|
if( is_dir(PATH_DB . $sObject) && substr($sObject, 0, 1) != '.' && file_exists(PATH_DB . $sObject . PATH_SEP . 'db.php') ) {
|
|
$aWorkspaces[] = $sObject;
|
|
}
|
|
}
|
|
$aUpgradeData = array ();
|
|
$aUpgradeData['workspaces'] = $aWorkspaces;
|
|
$aUpgradeData['wsQuantity'] = count($aWorkspaces);
|
|
$aUpgradeData['sPoFile'] = $sPoFile;
|
|
$aUpgradeData['bForceXmlPoFile'] = true;
|
|
$aUpgradeData['sSchemaFile'] = $sSchemaFile;
|
|
$aUpgradeData['sSchemaRBACFile'] = $sSchemaRBACFile;
|
|
|
|
file_put_contents(PATH_DATA . 'log' . PATH_SEP . "upgrade.data.bin", serialize($aUpgradeData));
|
|
|
|
$sSchemaFile = '';
|
|
$sPoFile = '';
|
|
$sSchemaRBACFile = '';
|
|
|
|
$oDirectory = dir(PATH_DB);
|
|
while( ($sObject = $oDirectory->read()) ) {
|
|
if( is_dir(PATH_DB . $sObject) && substr($sObject, 0, 1) != '.' ) {
|
|
if( file_exists(PATH_DB . $sObject . PATH_SEP . 'db.php') ) {
|
|
|
|
eval($this->getDatabaseCredentials(PATH_DB . $sObject . PATH_SEP . 'db.php'));
|
|
|
|
}
|
|
$aEnvironmentsUpdated[] = $sObject;
|
|
$aEnvironmentsDiff[] = $sObject;
|
|
}
|
|
}
|
|
$oDirectory->close();
|
|
@unlink(PATH_CORE . 'config/_databases_.php');
|
|
|
|
//clean up smarty directory
|
|
$oDirectory = dir(PATH_SMARTY_C);
|
|
while( $sFilename = $oDirectory->read() ) {
|
|
if( ($sFilename != '.') && ($sFilename != '..') ) {
|
|
@unlink(PATH_SMARTY_C . PATH_SEP . $sFilename);
|
|
}
|
|
}
|
|
|
|
//clean up xmlform folders
|
|
$sDir = PATH_C . 'xmlform';
|
|
if( file_exists($sDir) && is_dir($sDir) ) {
|
|
$oDirectory = dir($sDir);
|
|
while( $sObjectName = $oDirectory->read() ) {
|
|
if( ($sObjectName != '.') && ($sObjectName != '..') ) {
|
|
if( is_dir($sDir . PATH_SEP . $sObjectName) ) {
|
|
$this->rm_dir($sDir . PATH_SEP . $sObjectName);
|
|
}
|
|
}
|
|
}
|
|
$oDirectory->close();
|
|
}
|
|
|
|
//changing the PM_VERSION according the patch file name
|
|
$oFile = fopen(PATH_METHODS . 'login/version-pmos.php', 'w+');
|
|
if( isset($this->sRevision) && $this->sRevision != '' ) {
|
|
fwrite($oFile, "<?\n define ( 'PM_VERSION' , str_replace ( ' ','', '1.6-" . $this->sRevision . "' ));\n?>");
|
|
} else {
|
|
fwrite($oFile, "<?\n define ( 'PM_VERSION' , str_replace ( ' ','', 'unknow' ));\n?>");
|
|
}
|
|
fclose($oFile);
|
|
$ver = explode("-", $this->sRevision);
|
|
$this->aErrors = $aErrors;
|
|
$this->aWorkspaces = $aWorkspaces;
|
|
|
|
return $ver;
|
|
}
|
|
|
|
/**
|
|
* This function does to clean up to the upgrate directory
|
|
*
|
|
*
|
|
* @name cleanupUpgradeDirectory
|
|
*
|
|
* param
|
|
* @return array
|
|
*/
|
|
function cleanupUpgradeDirectory()
|
|
{
|
|
$this->rm_dir(PATH_DATA . 'upgrade' . PATH_SEP . 'processmaker');
|
|
}
|
|
|
|
/**
|
|
* This function removes a directory
|
|
*
|
|
*
|
|
* @name rm_dir
|
|
*
|
|
* @param string $dirName
|
|
* @return void
|
|
*/
|
|
function rm_dir($dirName)
|
|
{
|
|
if( empty($dirName) ) {
|
|
return;
|
|
}
|
|
if( file_exists($dirName) ) {
|
|
if( ! is_readable($dirName) ) {
|
|
throw (new Exception("directory '$dirName' is not readable"));
|
|
}
|
|
$dir = dir($dirName);
|
|
while( $file = $dir->read() ) {
|
|
if( $file != '.' && $file != '..' ) {
|
|
if( is_dir($dirName . PATH_SEP . $file) ) {
|
|
$this->rm_dir($dirName . PATH_SEP . $file);
|
|
} else {
|
|
//@unlink($dirName. PATH_SEP .$file) or die('File '.$dirName. PATH_SEP .$file.' couldn\'t be deleted!');
|
|
@unlink($dirName . PATH_SEP . $file);
|
|
}
|
|
}
|
|
}
|
|
|
|
$folder = opendir($dirName . PATH_SEP . $file);
|
|
closedir($folder);
|
|
@rmdir($dirName . PATH_SEP . $file);
|
|
} else {
|
|
//
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This function creates a directory
|
|
*
|
|
*
|
|
* @name pm_copy
|
|
*
|
|
* @param string $source
|
|
* @param string $target
|
|
* @return void
|
|
*/
|
|
function pm_copy($source, $target)
|
|
{
|
|
if( ! is_dir(dirname($target)) ) {
|
|
G::mk_dir(dirname($target));
|
|
}
|
|
if( ! copy($source, $target) ) {
|
|
krumo($source);
|
|
krumo($target);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This function gets info about db
|
|
*
|
|
*
|
|
* @name getDatabaseCredentials
|
|
*
|
|
* @param string $dbFile
|
|
* @return $sContent
|
|
*/
|
|
function getDatabaseCredentials($dbFile)
|
|
{
|
|
$sContent = file_get_contents($dbFile);
|
|
$sContent = str_replace('<?php', '', $sContent);
|
|
$sContent = str_replace('<?', '', $sContent);
|
|
$sContent = str_replace('?>', '', $sContent);
|
|
$sContent = str_replace('define', '', $sContent);
|
|
$sContent = str_replace("('", '$', $sContent);
|
|
$sContent = str_replace("',", '=', $sContent);
|
|
$sContent = str_replace(");", ';', $sContent);
|
|
return $sContent;
|
|
}
|
|
|
|
/**
|
|
* Retrieves the system schema.
|
|
*
|
|
* @return schema content in an array
|
|
*/
|
|
public static function getSystemSchema() {
|
|
return System::getSchema(PATH_TRUNK . "workflow/engine/config/schema.xml");
|
|
}
|
|
|
|
/**
|
|
* Retrieves the schema for a plugin.
|
|
*
|
|
* @param string $pluginName name of the plugin
|
|
* @return $sContent
|
|
*/
|
|
public static function getPluginSchema($pluginName) {
|
|
if (file_exists(PATH_PLUGINS . $pluginName . "/config/schema.xml"))
|
|
return System::getSchema(PATH_PLUGINS . $pluginName . "/config/schema.xml");
|
|
else
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Retrieves a schema array from a file.
|
|
*
|
|
* @param string $sSchemaFile schema filename
|
|
* @return $sContent
|
|
*/
|
|
public static function getSchema($sSchemaFile) {
|
|
/* This is the MySQL mapping that Propel uses (from MysqlPlatform.php) */
|
|
$mysqlTypes = array(
|
|
'NUMERIC' => "DECIMAL",
|
|
'LONGVARCHAR' => "MEDIUMTEXT",
|
|
'TIMESTAMP' => "DATETIME",
|
|
'BU_TIMESTAMP' => "DATETIME",
|
|
'BINARY' => "BLOB",
|
|
'VARBINARY' => "MEDIUMBLOB",
|
|
'LONGVARBINARY' => "LONGBLOB",
|
|
'BLOB' => "LONGBLOB",
|
|
'CLOB' => "LONGTEXT",
|
|
/* This is not from Propel, but is required to get INT right */
|
|
'INTEGER' => "INT");
|
|
|
|
$aSchema = array();
|
|
$oXml = new DomDocument();
|
|
$oXml->load($sSchemaFile);
|
|
$aTables = $oXml->getElementsByTagName('table');
|
|
foreach ($aTables as $oTable) {
|
|
$aPrimaryKeys = array();
|
|
$sTableName = $oTable->getAttribute('name');
|
|
$aSchema[$sTableName] = array();
|
|
$aColumns = $oTable->getElementsByTagName('column');
|
|
foreach ($aColumns as $oColumn) {
|
|
$sColumName = $oColumn->getAttribute('name');
|
|
|
|
/* Get the field type. Propel uses VARCHAR if nothing else is specified */
|
|
$type = $oColumn->hasAttribute('type') ? strtoupper($oColumn->getAttribute('type')) : "VARCHAR";
|
|
|
|
/* Convert type to MySQL type according to Propel */
|
|
if (array_key_exists($type, $mysqlTypes))
|
|
$type = $mysqlTypes[$type];
|
|
|
|
$size = $oColumn->hasAttribute('size') ? $oColumn->getAttribute('size') : NULL;
|
|
/* Add default sizes from MySQL */
|
|
if ($type == "TINYINT" && !$size)
|
|
$size = "4";
|
|
if ($type == "INT" && !$size)
|
|
$size = "11";
|
|
|
|
if ($size)
|
|
$type = "$type($size)";
|
|
|
|
$required = $oColumn->hasAttribute('required') ? $oColumn->getAttribute('required') : NULL;
|
|
/* Convert $required to a bool */
|
|
$required = (in_array (strtolower ($required), array('1', 'true')));
|
|
|
|
$default = $oColumn->hasAttribute('default') ? $oColumn->getAttribute('default') : NULL;
|
|
|
|
$primaryKey = $oColumn->hasAttribute('primaryKey') ? $oColumn->getAttribute('primaryKey') : NULL;
|
|
/* Convert $primaryKey to a bool */
|
|
$primaryKey = (in_array (strtolower ($primaryKey), array('1', 'true')));
|
|
if ($primaryKey)
|
|
$aPrimaryKeys[] = $sColumName;
|
|
|
|
$aSchema[$sTableName][$sColumName] = array(
|
|
'Field' => $sColumName,
|
|
'Type' => $type,
|
|
'Null' => $required ? "NO" : "YES",
|
|
'Default' => $default
|
|
);
|
|
}
|
|
|
|
if ( is_array($aPrimaryKeys) && count($aPrimaryKeys) > 0 ) {
|
|
$aSchema[$sTableName]['INDEXES']['PRIMARY'] = $aPrimaryKeys;
|
|
}
|
|
$aIndexes = $oTable->getElementsByTagName('index');
|
|
foreach ($aIndexes as $oIndex) {
|
|
$aIndex = array();
|
|
$aIndexesColumns = $oIndex->getElementsByTagName('index-column');
|
|
foreach ($aIndexesColumns as $oIndexColumn) {
|
|
$aIndex[] = $oIndexColumn->getAttribute('name');
|
|
}
|
|
$aSchema[$sTableName]['INDEXES'][ $oIndex->getAttribute('name') ] = $aIndex;
|
|
}
|
|
}
|
|
return $aSchema;
|
|
}
|
|
|
|
/**
|
|
* Returns the difference between two schema arrays
|
|
*
|
|
* @param array $aOldSchema original schema array
|
|
* @param array $aNewSchema new schema array
|
|
* @return array with tablesToAdd, tablesToAlter, tablesWithNewIndex and tablesToAlterIndex
|
|
*/
|
|
public static function compareSchema($aOldSchema, $aNewSchema) {
|
|
//$aChanges = array('tablesToDelete' => array(), 'tablesToAdd' => array(), 'tablesToAlter' => array());
|
|
//Tables to delete, but this is disabled
|
|
//foreach ($aOldSchema as $sTableName => $aColumns) {
|
|
// if ( !isset($aNewSchema[$sTableName])) {
|
|
// if (!in_array($sTableName, array('KT_APPLICATION', 'KT_DOCUMENT', 'KT_PROCESS'))) {
|
|
// $aChanges['tablesToDelete'][] = $sTableName;
|
|
// }
|
|
// }
|
|
//}
|
|
|
|
$aChanges = array('tablesToAdd' => array(), 'tablesToAlter' => array(), 'tablesWithNewIndex' => array(), 'tablesToAlterIndex'=> array());
|
|
|
|
//new tables to create and alter
|
|
foreach ($aNewSchema as $sTableName => $aColumns) {
|
|
if (!isset($aOldSchema[$sTableName])) {
|
|
$aChanges['tablesToAdd'][$sTableName] = $aColumns;
|
|
}
|
|
else {
|
|
//drop old columns
|
|
foreach ($aOldSchema[$sTableName] as $sColumName => $aParameters) {
|
|
if (!isset($aNewSchema[$sTableName][$sColumName])) {
|
|
if (!isset($aChanges['tablesToAlter'][$sTableName])) {
|
|
$aChanges['tablesToAlter'][$sTableName] = array('DROP' => array(), 'ADD' => array(), 'CHANGE' => array());
|
|
}
|
|
$aChanges['tablesToAlter'][$sTableName]['DROP'][$sColumName] = $sColumName;
|
|
}
|
|
}
|
|
|
|
//create new columns
|
|
//foreach ($aNewSchema[$sTableName] as $sColumName => $aParameters) {
|
|
foreach ($aColumns as $sColumName => $aParameters) {
|
|
if ($sColumName != 'INDEXES') {
|
|
if (!isset($aOldSchema[$sTableName][$sColumName])) { //this column doesnt exist in oldschema
|
|
if (!isset($aChanges['tablesToAlter'][$sTableName])) {
|
|
$aChanges['tablesToAlter'][$sTableName] = array('DROP' => array(), 'ADD' => array(), 'CHANGE' => array());
|
|
}
|
|
$aChanges['tablesToAlter'][$sTableName]['ADD'][$sColumName] = $aParameters;
|
|
}
|
|
else { //the column exists
|
|
$newField = $aNewSchema[$sTableName][$sColumName];
|
|
$oldField = $aOldSchema[$sTableName][$sColumName];
|
|
//both are null, no change is required
|
|
if ( !isset($newField['Default']) && !isset($oldField['Default'])) $changeDefaultAttr = false;
|
|
//one of them is null, change IS required
|
|
if ( !isset($newField['Default']) && isset($oldField['Default']) && $oldField['Default']!= '') $changeDefaultAttr = true;
|
|
if ( isset($newField['Default']) && !isset($oldField['Default'])) $changeDefaultAttr = true;
|
|
//both are defined and they are different.
|
|
if ( isset($newField['Default']) && isset($oldField['Default']) ) {
|
|
if ( $newField['Default'] != $oldField['Default'] )
|
|
$changeDefaultAttr = true;
|
|
else
|
|
$changeDefaultAttr = false;
|
|
}
|
|
//special cases
|
|
// BLOB and TEXT columns cannot have DEFAULT values. http://dev.mysql.com/doc/refman/5.0/en/blob.html
|
|
if ( in_array(strtolower($newField['Type']), array('text','mediumtext') ) )
|
|
$changeDefaultAttr = false;
|
|
|
|
//#1067 - Invalid default value for datetime field
|
|
if ( in_array($newField['Type'], array('datetime')) && isset($newField['Default']) && $newField['Default']== '' )
|
|
$changeDefaultAttr = false;
|
|
|
|
//#1067 - Invalid default value for int field
|
|
if ( substr($newField['Type'], 0, 3 ) == "int" && isset($newField['Default']) && $newField['Default']== '' )
|
|
$changeDefaultAttr = false;
|
|
|
|
//if any difference exists, then insert the difference in aChanges
|
|
if ( strcasecmp($newField['Field'], $oldField['Field']) !== 0 ||
|
|
strcasecmp($newField['Type'], $oldField['Type']) !== 0 ||
|
|
strcasecmp($newField['Null'], $oldField['Null']) !== 0 ||
|
|
$changeDefaultAttr ) {
|
|
if (!isset($aChanges['tablesToAlter'][$sTableName])) {
|
|
$aChanges['tablesToAlter'][$sTableName] = array('DROP' => array(), 'ADD' => array(), 'CHANGE' => array());
|
|
}
|
|
$aChanges['tablesToAlter'][$sTableName]['CHANGE'][$sColumName]['Field'] = $newField['Field'];
|
|
$aChanges['tablesToAlter'][$sTableName]['CHANGE'][$sColumName]['Type'] = $newField['Type'];
|
|
$aChanges['tablesToAlter'][$sTableName]['CHANGE'][$sColumName]['Null'] = $newField['Null'];
|
|
if ( isset($newField['Default']) )
|
|
$aChanges['tablesToAlter'][$sTableName]['CHANGE'][$sColumName]['Default'] = $newField['Default'];
|
|
else
|
|
$aChanges['tablesToAlter'][$sTableName]['CHANGE'][$sColumName]['Default'] = null;
|
|
|
|
}
|
|
}
|
|
} //only columns, no the indexes column
|
|
}//foreach $aColumns
|
|
|
|
//now check the indexes of table
|
|
if ( isset($aNewSchema[$sTableName]['INDEXES']) ) {
|
|
foreach ( $aNewSchema[$sTableName]['INDEXES'] as $indexName => $indexFields ) {
|
|
if (!isset( $aOldSchema[$sTableName]['INDEXES'][$indexName]) ) {
|
|
if (!isset($aChanges['tablesWithNewIndex'][$sTableName])) {
|
|
$aChanges['tablesWithNewIndex'][$sTableName] = array();
|
|
}
|
|
$aChanges['tablesWithNewIndex'][$sTableName][$indexName] = $indexFields;
|
|
}
|
|
else {
|
|
if ( $aOldSchema[$sTableName]['INDEXES'][$indexName] != $indexFields ) {
|
|
if (!isset($aChanges['tablesToAlterIndex'][$sTableName])) {
|
|
$aChanges['tablesToAlterIndex'][$sTableName] = array();
|
|
}
|
|
$aChanges['tablesToAlterIndex'][$sTableName][$indexName] = $indexFields;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} //for-else table exists
|
|
} //for new schema
|
|
return $aChanges;
|
|
}
|
|
|
|
}// end System class
|