# 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",
        "xmlns:wp" => "http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawing",
        "xmlns:a" => "http://schemas.openxmlformats.org/drawingml/2006/main",
        "xmlns:pic" => "http://schemas.openxmlformats.org/drawingml/2006/picture"
      }.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)
        case run
        when Nodes::Image
          render_image(xml, run)
        when Nodes::Run
          render_text_run(xml, run)
        end
      end

      def render_text_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_image(xml, image)
        xml["w"].r do
          xml["w"].drawing do
            xml["wp"].inline(distT: "0", distB: "0", distL: "0", distR: "0") do
              xml["wp"].extent(cx: image.width_emu.to_s, cy: image.height_emu.to_s)
              xml["wp"].docPr(id: image.doc_pr_id.to_s, name: image.filename)
              xml["wp"].cNvGraphicFramePr do
                xml["a"].graphicFrameLocks(noChangeAspect: "1")
              end
              xml["a"].graphic do
                xml["a"].graphicData(uri: "http://schemas.openxmlformats.org/drawingml/2006/picture") do
                  xml["pic"].pic do
                    xml["pic"].nvPicPr do
                      xml["pic"].cNvPr(id: "0", name: image.filename)
                      xml["pic"].cNvPicPr
                    end
                    xml["pic"].blipFill do
                      xml["a"].blip("r:embed" => image.rid)
                      xml["a"].stretch do
                        xml["a"].fillRect
                      end
                    end
                    xml["pic"].spPr do
                      xml["a"].xfrm do
                        xml["a"].off(x: "0", y: "0")
                        xml["a"].ext(cx: image.width_emu.to_s, cy: image.height_emu.to_s)
                      end
                      xml["a"].prstGeom(prst: "rect") do
                        xml["a"].avLst
                      end
                    end
                  end
                end
              end
            end
          end
        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