PHP逆波蘭表達式的算法-工資計算專用

有個網友寫信給我談到關於PHP計算工資問題。我以前一篇文章中談到過一種計算工資的方法，不過是偷巧，利用現有的表達式的工具，現在既然有人想要，我就給出一個逆波蘭的算法。

我們的目標是實現如下的計算公式：

假設有一個計算公式如下：

$expression = "(F1*F12+10.34)";

其中的變量值如下：

$expression_value = Array('F1'=>10,'F12'=>20);

我們希望用PHP構建一個類來計算出這個表達式的值。這種應用主要用於web工資管理中，用戶可以自定義其工資相公式的情況。

$rpn = new Math_Rpn();
$rpn->setExpressionValue($expression_value);  
echo $rpn->calculate($expression,'deg',false); // 即為相應的值

解析逆波蘭表達式的方法，編譯原理中有，就是先把表達式分解成符號數組，然後求逆波蘭式，最後根據逆波蘭式得到其結果。

我分別把三個函數貼在下面，其實本質我就是對Pear的RPN函數進行了Hack。

function _stringToArray () {
$temp_operator = null;
$temp_value = null;
$this->_input = str_replace(" ","",$this->_input);
for($i = 0; $i < strlen($this->_input); $i++) {
if ($this->_input[$i] == ' ') {
  if ($temp_operator != null) {
array_push($this->_input_array, $temp_operator);
$temp_operator = null;
  }
  if ($temp_value != null) {
array_push($this->_input_array, $temp_value);
$temp_value = null;
  }
} elseif (($temp_value == null) && $temp_operator != ')' && 
(!array_key_exists($temp_operator,$this->_operation) || 
!array_key_exists(2,$this->_operation[$temp_operator]) || 
$this->_operation[$temp_operator][2]>0) && ($this->_input[$i] == '-')) {
  if ($temp_operator != null) {
array_push($this->_input_array, $temp_operator);
$temp_operator = null;
  }
  array_push($this->_input_array, '-1');
  array_push($this->_input_array, '*');
//} elseif ((is_numeric($this->_input[$i])) || ($this->_input[$i] == '.')) {
} elseif ((is_numeric($this->_input[$i])) || ($this->_input[$i] == '.') || 
($this->_input[$i] == 'F')) {
  if ($temp_operator != null) {
array_push($this->_input_array, $temp_operator);
$temp_operator = null;
  }
  $temp_value .= $this->_input[$i];
} else {
  if ($this->_keyExists($temp_operator, $this->_operation, 1)) {
array_push($this->_input_array, $temp_operator);
$temp_operator = null;
  }
  if ($temp_value != null) {
array_push($this->_input_array, $temp_value);
$temp_value = null;
  }
  $temp_operator .= $this->_input[$i];
}
}
if ($temp_operator != null && $temp_operator != ' ') {
array_push($this->_input_array, $temp_operator);
} elseif($temp_value != null && $temp_value != ' ') {
array_push($this->_input_array, $temp_value);
}
// $this->_testInput();
print_r($this->_expression_value);
print_r($this->_input_array);
return $this->_input_array;
  }
  function _arrayToRpn() {
if ($this->_error <> null) {
$this->_output = array();
return $this->_output;
}
for($i = 0; $i < count($this->_input_array); $i++) {
$temp = $this->_input_array[$i];
if (is_numeric($temp)) {
  $this->_outputAdd($temp);
} else if($this->_keyExists($temp, $this->_expression_value, 0)) {
  $this->_outputAdd($this->_expression_value[$temp]);
} else {
  if ($temp == ')') {
while(!$this->_stackEmpty() && ($this->_stackPriority() >= 1)) {
$this->_outputAdd($this->_stackDelete());
}
if (!$this->_stackEmpty()) {
$this->_stackDelete();
}
  } elseif ($temp=='(') {
$this->_stackAdd($temp);
  } elseif (($this->_stackEmpty()) || (($this->_priority($temp) > 
$this->_stackPriority()))) {
$this-> _stackAdd($temp);
  } else {
while(!$this->_stackEmpty() && ($this->_priority($temp) 
<= $this->_stackPriority())) {
$this->_outputAdd($this->_stackDelete());
}
$this->_stackAdd($temp);
  }
}
}
while(!$this->_stackEmpty()) {
$this->_outputAdd($this->_stackDelete());
}
return $this->_output;
}
function _rpnToValue() {
$time1 = $this->_getMicroTime();
if ($this->_error <> null) {
$this->_value = null;
return $this->_value;
}
$this->_value = 0;
$temp = $this->_output;
do {
$pos = $this->_nextOperator($temp);
if ($pos == -1) {
  $this->_error = $this->_raiseError('Syntax error');
  $this->_value = null;
  return $this->_value;
}
$operator = $this->_operation[$temp[$pos]];
$arg = $operator[2];
$function = $operator[3];
if (($arg==2) && (!isset($temp[$pos-1]) || !is_numeric($temp[$pos-1]) || 
!isset($temp[$pos-2]) || !is_numeric($temp[$pos-2]))) {
  $this->_error = $this->_raiseError('Syntax error');
  $this->_value = null;
  return $this->_value;
} elseif (($arg==1) && (!isset($temp[$pos-1]) || !is_numeric($temp[$pos-1]))) {
  $this->_error = $this->_raiseError('Syntax error');
  $this->_value = null;
  return $this->_value;
}
if(is_array($function)) {
  if($arg==2) $arg_array = array($temp[$pos-2],$temp[$pos-1]);
  elseif($arg==1) $arg_array = array($temp[$pos-1]);
  else $arg_array = array();
  if($function['type'] == 'userFunction') {
$this->_value = call_user_func_array($function['function'], $arg_array);
  } else {
$function_array = array(&$function['class'], $function['method']);
$this->_value = call_user_func_array($function_array, $arg_array);
  }
} else {
  $this->_value = $this->$function($temp, $pos);
}
if ($this->_isNan($this->_value)) {
  $this->_error = $this->_raiseError('NAN value');
  $this->_value = null;
  return $this->_value;
} elseif ($this->_isInfinite($this->_value)) {
  $this->_error = $this->_raiseError('Infinite value');
  $this->_value = null;
  return $this->_value;
} elseif (is_null($this->_value)) {
  return $this->_value;
}
$temp = $this->_refresh($temp, $pos, $arg, $this->_value);
} while(count($temp) > 1);
$this->_value = $temp[0];
$time2 = $this->_getMicroTime();
$this->_timer = $time2 - $time1;
return $this->_value;
  }