2 /*=====================================================================*\
3 || ###################################################################
4 || # Iris Studios Shared Object Framework [#]version[#]
5 || # Copyright ©2002-[#]year[#] Iris Studios, Inc.
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.
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
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 \*=====================================================================*/
32 * This framework generates standard HTML through various functions. The purpose
33 * is generally so that things like the admin system can be created without templates.
35 * @author Iris Studios, Inc.
36 * @copyright Copyright ©2002 - [#]year[#], Iris Studios, Inc.
44 * Framework registry object
50 * Realm that we are operating in (displayed in the <title>)
53 var $realm = '[UNDEFINED REALM]';
56 * CSS to place in the page
64 function Printer(&$registry)
66 $this->registry
=& $registry;
70 * Creates a redirect to another page; constructs the header and footer (therefore execution stops)
72 * @param string Location to redirect to
73 * @param integer Time to wait before the redirect
75 function redirect($location, $timeout = 10)
77 $timeout = $timeout * 200;
81 <script type
="text/javascript">
83 var timeout
= $timeout;
87 setTimeout("redirect()", $timeout);
96 window
.location
= "$location";
102 $this->page_start($this->registry
->modules
['localize']->string('Redirect'), ':default:', 15, $js);
104 $this->page_message($this->registry
->modules
['localize']->string('Redirect'), sprintf($this->registry
->modules
['localize']->string('Please wait to be redirected. If you are not redirected in a few seconds, click <a href="%1$s">here</a>.'), $location));
110 * Throws a fatal error; constructs the header and footer
112 * @param string Error messsage text
114 function error($message)
116 $this->page_start($this->registry
->modules
['localize']->string('Error'));
117 $this->page_message($this->registry
->modules
['localize']->string('Error'), $message);
123 // ###################################################################
125 * Outputs the header of the page: doctype, <html>, <head>, <title>, <body>
126 * and imbeds the style information
128 * @param string Title of the page
129 * @param string Class of the page to be applied to the body
130 * @param integer Margin of the <div> that all content is placed in
131 * @param string Extra HTML to imbed in the <head> tag
132 * @param string <body> onLoad action to imbed
133 * @param integer Margin of the actual <body > tag
134 * @param string Relative path where the CSS data is stored
135 * @param bool Will force re-print the header if it has already been printed
137 function page_start($actiontitle, $pageclass = ':default:', $pagemargin = 15, $extra = '', $onload = false
, $margin = 0, $dotpath = '.', $override = false
)
139 if ($this->registry
->debug
AND isset($_GET['query']))
144 if (constant('DONE_HEADER') AND !$override)
149 $title = sprintf($this->registry
->modules
['localize']->string('%1$s - %2$s - %3$s'), $this->registry
->application
, $this->realm
, $actiontitle);
151 echo "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n";
152 echo "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n<head>";
153 echo "\n\t<title>$title</title>";
154 echo "\n\t<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\" />";
156 echo ($extra ?
"\n$extra" : '');
157 echo "\n</head>\n<body style=\"margin: {$margin}px;\"" . (($pageclass !== ':default:') ?
" class=\"$pageclass\"" : '') . (($onload) ?
" onload=\"$onload\"" : '') . ">\n";
159 if (!defined('HIDE_SETUP') AND function_exists('_printer_page_start'))
161 _printer_page_start();
164 echo "<div style=\"margin: {$pagemargin}px;\">\n<!-- / page head -->\n\n";
166 if (!defined('DONE_HEADER'))
168 define('DONE_HEADER', 1);
173 * Links CSS to the page from a given relative path
175 * @param string Relative path to the CSS file
177 function css_link($path)
179 $this->css
.= "\n\t<link rel=\"stylesheet\" href=\"$path\" />";
183 * Imbeds actual CSS information into the page in <style> tags
185 * @param string Path of the CSS file to be imbeded
187 function css_imbed($path)
189 $data = require_once($path);
190 $css = preg_replace('#/\*(.*?)\*/(\r|\n)*#s', '', $css);
192 $this->css
.= "\n\t<style type=\"text/css\">\n\t<!--\n" . $css . "\n\t//-->\n\t</style>";
196 * Places raw HTML code directly into the documet at the current position
198 * @param string HTML code
200 function page_code($code)
202 echo "\n\n$code\n\n";
206 * A block function that produces a table with a message in it. This does not print the header and footer
208 * @param string The title of the message (appears at the top of the block)
209 * @param string Content of the message
211 function page_message($title, $message)
213 $this->table_start(true
, '75%');
214 $this->table_head($title, 1);
215 $this->row_span("<blockquote>$message</blockquote>", ':swap:', 'left', 1);
220 * Produces an entire page layout that asks the user whether or not they want to perform X action and provides
221 * a link to the YES and NO action
223 * @param string Message that asks if they want to do X
224 * @param string Location to go for YES
225 * @param string DO action to pass
226 * @param array Hidden parameters to pass to the next page
228 function page_confirm($message, $location, $action, $params)
230 $this->page_start($this->registry
->modules
['localize']->string('Confirm'));
232 $this->form_start($location, $action);
233 foreach ($params AS $key => $value)
235 $this->form_hidden_field($key, $value);
238 $this->table_start(true
, '75%');
239 $this->table_head($this->registry
->modules
['localize']->string('Confirm'), 1);
240 $this->row_span("<blockquote>$message</blockquote>", ':swap:', 'left', 1);
241 $this->row_submit('<input type="button" class="button" name="no" value=" ' . $this->registry
->modules
['localize']->string('No') . ' " onclick="history.back(1); return false;" />', $this->registry
->modules
['localize']->string('Yes'), '');
250 * Closes the HTML document structure an adds the copyright; this also stops execution of the page
254 if ($this->registry
->debug
AND isset($_GET['query']))
259 if (is_array($this->registry
->modules
['db_mysql']->history
))
262 foreach ($this->registry
->modules
['db_mysql']->history
AS $query)
264 echo $query . "\n\n<hr />\n\n";
271 $copyright = "\n<br />\n<p align=\"center\" class=\"copyright\">\n\t<a href=\"http://www.iris-studios.com\" target=\"_blank\">" . $this->registry
->application
. ' ' . $this->registry
->appversion
. ", © 2002 - " . date('Y') . " Iris Studios, Inc.</a>\n</p>";
273 if (!defined('HIDE_SETUP'))
275 echo "\n<!-- page end -->\n</div>\n$copyright";
279 echo "\n<!-- page end -->\n</div>";
282 if ($this->registry
->debug
)
285 $scinfo = 'Not Under Source Control';
286 $possiblescms = array('cvs', 'svn', 'cvs_information', 'svn_information', 'scm', 'sc_information', 'scm_information');
287 foreach ($possiblescms AS $scm)
289 if (defined(strtoupper($scm)))
291 $scinfo = constant(strtoupper($scm));
295 if (strpos($scinfo, 'RCSfile:') !== false
)
299 else if (strpos($scinfo, ',v ') !== false
)
304 else if (strpos($scinfo, 'URL:') !== false
)
308 else if (strpos($scinfo, 'https://') !== false
OR strpos($scinfo, 'http://') !== false
)
312 // not found so just return it
313 // try a SVN ID tag as we can't really tell if we're using it
316 $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);
317 if ($test == '$' . 'Id: $')
319 $scinfo = 'Not Under Source Control';
330 $scinfo = preg_replace('#\$' . 'RCSfile: (.+?) \$#', '\\1', $scinfo);
331 $scinfo = preg_replace('#\$' . 'Revision: (.+?) \$#', 'CVS \\1', $scinfo);
332 $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);
334 else if ($type == 'svn')
336 $scinfo = preg_replace('#\$' . '(Head)?URL: (.+?) \$#e', "end(explode('/', '\\2'))", $scinfo);
337 $scinfo = preg_replace('#\$' . '(LastModified)?Revision: (.+?) \$#', 'SVN \\2', $scinfo);
338 $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);
342 $scinfo = 'Not Under Source Control';
347 $scinfo = trim($scinfo);
348 $debug .= "\n\t<li><strong>Source Control:</strong> $scinfo</li>";
351 if (is_object($this->registry
->modules
['db_mysql']))
353 $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
) ?
'&query=1' : '?query=1') . "\">?</a>)</li>";
356 // total execution time
357 if (defined('ISSO_MT_START'))
359 $this->registry
->load('functions', 'functions');
360 $debug .= "\n\t<li><strong>Total Execution Time:</strong> " . round($this->registry
->modules
['functions']->fetch_microtime_diff(ISSO_MT_START
), 10) . "</li>";
364 $debug .= "\n\t<li>\n\t\t<select>\n\t\t\t<option>Debug Notices (" . sizeof($this->registry
->debuginfo
) . ")</option>";
365 foreach ((array)$this->registry
->debuginfo
AS $msg)
367 $debug .= "\n\t\t\t<option>--- $msg</option>";
369 $debug .= "\n\t\t</select>\n\t</li>";
372 $modules = $this->registry
->show_modules(true
);
373 $debug .= "\n\t<li>\n\t\t<select>\n\t\t\t<option>Loaded Modules (" . sizeof($modules) . ")</option>";
374 foreach ($modules AS $mod)
376 $debug .= "\n\t\t\t<option>--- $mod</option>";
378 $debug .= "\n\t\t</select>\n\t</li>";
383 $debug = "\n<hr />\n" . $this->registry
->_message('Debug Information', $debug, 1, true
, false
);
384 echo "\n\n<!-- dev debug -->\n<div align=\"center\">\n$debug\n</div>\n<!-- / dev debug -->\n\n";
387 echo "\n\n</body>\n</html>";
392 // ###################################################################
394 * Opens a <table> tag with styling
396 * @param bool Whether to add a <br /> before the table
397 * @param string Value of the width attribute
399 function table_start($break = true
, $width = '90%')
406 echo "\n<table cellpadding=\"4\" cellspacing=\"0\" border=\"0\" align=\"center\" width=\"$width\" class=\"tborder\">\n";
410 * Adds a table row that is sued to head the entire table
412 * @param string Title string
413 * @param integer Colspan attribute value
414 * @param bool Whether to bold the title
416 function table_head($title, $colspan = 2, $strong = true
)
418 echo "<tr>\n\t<td class=\"tcat\" align=\"center\" colspan=\"$colspan\">" . (($strong) ?
"<strong>$title</strong>" : $title) . "</td>\n</tr>\n";
422 * Creates column headings; useful for a grid-style page. This uses a different styling than table_head()
423 * and is usually used directly after a table header
425 * @param array Array of titles to print
427 function table_column_head($columnarray)
429 if (is_array($columnarray))
431 $render = "<tr valign=\"top\" align=\"center\">\n";
433 foreach ($columnarray AS $header)
435 $render .= "\t<td class=\"thead\" align=\"center\">$header</td>\n";
438 $render .= "</tr>\n";
445 * Closes a <table> tag
452 // ###################################################################
454 * Starts a <form> tag and adds the DO hidden input field
456 * @param string Action/name of the file to action to
457 * @param string Value of the DO parameter; used to do-branch
458 * @param bool Enctype attribute; used for mime/multi-part
459 * @param string Name of the form; this only matters for DOM access
460 * @param string Method to action as; POST or GET (default is POST)
462 function form_start($action, $do, $enctype = false
, $name = 'inputform', $submitmethod = 'post')
464 echo "\n<!-- input form -->\n<form name=\"$name\" action=\"$action\"" . (($enctype) ?
" enctype=\"$enctype\"" : '') . " method=\"$submitmethod\">\n";
465 $this->form_hidden_field('do', $do);
469 * Adds a hidden field at the current location
471 * @param string Name of the field
472 * @param string Value of the field
474 function form_hidden_field($name, $value)
476 echo "<input type=\"hidden\" name=\"$name\" value=\"$value\" />\n";
480 * Closes a <form> tag
484 echo "</form>\n<!-- / input form -->\n";
487 // ###################################################################
489 * Creates a table row that spans an entire row; this is used to divide sections, usually
491 * @param string Text to place in the row
492 * @param string Class name to style with; by default it alternates between alt1 and alt2 (use :swap: to do that)
493 * @param string Alignment of the text in the row
494 * @param integer Colspan attribute
496 function row_span($text, $class = ':swap:', $align = 'left', $colspan = 2)
498 if ($class === ':swap:')
500 $this->registry
->modules
['functions']->exec_swap_bg();
501 $row_class = $this->registry
->modules
['functions']->bgcolour
;
502 $is_style_element = false
;
506 if (preg_match('#:style:(.*?)#i', $class))
508 $is_style_element = true
;
509 $style = str_replace(':style:', '', $class);
514 $is_style_element = false
;
518 echo "\n<tr>\n\t<td ". (($is_style_element) ?
"style=\"$style\"" : "class=\"$row_class\"") . " colspan=\"$colspan\" align=\"$align\">$text</td>\n</tr>";
522 * Creates a table row that has more than two columns; this is used in conjunction with table_column_head()
523 * usually; it takes an array of values
525 * @param array Array of values in form value => alignment key (c for center, l for left, and r for right)
527 function row_multi_item($row_array)
529 $this->registry
->modules
['functions']->exec_swap_bg();
531 foreach ($row_array AS $item => $align)
533 $row_data["$align"][] = $item;
536 echo "<tr valign=\"top\">";
538 foreach ($row_data AS $align_key => $item_array)
540 if ($align_key == 'c')
544 else if ($align_key == 'l')
548 else if ($align_key == 'r')
553 foreach ($item_array AS $value)
555 echo "\n\t<td class=\"{$this->registry->modules['functions']->bgcolour}\" align=\"$align\">$value</td>";
563 * Generic row creation function that has two columns: label and value; this is used for many
564 * other form functions, but can also be used for non-editable fields
566 * @param string Label text
567 * @param string HTML or text to place in the value column
568 * @param string Vertical align (valign attribute) for the row
569 * @param integer Colspan attribute
570 * @param string Class to style the row with; default is to alternate
572 function row_text($label, $value = ' ', $valign = 'top', $colspan = 2, $class = -1)
580 $this->registry
->modules
['functions']->exec_swap_bg();
581 $row_class = $this->registry
->modules
['functions']->bgcolour
;
593 echo "<tr valign=\"$valign\">";
594 echo "\n\t<td class=\"$row_class\">$label</td>";
595 echo "\n\t<td class=\"$row_class\">$value</td>";
599 echo "\n\t<td class=\"$row_class\" colspan=\"" . $colspan - 2 . "\"> </td>";
606 * Creates a table row with an <input> text field as the value column
608 * @param string Label text
609 * @param string Name of the <input> field
610 * @param string Value of the field
611 * @param integer Colspan attribute
612 * @param integer Size of the <input> field
613 * @param integer Length attribute; use FALSE for no length to be specified
614 * @param bool Whether to make this a password field
615 * @param string Vertical align (valign attribute)
617 function row_input($label, $name, $value = '', $colspan = 2, $size = 35, $length = false
, $password = false
, $lalign = 'top')
619 $this->row_text($label, "<input type=\"" . (($password) ?
'password' : 'text') . "\" class=\"input\" name=\"$name\" value=\"$value\" size=\"$size\" " . (($length) ?
"maxlength=\"$length\" " : '') . "/>", $lalign, $colspan);
623 * Creates a table row with a <textarea> as the value column
625 * @param string Label text
626 * @param string Name of the <textarea>
627 * @param string Value of the <textarea>
628 * @param integer Colspan attribute
629 * @param integer Number of rows in the <textarea>
630 * @param integer Number of colums in the <textarea>
631 * @param bool Whether or not to use monospacing font
632 * @param string Extra style attributes to apply to the <textarea>
634 function row_textarea($label, $name, $value = '', $colspan = 2, $rows = 7, $cols = 50, $code = false
, $style = '')
636 $this->row_text($label, "<textarea name=\"$name\" class=\"" . (($code) ?
'code' : 'input') . "\" rows=\"$rows\" cols=\"$cols\"" . (($style) ?
' style="' . $style . '"' : '') . ">$value</textarea>", 'top', $colspan);
640 * Creates a table row with the tfoot class
642 * @param string Extra text or HTML to insert into the row
643 * @param integer Colspan attribute
645 function row_tfoot($data, $colspan = 2)
647 echo $this->row_span($data, 'tfoot', 'center', $colspan);
651 * Creates a tfoot table row with submit buttons
653 * @param string Extra HTML to imbed in the row after the buttons
654 * @param string Submit button text (by default it uses pre-translated "Submit" from :save:)
655 * @param string Reset button text (default it uses pre-translated "Reset" from :reset:)
656 * @param integer Colspan attribute
658 function row_submit($extra = false
, $submit = ':save:', $reset = ':reset:', $colspan = 2)
660 if ($submit === ':save:')
662 $submit = " " . $this->registry
->modules
['localize']->string('Submit') . " ";
666 $submit = " $submit ";
669 if ($reset === ':reset:')
671 $reset = " " . $this->registry
->modules
['localize']->string('Reset') . " ";
675 $reset = (($reset) ?
" $reset " : '');
678 $output = "\n\t\t<input type=\"submit\" class=\"button\" value=\"$submit\" accesskey=\"s\" />";
679 $output .= ($reset ?
"\n\t\t<input type=\"reset\" class=\"button\" value=\"$reset\" accesskey=\"r\" />" : '');
680 $output .= ($extra ?
"\n\t\t$extra" : '');
682 $this->row_tfoot($output, $colspan);
686 * Creates an upload row; you need to specify some other paramaters in form_start() for this to work
688 * @param string Label text
689 * @param string Upload name
690 * @param integer Colspan attribute
692 function row_upload($label, $name, $colspan = 2)
694 $this->row_text($label, "<input type=\"file\" class=\"button\" name=\"$name\" size=\"35\" />", 'top', $colspan);
698 * Adds a name-value pair to an array that is constructed into a <select> list
700 * @param string Text displayed for the option
701 * @param string Value of the option
702 * @param bool Whether or not to select this particluar option
704 function list_item($name, $value, $selected = false
)
708 $listitem[] = "\n\t<option value=\"$value\"" . (($selected == true
) ?
' selected="selected"' : '') . ">$name</option>";
712 * Assembles a <select> table row from list_item() items
714 * @param string Label text
715 * @param string Name of the <select>
716 * @param bool Automatically submit the form on a change?
717 * @param integer Colspan attribute
719 function row_list($label, $name, $is_jump = false
, $colspan = 2)
723 foreach ($listitem AS $option)
725 $optionlist .= $option;
730 $this->row_text($label, "\n<select class=\"button\" name=\"$name\"" . (($is_jump) ?
" onchange=\"this.form.submit();\"" : '') . ">$optionlist\n</select>" . (($is_jump) ?
"\n<input type=\"submit\" class=\"button\" value=\" " . $this->registry
->modules
['localize']->string('Go') . " \" accesskey=\"g\" />" : '') . "\n", $colspan);
734 * Creates a row with two radio buttons: yes and now
736 * @param string Label text
737 * @param string Name of the BOOL flag
738 * @param bool TRUE to select the YES by default; FALSE for NO
739 * @param integer Colspan attribute
741 function row_yesno($label, $name, $value, $colspan = 2)
743 $this->row_text($label, "<input type=\"radio\" name=\"$name\" value=\"1\"" . (($value) ?
' checked="checked"' : '') . " /> " . $this->registry
->modules
['localize']->string('Yes') . " <input type=\"radio\" name=\"$name\" value=\"0\"" . ((!$value) ?
' checked="checked"' : '') . " /> " . $this->registry
->modules
['localize']->string('No'), $colspan);
747 /*=====================================================================*\
748 || ###################################################################
751 || ###################################################################
752 \*=====================================================================*/