/**
 * editor_plugin_src.js
 *
 * Copyright 2009, Moxiecode Systems AB
 * Released under LGPL License.
 *
 * License: http://tinymce.moxiecode.com/license
 * Contributing: http://tinymce.moxiecode.com/contributing
 */

(function () {
    var JSONRequest = tinymce.util.JSONRequest, each = tinymce.each, DOM = tinymce.DOM;

    tinymce.create('tinymce.plugins.SpellcheckerPlugin', {
        getInfo: function () {
            return {
                longname: 'Spellchecker',
                author: 'Moxiecode Systems AB',
                authorurl: 'http://tinymce.moxiecode.com',
                infourl: 'http://wiki.moxiecode.com/index.php/TinyMCE:Plugins/spellchecker',
                version: tinymce.majorVersion + "." + tinymce.minorVersion
            };
        },

        init: function (ed, url) {
            var t = this, cm;

            t.url = url;
            t.editor = ed;
            t.rpcUrl = ed.getParam("spellchecker_rpc_url", "{backend}");

            if (t.rpcUrl == '{backend}') {
                // Sniff if the browser supports native spellchecking (Don't know of a better way)
                if (tinymce.isIE)
                    return;

                t.hasSupport = true;

                // Disable the context menu when spellchecking is active
                ed.onContextMenu.addToTop(function (ed, e) {
                    if (t.active)
                        return false;
                });
            }

            // Register commands
            ed.addCommand('mceSpellCheck', function () {
                if (t.rpcUrl == '{backend}') {
                    // Enable/disable native spellchecker
                    t.editor.getBody().spellcheck = t.active = !t.active;
                    return;
                }

                if (!t.active) {
                    ed.setProgressState(1);
                    t._sendRPC('checkWords', [t.selectedLang, t._getWords()], function (r) {
                        if (r.length > 0) {
                            t.active = 1;
                            t._markWords(r);
                            ed.setProgressState(0);
                            ed.nodeChanged();
                        } else {
                            ed.setProgressState(0);

                            if (ed.getParam('spellchecker_report_no_misspellings', true))
                                ed.windowManager.alert('spellchecker.no_mpell');
                        }
                    });
                } else
                    t._done();
            });

            if (ed.settings.content_css !== false)
                ed.contentCSS.push(url + '/css/content.css');

            ed.onClick.add(t._showMenu, t);
            ed.onContextMenu.add(t._showMenu, t);
            ed.onBeforeGetContent.add(function () {
                if (t.active)
                    t._removeWords();
            });

            ed.onNodeChange.add(function (ed, cm) {
                cm.setActive('spellchecker', t.active);
            });

            ed.onSetContent.add(function () {
                t._done();
            });

            ed.onBeforeGetContent.add(function () {
                t._done();
            });

            ed.onBeforeExecCommand.add(function (ed, cmd) {
                if (cmd == 'mceFullScreen')
                    t._done();
            });

            // Find selected language
            t.languages = {};
            each(ed.getParam('spellchecker_languages', '+English=en,Danish=da,Dutch=nl,Finnish=fi,French=fr,German=de,Italian=it,Polish=pl,Portuguese=pt,Spanish=es,Swedish=sv', 'hash'), function (v, k) {
                if (k.indexOf('+') === 0) {
                    k = k.substring(1);
                    t.selectedLang = v;
                }

                t.languages[k] = v;
            });
        },

        createControl: function (n, cm) {
            var t = this, c, ed = t.editor;

            if (n == 'spellchecker') {
                // Use basic button if we use the native spellchecker
                if (t.rpcUrl == '{backend}') {
                    // Create simple toggle button if we have native support
                    if (t.hasSupport)
                        c = cm.createButton(n, {title: 'spellchecker.desc', cmd: 'mceSpellCheck', scope: t});

                    return c;
                }

                c = cm.createSplitButton(n, {title: 'spellchecker.desc', cmd: 'mceSpellCheck', scope: t});

                c.onRenderMenu.add(function (c, m) {
                    m.add({title: 'spellchecker.langs', 'class': 'mceMenuItemTitle'}).setDisabled(1);
                    each(t.languages, function (v, k) {
                        var o = {icon: 1}, mi;

                        o.onclick = function () {
                            if (v == t.selectedLang) {
                                return;
                            }
                            mi.setSelected(1);
                            t.selectedItem.setSelected(0);
                            t.selectedItem = mi;
                            t.selectedLang = v;
                        };

                        o.title = k;
                        mi = m.add(o);
                        mi.setSelected(v == t.selectedLang);

                        if (v == t.selectedLang)
                            t.selectedItem = mi;
                    })
                });

                return c;
            }
        },

        // Internal functions

        _walk: function (n, f) {
            var d = this.editor.getDoc(), w;

            if (d.createTreeWalker) {
                w = d.createTreeWalker(n, NodeFilter.SHOW_TEXT, null, false);

                while ((n = w.nextNode()) != null)
                    f.call(this, n);
            } else
                tinymce.walk(n, f, 'childNodes');
        },

        _getSeparators: function () {
            var re = '', i, str = this.editor.getParam('spellchecker_word_separator_chars', '\\s!"#$%&()*+,-./:;<=>?@[\]^_{|}����������������\u201d\u201c');

            // Build word separator regexp
            for (i = 0; i < str.length; i++)
                re += '\\' + str.charAt(i);

            return re;
        },

        _getWords: function () {
            var ed = this.editor, wl = [], tx = '', lo = {}, rawWords = [];

            // Get area text
            this._walk(ed.getBody(), function (n) {
                if (n.nodeType == 3)
                    tx += n.nodeValue + ' ';
            });

            // split the text up into individual words
            if (ed.getParam('spellchecker_word_pattern')) {
                // look for words that match the pattern
                rawWords = tx.match('(' + ed.getParam('spellchecker_word_pattern') + ')', 'gi');
            } else {
                // Split words by separator
                tx = tx.replace(new RegExp('([0-9]|[' + this._getSeparators() + '])', 'g'), ' ');
                tx = tinymce.trim(tx.replace(/(\s+)/g, ' '));
                rawWords = tx.split(' ');
            }

            // Build word array and remove duplicates
            each(rawWords, function (v) {
                if (!lo[v]) {
                    wl.push(v);
                    lo[v] = 1;
                }
            });

            return wl;
        },

        _removeWords: function (w) {
            var ed = this.editor, dom = ed.dom, se = ed.selection, b = se.getBookmark();

            each(dom.select('span').reverse(), function (n) {
                if (n && (dom.hasClass(n, 'mceItemHiddenSpellWord') || dom.hasClass(n, 'mceItemHidden'))) {
                    if (!w || dom.decode(n.innerHTML) == w)
                        dom.remove(n, 1);
                }
            });

            se.moveToBookmark(b);
        },

        _markWords: function (wl) {
            var ed = this.editor, dom = ed.dom, doc = ed.getDoc(), se = ed.selection, b = se.getBookmark(), nl = [],
                w = wl.join('|'), re = this._getSeparators(), rx = new RegExp('(^|[' + re + '])(' + w + ')(?=[' + re + ']|$)', 'g');

            // Collect all text nodes
            this._walk(ed.getBody(), function (n) {
                if (n.nodeType == 3) {
                    nl.push(n);
                }
            });

            // Wrap incorrect words in spans
            each(nl, function (n) {
                var node, elem, txt, pos, v = n.nodeValue;

                if (rx.test(v)) {
                    // Encode the content
                    v = dom.encode(v);
                    // Create container element
                    elem = dom.create('span', {'class': 'mceItemHidden'});

                    // Following code fixes IE issues by creating text nodes
                    // using DOM methods instead of innerHTML.
                    // Bug #3124: <PRE> elements content is broken after spellchecking.
                    // Bug #1408: Preceding whitespace characters are removed
                    if (tinymce.isIE) {
                        // Enclose mispelled words with temporal tag
                        v = v.replace(rx, '$1<mcespell>$2</mcespell>');
                        // Loop over the content finding mispelled words
                        while ((pos = v.indexOf('<mcespell>')) != -1) {
                            // Add text node for the content before the word
                            txt = v.substring(0, pos);
                            if (txt.length) {
                                node = doc.createTextNode(dom.decode(txt));
                                elem.appendChild(node);
                            }
                            v = v.substring(pos + 10);
                            pos = v.indexOf('</mcespell>');
                            txt = v.substring(0, pos);
                            v = v.substring(pos + 11);
                            // Add span element for the word
                            elem.appendChild(dom.create('span', {'class': 'mceItemHiddenSpellWord'}, txt));
                        }
                        // Add text node for the rest of the content
                        if (v.length) {
                            node = doc.createTextNode(dom.decode(v));
                            elem.appendChild(node);
                        }
                    } else {
                        // Other browsers preserve whitespace characters on innerHTML usage
                        elem.innerHTML = v.replace(rx, '$1<span class="mceItemHiddenSpellWord">$2</span>');
                    }

                    // Finally, replace the node with the container
                    dom.replace(elem, n);
                }
            });

            se.moveToBookmark(b);
        },

        _showMenu: function (ed, e) {
            var t = this, ed = t.editor, m = t._menu, p1, dom = ed.dom, vp = dom.getViewPort(ed.getWin()), wordSpan = e.target;

            e = 0; // Fixes IE memory leak

            if (!m) {
                m = ed.controlManager.createDropMenu('spellcheckermenu', {'class': 'mceNoIcons'});
                t._menu = m;
            }

            if (dom.hasClass(wordSpan, 'mceItemHiddenSpellWord')) {
                m.removeAll();
                m.add({title: 'spellchecker.wait', 'class': 'mceMenuItemTitle'}).setDisabled(1);

                t._sendRPC('getSuggestions', [t.selectedLang, dom.decode(wordSpan.innerHTML)], function (r) {
                    var ignoreRpc;

                    m.removeAll();

                    if (r.length > 0) {
                        m.add({title: 'spellchecker.sug', 'class': 'mceMenuItemTitle'}).setDisabled(1);
                        each(r, function (v) {
                            m.add({
                                title: v, onclick: function () {
                                    dom.replace(ed.getDoc().createTextNode(v), wordSpan);
                                    t._checkDone();
                                }
                            });
                        });

                        m.addSeparator();
                    } else
                        m.add({title: 'spellchecker.no_sug', 'class': 'mceMenuItemTitle'}).setDisabled(1);

                    ignoreRpc = t.editor.getParam("spellchecker_enable_ignore_rpc", '');
                    m.add({
                        title: 'spellchecker.ignore_word',
                        onclick: function () {
                            var word = wordSpan.innerHTML;

                            dom.remove(wordSpan, 1);
                            t._checkDone();

                            // tell the server if we need to
                            if (ignoreRpc) {
                                ed.setProgressState(1);
                                t._sendRPC('ignoreWord', [t.selectedLang, word], function (r) {
                                    ed.setProgressState(0);
                                });
                            }
                        }
                    });

                    m.add({
                        title: 'spellchecker.ignore_words',
                        onclick: function () {
                            var word = wordSpan.innerHTML;

                            t._removeWords(dom.decode(word));
                            t._checkDone();

                            // tell the server if we need to
                            if (ignoreRpc) {
                                ed.setProgressState(1);
                                t._sendRPC('ignoreWords', [t.selectedLang, word], function (r) {
                                    ed.setProgressState(0);
                                });
                            }
                        }
                    });

                    if (t.editor.getParam("spellchecker_enable_learn_rpc")) {
                        m.add({
                            title: 'spellchecker.learn_word',
                            onclick: function () {
                                var word = wordSpan.innerHTML;

                                dom.remove(wordSpan, 1);
                                t._checkDone();

                                ed.setProgressState(1);
                                t._sendRPC('learnWord', [t.selectedLang, word], function (r) {
                                    ed.setProgressState(0);
                                });
                            }
                        });
                    }

                    m.update();
                });

                p1 = DOM.getPos(ed.getContentAreaContainer());
                m.settings.offset_x = p1.x;
                m.settings.offset_y = p1.y;

                ed.selection.select(wordSpan);
                p1 = dom.getPos(wordSpan);
                m.showMenu(p1.x, p1.y + wordSpan.offsetHeight - vp.y);

                return tinymce.dom.Event.cancel(e);
            } else
                m.hideMenu();
        },

        _checkDone: function () {
            var t = this, ed = t.editor, dom = ed.dom, o;

            each(dom.select('span'), function (n) {
                if (n && dom.hasClass(n, 'mceItemHiddenSpellWord')) {
                    o = true;
                    return false;
                }
            });

            if (!o)
                t._done();
        },

        _done: function () {
            var t = this, la = t.active;

            if (t.active) {
                t.active = 0;
                t._removeWords();

                if (t._menu)
                    t._menu.hideMenu();

                if (la)
                    t.editor.nodeChanged();
            }
        },

        _sendRPC: function (m, p, cb) {
            var t = this;

            JSONRequest.sendRPC({
                url: t.rpcUrl,
                method: m,
                params: p,
                success: cb,
                error: function (e, x) {
                    t.editor.setProgressState(0);
                    t.editor.windowManager.alert(e.errstr || ('Error response: ' + x.responseText));
                }
            });
        }
    });

    // Register plugin
    tinymce.PluginManager.add('spellchecker', tinymce.plugins.SpellcheckerPlugin);
})();
