[PLUGIN] Formate 0.2 -> PHx

/*
 *	Name: Formate
 *	Version: 0.2
 *      Type: Plugin
 *	Author: Armand "bS" Pondman ([email protected])
 *	Updated: July 27, 2006 21:00 CET
 *
 *  Description:
 *
 *  Formats / translates values for presentation (ea. date formatting from unix timestamps and userid to username for example)
 *
 */
## DO NOT EDIT BELOW THIS LINE ##

class dpParser {
	var $_output;
	var $_namespace;
	var $_delimiter;
	
	function dpParser ( $template = "", $namespace = "", $delimiter = "|" ) {
		$this->_output = $template;
		$this->_namespace = $namespace;
		$this->_delimiter = $delimiter;
	}
	
	function Render() {
		return $this->Parse($this->_output);
	}
	
	function Parse($template) {
		#echo '~(?=\[%'.$this->_namespace.'((.|\r|\n)*?)%\])~';
		if (preg_match_all('~(?=\[%'.$this->_namespace.'((.|\r|\n)*?)%\])~',$template, $matches)) {
			 $count = count($matches[1]);
			 $var_search = array();
			 $var_replace = array();
			 for($i=0; $i<$count; $i++) {
				$match = $matches[1][$i];		 
				if(!strpos($match, "[%".$this->_namespace)) {
					$var_search[] = "[%".$this->_namespace.$match."%]";
					$var_replace[] = $this->Filter($match);
				}
			 }
			 $template = $this->Parse(str_replace($var_search, $var_replace, $template));
		}
		return $template;
	}
	
	function Filter($action) {
		global $modx;
		$arg = explode($this->_delimiter,$action);

		switch(strtoupper(trim($arg[0]))) {
		  
		  // TEST
		  case "ASIS":
			$dpreplace = $arg[1];
			break;
		  
		  // POST objects
		  case "POST":
		  	$dpreplace = $_POST[trim($arg[1])];
		  	break;
		  
		  // GET objects
		  case "GET":
		  	$dpreplace = $_GET[trim($arg[1])];
		  	break;
		  
		  // Calculations
		  case "CALC":
			$filter = preg_replace("~([a-zA-Z\n\r\t\s])~","", trim($arg[1]));
			$dpreplace = eval("return ".$filter.";");
			break;
			
		  // Date Formatting
		  case "DATE":
			$rawdate = 0;
			$rawdates = explode(",",$arg[1]);
			foreach ( $rawdates as $rdate ) {
			  $rawdate = trim($rdate);
			  if($rawdate > 0) {break;}
			}
			$dpreplace = strftime($arg[2],$rawdate);
			break;
		
		  // Web User Lookup
		  case "WUSR":
			$getfield = trim($arg[1]);
			$getuserid = trim($arg[2]);
			$tbluser = $modx->getFullTableName("web_users");
			$tbluatt = $modx->getFullTableName("web_user_attributes");
			$sqlu = "SELECT a.username as username, b.* FROM $tbluser a INNER JOIN $tbluatt b ON a.id = b.internalKey WHERE a.id = '".$modx->db->escape($getuserid)."'"; 
			$rs = $modx->db->query($sqlu);
			$user = $modx->db->getRow($rs);
			$dpreplace = $user[$getfield];
			break;
		  
		  // Manager User Lookup
		  case "MUSR":
			$getfield = trim($arg[1]);
			$getuserid = trim($arg[2]);
			$tbluser = $modx->getFullTableName("manager_users");
			$tbluatt = $modx->getFullTableName("user_attributes");
			$sqlu = "SELECT a.username as username, b.* FROM $tbluser a INNER JOIN $tbluatt b ON a.id = b.internalKey WHERE a.id = '".$modx->db->escape($getuserid)."'"; 
			$rs = $modx->db->query($sqlu);
			$user = $modx->db->getRow($rs);
			$dpreplace = $user[$getfield];
			break;
		  default:
			break;
		}
		
		return $dpreplace;	  	
	}
}

$e = &$modx->Event;

switch($e->name) {
  case 'OnWebPagePrerender':
	$newOutput = new dpParser($modx->documentOutput);
	$modx->documentOutput = $newOutput->Render();
	break;
  default:
    return;
    break;
}

 case "FOO":
  # do something, the $arg array contains all the variables
  $dpreplace = "output something"
  break;