# -*- coding: utf-8 -*-

import os
import re
import shutil
import time

from pyload import PKGDIR

from ... import exc_logger

# CONFIG_VERSION
__version__ = 2


class ConfigParser:
    """
    holds and manage the configuration.

    current dict layout:

    {

     section : {
      option : {
            value:
            type:
            desc:
      }
      desc:

    }
    """

    _CONFLINE = re.compile(
        r'\s*(?P<T>.+?)\s+(?P<N>[^ ]+?)\s*:\s*"(?P<D>.+?)"\s*=\s?(?P<V>.*)'
    )
    _SECTLINE = re.compile(r'(.+?)\s+-\s+"(.+?)":')
    _VERSION = re.compile(r"\s*version\s*:\s*(\d+)")

    def __init__(self, userdir):
        """
        Constructor.
        """
        self.config = {}  #: the config values
        self.plugin = {}  #: the config for plugins

        # TODO: Recheck
        configdir = os.path.join(userdir, "settings")
        os.makedirs(configdir, exist_ok=True)

        self.configpath = os.path.join(configdir, "pyload.cfg")
        self.pluginpath = os.path.join(configdir, "plugins.cfg")

        self.plugin_cb = None  #: callback when plugin config value is changed

        self.check_version()

        self.read_default_config()

    def check_version(self, n=0):
        """
        determines if config need to be copied.
        """
        try:
            if not os.path.exists(self.configpath):
                os.makedirs(os.path.dirname(self.configpath), exist_ok=True)
                shutil.copy(
                    os.path.join(PKGDIR, "core", "config", "default.cfg"),
                    self.configpath,
                )
                os.chmod(self.configpath, 0o600)

            if not os.path.exists(self.pluginpath):
                os.makedirs(os.path.dirname(self.pluginpath), exist_ok=True)
                with open(self.pluginpath, mode="w") as fp:
                    fp.write(f"version: {__version__}")
                os.chmod(self.pluginpath, 0o600)

            with open(self.configpath) as fp:
                content = fp.read()

            m_ver = self._VERSION.search(content)
            if m_ver is None or int(m_ver.group(1)) < __version__:
                shutil.copy(
                    os.path.join(PKGDIR, "core", "config", "default.cfg"),
                    self.configpath,
                )
                print("Old version of config was replaced")

            with open(self.pluginpath) as fp:
                content = fp.read()

            m_ver = self._VERSION.search(content)
            if m_ver is None or int(m_ver.group(1)) < __version__:
                with open(self.pluginpath, mode="w") as fp:
                    fp.write(f"version: {__version__}")

                print("Old version of plugin-config replaced")

        except Exception:
            if n < 3:
                time.sleep(1)
                self.check_version(n + 1)
            else:
                raise

    def read_default_config(self):
        """
        reads the config file.
        """
        self.config = self.parse_config(
            os.path.join(PKGDIR, "core", "config", "default.cfg")
        )
        self.plugin = self.parse_config(self.pluginpath)

        try:
            homeconf = self.parse_config(self.configpath)
            self.update_values(homeconf, self.config)

        except Exception as exc:
            exc_logger.exception(exc)

    def parse_config(self, config_file):
        """
        parses a given configfile.
        """
        with open(config_file) as fp:

            config = fp.read()

            config = config.splitlines()[1:]

            conf = {}

            section, option, value, typ, desc = "", "", "", "", ""

            listmode = False

            for line in config:
                comment = line.rfind("#")
                if (
                    line.find(":", comment) < 0 > line.find("=", comment)
                    and comment > 0
                    and line[comment - 1].isspace()
                ):
                    line = line.rpartition("#")  #: removes comments
                    if line[1]:
                        line = line[0]
                    else:
                        line = line[2]

                line = line.strip()

                try:
                    if line == "":
                        continue
                    m = self._SECTLINE.match(line)
                    if m is not None:
                        section, desc = m.groups()
                        conf[section] = {"desc": desc}
                    else:
                        if listmode:
                            if line.endswith("]"):
                                listmode = False
                                line = line.replace("]", "")

                            value += [
                                self.cast(typ, x.strip()) for x in line.split(",") if x
                            ]

                            if not listmode:
                                conf[section][option] = {
                                    "desc": desc,
                                    "type": typ,
                                    "value": value,
                                }

                        else:
                            m = self._CONFLINE.search(line)

                            typ = m.group("T")
                            option = m.group("N")
                            desc = m.group("D").strip()
                            value = m.group("V").strip()

                            if value.startswith("["):
                                if value.endswith("]"):
                                    listmode = False
                                    value = value[:-1]
                                else:
                                    listmode = True

                                value = [
                                    self.cast(typ, x.strip())
                                    for x in value[1:].split(",")
                                    if x
                                ]
                            else:
                                value = self.cast(typ, value)

                            if not listmode:
                                conf[section][option] = {
                                    "desc": desc,
                                    "type": typ,
                                    "value": value,
                                }

                except Exception as exc:
                    exc_logger.exception(exc)

        return conf

    def update_values(self, config, dest):
        """
        sets the config values from a parsed config file to values in destination.
        """
        for section in config.keys():
            if section in dest:
                for option in config[section].keys():
                    if option in ("desc", "outline"):
                        continue

                    if option in dest[section]:
                        dest[section][option]["value"] = config[section][option][
                            "value"
                        ]

                        # else:
                        #    dest[section][option] = config[section][option]

                        # else:
                        #    dest[section] = config[section]

    def save_config(self, config, filename):
        """
        saves config to filename.
        """
        with open(filename, mode="w") as fp:
            os.chmod(filename, 0o600)
            fp.write(f"version: {__version__} \n")
            for section in sorted(config.keys()):
                fp.write(f'\n{section} - "{config[section]["desc"]}":\n')

                for option, data in sorted(
                    config[section].items(), key=lambda _x: _x[0]
                ):
                    if option in ("desc", "outline"):
                        continue

                    if isinstance(data["value"], list):
                        value = "[ \n"
                        for x in data["value"]:
                            value += f"\t\t{x},\n"
                        value += "\t\t]\n"
                    else:
                        value = str(data["value"]) + "\n"

                    fp.write(f'\t{data["type"]} {option} : "{data["desc"]}" = {value}')

    def cast(self, typ, value):
        """
        cast value to given format.
        """
        if typ == "int":
            return int(value)

        elif typ == "float":
            return float(value)

        elif typ == "str":
            return "" if value is None else str(value)

        elif typ == "bytes":
            return b"" if value is None else bytes(value)

        elif typ == "bool":
            value = "" if value is None else str(value)
            return value.lower() in ("1", "true", "on", "yes", "y")

        elif typ == "time":
            default_value = "0:00"
            value = "" if value is None else str(value)
            if not value:
                value = default_value
            elif ":" not in value:
                value += ":00"

            hours, seconds = value.split(":", 1)
            if (
                hours.isnumeric()
                and seconds.isnumeric()
                and 0 <= int(hours) <= 23
                and 0 <= int(seconds) <= 59
            ):
                pass
            else:
                value = default_value

            return value

        elif typ in ("file", "folder"):
            return (
                ""
                if value in (None, "")
                else os.path.realpath(os.path.expanduser(os.fsdecode(value)))
            )

        else:
            return value

    def save(self):
        """
        saves the configs to disk.
        """
        self.save_config(self.config, self.configpath)
        self.save_config(self.plugin, self.pluginpath)

    def __getitem__(self, section):
        """
        provides dictonary like access: c['section']['option']
        """
        return Section(self, section)

    def get(self, section, option):
        """
        get value.
        """
        return self.config[section][option]["value"]

    def set(self, section, option, value):
        """
        set value.
        """
        value = self.cast(self.config[section][option]["type"], value)

        self.config[section][option]["value"] = value
        self.save()

    def toggle(self, section, option):
        self.set(section, option, self.get(section, option) ^ True)

    def get_plugin(self, plugin, option):
        """
        gets a value for a plugin.
        """
        return self.plugin[plugin][option]["value"]

    def set_plugin(self, plugin, option, value):
        """
        sets a value for a plugin.
        """
        value = self.cast(self.plugin[plugin][option]["type"], value)

        # TODO: check if callable
        if self.plugin_cb:
            self.plugin_cb(plugin, option, value)

        self.plugin[plugin][option]["value"] = value
        self.save()

    def get_meta_data(self, section, option):
        """
        get all config data for an option.
        """
        return self.config[section][option]

    def add_plugin_config(self, name, config, outline=""):
        """
        adds config options with tuples (name, type, desc, default)
        """
        conf = self.plugin.get(name, {"desc": name})
        conf["outline"] = outline

        for item in config:
            if item[0] in conf and item[1] == conf[item[0]]["type"]:
                conf[item[0]]["desc"] = item[2]
            else:
                conf[item[0]] = {
                    "desc": item[2],
                    "type": item[1],
                    "value": self.cast(item[1], item[3]),
                }

        values = [x[0] for x in config] + ["desc", "outline"]
        # delete old values
        self.plugin[name] = {k: v for k, v in conf.items() if k in values}

    def delete_config(self, name):
        """
        Removes a plugin config.
        """
        if name in self.plugin:
            del self.plugin[name]


class Section:
    """
    provides dictionary like access for configparser.
    """

    def __init__(self, parser, section):
        """
        Constructor.
        """
        self.parser = parser
        self.section = section

    def __getitem__(self, item):
        """
        getitem.
        """
        return self.parser.get(self.section, item)

    def __setitem__(self, item, value):
        """
        setitem.
        """
        self.parser.set(self.section, item, value)
