1 files changed, 150 insertions, 0 deletions
diff --git a/lo.js b/lo.js
new file mode 100644
index 0000000..24b4102
--- /dev/null
+++ b/lo.js
@@ -0,0 +1,150 @@
+// ==VimperatorPlugin==
+// @name           Link Opener
+// @description    Open filtered link(s).
+// @description-ja リンクをフィルタリングして開く
+// @license        Creative Commons 2.1 (Attribution + Share Alike)
+// @version        1.1
+// ==/VimperatorPlugin==
+//
+// Usage:
+//    :fo[pen][!] <REGEXP> [-i <INTERVAL_SEC>] [-w <WHERE>]
+//      Open filtered links by regexp.
+//      When used "!", open links in foreground.
+//
+//    :lo[pen][!] URI [-w <WHERE>]
+//      Open URI
+//
+// Usage-ja:
+//    :fo[pen][!] <ミゲ文字列> [-i <INTERVAL_SEC>] [-w <WHERE>]
+//    :fo[pen][!] /<正規表現> [-i <INTERVAL_SEC>] [-w <WHERE>]
+//      ミゲ文字列か正規表現でフィルタされたリンクを開く
+//
+//    :lo[pen][!] URI [-w <WHERE>]
+//      URI を開く
+//
+//    ちなみに Migemo はなくても動きます。
+//    無い場合は、 "/" 要らずで正規表現オンリーになります。
+//
+// Variables:
+//    let g:fopen_default_interval="<INTERVAL_SEC>"
+
+
+(function () { try {
+
+  let migemo = window.XMigemoCore;
+
+  function isHttpLink (link) {
+    return link.href && link.href.indexOf('http') == 0;
+  }
+
+  function lmatch (re, link) {
+    return isHttpLink(link) && (link.href.match(re) || link.textContent.toString().match(re));
+  }
+
+  function makeRegExp (str) {
+    return migemo ? (str.indexOf('/') == 0) ? new RegExp(str.slice(1), 'i')
+                                            : migemo.getRegExp(str)
+                  : new RegExp(str, 'i');
+  }
+
+  function filteredLinks (word) {
+    if (word.match(/^\s*$/))
+      return [];
+    let re = makeRegExp(word);
+    return [it for each (it in content.document.links) if (lmatch(re, it))];
+  }
+
+  function charToWhere (str, fail) {
+    const table = {
+      f: NEW_TAB,
+      t: NEW_TAB,
+      n: NEW_TAB,
+      b: NEW_BACKGROUND_TAB,
+      c: CURRENT_TAB,
+      w: NEW_WINDOW,
+    };
+    return (str && table[str.charAt(0).toLowerCase()]) || fail;
+  }
+
+  const WHERE_COMPLETIONS = ['f', 't', 'n', 'b', 'c', 'w'];
+
+
+  let (foihandle) {
+
+    liberator.commands.addUserCommand(
+      ['fo[pen]', 'filteropen'],
+      'Filtered open',
+      function (opts, bang) {
+        let where = charToWhere(opts['-where'], bang ? NEW_TAB : NEW_BACKGROUND_TAB);
+        let [i, links] = [1, filteredLinks(opts.arguments.join(''))];
+        if (!links.length)
+          return;
+        open(links[0].href, where);
+        if (links.length <= 1)
+          return;
+        let interval = (opts['-interval'] || liberator.globalVariables.fopen_default_interval || 1) * 1000;
+        foihandle = setInterval(function () {
+          try {
+            open(links[i].href, where);
+            if ((++i) >= links.length)
+              clearInterval(foihandle);
+          } catch (e) {
+            clearInterval(foihandle);
+          }
+        }, interval);
+      },
+      {
+        bang: true,
+        options: [
+          [['-interval', '-i'], liberator.commands.OPTION_INT],
+          [['-where', '-w'], liberator.commands.OPTION_STRING],
+        ],
+        completer: function (word) {
+          let links = filteredLinks(word);
+          return [0, [[it.href, it.textContent] for each (it in links)]];
+        },
+      }
+    );
+
+    liberator.commands.addUserCommand(
+      ['stopfilteropen', 'stopfo[pen]'],
+      'Stop filtered open',
+      function () {
+        clearInterval(foihandle);
+      }
+    );
+
+  }
+
+  let (
+    lolinks = [],
+    looptions = [ [['-where', '-w'], liberator.commands.OPTION_STRING, null, WHERE_COMPLETIONS] ]
+  ) {
+
+    liberator.commands.addUserCommand(
+      ['lo[pen]', 'linkopen'],
+      'Filtered open',
+      function (opts, bang) {
+        let where = charToWhere(opts['-where'], bang ? NEW_TAB : CURRENT_TAB);
+        let arg = opts.arguments[0];
+        let m = arg.match(/^\d+(?=,)/);
+        if (m)
+          liberator.buffer.followLink(lolinks[parseInt(m[0], 10)], where);
+      },
+      {
+        options: looptions,
+        bang: true,
+        completer: function (word) {
+          if (!word || word.match(/\s|\d+,/))
+            return [];
+          lolinks = filteredLinks(word);
+          return [0, [[i + ',' + lolinks[i].href, lolinks[i].textContent] for (i in lolinks || [])]];
+        }
+      }
+    );
+
+  }
+
+} catch (e) { log(e); }})();
+
+// vim:sw=2 ts=2 et: