#include "xml-writer.hh"

#include <assert.h>

namespace nix {

XMLWriter::XMLWriter(bool indent, std::ostream& output)
    : output(output), indent(indent) {
  output << "<?xml version='1.0' encoding='utf-8'?>" << std::endl;
  closed = false;
}

XMLWriter::~XMLWriter() { close(); }

void XMLWriter::close() {
  if (closed) {
    return;
  }
  while (!pendingElems.empty()) closeElement();
  closed = true;
}

void XMLWriter::indent_(size_t depth) {
  if (!indent) {
    return;
  }
  output << string(depth * 2, ' ');
}

void XMLWriter::openElement(const string& name, const XMLAttrs& attrs) {
  assert(!closed);
  indent_(pendingElems.size());
  output << "<" << name;
  writeAttrs(attrs);
  output << ">";
  if (indent) {
    output << std::endl;
  }
  pendingElems.push_back(name);
}

void XMLWriter::closeElement() {
  assert(!pendingElems.empty());
  indent_(pendingElems.size() - 1);
  output << "</" << pendingElems.back() << ">";
  if (indent) {
    output << std::endl;
  }
  pendingElems.pop_back();
  if (pendingElems.empty()) {
    closed = true;
  }
}

void XMLWriter::writeEmptyElement(const string& name, const XMLAttrs& attrs) {
  assert(!closed);
  indent_(pendingElems.size());
  output << "<" << name;
  writeAttrs(attrs);
  output << " />";
  if (indent) {
    output << std::endl;
  }
}

void XMLWriter::writeAttrs(const XMLAttrs& attrs) {
  for (auto& i : attrs) {
    output << " " << i.first << "=\"";
    for (size_t j = 0; j < i.second.size(); ++j) {
      char c = i.second[j];
      if (c == '"')
        output << "&quot;";
      else if (c == '<')
        output << "&lt;";
      else if (c == '>')
        output << "&gt;";
      else if (c == '&')
        output << "&amp;";
      /* Escape newlines to prevent attribute normalisation (see
         XML spec, section 3.3.3. */
      else if (c == '\n')
        output << "&#xA;";
      else
        output << c;
    }
    output << "\"";
  }
}

}  // namespace nix