calculate-utils-4-lib/calculate/vars/alt_vars_loader.py

import re
import sys
import os
import importlib
import importlib.util
import site
from calculate.vars.datavars import Variable, Namespace, HashVariable,\
                                    TableVariable, IniCreated, DefaultValue
from calculate.vars.alt_datavars import NamespaceNode, VariableNode,\
                                        ListType, IntegerType,\
                                        FloatType, IniType, TableType
from calculate.utils.gentoo import ProfileWalker
from calculate.utils.fs import readFile
from calculate.utils.files import list_directory
from pyparsing import Literal, Word, ZeroOrMore, Group, Optional, restOfLine,\
                      empty, printables, OneOrMore, lineno, line, col, SkipTo,\
                      LineEnd, Combine, nums
from enum import Enum


class Define(Enum):
    assign = 0
    append = 1
    remove = 2


class CalculateIniParser:
    '''Класс парсера calculate.ini файлов.'''

    def __init__(self):
        self._errors = []

        self.operations = {"=": Define.assign,
                           "+=": Define.append,
                           "-=": Define.remove}

        lbrack = Literal("[")
        rbrack = Literal("]")

        # comma = Literal(",").suppress()
        comment_symbol = Literal(';') | Literal('#')

        # Define = self.Define
        value_operation = (Literal("=") | Combine(Literal("+") + Literal("="))
                           | Combine(Literal("-") + Literal("=")))

        comment = comment_symbol + Optional(restOfLine)

        section_name = (lbrack.suppress() + (~Word(nums)
                                             + Word(printables+'\t',
                                                    excludeChars='[]'))
                        + rbrack.suppress())

        value_name = Word(printables+'\t', excludeChars='=-+')

        # non_comma = Word(printables+'\t', excludeChars=',')
        clear_section = lbrack.suppress() + Group(empty) + rbrack.suppress()
        row_index = lbrack.suppress() + Word(nums) + rbrack.suppress()

        namespace_start = Group(OneOrMore(section_name)
                                + (clear_section | ~lbrack)
                                + LineEnd().suppress())

        table_start = Group(OneOrMore(section_name)
                            + (row_index | clear_section | ~lbrack)
                            + LineEnd().suppress())

        section_start = (namespace_start('namespace') |
                         table_start('table'))

        # Если содержимое ini-файла не предваряется заголовком секции,
        # значит эта строка ошибочна.
        unexpected = Group(~section_start + SkipTo(LineEnd(),
                                                   include=True))("error")
        unexpected.setParseAction(self._unexpected_token)

        key_value = (~lbrack + value_name
                     + value_operation + empty
                     + restOfLine + LineEnd().suppress())

        def strip_key_value(tokens):
            tokens[0] = tokens[0].strip()
            tokens[1] = tokens[1].strip()

        key_value.setParseAction(strip_key_value)

        self.ini_section_parser = (section_start
                                   + Group(ZeroOrMore(
                                                Group(key_value | unexpected)))
                                   | unexpected)
        self.ini_section_parser.ignore(comment)

    def parse(self, data: str):
        for tokens, start, end in self.ini_section_parser.scanString(data):
            if tokens.getName() == "error":
                continue

            section, defkeys = tokens

            print('section type: {}'.format(section.getName()))
            if section.getName() == 'namespace':
                section_list = section.asList()
                if section_list[-1] == []:
                    yield {'clear_section': (section_list[:-1], )}
                else:
                    yield {'start_section': (section_list, )}

                for defkey in defkeys:
                    if defkey.getName() == "error":
                        continue
                    yield {'define_key': (defkey[0], defkey[2],
                                          self.operations[defkey[1]])}
            else:
                table_list = section.asList()
                if table_list[-1] == []:
                    yield {'clear_table': (table_list[:-1], )}
                else:
                    table_values = {}
                    for defkey in defkeys:
                        if defkey.getName() == "error":
                            continue
                        table_values.update({defkey[0]: defkey[2]})
                    yield {'start_table': (table_list, table_values)}

    def _unexpected_token(self, string, location, tokens):
        '''Метод вызываемый парсером, если обнаружена некорректная строка,
        предназначен для получения некорректной строки и ее дальнейшего
        разбора.'''
        error_line = line(location, string).strip()
        if error_line:
            self._errors.append((error_line, lineno(location, string),
                                col(location, string)))

    @property
    def errors(self):
        errors = self._errors
        self._errors = []
        return errors


class NamespaceIniFiller:
    '''Класс, предназначенный для наполнения Namespace объекта переменными
    из calculate.ini файла.'''
    available_sections = {'custom'}

    def __init__(self, restrict_creation=True):
        self.ini_parser = CalculateIniParser()
        self.restricted = restrict_creation
        self.modify_only = False

    def error(self, lineno, error_message):
        self.errors.append(lineno, error_message)

    def fill(self, namespace: NamespaceNode, ini_file_text: str) -> None:
        '''Метод для разбора calculate.ini файла и добавления всех его
        переменных в указанное пространство имен.'''
        self.namespace = namespace
        self.current_namespace = self.namespace
        self.errors = []

        for parsed_line in self.ini_parser.parse(ini_file_text):
            self._line_processor(**parsed_line)

    def _line_processor(self, start_section=None,
                        clear_section=None,
                        start_table=None,
                        clear_table=None,
                        define_key=None,
                        error=None, **kwargs):
        if start_section is not None:
            self.start_section(*start_section)
        elif clear_section is not None:
            self.clear_section(*clear_section)
        elif start_table is not None:
            self.start_table(*start_table)
        elif clear_table is not None:
            self.clear_table(*clear_table)
        elif define_key is not None:
            self.define_key(*define_key)

        for error in self.ini_parser.errors:
            self.set_error(*error)

    def start_section(self, sections: str) -> None:
        '''Метод для получения доступа и создания пространств имен.'''
        if self.restricted:
            self.modify_only = sections[0] not in self.available_sections
        self.current_namespace = self.namespace
        for section in sections:
            if section not in self.current_namespace.namespaces:
                if not self.modify_only:
                    self.current_namespace.add_namespace(
                                                        NamespaceNode(section))
                else:
                    self.current_namespace = None
                    return
            self.current_namespace = self.current_namespace.namespaces[section]

    def clear_section(self, sections: list) -> None:
        '''Метод для очистки пространства имен.'''
        current_namespace = self.namespace

        for section in sections:
            if section in current_namespace.namespaces:
                current_namespace = current_namespace.namespaces[section]
            elif (section in current_namespace.variables and
                  current_namespace.variables[section].variable_type
                  is TableType):
                table_variable = current_namespace.variables[section]
                table_to_clear = table_variable.get_value()
                table_to_clear.clear()
                table_variable.source = table_to_clear
            else:
                return
        current_namespace.clear()

    def start_table(self, sections: str, row) -> None:
        '''Метод для создания и модификации таблиц.'''
        if self.restricted:
            self.modify_only = sections[0] not in self.available_sections
        self.current_namespace = self.namespace
        row_number = int(sections.pop())
        table_name = sections.pop()
        for section in sections:
            if section not in self.current_namespace.namespaces:
                if not self.modify_only:
                    self.current_namespace.add_namespace(
                                                        NamespaceNode(section))
                else:
                    self.current_namespace = None
                    return
            self.current_namespace = self.current_namespace.namespaces[section]
        if table_name not in self.current_namespace.variables:
            if not self.modify_only:
                table_variable = VariableNode(table_name,
                                              self.current_namespace,
                                              variable_type=TableType,
                                              source=[row])
        else:
            table_variable = self.current_namespace.variables[table_name]
            table = table_variable.get_value()
            if len(table) < row_number:
                table.change_row(row, row_number)
            else:
                table.add_row(row)
            table_variable.source = table

    def define_key(self, key: str, value: str, optype) -> None:
        if self.current_namespace is None:
            return

        if optype == Define.assign:
            if key not in self.current_namespace:
                self.define_variable(key, value)
            else:
                self.change_value(key, value)
        elif optype == Define.append:
            if key not in self.current_namespace:
                self.define_variable(key, value)
            else:
                self.append_value(key, value)
        elif optype == Define.remove:
            if key not in self.current_namespace:
                self.define_variable(key, value)
            else:
                self.remove_value(key, value)

    def change_value(self, key: str, value: str) -> None:
        '''Метод для изменения значения переменной.'''
        variable = self.current_namespace[key]
        variable.source = value

    def define_variable(self, key: str, value: str) -> None:
        '''Метод для создания переменных в calculate.ini файле.'''
        if not self.modify_only:
            VariableNode(key, self.current_namespace, variable_type=IniType,
                         source=value)
        else:
            # TODO Какая-то обработка ошибки.
            pass

    def append_value(self, key: str, value: str) -> None:
        '''Метод выполняющий действия возложенные на оператор +=.'''
        variable = self.current_namespace[key]
        variable_value = variable.get_value()

        if variable.variable_type is IniType:
            value_list = value.split(',')
            variable_list = variable_value.split(',')

            for item in value_list:
                if item not in variable_list:
                    variable_list.append(item.strip())
            variable_value = ','.join(variable_list)

        elif variable.variable_type is ListType:
            value_list = value.split(',')

            for item in value_list:
                if item not in variable_value:
                    variable_value.append(item.strip())

        elif variable.variable_type is IntegerType:
            variable_value += int(value)

        elif variable.variable_type is FloatType:
            variable_value += float(value)

        variable.source = variable_value

    def remove_value(self, key: str, value: str) -> None:
        '''Метод выполняющий действия возложенные на оператор -=.'''
        variable = self.current_namespace[key]
        variable_value = variable.get_value()
        if variable.variable_type is IniType:
            value_list = value.split(',')
            variable_list = [item.strip() for item in
                             variable_value.split(',')]

            for item in value_list:
                if item in variable_list:
                    variable_list.remove(item.strip())
            variable_value = ','.join(variable_list)

        elif variable.variable_type is ListType:
            value_list = value.split(',')
            for item in value_list:
                if item in variable_value:
                    variable_value.remove(item.strip())

        elif variable.variable_type is IntegerType:
            variable_value -= int(value)

        elif variable.variable_type is FloatType:
            variable_value -= float(value)

        variable.source = variable_value

    def set_error(self, line, lineno, col):
        '''Метод для добавления ошибки в лог.'''
        self.error(lineno, "Syntax error: {}".format(line))


class NamespaceIniFillerStrict(NamespaceIniFiller):
    """Объект используемый для наполнения Namespace объекта переменными
    из calculate.ini файла, с возможность определять только
    """
    availableSection = ["custom"]

    def fill(self, namespace, data):
        self.canCreate = False
        for newns in self.availableSection:
            if newns not in namespace:
                namespace.add_namespace(Namespace(newns))
        super().fill(namespace, data)

    def start_section(self, sections):
        self.current_namespace = self.namespace
        self.canCreate = sections[0] in self.availableSection
        for section in sections:
            if section not in self.current_namespace.childs:
                if isinstance(self.current_namespace,
                              TableVariable) or self.canCreate:
                    self.current_namespace.add_namespace(Namespace(section))
                else:
                    self.current_namespace = None
            self.current_namespace = self.current_namespace[section]

    # def clear_section(self, sections):
    #     current_namespace = self.namespace
    #     self.canCreate = sections[0] in self.availableSection
    #     for section in sections:
    #         if section not in current_namespace.childs:
    #             return
    #         current_namespace = current_namespace[section]
    #     current_namespace.clear_childs()

    def define_variable(self, key, value):
        if not self.canCreate:
            pass
        var = Variable(key)
        var.add_property(IniCreated(value))
        self.current_namespace.add_variable(var)

    def change_value(self, key, value):
        var = self.current_namespace[key]
        var.set_value(value)

        if isinstance(var, HashVariable.HashValue):
            var = var.master_variable
            value = var.get_value()

        prop = var.find_property(DefaultValue)
        if prop:
            prop.value = value
        else:
            var.add_property(DefaultValue(value))
        var.invalidate()


class VariableLoader:
    '''Класс, используемый для загрузки переменных из python модуля.'''
    re_upper = re.compile("(.)([A-Z])")

    def _get_varlike_attrs(self, obj):
        '''Метод для получения списка аттрибутов похожих на переменные.'''
        for attrname in (x for x in dir(obj) if x[:1].isupper()):
            yield self.re_upper.sub(r"\1_\2", attrname).lower(), \
                getattr(obj, attrname)

    def fill(self, namespace, dirpath, package):
        '''Загрузить в namespace переменные из указанных модулей.'''
        for fullfn in list_directory(dirpath, fullpath=True):
            dn, fn = os.path.split(fullfn)
            if os.path.isdir(fullfn):
                newns = namespace.add_namespace(Namespace(fn))
                self.fill(newns, fullfn, "{}.{}".format(package, fn))
            elif fn.endswith(".py"):
                module = self._load_module_source(package, fn, fullfn)
                for varname, cls in self._get_varlike_attrs(module):
                    if Variable.is_implementation(cls):
                        namespace.add_variable(cls(varname))
                    elif HashVariable.is_implementation(cls) or \
                        TableVariable.is_implementation(cls) or \
                            Namespace.is_implementation(cls):
                        _newns = namespace.add_namespace(cls(varname,
                                                             namespace))
                        for _varname, _cls in self._get_varlike_attrs(cls):
                            if Variable.is_implementation(_cls):
                                _newns.add_variable(_cls(_varname))

    @classmethod
    def default(cls):
        site_dirs = [os.path.normpath(x) for x in site.getsitepackages()]
        for site_dir in site_dirs:
            calculate_dir = os.path.join(site_dir, "calculate/vars")
            if os.path.exists(calculate_dir):
                return (calculate_dir, "calculate.vars")

    def _load_module_source(self, package, name, path):
        if name.startswith('calculate.vars.'):
            full_name = name
        else:
            full_name = '.'.join([package, name])

        if full_name in sys.modules:
            return sys.modules[full_name]

        spec = importlib.util.spec_from_file_location(full_name, path)
        module = importlib.util.module_from_spec(spec)
        spec.loader.exec_module(module)
        sys.modules[full_name] = module
        return module


class ProfileFiller:
    """
    Заполнитель значений переменных из файлов calculate.ini в профилях
    """
    basename = "calculate.ini"

    def get_repository_map(self, namespace):
        return {
            x.name.get_value(): x.path.get_value()
            for x in namespace.os.gentoo.repositories
        }

    def fill(self, namespace, profile_path):
        nif = NamespaceIniFillerStrict()
        pw = ProfileWalker(self.basename, self.get_repository_map(namespace))
        for fn in pw.find(profile_path):
            nif.fill(namespace, readFile(fn))