# frozen_string_literal: true

module Ezdoc
  module Xml
    class DocumentXml
      NAMESPACES = {
        "xmlns:w" => "http://schemas.openxmlformats.org/wordprocessingml/2006/main",
        "xmlns:r" => "http://schemas.openxmlformats.org/officeDocument/2006/relationships"
      }.freeze

      def initialize(nodes)
        @nodes = nodes
      end

      def to_xml
        builder = Nokogiri::XML::Builder.new(encoding: "UTF-8") do |xml|
          xml.document(NAMESPACES) do
            xml.parent.namespace = xml.parent.namespace_definitions.find { |ns| ns.prefix == "w" }
            xml["w"].body do
              @nodes.each { |node| render_node(xml, node) }
            end
          end
        end
        builder.to_xml
      end

      private

      def render_node(xml, node)
        case node
        when Nodes::Paragraph
          render_paragraph(xml, node)
        when Nodes::List
          render_list(xml, node)
        when Nodes::Table
          render_table(xml, node)
        end
      end

      def render_paragraph(xml, para)
        xml["w"].p do
          para.runs.each { |run| render_run(xml, run) }
        end
      end

      def render_list(xml, list)
        list.items.each { |item| render_list_item(xml, item) }
      end

      def render_list_item(xml, item)
        xml["w"].p do
          xml["w"].pPr do
            xml["w"].numPr do
              xml["w"].ilvl("w:val" => "0")
              xml["w"].numId("w:val" => item.num_id.to_s)
            end
          end
          item.runs.each { |run| render_run(xml, run) }
        end
      end

      def render_run(xml, run)
        xml["w"].r do
          if run.bold || run.italic || run.underline
            xml["w"].rPr do
              xml["w"].b if run.bold
              xml["w"].i if run.italic
              xml["w"].u("w:val" => "single") if run.underline
            end
          end
          xml["w"].t(run.text, "xml:space" => "preserve")
        end
      end

      def render_table(xml, table)
        xml["w"].tbl do
          xml["w"].tblPr do
            xml["w"].tblW("w:w" => "0", "w:type" => "auto")
            xml["w"].tblBorders do
              %w[top left bottom right insideH insideV].each do |border|
                xml["w"].send(border, "w:val" => "single", "w:sz" => "4", "w:color" => "000000")
              end
            end
          end
          table.rows.each { |row| render_table_row(xml, row) }
        end
      end

      def render_table_row(xml, row)
        xml["w"].tr do
          row.cells.each { |cell| render_table_cell(xml, cell) }
        end
      end

      def render_table_cell(xml, cell)
        xml["w"].tc do
          xml["w"].p do
            cell.runs.each { |run| render_run(xml, run) }
          end
        end
      end
    end
  end
end