dptm6 1.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: e63193f44881d5e5a8a61cbd10de60f0a18149f8881f1fbff8d3a4bb3cf26da4
+  data.tar.gz: 5ba36893056cc101acd5b25897aa6b596d1df678f98fa7aed07a9c34b362e91c
+SHA512:
+  metadata.gz: 98f1a69940881ba2517ad09e12a6b330386c17c88d4e0c490f37017742948aae00d62ad592ce350a93a7fd7fc591ccfb5e8046778b21bf53062223cfa4ad6b83
+  data.tar.gz: 88e9d0f8b5e018751fc37939dbd0f45acc62ae24603593f6cf5b282a444fce9aa516d25f7897edc0f706f56fc3dc5c27d9283e910b9c20933b6ccd4c49dbb658

data/.gitignore

@@ -0,0 +1,12 @@
+/.bundle/
+/.yardoc
+/Gemfile.lock
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+
+# rspec failure tracking
+.rspec_status

data/.rspec

@@ -0,0 +1,3 @@
+--format documentation
+--color
+--require spec_helper

data/.travis.yml

@@ -0,0 +1,5 @@
+sudo: false
+language: ruby
+rvm:
+  - 2.5.1
+before_install: gem install bundler -v 1.16.2

data/Gemfile

@@ -0,0 +1,6 @@
+source "https://rubygems.org"
+
+git_source(:github) {|repo_name| "https://github.com/#{repo_name}" }
+
+# Specify your gem's dependencies in dptm6.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2018 Masahiro Nomoto
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,46 @@
+# dptm6 (dclpdftonemerge for DCL 6)
+
+このgemは、[地球流体電脳ライブラリ](https://www.gfd-dennou.org/library/dcl/)（DCL）によって描画・出力したPDFファイルのトーン（塗りつぶし）の断片を結合してファイルを軽くするコマンド `dptm6` を提供します。
+
+DCLはバージョン5まで独自のPostScriptファイルを出力していましたが、バージョン6から[cairo](https://www.cairographics.org)を用いたPDF出力に変更されました。以前のバージョン用のアプリケーション `dptm2` は[GFD電脳Ruby小物置き場](http://davis.gfd-dennou.org/rubygadgets/ja/?%28Application%29+DCLのPSファイルのトーンを結合する2)で公開しています。
+
+## インストール
+
+Rubyがインストールされた環境で以下のコマンドを実行してください。
+
+    $ gem install dptm6
+
+## 使い方
+
+大前提として、このコマンドはDCLで出力して未編集のPDFに対してのみ正しく動作します。
+
+基本的な使い方は、コマンドの後ろに変換したいPDFファイルを指定するだけです。変換後のファイル名は、元の名前に番号を付け加えたものになります。（番号は既存のファイルを上書きしないように選ばれます）
+
+```
+$ ls *.pdf
+dcl.pdf
+
+$ dptm6  dcl.pdf
+$ ls *.pdf
+dcl.pdf  dcl_1.pdf
+
+$ dptm6  dcl.pdf
+$ ls *.pdf
+dcl.pdf  dcl_1.pdf  dcl_2.pdf
+```
+
+出力するファイル名を指定することもできます。入力ファイルの全ページをつなげたPDFができます。
+
+    $ dptm6  -o dcl-merged.pdf  dcl-a.pdf dcl-b.pdf dcl-c.pdf
+
+入力ファイルの一部ページだけを抽出することもできます。（先頭を0ページ目と数えます）
+
+    $ dptm6  input.pdf[0,5...2,8..-1]   #=> [0,5,4,3,8,9,...,n-1]
+
+その他の説明はヘルプを参照してください。だたし、現在は開発時のデバッグ用オプションしかありません。
+
+    $ dptm6  -h
+
+## ライセンス
+
+このgemは、[MITライセンス](https://opensource.org/licenses/MIT)の条件の下でオープンソースとして利用可能です。

data/Rakefile

@@ -0,0 +1,6 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :default => :spec

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "dptm6"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start(__FILE__)

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/dptm6.gemspec

@@ -0,0 +1,29 @@
+
+lib = File.expand_path("../lib", __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require "dptm6/version"
+
+Gem::Specification.new do |spec|
+  spec.name          = "dptm6"
+  spec.version       = DPTM6::VERSION
+  spec.authors       = ["Masahiro Nomoto"]
+  spec.email         = ["hmmnrst@users.noreply.github.com"]
+
+  spec.summary       = %q{dclpdftonemerge for DCL 6}
+  spec.description   = %q{Merge tones in PDF made by DCL (Dennou Club Library) ver. 6}
+  spec.homepage      = "https://github.com/hmmnrst/dptm6"
+  spec.license       = "MIT"
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.16"
+  spec.add_development_dependency "rake", "~> 10.0"
+  spec.add_development_dependency "rspec", "~> 3.0"
+end

data/exe/dptm6

@@ -0,0 +1,6 @@
+#!/usr/bin/env ruby
+
+require 'dptm6'
+require 'dptm6/cli'
+
+DPTM6::CLI.new(ARGV).exec

data/lib/dptm6.rb

@@ -0,0 +1,4 @@
+require "dptm6/version"
+
+module DPTM6
+end

data/lib/dptm6/cli.rb

@@ -0,0 +1,123 @@
+require 'zlib'
+require 'dptm6/pdf'
+
+module DPTM6; class CLI
+  def initialize(args)
+    @options = { :compression_level => Zlib::DEFAULT_COMPRESSION, :optimization_level => 1 }
+    @files = []
+
+    args = args.dup
+    while (arg = args.shift)
+      case arg
+      when /\A-C(\d++)?/   # compression level
+        @options[:compression_level] = ($~[1] || Zlib::DEFAULT_COMPRESSION).to_i
+      when /\A-O(\d?+)/   # optimization level
+        @options[:optimization_level] = ($~[1] || 1).to_i
+      when /\A-o/   # output file name
+        @options[:outfile] = args.shift
+      when /\A-h/i
+        @options[:help] = true
+      else
+        file = arg.sub(/\[([^\[\]]*+)\]\z/, "")
+        str = ($~ ? $~[1] : "0..-1")
+        pages = str.gsub("\s", "").split(",").collect do |range|
+          md = range.match(/\A(-?+\d++)(?:(-|..|...)(-?+\d++))?+\z/)
+          raise "invalid page specification: [#{range}]" unless md
+
+          p1 = md[1].to_i
+          p2 = (md[3] || p1).to_i
+          case md[2]
+          when "..." then p1...p2
+          else            p1..p2
+          end
+        end
+        @files << [file, pages]
+      end
+    end
+  end
+
+  def exec
+    if (@options[:help] || @files.empty?)
+      put_help
+      return
+    end
+
+    clevs = [:NO_COMPRESSION, :BEST_SPEED, :BEST_COMPRESSION, :DEFAULT_COMPRESSION].inject({}) do |hash,name|
+      hash[Zlib.const_get(name)] = name
+      hash
+    end
+    clev = @options[:compression_level]
+    clev = Zlib::DEFAULT_COMPRESSION unless (0..9).include?(clev)
+    STDERR.puts("#compression level : #{clevs[clev] || clev}")
+
+    optlev = @options[:optimization_level]
+    STDERR.puts("#optimization flag : #{optlev != 0}")
+
+    outfile = @options[:outfile] || find_nextfile(@files[0][0])
+    STDERR.puts("#output file name  : #{outfile}")
+
+    pdf2 = PDF::File.create(outfile)
+    head = nil
+
+    @files.each do |file,pages|
+      pdf = PDF::File.open(file)
+      unless head
+        head = pdf.get_object(0)
+        head.move_to(pdf2, 0).write
+      end
+
+      n = pdf.pages.size
+      pages.each do |range|
+        first = range.first % n
+        last  = range.last  % n
+        inc = (first <= last ? 1 : -1)
+        last -= inc if range.exclude_end?
+
+        first.step(last, inc) do |i|
+          STDERR.puts("processing #{file}[#{i}]")
+          image = pdf.get_dclimage(i)
+          image.set_deflevel(clev)
+          image.parse if (optlev > 0)
+          image.move_to(pdf2, nil)
+          image.write
+        end
+      end
+      pdf.close
+    end
+
+    pdf2.write_info
+    pdf2.write_xref
+    pdf2.close
+  end
+
+  def find_nextfile(basefile)
+    pos = basefile.rindex(".pdf")
+    file = nil
+    (1..99).each do |i|
+      file = basefile.dup.insert(pos, "_#{i}")
+      return file unless File.exist?(file)
+    end
+    raise "failed to create a new filename.  (last candidate: #{file})"
+  end
+
+  def put_help
+    STDERR.puts(<<-EOS)
+usage: ruby #{File.basename(__FILE__)} [-C[n]] [-O[n]] [-o output.pdf] input.pdf...
+
+       options
+       -C[n] : compression level
+               0      : NO_COMPRESSION
+               1 - 9  : BEST_SPEED - BEST_COMPRESSION
+               others : DEFAULT_COMPRESSION (default)
+       -O[n] : optimization flag
+               0      : off
+               others : on (default)
+       -o output.pdf : output filename
+               If not specified, "input_%d.pdf" is used instead.
+
+       input files
+               Filenames can have page specifications.
+               example: input.pdf[0,5...2,8..-1]   #=> [0,5,4,3,8,9,...,n-1]
+    EOS
+  end
+end; end

data/lib/dptm6/path.rb

@@ -0,0 +1,93 @@
+class DPTM6::Path
+  class Node
+    attr_reader :x, :y, :op
+    attr_accessor :prev, :next
+
+    def initialize(x, y, op)
+      @x = x.to_f
+      @y = y.to_f
+      @op = op.to_sym
+    end
+
+    def connect(next_node)
+      self.next = next_node
+      next_node.prev = self
+      self
+    end
+
+    def reconnect(opp_node)
+      # assume that self.x == opp_node.x && self.y == opp_node.y
+      if (self.next.x == opp_node.prev.x && self.next.y == opp_node.prev.y)
+        opp_node.prev.connect(self.next)
+        self.connect(opp_node)
+        self
+      else
+        nil
+      end
+    end
+
+    def output(op = @op)
+      @op = nil
+      "%g %g %s " % [@x, @y, op]
+    end
+  end
+
+  def initialize(nodes = [])
+    @nodes = nodes
+  end
+
+  def add(buf_node)
+    (buf_node << buf_node[0]).each_cons(2) { |a,b| @nodes << a.connect(b) } if (buf_node.length >= 2)
+  end
+
+  def optimize
+    return self unless @nodes
+
+    # reconnect nodes (total number of nodes is not changed)
+    @nodes.group_by(&:y).each do |y,nodes|
+      nodes.group_by(&:x).each do |x,buf|
+        while (n1 = buf.pop)
+          buf.each { |n2| break if n1.reconnect(n2) }
+        end
+      end
+    end
+
+    # remove needless nodes
+    @nodes.reject! do |node|
+      d1x = node.prev.x - node.x
+      d1y = node.prev.y - node.y
+      d2x = node.next.x - node.x
+      d2y = node.next.y - node.y
+      if (d1x * d2y == d2x * d1y)
+        node.prev.connect(node.next)
+        true
+      else
+        false
+      end
+    end
+
+    self
+  end
+
+  def output_fill(buf = '')
+    return buf if (@nodes.length < 2)
+    buf << "\n" unless (buf[-1] == "\n")
+    nodes = @nodes.dup
+    while (node0 = node = nodes.shift)
+      next unless node.op
+      buf << node.output(:m)
+      until ((node = node.next) == node0)
+        buf << node.output(:l)
+      end
+      buf << "h\n"
+    end
+    buf << "B\n"
+  end
+
+  def output_stroke(buf = '', close = false)
+    return buf if (@nodes.length < 1)
+    @nodes.each { |node| buf << node.output }
+    buf << "h " if close
+    buf << "S\n"
+  end
+end

data/lib/dptm6/pdf.rb

@@ -0,0 +1,389 @@
+require 'zlib'
+require 'dptm6/path'
+
+module DPTM6; module PDF
+  REGEXP_DATA = /\A(?:(?'dict'<<(?>\g'dict'|[^<>]++)*+>>\s*+)|(?'num'\s*\d+\s*+))/m
+
+  class File
+    attr_reader :fp, :trailer
+    attr_accessor :xref, :pages
+    private_class_method :new
+
+    @@obj0_pages = nil
+    @@obj0_info  = nil
+    @@obj0_root  = nil
+
+    def self.open(file)
+      new(file, "rb")
+    end
+
+    def self.create(file)
+      new(file, "wb")
+    end
+
+    def initialize(file, mode)
+      @fp = Kernel.open(file, mode)
+
+      if (mode[0] == "r")
+        read_xref
+        read_info
+      else
+        @xref = []
+        @pages = []
+      end
+    end
+
+    def close
+      @fp.close
+    end
+
+    def get_dclimage(num)
+      PDF::DCLImage.new(self, num)
+    end
+
+    def get_object(num, type = PDF::Object)
+      type.new(self, num)
+    end
+
+    def get_object_by_key(dict, key, type = PDF::Object)
+      ary = dict.scan(/#{key}\s++(\d++)\s++\d++\s++R/m)
+      return nil if ary.empty?
+
+      num = ary[0][0].to_i
+      get_object(num, type)
+    end
+
+    def write_info
+      str = @pages.collect { |i| "#{i} 0 R " }.join
+      @@obj0_pages.data[/\/Kids\s++\[\s++([\d\sR]++)\]/,1] = str
+      @@obj0_pages.data[/\/Count\s++(\d++)/,1] = @pages.size.to_s
+      @@obj0_pages.move_to(self, 1).write
+
+      @@obj0_info.move_to(self, @xref.size).write
+
+      @@obj0_root.move_to(self, @xref.size).write
+    end
+
+    def write_xref
+      pos = @fp.pos
+      size = @xref.size
+
+      @fp.write("xref\n")
+      @fp.write("#{0} #{size}\n")
+      @xref.sort_by(&:last).each do |i,j,k|
+        @fp.write("%010d %05d %c \n" % (k == 0 ? [i, 65535, "f"] : [i, 0, "n"]))
+      end
+
+      @fp.write(<<-EOS)
+trailer
+<< /Size #{size}
+   /Root #{size-1} 0 R
+   /Info #{size-2} 0 R
+>>
+      EOS
+
+      @fp.write(<<-EOS)
+startxref
+#{pos}
+%%EOF
+      EOS
+    end
+
+    private
+
+    def read_xref
+      @fp.pos = @fp.size - 40
+      str = @fp.read
+      pos_xref = str[/startxref\s++(\d++)/m,1].to_i
+
+      # get beginning positions of objects
+      @fp.pos = pos_xref
+      str = @fp.gets.chomp!
+      if (str != "xref")
+        raise "invalid data (expected 'xref')"
+      end
+      a, b, = @fp.gets.split.collect(&:to_i)
+      pos_obj = b.times.collect { @fp.gets.split[0].to_i }
+
+      # get ending positions of objects
+      tmp = pos_obj.each_with_index.sort_by(&:first) << [pos_xref, b]
+      tmp = tmp.each_cons(2).collect { |a,b| [a[0], b[0] - a[0], a[1]] }
+      @xref = tmp.sort_by(&:last)
+
+      @fp.gets
+      @trailer = @fp.read.slice(PDF::REGEXP_DATA)
+    end
+
+    def read_info
+      @obj_root  = get_object_by_key(@trailer, '/Root')
+      @obj_info  = get_object_by_key(@trailer, '/Info')
+      @obj_pages = get_object_by_key(@obj_root.data, '/Pages')
+      @@obj0_root  ||= @obj_root
+      @@obj0_info  ||= @obj_info
+      @@obj0_pages ||= @obj_pages
+
+      str = @obj_pages.data[/\/Kids\s++\[\s++([\d\sR]++)\]/m,1]   #=> (\d+ 0 R )*
+      @pages = str.scan(/(\d++)\s++(\d++)\s++(R)/).collect { |a| a[0].to_i }
+    end
+  end
+
+  class Object
+    attr_reader :pdf, :num
+    attr_accessor :data
+
+    def initialize(pdf, num)
+      @pdf = pdf
+      @num = num
+      read
+    end
+
+    def to_string
+      return @data if (@num == 0 && @data =~ /%PDF/)
+
+      "#{@num} #{0} obj\n" << @data << "endobj\n"
+    end
+
+    def move_to(pdf, num)
+      @pdf = pdf
+      @num = num
+      self
+    end
+
+    def write
+      fp = @pdf.fp
+      pos = fp.pos
+      fp.write(to_string)
+      len = fp.pos - pos
+      @pdf.xref << [pos, len, @num]
+    end
+
+    def replace_pagenum(hash)
+      hash.each do |key,num|
+        @data[/#{key}\s++(\d++)\s++\d++\s++R/,1] = num.to_s
+      end
+    end
+
+    private
+
+    def read
+      fp = @pdf.fp
+      pos, len, = @pdf.xref[@num]
+
+      fp.pos = pos
+      buf = fp.read(len)
+
+      if (buf =~ /\A%PDF/)
+        @data = buf
+        return
+      end
+
+      buf.slice!(/\A[^\n]++\n/m)
+      @data = buf.slice!(PDF::REGEXP_DATA)
+    end
+  end
+
+  class PageObject < Object
+    def to_string
+      replace_pagenum('/Contents'  => @obj_content.num,
+                      '/Resources' => @obj_resource.num)
+      super
+    end
+
+    def write
+      @pdf.pages << @num
+      super
+    end
+
+    private
+
+    def read
+      super
+      @obj_content  = @pdf.get_object_by_key(@data, '/Contents' , PDF::StreamObject  )
+      @obj_resource = @pdf.get_object_by_key(@data, '/Resources', PDF::ResourceObject)
+    end
+  end
+
+  class ResourceObject < Object
+    attr_reader :x_objects
+
+    def to_string
+      unless @x_objects.empty?
+        ary = @x_objects.collect { |key,obj| "#{key} #{obj.num} 0 R" }
+        @data[/\/XObject\s++(<<[^<>]*+>>)/,1] = "<< #{ary.join(' ')} >>"
+      end
+      super
+    end
+
+    private
+
+    def read
+      super
+      # /XObject << /x5 5 0 R /x6 6 0 R >>
+      @x_objects = {}
+      if (@data =~ /\/XObject\s++<<([^<>]++)>>/m)
+        $~[1].scan(/(\/\w++)\s++(\d++)\s++(\d++)\s++(R)/) do |a|
+          @x_objects[a[0]] = @pdf.get_object(a[1].to_i, PDF::StreamObject)
+        end
+      end
+    end
+  end
+
+  class StreamObject < Object
+    attr_reader :obj_length
+
+    def set_deflevel(level)
+      @def_level = level if @stream
+    end
+
+    def stream
+      Zlib.inflate(@stream)
+    end
+
+    def stream=(str)
+      @stream = Zlib.deflate(str, @def_level)
+    end
+
+    def to_string
+      replace_pagenum('/Length' => @obj_length.num)
+
+      buf = "#{@num} #{0} obj\n"
+      buf << @data
+      if @stream
+        @obj_length.data = "   #{@stream.length}\n"
+        buf << "stream\n" << @stream << "\nendstream\n"
+      end
+      buf << "endobj\n"
+    end
+
+    def write
+      super
+      @obj_length.write
+    end
+
+    private
+
+    def read
+      fp = @pdf.fp
+      pos, len, = @pdf.xref[@num]
+
+      fp.pos = pos
+      buf = fp.read(len)
+
+      buf.slice!(/\A[^\n]++\n/m)
+      @data = buf.slice!(PDF::REGEXP_DATA)
+
+      @obj_length = @pdf.get_object_by_key(@data, '/Length')
+      length = @obj_length.data.to_i
+
+      if @data.include?("/FlateDecode")
+        buf.slice!(/\A[^\n]++\n/m)   #=> "stream\n"
+        @stream = buf[0,length]
+        @def_level = Zlib::DEFAULT_COMPRESSION
+      end
+    end
+  end
+
+  class DCLImage < PageObject
+    def initialize(pdf, num)
+      super(pdf, pdf.pages[num])
+    end
+
+    def move_to(pdf, num)
+      # OBJECT / NUMBER
+      # psimage   +1
+      #   length  +2
+      # resource  +0
+      # page      +3+nx
+      # xobj_i    +3+i
+      #   length  +3+nx+1+i
+      m = pdf.xref.size + 1
+      nx = @obj_resource.x_objects.size
+      @obj_content.           move_to(pdf, m + 1)
+      @obj_content.obj_length.move_to(pdf, m + 2)
+      @obj_resource.          move_to(pdf, m    )
+      super(pdf, m + 3 + nx)
+      @obj_resource.x_objects.each_with_index do |(key,obj),i|
+        obj.           move_to(pdf, m + 3      + i)
+        obj.obj_length.move_to(pdf, m + 4 + nx + i)
+      end
+      self
+    end
+
+    def set_deflevel(level)
+      @obj_content.set_deflevel(level)
+    end
+
+    def write
+      @obj_content. write
+      @obj_resource.write
+      super
+      @obj_resource.x_objects.each_value(&:write)
+    end
+
+    REGEXP_PARSE = Regexp.compile('(?:(\[[^\[\]]*+\])\s++)?+'           <<   # array
+                                  '(?:(-?+\d++(?:\.\d++)?+)\s++)?+' * 6 <<   # numbers
+                                  '(?:(/\w++)\s++)?+'                   <<   # set ExtGState parameters ("'/a0 'gs ")
+                                  '(\w++)\s++'                          <<   # operator (required)
+                                  '((?:/\w++\s++\w++\s++){2})?+'         )   # draw XObject ("... cm '/a0 gs /x5 Do '")
+    def parse
+      stream_new = "q\n"
+
+      # previous values
+      concat = nil
+      color  = { :rg => nil, :RG => nil }
+      flag_x = false
+
+      buf_node = []
+      path = Path.new
+      str_check = @obj_content.stream.gsub(REGEXP_PARSE) do |a|
+        md = $~
+        op = md[-2].to_sym
+        case op
+        when :m, :l   # moveto, lineto
+          buf_node << Path::Node.new(md[2], md[3], op)
+        when :h, :B   # close, fill and stroke
+          if flag_x   # frame of XObject
+            flag_x = false
+            Path.new(buf_node).output_stroke(stream_new, true)
+            path = Path.new
+          else
+            path.add(buf_node)
+          end
+          buf_node = []
+        when :S   # stroke
+          path.optimize.output_fill(stream_new)
+          path = Path.new
+          Path.new(buf_node).output_stroke(stream_new)
+          buf_node = []
+        when :rg, :RG   # set RGB for stroking / non-stroking
+          rgbstr = md[2..4].join(' ')
+          if (rgbstr == color[op])
+          else
+            path.optimize.output_fill(stream_new)
+            path = Path.new
+            color[op] = rgbstr
+            stream_new << a
+          end
+        when :cm   # concat matrix
+          if md[-1]   # insert XObject
+            flag_x = true
+            stream_new << "q\n"
+            stream_new << "0 1 1 0 -842 0 cm\n" if concat   # cancel concat matrix for paths
+            stream_new << a << "Q\n"
+          else
+            stream_new << "q " << (concat = a) unless concat
+          end
+        when :q, :Q   # gsave, grestore
+        else   # others : copy
+          stream_new << a
+        end
+        ''   # delete parsed string
+      end
+      STDERR.puts("WARNING: Some script could not be parsed -- #{str_check.inspect}") if (str_check != '')
+
+      stream_new << "Q\n"
+      @obj_content.stream = stream_new
+      self
+    end
+  end
+end; end

data/lib/dptm6/version.rb

@@ -0,0 +1,3 @@
+module DPTM6
+  VERSION = "1.0.0"
+end

metadata

@@ -0,0 +1,103 @@
+--- !ruby/object:Gem::Specification
+name: dptm6
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+platform: ruby
+authors:
+- Masahiro Nomoto
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2018-11-22 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.16'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.16'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+description: Merge tones in PDF made by DCL (Dennou Club Library) ver. 6
+email:
+- hmmnrst@users.noreply.github.com
+executables:
+- dptm6
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".rspec"
+- ".travis.yml"
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- dptm6.gemspec
+- exe/dptm6
+- lib/dptm6.rb
+- lib/dptm6/cli.rb
+- lib/dptm6/path.rb
+- lib/dptm6/pdf.rb
+- lib/dptm6/version.rb
+homepage: https://github.com/hmmnrst/dptm6
+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: []
+rubyforge_project: 
+rubygems_version: 2.7.6
+signing_key: 
+specification_version: 4
+summary: dclpdftonemerge for DCL 6
+test_files: []