expressir 0.2.10 → 0.2.15

data/lib/expressir/model/expressions/unary_expression.rb

@@ -12,6 +12,8 @@ module Expressir
         def initialize(options = {})
           @operator = options[:operator]
           @operand = options[:operand]
+
+          super
         end
       end
     end

data/lib/expressir/model/function.rb

@@ -1,7 +1,6 @@
 module Expressir
   module Model
     class Function < ModelElement
-      include Scope
       include Identifier
 
       attr_accessor :parameters
@@ -30,19 +29,15 @@ module Expressir
         @constants = options.fetch(:constants, [])
         @variables = options.fetch(:variables, [])
         @statements = options.fetch(:statements, [])
+
+        super
       end
 
       def children
         items = []
         items.push(*@parameters)
         items.push(*@types)
-        items.push(*@types.flat_map do |x|
-          if x.type.instance_of? Expressir::Model::Types::Enumeration
-            x.type.items
-          else
-            []
-          end
-        end)
+        items.push(*@types.flat_map{|x| x.type.is_a?(Types::Enumeration) ? x.type.items : []})
         items.push(*@entities)
         items.push(*@subtype_constraints)
         items.push(*@functions)

data/lib/expressir/model/identifier.rb

@@ -2,7 +2,6 @@ module Expressir
   module Model
     module Identifier
       attr_accessor :id
-      attr_accessor :parent
       attr_accessor :remarks
       attr_accessor :source
     end

data/lib/expressir/model/informal_proposition.rb

@@ -7,6 +7,8 @@ module Expressir
         @id = options[:id]
         @remarks = options.fetch(:remarks, [])
         @source = options[:source]
+
+        super
       end
     end
   end

data/lib/expressir/model/interface.rb

@@ -12,6 +12,8 @@ module Expressir
         @kind = options[:kind]
         @schema = options[:schema]
         @items = options.fetch(:items, [])
+
+        super
       end
     end
   end

data/lib/expressir/model/{renamed_ref.rb → interface_item.rb}

@@ -1,12 +1,14 @@
 module Expressir
   module Model
-    class RenamedRef < ModelElement
+    class InterfaceItem < ModelElement
       attr_accessor :ref
       attr_accessor :id
 
       def initialize(options = {})
-        @ref = options[:ref]
+        @ref = options[:ref] 
         @id = options[:id]
+
+        super
       end
     end
   end

data/lib/expressir/model/interfaced_item.rb

@@ -0,0 +1,23 @@
+module Expressir
+  module Model
+    class InterfacedItem < ModelElement
+      include Identifier
+
+      attr_accessor :base_item
+
+      def initialize(options = {})
+        @id = options[:id]
+        @remarks = options.fetch(:remarks, [])
+        @source = options[:source]
+
+        @base_item = options[:base_item]
+
+        super
+      end
+
+      def path
+        base_item.path
+      end
+    end
+  end
+end

data/lib/expressir/model/literals/binary.rb

@@ -6,6 +6,8 @@ module Expressir
 
         def initialize(options = {})
           @value = options[:value]
+
+          super
         end
       end
     end

data/lib/expressir/model/literals/integer.rb

@@ -6,6 +6,8 @@ module Expressir
 
         def initialize(options = {})
           @value = options[:value]
+
+          super
         end
       end
     end

data/lib/expressir/model/literals/logical.rb

@@ -10,6 +10,8 @@ module Expressir
 
         def initialize(options = {})
           @value = options[:value]
+
+          super
         end
       end
     end

data/lib/expressir/model/literals/real.rb

@@ -6,6 +6,8 @@ module Expressir
 
         def initialize(options = {})
           @value = options[:value]
+
+          super
         end
       end
     end

data/lib/expressir/model/literals/string.rb

@@ -8,6 +8,8 @@ module Expressir
         def initialize(options = {})
           @value = options[:value]
           @encoded = options[:encoded]
+
+          super
         end
       end
     end

data/lib/expressir/model/model_element.rb

@@ -1,16 +1,92 @@
 module Expressir
   module Model
     class ModelElement
-      CLASS_KEY = '_class' 
+      CLASS_KEY = '_class'
+      SOURCE_KEY = 'source'
+
+      attr_accessor :parent
+
+      def initialize(options = {})
+        attach_parent_to_children
+      end
+
+      def path
+        return id if is_a? Statements::Alias or is_a? Statements::Repeat or is_a? Expressions::QueryExpression
+
+        current_node = self
+        path_parts = []
+        loop do
+          if current_node.class.method_defined? :id
+            path_parts << current_node.id
+          end
+
+          current_node = current_node.parent
+          break unless current_node
+        end
+
+        path_parts.reverse.join(".")
+      end
+
+      def attach_parent_to_children
+        instance_variables.select{|x| x != :@parent}.each do |variable|
+          value = instance_variable_get(variable)
+
+          if value.is_a? Array
+            value.each do |value|
+              if value.is_a? ModelElement
+                value.parent = self
+              end
+            end
+          elsif value.is_a? ModelElement
+            value.parent = self
+          end
+        end
+      end
+
+      def find(path)
+        return self if path.empty?
+
+        path_parts = path.downcase.split(/\./).map do |current_path|
+          _, _, current_path = current_path.rpartition(":") # ignore prefix
+          current_path
+        end
+
+        current_scope = self
+        target_node = nil
+        loop do
+          # find in current scope
+          current_node = current_scope
+          path_parts.each do |current_path|
+            current_node = current_node.children.find{|x| x.id and x.id.downcase == current_path}
+            break unless current_node
+          end
+          target_node = current_node
+          break if target_node
+
+          # retry search in parent scope
+          current_scope = current_scope.parent
+          break unless current_scope
+        end
+
+        target_node
+      end
+
+      def children
+        []
+      end
 
       def to_hash(options = {})
         skip_empty = options[:skip_empty]
+        formatter = options[:formatter]
+
+        hash = {}
+        hash[CLASS_KEY] = self.class.name
 
-        instance_variables.select{|x| x != :@parent}.each_with_object({ CLASS_KEY => self.class.name }) do |variable, result|
+        instance_variables.select{|x| x != :@parent}.each_with_object(hash) do |variable, result|
           key = variable.to_s.sub(/^@/, '')
           value = instance_variable_get(variable)
 
-          # skip default values (nil, empty array)
+          # skip empty values (nil, empty array)
           if !skip_empty or !(value.nil? or (value.is_a? Array and value.count == 0))
             result[key] = if value.is_a? Array
               value.map do |value|
@@ -27,6 +103,12 @@ module Expressir
             end
           end
         end
+
+        if formatter
+          hash[SOURCE_KEY] = formatter.format(self)
+        end
+
+        hash
       end
 
       def self.from_hash(hash)
@@ -51,15 +133,6 @@ module Expressir
 
         node = Object.const_get(node_class).new(node_options)
 
-        # attach parent
-        if node.class.method_defined? :children
-          node.children.each do |child_node|
-            if child_node.class.method_defined? :parent and !child_node.parent
-              child_node.parent = node
-            end
-          end
-        end
-
         node
       end
     end

data/lib/expressir/model/parameter.rb

@@ -13,6 +13,8 @@ module Expressir
 
         @var = options[:var]
         @type = options[:type]
+
+        super
       end
     end
   end

data/lib/expressir/model/procedure.rb

@@ -1,7 +1,6 @@
 module Expressir
   module Model
     class Procedure < ModelElement
-      include Scope
       include Identifier
 
       attr_accessor :parameters
@@ -28,19 +27,15 @@ module Expressir
         @constants = options.fetch(:constants, [])
         @variables = options.fetch(:variables, [])
         @statements = options.fetch(:statements, [])
+
+        super
       end
 
       def children
         items = []
         items.push(*@parameters)
         items.push(*@types)
-        items.push(*@types.flat_map do |x|
-          if x.type.instance_of? Expressir::Model::Types::Enumeration
-            x.type.items
-          else
-            []
-          end
-        end)
+        items.push(*@types.flat_map{|x| x.type.is_a?(Types::Enumeration) ? x.type.items : []})
         items.push(*@entities)
         items.push(*@subtype_constraints)
         items.push(*@functions)

data/lib/expressir/model/repository.rb

@@ -1,12 +1,12 @@
 module Expressir
   module Model
     class Repository < ModelElement
-      include Scope
-
       attr_accessor :schemas
 
       def initialize(options = {})
         @schemas = options.fetch(:schemas, [])
+
+        super
       end
 
       def children

data/lib/expressir/model/rule.rb

@@ -1,7 +1,6 @@
 module Expressir
   module Model
     class Rule < ModelElement
-      include Scope
       include Identifier
 
       attr_accessor :applies_to
@@ -21,7 +20,7 @@ module Expressir
         @remarks = options.fetch(:remarks, [])
         @source = options[:source]
 
-        @applies_to = options[:applies_to]
+        @applies_to = options.fetch(:applies_to, [])
         @types = options.fetch(:types, [])
         @entities = options.fetch(:entities, [])
         @subtype_constraints = options.fetch(:subtype_constraints, [])
@@ -32,18 +31,14 @@ module Expressir
         @statements = options.fetch(:statements, [])
         @where = options.fetch(:where, [])
         @informal_propositions = options.fetch(:informal_propositions, [])
+
+        super
       end
 
       def children
         items = []
         items.push(*@types)
-        items.push(*@types.flat_map do |x|
-          if x.type.instance_of? Expressir::Model::Types::Enumeration
-            x.type.items
-          else
-            []
-          end
-        end)
+        items.push(*@types.flat_map{|x| x.type.is_a?(Types::Enumeration) ? x.type.items : []})
         items.push(*@entities)
         items.push(*@subtype_constraints)
         items.push(*@functions)

data/lib/expressir/model/schema.rb

@@ -1,7 +1,8 @@
 module Expressir
   module Model
     class Schema < ModelElement
-      include Scope
+      attr_accessor :file
+
       include Identifier
 
       attr_accessor :head_source
@@ -17,6 +18,8 @@ module Expressir
       attr_accessor :rules
 
       def initialize(options = {})
+        @file = options[:file]
+
         @id = options[:id]
         @remarks = options.fetch(:remarks, [])
         @source = options[:source]
@@ -31,19 +34,52 @@ module Expressir
         @functions = options.fetch(:functions, [])
         @procedures = options.fetch(:procedures, [])
         @rules = options.fetch(:rules, [])
+
+        super
       end
 
-      def children
+      def children(skip_references = false)
         items = []
+        unless skip_references
+          items.push(*@interfaces.flat_map do |interface|
+            schema_id = interface.schema.id.downcase
+            schema = parent.schemas.find{|x| x.id.downcase == schema_id}
+            if schema
+              schema_children = schema.children(true) # prevent infinite recursion
+              if interface.items.length > 0
+                interface.items.map do |item|
+                  ref_id = item.ref.id.downcase
+                  id = item.id || ref_id
+                  base_item = schema_children.find{|x| x.id and x.id.downcase == ref_id}
+
+                  interfaced_item = InterfacedItem.new({
+                    id: id
+                  })
+                  interfaced_item.base_item = base_item # skip overriding parent
+                  interfaced_item.parent = self
+                  interfaced_item
+                end
+              else
+                schema_children.map do |item|
+                  id = item.id
+                  base_item = item
+
+                  interfaced_item = InterfacedItem.new({
+                    id: id
+                  })
+                  interfaced_item.base_item = base_item # skip overriding parent
+                  interfaced_item.parent = self
+                  interfaced_item
+                end
+              end
+            else
+              []
+            end
+          end)
+        end
         items.push(*@constants)
         items.push(*@types)
-        items.push(*@types.flat_map do |x|
-          if x.type.instance_of? Expressir::Model::Types::Enumeration
-            x.type.items
-          else
-            []
-          end
-        end)
+        items.push(*@types.flat_map{|x| x.type.is_a?(Types::Enumeration) ? x.type.items : []})
         items.push(*@entities)
         items.push(*@subtype_constraints)
         items.push(*@functions)