packcr 0.0.3 → 0.0.4

data/lib/packcr/generator.rb

@@ -1,3 +1,4 @@
+require "stringio"
 
 class Packcr
   class Generator

data/lib/packcr/node/action_node.rb

@@ -3,8 +3,9 @@ class Packcr
     class ActionNode < Packcr::Node
       attr_accessor :code, :index, :vars, :capts
 
-      def initialize
-        super
+      def initialize(code = nil)
+        super()
+        @code = code
         self.vars = []
         self.capts = []
       end
@@ -47,6 +48,11 @@ class Packcr
 
       def link_references(ctx)
       end
+
+      def setup_rule(rule)
+        @index = rule.codes.length
+        rule.codes.push(self)
+      end
     end
   end
 end

data/lib/packcr/node/alternate_node.rb

@@ -3,9 +3,14 @@ class Packcr
     class AlternateNode < Packcr::Node
       attr_accessor :nodes
 
-      def initialize
-        super
-        self.nodes = []
+      def initialize(*nodes)
+        super()
+        self.nodes = nodes
+      end
+
+      def alt(node)
+        @nodes << node
+        self
       end
 
       def debug_dump(indent = 0)

data/lib/packcr/node/capture_node.rb

@@ -3,6 +3,10 @@ class Packcr
     class CaptureNode < Packcr::Node
       attr_accessor :expr, :index
 
+      def initialize(expr = nil)
+        @expr = expr
+      end
+
       def debug_dump(indent = 0)
         $stdout.print "#{" " * indent}Capture(index:"
         Packcr.dump_integer_value(index)
@@ -29,6 +33,16 @@ class Packcr
       def link_references(ctx)
         expr.link_references(ctx)
       end
+
+      def nodes
+        [expr]
+      end
+
+      def setup_rule(rule)
+        @index = rule.capts.length
+        rule.capts << self
+        super
+      end
     end
   end
 end

data/lib/packcr/node/charclass_node.rb

@@ -3,6 +3,10 @@ class Packcr
     class CharclassNode < Packcr::Node
       attr_accessor :value
 
+      def initialize(value = nil)
+        @value = value
+      end
+
       def debug_dump(indent = 0)
         $stdout.print "#{" " * indent}Charclass(value:'"
         Packcr.dump_escaped_string(value)

data/lib/packcr/node/error_node.rb

@@ -3,8 +3,11 @@ class Packcr
     class ErrorNode < Packcr::Node
       attr_accessor :expr, :code, :index, :vars, :capts
 
-      def initialize
-        super
+      def initialize(expr = nil, code = nil, index = nil)
+        super()
+        @expr = expr
+        @code = code
+        @index = index
         self.vars = []
         self.capts = []
       end
@@ -47,6 +50,16 @@ class Packcr
       def link_references(ctx)
         expr.link_references(ctx)
       end
+
+      def nodes
+        [expr]
+      end
+
+      def setup_rule(rule)
+        @index = rule.codes.length
+        rule.codes.push(self)
+        super
+      end
     end
   end
 end

data/lib/packcr/node/expand_node.rb

@@ -3,6 +3,10 @@ class Packcr
     class ExpandNode < Packcr::Node
       attr_accessor :index, :line, :col
 
+      def initialize(index = nil)
+        @index = index
+      end
+
       def debug_dump(indent = 0)
         $stdout.print "#{" " * indent}Expand(index:"
         Packcr.dump_integer_value(index)

data/lib/packcr/node/predicate_node.rb

@@ -3,9 +3,10 @@ class Packcr
     class PredicateNode < Packcr::Node
       attr_accessor :neg, :expr
 
-      def initialize
-        super
-        self.neg = false
+      def initialize(expr = nil, neg = false)
+        super()
+        @expr = expr
+        @neg = neg
       end
 
       def debug_dump(indent = 0)
@@ -46,6 +47,10 @@ class Packcr
       def link_references(ctx)
         expr.link_references(ctx)
       end
+
+      def nodes
+        [expr]
+      end
     end
   end
 end

data/lib/packcr/node/quantity_node.rb

@@ -3,10 +3,11 @@ class Packcr
     class QuantityNode < Packcr::Node
       attr_accessor :min, :max, :expr
 
-      def initialize
-        super
-        self.min = 0
-        self.max = 0
+      def initialize(expr = nil, min = 0, max = 0)
+        super()
+        @expr = expr
+        @min = min
+        @max = max
       end
 
       def debug_dump(indent = 0)
@@ -50,6 +51,10 @@ class Packcr
       def link_references(ctx)
         expr.link_references(ctx)
       end
+
+      def nodes
+        [expr]
+      end
     end
   end
 end

data/lib/packcr/node/reference_node.rb

@@ -3,6 +3,13 @@ class Packcr
     class ReferenceNode < Packcr::Node
       attr_accessor :var, :index, :name, :rule, :line, :col
 
+      def initialize(name = nil, var = nil, line = nil, col = nil)
+        @name = name
+        @var = var
+        @line = line
+        @col = col
+      end
+
       def debug_dump(indent = 0)
         $stdout.print "#{" " * indent}Reference(var:'#{var || "(null)"}', index:"
         Packcr.dump_integer_value(index)
@@ -14,6 +21,21 @@ class Packcr
         Packcr::CODE_REACH__BOTH
       end
 
+      def setup_rule(rule)
+        return unless var
+        i = rule.vars.index do |ref|
+          unless ref.is_a?(Packcr::Node::ReferenceNode)
+            raise "Unexpected node type: #{ref.class}"
+          end
+          var == ref.var
+        end
+        if !i
+          i = rule.vars.length
+          rule.vars << self
+        end
+        @index = i
+      end
+
       def verify_variables(vars)
         return if index.nil?
 

data/lib/packcr/node/rule_node.rb

@@ -3,12 +3,16 @@ class Packcr
     class RuleNode < Packcr::Node
       attr_accessor :codes, :name, :expr, :ref, :vars, :capts, :line, :col
 
-      def initialize
-        super
+      def initialize(expr = nil, name = nil, line = nil, col = nil)
+        super()
         self.ref = 0
         self.vars = []
         self.capts = []
         self.codes = []
+        @expr = expr
+        @name = name
+        @line = line
+        @col = col
       end
 
       def debug_dump(indent = 0)
@@ -25,6 +29,14 @@ class Packcr
       def add_ref
         @ref += 1
       end
+
+      def setup
+        setup_rule(self)
+      end
+
+      def nodes
+        [expr]
+      end
     end
   end
 end

data/lib/packcr/node/sequence_node.rb

@@ -3,9 +3,14 @@ class Packcr
     class SequenceNode < Packcr::Node
       attr_accessor :nodes
 
-      def initialize
-        super
-        self.nodes = []
+      def initialize(*nodes)
+        super()
+        self.nodes = nodes
+      end
+
+      def seq(node)
+        @nodes << node
+        self
       end
 
       def debug_dump(indent = 0)

data/lib/packcr/node/string_node.rb

@@ -3,6 +3,10 @@ class Packcr
     class StringNode < Packcr::Node
       attr_accessor :value
 
+      def initialize(value = nil)
+        self.value = value
+      end
+
       def value=(value)
         @value = value&.b
       end

data/lib/packcr/node.rb

@@ -1,5 +1,22 @@
 class Packcr
   class Node
+    def seq(expr)
+      SequenceNode.new(self, expr)
+    end
+
+    def alt(expr)
+      AlternateNode.new(self, expr)
+    end
+
+    def setup_rule(rule)
+      nodes.each do |node|
+        node.setup_rule(rule)
+      end
+    end
+
+    def nodes
+      []
+    end
   end
 end