SimpleWebPresenter: index.php annotate

annotate index.php @ 12:a20bb1b51aad

Merge.

author	Tom Fredrik "BFG" Klaussen <bfg@blenning.no>
date	Tue, 29 May 2012 21:08:23 +0200
parents	ba6f0818018b 19dfa6f3e2be
children	ee2c31392ea3

rev	line source
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	1 <?php
6 6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	2 define(DEBUG,0);
7 350a8c63bd14 Support for recursive includes. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 6 diff changeset	3 define(MAX_RECURSE,50);
10 1ac66bef193a Updated to new xml format. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	4 define(CACHING,0);
7 350a8c63bd14 Support for recursive includes. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 6 diff changeset	5
11 ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	6 /*
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	7 var_dump($_SERVER);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	8 exit;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	9 */
7 350a8c63bd14 Support for recursive includes. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 6 diff changeset	10
6 6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	11 if (DEBUG) {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	12 error_reporting(E_ALL);
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	13 ini_set("display_errors", 1);
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	14 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	15
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	16
10 1ac66bef193a Updated to new xml format. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	17 if(CACHING) {
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	18 include 'php/cache_check.inc';
10 1ac66bef193a Updated to new xml format. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	19 }
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	20 include 'php/accept-language.inc';
4 74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	21 include 'php/filters.inc';
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	22 include 'php/common-functions.inc';
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	23
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	24 $URL_PARAMS=array('name','lang');
18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	25
18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	26 #Globals
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	27 $name = $_GET['name'];
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	28 $lang = $_GET['lang'];
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	29
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	30 if(!$name) {
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	31 $name="home";
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	32 }
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	33
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	34 if(!$lang) {
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	35 $lang="no";
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	36 $langs=acceptedLanguages();
11 ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	37 if ($langs) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	38 foreach ($langs as $l => $val) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	39 if (file_exists($l)) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	40 $lang=$l;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	41 break;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	42 }
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	43 }
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	44 }
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	45 }
d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	46
6 6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	47 function getParam($param) {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	48 $param_type=$param->getAttribute("type");
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	49 $param_value;
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	50 if (!$param_type)
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	51 $param_type="scalar";
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	52
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	53 if($param_type == "scalar") {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	54 $param_subst=$param->getAttribute("subst");
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	55 $param_value=$param->getAttribute("value");
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	56 if ($param_subst) {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	57 /*
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	58 $param_value=preg_replace("/name/", $name, $param_subst);
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	59 $param_value=preg_replace('/lang/', $lang, $param_value);
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	60 */
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	61 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	62 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	63 elseif($param_type == "array") {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	64 $params=$param->getElementsByTagName("param");
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	65 $param_value=array();
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	66 foreach ($param->childNodes as $param) {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	67 if ($param->nodeType == XML_ELEMENT_NODE)
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	68 {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	69 array_push($param_value, getParam($param));
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	70 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	71 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	72 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	73 return $param_value;
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	74 }
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	75
11 ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	76 function getInput($master, $param) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	77 $out='';
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	78
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	79 $lang=$GLOBALS['lang'];
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	80 $name=$param->getAttribute("id");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	81 $conf=$_GET[$name];
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	82 $GLOBALS[$name]=$conf;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	83 if (!$conf)
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	84 $conf=$param->getAttribute("default");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	85 $config=loadFile("${lang}/${conf}.xml");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	86
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	87 $confFile="${lang}/${conf}.xml";
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	88 if (!file_exists($confFile)) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	89 errorPage("Resource not available");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	90 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	91 $doc = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	92 $doc->load($confFile);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	93
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	94 $includes=$doc->getElementsByTagName("include");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	95 $recurse=0;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	96
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	97 while($includes->length>0) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	98 if(++$recurse>MAX_RECURSE) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	99 errorPage('Recursion limit exceeded', 500);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	100 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	101 foreach ($includes as $include) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	102 $src=$include->getAttribute("src");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	103 $subdoc = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	104 $subdoc->load("${lang}/${src}");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	105 $parent=$include->parentNode;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	106 $xml=getElementByTagName($subdoc,"xml");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	107 foreach($xml->childNodes as $child) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	108 $text=$subdoc->saveXml($child);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	109 $clonedChild=$doc->importNode($child,true);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	110 $parent->insertBefore($clonedChild,$include);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	111 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	112 $parent->removeChild($include);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	113 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	114 $includes=$doc->getElementsByTagName("include");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	115 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	116
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	117 $head=getElementByTagName($doc,"head");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	118 $title=$head->getAttribute("title");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	119
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	120 if($title) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	121 $values=$master->getElementsByTagName("param");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	122 foreach ($values as $value) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	123 if ($value->getAttribute("type")=="input_config") {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	124 if ($value->getAttribute("id")=="title") {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	125 $tmp = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	126 $tmp->loadXml("<xml>${title}</xml>");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	127 $parent=$value->parentNode;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	128 $parent->removeChild($value);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	129 $parent->appendChild(new DOMText($tmp->textContent));
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	130 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	131 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	132 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	133 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	134
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	135 $css=getElementByTagName($head,"css");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	136 $css=$doc->saveXML($css);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	137 $css=preg_replace('/\s<\/?\scss\s>\s/s', '', $css);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	138
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	139 if($css) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	140 $values=$master->getElementsByTagName("param");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	141 foreach ($values as $value) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	142 if ($value->getAttribute("type")=="input_config") {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	143 if ($value->getAttribute("id")=="css") {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	144 $tmp = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	145 $tmp->loadXml("<xml>${css}</xml>");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	146 $parent=$value->parentNode;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	147 foreach($tmp->firstChild->childNodes as $node) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	148 $clonedChild=$master->importNode($node,true);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	149 $parent->insertBefore($clonedChild,$value);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	150 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	151 $parent->removeChild($value);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	152 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	153 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	154 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	155 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	156
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	157
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	158 $body=getElementByTagName($doc,"body");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	159 $files=$body->getElementsByTagName("file");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	160
6 6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	161 foreach ($files as $file) {
8 19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	162 $script=$file->getAttribute("script");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	163 if ($script) {
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	164 $src="";
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	165 $cwd=getcwd();
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	166
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	167 $matches=array();
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	168 preg_match('/(.*\/)/', $script, $matches);
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	169 $dirname=$matches[0];
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	170 preg_match('/([^\/]*)$/', $script, $matches);
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	171 $filename=$matches[0];
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	172 chdir("${lang}/${dirname}");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	173 $pipe=popen("php ${filename}","r");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	174 $file_content = stream_get_contents($pipe);
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	175 chdir("${cwd}");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	176 }
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	177 else {
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	178 $src=$file->getAttribute("src");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	179 $file_content=loadFile("${lang}/${src}");
19dfa6f3e2be Support for scripts. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 7 diff changeset	180 }
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	181 if(floatval($file_content)<0) {
18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	182 errorPage("Resource not found '${lang}/${src}'");
18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	183 }
18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	184
4 74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	185 $filters=$file->getElementsByTagName("filter");
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	186 foreach($filters as $filter) {
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	187 $func=$filter->getAttribute("function");
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	188 $params=$filter->getElementsByTagName("param");
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	189 $callString="\$file_content=${func}(\$file_content";
6 6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	190 $param_values=array();
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	191 $i=0;
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	192 foreach ($filter->childNodes as $param) {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	193 if ($param->nodeType == XML_ELEMENT_NODE)
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	194 {
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	195 $param_value[$i]=getParam($param);
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	196 $callString.=",\$param_value[$i]";
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	197 $i++;
6c0162497d56 Improved error reporting, and support for multilevel params. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 5 diff changeset	198 }
4 74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	199 }
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	200 $callString.=");";
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	201 eval($callString);
74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	202 }
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	203 $out.= $file_content;
4 74196528fc64 Refac to use xml as input, and remove filters and helper-functions from Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 3 diff changeset	204 }
0 d2da64705bce Refactored everything in the CMS into this repos. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	205
11 ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	206 $doc = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	207 $doc->loadXml("<xml>${out}</xml>");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	208
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	209 return $doc;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	210 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	211
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	212 $master = new DOMDocument();
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	213 $master->load("master.xml");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	214
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	215 $params=$master->getElementsByTagName("param");
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	216 foreach ($params as $param) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	217 if ($param->getAttribute("type") == "input") {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	218 $doc=getInput($master,$param);
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	219
11 ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	220 $parent=$param->parentNode;
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	221 foreach ($doc->firstChild->childNodes as $child) {
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	222 $clonedChild=$master->importNode($child,true);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	223 $parent->insertBefore($clonedChild,$param);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	224 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	225 $parent->removeChild($param);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	226
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	227 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	228 }
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	229
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	230 print $master->saveXml($master);
ba6f0818018b Made recursive input evaluation into a function. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 10 diff changeset	231
5 18aafb1a8986 Better handling of errors and globals. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 4 diff changeset	232 ?>

Mercurial > SimpleWebPresenter

annotate index.php @ 12:a20bb1b51aad