<?php

// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
//
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
// $Id$

class Tracker_Options
{
    private $data = [];
    private $info;

    private function __construct()
    {
    }

    public static function fromSerialized($json, array $info)
    {
        $options = new Tracker_Options();
        $options->info = $info;
        $options->data = json_decode($json, true);

        return $options;
    }

    public static function fromString($string, array $info)
    {
        $options = new Tracker_Options();
        $options->info = $info;

        $parts = preg_split('/\s*,\s*/', trim($string));

        foreach ($parts as $key => $value) {
            if (empty($value)) {
                continue;
            }

            if ($field = $options->getParamDefinitionFromIndex($key)) {
                if (isset($field['count']) && $field['count'] == '*') {
                    // Count is last, always
                    $options->setParam($field['key'], array_values(array_slice($parts, $key)));
                    break;
                } elseif (isset($field['separator'])) {
                    $options->setParam($field['key'], explode($field['separator'], $value));
                } else {
                    $options->setParam($field['key'], $value);
                }
            }
        }

        return $options;
    }

    public static function fromArray(array $rawData, array $typeInfo)
    {
        $options = new Tracker_Options();
        $options->info = $typeInfo;

        foreach ($rawData as $key => $value) {
            if ($def = $options->getParamDefinition($key)) {
                if (is_string($value)) {
                    if (isset($def['count']) && $def['count'] == '*') {
                        $value = explode(',', $value);
                    } elseif (isset($def['separator'])) {
                        $value = explode($def['separator'], $value);
                    }
                }

                $options->setParam($key, $value);
            }
        }

        return $options;
    }

    public static function fromInput(JitFilter $input, array $typeInfo)
    {
        $options = new Tracker_Options();
        $options->info = $typeInfo;

        foreach ($typeInfo['params'] as $key => $info) {
            $filter = $info['filter'];

            if (isset($info['count']) && $info['count'] === '*') {
                $rawValue = $input->$key->none();
                if ($rawValue !== '') {
                    $commaItems = explode(',', $rawValue);
                    $optionItems = [];

                    if (! empty($commaItems)) {
                        $commaItem = '';
                        foreach ($commaItems as $item) {
                            // one word quoted. ex: "bananas" or option1="bananas"
                            if (preg_match('/^(").*\1$|^.*=(").*\2$/', trim($item))) {
                                array_push($optionItems, $item);
                            } elseif (strpos($item, '"') !== false) {
                                if ($commaItem == '') {
                                    $commaItem = $item;
                                } else {
                                    $commaItem = $commaItem . ',' . $item;
                                    array_push($optionItems, $commaItem);
                                    $commaItem = '';
                                }
                            } elseif ($commaItem !== '') {
                                $commaItem = $commaItem . ',' . $item;
                            } else {
                                array_push($optionItems, $item);
                            }
                        }
                        $optionItems = array_map('trim', $optionItems);

                        $filter = TikiFilter::get($filter);
                        $values = array_map([$filter, 'filter'], $optionItems);
                    } else {
                        $values = '';
                    }
                } else {
                    $values = '';
                }

                $options->setParam($key, $values);
            } elseif (isset($info['separator'])) {
                $input->replaceFilter($key, $filter);
                $values = $input->asArray($key, $info['separator']);

                $options->setParam($key, $values);
            } else {
                $options->setParam($key, $input->$key->$filter());
            }
        }

        return $options;
    }

    private function getParamDefinitionFromIndex($key)
    {
        foreach ($this->info['params'] as $paramKey => $info) {
            if (isset($info['legacy_index']) && $key == $info['legacy_index']) {
                return $this->getParamDefinition($paramKey);
            }
        }
    }

    public function getParamDefinition($key)
    {
        if (isset($this->info['params'][$key])) {
            $data = $this->info['params'][$key];
            $data['key'] = $key;

            return $data;
        }
    }

    private function setParam($key, $value)
    {
        $this->data[$key] = $value;
    }

    public function getParam($key, $default = false)
    {
        if (isset($this->data[$key]) && ($this->data[$key] !== '' || ! is_array($default))) {
            return $this->data[$key];
        } elseif ($default === false && $def = $this->getParamDefinition($key)) {
            if (isset($def['default'])) {
                return $def['default'];
            } elseif ($default === false && isset($def['separator'])) {
                return [];
            }
        }

        return $default;
    }

    public function getParamFromIndex($index, $default = false)
    {
        if ($field = $this->getParamDefinitionFromIndex($index)) {
            return $this->getParam($field['key'], $default);
        } else {
            return $default;
        }
    }

    public function getAllParameters()
    {
        $out = [];

        if (isset($this->info['params']) && is_array($this->info['params'])) {
            foreach (array_keys($this->info['params']) as $key) {
                $out[$key] = $this->getParam($key);
            }
        }

        return $out;
    }

    public function serialize()
    {
        return json_encode($this->data);
    }

    public function buildOptionsArray()
    {
        $out = [];
        foreach ($this->getLegacySort() as $key) {
            $info = $this->getParamDefinition($key);
            $value = $this->getParam($key);
            if (isset($info['count']) && $info['count'] == '*') {
                $values = (array) $value;
            } elseif (isset($info['separator']) && is_array($value)) {
                $values = [implode($info['separator'], $value)];
            } else {
                $values = [$value];
            }

            foreach ($values as $v) {
                $out[] = $v;
            }
        }

        return $out;
    }

    private function getLegacySort()
    {
        $out = [];
        if (isset($this->info) && ! empty($this->info['params'])) {
            foreach ($this->info['params'] as $key => $info) {
                if (isset($info['legacy_index'])) {
                    $out[$key] = $info['legacy_index'];
                }
            }
            asort($out);
        }
        return array_keys($out);
    }
}