#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):
    context(context)
{
  context.nodes.emplace_front(node);
  context.state.push(std::unique_ptr<render_state>(new outside_section));
}

render_context::push::~push() {
  context.nodes.pop_front();
  context.state.pop();
}

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

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

const mstch::node& render_context::find_node(
    const std::string& token,
    std::deque<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) {
    std::deque<node const*> current_nodes;
    for (auto& node: nodes)
        current_nodes.push_back(&node);
    return find_node(token, current_nodes);
}

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 += state.top()->render(*this, {prefix});
    output += 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 partials.count(partial_name) ?
      render(partials.at(partial_name), prefix) : "";
}