/**

 * $Id: editor_plugin_src.js 1225 2009-09-07 19:06:19Z spocke $

 *

 * @author Moxiecode

 * @copyright Copyright © 2004-2008, Moxiecode Systems AB, All rights reserved.

 */

(function() {

	var each = tinymce.each;

	tinymce.create('tinymce.plugins.PastePlugin', {

		init : function(ed, url) {

			var t = this, cb;

			t.editor = ed;

			t.url = url;

			// Setup plugin events

			t.onPreProcess = new tinymce.util.Dispatcher(t);

			t.onPostProcess = new tinymce.util.Dispatcher(t);

			// Register default handlers

			t.onPreProcess.add(t._preProcess);

			t.onPostProcess.add(t._postProcess);

			// Register optional preprocess handler

			t.onPreProcess.add(function(pl, o) {

				ed.execCallback('paste_preprocess', pl, o);

			});

			// Register optional postprocess

			t.onPostProcess.add(function(pl, o) {

				ed.execCallback('paste_postprocess', pl, o);

			});

			// This function executes the process handlers and inserts the contents

			function process(o) {

				var dom = ed.dom;

				// Execute pre process handlers

				t.onPreProcess.dispatch(t, o);

				// Create DOM structure

				o.node = dom.create('div', 0, o.content);

				// Execute post process handlers

				t.onPostProcess.dispatch(t, o);

				// Serialize content

				o.content = ed.serializer.serialize(o.node, {getInner : 1});

				//  Insert cleaned content. We need to handle insertion of contents containing block elements separately

				if (/<(p|h[1-6]|ul|ol)/.test(o.content))

					t._insertBlockContent(ed, dom, o.content);

				else

					t._insert(o.content);

			};

			// Add command for external usage

			ed.addCommand('mceInsertClipboardContent', function(u, o) {

				process(o);

			});

			// This function grabs the contents from the clipboard by adding a

			// hidden div and placing the caret inside it and after the browser paste

			// is done it grabs that contents and processes that

			function grabContent(e) {

				var n, or, rng, sel = ed.selection, dom = ed.dom, body = ed.getBody(), posY;

				if (dom.get('_mcePaste'))

					return;

				// Create container to paste into

				n = dom.add(body, 'div', {id : '_mcePaste'}, '\uFEFF');

				// If contentEditable mode we need to find out the position of the closest element

				if (body != ed.getDoc().body)

					posY = dom.getPos(ed.selection.getStart(), body).y;

				else

					posY = body.scrollTop;

				// Styles needs to be applied after the element is added to the document since WebKit will otherwise remove all styles

				dom.setStyles(n, {

					position : 'absolute',

					left : -10000,

					top : posY,

					width : 1,

					height : 1,

					overflow : 'hidden'

				});

				if (tinymce.isIE) {

					// Select the container

					rng = dom.doc.body.createTextRange();

					rng.moveToElementText(n);

					rng.execCommand('Paste');

					// Remove container

					dom.remove(n);

					// Check if the contents was changed, if it wasn't then clipboard extraction failed probably due

					// to IE security settings so we pass the junk though better than nothing right

					if (n.innerHTML === '\uFEFF') {

						ed.execCommand('mcePasteWord');

						e.preventDefault();

						return;

					}

					// Process contents

					process({content : n.innerHTML});

					// Block the real paste event

					return tinymce.dom.Event.cancel(e);

				} else {

					or = ed.selection.getRng();

					// Move caret into hidden div

					n = n.firstChild;

					rng = ed.getDoc().createRange();

					rng.setStart(n, 0);

					rng.setEnd(n, 1);

					sel.setRng(rng);

					// Wait a while and grab the pasted contents

					window.setTimeout(function() {

						var h = '', nl = dom.select('div[id=_mcePaste]');

						// WebKit will split the div into multiple ones so this will loop through then all and join them to get the whole HTML string

						each(nl, function(n) {

							h += (dom.select('> span.Apple-style-span div', n)[0] || dom.select('> span.Apple-style-span', n)[0] || n).innerHTML;

						});

						// Remove the nodes

						each(nl, function(n) {

							dom.remove(n);

						});

						// Restore the old selection

						if (or)

							sel.setRng(or);

						process({content : h});

					}, 0);

				}

			};

			// Check if we should use the new auto process method			

			if (ed.getParam('paste_auto_cleanup_on_paste', true)) {

				// Is it's Opera or older FF use key handler

				if (tinymce.isOpera || /Firefox\/2/.test(navigator.userAgent)) {

					ed.onKeyDown.add(function(ed, e) {

						if (((tinymce.isMac ? e.metaKey : e.ctrlKey) && e.keyCode == 86) || (e.shiftKey && e.keyCode == 45))

							grabContent(e);

					});

				} else {

					// Grab contents on paste event on Gecko and WebKit

					ed.onPaste.addToTop(function(ed, e) {

						return grabContent(e);

					});

				}

			}

			// Block all drag/drop events

			if (ed.getParam('paste_block_drop')) {

				ed.onInit.add(function() {

					ed.dom.bind(ed.getBody(), ['dragend', 'dragover', 'draggesture', 'dragdrop', 'drop', 'drag'], function(e) {

						e.preventDefault();

						e.stopPropagation();

						return false;

					});

				});

			}

			// Add legacy support

			t._legacySupport();

		},

		getInfo : function() {

			return {

				longname : 'Paste text/word',

				author : 'Moxiecode Systems AB',

				authorurl : 'http://tinymce.moxiecode.com',

				infourl : 'http://wiki.moxiecode.com/index.php/TinyMCE:Plugins/paste',

				version : tinymce.majorVersion + "." + tinymce.minorVersion

			};

		},

		_preProcess : function(pl, o) {

			var ed = this.editor, h = o.content, process, stripClass;

			//console.log('Before preprocess:' + o.content);

			function process(items) {

				each(items, function(v) {

					// Remove or replace

					if (v.constructor == RegExp)

						h = h.replace(v, '');

					else

						h = h.replace(v[0], v[1]);

				});

			};

			// Detect Word content and process it more aggressive

			if (/(class=\"?Mso|style=\"[^\"]*\bmso\-|w:WordDocument)/.test(h) || o.wordContent) {

				o.wordContent = true; // Mark the pasted contents as word specific content

				//console.log('Word contents detected.');

				// Process away some basic content

				process([

					/^\s*( )+/g,											// nbsp entities at the start of contents

					/(&nbsp;|<br[^>]*>)+\s*$/g									// nbsp entities at the end of contents

				]);

				if (ed.getParam('paste_convert_middot_lists', true)) {

					process([

						[/<!--\[if !supportLists\]-->/gi, '$&__MCE_ITEM__'],			// Convert supportLists to a list item marker

						[/(<span[^>]+:\s*symbol[^>]+>)/gi, '$1__MCE_ITEM__'],				// Convert symbol spans to list items

						[/(<span[^>]+mso-list:[^>]+>)/gi, '$1__MCE_ITEM__']				// Convert mso-list to item marker

					]);

				}

				process([

					/<!--[\s\S]+?-->/gi,												// Word comments

					/<\/?(img|font|meta|link|style|div|v:\w+)[^>]*>/gi,					// Remove some tags including VML content

					/<\\?\?xml[^>]*>/gi,												// XML namespace declarations

					/<\/?o:[^>]*>/gi,													// MS namespaced elements <o:tag>

					/ (id|name|language|type|on\w+|v:\w+)=\"([^\"]*)\"/gi,				// on.., class, style and language attributes with quotes

					/ (id|name|language|type|on\w+|v:\w+)=(\w+)/gi,						// on.., class, style and language attributes without quotes (IE)

					[/<(\/?)s>/gi, '<$1strike>'],										// Convert <s> into <strike> for line-though

					/<script[^>]+>[\s\S]*?<\/script>/gi,								// All scripts elements for msoShowComment for example

					[/ /g, '\u00a0']												// Replace nsbp entites to char since it's easier to handle

				]);

				// Remove all spans if no styles is to be retained

				if (!ed.getParam('paste_retain_style_properties')) {

					process([

						/<\/?(span)[^>]*>/gi

					]);

				}

			}

			// Allow for class names to be retained if desired; either all, or just the ones from Word

			// Note that the paste_strip_class_attributes: 'none, verify_css_classes: true is also a good variation.

			stripClass = ed.getParam('paste_strip_class_attributes');

			if (stripClass != 'none') {

				// Cleans everything but mceItem... classes

				function cleanClasses(str, cls) {

					var i, out = '';

					// Remove all classes

					if (stripClass == 'all')

						return '';

					cls = tinymce.explode(cls, ' ');

					for (i = cls.length - 1; i >= 0; i--) {

						// Remove Mso classes

						if (!/^(Mso)/i.test(cls[i]))

							out += (!out ? '' : ' ') + cls[i];

					}

					return ' class="' + out + '"';

				};

				process([

					[/ class=\"([^\"]*)\"/gi, cleanClasses],	// class attributes with quotes

					[/ class=(\w+)/gi, cleanClasses]			// class attributes without quotes (IE)

				]);

			}

			// Remove spans option

			if (ed.getParam('paste_remove_spans')) {

				process([

					/<\/?(span)[^>]*>/gi

				]);

			}

			//console.log('After preprocess:' + h);

			o.content = h;

		},

		/**

		 * Various post process items.

		 */

		_postProcess : function(pl, o) {

			var t = this, ed = t.editor, dom = ed.dom, styleProps;

			if (o.wordContent) {

				// Remove named anchors or TOC links

				each(dom.select('a', o.node), function(a) {

					if (!a.href || a.href.indexOf('#_Toc') != -1)

						dom.remove(a, 1);

				});

				if (t.editor.getParam('paste_convert_middot_lists', true))

					t._convertLists(pl, o);

				// Process styles

				styleProps = ed.getParam('paste_retain_style_properties'); // retained properties

				// If string property then split it

				if (tinymce.is(styleProps, 'string'))

					styleProps = tinymce.explode(styleProps);

				// Retains some style properties

				each(dom.select('*', o.node), function(el) {

					var newStyle = {}, npc = 0, i, sp, sv;

					// Store a subset of the existing styles

					if (styleProps) {

						for (i = 0; i < styleProps.length; i++) {

							sp = styleProps[i];

							sv = dom.getStyle(el, sp);

							if (sv) {

								newStyle[sp] = sv;

								npc++;

							}

						}

					}

					// Remove all of the existing styles

					dom.setAttrib(el, 'style', '');

					if (styleProps && npc > 0)

						dom.setStyles(el, newStyle); // Add back the stored subset of styles

					else // Remove empty span tags that do not have class attributes

						if (el.nodeName == 'SPAN' && !el.className)

							dom.remove(el, true);

				});

			}

			// Remove all style information or only specifically on WebKit to avoid the style bug on that browser

			if (ed.getParam("paste_remove_styles") || (ed.getParam("paste_remove_styles_if_webkit") && tinymce.isWebKit)) {

				each(dom.select('*[style]', o.node), function(el) {

					el.removeAttribute('style');

					el.removeAttribute('mce_style');

				});

			} else {

				if (tinymce.isWebKit) {

					// We need to compress the styles on WebKit since if you paste <img border="0" /> it will become <img border="0" style="... lots of junk ..." />

					// Removing the mce_style that contains the real value will force the Serializer engine to compress the styles

					each(dom.select('*', o.node), function(el) {

						el.removeAttribute('mce_style');

					});

				}

			}

		},

		/**

		 * Converts the most common bullet and number formats in Office into a real semantic UL/LI list.

		 */

		_convertLists : function(pl, o) {

			var dom = pl.editor.dom, listElm, li, lastMargin = -1, margin, levels = [], lastType, html;

			// Convert middot lists into real semantic lists

			each(dom.select('p', o.node), function(p) {

				var sib, val = '', type, html, idx, parents;

				// Get text node value at beginning of paragraph

				for (sib = p.firstChild; sib && sib.nodeType == 3; sib = sib.nextSibling)

					val += sib.nodeValue;

				val = p.innerHTML.replace(/<\/?\w+[^>]*>/gi, '').replace(/&nbsp;/g, '\u00a0');

				// Detect unordered lists look for bullets

				if (/^(__MCE_ITEM__)+[\u2022\u00b7\u00a7\u00d8o]\s*\u00a0*/.test(val))

					type = 'ul';

				// Detect ordered lists 1., a. or ixv.

				if (/^__MCE_ITEM__\s*\w+\.\s*\u00a0{2,}/.test(val))

					type = 'ol';

				// Check if node value matches the list pattern: o  

				if (type) {

					margin = parseFloat(p.style.marginLeft || 0);

					if (margin > lastMargin)

						levels.push(margin);

					if (!listElm || type != lastType) {

						listElm = dom.create(type);

						dom.insertAfter(listElm, p);

					} else {

						// Nested list element

						if (margin > lastMargin) {

							listElm = li.appendChild(dom.create(type));

						} else if (margin < lastMargin) {

							// Find parent level based on margin value

							idx = tinymce.inArray(levels, margin);

							parents = dom.getParents(listElm.parentNode, type);

							listElm = parents[parents.length - 1 - idx] || listElm;

						}

					}

					// Remove middot or number spans if they exists

					each(dom.select('span', p), function(span) {

						var html = span.innerHTML.replace(/<\/?\w+[^>]*>/gi, '');

						// Remove span with the middot or the number

						if (type == 'ul' && /^[\u2022\u00b7\u00a7\u00d8o]/.test(html))

							dom.remove(span);

						else if (/^[\s\S]*\w+\.( |\u00a0)*\s*/.test(html))

							dom.remove(span);

					});

					html = p.innerHTML;

					// Remove middot/list items

					if (type == 'ul')

						html = p.innerHTML.replace(/__MCE_ITEM__/g, '').replace(/^[\u2022\u00b7\u00a7\u00d8o]\s*( |\u00a0)+\s*/, '');

					else

						html = p.innerHTML.replace(/__MCE_ITEM__/g, '').replace(/^\s*\w+\.( |\u00a0)+\s*/, '');

					// Create li and add paragraph data into the new li

					li = listElm.appendChild(dom.create('li', 0, html));

					dom.remove(p);

					lastMargin = margin;

					lastType = type;

				} else

					listElm = lastMargin = 0; // End list element

			});

			// Remove any left over makers

			html = o.node.innerHTML;

			if (html.indexOf('__MCE_ITEM__') != -1)

				o.node.innerHTML = html.replace(/__MCE_ITEM__/g, '');

		},

		/**

		 * This method will split the current block parent and insert the contents inside the split position.

		 * This logic can be improved so text nodes at the start/end remain in the start/end block elements

		 */

		_insertBlockContent : function(ed, dom, content) {

			var parentBlock, marker, sel = ed.selection, last, elm, vp, y, elmHeight;

			function select(n) {

				var r;

				if (tinymce.isIE) {

					r = ed.getDoc().body.createTextRange();

					r.moveToElementText(n);

					r.collapse(false);

					r.select();

				} else {

					sel.select(n, 1);

					sel.collapse(false);

				}

			};

			// Insert a marker for the caret position

			this._insert('<span id="_marker">&nbsp;</span>', 1);

			marker = dom.get('_marker');

			parentBlock = dom.getParent(marker, 'p,h1,h2,h3,h4,h5,h6,ul,ol,th,td');

			// If it's a parent block but not a table cell

			if (parentBlock && !/TD|TH/.test(parentBlock.nodeName)) {

				// Split parent block

				marker = dom.split(parentBlock, marker);

				// Insert nodes before the marker

				each(dom.create('div', 0, content).childNodes, function(n) {

					last = marker.parentNode.insertBefore(n.cloneNode(true), marker);

				});

				// Move caret after marker

				select(last);

			} else {

				dom.setOuterHTML(marker, content);

				sel.select(ed.getBody(), 1);

				sel.collapse(0);

			}

			dom.remove('_marker'); // Remove marker if it's left

			// Get element, position and height

			elm = sel.getStart();

			vp = dom.getViewPort(ed.getWin());

			y = ed.dom.getPos(elm).y;

			elmHeight = elm.clientHeight;

			// Is element within viewport if not then scroll it into view

			if (y < vp.y || y + elmHeight > vp.y + vp.h)

				ed.getDoc().body.scrollTop = y < vp.y ? y : y - vp.h + 25;

		},

		/**

		 * Inserts the specified contents at the caret position.