metanorma/metanorma-ieee

require "isodoc"
require "twitter_cldr"

module IsoDoc
  module Ieee
    class Metadata < IsoDoc::Metadata
      def initialize(lang, script, i18n, fonts_options = {})
        super
        @metadata[:issueddate] = "&lt;Date Approved&gt;"
        logos
      end

      def logos
        here = File.join(File.dirname(__FILE__), "html")
        suffix = ".emz"
        @icap and suffix = "_icap.emz"
        @icr and suffix = "_icr.emz"
        %i(wp_image001_emz wp_image003_emz wp_image007_emz wp_image008_emz)
          .each do |w|
          img = w.to_s.sub("_emz", suffix)
          set(w, File.expand_path(File.join(here, img)))
        end
      end

      def bibdate(isoxml, _out)
        isoxml.xpath(ns("//bibdata/date[@format = 'ddMMMyyyy']")).each do |d|
          set("#{d['type'].tr('-', '_')}date".to_sym, Common::date_range(d))
        end
        draft = isoxml.at(ns("//bibdata/date[@type = 'issued']")) ||
          isoxml.at(ns("//bibdata/date[@type = 'circulated']")) ||
          isoxml.at(ns("//bibdata/date[@type = 'created']")) ||
          isoxml.at(ns("//bibdata/version/revision-date")) or return
        date = DateTime.parse(draft.text)
        set(:draft_month, date.strftime("%B"))
        set(:draft_year, date.strftime("%Y"))
      rescue StandardError
      end

      def doctype(isoxml, _out)
        b = isoxml.at(ns("//bibdata/ext/doctype"))&.text or return
        set(:doctype, b.split(/[- ]/).map(&:capitalize).join(" "))
        set(:doctype_abbrev, @labels["doctype_abbrev"][b])
        s = isoxml.at(ns("//bibdata/ext/subdoctype"))&.text and
          set(:docsubtype, s.split(/[- ]/).map(&:capitalize).join(" ")
          .gsub(/^Icap$/, "ICAP"))
        s = isoxml.at(ns("//bibdata/ext/trial-use"))&.text and s == "true" and
          set(:trial_use, true)
      end

      def author(xml, _out)
        super
        society(xml)
        tc(xml)
        wg(xml)
        bg(xml)
        program(xml)
      end

      def program(xml)
        p = xml.at(ns("//bibdata/ext/program")) and
          set(:program, p.text)
        @icap and
          set(:program, "IEEE CONFORMITY ASSESSMENT PROGRAM (ICAP)")
      end

      def society(xml)
        society = xml.at(ns("//bibdata/ext/editorialgroup/" \
                            "society"))&.text || "&lt;Society&gt;"
        set(:society, society)
      end

      def tc(xml)
        tc = xml.at(ns("//bibdata/ext/editorialgroup/" \
                       "committee"))&.text || "&lt;Committee Name&gt;"
        set(:technical_committee, tc)
      end

      def wg(xml)
        wg = xml.at(ns("//bibdata/ext/editorialgroup/" \
                       "working-group")) or return nil
        set(:working_group, wg.text)
      end

      def bg(xml)
        bg = xml.at(ns("//bibdata/ext/editorialgroup/" \
                       "balloting-group")) or return nil
        set(:balloting_group, bg.text)
        set(:balloting_group_type, bg["type"])
      end

      def otherid(isoxml, _out)
        id = "bibdata/docidentifier[@type = 'ISBN']"
        dn = isoxml.at(ns("//#{id}[@scope = 'PDF']"))
        set(:isbn_pdf, dn&.text || "978-0-XXXX-XXXX-X")
        dn = isoxml.at(ns("//#{id}[@scope = 'print']"))
        set(:isbn_print, dn&.text || "978-0-XXXX-XXXX-X")
      end

      def docid(isoxml, _out)
        super
        id = "bibdata/docidentifier[@type = 'IEEE']"
        dn = isoxml.at(ns("//#{id}[@scope = 'PDF']"))
        set(:stdid_pdf, dn&.text || "STDXXXXX")
        dn = isoxml.at(ns("//#{id}[@scope = 'print']"))
        set(:stdid_print, dn&.text || "STDPDXXXXX")
        dn = isoxml.at(ns("//bibdata/ext/structuredidentifier/amendment")) and
          set(:amd, dn.text)
        dn = isoxml.at(ns("//bibdata/ext/structuredidentifier/corrigendum")) and
          set(:corr, dn.text)
      end

      def title(isoxml, _out)
        metadata_parse_init(isoxml)
        super
        draft = isoxml.at(ns("//bibdata/version/draft"))
        doctype(isoxml, _out)
        set(:full_doctitle, fulltitle(@metadata[:doctype], draft))
        set(:abbrev_doctitle, fulltitle(@metadata[:doctype_abbrev], draft))
        prov = isoxml.at(ns("//bibdata/title[@type='provenance']")) and
          set(:provenance_doctitle, Common::to_xml(prov.children))
      end

      def fulltitle(type, draft)
        title = "#{type || '???'} for #{@metadata[:doctitle] || '???'}"
        draft and title = "Draft #{title}"
        title
      end

      def metadata_parse_init(isoxml)
        d = isoxml.at(ns("//bibdata/ext/subdoctype"))
        @icap = d&.text&.downcase == "icap"
        @icr = d&.text&.downcase == "industry-connection-report"
        logos
      end

      def ddMMMyyyy(isodate)
        isodate.nil? and return nil
        arr = isodate.split("-")
        if arr.size == 1 && (/^\d+$/.match isodate)
          Date.new(*arr.map(&:to_i)).strftime("%Y")
        elsif arr.size == 2
          Date.new(*arr.map(&:to_i)).strftime("%b %Y")
        else
          Date.parse(isodate).strftime("%d %b %Y")
        end
      end
    end
  end
end