packcr 0.0.3

data/lib/packcr/stream.rb

@@ -0,0 +1,101 @@
+require "securerandom"
+
+class Packcr
+  class Stream
+    def initialize(io, name, line)
+      @io = io
+      @name = name
+      @line = line
+      @line_directive_tag = nil
+    end
+
+    def write(s, rewrite_line_directive: false)
+      if rewrite_line_directive && @line_directive_tag && @line.respond_to?(:+)
+        s.gsub!(@line_directive_tag) { (@line + $`.count("\n") + 1).to_s }
+        @line_directive_tag = nil
+      end
+      @io.write(s)
+      if @line.respond_to?(:+)
+        @line += s.count("\n")
+      end
+    end
+
+    def write_text(s)
+      write s.gsub(/\r\n/, "\n")
+    end
+
+    def write_line_directive(fname, lineno)
+      return unless @line
+      if lineno.respond_to?(:+)
+        write("#line #{lineno + 1} \"")
+      else
+        @line_directive_tag ||= "<#{SecureRandom.uuid}>"
+        write("#line #{@line_directive_tag} \"")
+      end
+
+      write(Packcr.escape_string(fname))
+      write("\"\n")
+    end
+
+    def write_output_line_directive
+      write_line_directive(@name, @line)
+    end
+
+    def write_code_block(code, indent, fname)
+      text = code.text
+      ptr = text.b
+      len = code.len
+      lineno = code.line
+      if len == nil
+        return # for safety
+      end
+
+      ptr.sub!(/\A\n+/) do
+        lineno += $&.length
+        ""
+      end
+      ptr.sub!(/[ \v\f\t\r\n]*\z/, "")
+
+      min_indent_spaces = nil
+      ptr.gsub!(/^([ \v\f\t]+)([^ \v\f\t\r\n])/) do
+        spaces = $1
+        char = $2
+
+        next char if char == "#"
+
+        Packcr.unify_indent_spaces(spaces)
+
+        if !min_indent_spaces || min_indent_spaces.length > spaces.length
+          min_indent_spaces = spaces
+        end
+
+        spaces + char
+      end
+
+      if min_indent_spaces
+        indent_spaces = " " * indent
+        ptr.gsub!(/^#{min_indent_spaces}( *[^\n#])/) do
+          "#{indent_spaces}#{$1}"
+        end
+      end
+
+      return if ptr.empty?
+
+      write_line_directive(fname, lineno)
+      ptr.scan(/^(.+?)[ \v\f\t\r]*$|^\r?\n/) do
+        write $1 if $1
+        write "\n"
+      end
+      write_output_line_directive
+    end
+
+    def get_code_block(code, indent, fname)
+      buf = StringIO.new
+      line, io, @io, @line = @line, @io, buf, @line && :uuid
+      write_code_block(code, indent, fname)
+      return buf.string
+    ensure
+      @line, @io = line, io
+    end
+  end
+end

data/lib/packcr/util.rb

@@ -0,0 +1,94 @@
+class Packcr
+  module Util
+    def is_identifier_string(str)
+      str.match?(/\A(?!\d)\w+\z/)
+    end
+
+    def unescape_string(str, is_charclass)
+      if is_charclass
+        str.gsub!("\\" * 2) { "\\" * 4 }
+      end
+      str.gsub!(/\\(.)/) do
+        c = $1
+        case c
+        when "0"
+          "\\x00"
+        when "'"
+          c
+        else
+          "\\#{c}"
+        end
+      end
+      str.gsub!(/[^\x00-\x7f]/) do
+        "\\x%02x" % $&.ord
+      end
+      str.replace "\"#{str}\"".undump
+    end
+
+    def escape_character(c)
+      escape_string(c.chr)
+    end
+
+    def escape_string(str)
+      str = str.b
+      str.gsub(/(\0+)|(\e+)|("+)|('+)|(\\+)|((?:(?![\0\e"'\\])[ -~])+)|([\x01-\x1a\x1c-\x1f\x7f-\xff]+)/n) do
+        n = $&.size
+        next "\\0"   * n if $1
+        next "\\x1b" * n if $2
+        next "\\\""  * n if $3
+        next "\\\'"  * n if $4
+        next "\\\\"  * n if $5
+        next $6 if $6
+        $7.dump[1..-2].downcase
+      end
+    end
+
+    def dump_integer_value(value)
+      if value == nil
+        $stdout.print "void"
+      else
+        $stdout.print value
+      end
+    end
+
+    def dump_escaped_string(str)
+      if !str
+        $stdout.print "null"
+        return
+      end
+      $stdout.print escape_string(str)
+    end
+
+    def find_trailing_blanks(str)
+      str =~ /[ \v\f\t\n\r]*\z/
+    end
+
+    def unify_indent_spaces(spaces)
+      offset = 0
+      spaces.tr!("\v\f", " ")
+      spaces.gsub!(/\t+/) do
+        chars = $`.length
+        o = 8 * $&.length - (offset + chars) % 8
+        offset = (7 - chars) % 8
+        " " * o
+      end
+      spaces
+    end
+
+    def template(path, b, indent: 0, unwrap: false)
+      template_path = File.join(File.dirname(__FILE__), "templates", path)
+      erb = ERB.new(File.read(template_path), trim_mode: "%-")
+      erb.filename = template_path
+      result = erb.result(b)
+      if unwrap
+        result.gsub!(/\A\{|\}\z/, "")
+        indent -= 4
+      end
+      result.gsub!(/^(?!$)/, " " * indent)
+      result.gsub!(/^( *?) {0,4}<<<</) { $1 }
+      result
+    end
+  end
+
+  extend Util
+end

data/lib/packcr/version.rb

@@ -0,0 +1,3 @@
+class Packcr
+  VERSION = "0.0.3"
+end

data/lib/packcr.rb

@@ -0,0 +1,33 @@
+class Packcr
+end
+
+require "packcr/util"
+require "packcr/code_block"
+require "packcr/stream"
+require "packcr/generator"
+require "packcr/buffer"
+require "packcr/node"
+require "packcr/context"
+require "packcr/version"
+
+class Packcr
+  CODE_REACH__BOTH = 0
+  CODE_REACH__ALWAYS_SUCCEED = 1
+  CODE_REACH__ALWAYS_FAIL = -1
+
+  def initialize(path, **opt)
+    @path = path.to_s
+    @opt = opt
+  end
+
+  def run
+    Context.new(@path.to_s, **@opt) do |ctx|
+      if !ctx.parse
+        raise "PackCR error: can't parse"
+      end
+      if !ctx.generate
+        raise "PackCR error: can't generate"
+      end
+    end
+  end
+end

metadata

@@ -0,0 +1,77 @@
+--- !ruby/object:Gem::Specification
+name: packcr
+version: !ruby/object:Gem::Version
+  version: 0.0.3
+platform: ruby
+authors:
+- wanabe
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2023-01-03 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: test-unit
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.5'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.5'
+description: 
+email: 
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/packcr.rb
+- lib/packcr/buffer.rb
+- lib/packcr/code_block.rb
+- lib/packcr/context.rb
+- lib/packcr/generator.rb
+- lib/packcr/node.rb
+- lib/packcr/node/action_node.rb
+- lib/packcr/node/alternate_node.rb
+- lib/packcr/node/capture_node.rb
+- lib/packcr/node/charclass_node.rb
+- lib/packcr/node/error_node.rb
+- lib/packcr/node/expand_node.rb
+- lib/packcr/node/predicate_node.rb
+- lib/packcr/node/quantity_node.rb
+- lib/packcr/node/reference_node.rb
+- lib/packcr/node/rule_node.rb
+- lib/packcr/node/sequence_node.rb
+- lib/packcr/node/string_node.rb
+- lib/packcr/stream.rb
+- lib/packcr/util.rb
+- lib/packcr/version.rb
+homepage: https://github.com/wanabe/packcr
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.4.1
+signing_key: 
+specification_version: 4
+summary: Parser generator for C or Ruby
+test_files: []