diff --git a/workflow/engine/classes/class.pmScript.php b/workflow/engine/classes/class.pmScript.php index b38e338bb..cb376c524 100755 --- a/workflow/engine/classes/class.pmScript.php +++ b/workflow/engine/classes/class.pmScript.php @@ -2,6 +2,7 @@ /** * class.pmScript.php + * * @package workflow.engine.ProcessMaker * * ProcessMaker Open Source Edition @@ -14,11 +15,11 @@ * * 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 + * 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 . + * along with this program. If not, see . * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. @@ -32,58 +33,61 @@ // License: LGPL, see LICENSE //////////////////////////////////////////////////// + /** * PMScript - PMScript class + * * @author Julio Cesar Laura Avenda�o * last modify 2008.08.13 by Erik Amaru Ortiz * last modify comment was added and adapted the catch errors * @copyright 2007 COLOSA */ -function __autoload($sClassName) +function __autoload ($sClassName) { - if (defined('SYS_SYS')) { + if (defined( 'SYS_SYS' )) { $sPath = PATH_DB . SYS_SYS . PATH_SEP . 'classes' . PATH_SEP; - if (file_exists($sPath . $sClassName . '.php')) { + if (file_exists( $sPath . $sClassName . '.php' )) { require_once $sPath . $sClassName . '.php'; } } } //Start - Custom functions -G::LoadClass('pmFunctions'); +G::LoadClass( 'pmFunctions' ); //End - Custom functions //call plugin -if (class_exists('folderData')) { +if (class_exists( 'folderData' )) { //$folderData = new folderData($sProUid, $proFields['PRO_TITLE'], $sAppUid, $Fields['APP_TITLE'], $sUsrUid); $oPluginRegistry = &PMPluginRegistry::getSingleton(); $aAvailablePmFunctions = $oPluginRegistry->getPmFunctions(); foreach ($aAvailablePmFunctions as $key => $class) { $filePlugin = PATH_PLUGINS . $class . PATH_SEP . 'classes' . PATH_SEP . 'class.pmFunctions.php'; - if (file_exists($filePlugin)) { - include_once( $filePlugin); + if (file_exists( $filePlugin )) { + include_once ($filePlugin); } } } //end plugin //Add External Triggers -$dir = G::ExpandPath("classes") . 'triggers'; -$filesArray = array(); -if (file_exists($dir)) { - if ($handle = opendir($dir)) { - while (false !== ($file = readdir($handle))) { +$dir = G::ExpandPath( "classes" ) . 'triggers'; +$filesArray = array (); +if (file_exists( $dir )) { + if ($handle = opendir( $dir )) { + while (false !== ($file = readdir( $handle ))) { if (($file != ".") && ($file != "..")) { - $extFile = explode(".", $file); - if ($extFile[sizeof($extFile) - 1] == 'php') { - include_once( $dir . PATH_SEP . $file); + $extFile = explode( ".", $file ); + if ($extFile[sizeof( $extFile ) - 1] == 'php') { + include_once ($dir . PATH_SEP . $file); } } } - closedir($handle); + closedir( $handle ); } } /** * PMScript - PMScript class + * * @copyright 2007 COLOSA * @package workflow.engine.ProcessMaker */ @@ -93,12 +97,12 @@ class PMScript /** * Original fields */ - public $aOriginalFields = array(); + public $aOriginalFields = array (); /** * Fields to use */ - public $aFields = array(); + public $aFields = array (); /** * Script @@ -117,224 +121,185 @@ class PMScript /** * Constructor of the class PMScript + * * @return void */ - public function PMScript() + public function PMScript () { $this->aFields['__ERROR__'] = 'none'; } /** * Set the fields to use + * * @param array $aFields * @return void */ - public function setFields($aFields=array()) + public function setFields ($aFields = array()) { - if (!is_array($aFields)) { - $aFields = array(); + if (! is_array( $aFields )) { + $aFields = array (); } $this->aOriginalFields = $this->aFields = $aFields; } /** * Set the current script + * * @param string $sScript * @return void */ - public function setScript($sScript='') + public function setScript ($sScript = '') { $this->sScript = $sScript; } /** * Verify the syntax + * * @param string $sScript * @return boolean */ - public function validSyntax($sScript) + public function validSyntax ($sScript) { return true; } - public function executeAndCatchErrors($sScript, $sCode) + public function executeAndCatchErrors ($sScript, $sCode) { - ob_start('handleFatalErrors'); - set_error_handler('handleErrors'); + ob_start( 'handleFatalErrors' ); + set_error_handler( 'handleErrors' ); $_SESSION['_CODE_'] = $sCode; - eval($sScript); - unset($_SESSION['_CODE_']); + eval( $sScript ); + unset( $_SESSION['_CODE_'] ); ob_end_flush(); } /** * Execute the current script + * * @return void */ - public function execute() + public function execute () { $sScript = ""; $iAux = 0; $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\-\>\:]*)\(((?:[^\\\\\)]' . '*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/', $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); - if (!$bEqual) { - if (strpos($sAux, '==') !== false) { + for ($i = 0; $i < $iOcurrences; $i ++) { + $sAux = substr( $this->sScript, $iAux, $aMatch[0][$i][1] - $iAux ); + if (! $bEqual) { + if (strpos( $sAux, '==' ) !== false) { $bEqual = false; } else { - if (strpos($sAux, '=') !== false) { + if (strpos( $sAux, '=' ) !== false) { $bEqual = true; } } } if ($bEqual) { - if (strpos($sAux, ';') !== false) { + if (strpos( $sAux, ';' ) !== false) { $bEqual = false; } } if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { - eval("if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" - . $aMatch[2][$i][0] . "'] = null; }"); + if (! isset( $aMatch[5][$i][0] )) { + eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = null; }" ); } 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; - $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]) { case '@': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '%': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '#': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '?': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '$': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '=': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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]; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; @@ -342,17 +307,12 @@ class PMScript $this->affected_fields[] = $aMatch[2][$i][0]; } } - $sScript .= substr($this->sScript, $iAux); - $sScript = "try {\n" . $sScript . "\n} catch (Exception \$oException) {\n " - . " \$this->aFields['__ERROR__'] = utf8_encode(\$oException->getMessage());\n}"; + $sScript .= substr( $this->sScript, $iAux ); + $sScript = "try {\n" . $sScript . "\n} catch (Exception \$oException) {\n " . " \$this->aFields['__ERROR__'] = utf8_encode(\$oException->getMessage());\n}"; //echo '
-->'; print_r($this->aFields); echo '<---
'; - $this->executeAndCatchErrors($sScript, $this->sScript); - for ($i = 0; $i < count($this->affected_fields); $i++) { - $_SESSION['TRIGGER_DEBUG']['DATA'][] = Array( - 'key' => $this->affected_fields[$i], - 'value' => isset($this->aFields[$this->affected_fields[$i]]) - ? $this->aFields[$this->affected_fields[$i]] - : '' + $this->executeAndCatchErrors( $sScript, $this->sScript ); + for ($i = 0; $i < count( $this->affected_fields ); $i ++) { + $_SESSION['TRIGGER_DEBUG']['DATA'][] = Array ('key' => $this->affected_fields[$i],'value' => isset( $this->aFields[$this->affected_fields[$i]] ) ? $this->aFields[$this->affected_fields[$i]] : '' ); } //echo '
-->'; print_r($_SESSION['TRIGGER_DEBUG']['DATA']); echo '<---
'; @@ -360,178 +320,141 @@ class PMScript /** * Evaluate the current script + * * @return void */ - public function evaluate() + public function evaluate () { $bResult = null; $sScript = ''; $iAux = 0; $bEqual = false; $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\-\>\:]*)\(((?:[^\\\\\)]' . '*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+)?/', $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE ); if ($iOcurrences) { - for ($i = 0; $i < $iOcurrences; $i++) { + for ($i = 0; $i < $iOcurrences; $i ++) { // 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]])) { + if (! isset( $this->aFields[$aMatch[2][$i][0]] )) { // $variableIsDefined = false; $this->aFields[$aMatch[2][$i][0]] = ''; } - $sAux = substr($this->sScript, $iAux, $aMatch[0][$i][1] - $iAux); - if (!$bEqual) { - if (strpos($sAux, '=') !== false) { + $sAux = substr( $this->sScript, $iAux, $aMatch[0][$i][1] - $iAux ); + if (! $bEqual) { + if (strpos( $sAux, '=' ) !== false) { $bEqual = true; } } if ($bEqual) { - if (strpos($sAux, ';') !== false) { + if (strpos( $sAux, ';' ) !== false) { $bEqual = false; } } $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]) { case '@': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '%': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '#': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '?': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '$': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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] . ")"; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; case '=': if ($bEqual) { - if (!isset($aMatch[5][$i][0])) { + if (! isset( $aMatch[5][$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]; + $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] . "']"; } else { - $sScript .= "\$this->aFields" - . (isset($aMatch[2][$i][0]) - ? "['" . $aMatch[2][$i][0] . "']" - : '') . $aMatch[5][$i][0]; + $sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0]; } } break; } } } - $sScript .= substr($this->sScript, $iAux); + $sScript .= substr( $this->sScript, $iAux ); $sScript = '$bResult = ' . $sScript . ';'; // 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; - eval($sScript); + eval( $sScript ); } else { // echo ""; - G::SendTemporalMessage('MSG_CONDITION_NOT_DEFINED', 'error', 'labels'); + G::SendTemporalMessage( 'MSG_CONDITION_NOT_DEFINED', 'error', 'labels' ); $this->bError = true; } return $bResult; @@ -540,60 +463,65 @@ class PMScript //Start - Private functions + /** * Convert to string + * * @param variant $vValue * @return string */ -function pmToString($vValue) +function pmToString ($vValue) { return (string) $vValue; } /** * Convert to integer + * * @param variant $vValue * @return integer */ -function pmToInteger($vValue) +function pmToInteger ($vValue) { return (int) $vValue; } /** * Convert to float + * * @param variant $vValue * @return float */ -function pmToFloat($vValue) +function pmToFloat ($vValue) { return (float) $vValue; } /** * Convert to Url + * * @param variant $vValue * @return url */ -function pmToUrl($vValue) +function pmToUrl ($vValue) { - return urlencode($vValue); + return urlencode( $vValue ); } /** * Convert to data base escaped string + * * @param variant $vValue * @return string */ -function pmSqlEscape($vValue) +function pmSqlEscape ($vValue) { - return G::sqlEscape($vValue); + return G::sqlEscape( $vValue ); } //End - Private functions - /* * ************************************************************************* * Error handler * author: Julio Cesar Laura Avenda�o @@ -607,13 +535,13 @@ function pmSqlEscape($vValue) * @param string $errline * @return void */ -function handleErrors($errno, $errstr, $errfile, $errline) +function handleErrors ($errno, $errstr, $errfile, $errline) { if ($errno != '' && ($errno != 8) && ($errno != 2048)) { - if (isset($_SESSION['_CODE_'])) { + if (isset( $_SESSION['_CODE_'] )) { $sCode = $_SESSION['_CODE_']; - unset($_SESSION['_CODE_']); - registerError(1, $errstr, $errline - 1, $sCode); + unset( $_SESSION['_CODE_'] ); + registerError( 1, $errstr, $errline - 1, $sCode ); } } } @@ -624,50 +552,44 @@ function handleErrors($errno, $errstr, $errfile, $errline) * @return buffer */ -function handleFatalErrors($buffer) +function handleFatalErrors ($buffer) { - if (preg_match('/(error<\/b>:)(.+)(/', '', $regs[2]); - $aAux = explode(' in ', $err); + if (preg_match( '/(error<\/b>:)(.+)(/', '', $regs[2] ); + $aAux = explode( ' in ', $err ); $sCode = $_SESSION['_CODE_']; - unset($_SESSION['_CODE_']); - registerError(2, $aAux[0], 0, $sCode); - if (strpos($_SERVER['REQUEST_URI'], '/cases/cases_Step') !== false) { - if (strpos($_SERVER['REQUEST_URI'], '&ACTION=GENERATE') !== false) { - G::LoadClass('case'); + unset( $_SESSION['_CODE_'] ); + registerError( 2, $aAux[0], 0, $sCode ); + if (strpos( $_SERVER['REQUEST_URI'], '/cases/cases_Step' ) !== false) { + if (strpos( $_SERVER['REQUEST_URI'], '&ACTION=GENERATE' ) !== false) { + G::LoadClass( 'case' ); $oCase = new Cases(); - $aNextStep = $oCase->getNextStep($_SESSION['PROCESS'], - $_SESSION['APPLICATION'], - $_SESSION['INDEX'], - $_SESSION['STEP_POSITION']); + $aNextStep = $oCase->getNextStep( $_SESSION['PROCESS'], $_SESSION['APPLICATION'], $_SESSION['INDEX'], $_SESSION['STEP_POSITION'] ); if ($_SESSION['TRIGGER_DEBUG']['ISSET']) { $_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER'; $_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE']; $aNextStep['PAGE'] = $aNextStep['PAGE'] . '&breakpoint=triggerdebug'; } - G::header('Location: ' . $aNextStep['PAGE']); - die; + G::header( 'Location: ' . $aNextStep['PAGE'] ); + die(); } $_SESSION['_NO_EXECUTE_TRIGGERS_'] = 1; - G::header('Location: ' . $_SERVER['REQUEST_URI']); - die; + G::header( 'Location: ' . $_SERVER['REQUEST_URI'] ); + die(); } else { - G::LoadClass('case'); + G::LoadClass( 'case' ); $oCase = new Cases(); - $aNextStep = $oCase->getNextStep($_SESSION['PROCESS'], - $_SESSION['APPLICATION'], - $_SESSION['INDEX'], - $_SESSION['STEP_POSITION']); + $aNextStep = $oCase->getNextStep( $_SESSION['PROCESS'], $_SESSION['APPLICATION'], $_SESSION['INDEX'], $_SESSION['STEP_POSITION'] ); if ($_SESSION['TRIGGER_DEBUG']['ISSET']) { $_SESSION['TRIGGER_DEBUG']['TIME'] = 'AFTER'; $_SESSION['TRIGGER_DEBUG']['BREAKPAGE'] = $aNextStep['PAGE']; $aNextStep['PAGE'] = $aNextStep['PAGE'] . '&breakpoint=triggerdebug'; } - if (strpos($aNextStep['PAGE'], 'TYPE=ASSIGN_TASK&UID=-1') !== false) { - G::SendMessageText('Fatal error in trigger', 'error'); + if (strpos( $aNextStep['PAGE'], 'TYPE=ASSIGN_TASK&UID=-1' ) !== false) { + G::SendMessageText( 'Fatal error in trigger', 'error' ); } - G::header('Location: ' . $aNextStep['PAGE']); - die; + G::header( 'Location: ' . $aNextStep['PAGE'] ); + die(); } } return $buffer; @@ -682,11 +604,10 @@ function handleFatalErrors($buffer) * @return void */ -function registerError($iType, $sError, $iLine, $sCode) +function registerError ($iType, $sError, $iLine, $sCode) { $sType = ($iType == 1 ? 'ERROR' : 'FATAL'); - $_SESSION['TRIGGER_DEBUG']['ERRORS'][][$sType] = $sError . ($iLine > 0 ? ' (line ' . $iLine . ')' : '') - . ':

' . $sCode; + $_SESSION['TRIGGER_DEBUG']['ERRORS'][][$sType] = $sError . ($iLine > 0 ? ' (line ' . $iLine . ')' : '') . ':

' . $sCode; } /** @@ -695,7 +616,7 @@ function registerError($iType, $sError, $iLine, $sCode) * @param type $connection * @return type */ -function getEngineDataBaseName($connection) +function getEngineDataBaseName ($connection) { $aDNS = $connection->getDSN(); return $aDNS["phptype"]; @@ -707,7 +628,7 @@ function getEngineDataBaseName($connection) * @param type $sql * @param type $connection */ -function executeQueryOci($sql, $connection, $aParameter=array()) +function executeQueryOci ($sql, $connection, $aParameter = array()) { $aDNS = $connection->getDSN(); @@ -719,53 +640,53 @@ function executeQueryOci($sql, $connection, $aParameter=array()) if ($sPort != "1521") { // if not default port - $conn = oci_connect($sUsername, $sPassword, $sHostspec . ":" . $sPort . "/" . $sDatabse); + $conn = oci_connect( $sUsername, $sPassword, $sHostspec . ":" . $sPort . "/" . $sDatabse ); } else { - $conn = oci_connect($sUsername, $sPassword, $sHostspec . "/" . $sDatabse); + $conn = oci_connect( $sUsername, $sPassword, $sHostspec . "/" . $sDatabse ); } - if (!$conn) { + if (! $conn) { $e = oci_error(); - trigger_error(htmlentities($e['message'], ENT_QUOTES), E_USER_ERROR); + trigger_error( htmlentities( $e['message'], ENT_QUOTES ), E_USER_ERROR ); return $e; } switch (true) { - case preg_match("/^(SELECT|SHOW|DESCRIBE|DESC|WITH)\s/i", $sql): - $stid = oci_parse($conn, $sql); - if (count($aParameter) > 0) { + case preg_match( "/^(SELECT|SHOW|DESCRIBE|DESC|WITH)\s/i", $sql ): + $stid = oci_parse( $conn, $sql ); + if (count( $aParameter ) > 0) { foreach ($aParameter as $key => $val) { - oci_bind_by_name($stid, $key, $val); + oci_bind_by_name( $stid, $key, $val ); } } - oci_execute($stid, OCI_DEFAULT); + oci_execute( $stid, OCI_DEFAULT ); - $result = Array(); + $result = Array (); $i = 1; - while ($row = oci_fetch_array($stid, OCI_ASSOC + OCI_RETURN_NULLS)) { - $result[$i++] = $row; + while ($row = oci_fetch_array( $stid, OCI_ASSOC + OCI_RETURN_NULLS )) { + $result[$i ++] = $row; } - oci_free_statement($stid); - oci_close($conn); + oci_free_statement( $stid ); + oci_close( $conn ); return $result; break; - case preg_match("/^(INSERT|UPDATE|DELETE)\s/i", $sql): - $stid = oci_parse($conn, $sql); + case preg_match( "/^(INSERT|UPDATE|DELETE)\s/i", $sql ): + $stid = oci_parse( $conn, $sql ); $isValid = true; - if (count($aParameter) > 0) { + if (count( $aParameter ) > 0) { foreach ($aParameter as $key => $val) { - oci_bind_by_name($stid, $key, $val); + oci_bind_by_name( $stid, $key, $val ); } } - $objExecute = oci_execute($stid, OCI_DEFAULT); + $objExecute = oci_execute( $stid, OCI_DEFAULT ); if ($objExecute) { - oci_commit($conn); + oci_commit( $conn ); } else { - oci_rollback($conn); + oci_rollback( $conn ); $isValid = false; } - oci_free_statement($stid); - oci_close($conn); + oci_free_statement( $stid ); + oci_close( $conn ); if ($isValid) { return true; } else { @@ -774,20 +695,20 @@ function executeQueryOci($sql, $connection, $aParameter=array()) break; default: // Stored procedures - $stid = oci_parse($conn, $sql); - $aParameterRet = array(); - if (count($aParameter) > 0) { + $stid = oci_parse( $conn, $sql ); + $aParameterRet = array (); + if (count( $aParameter ) > 0) { foreach ($aParameter as $key => $val) { $aParameterRet[$key] = $val; // The third parameter ($aParameterRet[$key]) returned a value by reference. - oci_bind_by_name($stid, $key, $aParameterRet[$key]); + oci_bind_by_name( $stid, $key, $aParameterRet[$key] ); } } - $objExecute = oci_execute($stid, OCI_DEFAULT); - oci_free_statement($stid); - oci_close($conn); + $objExecute = oci_execute( $stid, OCI_DEFAULT ); + oci_free_statement( $stid ); + oci_close( $conn ); return $aParameterRet; break; } } - \ No newline at end of file +