<?php

class Frwd_ConfigLite
{
    public function __construct($fileName = null, $localFileName = null, $section = null)
    {
        if (null == $fileName) {
            $fileName = dirname(__FILE__) . '/config.php';
        }
        if (null == $localFileName) {
            $localFileName = dirname(__FILE__) . '/local.config.php';
        }
        $config = include($fileName);

        if (file_exists($localFileName) && is_file($localFileName)) {
            $localConfig = include($localFileName);
            if (!is_array($localConfig)) {
                die('local.config.php should return an array');
            }
            $config = $this->_arrayMergeRecursive($config, $localConfig);
        }
        if (!defined('PATH_SEPARATOR')) {
            $config[$section]['PATH_SEPARATOR'] = (getenv('COMSPEC')) ? ';' : ':';
        }
        if (null === $config['define']['DEBUG']) {
            $config['define']['DEBUG'] = (
                    self::isReservedIp(self::getServer('REMOTE_ADDR'))
                    || in_array(self::getServer('REMOTE_ADDR'), $config['debug']['ips'])
                ) && self::getCookie($config['debug']['cookie']);
        }
        $this->_initBaseurlWebpath($config[$section]);
        $config[$section]['BASE_PATH'] = realpath($config[$section]['WWW_PATH'] . '/' . $config[$section]['BASE_PATH']);
        if (!isset($config[$section]['SESSION_SAVE_PATH'])) {
            $config[$section]['SESSION_SAVE_PATH'] = $config[$section]['BASE_PATH'] . '/tmp/session';
        }

        define('APPLICATION_ENV', $config[$section]['APPLICATION_ENV']);
        define('SITE_NAME', $config[$section]['SITE_NAME']);
        define('BASE_PATH', $config[$section]['BASE_PATH']);
        define('SESSION_SAVE_PATH', $config[$section]['SESSION_SAVE_PATH']);
        define('BASE_URL', $config[$section]['BASE_URL']);
        define('DEBUG', $config[$section]['DEBUG']);
        define('WWW_PATH', $config[$section]['WWW_PATH']);
        define('WEB_PATH', $config[$section]['WEB_PATH']);
        define('BASE_URL_HTTP', $config[$section]['BASE_URL_HTTP']);
        define('BASE_URL_HTTPS', $config[$section]['BASE_URL_HTTPS']);
        define('COMPRESS_HTML', $config[$section]['COMPRESS_HTML']);
        define('OPTIMIZE_RESOURCES', $config[$section]['OPTIMIZE_RESOURCES']);
        define('USE_PACKED_RESOURCES', $config[$section]['USE_PACKED_RESOURCES']);

        foreach ($config[$section] as $var => $value) {
            $var = strtoupper($var);
            if (!defined($var)) {
                define($var, $value);
            }
        }
    }

    public static function getServer($field = null, $default = null)
    {
        return self::get($_SERVER, $field, $default);
    }

    public static function getCookie($field = null, $default = null)
    {
        return self::get($_COOKIE, $field, $default);
    }

    public static function get(array $array, $field = null, $default = null)
    {
        if (null === $field) {
            return $array;
        }
        if (!array_key_exists($field, $array)) {
            return $default;
        }
        return $array[$field];
    }

    public static function isReservedIp($ip)
    {
        $long = ip2long($ip);
        // check for 10.0.0.0 - 10.255.255.255
        if (10 == $long >> 24) {
            return true;
        }
        // TODO check for 172.16.0.0 - 172.31.255.255
        // TODO check for 192.168.0.0 - 192.168.255.255
        return false;
    }

    protected function _initBaseurlWebpath(&$config)
    {
        $host = ((self::getServer('HTTPS') == 'on') ? 'https://' : 'http://') . self::getServer('HTTP_HOST');

        $config['WWW_PATH'] = realpath('.');

        $config['BASE_URL'] = $host . str_replace(basename(self::getServer('SCRIPT_NAME')), '', self::getServer('SCRIPT_NAME'));
        $config['BASE_URL'] = substr($config['BASE_URL'], 0, -1);

        while (!is_file($config['WWW_PATH'] . '/_lib/_sys/Frwd_ConfigLite.php')) {
            $config['WWW_PATH'] = dirname($config['WWW_PATH']);
            $config['BASE_URL'] = dirname($config['BASE_URL']);
            if ('/' == $config['WWW_PATH']) {
                die('INCORECT SCRIPT LOCATION');
            }
        }

        $config['BASE_URL_HTTP'] = str_replace('https://', 'http://', $config['BASE_URL']);
        $config['BASE_URL_HTTPS'] = str_replace('http://', 'https://', $config['BASE_URL']);
        $config['WEB_PATH'] = str_replace($host, '', $config['BASE_URL']);

        return true;
    }

    protected function _arrayMergeRecursive($array1, $array2)
    {
        if (is_array($array1) && is_array($array2)) {
            foreach ($array2 as $key => $value) {
                if (isset($array1[$key])) {
                    $array1[$key] = $this->_arrayMergeRecursive($array1[$key], $value);
                } else {
                    $array1[$key] = $value;
                }
            }
        } else {
            $array1 = $array2;
        }
        return $array1;
    }
}