thefox-ext 1.10.0 → 3.0.0.pre.rc.0

data/lib/thefox-ext/range/lexer/interval.rb

@@ -0,0 +1,41 @@
+
+module TheFox
+module Range
+module Lexer
+  # x-y/n
+  class Interval < Base
+    def initialize()
+      super()
+      # puts '-> Interval.initialize()'
+      @number = nil
+    end
+
+    # :nocov:
+    def inspect()
+      if @number.nil?
+        'Interval()'
+      else
+        'Interval(%s)' % [@number.char]
+      end
+    end
+    # :nocov:
+
+    def number()
+      @number
+    end
+    def number=(number)
+      @number = number.dup
+    end
+
+    def resolve()
+      # puts '-> %s.resolve' % [inspect]
+      if @number.nil?
+        1
+      else
+        @number.resolve
+      end
+    end
+  end # Interval
+end # Lexer
+end # Range
+end # TheFox

data/lib/thefox-ext/range/lexer/lexer.rb

@@ -0,0 +1,94 @@
+
+module TheFox
+module Range
+module Lexer
+  class Lexer
+    def initialize(chars)
+      # puts '-> Lexer2.initialize'
+      @chars = chars
+    end
+
+    def resolve()
+      # puts
+      # puts '-> Lexer2.resolve L1 [Create Object for each character]'
+
+      block_level = BlockLevel.new
+      item_collection1 = Collection.new
+      position = 0
+      @chars.each do |char|
+        position += 1
+        curr_item = case char
+          when ' '
+            # Skip space
+          when "\r"
+            # Skip
+          when ',', "\n"
+            Separator.new()
+          when '{'
+            BlockDown.new(block_level)
+          when '}'
+            BlockUp.new(block_level)
+          when '+'
+            Operator.new()
+          when '-', '.'
+            Range.new(char)
+          when '/'
+            Interval.new()
+          when '0'..'9'
+            Number.new(char)
+          else
+            raise 'Unknown character at position %d: "%s" (ord=%d)' % [
+              position, char, char.ord
+            ]
+          end
+
+        item_collection1.push(curr_item)
+      end
+
+      # puts '-> Lexer2.resolve L1 Items'
+      # pp item_collection1.items.map{ |item| item.inspect }
+
+      # puts
+      # puts '-> Lexer2.resolve L2 [Append Number]'
+      item_collection2 = Collection.new
+      item_collection1.items.each do |item|
+        # puts '--> L2 item: %s' % [item.inspect]
+
+        case item
+        when Number
+          if item_collection2.curr.is_a?(Number)
+            item_collection2.curr.append(item)
+          else
+            item_collection2.push(item)
+          end
+        when Range
+          # puts '--> L2 Its Range: %s  %s  %s %s %s' % [
+          #   item.inspect,
+          #   item_collection2.curr.inspect,
+          #   item_collection2.curr.is_a?(Range) ? 'Y' : 'n',
+          #   item_collection2.curr.symbole == '.' ? 'Y' : 'n',
+          #   item.symbole == '.' ? 'Y' : 'n',
+          # ]
+          if item_collection2.curr.is_a?(Range) && item_collection2.curr.symbole == '.' && item.symbole == '.'
+            # puts '--> L2 Skip'
+          else
+            item_collection2.push(item)
+          end
+        else
+          # puts '--> L2 ELSE'
+          item_collection2.push(item)
+        end # case item
+
+      end # item_collection1.items
+
+      # puts '-> Lexer2.resolve L2 Items'
+      # pp item_collection2.items.map{ |item| item.inspect }
+
+      # puts
+      scope = Scope.new(item_collection2.items)
+      scope.resolve
+    end
+  end # Lexer
+end # Lexer
+end # Range
+end # TheFox

data/lib/thefox-ext/range/lexer/number.rb

@@ -0,0 +1,103 @@
+
+module TheFox
+module Range
+module Lexer
+  # 0123456789
+  class Number < Base
+    def initialize(char)
+      super()
+      # puts '-> Number.initialize(%s)' % [char]
+      #@nonce = rand(10 ** 3).to_s.rjust(3, '0')
+      @char = char
+      @is_ref_item = false
+    end
+
+    # :nocov:
+    def inspect()
+      a = [
+        # '#' + @nonce.to_s,
+        # 'c' + @char,
+        @char,
+      ]
+      if !@parent_item.nil?
+        a.push('^%s' % @parent_item.inspect)
+      end
+      a.push('IRI=%d' % [@is_ref_item])
+      # if @children.length > 0
+      #   a.push('v%d' % @children.length)
+      # end
+      'Number(%s)' % [a.join(' ')]
+    end
+    def dup()
+      # puts '-> Number.dup(%s) -> %s %s' % [@char, inspect, self.is_ref_item ? 'Y' : 'n']
+      # puts '-> %s.dup' % [inspect]
+      o = super()
+      o.is_ref_item = self.is_ref_item
+      # puts '-> Number.dup(%s) -> %s' % [@char, o.inspect]
+      o
+    end
+    # :nocov:
+
+    def char
+      @char
+    end
+
+    def is_ref_item
+      @is_ref_item
+    end
+    def is_ref_item=(is_ref_item)
+      @is_ref_item = is_ref_item
+    end
+
+    def append(obj)
+      if obj.is_a?(Number)
+        self.append(obj.char)
+      else
+        @char += obj
+      end
+    end
+
+    def inc()
+      f = '%%0%dd' % [@char.length]
+      @char = f % [@char.to_i + 1]
+    end
+
+    def resolve(level = 0)
+      # puts '-> %s.resolve(%d)' % [self.inspect, @char, level]
+      if self.has_parent_item
+        if @parent_item.is_a?(Number)
+          ('%s%s' % [@parent_item.resolve(level + 1), @char]).to_i
+        elsif @parent_item.is_a?(Scope)
+          curr_item = @parent_item
+          stack = [@char]
+          while !curr_item.parent_scope.nil? do
+            # puts '-----> CI=%s          RI=%s' % [curr_item.inspect, curr_item.ref_item.inspect]
+
+            if !curr_item.ref_item.nil?
+              stack.push(curr_item.ref_item.char)
+            end
+            curr_item = curr_item.parent_scope
+          end
+
+          # pp stack.reverse
+
+          stack.reverse.join.to_i
+
+          # if @char == '5'
+          #   2102
+          # else
+          #   9999
+          # end
+        elsif @parent_item.is_a?(Interval)
+          @char.to_i
+        else
+          nil
+        end
+      else
+        @char.to_i
+      end
+    end
+  end # Number
+end # Lexer
+end # Range
+end # TheFox

data/lib/thefox-ext/range/lexer/operator.rb

@@ -0,0 +1,20 @@
+
+module TheFox
+module Range
+module Lexer
+  # +
+  class Operator < Base
+    def initialize()
+      super()
+      # puts '-> Operator.initialize'
+    end
+
+    # :nocov:
+    def inspect()
+      'Operator()'
+    end
+    # :nocov:
+  end # Operator
+end # Lexer
+end # Range
+end # TheFox

data/lib/thefox-ext/range/lexer/range.rb

@@ -0,0 +1,65 @@
+
+module TheFox
+module Range
+module Lexer
+  # - ..
+  class Range < Base
+    def initialize(symbole)
+      super(symbole)
+      # puts '-> Range.initialize(%s)' % [symbole]
+
+      @left_item = nil
+      @right_item = nil
+      @interval = nil
+    end
+
+    # :nocov:
+    def inspect()
+      if !@left_item.nil? && !@right_item.nil?
+        'Range(#%s s=%s l=%s r=%s i=%s)' % [
+          @nonce,
+          @symbole,
+          @left_item.inspect,
+          @right_item.inspect,
+          @interval.inspect
+        ]
+      else
+        'Range(#%s %s)' % [@nonce, @symbole]
+      end
+    end
+    # :nocov:
+
+    def left_item=(left_item)
+      @left_item = left_item.dup
+    end
+
+    def right_item=(right_item)
+      @right_item = right_item.dup
+    end
+    def right_item()
+      @right_item
+    end
+
+    def interval()
+      @interval
+    end
+    def interval=(interval)
+      @interval = interval.dup
+    end
+
+    def resolve()
+      # puts '-> %s.resolve()'.colorize(:red) % [inspect]
+      if @left_item.is_a?(Number) && @right_item.is_a?(Number)
+        r = ::Range.new(@left_item.resolve, @right_item.resolve)
+        if @interval.is_a?(Interval)
+          # puts '--> I=%s'.colorize(:red) % [@interval.inspect]
+          r = r.step(@interval.resolve)
+        end
+        # puts '--> %s'.colorize(:red) % [r.inspect]
+        r.to_a
+      end
+    end
+  end # Range
+end # Lexer
+end # Range
+end # TheFox

data/lib/thefox-ext/range/lexer/scope.rb

@@ -0,0 +1,266 @@
+
+module TheFox
+module Range
+module Lexer
+  class Scope < Base
+    def initialize(items = nil, parent_scope = nil, level = 0)
+      super()
+
+      @item_collection = Collection.new(items)
+      @parent_scope = parent_scope
+      @level = level
+      @ref_item = nil
+
+      # puts '%s-> Scope(#%s).initialize(p=%s lev=%d)'.colorize(:red) % [' ' * (@level * 2), @instance_id, @parent_scope.inspect, @level]
+    end
+
+    # :nocov:
+    def name()
+      'Scope(#%s)' % [@instance_id]
+    end
+    def inspect()
+      'Scope(#%s len=%d)' % [@instance_id, @item_collection.length]
+    end
+    # :nocov:
+
+    def push(item)
+      # puts '%s-> %s.push(%s) -> PS=%s PRI=%s'.colorize(:green) % [' ' * (@level * 2),
+      #   inspect,
+      #   item.inspect,
+      #   @parent_scope.inspect,
+      #   @parent_scope.ref_item.inspect,
+      # ]
+      @item_collection.push(item)
+    end
+
+    def items()
+      @item_collection.items
+    end
+
+    def curr()
+      @item_collection.curr
+    end
+
+    def prev()
+      @item_collection.prev
+    end
+
+    def parent_scope()
+      @parent_scope
+    end
+    def parent_scope=(parent_scope)
+      @parent_scope = parent_scope
+    end
+
+    def ref_item()
+      @ref_item
+    end
+    def ref_item=(ref_item)
+      # puts '%s--> Set Ref Item: %s'.colorize(:green) % [' ' * (@level * 2), inspect]
+      ref_item.is_ref_item = true
+      @ref_item = ref_item
+    end
+
+    def resolve()
+      # puts '-> %s.resolve(%d)' % [self.inspect, @level]
+
+      # puts '%s-> SL1: %s P=%s' % [' ' * (@level * 2), inspect, @parent_item.inspect]
+
+      scopes = Collection.new([Scope.new(nil, self, @level + 1)])
+      block_stack = Collection.new()
+      parent_item = nil
+      @item_collection.items.each do |item|
+        # puts '%s-> SL1 Item: %s' % [' ' * (@level * 2), item.inspect]
+
+        push_to_scope = false
+
+        case item
+        when Separator
+          if block_stack.length == 0
+            scopes.push(Scope.new(nil, self, @level + 1))
+          else
+            push_to_scope = true
+          end
+        when BlockDown
+          if block_stack.length == 0
+            # puts '%s--> BlockDown: Curr=%s'.colorize(:green) % [' ' * (@level * 2),
+            #   scopes.curr.curr.inspect,
+            # ]
+
+            prev_item = scopes.curr.curr
+
+            scopes.push(Scope.new(nil, self, @level + 1))
+            # scopes.curr.ref_item = item.prev_item
+            scopes.curr.ref_item = prev_item
+
+            # puts '%s--> BlockDown: PrevItem=%s'.colorize(:green) % [' ' * (@level * 2),
+            #   scopes.curr.ref_item.inspect,
+            # ]
+          else
+            push_to_scope = true
+          end
+
+          # Block Stack
+          block_stack.push(item)
+        when BlockUp
+          block_stack.pop
+
+          prev_ref_item = scopes.curr.ref_item
+          # puts '-> BlockUp: %s' % [prev_ref_item.inspect]
+
+          # TODO: THIS!!!!
+          scopes.push(Scope.new(nil, self, @level + 1))
+          scopes.curr.ref_item = prev_ref_item
+        else
+          push_to_scope = true
+        end # case item
+
+        if push_to_scope
+          # puts '%s--> Push Item: %s PS=%s PI=%s RI=%s,%s' % [' ' * (@level * 2),
+          #   item.inspect,
+          #   scopes.curr.parent_scope.inspect,
+          #   scopes.curr.parent_item.inspect,
+          #   @ref_item.inspect,
+          #   scopes.curr.ref_item.inspect,
+          # ]
+          scopes.curr.push(item)
+          scopes.curr.curr.parent_item = self
+          # puts '%s--> Pushed Item: %s' % [' ' * (@level * 2), item.inspect]
+        end
+      end # @item_collection.items
+
+      # puts
+      # puts '%s-> Scopes: %s'.colorize(:blue) % [' ' * (@level * 2), scopes.inspect]
+      # scopes.items.each do |scope|
+      #   puts scope.inspect.colorize(:blue)
+      #   puts scope.items.map{ |i| i.inspect }.to_s.colorize(:blue)
+      # end
+
+      if scopes.length > 1
+        resolved = []
+        scopes.items.each do |scope|
+          resolved.push(scope.resolve)
+        end
+        resolved
+      else
+        # puts
+        # puts '%s-> SL1 Items' % [' ' * (@level * 2)]
+        # pp scopes.curr.items.map{ |item| item.inspect }
+
+        # puts '%s-> SL2 ' % [' ' * (@level * 2)]
+        item_collection1 = Collection.new
+        scopes.curr.items.each do |item|
+          # puts '%s-> SL2 Item: %s (P=%s)' % [
+          #   ' ' * (@level * 2),
+          #   item.inspect,
+          #   item.parent_item.inspect,
+          # ]
+
+          case item
+          when Number
+            # puts '--> Its %s' % [item.inspect]
+            if item.next_item.is_a?(Range) || item.prev_item.is_a?(Range)
+              # Skip Range
+              # puts '--> Skip Range'
+            elsif item.prev_item.is_a?(Interval)
+              # Skip Interval
+              # puts '%s--> Skip Interval' % [' ' * (@level * 2)]
+              # item.prev_item.next_item = nil
+              # item.parent_item = item.prev_item
+              # item.prev_item = nil
+              # item.next_item = nil
+            elsif item.next_item.is_a?(Operator)
+              # Skip Operator
+              # puts '--> Skip Operator'
+            elsif item.has_children
+              # Skip
+              # puts '--> Skip Has Children'
+            elsif item.is_ref_item
+              # puts '--> Skip Ref Item'
+            else
+              # puts '--> Push'
+              # puts '--> Push: %s' % [item.inspect]
+              item_collection1.push(item)
+            end
+          when Range
+            if item.prev_item.is_a?(Number) && item.next_item.is_a?(Number)
+              # puts '--> Range normal'
+              item_collection1.push(item)
+              item_collection1.curr.left_item = item.prev_item
+              item_collection1.curr.right_item = item.next_item
+
+              # 1-10/3
+              # item.prev_item                       Number
+              # item                                 Range
+              # item.next_item                       Number
+              # item.next_item.next_item             Interval
+              # item.next_item.next_item.next_item   Number
+
+              interval_item = item.next_item.next_item
+              if interval_item.is_a?(Interval)
+                item_collection1.curr.interval = interval_item
+                item_collection1.curr.interval.number = item.next_item.next_item.next_item
+                item_collection1.curr.interval.number.parent_item = item_collection1.curr.interval
+              end
+            else
+              raise 'Invalid Range: %s %s' % [
+                item.prev_item.inspect,
+                item.next_item.inspect,
+              ]
+            end
+          when Interval
+            # Skip
+          when Operator
+            if item_collection1.curr.is_a?(Range)
+              # puts '%s-> Operator, Curr Range'.colorize(:cyan) % [' ' * (@level * 2)]
+
+              if item_collection1.curr.right_item.is_a?(Number)
+                item_collection1.curr.right_item.inc
+              end
+            elsif item.prev_item.is_a?(Number)
+              # puts '%s-> Operator, Number'.colorize(:cyan) % [' ' * (@level * 2)]
+
+              item_collection1.push(Range.new(item.symbole))
+              item_collection1.curr.left_item = item.prev_item
+              item_collection1.curr.right_item = item.prev_item
+              item_collection1.curr.right_item.inc
+            elsif item.prev_item.is_a?(Operator)
+              # puts '%s-> Operator, Prev Operator'.colorize(:cyan) % [' ' * (@level * 2)]
+
+              if item_collection1.curr.is_a?(Range)
+                if item_collection1.curr.right_item.is_a?(Number)
+                  item_collection1.curr.right_item.inc
+                end
+              end
+            # else
+            #   puts '%s-> Operator ELSE: %s' % [' ' * (@level * 2), item.prev_item.inspect]
+            end
+          else
+            item_collection1.push(item)
+          end # case item
+        end # scopes.curr.items.each
+
+        # puts '%s-> L3 Items' % [' ' * (@level * 2)]
+        # pp item_collection1.items.map{ |item| item.inspect }
+
+        # puts '%s-> L4 [convert to int]'.colorize(:blue) % [' ' * (@level * 2)]
+        items2 = []
+        item_collection1.items.each do |item|
+          items2.push(item.resolve)
+        end
+        items2
+      end
+    end
+
+    class << self
+      def keep_nonce_on_dup()
+        true
+      end
+      def keep_instance_id_on_dup()
+        true
+      end
+    end
+  end # Scope
+end # Lexer
+end # Range
+end # TheFox