/*!
 * mustache.js - logic-less {{mustache}} templates with javascript
 * http://github.com/janl/mustache.js
 */

/*global define: false*/

(function (root, factory) {
  if (typeof exports === "object" && exports) {
    factory(exports); // commonjs
  } else {
    var mustache = {};
    factory(mustache);
    if (typeof define === "function" && define.amd) {
      define(mustache); // amd
    } else {
      root.mustache = mustache; // <script>
    }
  }
}(this, function (mustache) {

  // workaround for https://issues.apache.org/jira/browse/couchdb-577
  // see https://github.com/janl/mustache.js/issues/189
  var regexp_test = regexp.prototype.test;
  function testregexp(re, string) {
    return regexp_test.call(re, string);
  }

  var nonspacere = /\s/;
  function iswhitespace(string) {
    return !testregexp(nonspacere, string);
  }

  var object_tostring = object.prototype.tostring;
  var isarray = array.isarray || function (object) {
    return object_tostring.call(object) === '[object array]';
  };

  function isfunction(object) {
    return typeof object === 'function';
  }

  function escaperegexp(string) {
    return string.replace(/[\-\[\]{}()*+?.,\\\^$|#\s]/g, "\\$&");
  }

  var entitymap = {
    "&": "&amp;",
    "<": "&lt;",
    ">": "&gt;",
    '"': '&quot;',
    "'": '&#39;',
    "/": '&#x2f;'
  };

  function escapehtml(string) {
    return string(string).replace(/[&<>"'\/]/g, function (s) {
      return entitymap[s];
    });
  }

  function escapetags(tags) {
    if (!isarray(tags) || tags.length !== 2) {
      throw new error('invalid tags: ' + tags);
    }

    return [
      new regexp(escaperegexp(tags[0]) + "\\s*"),
      new regexp("\\s*" + escaperegexp(tags[1]))
    ];
  }

  var whitere = /\s*/;
  var spacere = /\s+/;
  var equalsre = /\s*=/;
  var curlyre = /\s*\}/;
  var tagre = /#|\^|\/|>|\{|&|=|!/;

  /**
   * breaks up the given `template` string into a tree of tokens. if the `tags`
   * argument is given here it must be an array with two string values: the
   * opening and closing tags used in the template (e.g. [ "<%", "%>" ]). of
   * course, the default is to use mustaches (i.e. mustache.tags).
   *
   * a token is an array with at least 4 elements. the first element is the
   * mustache symbol that was used inside the tag, e.g. "#" or "&". if the tag
   * did not contain a symbol (i.e. {{myvalue}}) this element is "name". for
   * all text that appears outside a symbol this element is "text".
   *
   * the second element of a token is its "value". for mustache tags this is
   * whatever else was inside the tag besides the opening symbol. for text tokens
   * this is the text itself.
   *
   * the third and fourth elements of the token are the start and end indices,
   * respectively, of the token in the original template.
   *
   * tokens that are the root node of a subtree contain two more elements: 1) an
   * array of tokens in the subtree and 2) the index in the original template at
   * which the closing tag for that section begins.
   */
  function parsetemplate(template, tags) {
    tags = tags || mustache.tags;
    template = template || '';

    if (typeof tags === 'string') {
      tags = tags.split(spacere);
    }

    var tagres = escapetags(tags);
    var scanner = new scanner(template);

    var sections = [];     // stack to hold section tokens
    var tokens = [];       // buffer to hold the tokens
    var spaces = [];       // indices of whitespace tokens on the current line
    var hastag = false;    // is there a {{tag}} on the current line?
    var nonspace = false;  // is there a non-space char on the current line?

    // strips all whitespace tokens array for the current line
    // if there was a {{#tag}} on it and otherwise only space.
    function stripspace() {
      if (hastag && !nonspace) {
        while (spaces.length) {
          delete tokens[spaces.pop()];
        }
      } else {
        spaces = [];
      }

      hastag = false;
      nonspace = false;
    }

    var start, type, value, chr, token, opensection;
    while (!scanner.eos()) {
      start = scanner.pos;

      // match any text between tags.
      value = scanner.scanuntil(tagres[0]);
      if (value) {
        for (var i = 0, len = value.length; i < len; ++i) {
          chr = value.charat(i);

          if (iswhitespace(chr)) {
            spaces.push(tokens.length);
          } else {
            nonspace = true;
          }

          tokens.push(['text', chr, start, start + 1]);
          start += 1;

          // check for whitespace on the current line.
          if (chr === '\n') {
            stripspace();
          }
        }
      }

      // match the opening tag.
      if (!scanner.scan(tagres[0])) break;
      hastag = true;

      // get the tag type.
      type = scanner.scan(tagre) || 'name';
      scanner.scan(whitere);

      // get the tag value.
      if (type === '=') {
        value = scanner.scanuntil(equalsre);
        scanner.scan(equalsre);
        scanner.scanuntil(tagres[1]);
      } else if (type === '{') {
        value = scanner.scanuntil(new regexp('\\s*' + escaperegexp('}' + tags[1])));
        scanner.scan(curlyre);
        scanner.scanuntil(tagres[1]);
        type = '&';
      } else {
        value = scanner.scanuntil(tagres[1]);
      }

      // match the closing tag.
      if (!scanner.scan(tagres[1])) {
        throw new error('unclosed tag at ' + scanner.pos);
      }

      token = [ type, value, start, scanner.pos ];
      tokens.push(token);

      if (type === '#' || type === '^') {
        sections.push(token);
      } else if (type === '/') {
        // check section nesting.
        opensection = sections.pop();

        if (!opensection) {
          throw new error('unopened section "' + value + '" at ' + start);
        }
        if (opensection[1] !== value) {
          throw new error('unclosed section "' + opensection[1] + '" at ' + start);
        }
      } else if (type === 'name' || type === '{' || type === '&') {
        nonspace = true;
      } else if (type === '=') {
        // set the tags for the next time around.
        tagres = escapetags(tags = value.split(spacere));
      }
    }

    // make sure there are no open sections when we're done.
    opensection = sections.pop();
    if (opensection) {
      throw new error('unclosed section "' + opensection[1] + '" at ' + scanner.pos);
    }

    return nesttokens(squashtokens(tokens));
  }

  /**
   * combines the values of consecutive text tokens in the given `tokens` array
   * to a single token.
   */
  function squashtokens(tokens) {
    var squashedtokens = [];

    var token, lasttoken;
    for (var i = 0, len = tokens.length; i < len; ++i) {
      token = tokens[i];

      if (token) {
        if (token[0] === 'text' && lasttoken && lasttoken[0] === 'text') {
          lasttoken[1] += token[1];
          lasttoken[3] = token[3];
        } else {
          squashedtokens.push(token);
          lasttoken = token;
        }
      }
    }

    return squashedtokens;
  }

  /**
   * forms the given array of `tokens` into a nested tree structure where
   * tokens that represent a section have two additional items: 1) an array of
   * all tokens that appear in that section and 2) the index in the original
   * template that represents the end of that section.
   */
  function nesttokens(tokens) {
    var nestedtokens = [];
    var collector = nestedtokens;
    var sections = [];

    var token, section;
    for (var i = 0, len = tokens.length; i < len; ++i) {
      token = tokens[i];

      switch (token[0]) {
      case '#':
      case '^':
        collector.push(token);
        sections.push(token);
        collector = token[4] = [];
        break;
      case '/':
        section = sections.pop();
        section[5] = token[2];
        collector = sections.length > 0 ? sections[sections.length - 1][4] : nestedtokens;
        break;
      default:
        collector.push(token);
      }
    }

    return nestedtokens;
  }

  /**
   * a simple string scanner that is used by the template parser to find
   * tokens in template strings.
   */
  function scanner(string) {
    this.string = string;
    this.tail = string;
    this.pos = 0;
  }

  /**
   * returns `true` if the tail is empty (end of string).
   */
  scanner.prototype.eos = function () {
    return this.tail === "";
  };

  /**
   * tries to match the given regular expression at the current position.
   * returns the matched text if it can match, the empty string otherwise.
   */
  scanner.prototype.scan = function (re) {
    var match = this.tail.match(re);

    if (match && match.index === 0) {
      var string = match[0];
      this.tail = this.tail.substring(string.length);
      this.pos += string.length;
      return string;
    }

    return "";
  };

  /**
   * skips all text until the given regular expression can be matched. returns
   * the skipped string, which is the entire tail if no match can be made.
   */
  scanner.prototype.scanuntil = function (re) {
    var index = this.tail.search(re), match;

    switch (index) {
    case -1:
      match = this.tail;
      this.tail = "";
      break;
    case 0:
      match = "";
      break;
    default:
      match = this.tail.substring(0, index);
      this.tail = this.tail.substring(index);
    }

    this.pos += match.length;

    return match;
  };

  /**
   * represents a rendering context by wrapping a view object and
   * maintaining a reference to the parent context.
   */
  function context(view, parentcontext) {
    this.view = view == null ? {} : view;
    this.cache = { '.': this.view };
    this.parent = parentcontext;
  }

  /**
   * creates a new context using the given view with this context
   * as the parent.
   */
  context.prototype.push = function (view) {
    return new context(view, this);
  };

  /**
   * returns the value of the given name in this context, traversing
   * up the context hierarchy if the value is absent in this context's view.
   */
  context.prototype.lookup = function (name) {
    var value;
    if (name in this.cache) {
      value = this.cache[name];
    } else {
      var context = this;

      while (context) {
        if (name.indexof('.') > 0) {
          value = context.view;

          var names = name.split('.'), i = 0;
          while (value != null && i < names.length) {
            value = value[names[i++]];
          }
        } else {
          value = context.view[name];
        }

        if (value != null) break;

        context = context.parent;
      }

      this.cache[name] = value;
    }

    if (isfunction(value)) {
      value = value.call(this.view);
    }

    return value;
  };

  /**
   * a writer knows how to take a stream of tokens and render them to a
   * string, given a context. it also maintains a cache of templates to
   * avoid the need to parse the same template twice.
   */
  function writer() {
    this.cache = {};
  }

  /**
   * clears all cached templates in this writer.
   */
  writer.prototype.clearcache = function () {
    this.cache = {};
  };

  /**
   * parses and caches the given `template` and returns the array of tokens
   * that is generated from the parse.
   */
  writer.prototype.parse = function (template, tags) {
    var cache = this.cache;
    var tokens = cache[template];

    if (tokens == null) {
      tokens = cache[template] = parsetemplate(template, tags);
    }

    return tokens;
  };

  /**
   * high-level method that is used to render the given `template` with
   * the given `view`.
   *
   * the optional `partials` argument may be an object that contains the
   * names and templates of partials that are used in the template. it may
   * also be a function that is used to load partial templates on the fly
   * that takes a single argument: the name of the partial.
   */
  writer.prototype.render = function (template, view, partials) {
    var tokens = this.parse(template);
    var context = (view instanceof context) ? view : new context(view);
    return this.rendertokens(tokens, context, partials, template);
  };

  /**
   * low-level method that renders the given array of `tokens` using
   * the given `context` and `partials`.
   *
   * note: the `originaltemplate` is only ever used to extract the portion
   * of the original template that was contained in a higher-order section.
   * if the template doesn't use higher-order sections, this argument may
   * be omitted.
   */
  writer.prototype.rendertokens = function (tokens, context, partials, originaltemplate) {
    var buffer = '';

    // this function is used to render an arbitrary template
    // in the current context by higher-order sections.
    var self = this;
    function subrender(template) {
      return self.render(template, context, partials);
    }

    var token, value;
    for (var i = 0, len = tokens.length; i < len; ++i) {
      token = tokens[i];

      switch (token[0]) {
      case '#':
        value = context.lookup(token[1]);
        if (!value) continue;

        if (isarray(value)) {
          for (var j = 0, jlen = value.length; j < jlen; ++j) {
            buffer += this.rendertokens(token[4], context.push(value[j]), partials, originaltemplate);
          }
        } else if (typeof value === 'object' || typeof value === 'string') {
          buffer += this.rendertokens(token[4], context.push(value), partials, originaltemplate);
        } else if (isfunction(value)) {
          if (typeof originaltemplate !== 'string') {
            throw new error('cannot use higher-order sections without the original template');
          }

          // extract the portion of the original template that the section contains.
          value = value.call(context.view, originaltemplate.slice(token[3], token[5]), subrender);

          if (value != null) buffer += value;
        } else {
          buffer += this.rendertokens(token[4], context, partials, originaltemplate);
        }

        break;
      case '^':
        value = context.lookup(token[1]);

        // use javascript's definition of falsy. include empty arrays.
        // see https://github.com/janl/mustache.js/issues/186
        if (!value || (isarray(value) && value.length === 0)) {
          buffer += this.rendertokens(token[4], context, partials, originaltemplate);
        }

        break;
      case '>':
        if (!partials) continue;
        value = isfunction(partials) ? partials(token[1]) : partials[token[1]];
        if (value != null) buffer += this.rendertokens(this.parse(value), context, partials, value);
        break;
      case '&':
        value = context.lookup(token[1]);
        if (value != null) buffer += value;
        break;
      case 'name':
        value = context.lookup(token[1]);
        if (value != null) buffer += mustache.escape(value);
        break;
      case 'text':
        buffer += token[1];
        break;
      }
    }

    return buffer;
  };

  mustache.name = "mustache.js";
  mustache.version = "0.8.1";
  mustache.tags = [ "{{", "}}" ];

  // all high-level mustache.* functions use this writer.
  var defaultwriter = new writer();

  /**
   * clears all cached templates in the default writer.
   */
  mustache.clearcache = function () {
    return defaultwriter.clearcache();
  };

  /**
   * parses and caches the given template in the default writer and returns the
   * array of tokens it contains. doing this ahead of time avoids the need to
   * parse templates on the fly as they are rendered.
   */
  mustache.parse = function (template, tags) {
    return defaultwriter.parse(template, tags);
  };

  /**
   * renders the `template` with the given `view` and `partials` using the
   * default writer.
   */
  mustache.render = function (template, view, partials) {
    return defaultwriter.render(template, view, partials);
  };

  // this is here for backwards compatibility with 0.4.x.
  mustache.to_html = function (template, view, partials, send) {
    var result = mustache.render(template, view, partials);

    if (isfunction(send)) {
      send(result);
    } else {
      return result;
    }
  };

  // export the escaping function so that the user may override it.
  // see https://github.com/janl/mustache.js/issues/244
  mustache.escape = escapehtml;

  // export these mainly for testing, but also for advanced usage.
  mustache.scanner = scanner;
  mustache.context = context;
  mustache.writer = writer;

}));