#include "render_context.hpp"
#include "state/outside_section.hpp"
#include "visitor/get_token.hpp"

using namespace mstch;

const mstch::node render_context::null_node;

render_context::push::push(render_context& context, const mstch::node& node):
    m_context(context)
{
  context.m_nodes.emplace_front(node);
  context.m_node_ptrs.emplace_front(&node);
  context.m_state.push(std::unique_ptr<render_state>(new outside_section));
}

render_context::push::~push() {
  m_context.m_nodes.pop_front();
  m_context.m_node_ptrs.pop_front();
  m_context.m_state.pop();
}

std::string render_context::push::render(const template_type& templt) {
  return m_context.render(templt);
}

render_context::render_context(
    const mstch::node& node,
    const std::map<std::string, template_type>& partials):
    m_partials(partials), m_nodes(1, node), m_node_ptrs(1, &node)
{
  m_state.push(std::unique_ptr<render_state>(new outside_section));
}

const mstch::node& render_context::find_node(
    const std::string& token,
    std::list<node const*> current_nodes)
{
  if (token != "." && token.find('.') != std::string::npos)
    return find_node(token.substr(token.rfind('.') + 1),
        {&find_node(token.substr(0, token.rfind('.')), current_nodes)});
  else
    for (auto& node: current_nodes)
      if (visit(has_token(token), *node))
        return visit(get_token(token, *node), *node);
  return null_node;
}

const mstch::node& render_context::get_node(const std::string& token) {
    return find_node(token, m_node_ptrs);
}

std::string render_context::render(
    const template_type& templt, const std::string& prefix)
{
  std::string output;
  bool prev_eol = true;
  for (auto& token: templt) {
    if (prev_eol && prefix.length() != 0)
      output += m_state.top()->render(*this, {prefix});
    output += m_state.top()->render(*this, token);
    prev_eol = token.eol();
  }
  return output;
}

std::string render_context::render_partial(
    const std::string& partial_name, const std::string& prefix)
{
  return m_partials.count(partial_name) ?
      render(m_partials.at(partial_name), prefix) : "";
}