1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
# frozen_string_literal: true
require 'pathname'
require 'rghost'
require 'rghost/gs_alone'
require 'tmpdir'
autoload :Open3, 'open3'
RGhost::GSAlone.prepend (Module.new do
def initialize params, debug
(@params = params.dup).push(*(@params.pop.split File::PATH_SEPARATOR))
@debug = debug
end
def run
RGhost::Config.config_platform unless File.exist? RGhost::Config::GS[:path].to_s
(cmd = @params.slice 1, @params.length).unshift RGhost::Config::GS[:path].to_s
#puts cmd if @debug
_out, err, status = Open3.capture3(*cmd)
unless (lines = err.lines.each_with_object([]) {|l, accum| (l.include? '-dNEWPDF=') ? accum.pop : (accum << l) }).empty?
$stderr.write(*lines)
end
status.success?
end
end)
RGhost::Engine.prepend (Module.new do
def shellescape str
str
end
end)
module Asciidoctor
module PDF
class Optimizer
# see https://www.ghostscript.com/doc/current/VectorDevices.htm#PSPDF_IN for details
(QUALITY_NAMES = {
'default' => :default,
'screen' => :screen,
'ebook' => :ebook,
'printer' => :printer,
'prepress' => :prepress,
}).default = :default
attr_reader :quality
attr_reader :compatibility_level
attr_reader :compliance
def initialize quality = 'default', compatibility_level = '1.4', compliance = 'PDF'
@quality = QUALITY_NAMES[quality]
@compatibility_level = compatibility_level
@compliance = compliance
if (gs_path = ::ENV['GS'])
::RGhost::Config::GS[:path] = gs_path
end
end
def optimize_file target
::Dir::Tmpname.create ['asciidoctor-pdf-', '.pdf'] do |tmpfile|
filename_o = ::Pathname.new target
filename_tmp = ::Pathname.new tmpfile
if (pdfmark = filename_o.sub_ext '.pdfmark').file?
inputs = [target, pdfmark.to_s].join ::File::PATH_SEPARATOR
else
inputs = target
end
d = { CannotEmbedFontPolicy: '/Warning', CompatibilityLevel: @compatibility_level, NEWPDF: false, Printed: false }
case @compliance
when 'PDF/A', 'PDF/A-1', 'PDF/A-2', 'PDF/A-3'
d[:PDFA] = ((@compliance.split '-', 2)[1] || 1).to_i
d[:ShowAnnots] = false
when 'PDF/X', 'PDF/X-1', 'PDF/X-3'
d[:PDFX] = true
d[:ShowAnnots] = false
end
(::RGhost::Convert.new inputs).to :pdf, filename: filename_tmp.to_s, quality: @quality, d: d
filename_o.binwrite filename_tmp.binread
end
nil
end
end
end
end
|
