/**
 * ==VimperatorPlugin==
 * @name lookup dictionary (Vimperator plugin)
 * @description    Lookup words from Web dictionaries, and show the results in the bottom of the window
 * @description-ja Web上の辞書を引いた結果をコマンドライン・バッファへ出力します
 * @author teramako teramako@gmail.com
 * @version 0.3
 * ==/VimperatorPlugin==
 */
(function () {

const SITE_DEFINITION = [{
    names: ['eiji[ro]'],
    url: 'http://eow.alc.co.jp/%s/UTF-8/',
    shortHelp: 'SPACE ALC (\u82F1\u8F9E\u6717 on the Web)',
    xpath: 'id("resultsList")',
    dictionary: 'en-US'
},{
    names: ['goo[dictionary]'],
    url: 'http://dictionary.goo.ne.jp/search.php?MT=%s&kind=all&mode=0&IE=UTF-8',
    shortHelp: 'goo \u8F9E\u66F8',
    xpath: 'id("incontents")/*[@class="ch04" or @class="fs14" or contains(@class,"diclst")]',
    multi: true,
    dictionary: 'en-US',
    srcEncode: 'EUC-jp',
    urlEncode: 'UTF-8'
},{
    names: ['answers'],
    url: 'http://www.answers.com/%s',
    shortHelp: 'Answers.com(\u82F1\u82F1\u8F9E\u66F8)',
    xpath: 'id("firstDs")',
    dictionary: 'en-US'
},{
    names: ['wikipe[diaja]'],
    url: 'http://ja.wikipedia.org/wiki/%s',
    shortHelp: 'Wikipedia lite(ja)',
    xpath: 'id("bodyContent")/p[1]',
    dictionary: 'ja'
},{
    names: ['wikipe[diaen]'],
    url: 'http://en.wikipedia.org/wiki/%s',
    shortHelp: 'Wikipedia lite(en)',
    xpath: 'id("bodyContent")/p[1]',
    dictionary: 'en'
}];

let (siteDef = liberator.globalVariables.lookupDictionary_site_definition) {
    if (siteDef) {
        if (siteDef instanceof String)
            siteDef = eval(siteDef);
        if (siteDef.forEach instanceof Function)
            siteDef.forEach(function (obj) { SITE_DEFINITION.push(obj); });
        else
            SITE_DEFINITION.push(siteDef);
    }
}

// class definition
function SpellChecker() {
    this.initialize.apply(this, arguments);
}
SpellChecker.prototype = {
    initialize: function () {
        const MYSPELL  = "@mozilla.org/spellchecker/myspell;1";
        const HUNSPELL = "@mozilla.org/spellchecker/hunspell;1";
        const ENGINE   = "@mozilla.org/spellchecker/engine;1";

        var spellclass = MYSPELL;
        if (HUNSPELL in Components.classes)
            spellclass = HUNSPELL;
        if (ENGINE in Components.classes)
            spellclass = ENGINE;

        this.engine = Components.classes[spellclass]
                      .createInstance(Components.interfaces.mozISpellCheckingEngine);
    },

    /**
     * @return {Array}
     */
    getDictionaryList: function () {
        var dictionaries = {};
        this.engine.getDictionaryList(dictionaries, {});
        return dictionaries.value;
    },

    /**
     * @return {String}
     */
    dictionary: function () {
        var dict;
        try { dict = this.engine.dictionary; }
        catch (e) {}
        return dict ? dict : null;
    },

    /**
     * @param {String} dict
     */
    setDictionary: function (dict) {
        var dictionaries = this.getDictionaryList();
        for (let i=0, max=dictionaries.length ; i<max ; ++i) {
            if (dictionaries[i] === dict) {
                this.engine.dictionary = dict;
                return dict;
            }
        }
        return null;
    },

    /**
     * @param {Boolean} isBeginningWith
     */
    setBeginningWith: function (isBeginningWith) {
        this.isBeginningWith = isBeginningWith;
    },

    /**
     * @param {String} spell
     * @return {Boolean}
     */
    check: function (spell) {
        return this.engine.check(spell);
    },

    /**
     * @param {String} spell
     * @return {Array}
     */
    suggest: function (spell) {
        var suggestions = {};
        this.engine.suggest(spell, suggestions, {});
        suggestions = suggestions.value;

        if (this.isBeginningWith) {
            suggestions = suggestions.filter( function (cand) {
                return (cand.toLowerCase().indexOf(spell) === 0);
            });
        }

        return suggestions;
    },
};

var spellChecker = buildSpellChecker();

SITE_DEFINITION.forEach(function (dictionary) {
    commands.addUserCommand(
        dictionary.names,
        dictionary.shortHelp,
        function (args) {
            var arg = args.string;

            var sel = (window.content.window.getSelection) ?
                window.content.window.getSelection().toString() : null;
            if (args.bang && sel) arg = sel;
            if (!arg) return;
            var url;
            if (dictionary.urlEncode) {
                let ttbu = Components.classes['@mozilla.org/intl/texttosuburi;1']
                                     .getService( Components.interfaces.nsITextToSubURI);
                url = dictionary.url.replace(/%s/g, ttbu.ConvertAndEscape(dictionary.urlEncode, arg));
            } else {
                url = dictionary.url.replace(/%s/g,encodeURIComponent(arg));
            }
            //liberator.log('URL: ' +url);
            var result;
            getHTML(url, function (str) {
                var doc = createHTMLDocument(str);
                var result = getNodeFromXPath(dictionary.xpath, doc, dictionary.multi);
                if (!result) {
                    liberator.echoerr('Nothing to show...');
                }
                var xs = new XMLSerializer();
                liberator.echo(new XMLList('<div style="white-space:normal;"><base href="' + util.escapeHTML(url) + '"/>' + xs.serializeToString( result ).replace(/<[^>]+>/g,function (all) all.toLowerCase() ) + '</div>'), true);
            }, dictionary.srcEncode ? dictionary.srcEncode : null);
        },
        {
            completer: function (arg) {
                if (!spellChecker ||
                    !dictionary.dictionary ||
                    !spellChecker.setDictionary(dictionary.dictionary))
                return [0, []];

                var suggestions = spellChecker.suggest(arg);
                var candidates = [];
                for (let i=0, max=suggestions.length ; i<max ; ++i) {
                    candidates.push([suggestions[i], 'suggest']);
                }

                if (!spellChecker.check(arg)) {
                    candidates.unshift(['', 'not exist']);
                }
                return [0, candidates];
            },
            bang: true
        }
    );
});
commands.addUserCommand(
    ['availabledictionaries'],
    'display available dictionaries',
    function () { liberator.echo('available dictionaries: ' + spellChecker.getDictionaryList()); },
    {}
);
/**
 * @param {String} url
 * @param {Function} callback
 * @param {String} charset
 */
function getHTML(url, callback, charset) {
    var xhr= new XMLHttpRequest();
    xhr.onreadystatechange = function () {
        if (xhr.readyState == 4) {
            if (xhr.status == 200) {
                callback.call(this,xhr.responseText);
            } else {
                throw new Error(xhr.statusText);
            }
        }
    };
    xhr.open('GET',url,true);
    if (charset) xhr.overrideMimeType('text/html; charset=' + charset);
    xhr.send(null);
}
/**
 * @param {String} str
 * @return {DOMDocument}
 */
function createHTMLDocument(str) {
    str = str.replace(/^[\s\S]*?<html(?:[ \t\r\n][^>]*)?>[ \t\n\r]*|[ \t\n\r]*<\/html[ \t\r\n]*>[\S\s]*$/ig,'').replace(/[\r\n]+/g,' ');
    var htmlFragment = content.document.implementation.createDocument(null,'html',null);
    var range = content.document.createRange();
    range.setStartAfter(window.content.document.body);
    htmlFragment.documentElement.appendChild(htmlFragment.importNode(range.createContextualFragment(str),true));
    return htmlFragment;
}
/**
 * @param {String} xpath XPath Expression
 * @param {DOMDocument} doc
 * @param {Boolean} isMulti
 * @return {Element}
 */
function getNodeFromXPath(xpath,doc,isMulti) {
    if (!xpath || !doc) return;
    var result;
    if (isMulti) {
        let nodesSnapshot = doc.evaluate(xpath,doc.documentElement,null,XPathResult.ORDERED_NODE_SNAPSHOT_TYPE,null);
        if (nodesSnapshot.snapshotLength == 0) return;
        result = document.createElementNS(null,'div');
        for (let i=0; i<nodesSnapshot.snapshotLength; result.appendChild(nodesSnapshot.snapshotItem(i++)));
    } else {
        let node = doc.evaluate(xpath,doc.documentElement,null,XPathResult.FIRST_ORDERED_NODE_TYPE,null);
        if (!node.singleNodeValue) return;
        result = node.singleNodeValue;
    }
    return result;
}

/**
 * @return {Object}
 */
function buildSpellChecker() {
    var enable = liberator.globalVariables.lookupDictionary_enableSuggestion;
    enable = (enable === undefined) ? true : !!parseInt(enable, 10);
    if (!enable) return;

    var spellChecker = new SpellChecker();

    var isBeginningWith = liberator.globalVariables.lookupDictionary_beginningWith;
    isBeginningWith = (isBeginningWith === undefined) ? false : !!parseInt(isBeginningWith, 10);
    spellChecker.setBeginningWith(isBeginningWith);

    return spellChecker;
}
})();

// vim: fdm=marker sw=4 ts=4 et:
p</span><span class="p">(</span><span class="s1">&#39;^.{0,&#39;</span><span class="o">+</span><span class="p">(</span><span class="nx">n</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span><span class="o">+</span><span class="s1">&#39;}$&#39;</span><span class="p">),</span><span class="kd">function</span><span class="p">(</span><span class="nx">s</span><span class="p">)</span><span class="nx">lz</span><span class="p">(</span><span class="s1">&#39;0&#39;</span><span class="o">+</span><span class="nx">s</span><span class="p">,</span><span class="nx">n</span><span class="p">));</span>

  <span class="kd">function</span> <span class="nx">dateTime</span> <span class="p">()</span> <span class="p">{</span>
    <span class="kd">with</span> <span class="p">(</span><span class="k">new</span> <span class="nb">Date</span><span class="p">())</span>
      <span class="k">return</span> <span class="nx">lz</span><span class="p">(</span><span class="nx">getFullYear</span><span class="p">(),</span> <span class="mi">4</span><span class="p">)</span> <span class="o">+</span> <span class="s1">&#39;/&#39;</span> <span class="o">+</span>
             <span class="nx">lz</span><span class="p">(</span><span class="nx">getMonth</span><span class="p">()</span> <span class="o">+</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="s1">&#39;/&#39;</span> <span class="o">+</span>
             <span class="nx">lz</span><span class="p">(</span><span class="nx">getDate</span><span class="p">(),</span> <span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="s1">&#39; &#39;</span> <span class="o">+</span>
             <span class="nx">lz</span><span class="p">(</span><span class="nx">getHours</span><span class="p">(),</span> <span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="s1">&#39;:&#39;</span> <span class="o">+</span>
             <span class="nx">lz</span><span class="p">(</span><span class="nx">getMinutes</span><span class="p">(),</span> <span class="mi">2</span><span class="p">);</span>
  <span class="p">}</span>

  <span class="kd">function</span> <span class="nx">filepath</span> <span class="p">()</span> <span class="p">{</span>
    <span class="kd">let</span> <span class="nx">result</span> <span class="o">=</span> <span class="nx">Cc</span><span class="p">[</span><span class="s2">&#34;@mozilla.org/file/local;1&#34;</span><span class="p">].</span><span class="nx">createInstance</span><span class="p">(</span><span class="nx">Ci</span><span class="p">.</span><span class="nx">nsILocalFile</span><span class="p">);</span>
    <span class="nx">result</span><span class="p">.</span><span class="nx">initWithPath</span><span class="p">(</span><span class="nx">localfilepath</span><span class="p">);</span>
    <span class="k">return</span> <span class="nx">result</span><span class="p">;</span>
  <span class="p">}</span>

  <span class="kd">function</span> <span class="nx">puts</span> <span class="p">(</span><span class="nx">line</span><span class="p">)</span> <span class="p">{</span>
    <span class="nx">line</span> <span class="o">=</span> <span class="nx">dateTime</span><span class="p">()</span> <span class="o">+</span> <span class="s2">&#34;\t&#34;</span> <span class="o">+</span> <span class="nx">line</span> <span class="o">+</span> <span class="s2">&#34;\n&#34;</span><span class="p">;</span>
    <span class="kd">let</span> <span class="nx">out</span> <span class="o">=</span> <span class="nx">Cc</span><span class="p">[</span><span class="s2">&#34;@mozilla.org/network/file-output-stream;1&#34;</span><span class="p">].</span><span class="nx">createInstance</span><span class="p">(</span><span class="nx">Ci</span><span class="p">.</span><span class="nx">nsIFileOutputStream</span><span class="p">);</span>
    <span class="kd">let</span> <span class="nx">conv</span> <span class="o">=</span> <span class="nx">Cc</span><span class="p">[</span><span class="s1">&#39;@mozilla.org/intl/converter-output-stream;1&#39;</span><span class="p">].</span>
                            <span class="nx">createInstance</span><span class="p">(</span><span class="nx">Ci</span><span class="p">.</span><span class="nx">nsIConverterOutputStream</span><span class="p">);</span>
    <span class="nx">out</span><span class="p">.</span><span class="nx">init</span><span class="p">(</span><span class="nx">filepath</span><span class="p">(),</span> <span class="mh">0x02</span> <span class="o">|</span> <span class="mh">0x10</span> <span class="o">|</span> <span class="mh">0x08</span><span class="p">,</span> <span class="mi">0664</span><span class="p">,</span> <span class="mi">0</span><span class="p">);</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">init</span><span class="p">(</span><span class="nx">out</span><span class="p">,</span> <span class="nx">charset</span><span class="p">,</span> <span class="nx">line</span><span class="p">.</span><span class="nx">length</span><span class="p">,</span>
              <span class="nx">Components</span><span class="p">.</span><span class="nx">interfaces</span><span class="p">.</span><span class="nx">nsIConverterInputStream</span><span class="p">.</span><span class="nx">DEFAULT_REPLACEMENT_CHARACTER</span><span class="p">);</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">writeString</span><span class="p">(</span><span class="nx">line</span><span class="p">);</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">close</span><span class="p">();</span>
    <span class="nx">out</span><span class="p">.</span><span class="nx">close</span><span class="p">();</span>
  <span class="p">}</span>

  <span class="kd">function</span> <span class="nx">gets</span> <span class="p">()</span> <span class="p">{</span>
    <span class="kd">let</span> <span class="nx">file</span> <span class="o">=</span> <span class="nx">Cc</span><span class="p">[</span><span class="s1">&#39;@mozilla.org/network/file-input-stream;1&#39;</span><span class="p">].</span><span class="nx">createInstance</span><span class="p">(</span><span class="nx">Ci</span><span class="p">.</span><span class="nx">nsIFileInputStream</span><span class="p">);</span>
    <span class="nx">file</span><span class="p">.</span><span class="nx">init</span><span class="p">(</span><span class="nx">filepath</span><span class="p">(),</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="kc">false</span><span class="p">);</span>
    <span class="kd">let</span> <span class="nx">conv</span> <span class="o">=</span> <span class="nx">Cc</span><span class="p">[</span><span class="s1">&#39;@mozilla.org/intl/converter-input-stream;1&#39;</span><span class="p">].</span><span class="nx">createInstance</span><span class="p">(</span><span class="nx">Ci</span><span class="p">.</span><span class="nx">nsIConverterInputStream</span><span class="p">);</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">init</span><span class="p">(</span><span class="nx">file</span><span class="p">,</span> <span class="nx">charset</span><span class="p">,</span> <span class="nx">file</span><span class="p">.</span><span class="nx">available</span><span class="p">(),</span> <span class="nx">conv</span><span class="p">.</span><span class="nx">DEFAULT_REPLACEMENT_CHARACTER</span><span class="p">);</span>
    <span class="kd">let</span> <span class="nx">result</span> <span class="o">=</span> <span class="p">{};</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">readString</span><span class="p">(</span><span class="nx">file</span><span class="p">.</span><span class="nx">available</span><span class="p">(),</span> <span class="nx">result</span><span class="p">);</span>
    <span class="nx">conv</span><span class="p">.</span><span class="nx">close</span><span class="p">();</span>
    <span class="nx">file</span><span class="p">.</span><span class="nx">close</span><span class="p">();</span>
    <span class="k">return</span> <span class="nx">result</span><span class="p">.</span><span class="nx">value</span><span class="p">;</span>
  <span class="p">}</span>

  <span class="nx">commands</span><span class="p">.</span><span class="nx">addUserCommand</span><span class="p">(</span>
    <span class="p">[</span><span class="s1">&#39;memo&#39;</span><span class="p">],</span>
    <span class="s1">&#39;Write memo&#39;</span><span class="p">,</span>
    <span class="kd">function</span> <span class="p">(</span><span class="nx">arg</span><span class="p">)</span> <span class="p">{</span>
      <span class="k">if</span> <span class="p">(</span><span class="nx">arg</span><span class="p">.</span><span class="nx">string</span><span class="p">)</span> <span class="p">{</span>
        <span class="nx">puts</span><span class="p">(</span><span class="nx">arg</span><span class="p">.</span><span class="nx">string</span><span class="p">);</span>
      <span class="p">}</span> <span class="k">else</span> <span class="p">{</span>
        <span class="nx">liberator</span><span class="p">.</span><span class="nx">echo</span><span class="p">(</span><span class="nx">gets</span><span class="p">());</span>
      <span class="p">}</span>
    <span class="p">}</span>
  <span class="p">);</span>

<span class="p">})();</span>
</pre>