module ReverseAsciidoctor
  module Converters
    class Td < Base
      def convert(node, state = {})
        id = node['id']
        anchor = id ? "[[#{id}]]" : ""
        colrowattr = colrow(node['colspan'], node['rowspan'])
        alignattr = alignstyle(node)
        style = cellstyle(node)
        singlepara = node.elements.size == 1 && node.elements.first.name == "p"
        state[:tdsinglepara] = singlepara if singlepara
        adoccell = node.at(".//ul | .//ol | .//pre | .//blockquote | .//br | .//hr") ||
          node.at(".//p") && !singlepara
        style = "a" if adoccell
        delim = adoccell ? "\n" : " "
        content = treat_children(node, state)
        "#{colrowattr}#{alignattr}#{style}| #{anchor}#{content}#{delim}"
      end

      def cellstyle(node)
        ""
      end

      def colrow(colspan, rowspan)
        if colspan && rowspan
          "#{colspan}.#{rowspan}+"
        elsif colspan
          "#{colspan}+"
        elsif rowspan
          ".#{rowspan}+"
        else
          ""
        end
      end

      def alignstyle(node)
        align = node["align"]
        valign = node["valign"]
        a = case align
              when "left" then "<"
              when "center" then "^"
              when "right" then ">"
            else
              ""
            end
        v = case valign
              when "top" then "<"
              when "middle" then "^"
              when "bottom" then ">"
            else
              ""
            end
        if align && valign
          "#{a}.#{v}"
        elsif align
          a
        elsif valign
          ".#{v}"
        else
          ""
        end
      end
    end

    register :td, Td.new
  end
end