]> git.mxchange.org Git - friendica.git/blobdiff - include/template_processor.php
tests for the template engine
[friendica.git] / include / template_processor.php
old mode 100644 (file)
new mode 100755 (executable)
index d431831..06c49a7
@@ -1,4 +1,5 @@
 <?php
+       define ("KEY_NOT_EXISTS", '^R_key_not_Exists^');
 
        class Template {
                var $r;
@@ -7,32 +8,41 @@
                var $stack = array();
                var $nodes = array();
                var $done = false;
+               var $d = false;
+               var $lang = null;
+               var $debug=false;
                
-               private function _build_replace($r, $prefix){
-       
-                       if(is_array($r) && count($r)) {
-                               foreach ($r as $k => $v ) {
-                                       if (is_array($v))
-                                               $this->_build_replace($v, "$prefix$k.");
-                                       
-                                       $this->search[] =  $prefix . $k;
-                                       $this->replace[] = $v;
-                               }
+               private function _preg_error(){
+                       switch(preg_last_error()){
+                           case PREG_INTERNAL_ERROR: echo('PREG_INTERNAL_ERROR'); break;
+                           case PREG_BACKTRACK_LIMIT_ERROR: echo('PREG_BACKTRACK_LIMIT_ERROR'); break;
+                           case PREG_RECURSION_LIMIT_ERROR: echo('PREG_RECURSION_LIMIT_ERROR'); break;
+                           case PREG_BAD_UTF8_ERROR: echo('PREG_BAD_UTF8_ERROR'); break;
+                           case PREG_BAD_UTF8_OFFSET_ERROR: echo('PREG_BAD_UTF8_OFFSET_ERROR'); break;
+                           default:
+                                       //die("Unknown preg error.");
+                                       return;
                        }
-               } 
+                       echo "<hr><pre>";
+                       debug_print_backtrace();
+                       die();
+               }
+               
                
                private function _push_stack(){
-                       $this->stack[] = array($this->r, $this->search, $this->replace, $this->nodes);
+                       $this->stack[] = array($this->r, $this->nodes);
                }
                private function _pop_stack(){
-                       list($this->r, $this->search, $this->replace, $this->nodes) = array_pop($this->stack);
+                       list($this->r, $this->nodes) = array_pop($this->stack);
+                       
                }
                
-               private function _get_var($name){
-                       $keys = array_map('trim',explode(".",$name));                   
+               private function _get_var($name, $retNoKey=false){
+                       $keys = array_map('trim',explode(".",$name));
+                       if ($retNoKey && !array_key_exists($keys[0], $this->r)) return KEY_NOT_EXISTS;
                        $val = $this->r;
                        foreach($keys as $k) {
-                               $val = $val[$k];
+                               $val = (isset($val[$k]) ? $val[$k] : null);
                        }
                        return $val;
                }
                /**
                 * IF node
                 * 
-                * {{ if <$var> }}...{{ endif }}
+                * {{ if <$var> }}...[{{ else }} ...] {{ endif }}
+                * {{ if <$var>==<val|$var> }}...[{{ else }} ...]{{ endif }}
+                * {{ if <$var>!=<val|$var> }}...[{{ else }} ...]{{ endif }}
                 */
                private function _replcb_if($args){
-                       $val = $this->_get_var($args[2]);
-                       return ($val?$args[3]:"");
+                       if (strpos($args[2],"==")>0){
+                               list($a,$b) = array_map("trim",explode("==",$args[2]));
+                               $a = $this->_get_var($a);
+                               if ($b[0]=="$") $b =  $this->_get_var($b);
+                               $val = ($a == $b);
+                       } else if (strpos($args[2],"!=")>0){
+                               list($a,$b) = explode("!=",$args[2]);
+                               $a = $this->_get_var($a);
+                               if ($b[0]=="$") $b =  $this->_get_var($b);
+                               $val = ($a != $b);
+                       } else {
+                               $val = $this->_get_var($args[2]);
+                       }
+                       $x = preg_split("|{{ *else *}}|", $args[3]);
+                       return ( $val ? $x[0] : (isset($x[1]) ? $x[1] : ""));
                }
                
                /**
                 */
                private function _replcb_for($args){
                        $m = array_map('trim', explode(" as ", $args[2]));
-                       list($keyname, $varname) = explode("=>",$m[1]);
+                       @list($keyname, $varname) = explode("=>",$m[1]);
                        if (is_null($varname)) { $varname=$keyname; $keyname=""; }
                        if ($m[0]=="" || $varname=="" || is_null($varname)) die("template error: 'for ".$m[0]." as ".$varname."'") ;
-                       $vals = $this->r[$m[0]];
+                       //$vals = $this->r[$m[0]];
+                       $vals = $this->_get_var($m[0]);
                        $ret="";
                        if (!is_array($vals)) return $ret; 
                        foreach ($vals as $k=>$v){
                 * {{ inc <templatefile> [with $var1=$var2] }}{{ endinc }}
                 */
                private function _replcb_inc($args){
-                       list($tplfile, $newctx) = array_map('trim', explode("with",$args[2]));
+                       if (strpos($args[2],"with")) {
+                               list($tplfile, $newctx) = array_map('trim', explode("with",$args[2]));
+                       } else {
+                               $tplfile = trim($args[2]);
+                               $newctx = null;
+                       }
+                       
+                       if ($tplfile[0]=="$") $tplfile = $this->_get_var($tplfile);
+                       
                        $this->_push_stack();
                        $r = $this->r;
                        if (!is_null($newctx)) {
                private function _replcb_node($m) {
                        $node = $this->nodes[$m[1]];
                        if (method_exists($this, "_replcb_".$node[1])){
-                               return call_user_func(array($this, "_replcb_".$node[1]),  $node);
+                               $s = call_user_func(array($this, "_replcb_".$node[1]),  $node);
                        } else {
-                               return "";
+                               $s = "";
                        }
+                       $s = preg_replace_callback('/\|\|([0-9]+)\|\|/', array($this, "_replcb_node"), $s);
+                       return $s;
                }
                                                
                private function _replcb($m){
+                       //var_dump(array_map('htmlspecialchars', $m));
                        $this->done = false;    
                        $this->nodes[] = (array) $m;
                        return "||". (count($this->nodes)-1) ."||";
                        $this->done = false;
                        while (!$this->done){
                                $this->done=true;
-                               $s = preg_replace_callback('|{{ *([a-z]*) *([^}]*)}}([^{]*){{ *end\1 *}}|', array($this, "_replcb"), $s);
+                               $s = preg_replace_callback('|{{ *([a-z]*) *([^}]*)}}([^{]*({{ *else *}}[^{]*)?){{ *end\1 *}}|', array($this, "_replcb"), $s);
+                               if ($s==Null) $this->_preg_error();
                        }
+                       //({{ *else *}}[^{]*)?
                        krsort($this->nodes);
                        return $s;
                }
                
+
+               private function var_replace($s){
+                       $m = array();
+                       /** regexp:
+                        * \$                                           literal $
+                        * (\[)?                                        optional open square bracket
+                        * ([a-zA-Z0-9-_]+\.?)+         var name, followed by optional
+                        *                                                      dot, repeated at least 1 time
+                        * (?(1)\])                                     if there was opened square bracket
+                        *                                                      (subgrup 1), match close bracket
+                        */
+                       if (preg_match_all('/\$(\[)?([a-zA-Z0-9-_]+\.?)+(?(1)\])/', $s,$m)){
+                               
+                               foreach($m[0] as $var){
+                                       $varn = str_replace(array("[","]"), array("",""), $var);
+                                       $val = $this->_get_var($varn, true);
+                                       if ($val!=KEY_NOT_EXISTS)
+                                               $s = str_replace($var, $val, $s);
+                               }
+                       }
+                       
+                       return $s;
+               }
+       
                public function replace($s, $r) {
                        $this->r = $r;
-                       $this->search = array();
-                       $this->replace = array();
-       
-                       $this->_build_replace($r, "");
                        
-                       #$s = str_replace(array("\n","\r"),array("§n§","§r§"),$s);
                        $s = $this->_build_nodes($s);
+
                        $s = preg_replace_callback('/\|\|([0-9]+)\|\|/', array($this, "_replcb_node"), $s);
-                       $s = str_replace($this->search,$this->replace,$s);
+                       if ($s==Null) $this->_preg_error();
                        
-                       return $s;
+                       // remove comments block
+                       $s = preg_replace('/{#[^#]*#}/', "" , $s);
+                       
+                       // replace strings recursively (limit to 10 loops)
+                       $os = ""; $count=0;
+                       while($os!=$s && $count<10){
+                               $os=$s; $count++;
+                               $s = $this->var_replace($s);
+                       }
+                       return template_unescape($s);
                }
        }
        
        $t = new Template;
+
+
+
+
+function template_escape($s) {
+
+       return str_replace(array('$','{{'),array('!_Doll^Ars1Az_!','!_DoubLe^BraceS4Rw_!'),$s);
+
+
+}
+
+function template_unescape($s) {
+
+       return str_replace(array('!_Doll^Ars1Az_!','!_DoubLe^BraceS4Rw_!'),array('$','{{'),$s);
+
+
+
+}