<?php

/**
 * XmlLangParser class
 * Change to lang php file from xml.
 * @author NAVER (developers@xpressengine.com)
 * @package /classes/xml
 * @version 0.1
 */
class XmlLangParser extends XeXmlParser
{

	/**
	 * compiled language cache path
	 * @var string
	 */
	var $compiled_path = './files/cache/lang/'; // / directory path for compiled cache file
	/**
	 * Target xml file
	 * @var string
	 */
	var $xml_file = NULL;

	/**
	 * Target php file
	 * @var string
	 */
	var $php_file = NULL;

	/**
	 * result source code
	 * @var string
	 */
	var $code;

	/**
	 * language list, for example ko, en...
	 * @var array
	 */
	var $lang_types;

	/**
	 * language type
	 * @var string
	 */
	var $lang_type;

	/**
	 * constructor
	 * @param string $xml_file
	 * @param string $lang_type
	 * @return void
	 */
	function __construct($xml_file, $lang_type)
	{
		$this->lang_type = $lang_type;
		$this->xml_file = $xml_file;
		$this->php_file = $this->_getCompiledFileName($lang_type);
	}

	/**
	 * compile a xml_file only when a corresponding php lang file does not exists or is outdated
	 * @return string|bool Returns compiled php file.
	 */
	function compile()
	{
		if(!file_exists($this->xml_file))
		{
			return FALSE;
		}
		if(!file_exists($this->php_file))
		{
			$this->_compile();
		}
		else
		{
			if(filemtime($this->xml_file) > filemtime($this->php_file))
			{
				$this->_compile();
			}
			else
			{
				return $this->php_file;
			}
		}

		return $this->_writeFile() ? $this->php_file : FALSE;
	}

	/**
	 * Return compiled content
	 * @return string Returns compiled lang source code
	 */
	function getCompileContent()
	{
		if(!file_exists($this->xml_file))
		{
			return FALSE;
		}
		$this->_compile();

		return $this->code;
	}

	/**
	 * Compile a xml_file
	 * @return void
	 */
	function _compile()
	{
		$lang_selected = Context::loadLangSelected();
		$this->lang_types = array_keys($lang_selected);

		// read xml file
		$buff = FileHandler::readFile($this->xml_file);
		$buff = str_replace('xml:lang', 'xml_lang', $buff);

		// xml parsing
		$xml_obj = parent::parse($buff);

		$item = $xml_obj->lang->item;
		if(!is_array($item))
		{
			$item = array($item);
		}
		foreach($item as $i)
		{
			$this->_parseItem($i, $var = '$lang->%s');
		}
	}

	/**
	 * Writing cache file
	 * @return void|bool
	 */
	function _writeFile()
	{
		if(!$this->code)
		{
			return;
		}
		FileHandler::writeFile($this->php_file, "<?php\n" . $this->code);
		return false;
	}

	/**
	 * Parsing item node, set content to '$this->code'
	 * @param object $item
	 * @param string $var
	 * @return void
	 */
	function _parseItem($item, $var)
	{
		$name = $item->attrs->name;
		$value = $item->value;
		$var = sprintf($var, $name);

		if($item->item)
		{
			$type = $item->attrs->type;
			$mode = $item->attrs->mode;

			if($type == 'array')
			{
				$this->code .= "if(!is_array({$var})){\n";
				$this->code .= "	{$var} = array();\n";
				$this->code .= "}\n";
				$var .= '[\'%s\']';
			}
			else
			{
				$this->code .= "if(!is_object({$var})){\n";
				$this->code .= "	{$var} = new stdClass();\n";
				$this->code .= "}\n";
				$var .= '->%s';
			}

			$items = $item->item;
			if(!is_array($items))
			{
				$items = array($items);
			}
			foreach($items as $item)
			{
				$this->_parseItem($item, $var);
			}
		}
		else
		{
			$code = $this->_parseValues($value, $var);
			$this->code .= $code;
		}
	}

	/**
	 * Parsing value nodes
	 * @param array $nodes
	 * @param string $var
	 * @return array|string
	 */
	function _parseValues($nodes, $var)
	{
		if(!is_array($nodes))
		{
			$nodes = array($nodes);
		}

		$value = array();
		foreach($nodes as $node)
		{
			$return = $this->_parseValue($node, $var);
			if($return && is_array($return))
			{
				$value = array_merge($value, $return);
			}
		}

		if($value[$this->lang_type])
		{
			return $value[$this->lang_type];
		}
		else if($value['en'])
		{
			return $value['en'];
		}
		else if($value['ko'])
		{
			return $value['ko'];
		}

		foreach($this->lang_types as $lang_type)
		{
			if($lang_type == 'en' || $lang_type == 'ko' || $lang_type == $this->lang_type)
			{
				continue;
			}
			if($value[$lang_type])
			{
				return $value[$lang_type];
			}
		}

		return '';
	}

	/**
	 * Parsing value node
	 * @param object $node
	 * @param string $var
	 * @return array|bool
	 */
	function _parseValue($node, $var)
	{
		$lang_type = $node->attrs->xml_lang;
		$value = $node->body;
		if(!$value)
		{
			return false;
		}

		$var .= '=\'' . str_replace("'", "\'", $value) . "';\n";
		return array($lang_type => $var);
	}

	/**
	 * Get cache file name
	 * @param string $lang_type
	 * @param string $type
	 * @return string
	 */
	function _getCompiledFileName($lang_type, $type = 'php')
	{
		return sprintf('%s%s.%s.php', $this->compiled_path, md5($this->xml_file), $lang_type);
	}

}