require "uuidtools"
require "asciimath"
require "htmlentities"
require "nokogiri"
require "fileutils"
module Html2Doc
def self.process(result, hash)
hash[:dir1] = create_dir(hash[:filename], hash[:dir])
result = process_html(result, hash)
process_header(hash[:header_file], hash)
generate_filelist(hash[:filename], hash[:dir1])
File.open("#{hash[:filename]}.htm", "w:UTF-8") { |f| f.write(result) }
mime_package result, hash[:filename], hash[:dir1]
rm_temp_files(hash[:filename], hash[:dir], hash[:dir1]) unless hash[:debug]
end
def self.process_header(headerfile, hash)
return if headerfile.nil?
doc = File.read(headerfile, encoding: "utf-8")
doc = header_image_cleanup(doc, hash[:dir1], hash[:filename],
File.dirname(hash[:filename]))
File.open("#{hash[:dir1]}/header.html", "w:UTF-8") { |f| f.write(doc) }
end
def self.clear_dir(dir)
Dir.foreach(dir) do |f|
fn = File.join(dir, f)
File.delete(fn) if f != "." && f != ".."
end
dir
end
def self.create_dir(filename, dir)
dir and return clear_dir(dir)
dir = "#{filename}_files"
Dir.mkdir(dir) unless File.exists?(dir)
clear_dir(dir)
end
def self.process_html(result, hash)
docxml = to_xhtml(asciimath_to_mathml(result, hash[:asciimathdelims]))
define_head(cleanup(docxml, hash), hash)
msword_fix(from_xhtml(docxml))
end
def self.rm_temp_files(filename, dir, dir1)
FileUtils.rm "#{filename}.htm"
FileUtils.rm_f "#{dir1}/header.html"
FileUtils.rm_r dir1 unless dir
end
def self.cleanup(docxml, hash)
namespace(docxml.root)
image_cleanup(docxml, hash[:dir1], hash[:imagedir])
mathml_to_ooml(docxml)
lists(docxml, hash[:liststyles])
footnotes(docxml)
bookmarks(docxml)
msonormal(docxml)
docxml
end
NOKOHEAD = <<~HERE.freeze
HERE
def self.to_xhtml(xml)
xml.gsub!(/<\?xml[^>]*>/, "")
unless /' + xml
end
xml = xml.gsub(/")
.gsub(//, "")
Nokogiri::XML.parse(xml)
end
DOCTYPE = <<~"DOCTYPE".freeze
DOCTYPE
def self.from_xhtml(xml)
xml.to_xml.sub(%{ xmlns="http://www.w3.org/1999/xhtml"}, "")
.sub(DOCTYPE, "").gsub(%{ />}, "/>")
.gsub(//, "/, "")
.gsub("\n-->\n", "\n-->\n")
end
def self.msword_fix(doc)
# brain damage in MSWord parser
doc.gsub!(%r{},
"")
doc.gsub!(%r{},
'')
doc.gsub!(%r{},
'')
doc.gsub!(%r{(")
doc.gsub!(%r{}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{>}, "/>")
doc.gsub!(%r{<(/)?m:(span|em)\b}, "<\\1\\2")
doc.gsub!(%r{&tab;|&tab;},
' ')
doc.split(%r{(|)}).each_slice(4).map do |a|
a.size > 2 and a[2] = a[2].gsub(/>\s+<")
a
end.join
end
PRINT_VIEW = <<~XML.freeze
Print
100
XML
def self.define_head1(docxml, _dir)
docxml.xpath("//*[local-name() = 'head']").each do |h|
h.children.first.add_previous_sibling <<~XML
#{PRINT_VIEW}
XML
end
end
def self.filename_substitute(head, header_filename)
return if header_filename.nil?
head.xpath(".//*[local-name() = 'style']").each do |s|
s1 = s.to_xml.gsub(/url\("[^"]+"\)/) do |m|
/FILENAME/.match?(m) ? "url(cid:header.html)" : m
end
s.replace(s1)
end
end
def self.stylesheet(_filename, _header_filename, cssname)
(cssname.nil? || cssname.empty?) and
cssname = File.join(File.dirname(__FILE__), "wordstyle.css")
stylesheet = File.read(cssname, encoding: "UTF-8")
xml = Nokogiri::XML("")
#s = Nokogiri::XML::CDATA.new(xml, "\n#{stylesheet}\n")
#xml.children.first << Nokogiri::XML::Comment.new(xml, s)
xml.children.first << Nokogiri::XML::CDATA
.new(xml, "\n\n")
xml.root.to_s
end
def self.define_head(docxml, hash)
title = docxml.at("//*[local-name() = 'head']/*[local-name() = 'title']")
head = docxml.at("//*[local-name() = 'head']")
css = stylesheet(hash[:filename], hash[:header_file], hash[:stylesheet])
add_stylesheet(head, title, css)
filename_substitute(head, hash[:header_file])
define_head1(docxml, hash[:dir1])
rootnamespace(docxml.root)
end
def self.add_stylesheet(head, title, css)
if head.children.empty?
head.add_child css
elsif title.nil?
head.children.first.add_previous_sibling css
else
title.add_next_sibling css
end
end
def self.namespace(root)
{
o: "urn:schemas-microsoft-com:office:office",
w: "urn:schemas-microsoft-com:office:word",
v: "urn:schemas-microsoft-com:vml",
m: "http://schemas.microsoft.com/office/2004/12/omml",
}.each { |k, v| root.add_namespace_definition(k.to_s, v) }
end
def self.rootnamespace(root)
root.add_namespace(nil, "http://www.w3.org/TR/REC-html40")
end
def self.bookmarks(docxml)
docxml.xpath("//*[@id][not(@name)][not(@style = 'mso-element:footnote')]")
.each do |x|
next if x["id"].empty? ||
%w(shapetype v:shapetype shape v:shape).include?(x.name)
if x.children.empty? then x.add_child("")
else x.children.first.previous = ""
end
x.delete("id")
end
end
def self.msonormal(docxml)
docxml.xpath("//*[local-name() = 'p'][not(self::*[@class])]").each do |p|
p["class"] = "MsoNormal"
end
docxml.xpath("//*[local-name() = 'li'][not(self::*[@class])]").each do |p|
p["class"] = "MsoNormal"
end
end
end