packcr 0.0.4 → 0.0.7

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: b00f2dcd94c63af9d03206e51dbb951778f35cf44a8e4644025f8fb5f59043e2
-  data.tar.gz: d03d48555f0dfb6086acb7198050defe1e0eea025fca279ef9fc85491803f83b
+  metadata.gz: c7f6f8510a8922ec8a3f379de4470af6889a01a0f98aebf46b69f16e2c398c64
+  data.tar.gz: aa728bb984a9a343c71099fe6652b7a37c5a3a20b535ad6d5cbc29feaaa776d0
 SHA512:
-  metadata.gz: a06709977ca0f8a12529668b2ae879f5a713798a35daaf27a76038560cf949817d128f47f019b2ef59ce347f61021415806343646f4835dd239e9965e4dd1814
-  data.tar.gz: f4de00a9453f68af3eeefb2b07792ff1cfd3748dd21aaa96fb859ec57a13bd4fd7c63931c7695ee8e2c13256f6d8a17ff694de8e48df809d7e33582f0861d8c7
+  metadata.gz: ceee0d72c7fa96a8a71fd76d8015591f70c4ba321242966ed295522d55e37e2ce71cf8ab51bda644971f5b0ad675c4c0dbdd225e8f2eded2d5eb8f5a3957922f
+  data.tar.gz: fd819a73b1b16827316ddef020068383952cf6d188ac728f5d06157330b49b0010561552676fce3652cc90b0f838f7750242622b83d0677335e6bc6235199d4f

data/exe/packcr

@@ -0,0 +1,3 @@
+#!/usr/bin/env ruby
+require "packcr/cli"
+Packcr::Cli.run(ARGV)

data/lib/packcr/broadcast.rb

@@ -0,0 +1,17 @@
+class Packcr
+  class BroadCast
+    def initialize(*arrays)
+      @arrays = arrays
+    end
+
+    def <<(obj)
+      @arrays.each do |array|
+        array << obj
+      end
+    end
+
+    def to_ary
+      @arrays
+    end
+  end
+end

data/lib/packcr/cli.rb

@@ -0,0 +1,27 @@
+require "packcr"
+require "optparse"
+
+class Packcr
+  class Cli
+    class << self
+      def run(argv)
+        new.run(argv)
+      end
+    end
+
+    def run(argv)
+      lang = nil
+      debug = false
+      ascii = false
+      opt = OptionParser.new
+      opt.on("-l", "--lang=VAL") { |v| lang = v.to_sym }
+      opt.on("-d", "--debug") { |_v| debug = true }
+      opt.on("-a", "--ascii") { |_v| ascii = true }
+
+      opt.parse!(argv)
+      argv.each do |ifile|
+        ::Packcr.new(ifile, lang: lang, debug: debug, ascii: ascii).run
+      end
+    end
+  end
+end

data/lib/packcr/code_block.rb

@@ -1,11 +1,9 @@
-
 class Packcr
   class CodeBlock
-    attr_reader :text, :len, :line
+    attr_reader :text, :line
 
-    def initialize(text = nil, len = 0, line = nil, col = nil)
+    def initialize(text = nil, line = nil, col = nil)
       @text = text
-      @len = len
       @line = line
       @col = col
     end

data/lib/packcr/context.rb

@@ -1,15 +1,20 @@
+require "tempfile"
 require "packcr/parser"
+require "packcr/broadcast"
 
 class Packcr
-  class Context < Packcr::Parser
+  class Context
+    attr_reader :lang, :root
+    attr_accessor :prefix, :auxil_type, :value_type, :errnum, :capture_in_code
+
     def initialize(path, lines: false, debug: false, ascii: false, lang: nil)
-      super(debug: debug)
       if !path
         raise ArgumentError, "bad path: #{path}";
       end
 
       @iname = path
-      @ifile = File.open(path, "rb")
+      @debug = debug
+
       dirname = File.dirname(path)
       basename = File.basename(path, ".*")
       if !lang
@@ -29,42 +34,40 @@ class Packcr
       @lang = lang.to_sym
       case @lang
       when :c
-        @sname = path + ".c"
-        @hname = path + ".h"
+        @hname = "#{path}.h"
+        @patterns = {
+          get_source_code: "#{path}.c",
+          get_header_code: @hname,
+        }
         @hid = File.basename(@hname).upcase.gsub(/[^A-Z0-9]/, "_")
       when :rb
-        @sname = path + ".rb"
-        @hname = nil
+        @patterns = {
+          get_source_code: "#{path}.rb",
+        }
       else
         raise "unexpected lang: #{@lang}"
       end
 
       @lines = !!lines
       @ascii = !!ascii
+      @utf8 = !ascii
 
       @errnum = 0
-      @linenum = 0
-      @charnum = 0
-      @linepos = 0
-      @bufpos = 0
-      @bufcur = 0
-
-      @esource = []
-      @eheader = []
-      @source = []
-      @header = []
-      @lheader = []
-      @lsource = []
-      @location = []
-      @init = []
-
-      if block_given?
-        yield(self)
-      end
+
+      @codes = {}
+      @root = Node::RootNode.new
+
+      return unless block_given?
+
+      yield(self)
+    end
+
+    def code(name)
+      @codes[name] ||= []
     end
 
     def inspect
-      "#<#{self.class}:0x%016x>" % object_id
+      format("#<%s:0x%016x>", self.class, object_id)
     end
 
     def error(line, col, message)
@@ -84,8 +87,17 @@ class Packcr
       @prefix || "pcc"
     end
 
+    def pass_value_code(var)
+      case @lang
+      when :c
+        "__ = #{var};"
+      when :rb
+        "____ = #{var}"
+      end
+    end
+
     def class_name
-      prefix.gsub(/(?:_|^|(\W))([a-z])/) { "#{$1}#{$2}".upcase }
+      prefix.gsub(/(?:_|^|(\W))([a-z])/) { "#{::Regexp.last_match(1)}#{::Regexp.last_match(2)}".upcase }
     end
 
     def auxil_def
@@ -106,33 +118,20 @@ class Packcr
       EOS
     end
 
-    def parse
-      $stdin = @ifile
-      nil while super
-
-      if @location.empty?
-        @location = nil
+    def parse_all
+      File.open(@iname, "rb") do |r|
+        parser = Packcr::Parser.new(self, r, debug: @debug)
+        nil while parser.parse
       end
 
-      make_rulehash
-      @rules.each do |rule|
-        rule.setup
-        rule.expr.link_references(self)
-      end
-      @rules[1..-1]&.each do |rule|
-        if rule.ref == 0
-          error rule.line + 1, rule.col + 1, "Never used rule '#{rule.name}'"
-        elsif rule.ref < 0 # impossible?
-          error rule.line + 1, rule.col + 1, "Multiple definition of rule '#{rule.name}'"
-        end
+      if !code(:location).empty?
+        @location = true
       end
 
-      @rules.each do |rule|
-        rule.verify(self)
-      end
+      @root.setup(self)
 
       if @debug
-        @rules.each(&:debug_dump)
+        @root.debug_dump
         dump_options
       end
 
@@ -140,26 +139,32 @@ class Packcr
     end
 
     def generate
-      if @hname
-        File.open(@hname, "wt") do |hio|
-          hstream = ::Packcr::Stream.new(hio, @hname, @lines ? 0 : nil)
+      results = []
 
-          hstream.write Packcr.template("context/header.#{@lang}.erb", binding), rewrite_line_directive: true
-        end
-      end
+      @patterns.each do |meth, ofile|
+        result = Tempfile.new
+        result.unlink
+        results << [ofile, result]
+        stream = Packcr::Stream.new(result, ofile, @lines ? 0 : nil)
+        stream.write Packcr.format_code(public_send(meth, @lang, stream)), rewrite_line_directive: true
 
-      File.open(@sname, "wt") do |sio|
-        sstream = ::Packcr::Stream.new(sio, @sname, @lines ? 0 : nil)
+        next if @errnum.zero?
 
-        sstream.write Packcr.template("context/source.#{@lang}.erb", binding), rewrite_line_directive: true
+        results.each do |_, r|
+          r.close
+        end
+        return false
       end
 
-      if !@errnum.zero?
-        File.unlink(@hname) if @name
-        File.unlink(@sname)
-        return false
+      results.each do |(name, result)|
+        result.rewind
+        File.open(name, "wt") do |f|
+          IO.copy_stream(result, f)
+        end
       end
       true
     end
   end
 end
+
+require "packcr/generated/context"