twinspark.js

// jshint -W030, -W084, esversion: 6

(function(window, document, tsname) {
  var location = window.location;
  var script = document.currentScript;

  /// Config

  function cget(name, def) { return script && script.dataset[name] || def; }
  function iget(name, def) { return parseInt(cget(name, def), 10); }

  var xhrTimeout    = iget('timeout', '3000');
  var historyLimit  = iget('history', '20');
  var attrsToSettle = cget('settle', 'class,style,width,height').split(',');
  var insertClass   = cget('insert-class', 'ts-insert');
  var removeClass   = cget('remove-class', 'ts-remove');
  var activeClass   = cget('active-class', 'ts-active');

  /// Internal variables

  // Indicates if `init` has happened
  var READY = false;

  /** @typedef {{selector: string, handler: (function(!Element): void)}} */
  var Directive;

  /** @type {Array<Directive>} */
  var DIRECTIVES = [];

  /** @const {!Object<string, Function>} */
  var FUNCS = {
    stop:        function(o) { if (o.event) o.event.stopPropagation(); },
    prevent:     function(o) { if (o.event) o.event.preventDefault(); },
    delay:       delay,

    not: function(funcname) {
      var args = [].slice.call(arguments, 1, arguments.length - 1);
      var o = merge({}, arguments[arguments.length - 1]);
      o.src = o.src.slice(o.command.length + 1);
      o = /** @type {!CommandPayload}*/ (o);

      var rv = executeCommand(funcname, args, o);

      // this means previous command does not return truthy/falsy value, we
      // ignore that
      if (rv === null || rv === undefined) {
        return rv;
      }
      return !rv;
    },

    target: function(sel, o) {
      try {
        let el = findTarget(o.el, sel);
        if (!el)
          return false;
        o.el = el;
        return undefined; // do not affect o.input
      } catch(e) {
        return false; // stop executing actions pipeline
      }
    },

    remove: arity(
      (o) => { o.el.remove(); },
      (sel, o) => { findTarget(o.el, sel).remove(); }
    ),

    wait: function(eventname, o) {
      return new Promise(function(resolve) {
        listen(o.el, eventname, resolve, {once: true});
      });
    },

    on: function(eventname, o) {
      var rest = o.line.split(o.src)[1].replace(/^[\s,]+/, '');
      var action = parseActionSpec(rest)[0];
      addListener(o.el, eventname, (_el, e) => {
        _doAction(action, {el: o.el, event: e});
      });
      return false; // stop executing actions pipeline
    },

    req: arity(
      (url, o) => { this.dispatcher(null, url, o); },
      (method, url, o) => {
        doReqBatch(makeReq(o.el, o.event, false,
                           {method: method,
                            url: url,
                            data: o.input ? [['input', o.input]] : null}));
      }
    ),

    class:       function(cls, o) { o.el.classList.add(cls); },
    "class+":    function(cls, o) { o.el.classList.add(cls); },
    "class-":    function(cls, o) { o.el.classList.remove(cls); },
    "class^":    function(cls, o) { o.el.classList.toggle(cls); },
    classtoggle: function(cls, o) { o.el.classList.toggle(cls); },

    text: arity(
      (o) => {
        if (!(o.input === null || o.input === undefined)) {
          o.el.textContent = o.input;
        }
        return o.input;
      },
      (value, o) => {
        o.el.textContent = value;
        return value;
      }
    ),

    html: arity(
      (o) => {
        if (!(o.input === null || o.input === undefined)) {
          o.el.innerHTML = o.input;
        }
        return o.el.innerHTML;
      },
      (value, o) => {
        o.el.innerHTML = value;
        return value;
      }
    ),

    attr: arity(
      (name, o) => {
        let val = o.el[name];
        return typeof val != 'undefined' ? val : getattr(o.el, name);
      },
      (name, value, o) => {
        o.el[name] = value;
        setattr(o.el, name, value);
        return value;
      }
    ),

    log: function(...args) {
      let o = args[args.length-1];
      let rest = args.slice(args.length - 1);
      if (o.input) {
        rest.push(o.input);
      }
      console.log(...rest);
    }
  };


  /// Utils

  var ERR = console.error ?
      console.error.bind(console, 'TwinSpark error:') :
      console.log.bind(console, 'TwinSpark error:');

  /** @type{function(...Function): Function} */
  function arity(...funcs) {
    let funcmap = funcs.reduce((acc, func) => {
      if (acc[func.length]) {
        throw extraerr('Arity dispatch: duplicate function with the same number of arguments', {
          length: func.length,
          func: func,
          duplicate: acc[func.length],
        });
      }
      acc[func.length] = func;
      return acc;
    }, {});

    return function dispatcher() {
      var len = arguments.length;
      var func = funcmap[len];
      if (!func) {
        throw extraerr("No function supplied accepting " + len + " arguments", {
          "functions": funcmap,
          "arguments": Array.from(arguments)
        });
      }
      return func.apply({dispatcher}, arguments);
    }
  }

  /** @type{function(!Object, (Object|null|undefined)): !Object} */
  var merge = Object.assign || function(tgt, src) {
    if (!src) {
      return tgt;
    }

    for (var k in src) {
      if (Object.hasOwn(src, k)) {
        tgt[k] = src[k];
      }
    }
    return tgt;
  };

  function groupBy(arr, keyfn) {
    return arr.reduce(function (acc, v) {
      var key = keyfn(v);
      (acc[key] || (acc[key] = [])).push(v);
      return acc;
    }, {});
  }

  function zip(arr1, arr2) {
    return arr1.map((val, i) => [val, arr2[i]]);
  }

  /** @type {function(Array): Array} */
  function distinct(arr) {
    var seen = new Set(),
        res = [],
        val;
    for (var i = 0; i < arr.length; i++) {
      val = arr[i];
      if (!seen.has(val)) {
        seen.add(val);
        res.push(val);
      }
    }
    return res;
  }

  function el2str(el) {
    return el.outerHTML.match(/<.+?>/)[0];
  }

  function extraerr(msg, data) {
    var err = Error(msg);
    err.extra = data;
    return err;
  }

  function memoize(orig) {
    var cache = null;
    return function() {
      return cache || (cache = orig());
    };
  }

  /** @type {function(string): (number|undefined)} */
  function parseTime(s) {
    s = s && s.trim();
    if (!s)
      return;
    if (s.match(/\d+s/))
      return parseFloat(s) * 1000;
    return parseFloat(s);
  }

  function delay(s) {
    return new Promise(function(resolve) {
      setTimeout(resolve, parseTime(s), true);
    });
  }

  /// Events
  /** @type {function(Function): void} */
  function onload(fn) {
    if (document.readyState == 'loading') {
      document.addEventListener('DOMContentLoaded', fn);
    } else {
      fn();
    }
  }

  var onidle = window.requestIdleCallback || function(x) { setTimeout(x, 100); };

  /** @type {function((Element|Node|Window), string, Object=, Object=): !Event} */
  function sendEvent(el, type, detail, opts) {
    // true if not supplied
    var bubbles = (opts && 'bubbles' in opts) ? opts.bubbles : true;
    var event = new CustomEvent(type, {bubbles: bubbles,
                                       cancelable: true,
                                       detail: detail});
    console.debug('🛎️ EVENT', type, {el: el, detail: detail});
    el.dispatchEvent(event);
    return event;
  }

  function sendError(el, type, detail) {
    sendEvent(el, type, merge({error: type}, detail));
  }


  /// Attribute handling
  /** @type {function(!Element, !string): boolean} */
  function hasattr(el, attr) {
    return el.hasAttribute(attr);
  }

  /** @type {function(!Element, !string): string} */
  function getattr(el, attr) {
    return el.getAttribute(attr);
  }

  /** @type {function(!Element, !string, string): void} */
  function setattr(el, attr, value) {
    return el.setAttribute(attr, value);
  }

  /** @type {function(!Element, !string): void} */
  function delattr(el, attr) {
    return el.removeAttribute(attr);
  }


  /// DOM querying
  /** @type {function(!Node, !string): Element} */
  function qsf(el, selector) { // querySelectorFirst
    if (el.nodeType == 1 && el.matches(selector))
      return /** @type {!Element} */ (el);
    return el.querySelector ? el.querySelector(selector) : null;
  }

  /** @type {function(!Node, !string): !Array<!Element>} */
  function qse(el, selector) { // querySelectorEvery
    if (!el.querySelectorAll)
      return [];
    var els = Array.from(el.querySelectorAll(selector));
    if (el.nodeType == 1 && el.matches(selector))
      els.unshift(el);
    return els;
  }

  function elid(el) {
    if (el.id)
      return el.id;
    var tag = el.tagName.toLowerCase();
    if (el.className)
      return tag + '.' + el.className.replace(' ', '.');
    return tag;
  }

  /**
   * Collects all non-empty attribute values from element and its parents.
   * @type {function(!Element, string): Array<string>} */
  function elcrumbs(el, attr) {
    var result = [];
    var value;
    var _el = el; // this is to make Closure Compiler type checker happy :(

    do {
      value = getattr(_el, attr);
      if (value) {
        result.push(value);
      }
    } while (_el = _el.parentElement);

    return result;
  }

  /** @type {function(!(Node|Window), string=, ?=): ?} */
  function internalData(el, attr, def) {
    var k = 'twinspark-internal';
    var data = el[k] || (el[k] = {});
    if (!attr)
      return data;
    if (!(attr in data) && typeof def != 'undefined')
      data[attr] = def;
    return data[attr];
  }


  /// Core

  /**
   * Registers new directive.
   * @param  {string} selector Directive selector.
   * @param  {function(!Element): void} handler Directive callback.
   * @return void
   */
  function register(selector, handler) {
    var directive = {selector: selector, handler: handler};
    DIRECTIVES.push(directive);
    if (READY) {
      qse(document.body, directive.selector).forEach(directive.handler);
    }
  }

  /** @type {function(!(Node|Window), !string, !Function, !AddEventListenerOptions=): !(Node|Window)} */
  function listen(el, type, func, opts) {
    el.addEventListener(type, func, opts);
    internalData(el, 'event-handlers', []).push({
      type: type,
      func: func,
      opts: opts,
    });
    return el;
  }

  /** @type {function(!(Element|HTMLDocument)): void} */
  function deactivateEl(el) {
    internalData(el, 'event-handlers', [])
      .forEach(h => el.removeEventListener(h.type, h.func, h.opts));
  }

  /** @type {function(!Element): void} */
  function activateEl(el) {
    deactivateEl(el);
    DIRECTIVES.forEach(d => el.matches(d.selector) && d.handler(el));
  }

  /** @type {function(!Element): void} */
  function activate(el) {
    var selector = DIRECTIVES.map(d => d.selector).join(',');
    qse(el, selector).forEach(activateEl);
    sendEvent(el, 'ts-ready');
  }

  /** @type {function(!Element): void} */
  function autofocus(el) {
    var toFocus = qsf(el, '[autofocus]');
    if (toFocus) {
      toFocus.focus();
    }
  }


  /// Ajax

  /** @typedef {{
   *    ok: boolean,
   *    status: number,
   *    url: string,
   *    error: string
   * }}
   */
  var ResponseTimeout;

  /** @typedef {{
   *    ok: boolean,
   *    status: number,
   *    url: string,
   *    reqUrl: string,
   *    xhr: XMLHttpRequest,
   *    opts: RequestInit,
   *    headers: Object,
   *    content: string,
   * }}
   */
  var Response;

  /** @typedef {{response: Response, tasks: Array<Function>}} */
  var SwapData;

  /** @type {function(string, RequestInit): {promise: Promise<Response|ResponseTimeout>, xhr: XMLHttpRequest} } */
  function xhr(url, opts) {
    var xhr = new XMLHttpRequest();
    return {
      promise: new Promise(function(resolve, reject) {
        opts || (opts = {});

        xhr.open(opts.method || 'GET', url, true);
        for (var k in opts.headers) {
          xhr.setRequestHeader(k, opts.headers[k]);
        }
        for (var k in opts.xhr) {
          xhr[k] = opts.xhr[k];
        }

        xhr.onreadystatechange = function() {
          if (xhr.readyState != 4) return;
          if (xhr.status == 0) return; // timeout

          var headers = {'ts-title':     xhr.getResponseHeader('ts-title'),
                         'ts-history':   xhr.getResponseHeader('ts-history'),
                         'ts-swap':      xhr.getResponseHeader('ts-swap'),
                         'ts-swap-push': xhr.getResponseHeader('ts-swap-push')};

        return resolve({ok:      xhr.status >= 200 && xhr.status <= 299,
                        status:  xhr.status,
                        url:     xhr.responseURL,
                        reqUrl:  url,
                        xhr:     xhr,
                        opts:    opts,
                        headers: headers,
                        content: xhr.responseText});

        };

        xhr.timeout = xhrTimeout;
        xhr.ontimeout = function() {
          return reject({ok:      false,
                         status:  0,
                         url:     url,
                         content: "timeout"});
        };

        xhr.send(
          /** @type {(ArrayBuffer|ArrayBufferView|Blob|Document|FormData|null|string|undefined)} */
          (opts.body));
      }),
      xhr: xhr
    };
  }


  /// Data collection

  /**
   * Merge two sets of parameters into one
   * @param {FormData|URLSearchParams} p1 Collection of parameters to be updated.
   * @param {FormData|URLSearchParams|Iterable} p2 Collection of parameters to be merged in.
   * @param {boolean=} removeEmpty Indicate if empty ('' or null) parameters from p2 should be removed.
   * @return FormData|URLSearchParams
   */
  function mergeParams(p1, p2, removeEmpty) {
    if (!p2) return p1;

    // iterator loop here since p2 could be either an array or an
    // FormData instance
    for (var [k, v] of p2) {
      if (!k) continue;

      if (removeEmpty && ((v === null) || (v === ''))) {
        p1.delete(k);
      } else {
        p1.append(k, v);
      }
    }
    return p1;
  }

  /**
   * Parse either query string or JSON object.
   * @param {string} v String to be parsed.
   * @return FormData|Array<Array<string,*>>|null
   */
  function parseData(v) {
    if (v == "") return null;

    if (v[0] == '{') {
      var data = JSON.parse(v);
      if (typeof data === 'object' && data !== null) {
        var arr = [];
        for (var k in data) {
          arr.push([k, data[k]]);
        }
        return arr;
      }
    } else {
      return mergeParams(new FormData(), new URLSearchParams(v));
    }
  }

  /**
   * @type {function(!Element, string): FormData}
   */
  function eldata(el, attr) {
    // reduceRight because deepest element is the first one
    return elcrumbs(el, attr).reduceRight(
      (acc, v) => mergeParams(acc, parseData(v), true),
      new FormData());
  }

  /** @type {function(Element): string?} */
  function formElementValue(el) {
    if (!el.name)
      return null;

    // we will look at e.submitter separately
    if (el.type == 'submit')
      return null;

    if (((el.type == 'radio') || (el.type == 'checkbox')) &&
        !el.checked) {
      return null;
    }

    return el.value;
  }

  /** @type {function(!Element, Event): !FormData} */
  function collectData(el, e) {
    var data = eldata(el, 'ts-data');
    var tag = el.tagName;
    var res;

    if (tag == 'FORM') {
      let currentElData = new FormData(el);

      if (e && e.submitter && e.submitter.name && e.submitter.value
          // old IOS Safari may add button's value to form data
          && !currentElData.has(e.submitter.name)) {
        data.append(e.submitter.name, e.submitter.value);
      }

      data = mergeParams(data, currentElData);
    } else if ((tag == 'INPUT') || (tag == 'SELECT') || (tag == 'TEXTAREA')) {
      if (res = formElementValue(el))
        data.append(el.name, /** @type {string} */ (res));
    }

    return data;
  }

  /// IndexedDB

  var IDB = window.indexedDB;

  function reqpromise(req) {
    return new Promise(function(resolve, reject) {
      req.onsuccess = function() { resolve(req.result); };
      req.onerror   = function() { reject(req.error); };
    });
  }

  var _idb;
  function idb() {
    if (_idb)
      return _idb;

    var dbname = 'twinspark';
    var req = IDB.open(dbname, 1);
    req.onupgradeneeded = function() {
      var db = req.result;
      var store = db.createObjectStore(dbname, {keyPath: 'url'});
      store.createIndex('time', 'time');
    };

    return _idb = reqpromise(req);
  }

  /** @type {function(Object, Object=): Object} */
  function idbStore(db, opts) {
    var rw = opts && opts.write;
    return db.transaction(db.name, rw && 'readwrite' || 'readonly')
      .objectStore(db.name);
  }

  /// History

  async function deleteOverLimit(db) {
    let store = idbStore(db);
    let count = await reqpromise(store.count());
    console.debug('PAGES IN STORAGE', count);
    var toremove = count - historyLimit;
    if (toremove <= 0)
      return;

    store = idbStore(db, {write: true});
    let req = store.index('time').openCursor();

    // This API is like an abyss looking at me. `onsuccess` will be called
    // every time you call `cursor.continue()`.
    req.onsuccess = function(_) {
      var cursor = req.result;
      if (cursor) {
        cursor.delete();
        if (--toremove > 0) {
          cursor.continue();
        }
      }
    }
  }

  async function storeCurrentState() {
    if (historyLimit == 0) // disable history management
      return;
    var data = {url:  location.pathname + location.search,
                html: document.body.innerHTML,
                time: +new Date()};
    var db = await idb();
    var store = idbStore(db, {write: true});
    await reqpromise(store.put(data));
    await deleteOverLimit(db);
  }

  function pushState(url, title) {
    // Store HTML before "changing page", `swap` is going to change HTML after
    // that
    storeCurrentState();

    // we need to put some state in our *current* history item, so that
    // `onpopstate` knows it wasn't called because of `hashchange`
    history.replaceState('history', '', '');
    history.pushState(null, title, url);
    sendEvent(window, 'ts-pushstate', {url: url});
  }

  function replaceState(url) {
    history.replaceState('history', '', url);
    sendEvent(window, 'ts-replacestate', {url: url});
  }

  async function onpopstate(e) {
    if (historyLimit == 0) // disable history management
      return;
    // hashchange triggers onpopstate and there is nothing we can do about it
    // https://stackoverflow.com/questions/25634422/stop-firing-popstate-on-hashchange
    //
    // the worst news here is that `popstate` is fired *before* `hashchange`, so
    // we store some state in previous item in `pushState` function
    if (!e.state)
      return;

    let url = location.pathname + location.search;
    let db = await idb();
    let store = idbStore(db);
    let data = await reqpromise(store.get(url));

    if (data && data.html) {
      console.debug('onpopstate restore', data.url, data.html.length, data.time);
      deactivateEl(document);
      document.body.innerHTML = data.html;

      // If user came back from a real page change, we indicate this with an
      // `initial` property. There is a race between IndexedDB loading HTML
      // and DOMContentLoaded, so in case when first happened and second did
      // not, `READY` is false and thus `activate` will be run later on inside
      // `init`. Skip this not to activate everything twice.
      if (e.state == "INITIAL" && !READY) {
        return;
      }

      activate(document.body);
    }
  }


  /// Fragments

  /** @type {function(Element, string, boolean): (Element|undefined)} */
  function _findSingleTarget(el, sel, childrenOnly) {
    if (!sel || !el) {
      return el;
    }

    if (sel == 'target') {
      return el;
    }

    if (sel == 'inherit') {
      var parent = el.parentElement.closest('[ts-target]');
      return findTarget(parent);
    }

    if (sel.slice(0, 7) == 'parent ') {
      return el.closest(sel.slice(7));
    }

    if (sel.slice(0, 6) == 'child ') {
      return el.querySelector(sel.slice(6));
    }

    if (sel.slice(0, 8) == 'sibling ') {
      return el.parentElement.querySelector(sel.slice(8));
    }

    if (childrenOnly) {
      return el.querySelector(sel);
    }

    return document.querySelector(sel);
  }

  /** @type {function(!Element, !string, !boolean): !Element} */
  function findSingleTarget(el, sel, childrenOnly) {
    var res = _findSingleTarget(el, sel, childrenOnly);
    if (res)
      return res;

    var elstr = el2str(el);
    throw extraerr(`Could not find element with selector ${sel} for element ${elstr}` +
                   (childrenOnly ? ' among children' : ''), {
      element: elstr,
      selector: sel
    });
  }

  /** @type {function(Element, string=): Element} */
  function findTarget(el, sel) {
    if (!el) return el;

    if (sel == null) {
      sel = getattr(el, 'ts-target');
    }
    if (!sel) { // undefined, ""
      return el;
    }

    var bits = sel.split('|').map(s => s.trim());
    // when selector is not the first we are not going to escape to global
    // search from document root, it's always one of modifiers (see
    // `_findSingleTarget`), in the least it will look for a child
    return bits.reduce((el, sel, idx) => findSingleTarget(el, sel, idx > 0), el);
  }

  /** @type {function(!Element, !Element, !Element): (Element|DocumentFragment)} */
  function findReply(target, origin, reply) {
    var sel = getattr(origin, 'ts-req-selector');

    if (!sel) {
      if ((reply.tagName == 'BODY') && (target.tagName != 'BODY')) {
        return reply.children[0];
      }
      return reply;
    }

    if (sel.slice(0, 9) == 'children ') {
      var el = qsf(reply, sel.slice(9));
      var frag = new DocumentFragment();
      if (el && el.children) {
        frag.append.apply(frag, el.children);
      }
      return frag;
    }

    return qsf(reply, sel);
  }

  /** @type {function(!Element, !Element, !string, !boolean=): void} */
  function syncattr(target, source, attr, withProp) {
    if (withProp) {
      let value = source[attr];
      if (value != target[attr]) {
        target[attr] = value;
        value ? setattr(target, attr, value) : delattr(target, attr);
      }
    } else {
      let value = getattr(source, attr);
      if (value != getattr(target, attr)) {
        value ? setattr(target, attr, value) : delattr(target, attr);
      }
    }
  }

  /** @type {function(!Element, !Element): void} */
  function syncSettleAttrs(target, source) {
    for (var attr of attrsToSettle) {
      syncattr(target, source, attr);
    }
  }

  /** @type {function(!Element): void} */
  function elementInserted(el) {
    el.classList.add(insertClass);
    setTimeout(() => el.classList.remove(insertClass));
  }

  // if there is a node with same id in an old code and in a new code,
  // temporarily set it attrs to what old code had (and then restore to new
  // values)
  function transitionAttrs(el, origin, ctx) {
    if (!el.id) return;

    var oldEl = origin.querySelector(el.tagName + "[id='" + el.id + "']");

    if (!oldEl) {
      return elementInserted(el);
    }

    var newAttrs = el.cloneNode();
    syncSettleAttrs(el, oldEl);
    ctx.tasks.push(function() {
      syncSettleAttrs(el, newAttrs);
    });
    return ctx;
  }


  /// Morph, thanks to idiomorph and nanomorph
  // Core algorithm from https://github.com/bigskysoftware/idiomorph
  var morph = (function() {
    /** @type {function(!Node, !Object): void} */
    function cleanRemove(el, ctx) {
      // callback before anything else to have a chance to do something
      ctx.cb('node-remove', el);

      if (el.nodeType != 1) {
        el.remove();
        return;
      }
      el.classList.add(removeClass);

      // another approach would be to use `transitionrun`/`transitionend`
      // events, but basic performance testing did not show a noticeable
      // difference
      var animations = el.getAnimations()
          .filter(a => a instanceof window.CSSTransition);
      if (!animations.length) {
        return el.remove();
      }

      Promise.all(animations.map(a => a.finished))
        .then(() => {
          el.remove();
        });
    }

    /** @type {function(!Node, !Object): void} */
    function cleanInsert(el, ctx) {
      // callback before anything so that there is a hook to change something
      ctx.cb('node-insert', el);
      if (el instanceof HTMLElement) {
        activate(el);
        elementInserted(el);
      }
    }

    /**
     * Makes one element look like the other
     * @param {!Node} target In-DOM element which needs to be updated
     * @param {!Node} reply  Incoming element of necessary shape
     * @return void
     */
    function syncAttrs(target, reply) {
      if (target.nodeType != 1) {
        // text, comments
        target.nodeValue = reply.nodeValue;
        return;
      }

      target = /** @type !Element */ (target);
      reply = /** @type !Element */ (reply);

      for (var attr of reply.attributes) {
        syncattr(target, reply, attr.name);
      }
      // iterate backwards to avoid skipping over items when a delete occurs
      for (let i = target.attributes.length - 1; i >= 0; i--) {
        syncattr(target, reply, target.attributes[i].name);
      }

      // sync inputs
      if (target.tagName == 'INPUT' && target.type != 'file') {
        // https://github.com/choojs/nanomorph/blob/master/lib/morph.js#L113
        // Changing the "value" attribute without changing the "value" property
        // will have no effect since attribute is only used to set the initial
        // value. Similar for the "checked" attribute, and "disabled".
        syncattr(target, reply, 'value', true);
        syncattr(target, reply, 'checked', true);
        syncattr(target, reply, 'disabled', true);
      } else if (target.tagName == 'OPTION') {
        syncattr(target, reply, 'selected', true);
      } else if (target.tagName == 'TEXTAREA') {
        syncattr(target, reply, 'value');
        // NOTE what is this stuff, is it necessary? Can't find a test case, but
        // nanomorph is doing that.
        if (target.firstChild && target.firstChild.nodeValue != reply.value) {
          target.firstChild.nodeValue = reply.value;
        }
      }
    }

    function intersection(setA, setB) {
      const _intersection = new Set();
      for (const elem of setB) {
        if (setA.has(elem)) {
          _intersection.add(elem);
        }
      }
      return _intersection;
    }

    function isSimilar(node1, node2) {
      return (node1 &&
              node2 &&
              node1.nodeType == node2.nodeType &&
              node1.tagName == node2.tagName);
    }

    /** @type {function(!Node, !Node): Element} */
    function findIdsMatch(target, reply) {
      if (reply.nodeType != 1)
        return null;

      var el = /** @type {!Element} */ (reply);
      var replyIds = qse(el, '[id]').map(el => '#' + CSS.escape(el.id)).join(',');
      if (!replyIds)
        return null;

      el = /** @type {!Element} */ (target);
      do {
        // check if any element having id like those coming in `reply`
        if (qsf(el, replyIds)) {
          return el;
        }
      } while (el = el.nextElementSibling);
      return null;
    }

    /** @type {function(!Node, !Node, Set<string>): Node} */
    function findSoftMatch(target, reply, incomingIds) {
      var el = target;
      var nextReply = reply.nextSibling;
      var potentialMatches = 0;

      do {
        var ids = qse(el, '[id]').map(el => el.id);
        // there are potential id matches, bail out of soft matching
        if (ids.length && intersection(incomingIds, ids).size) {
          return null;
        }

        // check similarities only if there is no ids inside of compared
        // elements, in other case we want a clean removal to start animations
        if (!ids.length && !qse(reply, '[id]').length && isSimilar(el, reply)) {
          return el;
        }

        if (isSimilar(el, nextReply)) {
          potentialMatches++;
          nextReply = nextReply.nextSibling;

          // If there are two future soft matches, bail to allow the siblings to
          // soft match so that we don't consume future soft matches for the sake
          // of the current node
          if (potentialMatches >= 2) {
            return null;
          }
        }
      } while (el = el.nextSibling);
      return null;
    }

    function removeNodesBetween(start, end, ctx) {
      while (start !== end) {
        var todelete = start;
        start = start.nextSibling;
        cleanRemove(todelete, ctx);
      }
      return end;
    }

    /** @type {function(!Node, Node, !Object): Node} */
    function morphNode(target, reply, ctx) {
      if (ctx.ignoreActive &&
          target == document.activeElement &&
          (target.tagName == 'INPUT' || target.tagName == 'TEXTAREA')) {
        // skip focused element, if it's input
        return target;
      } else if (!reply) {
        cleanRemove(target, ctx);
        return null;
      } else if (!isSimilar(target, reply)) {
        if (!target.parentElement) {
          target.replaceWith(reply);
        } else {
          target.parentElement.insertBefore(reply, target.nextSibling);
          cleanRemove(target, ctx);
          cleanInsert(reply, ctx);
        }
        return reply;
      } else {
        syncAttrs(target, reply);
        if (target.nodeType == 1 && reply.nodeType == 1) {
          morphChildren(
            /** @type !Element */ (target),
            /** @type !Element */ (reply),
            ctx);
        }
        return target;
      }
    }

    /** @type {function(!Element, !Element, !Object): void} */
    function morphChildren(parentTarget, parentReply, ctx) {
      var target = parentTarget.firstChild;
      var nextReply = parentReply.firstChild;

      var incomingIds = new Set(qse(parentReply, '[id]').map(el => el.id));

      while (nextReply) {
        var reply = nextReply;
        nextReply = reply.nextSibling;

        if (!target) {
          parentTarget.appendChild(reply);
          cleanInsert(reply, ctx);
          continue;
        }

        var idsMatch = findIdsMatch(target, reply);
        if (idsMatch) {
          target = removeNodesBetween(target, idsMatch, ctx).nextSibling;
          morphNode(idsMatch, reply, ctx);
          continue;
        }

        var softMatch = findSoftMatch(target, reply, incomingIds);
        if (softMatch) {
          target = removeNodesBetween(target, softMatch, ctx).nextSibling;
          morphNode(softMatch, reply, ctx);
          continue;
        }

        // can't morph, just insert it
        parentTarget.insertBefore(reply, target);
        cleanInsert(reply, ctx);
      }

      // remove leftovers
      if (target) {
        target = removeNodesBetween(target, parentTarget.lastChild, ctx);
        cleanRemove(target, ctx);
      }
    }

    /** @typedef {{cb: (undefined|function(!string, !Node): void)}} */
    var MorphContext;

    /** @type {function(!Node, Node, MorphContext): Node} */
    function morph(target, reply, ctx={}) {
      ctx.cb || (ctx.cb = function () {});
      if (target && target.nodeType == Node.DOCUMENT_NODE)
        target = target.documentElement;
      if (reply && reply.nodeType == Node.DOCUMENT_NODE)
        reply = reply.documentElement;
      return morphNode(target, reply, ctx);
    }

    morph.syncAttrs = syncAttrs;
    return morph;
  })();


  /**
   * Actually puts replaces `target` with `reply`
   * @param {!string}   strategy The way replacement is going to happen
   * @param {!Element}  target   In-DOM element to be replaced
   * @param {!(Element|DocumentFragment)} reply Element to be put in place
   * @param {!SwapData} ctx      Context-carrying object
   * @return !Array<Element>
   */
  function executeSwap(strategy, target, reply, ctx) {
    strategy || (strategy = 'replace');

    if (strategy != 'morph' &&
        strategy != 'morph-all' &&
        strategy != 'skip') {
      qse(reply, '[id]').forEach(function(el) {
        transitionAttrs(el, target, ctx);
      });
    }

    // this will work even in case of `morph`: since DocumentFragment is 100%
    // unlike target and so morph will not deal with individual elements at all
    /** @suppress {missingProperties} */
    var ret = reply instanceof DocumentFragment && Array.from(reply.children);

    switch (strategy) {
    case 'morph-all':   reply = morph(target, reply, {ignoreActive: false});       break;
    case 'morph':       reply = morph(target, reply, {ignoreActive: true});        break;
    case 'replace':     target.replaceWith(reply);                                 break;
    case 'inner':       target.replaceChildren(reply);                             break;
    case 'prepend':     target.prepend(reply);                                     break;
    case 'append':      target.append(reply);                                      break;
    case 'beforebegin': target.parentNode.insertBefore(reply, target);             break;
    case 'afterend':    target.parentNode.insertBefore(reply, target.nextSibling); break;
    case 'skip':        break;
    default:            throw Error('Unknown swap strategy ' + strategy);
    }

    return ret || [reply];
  }

  /** @type {function(!Element, !Element, !SwapData): Array<Element>} */
  function elementSwap(origin, replyParent, ctx) {
    var target = findTarget(origin);
    if (!target) {
      throw extraerr(`Target element not found for origin ${el2str(origin)}`,
                     {origin, replyParent});
    }

    var reply = findReply(target, origin, replyParent);
    if (!reply) {
      var sel = getattr(origin, 'ts-req-selector');
      throw extraerr(`Cannot find specified html in response, ` +
                     `maybe nothing to select as ${sel}`,
                     {sel, replyParent, origin});
    }

    var strategy = getattr(origin, 'ts-swap');
    if (origin) {
      var detail = {response: ctx.response};
      var e = sendEvent(origin, 'ts-req-after', detail);
      doActions(origin, e, getattr(origin, 'ts-req-after'), detail);
    }

    return executeSwap(strategy, target, reply, ctx);
  }

  /** @type {function(Element, !Element, !SwapData): Array<Element>} */
  function pushedSwap(origin, reply, ctx) {
    var sel = getattr(reply, 'ts-swap-push');
    if (!sel && reply.id) {
      sel = '#' + reply.id;
    }
    var target = findTarget(findTarget(origin || document.body), sel);
    if (!target) {
      throw extraerr('cannot find target for server-pushed swap', {reply});
    }
    var strategy = getattr(reply, 'ts-swap');
    return executeSwap(strategy, target, reply, ctx);
  }

  /** @type {function(!string, Element, !Element, !SwapData): Array<Element>} */
  function headerSwap(header, origin, replyParent, ctx) {
    // `replace: target selector <= reply selector`
    var m = header.match(/(\w+):(.+)<=(.+)/);
    if (!m) {
        throw extraerr('Cannot parse ts-swap-push header value', {header});
    }

    var strategy = m[1];
    var target = findTarget(findTarget(origin || document.body), m[2]);
    if (!target)
        throw extraerr('cannot find target for header swap', {sel: m[2]});
    var reply = qsf(replyParent, m[3]);
    if (!reply)
        throw extraerr('cannot find target for header swap', {reply, sel: m[3]});

    return executeSwap(strategy, target, reply, ctx);
  }

  function runScript(el) {
    var parent = el.parentNode;
    var newel = document.createElement(el.nodeName);

    for (var j = 0; j < el.attributes.length; j++) {
      var attr = el.attributes[j].name;
      setattr(newel, attr, getattr(el, attr));
    }

    newel.appendChild(document.createTextNode(el.innerHTML));
    parent.replaceChild(newel, el);
  }

  function processScripts(el) {
    var scripts = el.querySelectorAll('script');
    for (var i = 0; i < scripts.length; i++) {
      var script = scripts[i];
      if ((!script.type || script.type == 'text/javascript') &&
         !script.dataset.tsNoload) {
        runScript(script);
      }
    }
  }

  /** @type {function(Array<!Element>, !Element, !Response): Array<Element>} */
  function swap(origins, replyParent, res) {
    var ctx = {response: res, tasks: []};

    var swapped = [], viapush, viaheader;
    var singleOrigin = origins.length == 1 ? origins[0] : null;

    if (res.headers['ts-swap'] != 'skip') {
      if (singleOrigin) {
        swapped = elementSwap(singleOrigin, replyParent, ctx);
      } else {
        // batching, we need to collect references to parents before using them
        swapped = zip(origins, replyParent.children).flatMap(([origin, thisParent]) => {
          return elementSwap(origin, thisParent, ctx);
        });
      }
    }

    viapush = qse(replyParent, '[ts-swap-push]').flatMap(reply => {
      try {
        return pushedSwap(singleOrigin, reply, ctx);
      } catch(e) {
        console.error(e); // do not interrupt main line
      }
    });

    if (res.headers['ts-swap-push']) {
      // swap any header requests
      viaheader = res.headers['ts-swap-push'].split(',').flatMap(header => {
        try {
          return headerSwap(header, singleOrigin, replyParent, ctx)
        } catch(e) {
          console.error(e); // do not interrupt main line
        }
      });
    }
    swapped = swapped.flat();
    if (viapush)
      swapped = swapped.concat(viapush.flat());
    if (viaheader)
      swapped = swapped.concat(viaheader.flat());
    swapped = distinct(swapped);
    swapped.forEach(function(el) {
      processScripts(el);
      activate(el);
      autofocus(el);
    });
    setTimeout(function() {
      ctx.tasks.forEach(function(func) { func(); });
    }, 16);

    return swapped;
  }

  // Terminology:
  // `origin` - an element where request started from, a link or a button
  // `target` - where the incoming HTML will end up
  // `reply` - incoming HTML to end up in target
  /** @type {function(!string, Array<!Element>, !string, !Response): Array<!Element>} */
  function swapResponse(url, origins, content, res) {
    var html = new DOMParser().parseFromString(content, 'text/html');

    // when swapping, browsers treat <style> element inside of <noscript> as
    // something worth looking at. We don't want them to be used, and to be sure
    // let's delete all <noscript> elements.
    html.body.querySelectorAll('noscript').forEach(x => x.remove());

    var title = res.headers['ts-title'] || html.title;
    var replyParent = html.body;

    if (replyParent.children.length < origins.length &&
        res.headers['ts-swap'] != 'skip') {
      throw (`This request needs at least ${origins.length} elements, ` +
             `but ${replyParent.children.length} were returned`);
    }

    // either ts-history contains new URL or ts-req-history attr is present,
    // then take request URL as new URL
    var pushurl = res.headers['ts-history'] || hasattr(origins[0], 'ts-req-history') && url;
    if (pushurl) {
      if (getattr(origins[0], 'ts-req-history') == 'replace') {
        replaceState(pushurl);
      } else {
        pushState(pushurl, title);
      }
    }

    return swap(origins, replyParent, res);
  }


  /// Making request for fragments

  function mergeHeaders(h1, h2) {
    for (var k in h2) {
      if (!h1[k]) {
        h1[k] = h2[k];
      } else if (h1[k] != h2[k]) {
        h1[k] += ', ' + h2[k];
      }
    }
    return h1;
  }

  /** @type {function(!Req): {method: !string, data: !FormData, headers: !Object}} */
  function makeOpts(req) {
    var data = collectData(req.el, req.event?.detail?.event ?? req.event);
    return {
      method:  req.method,
      data:    mergeParams(data, req.opts.data),
      xhr:     {},
      headers: {
        'Accept':       'text/html+partial',
        'TS-URL':       location.pathname + location.search,
        'TS-Origin':    elid(req.el),
        'TS-Target':    elid(findTarget(req.el))
      }
    };
  }

  function setReqBody(opts, body) {
    if (!body) {
      return opts;
    }

    var issimple = (Array.from(body.entries())
                    .every((x) => typeof x[1] === "string"));
    if (!issimple) {
      opts.body = body;
      return opts;
    }

    // convert FormData to string so we can evade multipart form
    var simplebody = new URLSearchParams(body);
    opts.body = simplebody.toString();
    opts.headers['Content-Type'] = 'application/x-www-form-urlencoded';
    return opts;
  }

  function _doReqBatch(batch) {
    if (!batch.length) return;

    var url = batch[0].url;
    var method = batch[0].method;
    var data = batch.reduce(function(acc, req) {
      return mergeParams(acc, req.opts.data);
    }, new FormData());

    var qs = method == 'GET' ? new URLSearchParams(data).toString() : null;
    var body = method != 'GET' ? data : null;

    var opts = {
      method:  method,
      xhr: batch.reduce(function(x, req) {
        return req.opts.xhr;
      }, {}),
      headers: batch.reduce(function(h, req) {
        return mergeHeaders(h, req.opts.headers);
      }, {})
    };

    opts = setReqBody(opts, body);

    var fullurl = url;
    if (qs) {
      fullurl += url.indexOf('?') == -1 ? '?' : '&';
      fullurl += qs;
    }

    var origins = batch.map(function(req) { return req.el; });

    var executed = xhr(fullurl, opts);

    origins.forEach(function (el) {
      el.setAttribute('aria-busy', 'true');
      el.classList.add(activeClass);
      internalData(el)['active-xhr'] = executed.xhr;
    });

    return executed.promise
      .then(function(res) {

        onidle(() => origins.forEach(el => {
          el.removeAttribute('aria-busy');
          el.classList.remove('ts-active');
          delete internalData(el)['active-xhr'];
        }));

        if (executed.xhr.status == 0 && executed.xhr.statusText == 'abort') {
          return false;
        }

        if (res.ok) {
          res = /** @type !Response */ (res);
          let redirected = (res.url &&
                            (res.url != new URL(fullurl, location.href).href));

          if (redirected) {
            if (!res.headers['ts-history']) {
              res.headers['ts-history'] = res.url;
            }
            res.swap = swapResponse(res.url, [document.body], res.content, res);
          } else {
            res.swap = swapResponse(url, origins, res.content, res);
          }
          return res;
        }

        ERR('Something wrong with response', res.content);
        origins.forEach(function(el) {
          sendError(el, 'ts-req-error', {response: res,
                                         url: fullurl,
                                         opts: opts});
        });
        return res;
      })
      .catch(function(res) {
        onidle(() => origins.forEach(el => {
          el.removeAttribute('aria-busy');
          el.classList.remove('ts-active');
          delete internalData(el)['active-xhr'];
        }));

        ERR('Error retrieving backend response', fullurl, res.error || res);
        origins.forEach(function(el) {
          sendError(el, 'ts-req-error', {response: res,
                                         url: fullurl,
                                         opts: opts});
        });
        return res;
      });
  }

  function doReqBatch(reqs) {
    reqs = Array.isArray(reqs) ? reqs : [reqs];
    return Promise
      .all(reqs.map(function(req) {
        req.opts = makeOpts(req);

        var detail = {req: req};
        var e = sendEvent(req.el, 'ts-req-before', detail);
        if (e.defaultPrevented)
          return null;

        var result = req;
        var action = doActions(req.el, e, getattr(req.el, 'ts-req-before'), detail);
        if (action) {
          result = action.then(function(res) {
            // skip making request if event was prevented
            return e.defaultPrevented ? null : req;
          });
        }

        var strategy = getattr(req.el, 'ts-req-strategy') || 'queue';
        var activeXHR = internalData(req.el)['active-xhr'];
        if (strategy === 'first' && activeXHR) {
          // prevent duplicate request
          return null;
        }

        if (strategy === 'last' && activeXHR) {
          // abort active request to trigger a new one
          activeXHR.abort();
          delete internalData(req.el)['active-xhr'];
        }

        // default behavior is to `ts-req-strategy='queue'` all XHR requests
        return result;
      }))
      .then(function(res) {
        return res.filter(function(req) { return !!req; });
      })
      .then(_doReqBatch);
  }

  // Batch Request Queue
  /** @typedef {{el: !Element, event: Event, url: !string, method: !string, batch: boolean}} */
  var Req;

  /** @type {{reqs: Array<Req>, request: ?number}} */
  var queue = {
    reqs: [],
    request: null
  };

  function executeRequests() {
    var batches = groupBy(queue.reqs, req => req.method + req.url);
    queue = {reqs: [], request: null};

    for (var k in batches) {
      doReqBatch(batches[k]);
    }
  }

  function queueRequest(req) {
    queue.reqs.push(req);
    if (!queue.request) {
      queue.request = setTimeout(executeRequests, 16);
    }
  }

  /** @type {function(!Element, Event, boolean, Object=): Req} */
  function makeReq(el, e, batch, opts) {
    var url = (opts?.url ||
               (batch ? getattr(el, 'ts-req-batch') : getattr(el, 'ts-req')) ||
               (el.tagName == 'FORM' ? getattr(el, 'action') : getattr(el, 'href')));
    var method = (opts?.method ||
                  getattr(el, 'ts-req-method') ||
                  (el.tagName == 'FORM' ? (getattr(el, 'method') || 'POST') : 'GET'))
        .toUpperCase();

    return {el:     el,
            opts:   {data: opts?.data},
            event:  e,
            url:    url,
            method: method,
            batch:  batch};
  }
  // End Batch Request Queue

  function onNative(el, func) {
    var tag = el.tagName;
    var event = 'click';
    if (tag == 'FORM')
      event = 'submit';
    else if ((tag == 'INPUT') || (tag == 'SELECT') || (tag == 'TEXTAREA'))
      event = 'change';

    // this is a trick for macos safari < 15.4 and others < 2020
    var lastbutton = null;

    if (tag == 'FORM' && event == 'submit') {
      qse(el, 'button, input[type="submit"]').forEach(btn => {
        listen(btn, 'click', e => {
          lastbutton = e.target
        })
      });
    }

    return listen(el, event, function(/** @type {!Event} */ e) {
      if (e.altKey || e.ctrlKey || e.shiftKey || e.metaKey || (e.button || 0) != 0)
        return;

      e.preventDefault();
      e.stopPropagation();

      if (!e.submitter && lastbutton && lastbutton.type == 'submit') {
        e.submitter = lastbutton;
      }
      func(e);
      lastbutton = null;
    });
  }

  register('[ts-req]', function(el) {
    function handler(e) {
      doReqBatch([makeReq(el, e, false)]);
    }

    if (hasattr(el, 'ts-trigger')) {
      listen(el, 'ts-trigger', handler);
    } else {
      onNative(el, handler);
    }
  });


  register('[ts-req-batch]', function(el) {
    function handler(e) {
      queueRequest(makeReq(el, e, true));
    }

    if (hasattr(el, 'ts-trigger')) {
      listen(el, 'ts-trigger', handler);
    } else {
      onNative(el, handler);
    }
  });


  /// Actions

  /** @typedef {{
   *   name: string,
   *   args: Array<string>,
   *   src: string,
   * }}
   */
  var CommandDef;

  /** @typedef {{
   *   commands: !Array<CommandDef>,
   *   src: !string,
   * }}
   */
  var ActionDef;

  /** @typedef {{
   *   el:      !Element,
   *   e:       !Event,
   *   command: !string,
   *   src:     !string,
   *   line:    !string,
   *   input:   *,
   * }}
   */
  var CommandPayload;

  /**
   * Either call it with object of name to function, or with a name and a
   * function.
   * @type {function((Object|string), Function=): Object} */
  function registerCommands(cmdsOrName, maybeFunc) {
    if (typeof cmdsOrName == 'object') {
      return merge(FUNCS, cmdsOrName);
    } else if (maybeFunc) {
      FUNCS[cmdsOrName] = maybeFunc;
    }
    return FUNCS;
  }

  /** @type {function(!string, Array<!string>, CommandPayload): *} */
  function executeCommand(command, args, payload) {
    var cmd = /** @type {Function|undefined|null} */ (
      (window._ts_func && window._ts_func[command]) ||
        FUNCS[command] ||
        window[command]);

    if (!cmd) {
      throw Error('Unknown action command: ' + payload.src);
    }

    return cmd.apply(payload.el, args.concat([payload]));
  }

  /** @type {function(string): Array<ActionDef>}
   *
   *  Parses strings of the form:
   *
   *      cmd1 arg1, cmd2 arg2 'some, \'stuff'; cmd3 arg3
   *
   *  To an array of objects:
   *
   *      [{src: "cmd1 arg1, cmd2 arg",
   *        commands: [{src: "cmd1 arg1", name: "cmd1", args: ["arg1"]},
   *                   {src: "cmd2 arg2 'some, stuff'", name: "cmd2",
   *                    args: ["arg2", "some, 'stuff"]}]},
   *       {src: "cmd3 arg3",
   *        commands: [{src: "cmd3 arg3", name: "cmd3", args: ["arg3"]}]}]
   *
   *  Understands quoting of strings and escaping quotes
   */
  function parseActionSpec(s) {
    var actions = [];
    var action = [];
    var command = [];
    var current = '';
    var command_start = 0, action_start = 0, i = 0;
    var quote = null;

    function parseValue(s) {
      var c = s[0];
      if (c == '"' || c == "'") {
        return s.slice(1, s.length - 1);
      }
      return s;
    }

    function consume() {
      var token = current.trim();
      if (token.length) {
        command.push(parseValue(token));
      }
      current = '';
    }

    function consumeCommand() {
      if (!command.length)
        return;

      action.push({src:   s.slice(command_start, i).trim(),
                   name:  command[0],
                   args:  command.slice(1)});
      command = [];
      command_start = i + 1;
    }

    function consumeAction() {
      if (!action.length)
        return;

      actions.push({src: s.slice(action_start, i).trim(),
                    commands: action});
      action = [];
      action_start = i + 1;
    }

    for (i = 0; i < s.length; i++) {
      var c = s[i];

      if (quote) {
        if (c == '\\') {
          i++;
          current += s[i];
        } else if (c == quote) {
          current += c;
          quote = null;
        } else {
          current += c;
        }
      } else {
        if ((c == "'") || (c == '"')) {
          quote = c;
        } else if (c == " ") {
          consume();
          continue;
        } else if (c == ",") {
          consume();
          consumeCommand();
          continue;
        } else if (c == ";") {
          consume();
          consumeCommand();
          consumeAction();
          continue;
        }

        current += c;
      }
    }

    consume();
    consumeCommand();
    consumeAction();
    return actions;
  }


  /** @type {function(ActionDef, {el: !Element, event: !Event}): !Promise} */
  async function _doAction(action, payload) {
    console.debug('ACTION', action.src, payload);

    // make a copy, since we allow modification of payload in commands
    var opts = merge({line: action.src}, payload);
    var rv = null;

    for (var command of action.commands) {
      console.debug(rv !== false ? '🔵' : '🚫', 'COMMAND',
                    command.src, {prev: rv, src: action.src, el: opts.el});

      // `false` indicates that action should stop
      if (rv === false)
        return rv;
      if (rv !== undefined)
        opts.input = rv;

      opts.command = command.name;
      opts.src = command.src;
      opts = /** @type {!CommandPayload} */ (opts);

      try {
        rv = await executeCommand(command.name, command.args, opts);
      } catch(e) {
        throw merge(e, {extra: {
          command: command.src,
          action: action.src,
          element: el2str(opts.el)
        }});
      }
    }

    return rv;
  }

  /** @type {function((Element|undefined), Event, string=, Object=): (Promise|undefined)} */
  function doActions(target, e, spec, payload) {
    if (!spec) return;

    console.debug('ACTIONS', {spec: spec, event: e, payload: payload});
    var actions = parseActionSpec(spec);
    // parens indicate type cast rather than type declaration
    var mypayload = /** @type {{el: !Element, event: !Event}}
                     */ (merge({el: target, event: e}, payload));

    var result;
    for (var i = 0; i < actions.length; i++) {
      var action = actions[i];
      if (action.commands.length) {
        result = _doAction(action, mypayload);
      }
    }

    // Last result is returned
    return result;
  }

  register('[ts-action]', function(el) {
    var handler = function(/** @type {!Event} */ e) {
      if (e.detail && e.detail.event) {
        // real event to trigger this action
        e = e.detail.event;
      }
      doActions(findTarget(el), e, getattr(el, 'ts-action'), null);
    };

    if (hasattr(el, 'ts-trigger')) {
      listen(el, 'ts-trigger', handler);
    } else if (el.tagName == 'A' || el.tagName == 'BUTTON') {
      onNative(el, handler);
    } else {
      ERR('No trigger for action on element', el);
    }
  });


  /// Triggers

  /** @type {function({on: string, off: string, rootMargin: string, threshold: number}): IntersectionObserver} */
  function makeObserver(opts) {
    var on = opts.on;
    var off = opts.off;
    var threshold = opts.threshold;

    return new IntersectionObserver(function(entries, obs) {
      for (var i = 0; i < entries.length; i++) {
        var entry = entries[i];

        // isIntersecting is often `true` in FF even when it shouldn't be
        if (entry.intersectionRatio > threshold) {
          sendEvent(entry.target, on, {entry: entry});
        } else if (entry.intersectionRatio < threshold) {
          sendEvent(entry.target, off, {entry: entry});
        }
      }
    }, opts);
  }

  var visibleObs = memoize(function() {
    return makeObserver({on: 'visible',
                         off: 'invisible',
                         rootMargin: '0px',
                         threshold: 0.01});
  });

  var closebyObs = memoize(function() {
    // triggers style recalculation:
    // https://gist.github.com/paulirish/5d52fb081b3570c81e3a
    var margin = (window.innerHeight / 2 | 0) + 'px';
    return makeObserver({on: 'closeby',
                         off: 'away',
                         rootMargin: margin,
                         threshold: 0.01});
  });

  var removedObs = memoize(function() {
    return new MutationObserver(function(recs) {
      for (var i = 0; i < recs.length; i++) {
        var rec = recs[i];
        for (var j = 0; j < rec.removedNodes.length; j++) {
          var node = rec.removedNodes[j];
          sendEvent(node, 'remove', {record: rec});
        }
      }
    });
  });

  var childrenObs = memoize(function() {
    return new MutationObserver(function(recs) {
      for (var i = 0; i < recs.length; i++) {
        var rec = recs[i];
        if (rec.type == 'childList') {
          var emptyEvent = rec.target.childNodes.count ? 'notempty' : 'empty';
          sendEvent(rec.target, emptyEvent, {record: rec});
          sendEvent(rec.target, 'childrenChange', {record: rec});
        }
      }
    });
  });

  /** @type {function(CommandDef): (function(!Element, (Event|{type: string})): undefined)}*/
  function makeTriggerListener(t) {
    var delay = t.args.indexOf('delay');
    /** @type {{changed: boolean, once: boolean, delay: (number|null|undefined)}} */
    var spec = {changed: t.args.indexOf('changed') != -1,
                once:    t.args.indexOf('once') != -1,
                delay:   delay != -1 ? parseTime(t.args[delay + 1]) : null};
    return function(el, e) {
      var data = internalData(el, 'trigger', {});

      function executeTrigger() {
        // trigger should not bubble, it should be local to a node
        sendEvent(el, 'ts-trigger', {event: e}, {bubbles: false});
      }

      if (spec.once) {
        // removeMe(); // how do we do this in common case?
        if (data.once) {
          // NOTE: this just skips execution, no real listener removal happens
          return;
        }
        // this ideally triggers removal of event listener in
        // `addRemovableListener`
        data.once = true;
      }

      if (spec.changed) {
        if (data.value == formElementValue(el)) {
          return;
        }
        data.value = formElementValue(el);
      }

      if (spec.delay) {
        if (data.delay) {
          clearTimeout(data.delay);
        }
        data.delay = setTimeout(executeTrigger, spec.delay);
      } else {
        executeTrigger();
      }
    };
  }

  /** @type {function(!(Node|Window), !string, !Function, !AddEventListenerOptions=): void} */
  function addRemovableListener(el, type, handler, opts) {
    function inner(e) {
      handler(e);

      var data = internalData(el, 'trigger', {});
      // see makeTriggerListener for details
      if (data.once) {
        el.removeEventListener(type, inner, opts);
      }
    }
    listen(el, type, inner, opts);
  }

  function addListener(el, type, handler) {
    switch (type) {
    case 'load':         onidle(function() { handler(el, {type: 'load'}); });
      break;
    case 'windowScroll': addRemovableListener(window, 'scroll', function(e) { handler(el, e); }, {passive: true});
      break;
    case 'scroll':       addRemovableListener(el, 'scroll', function(e) { handler(el, e); }, {passive: true});
      break;
    case 'outside':      addRemovableListener(document, 'click', function(e) {
      if (!el.contains(e.target)) {
        handler(el, e);
      }
    }, {capture: true});
      break;

    case 'remove':
      removedObs().observe(el.parentElement, {childList: true});
      listen(el, type, function(e) { handler(el, e); });
      break;

    case 'empty':
    case 'notempty':
    case 'childrenChange':
      childrenObs().observe(el, {childList: true});
      listen(el, type, function(e) { handler(el, e); });
      break;

    case 'visible':
    case 'invisible':
      visibleObs().observe(el);
      listen(el, type, function(e) { handler(el, e); });
      break;

    case 'closeby':
    case 'away':
      closebyObs().observe(el);
      listen(el, type, function(e) { handler(el, e); });
      break;

    default:
      addRemovableListener(el, type, function(e) { handler(el, e); });
    }
  }

  /** @type {function(!Element, !CommandDef): undefined} */
  function registerTrigger(el, t) {
    var type = t.name;
    var tsTrigger = makeTriggerListener(t);
    addListener(el, type, tsTrigger);
  }

  register('[ts-trigger]', function(el) {
    var spec = getattr(el, 'ts-trigger');
    if (!spec) return;

    var triggers = parseActionSpec(spec)[0];

    triggers.commands.forEach(function(t) {
      registerTrigger(el, t);
    });
  });


  /// Start up

  /** @type {function(Event=): void} */
  function init(_e) {
    window.addEventListener('popstate', onpopstate);
    // Store HTML before going to other page
    window.addEventListener('beforeunload', storeCurrentState);
    activate(document.body);
    READY = true;
    console.debug('init done', _e);
  }

  onload(init);

  // this is done outside of `init` since that way we can restore HTML before
  // `DOMContentLoaded` has happened and browser will set correct scroll
  // location automatically
  if (window.performance?.navigation?.type == window.performance.navigation.TYPE_BACK_FORWARD) {
    // Restore HTML when user came back to page from non-pushstate destination
    onpopstate({state: "INITIAL"});
  }

  /// Public interface

  var twinspark = {
    onload:      onload,
    register:    register,
    activate:    activate,
    func:        registerCommands,
    elcrumbs:    elcrumbs,
    arity:       arity,
    data:        collectData,
    merge:       mergeParams,
    target:      findTarget, // DEPRECATED
    query:       findTarget,
    trigger:     sendEvent,
    parseAction: parseActionSpec,
    action:      doActions,
    exec:        executeCommand,
    makeReq:     makeReq,
    executeReqs: doReqBatch,
    morph:       morph,
    setERR:      (errhandler) => ERR = errhandler,
    _internal:   {DIRECTIVES: DIRECTIVES,
                  FUNCS: FUNCS,
                  init: init}
  };

  window[tsname] = twinspark;
})(window,document,'twinspark');

// Local Variables:
// outline-regexp: "[ ]*///+"
// End: