PageRenderTime 67ms CodeModel.GetById 23ms RepoModel.GetById 0ms app.codeStats 1ms

/quicky_plain/Quicky_compiler.class.php

https://bitbucket.org/korchasa/php-templates-test
PHP | 1269 lines | 1248 code | 10 blank | 11 comment | 157 complexity | 7b28621fc894cae81ebfca2db5723b33 MD5 | raw file
Possible License(s): LGPL-2.1

Large files files are truncated, but you can click here to view the full file

    

  1. <?php
    2. 

  2. /**************************************************************************/
    3. 

  3. /* Quicky: smart and fast templates
    4. 

  4. /* ver. 0.3
    5. 

  5. /* ===========================
    6. 

  6. /*
    7. 

  7. /* Copyright (c)oded 2007 by white phoenix
    8. 

  8. /* http://whitephoenix.ru
    9. 

  9. /*
    10. 

  10. /* Quicky_compiler.class.php: Template compiler
    11. 

  11. /**************************************************************************/
    12. 

  12. class Quicky_compiler
    13. 

  13. {
    14. 

  14.  public $precompiled_vars = array();
    15. 

  15.  public $prefilters = array();
    16. 

  16.  public $postfilters = array();
    17. 

  17.  public $compiler_name = 'Quicky';
    18. 

  18.  public $compiler_version = '0.3';
    19. 

  19.  public $load_plugins = array();
    20. 

  20.  public $seq = array();
    21. 

  21.  public $seq_id = 0;
    22. 

  22.  public $_alt_tag = FALSE;
    23. 

  23.  public $prefs = array();
    24. 

  24.  public $template_defined_functions = array();
    25. 

  25.  public $_cast_undefined_token_to_strings = TRUE;
    26. 

  26.  public $allowed_php_tokens = array('array','date','strtotime','isset','empty','is_empty','count', 'sizeof',
    27. 

  27. 							'is_array','is_int','is_float','is_long','is_numeric','is_object',
    28. 

  28. 							'is_scalar','is_string','gettype','is_real',
    29. 

  29. 							'abs','acos','acosh','asin','asinh','atan2','atan','atanh','base_','bindec',
    30. 

  30. 							'ceil','cos','cosh','decbin','dechex','decoct','deg2rad','exp','expm1','floor',
    31. 

  31. 							'fmod','getrandmax','hexdec','hypot','is_finite','is_infinite','is_nan','lcg_','log10','log1p',
    32. 

  32. 							'log','max','min','mt_getrandmax','mt_rand','mt_srand','octdec','pi','pow','rad2deg','rand',
    33. 

  33. 							'round','sin','sinh','sqrt','srand','tan','tanh',
    34. 

  34. 							'constant','strlen','time','var_dump','var_export',
    35. 

  35. 							'gmp_*','ctype_*','array_*','addcslashes','addslashes','bin2hex','chop','chr',
    36. 

  36. 							'chunk_split','convert_cyr_string','convert_uudecode','convert_uuencode','count_chars',
    37. 

  37. 							'crc32','crypt','echo','explode','fprintf','get_html_translation_table','hebrev','hebrevc',
    38. 

  38. 							'html_entity_decode','htmlentities','htmlspecialchars_decode','htmlspecialchars','implode',
    39. 

  39. 							'join','levenshtein','localeconv','ltrim','md5_file','md5','metaphone','money_format',
    40. 

  40. 							'nl_langinfo','nl2br','number_format','ord','parse_str','print','printf',
    41. 

  41. 							'quoted_printable_decode','quotemeta','rtrim','sha1_file','sha1','similar_text',
    42. 

  42. 							'soundex','sprintf','sscanf','str_ireplace','str_pad','str_repeat','str_replace',
    43. 

  43. 							'str_rot13','str_shuffle','str_split','str_word_count','strcasecmp','strchr',
    44. 

  44. 							'strcmp','strcoll','strcspn','strip_tags','stripcslashes','stripos','stripslashes',
    45. 

  45. 							'stristr','strlen','strnatcasecmp','strnatcmp','strncasecmp','strncmp','strpbrk',
    46. 

  46. 							'strpos','strrchr','strrev','strripos','strrpos','strspn','strstr','strtok',
    47. 

  47. 							'strtolower','strtoupper','strtr','substr_compare','substr_count','substr_replace',
    48. 

  48. 							'substr','trim','ucfirst','ucwords','vfprintf','vprintf','vsprintf','wordwrap','and','or','xor');
    49. 

  49.  public $allowed_php_constants = array();
    50. 

  50.  public $syntax_error = NULL;
    51. 

  51.  public $template_from;
    52. 

  52.  public $blocks = array();
    53. 

  53.  public $left_delimiter = '{';
    54. 

  54.  public $right_delimiter = '}';
    55. 

  55.  public $magic_constants = array('tplpath','tplpathdir','ldelim','rdelim');
    56. 

  56.  public $block_props = array();
    57. 

  57.  public $_write_out_to = '';
    58. 

  58.  public $_halt = FALSE;
    59. 

  59.  public $_tag_stacks = array();
    60. 

  60.  public $_tag_stack_n = 0;
    61. 

  61.  public $_no_magic = FALSE;
    62. 

  62.  public $no_optimize = FALSE;
    63. 

  63.  public $_tmp = array();
    64. 

  64.  public $_cpl_vars = array();
    65. 

  65.  public $_cpl_config = array();
    66. 

  66.  function Quicky_compiler() {}
    67. 

  67.  static function escape_string($s)
    68. 

  68.  {
    69. 

  69.   static $escape = array(
    70. 

  70. 	'\\' => '\\\\',
    71. 

  71. 	'\'' => '\\\''
    72. 

  72.   );
    73. 

  73.   return strtr($s,$escape);
    74. 

  74.  }
    75. 

  75.  function push_block_props($props,$blocktype,$name)
    76. 

  76.  {
    77. 

  77.   for ($i = 0; $i < sizeof($props); $i++) {$this->block_props[$props[$i]] = array($name,$blocktype);}
    78. 

  78.   return TRUE;
    79. 

  79.  }
    80. 

  80.  function _syntax_error($error) {$this->syntax_error = $error; return UNIQUE_HASH.'~~error here~~';}
    81. 

  81.  function _write_seq($m)
    82. 

  82.  {
    83. 

  83.   if (!isset($this->seq[$this->seq_id])) {$this->seq[$this->seq_id] = array();}
    84. 

  84.   $this->seq[$this->seq_id][] = $m[1]; 
    85. 

  85.   return $this->seq_hash;
    86. 

  86.  }
    87. 

  87.  function _read_seq($reset = FALSE)
    88. 

  88.  {
    89. 

  89.   static $i = array();
    90. 

  90.   if ($reset === TRUE or !isset($i[$this->seq_id])) {$i[$this->seq_id] = 0; return;}
    91. 

  91.   return $this->seq[$this->seq_id][$i[$this->seq_id]++];
    92. 

  92.  }
    93. 

  93.  function register_block($block)
    94. 

  94.  {
    95. 

  95.   if (!in_array($block,$this->blocks)) {$this->blocks[] = $block;}
    96. 

  96.   return TRUE;
    97. 

  97.  }
    98. 

  98.  function unregister_block($block)
    99. 

  99.  {
    100. 

  100.   if ($k = array_search($block,$this->blocks)) {unset($this->blocks[$k]); return TRUE;}
    101. 

  101.   else {return FALSE;}
    102. 

  102.  }
    103. 

  103.  function _block_lang_callback($m)
    104. 

  104.  {
    105. 

  105.   $name = $m[2];
    106. 

  106.   $tag = $m[3];
    107. 

  107.   preg_match_all('~\{(\w+)\}(.*?)(?=\{\w+\}|\z)~s',$tag,$matches,PREG_SET_ORDER);
    108. 

  108.   $variants = array();
    109. 

  109.   foreach ($matches as $m) {$variants[strtolower($m[1])] = trim($m[2]);}
    110. 

  110.   $reqlang = $this->parent->lang;
    111. 

  111.   if (isset($variants[$reqlang])) {return $variants[$reqlang];}
    112. 

  112.   return isset($variants['default'])?$variants['default']:'Warning! Can\'t find phrase '.($name !== ''?'('.htmlspecialchars($name).')':'').' for this language.';
    113. 

  113.  }
    114. 

  114.  function _form_detect_field($m)
    115. 

  115.  {
    116. 

  116.   $tag = strtolower($m[1] !== ''?$m[1]:$m[3]);
    117. 

  117.   $params = $this->_parse_params($m[1] !== ''?$m[2]:$m[4],TRUE);
    118. 

  118.   if ($tag == 'option')
    119. 

  119.   {
    120. 

  120.    $params['text'] = $m[5];
    121. 

  121.    if (!isset($params['value'])) {$params['value'] = $params['text'];}
    122. 

  122.   }
    123. 

  123.   elseif ($tag == 'textarea')
    124. 

  124.   {
    125. 

  125.    $params['value'] = $m[5];
    126. 

  126.   }
    127. 

  127.   $p = '';
    128. 

  128.   if (isset($params['name']) and !isset($params['join'])) {$params['join'] = $params['name'];}
    129. 

  129.   foreach ($params as $k => $v) {$p .= $k.'=\''.$this->escape_string($this->_dequote($v)).'\' ';}
    130. 

  130.   $p = substr($p,0,-1);
    131. 

  131. 

  132.   if ($tag == 'input' or $tag == 'textarea')
    133. 

  133.   {
    134. 

  134.    $return = $this->left_delimiter.$tag.' '.$p.$this->right_delimiter;
    135. 

  135.   }
    136. 

  136.   elseif ($tag == 'option')
    137. 

  137.   {
    138. 

  138.    $return = $this->left_delimiter.'option '.$p.$this->right_delimiter;
    139. 

  139.   }
    140. 

  140.   elseif ($tag == 'select')
    141. 

  141.   {
    142. 

  142.    $body = preg_replace_callback('~<(option)(\s+.*?)?>(.*?)</\3>~si',array($this,'_form_detect_field'),$m[2]);
    143. 

  143.    $return = $this->left_delimiter.$tag.' '.$p.$this->right_delimiter.$m[5].$this->left_delimiter.'/'.$tag.$this->right_delimiter;
    144. 

  144. 

  145.   }
    146. 

  146.   return $return;
    147. 

  147.  }
    148. 

  148.  function _form_detect($m)
    149. 

  149.  {
    150. 

  150.   $params = $this->_parse_params($m[1],TRUE);
    151. 

  151.   $form_name = '';
    152. 

  152.   $p = '';
    153. 

  153.   $params['auto_object'] = 1;
    154. 

  154.   foreach ($params as $k => $v)
    155. 

  155.   {
    156. 

  156.    if (strtolower($this->_dequote($k)) == 'name') {$form_name = $this->_dequote($v);}
    157. 

  157.    $p .= $k.'=\''.$this->escape_string($this->_dequote($v)).'\' ';
    158. 

  158.   }
    159. 

  159.   if (!$this->parent->_auto_detect_forms and !in_array($form_name,$this->parent->_detect_forms)) {return $m[0];}
    160. 

  160.   $p = substr($p,0,-1);
    161. 

  161.   $body = preg_replace_callback('~<(input)(\s+.*?)?\s*/?\s*>|<(textarea|select)(\s+.*?)?>(.*?)</\3>~si',array($this,'_form_detect_field'),$m[2]);
    162. 

  162.   $return = '{form '.$p.'}'.$body.'{/form}';
    163. 

  163.   return $return;
    164. 

  164.  }
    165. 

  165.  function _compile_source_string($template,$from)
    166. 

  166.  {
    167. 

  167.   $old_load_plugins = $this->load_plugins;
    168. 

  168.   $this->load_plugins = array();
    169. 

  169.   $this->template_from = $from;
    170. 

  170.   //$template = preg_replace('~\r\n|\r(?!\n)~',"\n",$template);
    171. 

  171.   $template = preg_replace('~^/.*?/\r?\n~','',$template);
    172. 

  172. 

  173.   $ldelim = preg_quote($this->left_delimiter,'~');
    174. 

  174.   $rdelim = preg_quote($this->right_delimiter,'~');
    175. 

  175.   $template = preg_replace_callback('~([\'"]).*?\1|('.$ldelim.'\*.*?\*'.$rdelim.')~s',create_function('$m','if (!isset($m[2])) return $m[0]; return \'\';'),$template);
    176. 

  176. 

  177.   $a = array_values($this->prefilters);
    178. 

  178.   for ($i = 0,$s = sizeof($a); $i < $s; $i++) {$template = call_user_func($a[$i],$template,$this);}
    179. 

  179.   $source = $template;
    180. 

  180. 

  181.   if ($this->parent->lang !== '')
    182. 

  182.   {
    183. 

  183.    $source = preg_replace_callback('~'.$ldelim.'_\s+(.*?)'.$rdelim.'~',$this->parent->lang_callback,$source);
    184. 

  184.    $source = preg_replace_callback('~'.$ldelim.'e_\s+(.*?)'.$rdelim.'~i',$this->parent->lang_callback_e,$source);
    185. 

  185.    $source = preg_replace_callback('~'.$ldelim.'LANG(?:=([\'|"])?(.*?)\1)?'.$rdelim.'(.*?)'.$ldelim.'/LANG'.$rdelim.'~si',array($this,'_block_lang_callback'),$source);
    186. 

  186.   }
    187. 

  187.   if ($this->parent->_auto_detect_forms or sizeof($this->parent->_detect_forms) > 0)
    188. 

  188.   {
    189. 

  189.    $source = preg_replace_callback('~<form(\s+.*?)?>(.*?)</form>~si',array($this,'_form_detect'),$source);
    190. 

  190.   }
    191. 

  191.   if (!isset($this->prefs['allow_php_native']) or !$this->prefs['allow_php_native'])
    192. 

  192.   {
    193. 

  193.    $source = preg_replace('~<\?(?:php)?|\?>~i','<?php echo \'$0\'; ?>',$source);
    194. 

  194.   }
    195. 

  195.   $this->seq_hash = md5(microtime());
    196. 

  196.   $ldelim = preg_quote($this->left_delimiter,'~');
    197. 

  197.   $rdelim = preg_quote($this->right_delimiter,'~');
    198. 

  198.   $source = preg_replace_callback('~'.$ldelim.'literal'.$rdelim.'(.*?)'.$ldelim.'/literal'.$rdelim.'~si',array($this,'_write_seq'),$source);
    199. 

  199.   $cur_seq = $this->seq;
    200. 

  200.   $cur_hash = $this->seq_hash;
    201. 

  201.   $this->seq = array();
    202. 

  202.   $source = $this->_tag_token($source);
    203. 

  203.   $this->seq = $cur_seq;
    204. 

  204.   $this->seq_hash = $cur_hash;
    205. 

  205.   $this->_read_seq(TRUE);
    206. 

  206.   $source = preg_replace_callback('~'.$this->seq_hash.'~si',array($this,'_read_seq'),$source);
    207. 

  207.   $this->seq = array();
    208. 

  208.   if (!$this->no_optimize and FALSE)
    209. 

  209.   {
    210. 

  210.    $source = preg_replace_callback('~\?>(.{0,20}?)<\?php~s',create_function('$m','if ($m[1] === \'\') {return \'\';} return \' echo \\\'\'.Quicky_compiler::escape_string($m[1]).\'\\\';'."\n".'\';'),$source);
    211. 

  211.    $source = preg_replace_callback('~^(.{1,20}?)(<\?php)~s',create_function('$m','return $m[2].\' echo \\\'\'.Quicky_compiler::escape_string($m[1]).\'\\\';'."\n".'\';'),$source);
    212. 

  212.    $source = preg_replace_callback('~(\?>)(.{1,20})$~s',create_function('$m','return \' echo \\\'\'.Quicky_compiler::escape_string($m[2]).\'\\\';'."\n".'\'.$m[1];'),$source);
    213. 

  213.   }
    214. 

  214.   $header = '<?php /* Quicky compiler version '.$this->compiler_version.', created  on '.date('r').'
    215. 

  215. 			 compiled from '.$from.' */'."\n";
    216. 

  216.   for ($i = 0,$s = sizeof($this->load_plugins); $i < $s; $i++)
    217. 

  217.   {
    218. 

  218.    $header .= 'require_once '.var_export($this->load_plugins[$i],TRUE).';'."\n";
    219. 

  219.   }
    220. 

  220.   $header .= '?>';
    221. 

  221.   if ($this->syntax_error !== NULL)
    222. 

  222.   {
    223. 

  223.    $line = '~';
    224. 

  224.    $e = preg_split('~\r?\n|\r(?=\n)~',$source);
    225. 

  225.    for ($i = 0,$s = sizeof($e); $i < $s; $i++)
    226. 

  226.    {
    227. 

  227.     if (strpos($e[$i],UNIQUE_HASH.'~~error here~~') !== FALSE) {$line = $i+1; break;}
    228. 

  228.    }
    229. 

  229.    return 'Quicky syntax error '.$this->syntax_error.' in template '.$from.' on line '.$line;
    230. 

  230.   }
    231. 

  231.   $this->_halt = FALSE;
    232. 

  232. 

  233.   $a = array_values($this->postfilters);
    234. 

  234.   for ($i = 0,$s = sizeof($a); $i < $s; $i++) {$soruce = call_user_func($a[$i],$source,$this);}
    235. 

  235. 

  236.   $this->load_plugins = $old_load_plugins;
    237. 

  237.   $source = preg_replace('~^(<\?php.*?)\?><\?php~si','$1',$header.$source);
    238. 

  238.   return $source;
    239. 

  239.  }
    240. 

  240.  function _compile_source($path) {return $this->_compile_source_string(file_get_contents($path),substr($path,strlen($this->parent->template_dir)));}
    241. 

  241.  function string_or_expr($s)
    242. 

  242.  {
    243. 

  243.   if (ctype_digit(substr($s,0,1) == '-'?substr($s,1):$s)) {return $s;}
    244. 

  244.   if (preg_match('~^\w+$~',$s))
    245. 

  245.   {
    246. 

  246.    if (defined($s) or in_array(strtolower($s),$this->magic_constants) or isset($this->_block_props[strtolower($s)]))
    247. 

  247.    {
    248. 

  248.     return $s;
    249. 

  249.    }
    250. 

  250.    return '\''.$s.'\'';
    251. 

  251.   }
    252. 

  252.   return $s;
    253. 

  253.  }
    254. 

  254.  function _parse_params($p,$plain = FALSE)
    255. 

  255.  {
    256. 

  256.   $params = array();
    257. 

  257.   preg_match_all('~\w+\s*=|(([\'"]).*?(?<!\\\\)\2|\w*\s*\(((?:(?R)|.)*?)\)'
    258. 

  258.     .'|_?[\$#]\w+#?(?:\\[(?:(?R)|((?:[^\\]\'"]*(?:([\'"]).*?(?<!\\\\)\5)?)*))*?\\]|\.[\$#]?\w+#?|->\s*[\$#]?\w+(?:\(((?:(?R)|.)*?)\))?)*'
    259. 

  259.     .'|-?\d+|(?<=^|[\s\)\:\.=+\-<>])(?:\w+)(?=$|[\s\|\.\:\(=+\-<>]))~s',$p,$m,PREG_SET_ORDER);
    260. 

  260.   $lastkey = '';
    261. 

  261.   foreach ($m as $v)
    262. 

  262.   {
    263. 

  263.    if (trim($v[0]) === '') {continue;}
    264. 

  264.    if (sizeof($v) == 1) {$lastkey = ltrim(rtrim($v[0]," =\t")); continue;}
    265. 

  265.    if ($lastkey === '') {$params[] = $plain?$v[0]:$this->_expr_token($this->string_or_expr($v[0]));}
    266. 

  266.    else {$params[$lastkey] = $plain?$v[0]:$this->_expr_token($this->string_or_expr($v[0]));}
    267. 

  267.    $lastkey = '';
    268. 

  268.   }
    269. 

  269.   return $params;
    270. 

  270.  }
    271. 

  271.  function _dequote($string)
    272. 

  272.  {
    273. 

  273.   $a = substr($string,0,1);
    274. 

  274.   $string = preg_replace('~^\s*([\'"])(.*)\1\s*$~','$2',$string);
    275. 

  275.   return preg_replace('~(?<!\\\\)\\\\'.preg_quote($a,'~').'~',$a,$string);
    276. 

  276.  }
    277. 

  277.  function _get_expr_blockprop($name,$blocktype,$prop)
    278. 

  278.  {
    279. 

  279.   $blocktype = strtolower($blocktype);
    280. 

  280.   $prop = strtolower($prop);
    281. 

  281.   $a = '$'.$blocktype.'['.var_export($name,TRUE).']';
    282. 

  282.   if ($blocktype == 'foreach')
    283. 

  283.   {
    284. 

  284. 	   if ($prop == 'iteration' or $prop == 'i') {$prop = 'i';}
    285. 

  285.    elseif ($prop == 'total') {$prop = 's';}
    286. 

  286.    elseif ($prop == 'first') {return '('.$a.'[\'i\'] == 1)';}
    287. 

  287.    elseif ($prop == 'last') {return '('.$a.'[\'i\']+1 == '.$a.'[\'s\'])';}
    288. 

  288.   }
    289. 

  289.   elseif ($blocktype == 'section')
    290. 

  290.   {
    291. 

  291. 	   if ($prop == 'iteration' or $prop == 'rownum') {return '('.$a.'[\'i\']+1)';}
    292. 

  292.    elseif ($prop == 'index' or $prop == $name) {return 'Quicky::ind('.$a.')';}
    293. 

  293.    elseif ($prop == 'index_prev' or $prop == $name) {return 'Quicky::ind('.$a.',-1)';}
    294. 

  294.    elseif ($prop == 'index_next' or $prop == $name) {return 'Quicky::ind('.$a.',1)';}
    295. 

  295.    elseif ($prop == 'total') {$prop = 's';}
    296. 

  296.    elseif ($prop == 'first') {return '('.$a.'[\'i\'] == 0)';}
    297. 

  297.    elseif ($prop == 'last') {return '('.$a.'[\'i\']+1 == '.$a.'[\'s\'])';}
    298. 

  298.   }
    299. 

  299.   elseif ($blocktype == 'form')
    300. 

  300.   {
    301. 

  301.    if ($prop == 'form') {return 'Quicky_form::$forms['.var_export($name,TRUE).']';}
    302. 

  302.   }
    303. 

  303.   return $a.'['.var_export($prop,TRUE).']';
    304. 

  304.  }
    305. 

  305.  function _joincalc_callback($m)
    306. 

  306.  {
    307. 

  307.   if (isset($this->_tmp[$m[0]])) {return 'document.getElementById(\''.$this->_tmp[$m[0]].'\').value';}
    308. 

  308.   else {return $m[0];}
    309. 

  309.  }
    310. 

  310.  function _optimize_callback($m)
    311. 

  311.  {
    312. 

  312.   $prefix = ' '.$this->_write_out_to !== ''?$this->_write_out_to.' .= ':'echo ';
    313. 

  313.   if (isset($m[1]) and $m[1] !== '') {$return = $prefix.var_export($m[1],TRUE).';';}
    314. 

  314.   elseif (isset($m[2]) and $m[2] !== '') {$return = $prefix.var_export($m[2],TRUE).';';}
    315. 

  315.   elseif (isset($m[3]) and $m[3] !== '') {$return = $prefix.var_export($m[3],TRUE).';';}
    316. 

  316.   else {$return = '';}
    317. 

  317.   return $return;
    318. 

  318.  }
    319. 

  319.  function _optimize($block)
    320. 

  320.  {
    321. 

  321.   $block = preg_replace_callback((!preg_match('~<\?php|\?>~i',$block))?'~(.*)~s':'~\?>(.*?)<\?php|^(.*?)<\?php|\?>(.*?)$~si',array($this,'_optimize_callback'),$block);
    322. 

  322.   return $block;
    323. 

  323.  }
    324. 

  324.  function _fetch_expr($expr)
    325. 

  325.  {
    326. 

  326.   $var = &$this->_cpl_vars;
    327. 

  327.   $config = &$this->_cpl_config;
    328. 

  328.   return @eval('return '.$expr.';');
    329. 

  329.  }
    330. 

  330.  function _tag_token($mixed,$block_parent = '')
    331. 

  331.  {
    332. 

  332.   if (!isset($this->_tag_stacks[$this->_tag_stack_n])) {$this->_tag_stacks[$this->_tag_stack_n] = array();}
    333. 

  333.   if ($this->_halt && !(is_array($mixed) && isset($mixed[4]) && strtolower($mixed[4]) == 'resumecompiler'))
    334. 

  334.   {
    335. 

  335.    return is_array($mixed)?$mixed[0]:$mixed;
    336. 

  336.   }
    337. 

  337.   if (is_array($mixed))
    338. 

  338.   {
    339. 

  339.    if ((isset($mixed[6]) && $mixed[6] !== '') || (isset($mixed[10]) && $mixed[10] !== ''))
    340. 

  340.    {
    341. 

  341.     $a = array(
    342. 

  342.      0 => $mixed[0],
    343. 

  343.      1 => $mixed[6]
    344. 

  344.     );
    345. 

  345.     if (isset($mixed[7])) {$a[2] = $mixed[7];}
    346. 

  346.     if (isset($mixed[9])) {$a[3] = $mixed[9];}
    347. 

  347.     if (isset($mixed[10])) {$a[4] = $mixed[10];}
    348. 

  348.     $mixed = $a;
    349. 

  349.     $this->_alt_tag = FALSE;
    350. 

  350.    }
    351. 

  351.    else {$this->_alt_tag = TRUE;}
    352. 

  352.    if (isset($mixed[4]) && $mixed[4] !== '')
    353. 

  353.    {
    354. 

  354.     preg_match('~^\s*(\S+)(.*)~s',$mixed[4],$m);
    355. 

  355.     if (!isset($m[0])) {$m[0] = '';}
    356. 

  356.     if (!isset($m[1])) {$m[1] = '';}
    357. 

  357.     $tag = strtolower($m[1]);
    358. 

  358.     if ($tag == 'if' or $tag == 'elseif' or $tag == 'else if')
    359. 

  359.     {
    360. 

  360.      if (trim($m[2]) == '') {return $this->_syntax_error('Empty condition.');}
    361. 

  361.      return '<?php '.$tag.' ('.$this->_expr_token($m[2],FALSE,TRUE).'): ?>';
    362. 

  362.     }
    363. 

  363.     elseif ($tag == 'case')
    364. 

  364.     {
    365. 

  365.      if (trim($m[2]) == '') {return $this->_syntax_error('Empty condition.');}
    366. 

  366.      return '<?php '.$tag.' '.$this->_expr_token($m[2],FALSE,TRUE).': ?>';
    367. 

  367.     }
    368. 

  368.     elseif ($tag == 'else' or $tag == 'default') {return '<?php '.$tag.': ?>';}
    369. 

  369.     elseif ($tag == '/if') {return '<?php endif; ?>';}
    370. 

  370.     elseif ($tag == 'return' or $tag == 'halt') {if ($tag == 'halt') {$this->_halt = TRUE;} $code = $this->_expr_token($m[2]); return '<?php return'.($code !== ''?' '.$code:'').'; ?>';}
    371. 

  371.     elseif ($tag == 'haltcompiler') {$this->_halt = TRUE;}
    372. 

  372.     elseif ($tag == 'resumecompiler') {$this->_halt = FALSE;}
    373. 

  373.     elseif ($tag == 'break') {$code = $this->_expr_token($m[2]); return '<?php break'.($code !== ''?' '.$code:'').'; ?>';}
    374. 

  374.     elseif ($tag == 'continue') {return '<?php continue; ?>';}
    375. 

  375.     elseif (preg_match('~^\w+$~',$tag) && ($p = $this->parent->fetch_plugin('compiler.'.$tag)))
    376. 

  376.     {
    377. 

  377.      require_once $p;
    378. 

  378.      $params = $this->_parse_params($m[2]);
    379. 

  379.      $a = 'quicky_compiler_'.$tag;
    380. 

  380.      $return = $a($params,$this);
    381. 

  381.      return $return;
    382. 

  382.     }
    383. 

  383.     elseif (preg_match('~^\w+$~',$tag)  && (($c = in_array($tag,$this->template_defined_functions)) || ($p = $this->parent->fetch_plugin('function.'.$tag))))
    384. 

  384.     {
    385. 

  385.      $params = $this->_parse_params($m[2]);
    386. 

  386.      $key_params = array();
    387. 

  387.      foreach ($params as $k => $v) {$key_params[] = var_export($k,TRUE).' => '.$v;}
    388. 

  388.      if (!in_array($p,$this->load_plugins) and !$c) {$this->load_plugins[] = $p;}
    389. 

  389.      return '<?php '.($this->_write_out_to !== ''?$this->_write_out_to.' .=':'echo').' quicky_function_'.$tag.'(array('.implode(',',$key_params).'),$this,TRUE);'."\n".'?>';
    390. 

  390.     }
    391. 

  391.     elseif ($tag == 'foreachelse')
    392. 

  392.     {
    393. 

  393.      $this->_tag_stacks[$this->_tag_stack_n][] = $tag;
    394. 

  394.      return '<?php endforeach; else: ?>';
    395. 

  395.     }
    396. 

  396.     elseif ($tag == 'sectionelse')
    397. 

  397.     {
    398. 

  398.      $this->_tag_stacks[$this->_tag_stack_n][] = $tag;
    399. 

  399.      return '<?php endfor; else: ?>';
    400. 

  400.     }
    401. 

  401.     elseif ($tag == 'optgroup')
    402. 

  402.     {
    403. 

  403.      $params = $this->_parse_params($m[2]);
    404. 

  404.      $params['text'] = isset($params['text'])?$params['text']:'';
    405. 

  405.      $params['text'] = strpos($params['text'],'$') !== FALSE?'<?php echo htmlspecialchars('.$params['text'].',ENT_QUOTES); ?>':htmlspecialchars($this->_dequote($params['text']));
    406. 

  406.      return '<optgroup label="'.$params['text'].'">';
    407. 

  407.     }
    408. 

  408.     elseif ($tag == '/optgroup') {return '</optgroup>';}
    409. 

  409.     elseif ($tag == 'option')
    410. 

  410.     {
    411. 

  411.      $tk = -1;
    412. 

  412.      for ($i = sizeof($this->_tag_stacks)-1; $i >= 0; $i--)
    413. 

  413.      {
    414. 

  414.       if (isset($this->_tag_stacks[$i]['type']) && $this->_tag_stacks[$i]['type'] == 'select') {$tk = $i;}
    415. 

  415.      }
    416. 

  416.      if ($tk != -1)
    417. 

  417.      {
    418. 

  418.       $params = $this->_parse_params($m[2]);
    419. 

  419.       $s = '';
    420. 

  420.       foreach ($params as $k => $v)
    421. 

  421.       {
    422. 

  422.        if ($k == 'checked') {$s .= '<?php if ('.$v.($params['type'] == '\'radio\''?' == '.$params['value'].(is_int(array_search('\'default\'',$params))?' or '.$v.' == \'\'':''):'').') {echo \' checked\';} ?>';}
    423. 

  423.        elseif (strpos($v,'$') !== FALSE) {$s .= ' '.$k.'="<?php echo htmlspecialchars('.$v.',ENT_QUOTES); ?>"';}
    424. 

  424.        else {$s .= ' '.$k.'="'.htmlspecialchars($this->_dequote($v,ENT_QUOTES)).'"';}
    425. 

  425.       }
    426. 

  426.       $params['text'] = isset($params['text'])?$params['text']:'';
    427. 

  427.       if (!isset($params['value'])) {$params['value'] = $params['text'];}
    428. 

  428.       $params['text'] = strpos($params['text'],'$') !== FALSE?'<?php echo htmlspecialchars('.$params['text'].',ENT_QUOTES); ?>':htmlspecialchars($this->_dequote($params['text']));
    429. 

  429.       if ($this->_tag_stacks[$tk]['value'] !== '' and isset($params['value']))
    430. 

  430.       {
    431. 

  431.        $s .= '<?php if ('.$this->_tag_stacks[$tk]['value'].' == '.$params['value'].') {echo \' selected\';} ?>';
    432. 

  432.       }
    433. 

  433.       return '<option'.$s.'>'.$params['text'].'</option>';
    434. 

  434.      }
    435. 

  435.      else {return $this->_syntax_error('Unexcepted tag \'option\'');}
    436. 

  436.     }
    437. 

  437.     elseif (preg_match('~^'.preg_quote($this->left_delimiter,'~').'\\*.*\\*'.preg_quote($this->right_delimiter,'~').'$~s',$mixed[0])) {return '';}
    438. 

  438.     else
    439. 

  439.     {
    440. 

  440.      if ($this->_alt_tag and preg_match('~^\w+$~',trim($m[0])))
    441. 

  441.      {
    442. 

  442.       $m[0] = '$'.trim($m[0]);
    443. 

  443.      }
    444. 

  444.      $outoff = FALSE;
    445. 

  445.      $plain = FALSE;
    446. 

  446.      if (substr($m[0],0,1) == '_')
    447. 

  447.      {
    448. 

  448.       $m[0] = substr($m[0],1);
    449. 

  449.       if (substr($m[0],0,1) == '_') {$m[0] = substr($m[0],1);}
    450. 

  450.       if (substr($m[0],0,1) == '?') {$m[0] = substr($m[0],1); $outoff = TRUE;}
    451. 

  451.       $e = $this->_fetch_expr($this->_expr_token($m[0],FALSE,TRUE));
    452. 

  452.       $plain = TRUE;
    453. 

  453.      }
    454. 

  454.      else
    455. 

  455.      {
    456. 

  456.       if (substr($m[0],0,1) == '?')
    457. 

  457.       {
    458. 

  458.        $e = $this->_expr_token(substr($m[0],1),FALSE,TRUE);
    459. 

  459.        $outoff = TRUE;
    460. 

  460.       }
    461. 

  461.       else {$e = $this->_expr_token($m[0],FALSE,TRUE);}
    462. 

  462.      }
    463. 

  463.      if ($plain) {return $e;}
    464. 

  464.      if ($e === '' or $e === '\'\'') {return '';}
    465. 

  465.      return '<?php '.($outoff?'':($this->_write_out_to !== ''?$this->_write_out_to.' .=':'echo').' ').$e.'; ?>';
    466. 

  466.     }
    467. 

  467.     return;
    468. 

  468.    }
    469. 

  469.    ++$this->_tag_stack_n;
    470. 

  470.    $block_name = strtolower($mixed[1]);
    471. 

  471.    $block_content = $mixed[3];
    472. 

  472.    if ($block_name == 'foreach')
    473. 

  473.    {
    474. 

  474.     $block_params = $this->_parse_params($mixed[2]);
    475. 

  475.     if (!isset($block_params['from'])) {return $this->_syntax_error('Missing parameter \'from\' in foreach tag.');}
    476. 

  476.     if (!isset($block_params['item']) && !isset($block_params['value'])) {return $this->_syntax_error('Missing parameter \'item\' in foreach tag.');}
    477. 

  477.     $return = '<?php $_from = '.$block_params['from'].';'."\n";
    478. 

  478.     if (isset($block_params['name']) and ($name = trim($this->_dequote($block_params['name']))) !== '')
    479. 

  479.     {
    480. 

  480.      $props = array('first','last','index','iteration','i','total');
    481. 

  481.      $a = $this->block_props;
    482. 

  482.      $this->push_block_props($props,$block_name,$name);
    483. 

  483.      $block = $this->_tag_token($block_content,$block_name);
    484. 

  484.      $this->block_props = $a;
    485. 

  485. 

  486.      $name = var_export($name,TRUE);
    487. 

  487.      $return .=  "\n".'$foreach['.$name.'] = array();'
    488. 

  488. 				."\n".'$foreach['.$name.'][\'i\'] = 0;'
    489. 

  489. 				."\n".'$foreach['.$name.'][\'s\'] = sizeof($_from);'
    490. 

  490. 	 ."\n";
    491. 

  491.     }
    492. 

  492.     else {$return .= ' '; $name = ''; $block = $this->_tag_token($block_content,$block_name);}
    493. 

  493.     $return .= 'if ('.($name !== ''?'$foreach['.$name.'][\'show\'] = ':'').($name !== ''?'$foreach['.$name.'][\'s\']':'sizeof($_from)').' > 0):'
    494. 

  494.     .' foreach ($_from as'.(isset($block_params['key'])?' $var['.$block_params['key'].'] =>':'').' $var['.(isset($block_params['item'])?$block_params['item']:$block_params['value']).']): '
    495. 

  495. 	.($name !== ''?"\n".'++$foreach['.$name.'][\'i\'];'.'':'')
    496. 

  496.     .'?>'
    497. 

  497.     .$block;
    498. 

  498.     if (($k = array_search('foreachelse',$this->_tag_stacks[$this->_tag_stack_n])) !== FALSE)
    499. 

  499.     {
    500. 

  500.      $return .= '<?php endif; ?>';
    501. 

  501.      unset($this->_tag_stacks[$this->_tag_stack_n][$k]);
    502. 

  502.     }
    503. 

  503.     else {$return .= '<?php endforeach; endif; ?>';}
    504. 

  504.    }
    505. 

  505.    elseif ($block_name == 'joincalculator')
    506. 

  506.    {
    507. 

  507.     $block_params = $this->_parse_params($mixed[2]);
    508. 

  508.     if (!isset($block_params['name'])) {return $this->_syntax_error('Missing parameter \'name\' in joincalculator tag.');}
    509. 

  509.     if (!isset($block_params['fields'])) {return $this->_syntax_error('Missing parameter \'fields\' in joincalculator tag.');}
    510. 

  510.     $block_params['name'] = strpos($block_params['name'],'$') !== FALSE?'<?php echo '.$block_params['name'].'; ?>':$this->_dequote($block_params['name']);
    511. 

  511.     $block_params['fields'] = explode(',',$this->_dequote($block_params['fields']));
    512. 

  512.     $fields = array();
    513. 

  513.     $return = '<script type="text/javascript">
    514. 

  514. function calculator_'.$block_params['name'].'(field)
    515. 

  515. {
    516. 

  516. ';
    517. 

  517.     foreach ($block_params['fields'] as $k => $v)
    518. 

  518.     {
    519. 

  519.      if (preg_match('~(.*?)\s+as\s+(.*)~i',$v,$q))
    520. 

  520.      {
    521. 

  521.       if (isset($fields[$q[2]])) {return $this->_syntax_error('Field name \''.$q[2].'\' alredy in use ');}
    522. 

  522.       $fields[$q[2]] = $q[1];
    523. 

  523.       $fields[$q[1]] = $q[1];
    524. 

  524.      }
    525. 

  525.      else {$fields[$v] = $v;}
    526. 

  526.     }
    527. 

  527.     $f = '';
    528. 

  528.     foreach ($fields as $k => $v) {$f .= '|'.preg_quote($k,'~');}
    529. 

  529. 

  530.     if ($f === '') {return $this->_syntax_error('No fields');}
    531. 

  531. 

  532.     $this->_tmp = $fields;
    533. 

  533.     preg_match_all('~\s*(.*?)\s*=\s*(.*?)(?:[\r\n]+|$)~m',$block_content,$m,PREG_SET_ORDER);
    534. 

  534.     foreach ($m as $v)
    535. 

  535.     {
    536. 

  536.      $name = $v[1];
    537. 

  537.      $expr = $v[2];
    538. 

  538.      $left = preg_replace_callback($a = '~([\'"]).*?\1'.$f.'~',array($this,'_joincalc_callback'),$name);
    539. 

  539.      $right = preg_replace_callback('~([\'"]).*?\1'.$f.'~',array($this,'_joincalc_callback'),$expr);
    540. 

  540.      $return .= 'if (field != \''.$name.'\') '.$left.' = '.$right.';
    541. 

  541. ';
    542. 

  542.     }
    543. 

  543.     $this->_tmp = array();
    544. 

  544.     $return .= '}';
    545. 

  545.     foreach ($fields as $k => $v)
    546. 

  546.     {
    547. 

  547.      if ($k != $v) {continue;}
    548. 

  548.      $return .= '
    549. 

  549. document.getElementById(\''.$v.'\').onchange = function() {setTimeout(function() {calculator_'.$block_params['name'].'("'.$v.'");},50);}';
    550. 

  550.      if (is_int(array_search('\'onkeydown\'',$block_params)))
    551. 

  551.      {
    552. 

  552.       $return .= '
    553. 

  553. document.getElementById(\''.$v.'\').onkeydown = function() {setTimeout(function() {calculator_'.$block_params['name'].'("'.$v.'");},50);}';
    554. 

  554.      }
    555. 

  555.     }
    556. 

  556.     $return .= '
    557. 

  557. </script>';
    558. 

  558.    }
    559. 

  559.    elseif ($block_name == 'for')
    560. 

  560.    {
    561. 

  561.     $block_params = $this->_parse_params($mixed[2]);
    562. 

  562.     if (!isset($block_params['start'])) {$block_params['start'] = 0;}
    563. 

  563.     if (!isset($block_params['step'])) {$block_params['step'] = 1;}
    564. 

  564.     if (!isset($block_params['loop'])) {return $this->_syntax_error('Missing parameter \'loop\' in for tag.');}
    565. 

  565.     if (!isset($block_params['value'])) {return $this->_syntax_error('Missing parameter \'value\' in for tag.');}
    566. 

  566.     $return = '<?php'
    567. 

  567. 			  ."\n".'for ('.$block_params['value'].' = '.$block_params['start'].'; '.$block_params['value'].' < '.$block_params['loop'].'; '.$block_params['value'].' += '.$block_params['step'].'): ?>'
    568. 

  568. 			  .$this->_tag_token($block_content,$block_name)
    569. 

  569. 			  .'<?php endfor; ?>';
    570. 

  570.    }
    571. 

  571.    elseif ($block_name == 'form')
    572. 

  572.    {
    573. 

  573.     $block_params = $this->_parse_params($mixed[2]);
    574. 

  574.     if (!isset($block_params['name']) && !isset($block_params['no_quicky_form']) && !is_int(array_search('no_quicky_form',$block_params))) {return $this->_syntax_error('Missing parameter \'name\' in section tag.');}
    575. 

  575.     $mode = !isset($block_params['no_quicky_form']) and !is_int(array_search('no_quicky_form',$block_params));
    576. 

  576.     $auto_object = isset($block_params['auto_object']);
    577. 

  577.     unset($block_params['auto_object']);
    578. 

  578.     $code = '';
    579. 

  579.     if ($mode)
    580. 

  580.     {
    581. 

  581.      if (!class_exists('Quicky_form'))
    582. 

  582.      {
    583. 

  583.       if ($auto_object) {require_once QUICKY_DIR.'Quicky.form.class.php';}
    584. 

  584.       else {return $this->_syntax_error('Class Quicky_form isn\'t loaded');}
    585. 

  585.      }
    586. 

  586.      $name = $this->_dequote($block_params['name']);
    587. 

  587.      if (!isset(Quicky_form::$forms[$name]))
    588. 

  588.      {
    589. 

  589.       if ($auto_object)
    590. 

  590.       {
    591. 

  591.        $code = '<?php'."\n".'if (!class_exists(\'Quicky_form\')) {require_once QUICKY_DIR.\'Quicky.form.class.php\';}'."\n".'if (!isset(Quicky_form::$forms[\''.$name.'\'])) {$form = new Quicky_form(\''.$name.'\');'."\n";
    592. 

  592.        preg_match_all('~'.preg_quote($this->left_delimiter,'~').'(input|textarea)(\s+.*?)?'.preg_quote($this->right_delimiter,'~').'~',$block_content,$m,PREG_SET_ORDER);
    593. 

  593.        foreach ($m as $v)
    594. 

  594.        {
    595. 

  595.         $params = $this->_parse_params($v[2],TRUE);
    596. 

  596.         if (!isset($params['name'])) {continue;}
    597. 

  597.         foreach ($params as $k => $v) {$params[$k] = $this->_dequote($v);}
    598. 

  598.         $code .= '$form->addElement('.var_export($params['name'],TRUE).','.var_export($params,TRUE).');'."\n";
    599. 

  599.        }
    600. 

  600.        $code .= '} ?>';
    601. 

  601.        eval('?>'.$code);
    602. 

  602.       }
    603. 

  603.       else {return $this->_syntax_error('Form \''.$name.'\' is not recognized');}
    604. 

  604.      }
    605. 

  605.      $objform = Quicky_form::$forms[$name];
    606. 

  606.      $props = array('form');
    607. 

  607.      $a = $this->block_props;
    608. 

  608.      $this->push_block_props($props,$block_name,$name);
    609. 

  609.      $block_content = $this->_tag_token($block_content,$block_name);
    610. 

  610.      $this->block_props = $a;
    611. 

  611.     }
    612. 

  612.     else {$block_content = $this->_tag_token($block_content,$block_name);}
    613. 

  613.     $s = '';
    614. 

  614.     foreach ($block_params as $k => $v)
    615. 

  615.     {
    616. 

  616.      if (strpos($v,'$') !== FALSE) {$s .= ' '.$k.'="<?php echo htmlspecialchars('.$v.',ENT_QUOTES); ?>"';}
    617. 

  617.      else {$s .= ' '.$k.'="'.htmlspecialchars($this->_dequote($v,ENT_QUOTES)).'"';}
    618. 

  618.     }
    619. 

  619.     $return = $code.'<form'.$s.'>'.$block_content.'</form>';
    620. 

  620.    }
    621. 

  621.    elseif ($block_name == '_if')
    622. 

  622.    {
    623. 

  623.     if (trim($mixed[2]) === '') {return $this->_syntax_error('Empty condition.');}
    624. 

  624.     $return = $this->_fetch_expr($this->_expr_token($mixed[2],FALSE,TRUE))?$this->_tag_token($block_content,$block_name):'';
    625. 

  625.    }
    626. 

  626.    elseif ($block_name == '_foreach')
    627. 

  627.    {
    628. 

  628.     $block_params = $this->_parse_params($mixed[2]);
    629. 

  629.     if (!isset($block_params['from'])) {return $this->_syntax_error('Missing parameter \'from\' in foreach tag.');}
    630. 

  630.     if (!isset($block_params['item']) && !isset($block_params['value'])) {return $this->_syntax_error('Missing parameter \'item\' in foreach tag.');}
    631. 

  631.     if (!isset($block_params['item'])) {$block_params['item'] = $block_params['value'];}
    632. 

  632.     $val = $this->_fetch_expr($block_params['from']);
    633. 

  633.     if (!is_array($val) and !is_object($val)) {return $this->_syntax_error('Parameter \'from\' must be an array or object, '.gettype($val).' given');}
    634. 

  634.     $return = '';
    635. 

  635.     if (isset($block_params['key']))
    636. 

  636.     {
    637. 

  637.      foreach ($val as $this->_cpl_vars[$this->_dequote($block_params['key'])] => $this->_cpl_vars[$this->_dequote($block_params['item'])]) {$return .= $this->_tag_token($block_content,$block_name);}
    638. 

  638.     }
    639. 

  639.     else
    640. 

  640.     {
    641. 

  641.      foreach ($val as $this->_cpl_vars[$this->_dequote($block_params['item'])]) {$return .= $this->_tag_token($block_content,$block_name);}
    642. 

  642.     }
    643. 

  643.    }
    644. 

  644.    elseif ($block_name == 'function' or $block_name == 'helper')
    645. 

  645.    {
    646. 

  646.     if (!preg_match('~^\s*(.*?)\s*\((.*)\)\s*$~',$mixed[2],$g)) {return $this->_syntax_error('Parse error in Function header.');}
    647. 

  647.     if (trim($g[2]) === '') {return $this->_syntax_error('Missing expression in Function tag.');}
    648. 

  648.     $this->_tag_stacks[$this->_tag_stack_n]['type'] = 'function';
    649. 

  649.     $this->_tag_stacks[$this->_tag_stack_n]['name'] = $g[1];
    650. 

  650.     $args = explode(',',$g[2]);
    651. 

  651.     $args_a = array();
    652. 

  652.     foreach ($args as $v)
    653. 

  653.     {
    654. 

  654.      if (!preg_match('~^\$(\w+)$~',$v,$q)) {return $this->_syntax_error('Parse error in Function header.');}
    655. 

  655.      $args_names[] = $q[1];
    656. 

  656.     }
    657. 

  657.     $args_s = '';
    658. 

  658.     foreach ($args_names as $k => $v)
    659. 

  659.     {
    660. 

  660.      $args_s .= '$args[\''.$v.'\'],';
    661. 

  661.     }
    662. 

  662.     $args_s = rtrim($args_s,',');
    663. 

  663.     $return = '<?php'
    664. 

  664. 			  ."\n".'function quicky_function_'.$g[1].' ($args,$quicky)'
    665. 

  665. 			  ."\n".'{'
    666. 

  666. 			  ."\n".'$var = &$quicky->_tpl_vars;'
    667. 

  667. 			  ."\n".'$save_vars = array('.$args_s.');';
    668. 

  668.     foreach ($args as $k => $v)
    669. 

  669.     {
    670. 

  670.      $return .= "\n".'if (isset($args[\''.$args_names[$k].'\'])) {$var[\''.$args_names[$k].'\'] = $args[\''.$args_names[$k].'\'];}'.
    671. 

  671. 				"\n".'elseif (isset($args['.$k.'])) {$var[\''.$args_names[$k].'\'] = $args['.$k.'];}';
    672. 

  672. 	  }
    673. 

  673. 	  $return  .= 
    674. 

  674. 			  "\n".'$config = &$quicky->_tpl_config;'
    675. 

  675. 			  ."\n".'$capture = &$quicky->_block_props[\'capture\'];'
    676. 

  676. 			  ."\n".'$foreach = &$quicky->_block_props[\'foreach\'];'
    677. 

  677. 			  ."\n".'$section = &$quicky->_block_props[\'section\'];'
    678. 

  678. 			  ."\n?>";
    679. 

  679.     $this->template_defined_functions[] = $g[1];
    680. 

  680.     $return .= $this->_tag_token($block_content,$block_name)
    681. 

  681. 			  ."\n".'<?php list('.$args_s.') = $save_vars;'
    682. 

  682. 			  ."\n".'} ?>';
    683. 

  683.    }
    684. 

  684.    elseif ($block_name == 'while')
    685. 

  685.    {
    686. 

  686.     $expr = $this->_expr_token($mixed[2]);
    687. 

  687.     if (trim($expr) === '') {return $this->_syntax_error('Missing expression in while tag.');}
    688. 

  688.     $return = '<?php'
    689. 

  689. 			  ."\n".'while ('.$expr.'): ?>'
    690. 

  690. 			  .$this->_tag_token($block_content,$block_name)
    691. 

  691. 			  .'<?php endwhile; ?>';
    692. 

  692.    }
    693. 

  693.    elseif ($block_name == 'switch')
    694. 

  694.    {
    695. 

  695.     $expr = $this->_expr_token($mixed[2]);
    696. 

  696.     if (trim($expr) === '') {return $this->_syntax_error('Missing expression in switch tag.');}
    697. 

  697.     $block = $this->_tag_token($block_content,$block_name);
    698. 

  698.     $block = ltrim($block);
    699. 

  699.     $return = '<?php'
    700. 

  700. 			  ."\n".'switch ('.$expr.'): ?>'
    701. 

  701. 			  .$block
    702. 

  702. 			  .'<?php endswitch; ?>';
    703. 

  703.    }
    704. 

  704.    elseif ($block_name == 'section')
    705. 

  705.    {
    706. 

  706.     $block_params = $this->_parse_params($mixed[2]);
    707. 

  707.     if (!isset($block_params['name'])) {return $this->_syntax_error('Missing parameter \'name\' in section tag.');}
    708. 

  708.     if (!isset($block_params['loop'])) {return $this->_syntax_error('Missing parameter \'loop\' in section tag.');}
    709. 

  709.     else {$block_params['loop'] = $this->_dequote($block_params['loop']);}
    710. 

  710.     if (!isset($block_params['start'])) {$block_params['start'] = '0';}
    711. 

  711.     else {$block_params['start'] = $this->_dequote($block_params['start']);}
    712. 

  712.     if (!isset($block_params['max'])) {$block_params['max'] = '-1';}
    713. 

  713.     else {$block_params['max'] = $this->_dequote($block_params['max']);}
    714. 

  714.      if (!isset($block_params['step'])) {$block_params['step'] = '1';}
    715. 

  715.     else {$block_params['step'] = $this->_dequote($block_params['step']);}
    716. 

  716.     $name = $this->_dequote($block_params['name']);
    717. 

  717.     $props = array('index','index_prev','index_next','iteration','first','last','rownum','loop','show','total');
    718. 

  718.     if (in_array($name,$props)) {return $this->_syntax_error('Disallowed value (\''.$block_params['name'].'\') of parameter \'name\' in section tag.');}
    719. 

  719.     $props[] = $name;
    720. 

  720.     $a = $this->block_props;
    721. 

  721.     $this->push_block_props($props,$block_name,$name);
    722. 

  722.     $block = $this->_tag_token($block_content,$block_name);
    723. 

  723.     $this->block_props = $a;
    724. 

  724.     $name = var_export($name,TRUE);
    725. 

  725.     $return =  '<?php'
    726. 

  726. 				."\n".'$section['.$name.'] = array();'
    727. 

  727. 			    ."\n".'$section['.$name.'][\'s\'] = '.(isInteger($block_params['loop'])?$block_params['loop']:'isInteger('.$block_params['loop'].')?'.$block_params['loop'].':sizeof('.$block_params['loop'].')').';'
    728. 

  728. 			    ."\n".'$section['.$name.'][\'st\'] = '.(isInteger($block_params['start'])?$block_params['start']:'isInteger('.$block_params['start'].')?'.$block_params['start'].':sizeof('.$block_params['start'].')').';'
    729. 

  729. 			    ."\n".'$section['.$name.'][\'step\'] = '.(isInteger($block_params['step'])?$block_params['step']:'isInteger('.$block_params['step'].')?'.$block_params['step'].':sizeof('.$block_params['step'].')').';'
    730. 

  730. 				."\n".'if ($section['.$name.'][\'s\'] > 0):'
    731. 

  731. 				.' for ($section['.$name.'][\'i\'] = 0; $section['.$name.'][\'i\'] < $section['.$name.'][\'s\']-$section['.$name.'][\'st\']'.($block_params['max'] != '-1'?' and $section['.$name.'][\'i\'] < '.$block_params['max']:'').'; ++$section['.$name.'][\'i\']): '
    732. 

  732. 				.'?>'.$block;
    733. 

  733.     if (($k = array_search('sectionelse',$this->_tag_stacks[$this->_tag_stack_n])) !== FALSE)
    734. 

  734.     {
    735. 

  735.      $return .= '<?php endif; ?>';
    736. 

  736.      unset($this->_tag_stacks[$this->_tag_stack_n][$k]);
    737. 

  737.     }
    738. 

  738.     else {$return .= '<?php endfor; endif; ?>';}
    739. 

  739.    }
    740. 

  740.    elseif ($block_name == 'literal') {$return = $block_content;}
    741. 

  741.    elseif ($block_name == 'strip')
    742. 

  742.    {
    743. 

  743.     $block_content = preg_replace('~[\t ]*[\r\n]+[\t ]*~','',$block_content);
    744. 

  744.     $return = $this->_tag_token($block_content,$block_name);
    745. 

  745.    }
    746. 

  746.    elseif ($block_name == 'php')
    747. 

  747.    {
    748. 

  748.     if (!isset($this->prefs['allow_php_native'])) {return $this->_syntax_error('Disallowed PHP-tag');}
    749. 

  749.     $return = '<?php '.$block_content.' ?>';
    750. 

  750.    }
    751. 

  751.    elseif ($block_name == 'capture')
    752. 

  752.    {
    753. 

  753.     $block_params = $this->_parse_params($mixed[2]);
    754. 

  754.     $name = isset($block_params['name'])?trim($this->_dequote($block_params['name'])):'default';
    755. 

  755.     $assign = isset($block_params['assign'])?trim($this->_dequote($block_params['assign'])):'';
    756. 

  756.     if (is_int(array_search('ob',$block_params))) {$return = '<?php ob_start(); ?>'.$this->_tag_token($block_content,$block_name).'<?php $capture[\''.$name.'\'] = ob_get_contents(); ob_end_clean();'.($assign !== ''?' $var[\''.$assign.'\'] = $capture[\''.$name.'\'];':'').' ?>';}
    757. 

  757.     else
    758. 

  758.     {
    759. 

  759.      $old_write_out_to = $this->_write_out_to;
    760. 

  760.      $this->_write_out_to = '$capture[\''.$name.'\']';
    761. 

  761.      $block = $this->_tag_token($block_content,$block_name);
    762. 

  762.      $block = $this->_optimize($block);
    763. 

  763.      $return = '<?php $capture[\''.$name.'\'] = \'\';'."\n".$block
    764. 

  764.      .($assign !== ''?'$var[\''.$assign.'\'] = $capture[\''.$name.'\'];':'').' ?>';
    765. 

  765.      $this->_write_out_to = $old_write_out_to;
    766. 

  766.     }
    767. 

  767.    }
    768. 

  768.    elseif ($block_name == 'dynamic')
    769. 

  769.    {
    770. 

  770.     $return = '<?php /*'.UNIQUE_HASH_STATIC.'{dynamic}*/ ?>'.$this->_tag_token($block_content,$block_name).'<?php /*{/dynamic}'.UNIQUE_HASH_STATIC.'*/ ?>';
    771. 

  771.    }
    772. 

  772.    elseif (preg_match('~^\w+$~',$block_name) && (function_exists('quicky_block_'.$block_name) || file_exists($p = QUICKY_DIR.'plugins/block.'.$block_name.'.php')))
    773. 

  773.    {
    774. 

  774.     $block_params = $this->_parse_params($mixed[2]);
    775. 

  775.     require_once $p;
    776. 

  776.     $a = 'quicky_block_'.$block_name;
    777. 

  777.     return $a($block_params,$block_content,$this);
    778. 

  778.    }
    779. 

  779.    elseif ($block_name == 'select')
    780. 

  780.    {
    781. 

  781.     $block_params = $this->_parse_params($mixed[2]);
    782. 

  782.     $this->_tag_stacks[$this->_tag_stack_n]['type'] = $block_name;
    783. 

  783.     $this->_tag_stacks[$this->_tag_stack_n]['value'] = isset($block_params['value'])?$block_params['value']:'';
    784. 

  784.     unset($block_params['value']);
    785. 

  785.     if (isset($block_params['join']))
    786. 

  786.     {
    787. 

  787.      $fieldname = $this->_dequote($block_params['join']);
    788. 

  788.      if (!isset($this->block_props['form'])) {return $this->_syntax_error('Parameter \'join\' in tag select must be into a form.');}
    789. 

  789.      $form = Quicky_form::$forms[$this->block_props['form'][0]];
    790. 

  790.      if (!isset($form->elements->$fieldname)) {return $this->_syntax_error('There are no field \''.$fieldname.'\' in form \''.$form->name.'\'');}
    791. 

  791.      unset($block_params['join']);
    792. 

  792.      foreach ($form->elements->$fieldname as $k => $v)
    793. 

  793.      {
    794. 

  794.       if ($k == 'elements') {continue;}
    795. 

  795.       if (substr($k,0,1) != '_' and !isset($params[$k])) {$block_params[$k] = var_export($v,TRUE);}
    796. 

  796.      }
    797. 

  797.      foreach ($form->elements->$fieldname->elements as $k => $v)
    798. 

  798.      {
    799. 

  799.       $t = gettype($v);
    800. 

  800.       if ($t == 'string') {$block_content .= '{option text=\''.$this->escape_string($v).'\'}'."\n";}
    801. 

  801.       elseif ($t == 'array' or $t == 'object')
    802. 

  802.       {
    803. 

  803.        if ($t == 'array') {$v = (object) $v;}
    804. 

  804.        $type = isset($v->type)?$v->type:'option';
    805. 

  805.        unset($v->type);
    806. 

  806.        if ($type != 'option' and $type != 'optgroup') {return $this->_syntax_error('Unexcepted type of dropdown\'s child element: \''.$type.'\'');}
    807. 

  807.        $s = '';
    808. 

  808.        foreach ($v as $h => $b)
    809. 

  809.        {
    810. 

  810.         $s .= $h.'=\''.$this->escape_string($b).'\' ';
    811. 

  811.        }
    812. 

  812.        $block_content .= '{'.$type.' '.rtrim($s,' ').'}'."\n";
    813. 

  813.       }
    814. 

  814.      }
    815. 

  815.     }
    816. 

  816.     $s = '';
    817. 

  817.     foreach ($block_params as $k => $v)
    818. 

  818.     {
    819. 

  819.      if ($k == 'type') {continue;}
    820. 

  820.      if (strpos($v,'$') !== FALSE) {$s .= ' '.$k.'="<?php echo htmlspecialchars('.$v.',ENT_QUOTES); ?>"';}
    821. 

  821.      else {$s .= ' '.$k.'="'.htmlspecialchars($this->_dequote($v,ENT_QUOTES)).'"';}
    822. 

  822.     }
    823. 

  823.     $return = '<select'.$s.'>'.$this->_tag_token($block_content,$block_name).'</select>';
    824. 

  824.    }
    825. 

  825.    elseif ($block_name == 'begin')
    826. 

  826.    {
    827. 

  827.     $name = trim($mixed[2]);
    828. 

  828.     $this->_tag_stacks[$this->_tag_stack_n]['type'] = 'begin';
    829. 

  829.     $this->_tag_stacks[$this->_tag_stack_n]['name'] = $name;
    830. 

  830.     $fullpath = '/';
    831. 

  831.     $tk = 0;
    832. 

  832.     for ($i = sizeof($this->_tag_stacks)-1; $i >= 0; $i--)
    833. 

  833.     {
    834. 

  834.      if (isset($this->_tag_stacks[$i]['type']) && $this->_tag_stacks[$i]['type'] == 'begin') {$fullpath = '/'.$this->_tag_stacks[$i]['name'].$fullpath; ++$tk;}
    835. 

  835.     }
    836. 

  836.     $s_name = var_export($name,TRUE);
    837. 

  837.     $s_fullpath = var_export($fullpath,TRUE);
    838. 

  838.     $sf_name = 'quicky_context_'.$name;
    839. 

  839.     $old_write_out_to = $this->_write_out_to;
    840. 

  840.     $this->_write_out_to = '$return';
    841. 

  841.     $block = $this->_tag_token($block_content,$block_name);
    842. 

  842.     $block = $this->_optimize($block);
    843. 

  843.     $this->_write_out_to = $old_write_out_to;
    844. 

  844.     $return = '<?php'
    845. 

  845. 							."\n".'if (!function_exists(\''.$sf_name.'\')) {function '.$sf_name.' () {$var = &Quicky::$obj->_tpl_vars; $return = \'\';'
    846. 

  846. 							."\n".'if (isset(Quicky::$obj->_contexts_data['.$s_fullpath.']) and sizeof(Quicky::$obj->_contexts_data['.$s_fullpath.']) > 0) {'
    847. 

  847. 							."\n".'$old = $var;'
    848. 

  848. 							."\n".'foreach (Quicky::$obj->_contexts_data['.$s_fullpath.'] as $k => $v):'
    849. 

  849. 							."\n".'$var = array_merge($var,$v);'
    850. 

  850. 							.$block
    851. 

  851. 							.'endforeach; $var = $old;} return $return; }} '.($tk > 1?'$return .=':'echo').' '.$sf_name.'(); ?>';
    852. 

  852.    }
    853. 

  853.    else {return $this->_syntax_error('Unrecognized block-type \''.$block_name.'\'');}
    854. 

  854.    unset($this->_tag_stacks[$this->_tag_stack_n]);
    855. 

  855.    --$this->_tag_stack_n;
    856. 

  856.    return $return;
    857. 

  857.   }
    858. 

  858.   $blocks = array_values($this->blocks);
    859. 

  859.   for ($i = 0,$s = sizeof($blocks); $i < $s; $i++) {$blocks[$i] = preg_quote($blocks[$i],'~');}
    860. 

  860.   $blocks[] = 'foreach';
    861. 

  861.   $blocks[] = 'section';
    862. 

  862.   $blocks[] = 'for';
    863. 

  863.   $blocks[] = 'while';
    864. 

  864.   $blocks[] = 'switch';
    865. 

  865.   $blocks[] = 'literal';
    866. 

  866.   $blocks[] = 'capture';
    867. 

  867.   $blocks[] = 'php';
    868. 

  868.   $blocks[] = 'strip';
    869. 

  869.   $blocks[] = 'textformat';
    870. 

  870.   $blocks[] = 'dynamic';
    871. 

  871.   $blocks[] = 'select';
    872. 

  872.   $blocks[] = 'joincalculator';
    873. 

  873.   $blocks[] = 'function|helper';
    874. 

  874.   $blocks[] = 'form';
    875. 

  875.   $blocks[] = '_if|_foreach';
    876. 

  876.   $ldelim = preg_quote($this->left_delimiter,'~');
    877. 

  877.   $rdelim = preg_quote($this->right_delimiter,'~');
    878. 

  878.   $return = preg_replace_callback('~'
    879. 

  879. 								.'\{\{?\s*(begin)(?:\s+(.*?))?\}\}?((?:(?R)|.)*?)\{\{?\s*(?:end(?:\s+\2)?)?\s*\}\}?'
    880. 

  880. 								.'|\{\{(\\??(?:[^'.$rdelim.'\'"]*([\'"]).*?(?<!\\\\)\5)*.*?)\}\}'
    881. 

  881. 								.'|'.$ldelim.'\s*('.implode('|',$blocks).')(\s(?:[^'.$rdelim.'\'"]*([\'"]).*?(?<!\\\\)\8)*.*?)?'.$rdelim.'((?:(?R)|.)*?)'.$ldelim.'/\s*\6?\s*'.$rdelim
    882. 

  882. 								.'|'.$ldelim.'(\\??(?:[^'.$rdelim.'\'"]*([\'"]).*?(?<!\\\\)\11)*.*?)'.$rdelim
    883. 

  883. 								.'~si',array($this,'_tag_token'),$mixed);								
    884. 

  884.   return $return;
    885. 

  885.  }
    886. 

  886.  function _var_token($token)
    887. 

  887.  {
    888. 

  888.   preg_match_all($a = '~([\'"]).*?(?<!\\\\)\1|\(((?:(?R)|.)*?)\)|->((?:_?[\$#]?\w*(?:\(((?:(?R)|.)*?)\)|(\\[((?:(?R)|(?:[^\\]\'"]*([\'"]).*?(?<!\\\\)\4)*.*?))*?\\]|\.[\$#]?\w+#?|(?!a)a->\w*(?:\(((?:(?R)|.)*?)\))?)?)?)+)~',$token,$properties,PREG_SET_ORDER);
    889. 

  889.   $token = preg_replace_callback($a,create_function('$m','if (!isset($m[3])) {return $m[0];} return \'\';'),$token);
    890. 

  890.   $obj_appendix = '';
    891. 

  891.   for ($i = 0,$s = sizeof($properties); $i < $s; $i++)
    892. 

  892.   {
    893. 

  893.    if (isset($properties[$i][3]))
    894. 

  894.    {
    895. 

  895.     $plain = FALSE;
    896. 

  896.     preg_match('~^((?:_?[\$#])?\w+#?)(.*)$~',$properties[$i][3],$q);
    897. 

  897.     if (preg_match('~^_?[\$#]~',$q[1]))
    898. 

  898.     {
    899. 

  899.      if (substr($q[1],0,1) == '_') {$plain = TRUE; $q[1] = substr($q[1],1);}
    900. 

  900.      $q[1] = $this->_var_token($q[1]);
    901. 

  901.      if ($plain) {$q[1] = $this->_fetch_expr($q[1]);}
    902. 

  902.     }
    903. 

  903.     $obj_appendix .= '->'.$q[1];
    904. 

  904.     preg_match_all('~(\\[((?:(?R)|(?:[^\\]\'"]*([\'"]).*?(?<!\\\\)\3)*.*?))*?\\]|\.[\$#]?\w+#?)~',$q[2],$w,PREG_SET_ORDER);
    905. 

  905.     for ($j = 0,$n = sizeof($w); $j < $n; $j++)
    906. 

  906.     {
    907. 

  907.      if (substr($w[$j][1],0,1) == '.')
    908. 

  908.      {
    909. 

  909.       $expr = substr($w[$j][1],1);
    910. 

  910.       if (!isset($this->block_props[$expr]))
    911. 

  911.       {
    912. 

  912.        $expr = '"'.$expr.'"';
    913. 

  913.        $instring = TRUE;
    914. 

  914.       }
    915. 

  915.       else {$instring = FALSE;}
    916. 

  916.      }
    917. 

  917.      else {$expr = substr($w[$j][1],1,-1); $instring = FALSE;}
    918. 

  918.      $r = $this->_expr_token($expr,$instring);
    919. 

  919.      $obj_appendix .= '['.(preg_match('~^\w+$~',$r)?'\''.$r.'\'':$r).']';
    920. 

  920.     }
    921. 

  921.     if (isset($properties[$i][4]) && ($properties[$i][4] !== '' || !isset($properties[$i][5])))
    922. 

  922.     {
    923. 

  923.      $params = $this->_expr_token_parse_params($properties[$i][4]);
    924. 

  924.      $obj_appendix .= '('.implode(',',$params).')';
    925. 

  925.     }
    926. 

  926.    }
    927. 

  927.   }
    928. 

  928.   if (is_numeric($token)) {return $token;}
    929. 

  929.   if (substr($token,0,1) == '#' or substr($token,0,1) == '$' or (isset($this->block_props[$token]) and !$this->_no_magic))
    930. 

  930.   {
    931. 

  931.    $this->_no_magic = preg_match('~^\$(?:quicky|smarty)[\.\[]~i',$token);
    932. 

  932.    preg_match_all('~([\$#]?\w*#?)(\\[((?:(?R)|(?:[^\\]\'"]*([\'"]).*?(?<!\\\\)\4)*.*?))*?\\]|\.[\$#]?\w+#?|->\w*(?:\(((?:(?R)|.)*?)\))?)~',$token,$w,PREG_SET_ORDER);
    933. 

  933.    $appendix_set = array();
    934. 

  934.    for ($i = 0,$s = sizeof($w); $i < $s; $i++)
    935. 

  935.    {
    936. 

  936.     if ($w[$i][1] !== '') {$token = $w[$i][1];}
    937. 

  937.     if (substr($w[$i][2],0,1) == '.')
    938. 

  938.     {
    939. 

  939.      $expr = substr($w[$i][2],1);
    940. 

  940.      if (!isset($this->block_props[$expr]))
    941. 

  941.      {
    942. 

  942.       $expr = '"'.$expr.'"';
    943. 

  943.       $instring = TRUE;
    944. 

  944.      }
    945. 

  945.      else {$instring = FALSE;}
    946. 

  946.     }
    947. 

  947.     else {$expr = substr($w[$i][2],1,-1); $instring = FALSE;}
    948. 

  948.     $r = $this->_expr_token($expr,$instring);
    949. 

  949.     $appendix_set[] = preg_match('~^\w+$~',$r)?'\''.$r.'\'':$r;
    950. 

  950.    }
    951. 

  951.    $this->_no_magic = FALSE;
    952. 

  952.   }
    953. 

  953.   static $operators = array('or','xor','and','true','false','null');
    954. 

  954.   $mode = 0;
    955. 

  955.   $mode_special_var = FALSE;
    956. 

  956.   if (substr($token,0,1) == '\'' or substr($token,0,1) == '"')
    957. 

  957.   {
    958. 

  958.    if (substr($token,-1) != $token[0]) {return $this->_syntax_error('Bad string definition.');}
    959. 

  959.    if ($token[0] == '"') {return $this->_expr_token($token,TRUE);}
    960. 

  960.    return var_export($this->_dequote($token),TRUE);
    961. 

  961.   }
    962. 

  962.   elseif ($token == '$tplpath') {return '$path';}
    963. 

  963.   elseif ($token == '$tplpathdir') {return '$dir';}
    964. 

  964.   elseif ($token == '$rdelim') {return var_export($this->right_delimiter,TRUE);}
    965. 

  965.   elseif ($token == '$ldelim') {return var_export($this->left_delimiter,TRUE);}
    966. 

  966.   elseif ($token == '$SCRIPT_NAME') {return '$_SERVER[\'SCRIPT_NAME\']';}
    967. 

  967.   elseif ($token[0] == '$')
    968. 

  968.   {
    969. 

  969.    $token = substr($token,1);
    970. 

  970.    if (array_key_exists($token,$this->precompiled_vars)) {return var_export($this->precompiled_vars[$token],TRUE);}
    971. 

  971.    $type = 'var';
    972. 

  972.    if (strtolower($token) == 'quicky' || strtolower($token) == 'smarty')
    973. 

  973.    {
    974. 

  974.     $t = isset($appendix_set[0])?strtolower($this->_dequote($appendix_set[0])):'';
    975. 

  975.     $appendix_set = array_slice($appendix_set,1);
    976. 

  976.     $type = '';
    977. 

  977.     if ($t == 'rdelim') {return var_export($this->right_delimiter,TRUE);}
    978. 

  978.     elseif ($t == 'ldelim') {return var_export($this->left_delimiter,TRUE);}
    979. 

  979. 

  980.     elseif ($t == 'request') {$type = '_REQUEST'; $mode = 1;}
    981. 

  981.     elseif ($t == 'tplscope') {$type = 'var'; $mode = 1;}
    982. 

  982.     elseif ($t == 'cfgscope') {$type = 'config'; $mode = 1;}
    983. 

  983.     elseif ($t == 'get') {$type = '_GET'; $mode = 1;}
    984. 

  984.     elseif ($t == 'post') {$type = '_POST'; $mode = 1;}
    985. 

  985.     elseif ($t == 'cookie' or $t == 'cookies') {$type = '_COOKIE'; $mode = 1;}
    986. 

  986. 

  987.     elseif ($t == 'requeststring') {$type = '_REQUEST'; $mode = 2;}
    988. 

  988.     elseif ($t == 'getstring') {$type = '_GET'; $mode = 2;}
    989. 

  989.     elseif ($t == 'poststring') {$type = '_POST'; $mode = 2;}
    990. 

  990.     elseif ($t == 'cookiestring' or $t == 'cookiesstring') {$type = '_COOKIE'; $mode = 2;}
    991. 

  991. 

  992.     elseif ($t == 'session') {$type = '_SESSION';}
    993. 

  993.     elseif ($t == 'server') {$type = '_SERVER';}
    994. 

  994.     elseif ($t == 'env') {$type = '_ENV';}
    995. 

  995.     elseif ($t == 'capture') {$type = 'capture';}
    996. 

  996.     elseif ($t == 'now') {return 'time()';}
    997. 

  997.     elseif ($t == 'const') {return 'constant('.(isset($appendix_set[0])?$appendix_set[0]:'').')';}
    998. 

  998.     elseif ($t == 'template') {return '$path';}
    999. 

  999.     elseif ($t == 'version') {return '$this->version';}
    1000. 

  1000.     elseif ($t == 'foreach' or $t == 'section')
    1001. 

  1001.     {
    1002. 

  1002.      $name = isset($appendix_set[0])?strtolower($this->_dequote($appendix_set[0])):'';
    1003. 

  1003.      $prop = isset($appendix_set[1])?strtolower($this->_dequote($appendix_set[1])):'';
    1004. 

  1004.      return $this->_get_expr_blockprop($name,$t,$prop);
    1005. 

  1005.     }
    1006. 

  1006.     else {return $this->_syntax_error('Unknown property \''.$t.'\' of $quicky');}
    1007. 

  1007.     $token = '';
    1008. 

  1008.    }
    1009. 

  1009.   }
    1010. 

  1010.   elseif (substr($token,0,1) == '#')
    1011. 

  1011.   {
    1012. 

  1012.    if (substr($token,-1) != '#') {return var_export($token,TRUE);}
    1013. 

  1013.    $type = 'config'; $token = substr($token,1,-1);
    1014. 

  1014.   }
    1015. 

  1015.   elseif ($token == 'tplpath') {return var_export($this->template_from,TRUE);}
    1016. 

  1016.   elseif ($token == 'tplpathdir') {$a = dirname($this->template_from); return var_export($a !== ''?$a:'.',TRUE);}
    1017. 

  1017.   elseif ($token == 'rdelim') {return var_export($this->right_delimiter,TRUE);}
    1018. 

  1018.   elseif ($token == 'ldelim') {return var_export($this->left_delimiter,TRUE);}
    1019. 

  1019.   elseif (isset($this->block_props[$token]) and !$this->_no_magic)
    1020. 

  1020.   {
    1021. 

  1021.    $return = $this->_get_expr_blockprop($this->block_props[$token][0],$this->block_props[$token][1],$token);
    1022. 

  1022.    $mode_special_var = TRUE;
    1023. 

  1023.   }
    1024. 

  1024.   elseif (isset($this->block_props[$token])) {return $token;}
    1025. 

  1025.   elseif (in_array($token,$this->allowed_php_constants) || in_array(strtolower($token),$operators) || (defined($token) && preg_match('~^M_\w+$~',$token))) {return $token;}
    1026. 

  1026.   elseif (preg_match('~^\w+$~',$token))
    1027. 

  1027.   {
    1028. 

  1028.    if ($this->_cast_undefined_token_to_strings) {return var_export($token,TRUE);}
    1029. 

  1029.    return $this->_syntax_error('Unexpected constant \''.$token.'\'');
    1030. 

  1030.   }
    1031. 

  1031.   else {return $this->_syntax_error('Unrecognized token \''.$token.'\'');}
    1032. 

  1032.   $appendix = '';
    1033. 

  1033.   for ($i = 0,$s = sizeof($appendix_set); $i < $s; $i++) {$appendix .= '['.$appendix_set[$i].']';}
    1034. 

  1034.   if ($mode_special_var) {return $return.$appendix.$obj_appendix;}
    1035. 

  1035.   $return = '$'.$type.($token !== ''?'['.var_export($token,TRUE).']':'').$appendix.$obj_appendix;
    1036. 

  1036.   if ($mode == 2) {$return = 'gpcvar_strnull('.$return.')';}
    1037. 

  1037.   return $return;
    1038. 

  1038.  }
    1039. 

  1039.  function _expr_token_parse_params($expr)
    1040. 

  1040.  { // This function without regular expressions just for fun
    1041. 

  1041.   $params = array();
    1042. 

  1042.   $cpos = 0;
    1043. 

  1043.   $instring = FALSE;
    1044. 

  1044.   $instring_delim = '';
    1045. 

  1045.   $bnl = 0;
    1046. 

  1046.   $size = strlen($expr);
    1047. 

  1047.   $param = '';
    1048. 

  1048.   while ($cpos <= $size)
    1049. 

  1049.   {
    1050. 

  1050.    if ($cpos == $size) {$params[] = $this->_expr_token($param); break;}
    1051. 

  1051.    $char = $expr[$cpos];
    1052. 

  1052.    if (!$instring)
    1053. 

  1053.    {
    1054. 

  1054.     if ($char == '"' or $char == '\'') {$instring = TRUE; $instring_delim = $char;}
    1055. 

  1055.     elseif ($char == '(') {$bnl++;}
    1056. 

  1056.     elseif ($char == ')') {$bnl--;}
    1057. 

  1057.    }
    1058. 

  1058.    else
    1059. 

  1059.    {
    1060. 

  1060.     if ($char == $instring_delim and $expr[$cpos-1] != '\\') {$instring = FALSE;}
    1061. 

  1061.    }
    1062. 

  1062.    if (!$instring and $bnl == 0 and $char == ',') {$params[] = $this->_expr_token($param); $param = '';}
    1063. 

  1063.    else {$param .= $char;}
    1064. 

  1064.    $cpos++;
    1065. 

  1065.   }
    1066. 

  1066.   return $params;
    1067. 

  1067.  }
    1068. 

  1068.  function _expr_token_callback($m)
    1069. 

  1069.  {
    1070. 

  1070.   if (isset($m[13]) and $m[13] !== '')
    1071. 

  1071.   {
    1072. 

  1072.    preg_match('~^(\s*)(.*)(\s*)$~',$m[13],$q);
    1073. 

  1073.    $lspace = $q[1];
    1074. 

  1074.    $operator = $q[2];
    1075. 

  1075.    $rspace = $q[3];
    1076. 

  1076.    $operator = trim(preg_replace('~\s+~',' ',strtolower($operator)));
    1077. 

  1077.    if ($operator == 'eq' or $operator == 'is') {$code = '==';}
    1078. 

  1078.    elseif ($operator == 'ne' || $operator == 'neq') {$code = '!=';}
    1079. 

  1079.    elseif ($operator == 'gt') {$code = '>';}
    1080. 

  1080.    elseif ($operator == 'lt') {$code = '<';}
    1081. 

  1081.    elseif ($operator == 'ge' || $operator == 'gte') {$code = '>=';}
    1082. 

  1082.    elseif ($operator == 'le' || $operator == 'lte') {$code = '<=';}
    1083. 

  1083.    elseif ($operator == 'not') {$code = '!'; $rspace = '';}
    1084. 

  1084.    elseif ($operator == 'mod') {$code = '%';}
    1085. 

  1085.    elseif ($operator == 'not eq' or $operator == 'is not') {$code = '!=';}
    1086. 

  1086.    else {return $this->_syntax_error('Unknown operator '.var_export($operator,TRUE));}
    1087. 

  1087.    return $code;
    1088. 

  1088.   }
    1089. 

  1089.   elseif (isset($m[3]) and $m[3] !== '' || preg_match('~^(\w+)\s*\(~',$m[1]))
    1090. 

  1090.   {
    1091. 

  1091.    if (preg_match('~^(\w+)\s*\(~',$m[1],$q)) {$func = $q[1];}
    1092. 

  1092.    else {$func = '';}
    1093. 

  1093.    $expr = $m[3];
    1094. 

  1094.    if (trim($func.$expr) == '') {return;}
    1095. 

  1095.    if ($func != '')
    1096. 

  1096.    {
    1097. 

  1097.     $a = strtolower($func);
    1098. 

  1098.     $b = $p = $c = FALSE;
    1099. 

  1099.     foreach ($this->allowed_php_tokens as $i)
    1100. 

  1100.     {
    1101. 

  1101.      if (preg_match($e = '~^'.str_replace('\*','.*',preg_quote($i,'~')).'$~i',$a)) {$b = TRUE; break;}
    1102. 

  1102.     }
    1103. 

  1103.     if (!$b) {$c = in_array($a,$this->template_defined_functions);}
    1104. 

  1104.     if (!$b and !$c)
    1105. 

  1105.     {
    1106. 

  1106.      $y = $this->_alt_tag && !in_array($a,get_class_methods('Quicky'));
    1107. 

  1107.     }
    1108. 

  1108.     if (preg_match('~^\w+$~',$a…
    1109.

Large files files are truncated, but you can click here to view the full file