fernando/luos
1
0
Fork 0
Code Releases Activity

BUG 9087 Adjustment for standardization of code SOLVED

Browse Source 
- Adjustment workflow/engine/classes/class.pmScript.php file.
This commit is contained in:
Hector Cortez
2012-07-03 17:54:36 -04:00
parent bc5e4adb3e
commit c1fab8b2cb
1 changed files with 613 additions and 558 deletions
Download Patch File Download Diff File Expand all files Collapse all files

449
workflow/engine/classes/class.pmScript.php
View File

@@ -1,4 +1,5 @@
<?php <?php
/** /**
* class.pmScript.php * class.pmScript.php
* @package workflow.engine.ProcessMaker * @package workflow.engine.ProcessMaker
@@ -38,7 +39,6 @@
* last modify comment was added and adapted the catch errors * last modify comment was added and adapted the catch errors
* @copyright 2007 COLOSA * @copyright 2007 COLOSA
*/ */
function __autoload($sClassName) function __autoload($sClassName)
{ {
if (defined('SYS_SYS')) { if (defined('SYS_SYS')) {
@@ -57,24 +57,25 @@ if (class_exists('folderData')) {
//$folderData = new folderData($sProUid, $proFields['PRO_TITLE'], $sAppUid, $Fields['APP_TITLE'], $sUsrUid); //$folderData = new folderData($sProUid, $proFields['PRO_TITLE'], $sAppUid, $Fields['APP_TITLE'], $sUsrUid);
$oPluginRegistry = &PMPluginRegistry::getSingleton(); $oPluginRegistry = &PMPluginRegistry::getSingleton();
$aAvailablePmFunctions = $oPluginRegistry->getPmFunctions(); $aAvailablePmFunctions = $oPluginRegistry->getPmFunctions();
foreach ($aAvailablePmFunctions as $key => $class ) { foreach ($aAvailablePmFunctions as $key => $class) {
$filePlugin = PATH_PLUGINS . $class . PATH_SEP . 'classes' . PATH_SEP . 'class.pmFunctions.php'; $filePlugin = PATH_PLUGINS . $class . PATH_SEP . 'classes' . PATH_SEP . 'class.pmFunctions.php';
if ( file_exists ( $filePlugin ) ) if (file_exists($filePlugin)) {
include_once( $filePlugin); include_once( $filePlugin);
} }
}
} }
//end plugin //end plugin
//Add External Triggers //Add External Triggers
$dir=G::ExpandPath( "classes" ).'triggers'; $dir = G::ExpandPath("classes") . 'triggers';
$filesArray=array(); $filesArray = array();
if (file_exists($dir)){ if (file_exists($dir)) {
if ($handle = opendir($dir)) { if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) { while (false !== ($file = readdir($handle))) {
if(($file!=".")&&($file!="..")){ if (($file != ".") && ($file != "..")) {
$extFile =explode(".",$file); $extFile = explode(".", $file);
if($extFile[sizeof($extFile)-1] == 'php') if ($extFile[sizeof($extFile) - 1] == 'php') {
include_once( $dir.PATH_SEP.$file); include_once( $dir . PATH_SEP . $file);
}
} }
} }
closedir($handle); closedir($handle);
@@ -88,36 +89,37 @@ if (file_exists($dir)){
*/ */
class PMScript class PMScript
{ {
/** /**
* Original fields * Original fields
*/ */
var $aOriginalFields = array(); public $aOriginalFields = array();
/** /**
* Fields to use * Fields to use
*/ */
var $aFields = array(); public $aFields = array();
/** /**
* Script * Script
*/ */
var $sScript = ''; public $sScript = '';
/** /**
* Error has happened? * Error has happened?
*/ */
var $bError = false; public $bError = false;
/** /**
* Affected fields * Affected fields
*/ */
var $affected_fields; public $affected_fields;
/** /**
* Constructor of the class PMScript * Constructor of the class PMScript
* @return void * @return void
*/ */
function PMScript() public function PMScript()
{ {
$this->aFields['__ERROR__'] = 'none'; $this->aFields['__ERROR__'] = 'none';
} }
@@ -127,7 +129,7 @@ class PMScript
* @param array $aFields * @param array $aFields
* @return void * @return void
*/ */
function setFields($aFields = array()) public function setFields($aFields=array())
{ {
if (!is_array($aFields)) { if (!is_array($aFields)) {
$aFields = array(); $aFields = array();
@@ -140,7 +142,7 @@ class PMScript
* @param string $sScript * @param string $sScript
* @return void * @return void
*/ */
function setScript($sScript = '') public function setScript($sScript='')
{ {
$this->sScript = $sScript; $this->sScript = $sScript;
} }
@@ -150,13 +152,13 @@ class PMScript
* @param string $sScript * @param string $sScript
* @return boolean * @return boolean
*/ */
function validSyntax($sScript) public function validSyntax($sScript)
{ {
return true; return true;
} }
public function executeAndCatchErrors($sScript, $sCode)
function executeAndCatchErrors($sScript, $sCode) { {
ob_start('handleFatalErrors'); ob_start('handleFatalErrors');
set_error_handler('handleErrors'); set_error_handler('handleErrors');
$_SESSION['_CODE_'] = $sCode; $_SESSION['_CODE_'] = $sCode;
@@ -169,146 +171,170 @@ class PMScript
* Execute the current script * Execute the current script
* @return void * @return void
*/ */
function execute() public function execute()
{ {
$sScript = ""; $sScript = "";
$iAux = 0; $iAux = 0;
$bEqual = false; $bEqual = false;
$iOcurrences = preg_match_all('/\@(?:([\@\%\#\?\$\=])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/', $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE); $iOcurrences = preg_match_all( '/\@(?:([\@\%\#\?\$\=])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]'
if ($iOcurrences){ . '*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/',
for($i = 0; $i < $iOcurrences; $i++){ $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE);
if ($iOcurrences) {
for ($i = 0; $i < $iOcurrences; $i++) {
$sAux = substr($this->sScript, $iAux, $aMatch[0][$i][1] - $iAux); $sAux = substr($this->sScript, $iAux, $aMatch[0][$i][1] - $iAux);
if (!$bEqual){ if (!$bEqual) {
if (strpos($sAux, '==') !== false){ if (strpos($sAux, '==') !== false) {
$bEqual = false; $bEqual = false;
} } else {
else { if (strpos($sAux, '=') !== false) {
if (strpos($sAux, '=') !== false){
$bEqual = true; $bEqual = true;
} }
} }
} }
if ($bEqual){ if ($bEqual) {
if (strpos($sAux, ';') !== false){ if (strpos($sAux, ';') !== false) {
$bEqual = false; $bEqual = false;
} }
} }
if ($bEqual) { if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
eval("if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = null; }"); eval("if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['"
} . $aMatch[2][$i][0] . "'] = null; }");
else { } else {
eval("if (!isset(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")) { \$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . " = null; }"); eval( "if (!isset(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")) { \$this->aFields"
. (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0]
. "']" : '') . $aMatch[5][$i][0] . " = null; }");
} }
} }
$sScript .= $sAux; $sScript .= $sAux;
$iAux = $aMatch[0][$i][1] + strlen($aMatch[0][$i][0]); $iAux = $aMatch[0][$i][1] + strlen($aMatch[0][$i][0]);
switch ($aMatch[1][$i][0]) switch ($aMatch[1][$i][0]) {
{ case '@': case '@':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToString(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToString(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '%': case '%':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToInteger(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToInteger(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '#': case '#':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToFloat(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToFloat(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '?': case '?':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToUrl(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToUrl(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '$': case '$':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmSqlEscape(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmSqlEscape(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '=': case '=':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} else {
$sScript .= "\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
else { } else {
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
@@ -317,13 +343,16 @@ class PMScript
} }
} }
$sScript .= substr($this->sScript, $iAux); $sScript .= substr($this->sScript, $iAux);
$sScript = "try {\n" . $sScript . "\n} catch (Exception \$oException) {\n \$this->aFields['__ERROR__'] = utf8_encode(\$oException->getMessage());\n}"; $sScript = "try {\n" . $sScript . "\n} catch (Exception \$oException) {\n "
. " \$this->aFields['__ERROR__'] = utf8_encode(\$oException->getMessage());\n}";
//echo '<pre>-->'; print_r($this->aFields); echo '<---</pre>'; //echo '<pre>-->'; print_r($this->aFields); echo '<---</pre>';
$this->executeAndCatchErrors($sScript, $this->sScript); $this->executeAndCatchErrors($sScript, $this->sScript);
for($i=0; $i<count($this->affected_fields); $i++){ for ($i = 0; $i < count($this->affected_fields); $i++) {
$_SESSION['TRIGGER_DEBUG']['DATA'][] = Array( $_SESSION['TRIGGER_DEBUG']['DATA'][] = Array(
'key' => $this->affected_fields[$i], 'key' => $this->affected_fields[$i],
'value' => isset($this->aFields[$this->affected_fields[$i]]) ? $this->aFields[$this->affected_fields[$i]] : '' 'value' => isset($this->aFields[$this->affected_fields[$i]])
? $this->aFields[$this->affected_fields[$i]]
: ''
); );
} }
//echo '<pre>-->'; print_r($_SESSION['TRIGGER_DEBUG']['DATA']); echo '<---</pre>'; //echo '<pre>-->'; print_r($_SESSION['TRIGGER_DEBUG']['DATA']); echo '<---</pre>';
@@ -333,141 +362,161 @@ class PMScript
* Evaluate the current script * Evaluate the current script
* @return void * @return void
*/ */
function evaluate() public function evaluate()
{ {
$bResult = null; $bResult = null;
$sScript = ''; $sScript = '';
$iAux = 0; $iAux = 0;
$bEqual = false; $bEqual = false;
$variableIsDefined = true; $variableIsDefined = true;
$iOcurrences = preg_match_all('/\@(?:([\@\%\#\?\$\=])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/', $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE); $iOcurrences = preg_match_all('/\@(?:([\@\%\#\?\$\=])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]'
if ($iOcurrences){ . '*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/',
for($i = 0; $i < $iOcurrences; $i++){ $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE);
// if the variables for that condition has not been previously defined then $variableIsDefined is set to false if ($iOcurrences) {
if (!isset($this->aFields[$aMatch[2][$i][0]])){ for ($i = 0; $i < $iOcurrences; $i++) {
// $variableIsDefined = false; // if the variables for that condition has not been previously defined then $variableIsDefined
// is set to false
if (!isset($this->aFields[$aMatch[2][$i][0]])) {
// $variableIsDefined = false;
$this->aFields[$aMatch[2][$i][0]] = ''; $this->aFields[$aMatch[2][$i][0]] = '';
} }
$sAux = substr($this->sScript, $iAux, $aMatch[0][$i][1] - $iAux); $sAux = substr($this->sScript, $iAux, $aMatch[0][$i][1] - $iAux);
if (!$bEqual){ if (!$bEqual) {
if (strpos($sAux, '=') !== false){ if (strpos($sAux, '=') !== false) {
$bEqual = true; $bEqual = true;
} }
} }
if ($bEqual){ if ($bEqual) {
if (strpos($sAux, ';') !== false) if (strpos($sAux, ';') !== false) {
{
$bEqual = false; $bEqual = false;
} }
} }
$sScript .= $sAux; $sScript .= $sAux;
$iAux = $aMatch[0][$i][1] + strlen($aMatch[0][$i][0]); $iAux = $aMatch[0][$i][1] + strlen($aMatch[0][$i][0]);
switch ($aMatch[1][$i][0]){ switch ($aMatch[1][$i][0]) {
case '@': case '@':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToString(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToString(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '%': case '%':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToInteger(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToInteger(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '#': case '#':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToFloat(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToFloat(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '?': case '?':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmToUrl(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmToUrl(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '$': case '$':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])"; $sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
} else {
$sScript .= "pmSqlEscape(\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0] . ")";
} }
else { } else {
$sScript .= "pmSqlEscape(\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
case '=': case '=':
if ($bEqual){ if ($bEqual) {
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} else {
$sScript .= "\$this->aFields"
. (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
else { } else {
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
}
}
else{
if (!isset($aMatch[5][$i][0])) { if (!isset($aMatch[5][$i][0])) {
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']"; $sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
} } else {
else { $sScript .= "\$this->aFields"
$sScript .= "\$this->aFields" . (isset($aMatch[2][$i][0]) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; . (isset($aMatch[2][$i][0])
? "['" . $aMatch[2][$i][0] . "']"
: '') . $aMatch[5][$i][0];
} }
} }
break; break;
@@ -477,12 +526,11 @@ class PMScript
$sScript .= substr($this->sScript, $iAux); $sScript .= substr($this->sScript, $iAux);
$sScript = '$bResult = ' . $sScript . ';'; $sScript = '$bResult = ' . $sScript . ';';
// checks if the syntax is valid or if the variables in that condition has been previously defined // checks if the syntax is valid or if the variables in that condition has been previously defined
if ($this->validSyntax($sScript)&&$variableIsDefined){ if ($this->validSyntax($sScript) && $variableIsDefined) {
$this->bError = false; $this->bError = false;
eval($sScript); eval($sScript);
} } else {
else{ // echo "<script> alert('".G::loadTranslation('MSG_CONDITION_NOT_DEFINED')."'); </script>";
// echo "<script> alert('".G::loadTranslation('MSG_CONDITION_NOT_DEFINED')."'); </script>";
G::SendTemporalMessage('MSG_CONDITION_NOT_DEFINED', 'error', 'labels'); G::SendTemporalMessage('MSG_CONDITION_NOT_DEFINED', 'error', 'labels');
$this->bError = true; $this->bError = true;
} }
@@ -499,7 +547,7 @@ class PMScript
*/ */
function pmToString($vValue) function pmToString($vValue)
{ {
return (string)$vValue; return (string) $vValue;
} }
/** /**
@@ -509,7 +557,7 @@ function pmToString($vValue)
*/ */
function pmToInteger($vValue) function pmToInteger($vValue)
{ {
return (int)$vValue; return (int) $vValue;
} }
/** /**
@@ -519,7 +567,7 @@ function pmToInteger($vValue)
*/ */
function pmToFloat($vValue) function pmToFloat($vValue)
{ {
return (float)$vValue; return (float) $vValue;
} }
/** /**
@@ -546,11 +594,11 @@ function pmSqlEscape($vValue)
/*************************************************************************** /* * *************************************************************************
* Error handler * Error handler
* author: Julio Cesar Laura Avenda<64>o <juliocesar@colosa.com> * author: Julio Cesar Laura Avenda<64>o <juliocesar@colosa.com>
* date: 2009-10-01 * date: 2009-10-01
***************************************************************************/ * ************************************************************************* */
/* /*
* Convert to data base escaped string * Convert to data base escaped string
* @param string $errno * @param string $errno
@@ -562,7 +610,7 @@ function pmSqlEscape($vValue)
function handleErrors($errno, $errstr, $errfile, $errline) function handleErrors($errno, $errstr, $errfile, $errline)
{ {
if ($errno != '' && ($errno != 8) && ($errno != 2048)) { if ($errno != '' && ($errno != 8) && ($errno != 2048)) {
if( isset($_SESSION['_CODE_']) ){ if (isset($_SESSION['_CODE_'])) {
$sCode = $_SESSION['_CODE_']; $sCode = $_SESSION['_CODE_'];
unset($_SESSION['_CODE_']); unset($_SESSION['_CODE_']);
registerError(1, $errstr, $errline - 1, $sCode); registerError(1, $errstr, $errline - 1, $sCode);
@@ -575,6 +623,7 @@ function handleErrors($errno, $errstr, $errfile, $errline)
* @param variant $buffer * @param variant $buffer
* @return buffer * @return buffer
*/ */
function handleFatalErrors($buffer) function handleFatalErrors($buffer)
{ {
if (preg_match('/(error<\/b>:)(.+)(<br)/', $buffer, $regs)) { if (preg_match('/(error<\/b>:)(.+)(<br)/', $buffer, $regs)) {
@@ -587,11 +636,14 @@ function handleFatalErrors($buffer)
if (strpos($_SERVER['REQUEST_URI'], '&ACTION=GENERATE') !== false) { if (strpos($_SERVER['REQUEST_URI'], '&ACTION=GENERATE') !== false) {
G::LoadClass('case'); G::LoadClass('case');
$oCase = new Cases(); $oCase = new Cases();
$aNextStep = $oCase->getNextStep($_SESSION['PROCESS'], $_SESSION['APPLICATION'], $_SESSION['INDEX'], $_SESSION['STEP_POSITION']); $aNextStep = $oCase->getNextStep($_SESSION['PROCESS'],
if($_SESSION['TRIGGER_DEBUG']['ISSET']) { $_SESSION['APPLICATION'],
$_SESSION['INDEX'],
$_SESSION['STEP_POSITION']);
if ($_SESSION['TRIGGER_DEBUG']['ISSET']) {
$_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER'; $_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER';
$_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE']; $_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE'];
$aNextStep['PAGE'] = $aNextStep['PAGE'].'&breakpoint=triggerdebug'; $aNextStep['PAGE'] = $aNextStep['PAGE'] . '&breakpoint=triggerdebug';
} }
G::header('Location: ' . $aNextStep['PAGE']); G::header('Location: ' . $aNextStep['PAGE']);
die; die;
@@ -599,15 +651,17 @@ function handleFatalErrors($buffer)
$_SESSION['_NO_EXECUTE_TRIGGERS_'] = 1; $_SESSION['_NO_EXECUTE_TRIGGERS_'] = 1;
G::header('Location: ' . $_SERVER['REQUEST_URI']); G::header('Location: ' . $_SERVER['REQUEST_URI']);
die; die;
} } else {
else {
G::LoadClass('case'); G::LoadClass('case');
$oCase = new Cases(); $oCase = new Cases();
$aNextStep = $oCase->getNextStep($_SESSION['PROCESS'], $_SESSION['APPLICATION'], $_SESSION['INDEX'], $_SESSION['STEP_POSITION']); $aNextStep = $oCase->getNextStep($_SESSION['PROCESS'],
if($_SESSION['TRIGGER_DEBUG']['ISSET']) { $_SESSION['APPLICATION'],
$_SESSION['INDEX'],
$_SESSION['STEP_POSITION']);
if ($_SESSION['TRIGGER_DEBUG']['ISSET']) {
$_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER'; $_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER';
$_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE']; $_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE'];
$aNextStep['PAGE'] = $aNextStep['PAGE'].'&breakpoint=triggerdebug'; $aNextStep['PAGE'] = $aNextStep['PAGE'] . '&breakpoint=triggerdebug';
} }
if (strpos($aNextStep['PAGE'], 'TYPE=ASSIGN_TASK&UID=-1') !== false) { if (strpos($aNextStep['PAGE'], 'TYPE=ASSIGN_TASK&UID=-1') !== false) {
G::SendMessageText('Fatal error in trigger', 'error'); G::SendMessageText('Fatal error in trigger', 'error');
@@ -618,6 +672,7 @@ function handleFatalErrors($buffer)
} }
return $buffer; return $buffer;
} }
/* /*
* Register Error * Register Error
* @param string $iType * @param string $iType
@@ -626,10 +681,12 @@ function handleFatalErrors($buffer)
* @param string $sCode * @param string $sCode
* @return void * @return void
*/ */
function registerError($iType, $sError, $iLine, $sCode) function registerError($iType, $sError, $iLine, $sCode)
{ {
$sType = ($iType == 1 ? 'ERROR' : 'FATAL'); $sType = ($iType == 1 ? 'ERROR' : 'FATAL');
$_SESSION['TRIGGER_DEBUG']['ERRORS'][][$sType] = $sError . ($iLine > 0 ? ' (line ' . $iLine . ')' : '') . ':<br /><br />' . $sCode; $_SESSION['TRIGGER_DEBUG']['ERRORS'][][$sType] = $sError . ($iLine > 0 ? ' (line ' . $iLine . ')' : '')
. ':<br /><br />' . $sCode;
} }
/** /**
@@ -650,7 +707,7 @@ function getEngineDataBaseName($connection)
* @param type $sql * @param type $sql
* @param type $connection * @param type $connection
*/ */
function executeQueryOci($sql, $connection, $aParameter = array()) function executeQueryOci($sql, $connection, $aParameter=array())
{ {
$aDNS = $connection->getDSN(); $aDNS = $connection->getDSN();
@@ -660,10 +717,10 @@ function executeQueryOci($sql, $connection, $aParameter = array())
$sDatabse = $aDNS["database"]; $sDatabse = $aDNS["database"];
$sPort = $aDNS["port"]; $sPort = $aDNS["port"];
if ($sPort != "1521") { // if not default port if ($sPort != "1521") {
// if not default port
$conn = oci_connect($sUsername, $sPassword, $sHostspec . ":" . $sPort . "/" . $sDatabse); $conn = oci_connect($sUsername, $sPassword, $sHostspec . ":" . $sPort . "/" . $sDatabse);
} } else {
else {
$conn = oci_connect($sUsername, $sPassword, $sHostspec . "/" . $sDatabse); $conn = oci_connect($sUsername, $sPassword, $sHostspec . "/" . $sDatabse);
} }
@@ -673,7 +730,7 @@ function executeQueryOci($sql, $connection, $aParameter = array())
return $e; return $e;
} }
switch(true) { switch (true) {
case preg_match("/^(SELECT|SHOW|DESCRIBE|DESC)\s/i", $sql): case preg_match("/^(SELECT|SHOW|DESCRIBE|DESC)\s/i", $sql):
$stid = oci_parse($conn, $sql); $stid = oci_parse($conn, $sql);
if (count($aParameter) > 0) { if (count($aParameter) > 0) {
@@ -695,7 +752,7 @@ function executeQueryOci($sql, $connection, $aParameter = array())
case preg_match("/^(INSERT|UPDATE|DELETE)\s/i", $sql): case preg_match("/^(INSERT|UPDATE|DELETE)\s/i", $sql):
$stid = oci_parse($conn, $sql); $stid = oci_parse($conn, $sql);
$isValid = true; $isValid = true;
if (count($aParameter) > 0){ if (count($aParameter) > 0) {
foreach ($aParameter as $key => $val) { foreach ($aParameter as $key => $val) {
oci_bind_by_name($stid, $key, $val); oci_bind_by_name($stid, $key, $val);
} }
@@ -703,8 +760,7 @@ function executeQueryOci($sql, $connection, $aParameter = array())
$objExecute = oci_execute($stid, OCI_DEFAULT); $objExecute = oci_execute($stid, OCI_DEFAULT);
if ($objExecute) { if ($objExecute) {
oci_commit($conn); oci_commit($conn);
} } else {
else {
oci_rollback($conn); oci_rollback($conn);
$isValid = false; $isValid = false;
} }
@@ -712,8 +768,7 @@ function executeQueryOci($sql, $connection, $aParameter = array())
oci_close($conn); oci_close($conn);
if ($isValid) { if ($isValid) {
return true; return true;
} } else {
else {
return oci_error(); return oci_error();
} }
break; break;
@@ -721,7 +776,7 @@ function executeQueryOci($sql, $connection, $aParameter = array())
// Stored procedures // Stored procedures
$stid = oci_parse($conn, $sql); $stid = oci_parse($conn, $sql);
$aParameterRet = array(); $aParameterRet = array();
if (count($aParameter) > 0){ if (count($aParameter) > 0) {
foreach ($aParameter as $key => $val) { foreach ($aParameter as $key => $val) {
$aParameterRet[$key] = $val; $aParameterRet[$key] = $val;
// The third parameter ($aParameterRet[$key]) returned a value by reference. // The third parameter ($aParameterRet[$key]) returned a value by reference.
@@ -734,5 +789,5 @@ function executeQueryOci($sql, $connection, $aParameter = array())
return $aParameterRet; return $aParameterRet;
break; break;
} }
} }