/**

 * 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);

					t.menuItems = {};

					each(t.languages, function(v, k) {

						var o = {icon : 1}, mi;

						o.onclick = function() {

							if (v == t.selectedLang) {

								return;

							}

							t._updateMenu(mi);

							t.selectedLang = v;

						};

						o.title = k;

						mi = m.add(o);

						mi.setSelected(v == t.selectedLang);

						t.menuItems[v] = mi;

						if (v == t.selectedLang)

							t.selectedItem = mi;

					});

				});

				return c;

			}

		},

		setLanguage: function(lang) {

			var t = this;

			if (lang == t.selectedLang) {

				// allowed

				return;

			}

			if (tinymce.grep(t.languages, function(v) { return v === lang; }).length === 0) {

				throw "Unknown language: " + lang;

			}

			t.selectedLang = lang;

			// if the menu has been shown, update it as well

			if (t.menuItems) {

				t._updateMenu(t.menuItems[lang]);

			}

			if (t.active) {

				// clear error in the old language.

				t._done();

				// Don't immediately block the UI to check spelling in the new language, this is an API not a user action.

			}

		},

		// Internal functions

		_updateMenu: function(mi) {

			mi.setSelected(1);

			this.selectedItem.setSelected(0);

			this.selectedItem = mi;

		},

		_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, r = se.getRng(true);

			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.setRng(r);

		},

		_markWords : function(wl) {

			var ed = this.editor, dom = ed.dom, doc = ed.getDoc(), se = ed.selection, r = se.getRng(true), 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;

				rx.lastIndex = 0;

				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

					// @TODO: I'm not sure that both are still issues on IE9.

					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.setRng(r);

		},

		_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);