<?php if (!defined('BASEPATH')) exit('No direct script access allowed');
/**
 * MaxSite CMS
 * (c) https://max-3000.com/
 * Функции для ini-файлов
 */

// загружаем ini-файл и запускаем его как php
// в ini-файле можно использовать замену %CURRENTDIR% на текущий каталог этого ini-файла
// а также аналогичную php-переменную $COMPONENT
function mso_get_ini_file($file = '')
{
    if (!file_exists($file)) return false;

    $out = file_get_contents($file);
	
	if ($out) {
		$COMPONENT = basename(dirname($file));
		$out = str_replace('%CURRENTDIR%', $COMPONENT, $out);
		
		ob_start();
		eval('?>' . $out . '<?php ');
		$out = ob_get_contents();
		ob_end_clean();
		
		return parse_ini_string($out, true);
	}
	
	return false;
}

// проверяем есть ли POST
function mso_check_post_ini()
{
    // $CI = &get_instance();

    // проверяем входящие данные - поля всегда одни
    if ($post = mso_check_post(['f_session_id', 'f_options', 'f_submit', 'f_ini'])) {
        // защита рефера
        mso_checkreferer();

        $options = $post['f_options'];

        if (isset($post['f_all_checkbox']))
            $all_checkbox = $post['f_all_checkbox'];
        else
            $all_checkbox = [];

        // добавим к $options $all_checkbox если их нет
        // и сразу заменим on на 1

        // pr($options);
        foreach ($all_checkbox as $key => $val) {
            if (!isset($options[$key])) {
                $options[$key] = '0';
            } else {
                if (!is_array($options[$key]))
                    $options[$key] = '1';
                else
                    $options[$key] = array_map('trim', $options[$key]);
            }
        }

        // pr($options);
        // pr($all_checkbox);

        foreach ($options as $key_type => $val) {
            // разделим имя опции на ключ и группу
            $key_type = explode('_m_s_o_', $key_type);
            $key = $key_type[0];
            $type = $key_type[1];

            // pr($key . ' ' . $val . ' ' . $type, 1);

            // добавляем опцию без mso_refresh_options();
            mso_add_option($key, $val, $type, false);
        }

        mso_refresh_options();
        mso_flush_cache();

        // посколько у нас всегда true, то результат не анализируем
        return true;
    }

    return false;
}

// проверяем вхождение PHP_START функция PHP_END
// если есть, то вычлиняем имя функции и выполняем её - полученный разультат 
// вставляем вместо этой конструкции
// обрабатываются только values, description и default
function _mso_ini_check_php($value)
{
    $value = preg_replace_callback('!(PHP_START)(.*?)(PHP_END)!is', '_mso_ini_check_php_callback', $value);

    return $value;
}

function _mso_ini_check_php_callback($matches)
{
    $f = trim($matches[2]);

    if (function_exists($f))
        $r = $f();
    else
        $r = '';

    return $r;
}

// вывод ini-полей в виде таблицы
function mso_view_ini($all = false)
{
    if (!$all) return '';
    //pr($all);

    $CI = & get_instance();
    $CI->load->library('table');

    $tmpl = [
        'table_open' => '<table class="page "><colgroup style="width: 25%;">',
        'row_alt_start' => '<tr class="alt">',
        'cell_alt_start' => '<td class="alt">',
    ];

    $CI->table->clear(); // очистим, если были старые данные
    $CI->table->set_template($tmpl); // шаблон таблицы

    // заголовки
    //$CI->table->set_heading(t('Настройка'), t('Значение'));

    $table = '';
    $out = '';
    $nav = ''; // блок навигации

    // сформируем массив всех опций - ключей
    $k_where = [];

    foreach ($all as $k => $v) {
        if (isset($v['options_key']) and $v['options_key']) $k_where[] = $v['options_key'];
    }

    // делаем одним запросов выборку всех опций по этим ключам
    $CI->db->where_in('options_key', $k_where);
    $query = $CI->db->get('options');

    if ($query->num_rows() > 0) // есть запись
        $all_options = $query->result_array();
    else
        $all_options = [];

    //pr($all_options);	
    //pr($all);	

    foreach ($all as $key => $row) {
        if (isset($row['options_key']))
            $options_key = stripslashes(trim($row['options_key']));
        else
            continue;

        if (!isset($row['options_type']))
            $options_type = 'general';
        else
            $options_type = stripslashes(trim($row['options_type']));

        if ($options_type === '%TEMPLATE%') $options_type = getinfo('template');

        if (!isset($row['type'])) {
            if ($options_key !== 'none')
                $type = 'textfield';
            else
                $type = 'none';
        } else {
            $type = stripslashes(trim($row['type']));
        }

        if (!isset($row['values']))
            $value = '';
        else
            $values = _mso_ini_check_php(stripslashes(htmlspecialchars(trim($row['values']))));

        if (!isset($row['description']))
            $description = '';
        else {
            // $description = _mso_ini_check_php(stripslashes(trim(t($row['description']))));
            $description = _mso_ini_check_php(trim(t($row['description'])));
            
            $description = str_replace('_NR_', "\n", $description);
            $description = str_replace('_QUOT_', '"', $description);
            $description = str_replace('`', '"', $description); 
            $description = str_replace('_NBSP_', ' ', $description);
        }

        if (!isset($row['delimer']))
            $delimer = '<br>';
        else
            $delimer = stripslashes($row['delimer']);

        if (!isset($row['default']))
            $default = '';
        else
            $default = _mso_ini_check_php(stripslashes(htmlspecialchars(trim($row['default']))));

        if (!isset($row['placeholder']))
            $placeholder = '';
        else
            $placeholder = ' placeholder="' . _mso_ini_check_php(stripslashes(htmlspecialchars(trim($row['placeholder'])))) . '"';

        // дополнительные атрибуты
        $attr = (isset($row['attr'])) ? ' ' . trim($row['attr']) : '';

        // получаем текущее значение опции из массива $all_options
        $options_present = false;
        $value = t($default); // нет значения, поэтому берем дефолт

        foreach ($all_options as $v) {
            if ($v['options_type'] == $options_type and $v['options_key'] == $options_key) {
                $value = htmlspecialchars($v['options_value']);
                $options_present = true; // признак, что опция есть в базе
                break;
            }
        }

        $f = NR;

        // тип none не создает поля - фиктивная опция
        if ($options_key != 'none')
            $name_f = 'f_options[' . $options_key . '_m_s_o_' . $options_type . ']'; // название поля 
        else
            $name_f = '';

        // если это субсекция, то выводим её перед опцей
        if (isset($row['subsection'])) {
            $CI->table->add_row(array('colspan' => 2, 'class' => 'subsection', 'data' =>  $row['subsection']));
        }

        if ($type == 'textfield') {
            $value = str_replace('_QUOT_', '&quot;', $value);
            $value = str_replace('`', '&quot;', $value); 
            $value = str_replace('_NBSP_', ' ', $value);

            // в этом типе может быть свой type для input
            if (!isset($row['textfield_type']))
                $textfield_type = 'text';
            else
                $textfield_type = stripslashes($row['textfield_type']);

            $f .= '<input type="' . $textfield_type . '" name="' . $name_f . '" value="' . $value . '"' . $placeholder . $attr . '>' . NR;
        } elseif ($type == 'color') {
            $f .= mso_load_jquery('jscolor.js', getinfo('common_url') . 'jquery/jscolor/');
            $f .= '<input type="text" name="' . $name_f . '" value="' . $value . '" class="color"' . $placeholder . '>' . NR;
        } elseif ($type == 'textarea') {
            $value = str_replace('_NR_', "\n", $value);
            $value = str_replace('_QUOT_', '&quot;', $value);
            $value = str_replace('`', '&quot;', $value); 
            $value = str_replace('_NBSP_', ' ', $value);

            if (!isset($row['rows']) or $row['rows'] == 'auto') {
                $ra = explode("\n", $value);
                $rr = count($ra);

                // если в строке больше 65 символов, добавляем row
                foreach ($ra as $rs) {
                    $l = mb_strlen($rs, 'UTF8');
                    if ($l > 65) $rr = $rr + floor($l / 65);
                }

                if ($rr > 20) $rr = 20;
            } else {
                $rr = (int) $row['rows'];
            }

            if ($rr < 2)  $rr = 2;

            $f .= '<textarea rows="' . $rr . '" name="' . $name_f . '"' . $placeholder . $attr . '>' . $value . '</textarea>' . NR;
        } elseif ($type == 'checkbox') {
            if ($value)
                $checked = 'checked="checked"';
            else
                $checked = '';

            $f .= '<label><input type="checkbox" name="' . $name_f . '" ' . $checked . '> '
                . t($key) . '</label>'
                . NR;

            $f .= '<input type="hidden" name="f_all_checkbox[' . $options_key . '_m_s_o_' . $options_type . ']">' . NR;
        } elseif ($type == 'multicheckbox') {

            $mr = $value; // отмеченные пункты - массив в виде стандартного option

            if ($mr) {
                // если $mr == 0, значит ни один пункт не отмечен
                // служебные замены
                $mr = str_replace('&amp;', '&', $mr);
                $mr = str_replace('&quot;', '"', $mr);

                if (preg_match('|_serialize_|A', $mr)) {
                    $mr = preg_replace('|_serialize_|A', '', $mr, 1);
                    $mr = @unserialize($mr);
                }

                if (!is_array($mr)) $mr = [$mr];
            } else {
                $mr = [];
            }

            // $mr теперь массив!

            $values = explode('#', $values);

            if ($values) {
                foreach ($values as $val) {
                    $ar = explode('||', $val);

                    if (isset($ar[0])) $mr1 = trim($ar[0]); // ключ чекбокса

                    if (isset($ar[1]))
                        $mr2 = trim($ar[1]); // если есть название
                    else
                        $mr2 = $mr1;

                    if (in_array($mr1, $mr))
                        $checked = 'checked="checked"';
                    else
                        $checked = '';

                    //для каждого чекбокса свой ключ!
                    // $mkey = $options_key . '_' . mso_slug($mr1) . '_m_s_o_' . $options_type;
                    // $name_f1 = 'f_options[' . $mkey . ']';

                    $f .= '<label><input type="checkbox" name="' . $name_f . '[]" value="' . $mr1 . '" '
                        . $checked . '> ' . t($mr2) . '</label>' . $delimer . NR;
                }

                $f .= '<input type="hidden" name="f_all_checkbox[' . $options_key . '_m_s_o_' . $options_type . ']">' . NR;
            }
        } elseif ($type == 'radio') {
            $values = explode('#', $values); // все значения разделены #

            if ($values) {
                foreach ($values as $val) {
                    $ar = explode('||', $val);

                    if (isset($ar[0])) $mr1 = trim($ar[0]); // ключ

                    if (isset($ar[1]))
                        $mr2 = trim($ar[1]); // если есть название
                    else
                        $mr2 = $mr1;

                    if ($value == trim($mr1))
                        $checked = 'checked="checked"';
                    else
                        $checked = '';

                    // преобразование в html
                    $mr2 = str_replace('_QUOT_', '"', $mr2);
                    $mr2 = str_replace('&lt;', '<', $mr2);
                    $mr2 = str_replace('&gt;', '>', $mr2);

                    $f .= '<label><input type="radio" name="' . $name_f . '" value="' . $mr1 . '" '
                        . $checked . '> ' . t($mr2) . '</label>' . $delimer . NR;
                }
            }
        } elseif ($type == 'select') {
            $values = explode('#', $values); // все значения разделены #

            if ($values) {
                $f .= '<select name="' . $name_f . '">';

                foreach ($values as $val) {
                    // $val может быть с || val - текст

                    $val = trim($val);
                    $val_t = $val;

                    $ar = explode('||', $val);
                    if (isset($ar[0])) $val = trim($ar[0]);
                    if (isset($ar[1])) $val_t = trim($ar[1]);

                    if ($value == $val)
                        $checked = 'selected="selected"';
                    else
                        $checked = '';
                    $f .= NR . '<option value="' . $val . '" ' . $checked . '>' . t($val_t) . '</option>';
                }
                $f .= NR . '</select>' . NR;
            }
        }

        if ($description) $f .= '<p><em>' .  t($description) . '</em></p>';

        if ($options_key != 'none') {
            if (!$options_present)
                $key = '<span title="' . $options_key . ' (' . $options_type . ')" class="mso-alert">* ' . t($key) . '</span>';
            else
                $key = '<strong title="' . $options_key . ' (' . $options_type . ')">' . t($key) . '</strong>';
        } else {
            $key = '';
        }

        // если есть новая секция, то выводим пустую инфо-строчку
        if (isset($row['section'])) {
            if ($CI->table->rows) $table .= $CI->table->generate();

            $CI->table->clear(); // очистим, если были старые данные

            $tmpl['table_open'] = NR . '<table class="page page-responsive section_' . mso_slug($row['section']) . '"><colgroup style="width: 25%;">';

            $CI->table->set_template($tmpl); // шаблон таблицы

            $section_css_style = isset($row['section_css_style']) ? $row['section_css_style'] : '';

            if (isset($row['section_description'])) {
                $CI->table->add_row(
                    [
                        'class' => 'section', 'colspan' => 2,
                        'style' => $section_css_style,
                        'data' => '<a id="a-' . mso_slug($row['section']) . '"></a><h2 class="section">' . t($row['section']) . '</h2><p>' . t($row['section_description']) . '</p>'
                    ]
                );
            } else {
                $CI->table->add_row(
                    [
                        'class' => 'section', 'colspan' => 2,
                        'style' => $section_css_style,
                        'data' => '<a id="a-' . mso_slug($row['section']) . '"></a><div class="section"><h2>' . t($row['section']) . '</h2></div>'
                    ]
                );
            }

            $nav .= '<a href="#a-' . mso_slug($row['section']) . '" id="' . mso_slug($row['section']) . '">' . t($row['section']) . '</a>    ';
        }

        if ($key) $CI->table->add_row($key, $f);
    }

    if ($CI->table->rows) $table .= $CI->table->generate(); // последняя генерация

    $out .= '<form action="' . mso_current_url(true) . '" method="post">' . mso_form_session('f_session_id');
    $out .= '<a id="atop"></a><input type="hidden" value="1" name="f_ini">'; // доп. поле - индикатор, что это ini-форма
    if ($nav) $out .= '<p class="nav">' . str_replace('    ', '<span class="sep"></span>', trim($nav)) . '</p>';

    $out .= $table; // вывод подготовленной таблицы

    $out .= NR . '<a id="abottom"></a><button type="submit" name="f_submit" class="mso-save-ini i-save">' . t('Сохранить') . '</button>';
    $out .= '</form>';

    $out .= mso_load_jquery('jquery.cookie.js') . "
<script>
    $(function()
    {
        $('table.page').hide();

        var NameCookie = 'curSection_" . mso_segment(2) . "',
        cookieIndex = $.cookie(NameCookie);

        if (cookieIndex != null && $('table').is('.section_'+cookieIndex)) // есть кука и есть соответсвующая ей таблица
        {
            $('table.section_'+cookieIndex).show();
            $('#'+cookieIndex).addClass('current');
        }
        else // если нет куки или соответвующей таблицы
        {
            $('table.page:first').show(); // показывем только первую таблицу
            $('p.nav a:first').addClass('current'); // к первому пункту навигации добавляем класс
        }

        $('p.nav a').click(function(){
            var id = $(this).attr('id');
            $('table.page').hide();

            $(this).addClass('current').siblings().removeClass(); // добавляем класс на кликнутый пункт, а у всех соседних удаляем
            $('table.section_'+id).fadeIn(400);
            $.cookie(NameCookie, id, {expires: 30, path: '/'});
            return false;
        });
    });
</script>";

    return $out;
}

// преобразование values в массив ключ => описание, заданного в ini-файле в виде ключ || описание
// если описания нет, то описание = ключ 
function mso_parse_ini_values($values = '')
{
    if (!$values) return [];

    $values = _mso_ini_check_php(stripslashes(htmlspecialchars(trim($values))));
    $values = explode('#', $values); // все значения разделены #

    $out = [];

    if ($values) {
        foreach ($values as $val) {
            // $val может быть с || val - текст

            $val = trim($val);
            $val_t = $val;

            $ar = explode('||', $val);
            if (isset($ar[0])) $val = trim($ar[0]);
            if (isset($ar[1])) $val_t = trim($ar[1]);

            $out[$val] = $val_t;
        }
    }

    return $out;
}

// возвращает массив заданный в ini-файле в options_key
// заменяет название элемента массива с названия на options_key 
// при этом добавляет поле options_name, равное названию опции
function mso_find_options_key($metas = [], $key = '')
{
    if (!$metas) return [];
    if (!$key) return [];

    // проходимся о массиву и смотрим все options_key
    // как только находим нужное, выходим
    $out = [];

    foreach ($metas as $k => $meta) {
        if (isset($meta['options_key']) and $meta['options_key'] == $key) {
            $out[$key] = $meta;
            $out[$key]['options_name'] = $k;
            break;
        }
    }

    return $out;
}


# end of file