metanorma-standoc 1.8.8 → 1.9.4

data/lib/asciidoctor/standoc/lists.rb

@@ -28,14 +28,16 @@ module Asciidoctor
       end
 
       def ul_li_attrs(node)
+        c = node.attr?("checked")
         attr_code(
-          uncheckedcheckbox: node.attr?("checkbox") ? !node.attr?("checked") : nil,
-          checkedcheckbox: node.attr?("checkbox") ? node.attr?("checked") : nil,
+          uncheckedcheckbox: node.attr?("checkbox") ? !c : nil,
+          checkedcheckbox: node.attr?("checkbox") ? c : nil
         )
       end
 
       def ulist(node)
         return reference(node) if in_norm_ref? || in_biblio?
+
         noko do |xml|
           xml.ul **ul_attrs(node) do |xml_ul|
             node.items.each do |item|

data/lib/asciidoctor/standoc/macros.rb

@@ -2,10 +2,11 @@ require "asciidoctor/extensions"
 require "fileutils"
 require "uuidtools"
 require "yaml"
-require_relative "./macros_plantuml.rb"
-require_relative "./macros_terms.rb"
-require_relative "./datamodel/attributes_table_preprocessor.rb"
-require_relative "./datamodel/diagram_preprocessor.rb"
+require_relative "./macros_plantuml"
+require_relative "./macros_terms"
+require_relative "./macros_form"
+require_relative "./datamodel/attributes_table_preprocessor"
+require_relative "./datamodel/diagram_preprocessor"
 require "metanorma-plugin-datastruct"
 require "metanorma-plugin-lutaml"
 
@@ -29,6 +30,7 @@ module Asciidoctor
 
       def preprocess_attrs(attrs)
         return unless attrs.size > 1 && attrs.size < 5
+
         ret = { primary: attrs[1], target: attrs[attrs.size] }
         ret[:secondary] = attrs[2] if attrs.size > 2
         ret[:tertiary] = attrs[3] if attrs.size > 3
@@ -37,7 +39,8 @@ module Asciidoctor
 
       def process(_parent, target, attr)
         args = preprocess_attrs(attr) or return
-        ret = "<index-xref also='#{target == 'also'}'><primary>#{args[:primary]}</primary>"
+        ret = "<index-xref also='#{target == 'also'}'>"\
+          "<primary>#{args[:primary]}</primary>"
         ret += "<secondary>#{args[:secondary]}</secondary>" if args[:secondary]
         ret += "<tertiary>#{args[:tertiary]}</tertiary>" if args[:tertiary]
         ret + "<target>#{args[:target]}</target></index-xref>"
@@ -51,7 +54,7 @@ module Asciidoctor
 
       def process(parent, target, attr)
         text = attr["text"]
-        text = "((#{text}))" unless /^\(\(.+\)\)$/.match(text)
+        text = "((#{text}))" unless /^\(\(.+\)\)$/.match?(text)
         out = parent.sub_macros(text)
         out.sub(/<index>/, "<index to='#{target}'>")
       end
@@ -62,8 +65,8 @@ module Asciidoctor
       named :pseudocode
       on_context :example, :sourcecode
 
-      def init_indent(s)
-        /^(?<prefix>[ \t]*)(?<suffix>.*)$/ =~ s
+      def init_indent(line)
+        /^(?<prefix>[ \t]*)(?<suffix>.*)$/ =~ line
         prefix = prefix.gsub(/\t/, "\u00a0\u00a0\u00a0\u00a0")
           .gsub(/ /, "\u00a0")
         prefix + suffix
@@ -72,12 +75,12 @@ module Asciidoctor
       def supply_br(lines)
         ignore = false
         lines.each_with_index do |l, i|
-          /^(--+|====+|\|===|\.\.\.\.+|\*\*\*\*+|\+\+\+\++|\`\`\`\`+|____\+)$/.match(l) &&
-            (ignore = !ignore)
-          next if l.empty? || l.match(/ \+$/)
-          next if /^\[.*\]$/.match(l)
-          next if ignore
-          next if i == lines.size - 1 || i < lines.size - 1 && lines[i + 1].empty?
+          /^(--+|====+|\|===|\.\.\.\.+|\*\*\*\*+|\+\+\+\++|\`\`\`\`+|____\+)$/
+            .match(l) && (ignore = !ignore)
+          next if l.empty? || l.match(/ \+$/) || /^\[.*\]$/.match?(l) || ignore
+          next if i == lines.size - 1 ||
+            i < lines.size - 1 && lines[i + 1].empty?
+
           lines[i] += " +"
         end
         lines
@@ -86,9 +89,8 @@ module Asciidoctor
       def process(parent, reader, attrs)
         attrs["role"] = "pseudocode"
         lines = reader.lines.map { |m| init_indent(m) }
-        ret = create_block(parent, :example, supply_br(lines),
-                           attrs, content_model: :compound)
-        ret
+        create_block(parent, :example, supply_br(lines),
+                     attrs, content_model: :compound)
       end
     end
 
@@ -98,6 +100,7 @@ module Asciidoctor
       parse_content_as :text
       option :pos_attrs, %w(rpbegin rt rpend)
 
+      # for example, html5ruby:楽聖少女[がくせいしょうじょ]
       def process(_parent, target, attributes)
         rpbegin = "("
         rpend = ")"
@@ -105,7 +108,6 @@ module Asciidoctor
           rt = attributes["text"]
         elsif (attributes.size == 2) && attributes.key?(1) &&
           attributes.key?("rpbegin")
-          # for example, html5ruby:楽聖少女[がくせいしょうじょ]
           rt = attributes[1] || ""
         else
           rpbegin = attributes["rpbegin"]
@@ -126,21 +128,22 @@ module Asciidoctor
       def process(parent, reader, attrs)
         attrs["name"] = "todo"
         attrs["caption"] = "TODO"
-        create_block parent, :admonition, reader.lines, attrs,
-          content_model: :compound
+        create_block(parent, :admonition, reader.lines, attrs,
+                     content_model: :compound)
       end
     end
 
     class ToDoInlineAdmonitionBlock < Extensions::Treeprocessor
       def process(document)
         (document.find_by context: :paragraph).each do |para|
-          next unless /^TODO: /.match para.lines[0]
+          next unless /^TODO: /.match? para.lines[0]
+
           parent = para.parent
           para.set_attr("name", "todo")
           para.set_attr("caption", "TODO")
           para.lines[0].sub!(/^TODO: /, "")
-          todo = Block.new parent, :admonition, attributes: para.attributes,
-            source: para.lines, content_model: :compound
+          todo = Block.new(parent, :admonition, attributes: para.attributes,
+                           source: para.lines, content_model: :compound)
           parent.blocks[parent.blocks.index(para)] = todo
         end
       end
@@ -182,5 +185,29 @@ module Asciidoctor
         %{<footnoteblock>#{out}</footnoteblock>}
       end
     end
+
+    class AddMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :add
+      parse_content_as :text
+      using_format :short
+
+      def process(parent, _target, attrs)
+        out = Asciidoctor::Inline.new(parent, :quoted, attrs["text"]).convert
+        %{<add>#{out}</add>}
+      end
+    end
+
+    class DelMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :del
+      parse_content_as :text
+      using_format :short
+
+      def process(parent, _target, attrs)
+        out = Asciidoctor::Inline.new(parent, :quoted, attrs["text"]).convert
+        %{<del>#{out}</del>}
+      end
+    end
   end
 end

data/lib/asciidoctor/standoc/macros_form.rb

@@ -0,0 +1,63 @@
+module Asciidoctor
+  module Standoc
+    class FormInputMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :input
+
+      def process(_parent, target, attr)
+        m = %w(id name value disabled readonly checked maxlength minlength)
+          .map { |a| attr[a] ? " #{a}='#{attr[a]}'" : nil }.compact
+        %{<input type='#{target}' #{m.join}/>}
+      end
+    end
+
+    class FormLabelMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :label
+      parse_content_as :text
+
+      def process(parent, target, attr)
+        out = Asciidoctor::Inline.new(parent, :quoted, attr["text"]).convert
+        %{<label for="#{target}">#{out}</label>}
+      end
+    end
+
+    class FormTextareaMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :textarea
+      using_format :short
+
+      def process(_parent, _target, attr)
+        m = %w(id name rows cols value)
+          .map { |a| attr[a] ? " #{a}='#{attr[a]}'" : nil }.compact
+        %{<textarea #{m.join}/>}
+      end
+    end
+
+    class FormSelectMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :select
+      using_format :short
+
+      def process(parent, _target, attr)
+        m = %w(id name size disabled multiple value)
+          .map { |a| attr[a] ? " #{a}='#{attr[a]}'" : nil }.compact
+        out = Asciidoctor::Inline.new(parent, :quoted, attr["text"]).convert
+        %{<select #{m.join}>#{out}</select>}
+      end
+    end
+
+    class FormOptionMacro < Asciidoctor::Extensions::InlineMacroProcessor
+      use_dsl
+      named :option
+      using_format :short
+
+      def process(parent, _target, attr)
+        m = %w(disabled value)
+          .map { |a| attr[a] ? " #{a}='#{attr[a]}'" : nil }.compact
+        out = Asciidoctor::Inline.new(parent, :quoted, attr["text"]).convert
+        %{<option #{m.join}">#{out}</option>}
+      end
+    end
+  end
+end

data/lib/asciidoctor/standoc/ref.rb

@@ -1,12 +1,14 @@
+require_relative "ref_date_id"
+
 module Asciidoctor
   module Standoc
     module Refs
-      def iso_publisher(t, code)
+      def iso_publisher(bib, code)
         code.sub(/ .*$/, "").split(/\//).each do |abbrev|
-          t.contributor do |c|
+          bib.contributor do |c|
             c.role **{ type: "publisher" }
             c.organization do |org|
-              organization(org, abbrev)
+              organization(org, abbrev, true)
             end
           end
         end
@@ -20,58 +22,19 @@ module Asciidoctor
         { id: m[:anchor], type: "standard" }
       end
 
-      def set_date_range(date, text)
-        matched = /^(?<from>[0-9]+)(-+(?<to>[0-9]+))?$/.match text
-        return unless matched[:from]
-        if matched[:to]
-          date.from matched[:from]
-          date.to matched[:to]
-        else
-          date.on matched[:from]
-        end
-      end
-
-      def use_my_anchor(ref, id)
-        ref.parent.elements.last["id"] = id
-        ref
-      end
-
-      def id_and_year(id, year)
-        year ? "#{id}:#{year}" : id
-      end
-
-      def docid(t, code)
-        type, code1 = /^\[\d+\]$|^\([^)]+\).*$/.match(code) ?
-          ["metanorma", mn_code(code)] : @bibdb&.docid_type(code) || [nil, code]
-        code1.sub!(/^nofetch\((.+)\)$/, "\\1")
-        t.docidentifier **attr_code(type: type) do |d|
-          d << code1
-        end
-      end
-
-      def docnumber(t, code)
-        t.docnumber do |d|
-          d << HTMLEntities.new.decode(code).sub(/^[^\d]*/, "")
-        end
-      end
-
-      def norm_year(yr)
-        /^\&\#821[12];$/.match(yr) and return "--" 
-        /^\d\d\d\d-\d\d\d\d$/.match(yr) and return yr
-        yr&.sub(/(?<=[0-9])-.*$/, "")
-      end
-
-      def isorefrender1(t, m, yr, allp = "")
-        t.title(**plaintxt) { |i| i << ref_normalise(m[:text]) }
-        docid(t, m[:usrlbl]) if m[:usrlbl]
-        docid(t, id_and_year(m[:code], yr) + allp)
-        docnumber(t, m[:code])
+      def isorefrender1(bib, m, yr, allp = "")
+        bib.title(**plaintxt) { |i| i << ref_normalise(m[:text]) }
+        docid(bib, m[:usrlbl]) if m[:usrlbl]
+        docid(bib, id_and_year(m[:code], yr) + allp)
+        docnumber(bib, m[:code])
       end
 
       def isorefmatches(xml, m)
         yr = norm_year(m[:year])
-        ref = fetch_ref xml, m[:code], yr, title: m[:text], usrlbl: m[:usrlbl], lang: (@lang || :all)
+        ref = fetch_ref xml, m[:code], yr, title: m[:text], usrlbl: m[:usrlbl],
+          lang: (@lang || :all)
         return use_my_anchor(ref, m[:anchor]) if ref
+
         xml.bibitem **attr_code(ref_attributes(m)) do |t|
           isorefrender1(t, m, yr)
           yr and t.date **{ type: "published" } do |d|
@@ -85,6 +48,7 @@ module Asciidoctor
         ref = fetch_ref xml, m[:code], nil, no_year: true, note: m[:fn],
           title: m[:text], usrlbl: m[:usrlbl], lang: (@lang || :all)
         return use_my_anchor(ref, m[:anchor]) if ref
+
         isorefmatches2_1(xml, m)
       end
 
@@ -95,49 +59,51 @@ module Asciidoctor
             d.on "--"
           end
           iso_publisher(t, m[:code])
-          m[:fn].nil? or t.note(**plaintxt.merge(type: "Unpublished-Status")) do |p|
-            p << "#{m[:fn]}"
+          unless m[:fn].nil?
+            t.note(**plaintxt.merge(type: "Unpublished-Status")) do |p|
+            p << (m[:fn]).to_s
+            end
           end
         end
       end
 
-      def conditional_date(t, m, noyr)
-        m.names.include?("year") and !m[:year].nil? and
-          t.date(**{ type: "published" }) do |d|
-          noyr and d.on "--" or set_date_range(d, norm_year(m[:year]))
-        end
-      end
-
       def isorefmatches3(xml, m)
         yr = norm_year(m[:year])
         hasyr = !yr.nil? && yr != "--"
-        ref = fetch_ref xml, m[:code], hasyr ? yr : nil, all_parts: true, 
-          no_year: yr == "--", text: m[:text], usrlbl: m[:usrlbl], lang: (@lang || :all)
+        ref = fetch_ref(xml, m[:code], hasyr ? yr : nil,
+                        all_parts: true,
+                        no_year: yr == "--", text: m[:text], usrlbl: m[:usrlbl],
+                        lang: (@lang || :all))
         return use_my_anchor(ref, m[:anchor]) if ref
+
         isorefmatches3_1(xml, m, yr, hasyr, ref)
       end
 
-      def isorefmatches3_1(xml, m, yr, hasyr, ref)
+      def isorefmatches3_1(xml, m, yr, _hasyr, _ref)
         xml.bibitem(**attr_code(ref_attributes(m))) do |t|
           isorefrender1(t, m, yr, " (all parts)")
           conditional_date(t, m, yr == "--")
           iso_publisher(t, m[:code])
-          m.names.include?("fn") && m[:fn] and
-            t.note(**plaintxt.merge(type: "Unpublished-Status")) { |p| p << "#{m[:fn]}" }
-          t.extent **{ type: 'part' } do |e|
+          if m.names.include?("fn") && m[:fn]
+            t.note(**plaintxt.merge(type: "Unpublished-Status")) do |p|
+              p << (m[:fn]).to_s
+            end
+          end
+          t.extent **{ type: "part" } do |e|
             e.referenceFrom "all"
           end
         end
       end
 
-      def refitem_render1(m, code, t)
+      def refitem_render1(m, code, bib)
         if code[:type] == "path"
-          t.uri code[:key].sub(/\.[a-zA-Z0-9]+$/, ""), **{ type: "URI" }
-          t.uri code[:key].sub(/\.[a-zA-Z0-9]+$/, ""), **{ type: "citation" }
+          bib.uri code[:key].sub(/\.[a-zA-Z0-9]+$/, ""), **{ type: "URI" }
+          bib.uri code[:key].sub(/\.[a-zA-Z0-9]+$/, ""), **{ type: "citation" }
         end
-        docid(t, m[:usrlbl]) if m[:usrlbl]
-        docid(t, /^\d+$/.match(code[:id]) ? "[#{code[:id]}]" : code[:id])
-        code[:type] == "repo" and t.docidentifier code[:key], **{ type: "repository" }
+        docid(bib, m[:usrlbl]) if m[:usrlbl]
+        docid(bib, /^\d+$/.match?(code[:id]) ? "[#{code[:id]}]" : code[:id])
+        code[:type] == "repo" and
+          bib.docidentifier code[:key], **{ type: "repository" }
       end
 
       def refitem_render(xml, m, code)
@@ -146,7 +112,7 @@ module Asciidoctor
             i << ref_normalise_no_format(m[:text])
           end
           refitem_render1(m, code, t)
-          docnumber(t, code[:id]) unless /^\d+$|^\(.+\)$/.match(code[:id])
+          docnumber(t, code[:id]) unless /^\d+$|^\(.+\)$/.match?(code[:id])
         end
       end
 
@@ -156,25 +122,30 @@ module Asciidoctor
 
       def analyse_ref_nofetch(ret)
         return ret unless m = /^nofetch\((?<id>.+)\)$/.match(ret[:id])
+
         ret.merge(id: m[:id], nofetch: true)
       end
 
       def analyse_ref_repo_path(ret)
-        return ret unless m = /^(?<type>repo|path):\((?<key>[^,]+),?(?<id>.*)\)$/.match(ret[:id])
+        return ret unless m =
+          /^(?<type>repo|path):\((?<key>[^,]+),?(?<id>.*)\)$/.match(ret[:id])
+
         id = m[:id].empty? ? m[:key].sub(%r{^[^/]+/}, "") : m[:id]
         ret.merge(id: id, type: m[:type], key: m[:key], nofetch: true)
       end
 
       def analyse_ref_numeric(ret)
-        return ret unless /^\d+$/.match(ret[:id])
+        return ret unless /^\d+$/.match?(ret[:id])
+
         ret.merge(numeric: true)
       end
 
       # ref id = (usrlbl)code[:-]year
       # code = nofetch(code) | (repo|path):(key,code) | \[? number \]? | ident
       def analyse_ref_code(code)
-        ret = {id: code}
-        return ret if code.nil? || code.empty?
+        ret = { id: code }
+        return ret if code.blank?
+
         analyse_ref_nofetch(analyse_ref_repo_path(analyse_ref_numeric(ret)))
       end
 
@@ -185,11 +156,13 @@ module Asciidoctor
         nil
       end
 
-      def refitem1(xml, item, m)
+      def refitem1(xml, _item, m)
         code = analyse_ref_code(m[:code])
         unless code[:id] && code[:numeric] || code[:nofetch]
-          ref = fetch_ref xml, code[:id], m.names.include?("year") ? m[:year] : nil, title: m[:text],
-            usrlbl: m[:usrlbl], lang: (@lang || :all)
+          ref = fetch_ref(xml, code[:id],
+                          m.names.include?("year") ? m[:year] : nil,
+                          title: m[:text],
+                          usrlbl: m[:usrlbl], lang: (@lang || :all))
           return use_my_anchor(ref, m[:anchor]) if ref
         end
         refitem_render(xml, m, code)
@@ -203,44 +176,46 @@ module Asciidoctor
         ref.gsub(/&amp;amp;/, "&amp;")
       end
 
-      ISO_REF = %r{^<ref\sid="(?<anchor>[^"]+)">
+      ISO_REF =
+        %r{^<ref\sid="(?<anchor>[^"]+)">
       \[(?<usrlbl>\([^)]+\))?(?<code>(ISO|IEC)[^0-9]*\s[0-9-]+|IEV)
-      (:(?<year>[0-9][0-9-]+))?\]</ref>,?\s*(?<text>.*)$}xm
+      (:(?<year>[0-9][0-9-]+))?\]</ref>,?\s*(?<text>.*)$}xm.freeze
 
-        ISO_REF_NO_YEAR = %r{^<ref\sid="(?<anchor>[^"]+)">
+      ISO_REF_NO_YEAR =
+        %r{^<ref\sid="(?<anchor>[^"]+)">
       \[(?<usrlbl>\([^)]+\))?(?<code>(ISO|IEC)[^0-9]*\s[0-9-]+):
-      (--|\&\#821[12]\;)\]</ref>,?\s*
+      (--|&\#821[12];)\]</ref>,?\s*
         (<fn[^>]*>\s*<p>(?<fn>[^\]]+)</p>\s*</fn>)?,?\s?(?<text>.*)$}xm
-
-        ISO_REF_ALL_PARTS = %r{^<ref\sid="(?<anchor>[^"]+)">
-        \[(?<usrlbl>\([^)]+\))?(?<code>(ISO|IEC)[^0-9]*\s[0-9]+)
-        (:(?<year>--|\&\#821[12]\;|[0-9][0-9-]+))?\s
-        \(all\sparts\)\]</ref>,?\s*
-          (<fn[^>]*>\s*<p>(?<fn>[^\]]+)</p>\s*</fn>,?\s?)?(?<text>.*)$}xm
-
-          NON_ISO_REF = %r{^<ref\sid="(?<anchor>[^"]+)">
-        \[(?<usrlbl>\([^)]+\))?(?<code>[^\]]+?)
-        ([:-](?<year>(19|20)[0-9][0-9][0-9-]*))?\]</ref>,?\s*(?<text>.*)$}xm
-
-        def reference1_matches(item)
-          matched = ISO_REF.match item
-          matched2 = ISO_REF_NO_YEAR.match item
-          matched3 = ISO_REF_ALL_PARTS.match item
-          [matched, matched2, matched3]
-        end
-
-        def reference1(node, item, xml)
-          matched, matched2, matched3 = reference1_matches(item)
-          if matched3.nil? && matched2.nil? && matched.nil? then refitem(xml, item, node)
-          elsif !matched.nil? then isorefmatches(xml, matched)
-          elsif !matched2.nil? then isorefmatches2(xml, matched2)
-          elsif !matched3.nil? then isorefmatches3(xml, matched3)
-          end
-        end
-
-        def mn_code(code)
-          code.sub(/^\(/, "[").sub(/\).*$/, "]").sub(/^nofetch\((.+)\)$/, "\\1")
+        .freeze
+
+      ISO_REF_ALL_PARTS =
+        %r{^<ref\sid="(?<anchor>[^"]+)">
+      \[(?<usrlbl>\([^)]+\))?(?<code>(ISO|IEC)[^0-9]*\s[0-9]+)
+      (:(?<year>--|&\#821[12];|[0-9][0-9-]+))?\s
+      \(all\sparts\)\]</ref>,?\s*
+        (<fn[^>]*>\s*<p>(?<fn>[^\]]+)</p>\s*</fn>,?\s?)?(?<text>.*)$}xm.freeze
+
+      NON_ISO_REF = %r{^<ref\sid="(?<anchor>[^"]+)">
+      \[(?<usrlbl>\([^)]+\))?(?<code>[^\]]+?)
+      ([:-](?<year>(19|20)[0-9][0-9][0-9-]*))?\]</ref>,?\s*(?<text>.*)$}xm
+        .freeze
+
+      def reference1_matches(item)
+        matched = ISO_REF.match item
+        matched2 = ISO_REF_NO_YEAR.match item
+        matched3 = ISO_REF_ALL_PARTS.match item
+        [matched, matched2, matched3]
+      end
+
+      def reference1(node, item, xml)
+        matched, matched2, matched3 = reference1_matches(item)
+        if matched3.nil? && matched2.nil? && matched.nil?
+          refitem(xml, item, node)
+        elsif !matched.nil? then isorefmatches(xml, matched)
+        elsif !matched2.nil? then isorefmatches2(xml, matched2)
+        elsif !matched3.nil? then isorefmatches3(xml, matched3)
         end
+      end
     end
   end
 end