<?php
/**
 * MyBB 1.8
 * Copyright 2014 MyBB Group, All Rights Reserved
 *
 * Website: http://www.mybb.com
 * License: http://www.mybb.com/about/license
 *
 */

#[AllowDynamicProperties]
class MyLanguage
{

	/**
	 * The path to the languages folder.
	 *
	 * @var string
	 */
	public $path;

	/**
	 * The language we are using and the area (if admin).
	 * 
	 * For example 'english' or 'english/admin'.
	 *
	 * @var string
	 */
	public $language;

	/**
	 * The fallback language we are using and the area (if admin).
	 * 
	 * For example 'english' or 'english/admin'.
	 *
	 * @var string
	 */
	public $fallback = 'english';

	/**
	 * The fallback language we are using.
	 *
	 * @var string
	 */
	public $fallbackLanguage = 'english';

	/**
	 * Information about the current language.
	 *
	 * @var array
	 */
	public $settings;

	/**
	 * Set the path for the language folder.
	 *
	 * @param string $path The path to the language folder.
	 */
	function set_path($path)
	{
		$this->path = $path;
	}

	/**
	 * Check if a specific language exists.
	 *
	 * @param string $language The language to check for.
	 * @return boolean True when exists, false when does not exist.
	 */
	function language_exists($language)
	{
		$language = preg_replace("#[^a-z0-9\-_]#i", "", $language);
		if(file_exists($this->path."/".$language.".php"))
		{
			return true;
		}
		else
		{
			return false;
		}
	}

	/**
	 * Set the language for an area.
	 *
	 * @param string $language The language to use.
	 * @param string $area The area to set the language for.
	 */
	function set_language($language="", $area="user")
	{
		global $mybb;

		$language = preg_replace("#[^a-z0-9\-_]#i", "", $language);

		// Use the board's default language
		if($language == "")
		{
			$language = $mybb->settings['bblanguage'];
		}

		// Check if the language exists.
		if(!$this->language_exists($language))
		{
			die("Language $language ($this->path/$language) is not installed");
		}

		$this->language = $language;
		require $this->path."/".$language.".php";
		$this->settings = $langinfo;

		// Load the admin language files as well, if needed.
		if($area == "admin")
		{
			if(!is_dir($this->path."/".$language."/{$area}"))
			{
				if(!is_dir($this->path."/".$mybb->settings['cplanguage']."/{$area}"))
				{
					if(!is_dir($this->path."/english/{$area}"))
					{
						die("Your forum does not contain an Administration set. Please reupload the english language administration pack.");
					}
					else
					{
						$language = "english";
					}
				}
				else
				{
					$language = $mybb->settings['cplanguage'];
				}
			}
			$this->language = $language."/{$area}";
			$this->fallback = $this->fallbackLanguage."/{$area}";
		}
	}

	/**
	 * Load the language variables for a section.
	 *
	 * @param string $section The section name.
	 * @param boolean $forceuserarea Should use the user area even if in admin? For example for datahandlers
	 * @param boolean $supress_error supress the error if the file doesn't exist?
	 */
	function load($section, $forceuserarea=false, $supress_error=false)
	{
		$language = $this->language;
		$fallback = $this->fallback;

		if($forceuserarea === true)
		{
			$language = str_replace('/admin', '', $language);
			$fallback = str_replace('/admin', '', $fallback);
		}

		$lfile = $this->path."/".$language."/".$section.".lang.php";
		$ffile = $this->path."/".$fallback."/".$section.".lang.php";

		if(file_exists($lfile))
		{
			require $lfile;
		}
		elseif(file_exists($ffile))
		{
			require $ffile;
		}
		else
		{
			if($supress_error != true)
			{
				die("$lfile does not exist");
			}
		}

		// We must unite and protect our language variables!
		$lang_keys_ignore = array('language', 'fallback', 'fallbackLanguage', 'path', 'settings');

		if(isset($l) && is_array($l))
		{
			foreach($l as $key => $val)
			{
				if((empty($this->$key) || $this->$key != $val) && !in_array($key, $lang_keys_ignore))
				{
					$this->$key = $val;
				}
			}
		}
	}

	/**
	 * @param string $string
	 *
	 * @return string
	 */
	function sprintf($string)
	{
		$arg_list = func_get_args();
		$num_args = count($arg_list);

		for($i = 1; $i < $num_args; $i++)
		{
			$string = str_replace('{'.$i.'}', $arg_list[$i], $string);
		}

		return $string;
	}

	/**
	 * Get the language variables for a section.
	 *
	 * @param boolean $admin Admin variables when true, user when false.
	 * @return array The language variables.
	 */
	function get_languages($admin=false)
	{
		$dir = @opendir($this->path);
		while($lang = readdir($dir))
		{
			$ext = my_strtolower(get_extension($lang));
			if($lang != "." && $lang != ".." && $ext == "php")
			{
				$lname = str_replace(".".$ext, "", $lang);
				require $this->path."/".$lang;
				if(!$admin || ($admin && $langinfo['admin']))
				{
					$languages[$lname] = $langinfo['name'];
				}
			}
		}
		@ksort($languages);
		return $languages;
	}

	/**
	 * Parse contents for language variables.
	 *
	 * @param string $contents The contents to parse.
	 * @return string The parsed contents.
	 */
	function parse($contents)
	{
		$contents = preg_replace_callback("#<lang:([a-zA-Z0-9_]+)>#", array($this, 'parse_replace'), $contents);
		return $contents;
	}

	/**
	 * Replace content with language variable.
	 *
	 * @param array $matches Matches.
	 * @return string Language variable.
	 */
	function parse_replace($matches)
	{
		return $this->{$matches[1]};
	}
}