Mercurial > SimpleWebPresenter

<?php
define(DEBUG,0);
define(MAX_RECURSE,50);

function include_with_mtime($file) {
  global $newest;
  $mtime = filemtime($file);
  if ($mtime > $newest) {
    $newest = $mtime;
  }
  include $file;
}

if (DEBUG) {
  error_reporting(E_ALL);
  ini_set("display_errors", 1);
}

$SCRIPT_FILENAME=$_SERVER['SCRIPT_FILENAME'];
$newest = filemtime($SCRIPT_FILENAME);
$cachable = true;

include_with_mtime('php/cache_check.inc');
include_with_mtime('php/accept-language.inc');
include_with_mtime('php/filters.inc');
include_with_mtime('php/common-functions.inc');

$URL_PARAMS=array('name', 'lang');

#Globals
$name = $_GET['name'];
$lang = $_GET['lang'];

if(!$name) {
  $name="home";
}

if(!$lang) {
  $lang="no";
  $langs=acceptedLanguages();
  foreach ($langs as $l => $val) {
    if (file_exists($l)) {
      $lang=$l;
      break;
    }
  }
}

$title="Dummy title";

$config=loadFile("${lang}/${name}.xml");

$confFile="${lang}/${name}.xml";
if (!file_exists($confFile)) {
   errorPage("Resource not available");
}
$doc = new DOMDocument();
$doc->load($confFile);

$includes=$doc->getElementsByTagName("include");
$recurse=0;

while($includes->length > 0) {
  if(++$recurse > MAX_RECURSE) {
    errorPage('Recursion limit exceeded', 500);
  }
  foreach ($includes as $include) {
	$src=$include->getAttribute("src");
	$subdoc = new DOMDocument();
	$fname = "${lang}/${src}";
	$subdoc->load($fname);
	$mtime = filemtime($fname);
	if ($mtime > $newest) {
	  $newest = $mtime;
	}
	$parent=$include->parentNode;
	$xml=getElementByTagName($subdoc,"xml");
	foreach($xml->childNodes as $child) {
		$text=$subdoc->saveXml($child);
		$clonedChild=$doc->importNode($child,true);
		$parent->insertBefore($clonedChild,$include);
	}
	$parent->removeChild($include);
  }
  $includes=$doc->getElementsByTagName("include");
}

$head=getElementByTagName($doc,"head");
$title=$head->getAttribute("title");

$css=getElementByTagName($head,"css");
$css=$doc->saveXML($css);
$css=preg_replace('/\s*<\/?\s*css\s*>\s*/s', '', $css);

$body=getElementByTagName($doc,"body");
$files=$body->getElementsByTagName("file");


$out= '<?xml version="1.0" encoding="UTF-8"?>';

$out.= '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
                      "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
    <head>
        <title>';

$out.= "$title";
$out.= '
	</title>
';
$out.= "$css";
$out.= '
    </head>
    <body>
      <div id="container">
';

function getParam($param) {
  $param_type=$param->getAttribute("type");
  $param_value;
  if (!$param_type)
    $param_type="scalar";

  if($param_type == "scalar") {
    $param_subst=$param->getAttribute("subst");
    $param_value=$param->getAttribute("value");
    if ($param_subst) {
      /*
      $param_value=preg_replace("/name/", $name, $param_subst);
      $param_value=preg_replace('/lang/', $lang, $param_value);
      */
    }
  }
  elseif($param_type == "array") {
	  $params=$param->getElementsByTagName("param");
	  $param_value=array();
	  foreach ($param->childNodes as $param) {
	    if ($param->nodeType == XML_ELEMENT_NODE)
	    {
	      array_push($param_value, getParam($param));
	    }
	  }
  }
  return $param_value;
}

foreach ($files as $file) {
  if ($file->getAttribute("script")) {
    $cachable = false;
    break;
  }
  else {
    $src = $file->getAttribute("src");
    $fname = "${lang}/${src}";
    if (!file_exists($fname)) {
      errorPage("Resource not found '${fname}'");
    }
    cache_time($fname);
  }
}

if ($cachable)
  cache_check($newest);

foreach ($files as $file) {
	$script = $file->getAttribute("script");
	if ($script) {
	  $src = "";
	  $cwd = getcwd();

	  $matches=array();
	  preg_match('/(.*\/)/', $script, $matches);
	  $dirname=$matches[0];
	  preg_match('/([^\/]*)$/', $script, $matches);
	  $filename=$matches[0];
	  chdir("${lang}/${dirname}");
	  $pipe=popen("php ${filename}","r");
	  $file_content = stream_get_contents($pipe);
	  chdir("${cwd}");
	}
	else {
	  $src = $file->getAttribute("src");
	  $fname = "${lang}/${src}";
	  $file_content = loadFile($fname);
	}
	if(floatval($file_content) < 0) {
	  errorPage("Resource not found '${lang}/${src}'");
	}

	$filters=$file->getElementsByTagName("filter");
	foreach($filters as $filter) {
	  $func=$filter->getAttribute("function");
	  $params=$filter->getElementsByTagName("param");
	  $callString="\$file_content=${func}(\$file_content";
	  $param_values=array();
	  $i=0;
	  foreach ($filter->childNodes as $param) {
	    if ($param->nodeType == XML_ELEMENT_NODE)
	    {
	      $param_value[$i]=getParam($param);
	      $callString.=",\$param_value[$i]";
	      $i++;
	    }
	  }
	  $callString.=");";
	  eval($callString);
        }
        $out.= $file_content;
}


$out.='
      </div>
    </body>
</html>
';

print $out;
?>
author	Tom Fredrik "BFG" Klaussen <bfg@blenning.no>
date	Wed, 19 Sep 2012 14:41:22 +0200
parents	a64e8f968e7e
children	ee2c31392ea3