2010-12-02 23:34:41 +00:00
|
|
|
|
<?php
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
2010-12-02 23:34:41 +00:00
|
|
|
|
/**
|
|
|
|
|
|
* class.pmScript.php
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2011-02-01 12:49:40 +00:00
|
|
|
|
* @package workflow.engine.ProcessMaker
|
2010-12-02 23:34:41 +00:00
|
|
|
|
*
|
|
|
|
|
|
* ProcessMaker Open Source Edition
|
2011-02-01 12:49:40 +00:00
|
|
|
|
* Copyright (C) 2004 - 2011 Colosa Inc.
|
2010-12-02 23:34:41 +00:00
|
|
|
|
*
|
|
|
|
|
|
* 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
|
2012-10-09 12:59:01 -04:00
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
2010-12-02 23:34:41 +00:00
|
|
|
|
* GNU Affero General Public License for more details.
|
|
|
|
|
|
*
|
|
|
|
|
|
* You should have received a copy of the GNU Affero General Public License
|
2012-10-09 12:59:01 -04:00
|
|
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
2010-12-02 23:34:41 +00:00
|
|
|
|
*
|
|
|
|
|
|
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
|
|
|
|
|
|
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
|
|
|
|
|
|
*
|
|
|
|
|
|
*/
|
|
|
|
|
|
////////////////////////////////////////////////////
|
|
|
|
|
|
// Execute and evaluate PMScripts
|
|
|
|
|
|
//
|
|
|
|
|
|
// Copyright (C) 2007 COLOSA
|
|
|
|
|
|
//
|
|
|
|
|
|
// License: LGPL, see LICENSE
|
|
|
|
|
|
////////////////////////////////////////////////////
|
|
|
|
|
|
|
2017-08-01 12:16:06 -04:00
|
|
|
|
use ProcessMaker\Plugins\PluginRegistry;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
|
2010-12-02 23:34:41 +00:00
|
|
|
|
/**
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* PMScript - PMScript class
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2010-12-02 23:34:41 +00:00
|
|
|
|
* @author Julio Cesar Laura Avenda<EFBFBD>o <juliocesar@colosa.com>
|
2011-02-03 11:13:21 +00:00
|
|
|
|
* last modify 2008.08.13 by Erik Amaru Ortiz <erik@colosa.com>
|
|
|
|
|
|
* last modify comment was added and adapted the catch errors
|
2010-12-02 23:34:41 +00:00
|
|
|
|
* @copyright 2007 COLOSA
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
function __autoload ($sClassName)
|
2010-12-02 23:34:41 +00:00
|
|
|
|
{
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (defined( 'SYS_SYS' )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sPath = PATH_DB . SYS_SYS . PATH_SEP . 'classes' . PATH_SEP;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (file_exists( $sPath . $sClassName . '.php' )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
require_once $sPath . $sClassName . '.php';
|
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2017-02-13 15:51:05 -04:00
|
|
|
|
if (defined('SYS_SYS') && (!defined('PATH_DATA_SITE') || !defined('PATH_WORKSPACE'))) {
|
2017-02-13 11:19:58 -04:00
|
|
|
|
Bootstrap::setConstantsRelatedWs(SYS_SYS);
|
2016-10-19 16:31:32 -04:00
|
|
|
|
}
|
|
|
|
|
|
|
2010-12-02 23:34:41 +00:00
|
|
|
|
//call plugin
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (class_exists( 'folderData' )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
//$folderData = new folderData($sProUid, $proFields['PRO_TITLE'], $sAppUid, $Fields['APP_TITLE'], $sUsrUid);
|
2017-08-01 12:16:06 -04:00
|
|
|
|
$oPluginRegistry = PluginRegistry::loadSingleton();
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$aAvailablePmFunctions = $oPluginRegistry->getPmFunctions();
|
|
|
|
|
|
foreach ($aAvailablePmFunctions as $key => $class) {
|
|
|
|
|
|
$filePlugin = PATH_PLUGINS . $class . PATH_SEP . 'classes' . PATH_SEP . 'class.pmFunctions.php';
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (file_exists( $filePlugin )) {
|
|
|
|
|
|
include_once ($filePlugin);
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
//end plugin
|
|
|
|
|
|
//Add External Triggers
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$dir = G::ExpandPath( "classes" ) . 'triggers';
|
|
|
|
|
|
$filesArray = array ();
|
|
|
|
|
|
if (file_exists( $dir )) {
|
|
|
|
|
|
if ($handle = opendir( $dir )) {
|
|
|
|
|
|
while (false !== ($file = readdir( $handle ))) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
if (($file != ".") && ($file != "..")) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$extFile = explode( ".", $file );
|
|
|
|
|
|
if ($extFile[sizeof( $extFile ) - 1] == 'php') {
|
|
|
|
|
|
include_once ($dir . PATH_SEP . $file);
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
2012-10-09 12:59:01 -04:00
|
|
|
|
closedir( $handle );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* PMScript - PMScript class
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2010-12-02 23:34:41 +00:00
|
|
|
|
* @copyright 2007 COLOSA
|
2011-02-01 12:49:40 +00:00
|
|
|
|
* @package workflow.engine.ProcessMaker
|
2010-12-02 23:34:41 +00:00
|
|
|
|
*/
|
|
|
|
|
|
class PMScript
|
|
|
|
|
|
{
|
2017-04-19 11:30:54 -04:00
|
|
|
|
/**
|
|
|
|
|
|
* @var array $dataTrigger
|
|
|
|
|
|
*/
|
|
|
|
|
|
public $dataTrigger = array();
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Original fields
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public $aOriginalFields = array ();
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Fields to use
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public $aFields = array ();
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Script
|
|
|
|
|
|
*/
|
|
|
|
|
|
public $sScript = '';
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Error has happened?
|
|
|
|
|
|
*/
|
|
|
|
|
|
public $bError = false;
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Affected fields
|
|
|
|
|
|
*/
|
|
|
|
|
|
public $affected_fields;
|
|
|
|
|
|
|
2016-07-19 14:26:51 -04:00
|
|
|
|
public $scriptExecutionTime = 0;
|
|
|
|
|
|
|
2016-11-17 06:54:34 -05:00
|
|
|
|
public $sRegexp = '/\@(?:([\@\%\#\?\$\=\&])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]*(?:[\\\\][\w\W])?)*)\))((?:\s*\[[\'"]?\w+[\'"]?\])+|\-\>([a-zA-Z\_]\w*))?/';
|
|
|
|
|
|
|
2012-07-03 17:54:36 -04:00
|
|
|
|
/**
|
|
|
|
|
|
* Constructor of the class PMScript
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* @return void
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function PMScript ()
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
|
|
|
|
|
$this->aFields['__ERROR__'] = 'none';
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Set the fields to use
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* @param array $aFields
|
|
|
|
|
|
* @return void
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function setFields ($aFields = array())
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! is_array( $aFields )) {
|
|
|
|
|
|
$aFields = array ();
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$this->aOriginalFields = $this->aFields = $aFields;
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Set the current script
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* @param string $sScript
|
|
|
|
|
|
* @return void
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function setScript ($sScript = '')
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
2014-03-18 10:29:57 -04:00
|
|
|
|
if (!defined("T_ML_COMMENT")) {
|
|
|
|
|
|
define("T_ML_COMMENT", T_COMMENT);
|
|
|
|
|
|
} else {
|
2014-04-10 12:52:13 -04:00
|
|
|
|
if (!defined("T_DOC_COMMENT")) {
|
|
|
|
|
|
define("T_DOC_COMMENT", T_ML_COMMENT);
|
|
|
|
|
|
}
|
2014-03-14 14:10:22 -04:00
|
|
|
|
}
|
|
|
|
|
|
|
2014-03-18 10:29:57 -04:00
|
|
|
|
$script = "<?php " . $sScript;
|
|
|
|
|
|
$tokens = token_get_all($script);
|
|
|
|
|
|
$result = "";
|
|
|
|
|
|
|
|
|
|
|
|
foreach ($tokens as $token) {
|
|
|
|
|
|
if (is_string($token)) {
|
2014-04-10 12:52:13 -04:00
|
|
|
|
$result .= $token;
|
2014-03-18 10:29:57 -04:00
|
|
|
|
} else {
|
|
|
|
|
|
list($id, $text) = $token;
|
|
|
|
|
|
|
|
|
|
|
|
switch ($id) {
|
2014-03-18 12:13:37 -04:00
|
|
|
|
case T_OPEN_TAG:
|
|
|
|
|
|
case T_CLOSE_TAG:
|
2014-03-18 10:29:57 -04:00
|
|
|
|
case T_COMMENT:
|
|
|
|
|
|
case T_ML_COMMENT: //we've defined this
|
|
|
|
|
|
case T_DOC_COMMENT: //and this
|
2014-04-10 12:52:13 -04:00
|
|
|
|
if ($text != '<?php ' && $text != '<?php' && $text != '<? ' && $text != '<?' && $text != '<% ' && $text != '<%') {
|
|
|
|
|
|
$result .= $text;
|
|
|
|
|
|
}
|
2014-03-18 10:29:57 -04:00
|
|
|
|
break;
|
|
|
|
|
|
default:
|
2014-04-10 12:52:13 -04:00
|
|
|
|
$result .= $text;
|
2014-03-18 10:29:57 -04:00
|
|
|
|
break;
|
|
|
|
|
|
}
|
2014-03-14 14:10:22 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2014-04-10 12:52:13 -04:00
|
|
|
|
$this->sScript = trim($result);
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Verify the syntax
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* @param string $sScript
|
|
|
|
|
|
* @return boolean
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function validSyntax ($sScript)
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
|
|
|
|
|
return true;
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2017-04-19 11:30:54 -04:00
|
|
|
|
/**
|
|
|
|
|
|
* @param $dataTrigger
|
|
|
|
|
|
*/
|
|
|
|
|
|
public function setDataTrigger($dataTrigger)
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
2017-04-19 11:30:54 -04:00
|
|
|
|
$this->dataTrigger = is_array($dataTrigger) ? $dataTrigger : array();
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* @param $sScript
|
|
|
|
|
|
* @param $sCode
|
|
|
|
|
|
*/
|
|
|
|
|
|
public function executeAndCatchErrors($sScript, $sCode)
|
|
|
|
|
|
{
|
|
|
|
|
|
ob_start('handleFatalErrors');
|
|
|
|
|
|
set_error_handler('handleErrors');
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$_SESSION['_CODE_'] = $sCode;
|
2017-04-19 11:30:54 -04:00
|
|
|
|
$_SESSION['_DATA_TRIGGER_'] = $this->dataTrigger;
|
|
|
|
|
|
$_SESSION['_DATA_TRIGGER_']['_EXECUTION_TIME_'] = microtime(true);
|
|
|
|
|
|
eval($sScript);
|
|
|
|
|
|
$this->scriptExecutionTime = round(microtime(true) -
|
|
|
|
|
|
$_SESSION['_DATA_TRIGGER_']['_EXECUTION_TIME_'], 5);
|
2015-11-27 11:48:24 -04:00
|
|
|
|
$this->evaluateVariable();
|
2012-07-03 17:54:36 -04:00
|
|
|
|
ob_end_flush();
|
2017-04-19 11:30:54 -04:00
|
|
|
|
|
|
|
|
|
|
//log trigger execution in processmaker.log
|
|
|
|
|
|
G::logTriggerExecution($_SESSION, '', '', $this->scriptExecutionTime);
|
|
|
|
|
|
unset($_SESSION['_CODE_']);
|
|
|
|
|
|
unset($_SESSION['_DATA_TRIGGER_']);
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Execute the current script
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2012-07-03 17:54:36 -04:00
|
|
|
|
* @return void
|
|
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function execute ()
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
|
|
|
|
|
$sScript = "";
|
|
|
|
|
|
$iAux = 0;
|
2016-11-17 06:54:34 -05:00
|
|
|
|
$iOcurrences = preg_match_all( $this->sRegexp, $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
if ($iOcurrences) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
for ($i = 0; $i < $iOcurrences; $i ++) {
|
2014-08-29 15:44:41 -04:00
|
|
|
|
$bEqual = false;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sAux = substr( $this->sScript, $iAux, $aMatch[0][$i][1] - $iAux );
|
|
|
|
|
|
if (! $bEqual) {
|
2014-08-29 15:44:41 -04:00
|
|
|
|
if (strpos($sAux, "==") !== false || strpos($sAux, "!=") !== false || strpos($sAux, ">") !== false || strpos($sAux, "<") !== false || strpos($sAux, ">=") !== false || strpos($sAux, "<=") !== false || strpos($sAux, "<>") !== false || strpos($sAux, "===") !== false || strpos($sAux, "!==") !== false) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$bEqual = false;
|
|
|
|
|
|
} else {
|
2014-08-29 15:44:41 -04:00
|
|
|
|
if (strpos($sAux, "=") !== false || strpos($sAux, "+=") !== false || strpos($sAux, "-=") !== false || strpos($sAux, "*=") !== false || strpos($sAux, "/=") !== false || strpos($sAux, "%=") !== false || strpos($sAux, ".=") !== false) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$bEqual = true;
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (strpos( $sAux, ';' ) !== false) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$bEqual = false;
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2016-11-17 06:54:34 -05:00
|
|
|
|
eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = " . ($aMatch[1][$i][0] == "&" ? "new stdclass()" : "null") . "; }" );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
} else {
|
2016-11-17 06:54:34 -05:00
|
|
|
|
if ($aMatch[1][$i][0] == "&") {
|
|
|
|
|
|
eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = new stdclass(); }" );
|
|
|
|
|
|
}
|
2012-10-09 12:59:01 -04:00
|
|
|
|
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; }" );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
2016-11-23 10:21:43 -05:00
|
|
|
|
} else {
|
|
|
|
|
|
if ($aMatch[1][$i][0] == "&") {
|
|
|
|
|
|
eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = new stdclass(); }" );
|
|
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
$sScript .= $sAux;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$iAux = $aMatch[0][$i][1] + strlen( $aMatch[0][$i][0] );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
switch ($aMatch[1][$i][0]) {
|
|
|
|
|
|
case '@':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToString(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '%':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToInteger(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '#':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToFloat(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '?':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToUrl(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '$':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmSqlEscape(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '=':
|
2016-11-17 06:54:34 -05:00
|
|
|
|
case '&':
|
2012-07-03 17:54:36 -04:00
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
}
|
|
|
|
|
|
$this->affected_fields[] = $aMatch[2][$i][0];
|
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= substr( $this->sScript, $iAux );
|
|
|
|
|
|
$sScript = "try {\n" . $sScript . "\n} catch (Exception \$oException) {\n " . " \$this->aFields['__ERROR__'] = utf8_encode(\$oException->getMessage());\n}";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
//echo '<pre>-->'; print_r($this->aFields); echo '<---</pre>';
|
2016-07-19 14:26:51 -04:00
|
|
|
|
|
|
|
|
|
|
$this->executeAndCatchErrors($sScript, $this->sScript);
|
|
|
|
|
|
|
2015-07-27 15:13:45 -04:00
|
|
|
|
$this->aFields["__VAR_CHANGED__"] = implode(",", $this->affected_fields);
|
2012-10-09 12:59:01 -04:00
|
|
|
|
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]] : ''
|
2012-07-03 17:54:36 -04:00
|
|
|
|
);
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
//echo '<pre>-->'; print_r($_SESSION['TRIGGER_DEBUG']['DATA']); echo '<---</pre>';
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
|
* Evaluate the current script
|
2012-10-09 12:59:01 -04:00
|
|
|
|
*
|
2016-08-02 11:22:27 -04:00
|
|
|
|
* @return boolean
|
2012-07-03 17:54:36 -04:00
|
|
|
|
*/
|
2012-10-09 12:59:01 -04:00
|
|
|
|
public function evaluate ()
|
2012-07-03 17:54:36 -04:00
|
|
|
|
{
|
|
|
|
|
|
$bResult = null;
|
|
|
|
|
|
$sScript = '';
|
|
|
|
|
|
$iAux = 0;
|
|
|
|
|
|
$bEqual = false;
|
|
|
|
|
|
$variableIsDefined = true;
|
2016-11-17 06:54:34 -05:00
|
|
|
|
$iOcurrences = preg_match_all( $this->sRegexp, $this->sScript, $aMatch, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
if ($iOcurrences) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
for ($i = 0; $i < $iOcurrences; $i ++) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
// if the variables for that condition has not been previously defined then $variableIsDefined
|
|
|
|
|
|
// is set to false
|
2013-04-22 13:31:19 -04:00
|
|
|
|
if (!isset($this->aFields[$aMatch[2][$i][0]]) && !isset($aMatch[5][$i][0])) {
|
2016-11-17 06:54:34 -05:00
|
|
|
|
eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = " . ($aMatch[1][$i][0] == "&" ? "new stdclass()" : "null") . "; }" );
|
2013-04-22 13:31:19 -04:00
|
|
|
|
} else {
|
2016-11-17 06:54:34 -05:00
|
|
|
|
if ($aMatch[1][$i][0] == "&") {
|
|
|
|
|
|
eval( "if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) { \$this->aFields['" . $aMatch[2][$i][0] . "'] = new stdclass(); }" );
|
|
|
|
|
|
}
|
2013-04-22 13:31:19 -04:00
|
|
|
|
if (!isset($this->aFields[$aMatch[2][$i][0]])) {
|
|
|
|
|
|
eval("\$this->aFields['" . $aMatch[2][$i][0] . "']" . $aMatch[5][$i][0] . " = '';");
|
2016-11-17 06:54:34 -05:00
|
|
|
|
|
2013-04-24 15:36:08 -04:00
|
|
|
|
} else {
|
2013-05-02 16:24:25 -04:00
|
|
|
|
if (isset($aMatch[5][$i][0])) {
|
|
|
|
|
|
eval("if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "']" . $aMatch[5][$i][0] . ")) {\$this->aFields['" . $aMatch[2][$i][0] . "']" . $aMatch[5][$i][0] . " = '';}");
|
|
|
|
|
|
} else {
|
2016-11-17 06:54:34 -05:00
|
|
|
|
eval("if (!isset(\$this->aFields['" . $aMatch[2][$i][0] . "'])) {\$this->aFields['" . $aMatch[2][$i][0] . "'] = " . ($aMatch[1][$i][0] == "&" ? "new stdclass()" : "''") . ";}");
|
2013-05-02 16:24:25 -04:00
|
|
|
|
}
|
2013-04-22 13:31:19 -04:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sAux = substr( $this->sScript, $iAux, $aMatch[0][$i][1] - $iAux );
|
|
|
|
|
|
if (! $bEqual) {
|
|
|
|
|
|
if (strpos( $sAux, '=' ) !== false) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$bEqual = true;
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (strpos( $sAux, ';' ) !== false) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$bEqual = false;
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
$sScript .= $sAux;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$iAux = $aMatch[0][$i][1] + strlen( $aMatch[0][$i][0] );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
switch ($aMatch[1][$i][0]) {
|
|
|
|
|
|
case '@':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToString(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToString(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '%':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToInteger(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToInteger(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '#':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToFloat(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToFloat(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '?':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmToUrl(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmToUrl(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '$':
|
|
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "pmSqlEscape(\$this->aFields['" . $aMatch[2][$i][0] . "'])";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "pmSqlEscape(\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0] . ")";
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
case '=':
|
2016-11-17 06:54:34 -05:00
|
|
|
|
case '&':
|
2012-07-03 17:54:36 -04:00
|
|
|
|
if ($bEqual) {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if (! isset( $aMatch[5][$i][0] )) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript .= "\$this->aFields['" . $aMatch[2][$i][0] . "']";
|
|
|
|
|
|
} else {
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= "\$this->aFields" . (isset( $aMatch[2][$i][0] ) ? "['" . $aMatch[2][$i][0] . "']" : '') . $aMatch[5][$i][0];
|
2012-07-03 17:54:36 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
break;
|
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
}
|
2012-10-09 12:59:01 -04:00
|
|
|
|
$sScript .= substr( $this->sScript, $iAux );
|
2015-02-20 13:10:58 -04:00
|
|
|
|
if(preg_match('/\b(or|and|xor)\b/i' , $sScript)) {
|
|
|
|
|
|
$sScript = "( ".$sScript." )";
|
2015-06-01 13:58:50 -04:00
|
|
|
|
}
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$sScript = '$bResult = ' . $sScript . ';';
|
|
|
|
|
|
// checks if the syntax is valid or if the variables in that condition has been previously defined
|
2012-10-09 12:59:01 -04:00
|
|
|
|
if ($this->validSyntax( $sScript ) && $variableIsDefined) {
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$this->bError = false;
|
2012-10-09 12:59:01 -04:00
|
|
|
|
eval( $sScript );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
} else {
|
|
|
|
|
|
// echo "<script> alert('".G::loadTranslation('MSG_CONDITION_NOT_DEFINED')."'); </script>";
|
2012-10-09 12:59:01 -04:00
|
|
|
|
G::SendTemporalMessage( 'MSG_CONDITION_NOT_DEFINED', 'error', 'labels' );
|
2012-07-03 17:54:36 -04:00
|
|
|
|
$this->bError = true;
|
|
|
|
|
|
}
|
|
|
|
|
|
return $bResult;
|
2010-12-02 23:34:41 +00:00
|
|
|
|
}
|
2016-07-19 14:26:51 -04:00
|
|
|
|
|
2015-11-27 11:48:24 -04:00
|
|
|
|
Public function evaluateVariable ()
|
|
|
|
|
|
{
|
|
|
|
|
|
$process = new Process();
|
|
|
|
|
|
if(!$process->isBpmnProcess($_SESSION['PROCESS'])) {
|
|
|
|
|
|
return;
|
|
|
|
|
|
}
|
|
|
|
|
|
require_once PATH_CORE.'controllers/pmTablesProxy.php';
|
|
|
|
|
|
$pmTablesProxy = new pmTablesProxy();
|
|
|
|
|
|
$variableModule = new ProcessMaker\BusinessModel\Variable();
|
|
|
|
|
|
$searchTypes = array ('checkgroup','dropdown','suggest');
|
|
|
|
|
|
$processVariables = $pmTablesProxy->getDynaformVariables($_SESSION['PROCESS'],$searchTypes,false);
|
|
|
|
|
|
$variables = $this->affected_fields;
|
2016-03-02 15:33:15 -04:00
|
|
|
|
$variables = (is_array($variables))? array_unique($variables) : $variables;
|
2015-11-27 11:48:24 -04:00
|
|
|
|
$newFields = array();
|
|
|
|
|
|
$arrayValues = array();
|
|
|
|
|
|
$arrayLabels = array();
|
|
|
|
|
|
if(is_array($variables) && is_array($processVariables)) {
|
|
|
|
|
|
foreach($variables as $var) {
|
|
|
|
|
|
if(strpos($var, '_label') === false) {
|
|
|
|
|
|
if(in_array($var,$processVariables)) {
|
|
|
|
|
|
if(isset($this->aFields[$var]) && is_array($this->aFields[$var][1]) ) {
|
2016-07-19 14:26:51 -04:00
|
|
|
|
$varLabel = $var.'_label';
|
2015-11-27 11:48:24 -04:00
|
|
|
|
$arrayValue = $this->aFields[$var];
|
|
|
|
|
|
if(is_array($arrayValue) && sizeof($arrayValue)) {
|
|
|
|
|
|
foreach($arrayValue as $val) {
|
|
|
|
|
|
if(is_array($val)){
|
|
|
|
|
|
$val = array_values($val);
|
|
|
|
|
|
$arrayValues[] = $val[0];
|
|
|
|
|
|
$arrayLabels[] = $val[1];
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
if(sizeof($arrayLabels)) {
|
|
|
|
|
|
$varInfo = $variableModule->getVariableTypeByName($_SESSION['PROCESS'],$var);
|
|
|
|
|
|
if(is_array($varInfo) && sizeof($varInfo)) {
|
|
|
|
|
|
$varType = $varInfo['VAR_FIELD_TYPE'];
|
|
|
|
|
|
switch($varType) {
|
|
|
|
|
|
case 'array':
|
2016-07-19 14:26:51 -04:00
|
|
|
|
$arrayLabels = '["'.implode('","',$arrayLabels).'"]';
|
2015-11-27 11:48:24 -04:00
|
|
|
|
$newFields[$var] = $arrayValues;
|
|
|
|
|
|
$newFields[$varLabel] = $arrayLabels;
|
|
|
|
|
|
break;
|
|
|
|
|
|
case 'string':
|
|
|
|
|
|
$newFields[$var] = $arrayValues[0];
|
|
|
|
|
|
$newFields[$varLabel] = $arrayLabels[0];
|
|
|
|
|
|
break;
|
|
|
|
|
|
}
|
2016-07-19 14:26:51 -04:00
|
|
|
|
$this->affected_fields[] = $varLabel;
|
2015-11-27 11:48:24 -04:00
|
|
|
|
$this->aFields = array_merge($this->aFields,$newFields);
|
|
|
|
|
|
unset($newFields);
|
|
|
|
|
|
unset($arrayValues);
|
|
|
|
|
|
unset($arrayLabels);
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
2015-12-07 17:53:33 -04:00
|
|
|
|
if (isset($this->aFields[$var]) && is_string($this->aFields[$var])) {
|
|
|
|
|
|
$varInfo = $variableModule->getVariableTypeByName($_SESSION['PROCESS'], $var);
|
|
|
|
|
|
$options = G::json_decode($varInfo["VAR_ACCEPTED_VALUES"]);
|
|
|
|
|
|
$no = count($options);
|
|
|
|
|
|
for ($io = 0; $io < $no; $io++) {
|
|
|
|
|
|
if ($options[$io]->value === $this->aFields[$var]) {
|
|
|
|
|
|
$this->aFields[$var . "_label"] = $options[$io]->label;
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
if ($varInfo["VAR_DBCONNECTION"] !== "" && $varInfo["VAR_DBCONNECTION"] !== "none" && $varInfo["VAR_SQL"] !== "") {
|
|
|
|
|
|
try {
|
|
|
|
|
|
$cnn = Propel::getConnection($varInfo["VAR_DBCONNECTION"]);
|
|
|
|
|
|
$stmt = $cnn->createStatement();
|
|
|
|
|
|
$sql = G::replaceDataField($varInfo["VAR_SQL"], $this->aFields);
|
|
|
|
|
|
$rs = $stmt->executeQuery($sql, \ResultSet::FETCHMODE_NUM);
|
|
|
|
|
|
while ($rs->next()) {
|
|
|
|
|
|
$row = $rs->getRow();
|
|
|
|
|
|
if ($row[0] === $this->aFields[$var]) {
|
|
|
|
|
|
$this->aFields[$var . "_label"] = isset($row[1]) ? $row[1] : $row[0];
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
} catch (Exception $e) {
|
2016-07-19 14:26:51 -04:00
|
|
|
|
|
2015-12-07 17:53:33 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
2015-11-27 11:48:24 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
2016-07-19 14:26:51 -04:00
|
|
|
|
}
|
2015-11-27 11:48:24 -04:00
|
|
|
|
}
|
|
|
|
|
|
}
|
2017-08-08 16:45:49 -04:00
|
|
|
|
}
|