# Pleroma: A lightweight social networking server
# Copyright © 2017-2020 Pleroma Authors 
# SPDX-License-Identifier: AGPL-3.0-only
defmodule Pleroma.XmlBuilderTest do
  use Pleroma.DataCase
  alias Pleroma.XmlBuilder
  test "Build a basic xml string from a tuple" do
    data = {:feed, %{xmlns: "http://www.w3.org/2005/Atom"}, "Some content"}
    expected_xml = "Some content"
    assert XmlBuilder.to_xml(data) == expected_xml
  end
  test "returns a complete document" do
    data = {:feed, %{xmlns: "http://www.w3.org/2005/Atom"}, "Some content"}
    expected_xml =
      "Some content"
    assert XmlBuilder.to_doc(data) == expected_xml
  end
  test "Works without attributes" do
    data = {
      :feed,
      "Some content"
    }
    expected_xml = "Some content"
    assert XmlBuilder.to_xml(data) == expected_xml
  end
  test "It works with nested tuples" do
    data = {
      :feed,
      [
        {:guy, "brush"},
        {:lament, %{configuration: "puzzle"}, "pinhead"}
      ]
    }
    expected_xml =
      ~s[brushpinhead]
    assert XmlBuilder.to_xml(data) == expected_xml
  end
  test "Represents NaiveDateTime as iso8601" do
    assert XmlBuilder.to_xml(~N[2000-01-01 13:13:33]) == "2000-01-01T13:13:33"
  end
  test "Uses self-closing tags when no content is giving" do
    data = {
      :link,
      %{rel: "self"}
    }
    expected_xml = ~s[]
    assert XmlBuilder.to_xml(data) == expected_xml
  end
end