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

/*
var_dump($_SERVER);
exit;
*/

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


if(CACHING) {
include 'php/cache_check.inc';
}
include 'php/accept-language.inc';
include 'php/filters.inc';
include '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();
  if ($langs) {
    foreach ($langs as $l => $val) {
      if (file_exists($l)) {
        $lang=$l;
        break;
      }
    }
  }
}

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;
}

function getInput($master, $param) {
  $out='';

  $lang=$GLOBALS['lang'];
  $name=$param->getAttribute("id");
  $conf=$_GET[$name];
  $GLOBALS[$name]=$conf;
  if (!$conf)
    $conf=$param->getAttribute("default");
  $config=loadFile("${lang}/${conf}.xml");

  $confFile="${lang}/${conf}.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();
	$subdoc->load("${lang}/${src}");
	$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");

  if($title) {
    $values=$master->getElementsByTagName("param");
    foreach ($values as $value) {
      if ($value->getAttribute("type")=="input_config") {
        if ($value->getAttribute("id")=="title") {
          $tmp = new DOMDocument();
          $tmp->loadXml("<xml>${title}</xml>");
	  $parent=$value->parentNode;
	  $parent->removeChild($value);
	  $parent->appendChild(new DOMText($tmp->textContent));
        }
      }
    }
  }

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

  if($css) {
    $values=$master->getElementsByTagName("param");
    foreach ($values as $value) {
      if ($value->getAttribute("type")=="input_config") {
        if ($value->getAttribute("id")=="css") {
          $tmp = new DOMDocument();
          $tmp->loadXml("<xml>${css}</xml>");
	  $parent=$value->parentNode;
	  foreach($tmp->firstChild->childNodes as $node) {
		$clonedChild=$master->importNode($node,true);
		$parent->insertBefore($clonedChild,$value);
          }
	  $parent->removeChild($value);
        }
      }
    }
  }


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

foreach ($files as $file) {
	$src=$file->getAttribute("src");
	$file_content=loadFile("${lang}/${src}");
	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;
}

  $doc = new DOMDocument();
  $doc->loadXml("<xml>${out}</xml>");

  return $doc;
}

$master = new DOMDocument();
$master->load("master.xml");

$params=$master->getElementsByTagName("param");
foreach ($params as $param) {
  if ($param->getAttribute("type") == "input") {
    $doc=getInput($master,$param);

    $parent=$param->parentNode;
    foreach ($doc->firstChild->childNodes as $child) {
      $clonedChild=$master->importNode($child,true);
      $parent->insertBefore($clonedChild,$param);
    }
    $parent->removeChild($param);	

  }
}

print $master->saveXml($master);

?>