Creating isso:null-framework global; this can't be accessed through $isso:null-framew...
[isso.git] / template.php
1 <?php
2 /*=====================================================================*\
3 || ###################################################################
4 || # Iris Studios Shared Object Framework [#]version[#]
5 || # Copyright ©2002-[#]year[#] Iris Studios, Inc.
6 || #
7 || # This program is free software; you can redistribute it and/or modify
8 || # it under the terms of the GNU General Public License as published by
9 || # the Free Software Foundation; version [#]gpl[#] of the License.
10 || #
11 || # This program is distributed in the hope that it will be useful, but
12 || # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 || # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
14 || # more details.
15 || #
16 || # You should have received a copy of the GNU General Public License along
17 || # with this program; if not, write to the Free Software Foundation, Inc.,
18 || # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
19 || ###################################################################
20 \*=====================================================================*/
21
22 /**
23 * Database-Driven Template System
24 * template.php
25 *
26 * @package ISSO
27 */
28
29 /**
30 * Database-Driven Template System
31 *
32 * This framework is a backend to the database template engine and
33 * contains all the parsing algorithms.
34 *
35 * @author Iris Studios, Inc.
36 * @copyright Copyright ©2002 - [#]year[#], Iris Studios, Inc.
37 * @version $Revision$
38 * @package ISSO
39 *
40 */
41 class Template
42 {
43 /**
44 * Framework registry object
45 * @var object
46 */
47 var $registry = null;
48
49 /**
50 * Name of the database table templates are in
51 * @var string
52 */
53 var $tablename = '';
54
55 /**
56 * Name of the table column template names are in
57 * @var string
58 */
59 var $namecolumn = '';
60
61 /**
62 * Name of the table column templates are in
63 * @var string
64 */
65 var $datacolumn = '';
66
67 /**
68 * Additional WHERE clauses for the template fetch SQL
69 * @var string
70 */
71 var $extrawhere = '';
72
73 /**
74 * The name of the function phrases are fetched with
75 * @var string
76 */
77 var $langcall = '$GLOBALS[\'isso:null-framework\']->modules[\'localize\']->string';
78
79 /**
80 * The name of the function phrases are sprintf() parsed with
81 * @var string
82 */
83 var $langconst = 'sprintf';
84
85 /**
86 * Array of pre-compiled templates that are stored to decrease server load
87 * @var array
88 */
89 var $cache = array();
90
91 /**
92 * A list of the number of times each template has been used
93 * @var array
94 */
95 var $usage = array();
96
97 /**
98 * A list of templates that weren't cached, but are still used
99 * @var array
100 */
101 var $uncached = array();
102
103 /**
104 * Whether or not the page has been flush()'d already
105 * @var bool
106 */
107 var $doneflush = false;
108
109 /**
110 * Constructor
111 */
112 function Template(&$registry)
113 {
114 $this->registry =& $registry;
115 }
116
117 /**
118 * Takes an array of template names, loads them, and then stores
119 * a parsed version for optimum speed.
120 *
121 * @param array List of template names to be cached
122 */
123 function cache($namearray)
124 {
125 if (sizeof($this->cache) > 0)
126 {
127 trigger_error('You cannot cache templates more than once per initialization', E_USER_WARNING);
128 }
129 else
130 {
131 $templates = $this->registry->modules['db_mysql']->query("SELECT * FROM " . $this->tablename . " WHERE " . $this->namecolumn . " IN ('" . implode("', '", $namearray) . "')" . ($this->extrawhere ? $this->extrawhere : ''));
132 while ($template = $this->registry->modules['db_mysql']->fetch_array($templates))
133 {
134 $this->cache[ $template[ $this->namecolumn ] ] = $this->_parse($template[ $this->datacolumn ]);
135 $this->usage["$name"] = 0;
136 }
137 }
138 }
139
140 /**
141 * Loads a template from the cache or the _load function and
142 * stores the parsed version of it
143 *
144 * @param string The name of the template
145 *
146 * @return string A parsed and loaded template
147 */
148 function fetch($name)
149 {
150 if (isset($this->cache["$name"]))
151 {
152 $template = $this->cache["$name"];
153 }
154 else
155 {
156 $this->uncached[] = $name;
157 $this->registry->debug("Manually loading template `$name`");
158 $template = $this->_load($name);
159 $template = $this->_parse($template);
160 }
161
162 if (!isset($this->usage["$name"]))
163 {
164 $this->usage["$name"] = 0;
165 }
166
167 $this->usage["$name"]++;
168
169 return $template;
170 }
171
172 /**
173 * Output a template fully compiled to the browser
174 *
175 * @param string Compiled and ready template
176 */
177 function flush($template)
178 {
179 ob_start();
180
181 if (empty($template))
182 {
183 trigger_error('There was no output to print', E_USER_ERROR);
184 exit;
185 }
186
187 if ($this->registry->debug AND isset($_GET['query']))
188 {
189 if (is_array($this->registry->modules['db_mysql']->history))
190 {
191 echo '<pre>';
192 foreach ($this->registry->modules['db_mysql']->history AS $query)
193 {
194 echo $query . "\n\n<hr />\n\n";
195 }
196 echo '</pre>';
197 }
198 exit;
199 }
200
201 if ($this->doneflush)
202 {
203 trigger_error('A template has already been sent to the output buffer', E_USER_ERROR);
204 exit;
205 }
206
207 if ($this->registry->debug)
208 {
209 // --- START
210 $debug = "\n<ul>";
211
212 // templates
213 $optlist = array();
214 $usage = array();
215 foreach ($this->usage AS $name => $count)
216 {
217 if (in_array($name, $this->uncached))
218 {
219 $optlist[] = $name . '[' . $count . ']';
220 }
221 $usage[] = $name . " ($count)";
222 }
223
224 $sizeof = sizeof($this->uncached);
225 if ($sizeof > 0)
226 {
227 $debug .= "\n\t<li><strong style=\"color: red\">Uncached Template(s):</strong> $sizeof ( " . implode(' &nbsp; ', $optlist) . " )</li>";
228 }
229
230 // source control
231 $scinfo = 'Not Under Source Control';
232 $possiblescms = array('cvs', 'svn', 'cvs_information', 'svn_information', 'scm', 'sc_information', 'scm_information');
233 foreach ($possiblescms AS $scm)
234 {
235 if (defined(strtoupper($scm)))
236 {
237 $scinfo = constant(strtoupper($scm));
238
239 $type = '';
240 // CVS
241 if (strpos($scinfo, 'RCSfile:') !== false)
242 {
243 $type = 'cvs';
244 }
245 else if (strpos($scinfo, ',v ') !== false)
246 {
247 $type = 'cvs';
248 }
249 // SVN
250 else if (strpos($scinfo, 'URL:') !== false)
251 {
252 $type = 'svn';
253 }
254 else if (strpos($scinfo, 'https://') !== false OR strpos($scinfo, 'http://') !== false)
255 {
256 $type= 'svn';
257 }
258 // not found so just return it
259 // try a SVN ID tag as we can't really tell if we're using it
260 else
261 {
262 $test = preg_replace('#\$' . 'Id: (.+?) (.+?) [0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:[0-9]{2}(.+?) (.+?) \$#', '\\1 - SVN \\2', $scinfo);
263 if ($test == '$' . 'Id: $')
264 {
265 $scinfo = 'Not Under Source Control';
266 }
267 else
268 {
269 $scinfo = $test;
270 }
271 break;
272 }
273
274 if ($type == 'cvs')
275 {
276 $scinfo = preg_replace('#\$' . 'RCSfile: (.+?) \$#', '\\1', $scinfo);
277 $scinfo = preg_replace('#\$' . 'Revision: (.+?) \$#', 'CVS \\1', $scinfo);
278 $scinfo = preg_replace('#\$' . 'Id: (.+?) (.+?) [0-9]{4}/[0-9]{2}/[0-9]{2} [0-9]{2}:[0-9]{2}:[0-9]{2} (.+?) (.+?) \$#', '\\1 - CVS \\2', $scinfo);
279 }
280 else if ($type == 'svn')
281 {
282 $scinfo = preg_replace('#\$' . '(Head)?URL: (.+?) \$#e', "end(explode('/', '\\2'))", $scinfo);
283 $scinfo = preg_replace('#\$' . '(LastModified)?Revision: (.+?) \$#', 'SVN \\2', $scinfo);
284 $scinfo = preg_replace('#\$' . 'Id: (.+?) ([0-9].+?) [0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:[0-9]{2}(.+?) (.+?) \$#', '\\1 - SVN \\2', $scinfo);
285 }
286 else
287 {
288 $scinfo = 'Not Under Source Control';
289 }
290 break;
291 }
292 }
293 $scinfo = trim($scinfo);
294 $debug .= "\n\t<li><strong>Source Control:</strong> $scinfo</li>";
295
296 // query information
297 if (is_object($this->registry->modules['db_mysql']))
298 {
299 $debug .= "\n\t<li><strong>Total Queries:</strong> " . sizeof($this->registry->modules['db_mysql']->history) . " (<a href=\"" . $this->registry->sanitize($_SERVER['REQUEST_URI']) . ((strpos($_SERVER['REQUEST_URI'], '?') !== false) ? '&amp;query=1' : '?query=1') . "\">?</a>)</li>";
300 }
301
302 // total execution time
303 if (defined('ISSO_MT_START'))
304 {
305 $this->registry->load('functions', 'functions');
306 $debug .= "\n\t<li><strong>Total Execution Time:</strong> " . round($this->registry->modules['functions']->fetch_microtime_diff(ISSO_MT_START), 10) . "</li>";
307 }
308
309 // debug notices
310 $debug .= "\n\t<li>\n\t\t<select>\n\t\t\t<option>Debug Notices (" . sizeof($this->registry->debuginfo) . ")</option>";
311 foreach ((array)$this->registry->debuginfo AS $msg)
312 {
313 $debug .= "\n\t\t\t<option>--- $msg</option>";
314 }
315 $debug .= "\n\t\t</select>\n\t</li>";
316
317 // loaded modules
318 $modules = $this->registry->show_modules(true);
319 $debug .= "\n\t<li>\n\t\t<select>\n\t\t\t<option>Loaded Modules (" . sizeof($modules) . ")</option>";
320 foreach ($modules AS $mod)
321 {
322 $debug .= "\n\t\t\t<option>--- $mod</option>";
323 }
324 $debug .= "\n\t\t</select>\n\t</li>";
325
326 // template usage
327 $debug .= "\n\t<li>\n\t\t<select>\n\t\t\t<option>Template Usage (" . array_sum($this->usage) . ")</option>";
328 foreach ($usage AS $tpl)
329 {
330 $debug .= "\n\t\t\t<option>--- $tpl</option>";
331 }
332 $debug .= "\n\t\t</select>\n\t</li>";
333
334 // --- END
335 $debug .= "\n</ul>";
336
337 $debug = "\n<hr />\n" . $this->registry->_message('Debug Information', $debug, 1, true);
338 $template = str_replace('</body>', "\n\n<!-- dev debug -->\n<div align=\"center\">\n$debug\n</div>\n<!-- / dev debug -->\n\n</body>", $template);
339 }
340
341 print(stripslashes($template));
342 }
343
344 /**
345 * Loads an additional template from the database
346 *
347 * @param string The name of the template
348 *
349 * @return string Template data from the database
350 */
351 function _load($name)
352 {
353 if ($template = $this->registry->modules['db_mysql']->query("SELECT * FROM " . $this->tablename . " WHERE " . $this->namecolumn . " = '$name'" . ($this->extrawhere ? $this->extrawhere : '')))
354 {
355 return $template[ $this->datacolumn ];
356 }
357 else
358 {
359 trigger_error("The template '$name' could not be loaded", E_USER_ERROR);
360 exit;
361 }
362 }
363
364 /**
365 * A wrapper for all the parsing functions and compiling functins
366 *
367 * @param string Unparsed template data
368 *
369 * @return string Parsed template data
370 */
371 function _parse($template)
372 {
373 $template = stripslashes($template);
374 $template = str_replace('"', '\"', $template);
375 $template = $this->_parse_phrases($template);
376 $template = $this->_parse_conditionals($template);
377 return $template;
378 }
379
380 /**
381 * Prepares language and locale information inside templates
382 *
383 * @param string Template data to be processed
384 *
385 * @return string Language-ready template data
386 */
387 function _parse_phrases($template)
388 {
389 $tag_start = '<lang ';
390 $tag_start_end = '\">';
391 $tag_end = '</lang>';
392
393 $location_start = -1;
394 $location_end = -1;
395
396 // Process the empty phrase objects -- do this now so we don't have to worry about it when we're parsing later
397 $template = preg_replace('#\{@\\\"(.*?)\\\"\}#i', '" . ' . $this->langcall . '(\'$1\') . "', $template);
398
399 while (1)
400 {
401 // Find the start language object tag
402 $location_start = strpos($template, $tag_start, $location_end + 1);
403 if ($location_start === false)
404 {
405 break;
406 }
407
408 // Find the end tag
409 $location_end = strpos($template, $tag_end, $location_end + strlen($tag_end));
410 if ($location_end === false)
411 {
412 break;
413 }
414
415 // Extract the language object
416 $phrase_bunch = substr($template, $location_start, ($location_end + strlen($tag_end)) - $location_start);
417
418 // Find the close to the opening <lang>
419 $close_of_open = strpos($phrase_bunch, $tag_start_end);
420 if ($close_of_open === false)
421 {
422 break;
423 }
424
425 // Extract the opening tag so it can be parsed
426 $init_tag = substr($phrase_bunch, 0, ($close_of_open + strlen($tag_start_end)));
427 $init_tag = str_replace($tag_start, '', $init_tag);
428 $init_tag = substr($init_tag, 0, strlen($init_tag) - 1);
429
430 // Get the args out of the tag
431 $args = preg_split('#([0-9].*?)=#', $init_tag);
432 foreach ($args AS $arg)
433 {
434 if ($arg AND $arg != ' ')
435 {
436 $arg = trim($arg);
437 $arg = substr($arg, 2);
438 $arg = substr($arg, 0, strlen($arg) - 2);
439 $arglist[] = $arg;
440 }
441 }
442
443 // Just get the phrase name
444 $phrase_name = preg_replace('#<lang(.*?)>(.*?)</lang>#i', '$2', $phrase_bunch);
445
446 // Wrap the parsed data into the build function
447 $function_wrap = '" . ' . $this->langconst . '("' . $phrase_name . '", "' . implode('", "', $arglist) . '") . "';
448
449 // Replace the fully-parsed string back into the template
450 $template = substr_replace($template, $function_wrap, $location_start, $location_end + strlen($tag_end) - $location_start);
451
452 unset($arglist);
453 }
454
455 return $template;
456 }
457
458 /**
459 * Parser for in-line template conditionals
460 *
461 * @param string Template data awaiting processing
462 *
463 * @return string Parsed template data
464 */
465 function _parse_conditionals($template)
466 {
467 // tag data
468 $tag_start = '<if condition=\"';
469 $tag_start_end = '\">';
470 $tag_else = '<else />';
471 $tag_end = '</if>';
472
473 // tag stack
474 $stack = array();
475
476 // the information about the current active tag
477 $tag_full = array();
478 $parsed = array();
479
480 // start at 0
481 $offset = 0;
482
483 while (1)
484 {
485 if (strpos($template, $tag_start) === false)
486 {
487 break;
488 }
489
490 for ($i = $offset; $i < strlen($template); $i++)
491 {
492 // we've found ourselves a conditional!
493 if (substr($template, $i, strlen($tag_start)) == $tag_start)
494 {
495 // push the position into the tag stack
496 if ($tag_full)
497 {
498 array_push($stack, $i);
499 }
500 else
501 {
502 $tag_full['posi'] = $i;
503 }
504 }
505 // locate else tags
506 else if (substr($template, $i, strlen($tag_else)) == $tag_else)
507 {
508 if (count($stack) == 0 AND !isset($tag_full['else']))
509 {
510 $tag_full['else'] = $i;
511 }
512 }
513 // do we have an end tag?
514 else if (substr($template, $i, strlen($tag_end)) == $tag_end)
515 {
516 if (count($stack) != 0)
517 {
518 array_pop($stack);
519 continue;
520 }
521
522 // calculate the position of the end tag
523 $tag_full['posf'] = $i + strlen($tag_end) - 1;
524
525 // extract the entire conditional from the template
526 $fullspread = substr($template, $tag_full['posi'], $tag_full['posf'] - $tag_full['posi'] + 1);
527
528 // remove the beginning tag
529 $conditional = substr($fullspread, strlen($tag_start));
530
531 // find the end of the expression
532 $temp_end = strpos($conditional, $tag_start_end);
533
534 // save the expression
535 $parsed[0] = stripslashes(substr($conditional, 0, $temp_end));
536
537 // remove the expression from the conditional
538 $conditional = substr($conditional, strlen($parsed[0]) + strlen($tag_start_end));
539
540 // remove the tailing end tag
541 $conditional = substr($conditional, 0, strlen($conditional) - strlen($tag_end));
542
543 // handle the else
544 if (isset($tag_full['else']))
545 {
546 // now relative to the start of the <if>
547 $relpos = $tag_full['else'] - $tag_full['posi'];
548
549 // calculate the length of the expression and opening tag
550 $length = strlen($parsed[0]) + strlen($tag_start) + strlen($tag_start_end);
551
552 // relative to the start of iftrue
553 $elsepos = $relpos - $length;
554
555 $parsed[1] = substr($conditional, 0, $elsepos);
556 $parsed[2] = substr($conditional, $elsepos + strlen($tag_else));
557 }
558 // no else to handle
559 else
560 {
561 $parsed[1] = $conditional;
562 $parsed[2] = '';
563 }
564 #var_dump($parsed);
565
566 // final parsed output
567 $parsed = '" . ((' . stripslashes($parsed[0]) . ') ? "' . $parsed[1] . '" : "' . $parsed[2] . '") . "';
568
569 // replace the conditional
570 $template = str_replace($fullspread, $parsed, $template);
571
572 // reset the parser
573 $offset = $tag_full['posi'] + strlen($tag_start) + strlen($tag_start_end);
574 $tag_full = array();
575 $stack = array();
576 $parsed = array();
577 unset($fullspread, $conditional, $temp_end, $relpos, $length, $elsepos);
578 break;
579 }
580 }
581 }
582
583 return $template;
584 }
585 }
586
587 /**
588 * Debugging function used to print characters
589 * in a string that are around a certain position.
590 *
591 * @param string The haystack string
592 * @param integer Position to print around
593 */
594 function print_around($str, $pos)
595 {
596 echo '>>> PA >>>>>>>>[';
597 echo htmlspecialchars($str[ $pos - 5 ]);
598 echo htmlspecialchars($str[ $pos - 4 ]);
599 echo htmlspecialchars($str[ $pos - 3 ]);
600 echo htmlspecialchars($str[ $pos - 2 ]);
601 echo htmlspecialchars($str[ $pos - 1 ]);
602 echo '©';
603 echo htmlspecialchars($str[ $pos + 0 ]);
604 echo htmlspecialchars($str[ $pos + 1 ]);
605 echo htmlspecialchars($str[ $pos + 2 ]);
606 echo htmlspecialchars($str[ $pos + 3 ]);
607 echo htmlspecialchars($str[ $pos + 4 ]);
608 echo htmlspecialchars($str[ $pos + 5 ]);
609 echo ']<<<<<<<< PA <<<';
610 }
611
612 /*=====================================================================*\
613 || ###################################################################
614 || # $HeadURL$
615 || # $Id$
616 || ###################################################################
617 \*=====================================================================*/
618 ?>