<?php
/**
 * Smarty read include path plugin
 *
 * @package    Smarty
 * @subpackage PluginsInternal
 * @author     Monte Ohrt
 */

/**
 * Smarty Internal Read Include Path Class
 *
 * @package    Smarty
 * @subpackage PluginsInternal
 */
class Smarty_Internal_Get_Include_Path
{
    /**
     * include path cache
     *
     * @var string
     */
    static $_include_path = '';

    /**
     * include path directory cache
     *
     * @var array
     */
    static $_include_dirs = array();

    /**
     * include path directory cache
     *
     * @var array
     */
    static $_user_dirs = array();

    /**
     * stream cache
     *
     * @var string[]
     */
    static $isFile = array();

    /**
     * stream cache
     *
     * @var string[]
     */
    static $isPath = array();

    /**
     * stream cache
     *
     * @var int[]
     */
    static $number = array();

    /**
     * status cache
     *
     * @var bool
     */
    static $_has_stream_include = null;

    /**
     * Number for array index
     *
     * @var int
     */
    static $counter = 0;

    /**
     * Check if include path was updated
     *
     * @param \Smarty $smarty
     *
     * @return bool
     */
    public static function isNewIncludePath(Smarty $smarty)
    {
        $_i_path = get_include_path();
        if (self::$_include_path != $_i_path) {
            self::$_include_dirs = array();
            self::$_include_path = $_i_path;
            $_dirs = (array) explode(PATH_SEPARATOR, $_i_path);
            foreach ($_dirs as $_path) {
                if ($_path[0] != '/' && isset($dir[1]) && $dir[1] != ':') {
                    $_path = $smarty->_realpath($_path . DS, true);
                }
                if (is_dir($_path)) {
                    self::$_include_dirs[] = $smarty->_realpath($_path . DS, true);
                }
            }
            return true;
        }
        return false;
    }

    /**
     * return array with include path directories
     *
     * @param \Smarty $smarty
     *
     * @return array
     */
    public static function getIncludePathDirs(Smarty $smarty)
    {
        Smarty_Internal_Get_Include_Path::isNewIncludePath($smarty);
        return self::$_include_dirs;
    }

    /**
     * Return full file path from PHP include_path
     *
     * @param  string[] $dirs
     * @param  string   $file
     * @param \Smarty   $smarty
     *
     * @return bool|string full filepath or false
     *
     */
    public static function getIncludePath($dirs, $file, Smarty $smarty)
    {
        if (!(isset(self::$_has_stream_include) ? self::$_has_stream_include : self::$_has_stream_include = function_exists('stream_resolve_include_path'))) {
            self::isNewIncludePath($smarty);
        }
        // try PHP include_path
        foreach ($dirs as $dir) {
            $dir_n = isset(self::$number[$dir]) ? self::$number[$dir] : self::$number[$dir] = self::$counter ++;
            if (isset(self::$isFile[$dir_n][$file])) {
                if (self::$isFile[$dir_n][$file]) {
                    return self::$isFile[$dir_n][$file];
                } else {
                    continue;
                }
            }
            if (isset(self::$_user_dirs[$dir_n])) {
                if (false === self::$_user_dirs[$dir_n]) {
                    continue;
                } else {
                    $dir = self::$_user_dirs[$dir_n];
                }
            } else {
                if ($dir[0] == '/' || $dir[1] == ':') {
                    $dir = str_ireplace(getcwd(), '.', $dir);
                    if ($dir[0] == '/' || $dir[1] == ':') {
                        self::$_user_dirs[$dir_n] = false;
                        continue;
                    }
                }
                $dir = substr($dir, 2);
                self::$_user_dirs[$dir_n] = $dir;
            }
            if (self::$_has_stream_include) {
                $path = stream_resolve_include_path($dir . (isset($file) ? $file : ''));
                if ($path) {
                    return self::$isFile[$dir_n][$file] = $path;
                }
            } else {
                foreach (self::$_include_dirs as $key => $_i_path) {
                    $path = isset(self::$isPath[$key][$dir_n]) ? self::$isPath[$key][$dir_n] : self::$isPath[$key][$dir_n] = is_dir($_dir_path = $_i_path .
                        $dir) ? $_dir_path : false;
                    if ($path === false) {
                        continue;
                    }
                    if (isset($file)) {
                        $_file = self::$isFile[$dir_n][$file] = (is_file($path . $file)) ? $path . $file : false;
                        if ($_file) {
                            return $_file;
                        }
                    } else {
                        // no file was given return directory path
                        return $path;
                    }
                }
            }
        }
        return false;
    }
}