isodoc 1.7.5 → 1.8.0

data/lib/isodoc/html_function/html.rb

@@ -1,129 +1,139 @@
 require "fileutils"
 require "base64"
 
-module IsoDoc::HtmlFunction
-  module Html
-    def convert1(docxml, filename, dir)
-      noko do |xml|
-        xml.html **{ lang: @lang.to_s } do |html|
-          info docxml, nil
-          populate_css
-          html.head { |head| define_head head, filename, dir }
-          make_body(html, docxml)
-        end
-      end.join("\n")
-    end
+module IsoDoc
+  module HtmlFunction
+    module Html
+      def convert1(docxml, filename, dir)
+        noko do |xml|
+          xml.html **{ lang: @lang.to_s } do |html|
+            info docxml, nil
+            populate_css
+            html.head { |head| define_head head, filename, dir }
+            make_body(html, docxml)
+          end
+        end.join("\n")
+      end
 
-    def make_body1(body, _docxml)
-      return if @bare
+      def make_body1(body, _docxml)
+        return if @bare
 
-      body.div **{ class: "title-section" } do |div1|
-        div1.p { |p| p << "&nbsp;" } # placeholder
+        body.div **{ class: "title-section" } do |div1|
+          div1.p { |p| p << "&nbsp;" } # placeholder
+        end
+        section_break(body)
       end
-      section_break(body)
-    end
 
-    def make_body2(body, _docxml)
-      return if @bare
+      def make_body2(body, _docxml)
+        return if @bare
 
-      body.div **{ class: "prefatory-section" } do |div2|
-        div2.p { |p| p << "&nbsp;" } # placeholder
+        body.div **{ class: "prefatory-section" } do |div2|
+          div2.p { |p| p << "&nbsp;" } # placeholder
+        end
+        section_break(body)
       end
-      section_break(body)
-    end
 
-    def make_body3(body, docxml)
-      body.div **{ class: "main-section" } do |div3|
-        boilerplate docxml, div3
-        preface_block docxml, div3
-        abstract docxml, div3
-        foreword docxml, div3
-        introduction docxml, div3
-        preface docxml, div3
-        acknowledgements docxml, div3
-        middle docxml, div3
-        footnotes div3
-        comments div3
+      def make_body3(body, docxml)
+        body.div **{ class: "main-section" } do |div3|
+          boilerplate docxml, div3
+          preface_block docxml, div3
+          abstract docxml, div3
+          foreword docxml, div3
+          introduction docxml, div3
+          preface docxml, div3
+          acknowledgements docxml, div3
+          middle docxml, div3
+          footnotes div3
+          comments div3
+        end
       end
-    end
 
-    def googlefonts
-      <<~HEAD.freeze
-        <link href="https://fonts.googleapis.com/css?family=Overpass:300,300i,600,900" rel="stylesheet">
-        <link href="https://fonts.googleapis.com/css?family=Lato:400,400i,700,900" rel="stylesheet">
-      HEAD
-    end
+      def googlefonts
+        <<~HEAD.freeze
+          <link href="https://fonts.googleapis.com/css?family=Overpass:300,300i,600,900" rel="stylesheet">
+          <link href="https://fonts.googleapis.com/css?family=Lato:400,400i,700,900" rel="stylesheet">
+        HEAD
+      end
 
-    def html_head
-      <<~HEAD.freeze
-        <title>#{@meta&.get&.dig(:doctitle)}</title>
-        <script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/3.3.1/jquery.min.js"></script>
-
-        <!--TOC script import-->
-        <script type="text/javascript"  src="https://cdn.rawgit.com/jgallen23/toc/0.3.2/dist/toc.min.js"></script>
-        <script type="text/javascript">#{toclevel}</script>
-
-        <!--Google fonts-->
-        <link rel="preconnect" href="https://fonts.gstatic.com">#{' '}
-        #{googlefonts}
-        <!--Font awesome import for the link icon-->
-        <link rel="stylesheet" href="https://use.fontawesome.com/releases/v5.0.8/css/solid.css" integrity="sha384-v2Tw72dyUXeU3y4aM2Y0tBJQkGfplr39mxZqlTBDUZAb9BGoC40+rdFCG0m10lXk" crossorigin="anonymous">
-        <link rel="stylesheet" href="https://use.fontawesome.com/releases/v5.0.8/css/fontawesome.css" integrity="sha384-q3jl8XQu1OpdLgGFvNRnPdj5VIlCvgsDQTQB6owSOHWlAurxul7f+JpUOVdAiJ5P" crossorigin="anonymous">
-        <style class="anchorjs"></style>
-      HEAD
-    end
+      def html_head
+        <<~HEAD.freeze
+          <title>#{@meta&.get&.dig(:doctitle)}</title>
+          <script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/3.3.1/jquery.min.js"></script>
+
+          <!--TOC script import-->
+          <script type="text/javascript"  src="https://cdn.rawgit.com/jgallen23/toc/0.3.2/dist/toc.min.js"></script>
+          <script type="text/javascript">#{toclevel}</script>
+
+          <!--Google fonts-->
+          <link rel="preconnect" href="https://fonts.gstatic.com">#{' '}
+          #{googlefonts}
+          <!--Font awesome import for the link icon-->
+          <link rel="stylesheet" href="https://use.fontawesome.com/releases/v5.0.8/css/solid.css" integrity="sha384-v2Tw72dyUXeU3y4aM2Y0tBJQkGfplr39mxZqlTBDUZAb9BGoC40+rdFCG0m10lXk" crossorigin="anonymous">
+          <link rel="stylesheet" href="https://use.fontawesome.com/releases/v5.0.8/css/fontawesome.css" integrity="sha384-q3jl8XQu1OpdLgGFvNRnPdj5VIlCvgsDQTQB6owSOHWlAurxul7f+JpUOVdAiJ5P" crossorigin="anonymous">
+          <style class="anchorjs"></style>
+        HEAD
+      end
 
-    def html_button
-      return "" if @bare
+      def html_button
+        return "" if @bare
 
-      '<button onclick="topFunction()" id="myBtn" '\
+        '<button onclick="topFunction()" id="myBtn" '\
         'title="Go to top">Top</button>'.freeze
-    end
+      end
 
-    def html_main(docxml)
-      docxml.at("//head").add_child(html_head)
-      d = docxml.at('//div[@class="main-section"]')
-      d.name = "main"
-      d.children.empty? or d.children.first.previous = html_button
-    end
+      def html_main(docxml)
+        docxml.at("//head").add_child(html_head)
+        d = docxml.at('//div[@class="main-section"]')
+        d.name = "main"
+        d.children.empty? or d.children.first.previous = html_button
+      end
 
-    def sourcecodelang(lang)
-      return unless lang
-
-      case lang.downcase
-      when "javascript" then "lang-js"
-      when "c" then "lang-c"
-      when "c+" then "lang-cpp"
-      when "console" then "lang-bsh"
-      when "ruby" then "lang-rb"
-      when "html" then "lang-html"
-      when "java" then "lang-java"
-      when "xml" then "lang-xml"
-      when "perl" then "lang-perl"
-      when "python" then "lang-py"
-      when "xsl" then "lang-xsl"
-      else
-        ""
+      def sourcecodelang(lang)
+        return unless lang
+
+        case lang.downcase
+        when "javascript" then "lang-js"
+        when "c" then "lang-c"
+        when "c+" then "lang-cpp"
+        when "console" then "lang-bsh"
+        when "ruby" then "lang-rb"
+        when "html" then "lang-html"
+        when "java" then "lang-java"
+        when "xml" then "lang-xml"
+        when "perl" then "lang-perl"
+        when "python" then "lang-py"
+        when "xsl" then "lang-xsl"
+        else
+          ""
+        end
       end
-    end
 
-    def sourcecode_parse(node, out)
-      name = node.at(ns("./name"))
-      class1 = "prettyprint #{sourcecodelang(node&.at(ns('./@lang'))&.value)}"
-      out.pre **sourcecode_attrs(node).merge(class: class1) do |div|
-        @sourcecode = true
-        node.children.each { |n| parse(n, div) unless n.name == "name" }
-        @sourcecode = false
+      def sourcecode_parse(node, out)
+        name = node.at(ns("./name"))
+        class1 = "prettyprint #{sourcecodelang(node&.at(ns('./@lang'))&.value)}"
+        out.pre **sourcecode_attrs(node).merge(class: class1) do |div|
+          @sourcecode = true
+          node.children.each { |n| parse(n, div) unless n.name == "name" }
+          @sourcecode = false
+        end
+        sourcecode_name_parse(node, out, name)
       end
-      sourcecode_name_parse(node, out, name)
-    end
 
-    def underline_parse(node, out)
-      out.span **{ style: "text-decoration: underline;" } do |e|
-        node.children.each { |n| parse(n, e) }
+      def underline_parse(node, out)
+        out.span **{ style: "text-decoration: underline;" } do |e|
+          node.children.each { |n| parse(n, e) }
+        end
       end
-    end
 
-    def table_long_strings_cleanup(docxml); end
+      def table_long_strings_cleanup(docxml); end
+
+      def image_parse(node, out, caption)
+        if svg = node.at("./m:svg", "m" => "http://www.w3.org/2000/svg")
+          svg_parse(svg, out)
+          return
+        end
+        super
+      end
+    end
   end
 end

data/lib/isodoc/presentation_function/block.rb

@@ -1,4 +1,4 @@
-require "base64"
+require_relative "./image"
 
 module IsoDoc
   class PresentationXMLConvert < ::IsoDoc::Convert
@@ -8,38 +8,6 @@ module IsoDoc
       text.capitalize
     end
 
-    def figure(docxml)
-      docxml.xpath(ns("//image")).each { |f| svg_extract(f) }
-      docxml.xpath(ns("//figure")).each { |f| figure1(f) }
-      docxml.xpath(ns("//svgmap")).each do |s|
-        if f = s.at(ns("./figure")) then s.replace(f)
-        else s.remove
-        end
-      end
-    end
-
-    def svg_extract(elem)
-      return unless %r{^data:image/svg\+xml;base64,}.match?(elem["src"])
-
-      svg = Base64.strict_decode64(elem["src"]
-        .sub(%r{^data:image/svg\+xml;base64,}, ""))
-      x = Nokogiri::XML.fragment(svg.sub(/<\?xml[^>]*>/, "")) do |config|
-        config.huge
-      end
-      elem.replace(x)
-    end
-
-    def figure1(elem)
-      return sourcecode1(elem) if elem["class"] == "pseudocode" ||
-        elem["type"] == "pseudocode"
-      return if labelled_ancestor(elem) && elem.ancestors("figure").empty? ||
-        elem.at(ns("./figure")) && !elem.at(ns("./name"))
-
-      lbl = @xrefs.anchor(elem["id"], :label, false) or return
-      prefix_name(elem, "&nbsp;&mdash; ",
-                  l10n("#{lower2cap @i18n.figure} #{lbl}"), "name")
-    end
-
     def prefix_name(node, delim, number, elem)
       return if number.nil? || number.empty?
 
@@ -86,12 +54,6 @@ module IsoDoc
       end
     end
 
-    def termexample(docxml)
-      docxml.xpath(ns("//termexample")).each do |f|
-        example1(f)
-      end
-    end
-
     def example1(elem)
       n = @xrefs.get[elem["id"]]
       lbl = if n.nil? || n[:label].nil? || n[:label].empty?
@@ -121,36 +83,6 @@ module IsoDoc
       prefix_name(elem, "", lbl, "name")
     end
 
-    def termnote(docxml)
-      docxml.xpath(ns("//termnote")).each do |f|
-        termnote1(f)
-      end
-    end
-
-    # introduce name element
-    def termnote1(elem)
-      lbl = l10n(@xrefs.anchor(elem["id"], :label) || "???")
-      prefix_name(elem, "", lower2cap(lbl), "name")
-    end
-
-    def termdefinition(docxml)
-      docxml.xpath(ns("//term[definition]")).each do |f|
-        termdefinition1(f)
-      end
-    end
-
-    def termdefinition1(elem)
-      return unless elem.xpath(ns("./definition")).size > 1
-
-      d = elem.at(ns("./definition"))
-      d = d.replace("<ol><li>#{d.children.to_xml}</li></ol>").first
-      elem.xpath(ns("./definition")).each do |f|
-        f = f.replace("<li>#{f.children.to_xml}</li>").first
-        d << f
-      end
-      d.wrap("<definition></definition>")
-    end
-
     def recommendation(docxml)
       docxml.xpath(ns("//recommendation")).each do |f|
         recommendation1(f, lower2cap(@i18n.recommendation))

data/lib/isodoc/presentation_function/image.rb

@@ -0,0 +1,112 @@
+require "base64"
+require "emf2svg"
+
+module IsoDoc
+  class PresentationXMLConvert < ::IsoDoc::Convert
+    def figure(docxml)
+      docxml.xpath(ns("//image")).each { |f| svg_extract(f) }
+      docxml.xpath(ns("//figure")).each { |f| figure1(f) }
+      docxml.xpath(ns("//svgmap")).each do |s|
+        if f = s.at(ns("./figure")) then s.replace(f)
+        else s.remove
+        end
+      end
+      docxml.xpath(ns("//image")).each { |f| svg_emf_double(f) }
+    end
+
+    def svg_extract(elem)
+      return unless %r{^data:image/svg\+xml;}.match?(elem["src"])
+
+      svg = Base64.strict_decode64(elem["src"]
+        .sub(%r{^data:image/svg\+xml;(charset=[^;]+;)?base64,}, ""))
+      x = Nokogiri::XML.fragment(svg.sub(/<\?xml[^>]*>/, "")) do |config|
+        config.huge
+      end
+      elem["src"] = ""
+      elem.children = x
+    end
+
+    def figure1(elem)
+      return sourcecode1(elem) if elem["class"] == "pseudocode" ||
+        elem["type"] == "pseudocode"
+      return if labelled_ancestor(elem) && elem.ancestors("figure").empty? ||
+        elem.at(ns("./figure")) && !elem.at(ns("./name"))
+
+      lbl = @xrefs.anchor(elem["id"], :label, false) or return
+      prefix_name(elem, "&nbsp;&mdash; ",
+                  l10n("#{lower2cap @i18n.figure} #{lbl}"), "name")
+    end
+
+    def svg_emf_double(img)
+      if emf?(img["mimetype"])
+        img = emf_encode(img)
+        img.children.first.previous = emf_to_svg(img)
+      elsif img["mimetype"] == "image/svg+xml"
+        src = svg_to_emf(img) and img << "<emf src='#{src}'/>"
+      end
+    end
+
+    def emf_encode(img)
+      img["mimetype"] = "image/svg+xml"
+      unless %r{^data:image}.match?(img["src"])
+        img["src"] = Metanorma::Utils::datauri(img["src"])
+      end
+      img.children = "<emf src='#{img['src']}'/>"
+      img["src"] = ""
+      img
+    end
+
+    def emf_to_svg(img)
+      emf = Metanorma::Utils::save_dataimage(img.at(ns("./emf/@src")).text)
+      Emf2svg.from_file(emf).sub(/<\?[^>]+>/, "")
+    end
+
+    def svg_to_emf(node)
+      uri = svg_to_emf_uri(node)
+      ret = svg_to_emf_filename(uri)
+      File.exists?(ret) and return ret
+      exe = inkscape_installed? or return nil
+      uri = Metanorma::Utils::external_path uri
+      exe = Metanorma::Utils::external_path exe
+      system(%(#{exe} --export-type="emf" #{uri})) and
+        return Metanorma::Utils::datauri(ret)
+
+      warn %(Fail on #{exe} --export-type="emf" #{uri})
+
+      nil
+    end
+
+    def svg_to_emf_uri(node)
+      uri = if node&.elements&.first&.name == "svg"
+              a = Base64.strict_encode64(node.children.to_xml)
+              "data:image/svg+xml;base64,#{a}"
+            else node["src"]
+            end
+      if %r{^data:}.match?(uri)
+        uri = save_dataimage(uri)
+        @tempfile_cache << uri
+      end
+      uri
+    end
+
+    def svg_to_emf_filename(uri)
+      "#{File.join(File.dirname(uri), File.basename(uri, '.*'))}.emf"
+    end
+
+    def emf_to_svgfilename(uri)
+      "#{File.join(File.dirname(uri), File.basename(uri, '.*'))}.svg"
+    end
+
+    def inkscape_installed?
+      cmd = "inkscape"
+      exts = ENV["PATHEXT"] ? ENV["PATHEXT"].split(";") : [""]
+      ENV["PATH"].split(File::PATH_SEPARATOR).each do |path|
+        exts.each do |ext|
+          exe = File.join(path, "#{cmd}#{ext}")
+          return exe if File.executable?(exe) && !File.directory?(exe)
+        end
+      end
+      nil
+    end
+  end
+end

data/lib/isodoc/presentation_function/inline.rb

@@ -6,13 +6,16 @@ module IsoDoc
       l10n("#{@xrefs.anchor(container, :xref)}, #{linkend}")
     end
 
+    def anchor_value(id)
+      @xrefs.anchor(id, :value) || @xrefs.anchor(id, :label) ||
+        @xrefs.anchor(id, :xref)
+    end
+
     def anchor_linkend(node, linkend)
       if node["citeas"].nil? && node["bibitemid"]
         return @xrefs.anchor(node["bibitemid"], :xref) || "???"
       elsif node["target"] && node["droploc"]
-        return @xrefs.anchor(node["target"], :value) ||
-            @xrefs.anchor(node["target"], :label) ||
-            @xrefs.anchor(node["target"], :xref) || "???"
+        return anchor_value(node["target"]) || "???"
       elsif node["target"] && !/.#./.match(node["target"])
         linkend = anchor_linkend1(node)
       end
@@ -26,14 +29,15 @@ module IsoDoc
       (container && get_note_container_id(node) != container &&
        @xrefs.get[node["target"]]) and
         linkend = prefix_container(container, linkend, node["target"])
-      capitalise_xref(node, linkend)
+      capitalise_xref(node, linkend, anchor_value(node["target"]))
     end
 
-    def capitalise_xref(node, linkend)
-      return linkend unless %w(Latn Cyrl Grek).include? @script
-      return linkend&.capitalize if node["case"] == "capital"
-      return linkend&.downcase if node["case"] == "lowercase"
-      return linkend if linkend[0, 1].match?(/\p{Upper}/)
+    def capitalise_xref(node, linkend, label)
+      linktext = linkend.gsub(/<[^>]+>/, "")
+      (label && !label.empty? && /^#{Regexp.escape(label)}/.match?(linktext)) ||
+        linktext[0, 1].match?(/\p{Upper}/) and return linkend
+      node["case"] and
+        return Common::case_with_markup(linkend, node["case"], @script)
 
       capitalise_xref1(node, linkend)
     end
@@ -42,7 +46,7 @@ module IsoDoc
       prec = nearest_block_parent(node).xpath("./descendant-or-self::text()") &
         node.xpath("./preceding::text()")
       if prec.empty? || /(?!<[^.].)\.\s+$/.match(prec.map(&:text).join)
-        linkend&.capitalize
+        Common::case_with_markup(linkend, "capital", @script)
       else linkend
       end
     end
@@ -69,7 +73,7 @@ module IsoDoc
       link += eref_localities(node.xpath(ns("./locality | ./localityStack")),
                               link, node)
       non_locality_elems(node).each(&:remove)
-      node.add_child(link)
+      node.add_child(cleanup_entities(link))
     end
     # so not <origin bibitemid="ISO7301" citeas="ISO 7301">
     # <locality type="section"><reference>3.1</reference></locality></origin>
@@ -90,8 +94,7 @@ module IsoDoc
           ret += eref_localities0(rr, j, target, delim, node)
           delim = ","
         end
-      else
-        ret += eref_localities0(ref, idx, target, delim, node)
+      else ret += eref_localities0(ref, idx, target, delim, node)
       end
       ret
     end
@@ -157,71 +160,6 @@ module IsoDoc
       get_linkend(node)
     end
 
-    def concept(docxml)
-      docxml.xpath(ns("//concept")).each { |f| concept1(f) }
-    end
-
-    def concept1(node)
-      xref = node&.at(ns("./xref/@target"))&.text or
-        return concept_render(node, ital: node["ital"] || "true",
-                                    ref: node["ref"] || "true",
-                                    linkref: node["linkref"] || "true",
-                                    linkmention: node["linkmention"] || "false")
-      if node.at(ns("//definitions//dt[@id = '#{xref}']"))
-        concept_render(node, ital: node["ital"] || "false",
-                             ref: node["ref"] || "false",
-                             linkref: node["linkref"] || "true",
-                             linkmention: node["linkmention"] || "false")
-      else concept_render(node, ital: node["ital"] || "true",
-                                ref: node["ref"] || "true",
-                                linkref: node["linkref"] || "true",
-                                linkmention: node["linkmention"] || "false")
-      end
-    end
-
-    def concept_render(node, opts)
-      node&.at(ns("./refterm"))&.remove
-      r = node.at(ns("./renderterm"))
-      ref = node.at(ns("./xref | ./eref | ./termref"))
-      ref && opts[:ref] != "false" and r&.next = " "
-      opts[:ital] == "true" and r&.name = "em"
-      if opts[:linkmention] == "true" && !r.nil? && !ref.nil?
-        ref2 = ref.clone
-        r2 = r.clone
-        r.replace(ref2).children = r2
-      end
-      concept1_ref(node, ref, opts)
-      if opts[:ital] == "false"
-        r = node.at(ns(".//renderterm"))
-        r&.replace(r&.children)
-      end
-      node.replace(node.children)
-    end
-
-    def concept1_ref(_node, ref, opts)
-      ref.nil? and return
-      return ref.remove if opts[:ref] == "false"
-
-      r = concept1_ref_content(ref)
-      ref = r.at("./descendant-or-self::xmlns:xref | "\
-                 "./descendant-or-self::xmlns:eref | "\
-                 "./descendant-or-self::xmlns:termref")
-      %w(xref eref).include? ref&.name and get_linkend(ref)
-      if opts[:linkref] == "false" && %w(xref eref).include?(ref&.name)
-        ref.replace(ref.children)
-      end
-    end
-
-    def concept1_ref_content(ref)
-      if non_locality_elems(ref).select do |c|
-           !c.text? || /\S/.match(c)
-         end.empty?
-        ref.replace(@i18n.term_defined_in.sub(/%/,
-                                              ref.to_xml))
-      else ref.replace("[#{ref.to_xml}]")
-      end
-    end
-
     def variant(docxml)
       docxml.xpath(ns("//variant")).each { |f| variant1(f) }
       docxml.xpath(ns("//variant[@remove = 'true']")).each(&:remove)