<?php
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, $options)
{
  $out='';

  $lang = $options->getLang();
  $name=$param->getAttribute("id");
  $conf = $options->getName();
  if (!$conf)
    $conf = $param->getAttribute("default");

  $fname = "${lang}/${conf}.xml";
  cache_time($fname);
  $config = loadFile($fname);

  $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) {
    $script=$file->getAttribute("script");
    if ($script) {
      $cacheable = false;
      $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}";
      cache_time($fname);
      $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;
  }

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

  return $doc;
}

?>