Refactored ExecutionContext serialization (added sheerkapickle) and added History management

src/core/sheerka/Services/SheerkaSetsManager.py

@@ -0,0 +1,83 @@
+from core.builtin_concepts import BuiltinConcepts, ErrorConcept
+from core.concept import Concept
+
+GROUP_PREFIX = 'All_'
+
+
+class SheerkaSetsManager:
+    def __init__(self, sheerka):
+        self.sheerka = sheerka
+        self.logger_name = self.add_concept_to_set.__name__
+
+    def add_concept_to_set(self, context, concept, concept_set, logger=None):
+        """
+        Add an entry in sdp to tell that concept isa concept_set
+        :param context:
+        :param concept:
+        :param concept_set:
+        :param logger:
+        :return:
+        """
+        logger = logger or self.sheerka.log
+
+        context.log(logger, f"Adding concept {concept} to set {concept_set}", who=self.logger_name)
+
+        assert concept.id
+        assert concept_set.id
+
+        try:
+            ret = self.sheerka.sdp.add_unique(context.event.get_digest(), GROUP_PREFIX + concept_set.id, concept.id)
+            if ret == (None, None):  # concept already in set
+                return self.sheerka.ret(
+                    self.logger_name,
+                    False,
+                    self.sheerka.new(BuiltinConcepts.CONCEPT_ALREADY_IN_SET, body=concept, concept_set=concept_set))
+            else:
+                return self.sheerka.ret(self.logger_name, True, self.sheerka.new(BuiltinConcepts.SUCCESS))
+        except Exception as error:
+            context.log_error(logger, "Failed to add to set.", who=self.logger_name)
+            return self.sheerka.ret(self.logger_name, False, ErrorConcept(error), error.args[0])
+
+    def get_set_elements(self, concept):
+        """
+        Concept is supposed to be a set
+        Returns all elements if the set
+        :param concept:
+        :return:
+        """
+
+        assert concept.id
+
+        ids = self.sheerka.sdp.get_safe(GROUP_PREFIX + concept.id)
+        if ids is None:
+            return self.sheerka.new(BuiltinConcepts.NOT_A_SET, body=concept)
+
+        elements = [self.sheerka.get_by_id(element_id) for element_id in ids]
+        return elements
+
+    def isa(self, a, b):
+        """
+        return true if the concept a is a b
+        Will handle when the keyword isa will be implemented
+        :param a:
+        :param b:
+        :return:
+        """
+
+        if isinstance(a, BuiltinConcepts):  # common KSI error ;-)
+            raise SyntaxError("Remember that the first parameter of isinstance MUST be a concept")
+
+        assert isinstance(a, Concept)
+        assert isinstance(b, Concept)
+
+        # TODO, first check the 'isa' property of a
+
+        return self.sheerka.sdp.exists(GROUP_PREFIX + b.id, a.id)
+
+    def isagroup(self, concept):
+        """True if exists All_<concept_id> in sdp"""
+        if not concept.id:
+            return None
+
+        res = self.sheerka.sdp.get_safe(GROUP_PREFIX + concept.id)
+        return res is not None