/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
/*
 * Wicket Ajax Autocomplete
 *
 * @author Janne Hietamäki
 */

if (typeof (Wicket) == "undefined")
	Wicket = {};

Wicket.CustomAutoCompleteSettings = {
	enterHidesWithNoSelection : true
};

Wicket.CustomAutoComplete = function(elementId, callbackUrl, cfg) {
	var KEY_TAB = 9;
	var KEY_ENTER = 13;
	var KEY_ESC = 27;
	var KEY_LEFT = 37;
	var KEY_UP = 38;
	var KEY_RIGHT = 39;
	var KEY_DOWN = 40;
	var KEY_SHIFT = 16;
	var KEY_CTRL = 17;
	var KEY_ALT = 18;

	var selected = -1; // index of the currently selected item
	var elementCount = 0; // number of items on the auto complete list
	var visible = 0; // is the list visible
	var mouseactive = 0; // is mouse selection active
	var hidingAutocomplete = 0; // are we hiding the autocomplete list

	// pointers of the browser events
	var objonkeydown;
	var objonblur;
	var objonkeyup;
	var objonkeypress;
	var objonchange;
	var objonchangeoriginal;

	// holds the eventual margins, padding, etc. of the menu container.
	// it is computed when the menu is first rendered, and then reused.
	var initialDelta = -1;

	// holds a throttler, for not sending many requests if the user types
	// too quickly.
	var localThrottler = new Wicket.Throttler(true);
	var throttleDelay = 25;

	function initialize() {
		// Remove the autocompletion menu if still present from
		// a previous call. This is required to properly register
		// the mouse event handler again (using the new stateful 'mouseactive'
		// variable which just gets created)
		var choiceDiv = document.getElementById(getMenuId());
		if (choiceDiv != null) {
			choiceDiv.parentNode.parentNode.removeChild(choiceDiv.parentNode);
		}

		var obj = wicketGet(elementId);

		objonkeydown = obj.onkeydown;
		objonblur = obj.onblur;
		objonkeyup = obj.onkeyup;
		objonkeypress = obj.onkeypress;

		// WICKET-1280
		objonchangeoriginal = obj.onchange;
		obj.onchange = function(event) {
			if (mouseactive == 1)
				return false;
			if (typeof objonchangeoriginal == "function")
				objonchangeoriginal();
		}
		objonchange = obj.onchange;

		obj.onblur = function(event) {
			if (mouseactive == 1) {
				Wicket.$(elementId).focus();
				return killEvent(event);
			}
			hideAutoComplete();
			if (typeof objonblur == "function")
				objonblur();
		}

		obj.onkeydown = function(event) {
			switch (wicketKeyCode(Wicket.fixEvent(event))) {
			case KEY_UP:
				if (selected > -1)
					selected--;
				if (selected == -1) {
					hideAutoComplete();
				} else {
					render();
				}
				if (Wicket.Browser.isSafari())
					return killEvent(event);
				break;
			case KEY_DOWN:
				if (selected < elementCount - 1) {
					selected++;
				}
				if (visible == 0) {
					updateChoices();
				} else {
					render();
					showAutoComplete();
				}
				if (Wicket.Browser.isSafari())
					return killEvent(event);
				break;
			case KEY_ESC:
				hideAutoComplete();
				return killEvent(event);
				break;
			case KEY_ENTER:
				if (selected > -1) {
					obj.value = getSelectedValue();
					hideAutoComplete();
					hidingAutocomplete = 1;
				} else if (Wicket.CustomAutoCompleteSettings.enterHidesWithNoSelection == true) {
					hideAutoComplete();
					// hidingAutocomplete=1; WARN: If we uncomment this flag,
					// the event gets killed!!
				}
				if (typeof objonchange == "function")
					objonchange();
				mouseactive = 0;
				if (typeof objonkeydown == "function")
					objonkeydown();

				return true;
				break;
			default:
			}
		}

		obj.onkeyup = function(event) {
			switch (wicketKeyCode(Wicket.fixEvent(event))) {
			case KEY_ENTER:
				return killEvent(event);
			case KEY_UP:
			case KEY_DOWN:
			case KEY_ESC:
			case KEY_TAB:
			case KEY_RIGHT:
			case KEY_LEFT:
			case KEY_SHIFT:
			case KEY_ALT:
			case KEY_CTRL:
				break;
			default:
				updateChoices();
			}
			if (typeof objonkeyup == "function")
				objonkeyup();
			return null;
		}

		obj.onkeypress = function(event) {
			if (wicketKeyCode(Wicket.fixEvent(event)) == KEY_ENTER) {
				if (selected > -1 || hidingAutocomplete == 1) {
					hidingAutocomplete = 0;
					return killEvent(event);
				}
			}
			if (typeof objonkeypress == "function")
				objonkeypress();
		}
	}

	function getMenuId() {
		return elementId + "-autocomplete";
	}

	function getAutocompleteMenu() {
		var choiceDiv = document.getElementById(getMenuId());
		if (choiceDiv == null) {
			var container = document.createElement("div");
			container.className = "wicket-aa-container";
			var inputContainer = document.getElementById(elementId).parentNode;
			
			if (!isAwfulBrowser()) {
				inputContainer.appendChild(container);
			} else {
				inputContainer.style.position='static';
				document.body.appendChild(container);
			}
			container.style.display = "none";
			container.style.overflow = "auto";
			container.style.position = "absolute";
			container.id = getMenuId() + "-container";

			container.show = function() {
				wicketShow(this.id)
			};
			container.hide = function() {
				wicketHide(this.id)
			};

			choiceDiv = document.createElement("div");
			container.appendChild(choiceDiv);
			choiceDiv.id = getMenuId();
			choiceDiv.className = "wicket-aa";
			
			// WICKET-1350/WICKET-1351
			container.onmouseout = function() {
				mouseactive = 0;
			};
			container.onmousemove = function() {
				mouseactive = 1;
			};
		}

		return choiceDiv;
	}

	function getAutocompleteContainer() {
		return getAutocompleteMenu().parentNode;
	}

	function getAutocompleteContainerContainer() {
		return getAutocompleteMenu().parentNode.parentNode;
	}
	
	function killEvent(event) {
		if (!event)
			event = window.event;
		if (!event)
			return false;
		if (event.cancelBubble != null) {
			event.cancelBubble = true;
		}
		if (event.returnValue) {
			event.returnValue = false;
		}
		if (event.stopPropagation) {
			event.stopPropagation();
		}
		if (event.preventDefault) {
			event.preventDefault();
		}
		return false;
	}

	function updateChoices() {
		if (cfg.preselect == true) {
			selected = 0;
		} else {
			selected = -1;
		}
		localThrottler
				.throttle(getMenuId(), throttleDelay, actualUpdateChoices);
	}

	function actualUpdateChoices() {
		var value = wicketGet(elementId).value;
		var request = new Wicket.Ajax.Request(callbackUrl + "&q="
				+ processValue(value), doUpdateChoices, false, true, false,
				"wicket-autocomplete|d");
		request.get();
	}

	function processValue(param) {
		return (encodeURIComponent) ? encodeURIComponent(param) : escape(param);
	}

	function showAutoComplete() {
		
		var position = getPosition(wicketGet(elementId));
		var container = getAutocompleteContainer();
		var input = wicketGet(elementId);
		var index = getOffsetParentZIndex(elementId);
		container.show();

		if (!isNaN(new Number(index))) {
			container.style.zIndex = (new Number(index) + 1);
		}

		/* container.style.zIndex=(Number(index)!=Number.NaN?Number(index)+1:index); */

		container.style.left = position[0] + 'px'
		if (!isAwfulBrowser()) {
			container.style.top = (input.parentNode.offsetHeight + position[1]) + 'px';
			container.style.width = input.parentNode.offsetWidth + 'px';
		} else {
			container.style.top = (input.offsetHeight + position[1]) + 'px';
			container.style.width = input.offsetWidth + 'px';
		}
		visible = 1;
		hideShowCovered();
		jQuery('.wicket-aa').click(function up(){
      		jQuery('#loadImageBase').show();
		});		
	}

	function hideAutoComplete() {
		visible = 0;
		selected = -1;
		if (getAutocompleteContainer()) {
			getAutocompleteContainer().hide();
			hideShowCovered();
		}
	}

	function getPosition(obj) {
		var leftPosition = 0;
		var topPosition = 2;
		if (!isAwfulBrowser()) {
			topPosition = 2;
		} else {
			do {
				topPosition += obj.offsetTop || 0;
				leftPosition += obj.offsetLeft || 0;
				if (obj.tagName != 'HTML') {
					topPosition -= obj.scrollTop || 0;
					leftPosition -= obj.scrollLeft || 0;
				}
				obj = obj.offsetParent;
			} while (obj);
		}
		return [ leftPosition, topPosition ];
	}

	function getNextHighestZindex(obj) {
		return 410065408;
	}

	function doUpdateChoices(resp) {

		// check if the input hasn't been cleared in the meanwhile
		var input = wicketGet(elementId);
		if (!cfg.showListOnEmptyInput
				&& (input.value == null || input.value == "")) {
			hideAutoComplete();
			return;
		}

		var element = getAutocompleteMenu();
		element.innerHTML = resp;
		if (element.firstChild && element.firstChild.childNodes) {
			elementCount = element.firstChild.childNodes.length;

			var clickFunc = function(event) {
				mouseactive = 0;
				wicketGet(elementId).value = getSelectedValue();
				if (typeof objonchange == "function")
					objonchange();
				hideAutoComplete();
			};

			var mouseOverFunc = function(event) {
				selected = getElementIndex(this);
				render();
				showAutoComplete();
			};

			var node = element.firstChild.childNodes[0];
			for ( var i = 0; i < elementCount; i++) {
				node.onclick = clickFunc;
				node.onmouseover = mouseOverFunc;
				node = node.nextSibling;
			}
		} else {
			elementCount = 0;
		}

		if (elementCount > 0) {
			showAutoComplete();
		} else {
			hideAutoComplete();
		}
		render();

		scheduleEmptyCheck();

		Wicket.Log.info("Response processed successfully.");
		Wicket.Ajax.invokePostCallHandlers();
	}

	function scheduleEmptyCheck() {
		window.setTimeout(function() {
			var input = wicketGet(elementId);
			if (!cfg.showListOnEmptyInput
					&& (input.value == null || input.value == "")) {
				hideAutoComplete();
			}
		}, 100);
	}

	function getSelectedValue() {
		var element = getAutocompleteMenu();
		var attr = element.firstChild.childNodes[selected].attributes['textvalue'];
		var value;
		if (attr == undefined) {
			value = element.firstChild.childNodes[selected].innerHTML;
		} else {
			value = attr.value;
		}
		return stripHTML(value);
	}

	function getElementIndex(element) {
		for ( var i = 0; i < element.parentNode.childNodes.length; i++) {
			var node = element.parentNode.childNodes[i];
			if (node == element)
				return i;
		}
		return -1;
	}

	function stripHTML(str) {
		return str.replace(/<[^>]+>/g, "");
	}

	function adjustScrollOffset(menu, item) {
		if (item.offsetTop + item.offsetHeight > menu.scrollTop
				+ menu.offsetHeight) {
			menu.scrollTop = item.offsetTop + item.offsetHeight
					- menu.offsetHeight;
		} else
		// adjust to the top
		if (item.offsetTop < menu.scrollTop) {
			menu.scrollTop = item.offsetTop;
		}
	}

	function render() {
		var menu = getAutocompleteMenu();
		var height = 0;
		var node = menu.firstChild.childNodes[0];
		var re = /\bselected\b/gi;
		for ( var i = 0; i < elementCount; i++) {
			var origClassNames = node.className;
			var classNames = origClassNames.replace(re, "");
			if (selected == i) {
				classNames += " selected";
				adjustScrollOffset(menu.parentNode, node);
			}
			if (classNames != origClassNames)
				node.className = classNames;

			if ((cfg.maxHeight > -1) && (height < cfg.maxHeight))
				height += node.offsetHeight;

			node = node.nextSibling;
		}
		if (cfg.maxHeight > -1) {
			// If we don't exceed the maximum size, we add the extra space
			// that may be there due to padding, margins, etc.
			if (initialDelta == -1)
				initialDelta = menu.parentNode.offsetHeight - height;
			height = height < cfg.maxHeight ? height + initialDelta
					: cfg.maxHeight;
			menu.parentNode.style.height = height + "px";
		}
	}

	// From
	// http://www.robertnyman.com/2006/04/24/get-the-rendered-style-of-an-element/
	function getStyle(obj, cssRule) {
		var cssRuleAlt = cssRule.replace(/\-(\w)/g, function(strMatch, p1) {
			return p1.toUpperCase();
		});
		var value = obj.style[cssRuleAlt];
		if (!value) {
			if (document.defaultView && document.defaultView.getComputedStyle) {
				value = document.defaultView.getComputedStyle(obj, "")
						.getPropertyValue(cssRule);
			} else if (obj.currentStyle) {
				value = obj.currentStyle[cssRuleAlt];
			}
		}
		return value;
	}

	function isVisible(obj) {
		return getStyle(obj, "visibility");
	}

	function getOffsetParentZIndex(obj) {
		obj = typeof obj == "string" ? Wicket.$(obj) : obj;
		obj = obj.offsetParent;
		var index = "auto";
		do {
			var pos = getStyle(obj, "position");
			if (pos == "relative" || pos == "absolute" || pos == "fixed") {
				index = getNextHighestZindex(obj);
			}
			obj = obj.offsetParent;
		} while (obj && index == "auto");
		return index;
	}

	function hideShowCovered() {
		if (!/msie 6/i.test(navigator.userAgent)
				&& !/opera/i.test(navigator.userAgent)) {
			return;
		}
		// IE7 fix, if this doesn't go in a timeout then the complete page could
		// become invisible.
		// when closing the popup.
		setTimeout(hideShowCoveredTimeout, 1);
	}

	function isAwfulBrowser() {
		return (/msie 6/i.test(navigator.userAgent) || /msie 7/i.test(navigator.userAgent) || /opera/i.test(navigator.userAgent));
	}

	function hideShowCoveredTimeout() {
		var el = getAutocompleteContainer();
		var p = getPosition(el);
		var acLeftX = p[0];
		var acRightX = el.offsetWidth + acLeftX;
		var acTopY = p[1];
		var acBottomY = el.offsetHeight + acTopY;
		var hideTags = new Array("select", "iframe", "applet");

		for ( var j = 0; j < hideTags.length; j++) {
			var tagsFound = document.getElementsByTagName(hideTags[j]);
			for (var i = 0; i < tagsFound.length; i++) {
				var tag = tagsFound[i];
				p = getPosition(tag);
				var leftX = p[0];
				var rightX = leftX + tag.offsetWidth;
				var topY = p[1];
				var bottomY = topY + tag.offsetHeight;

				if (this.hidden || (leftX > acRightX) || (rightX < acLeftX)
						|| (topY > acBottomY) || (bottomY < acTopY)) {
					if (!tag.wicket_element_visibility) {
						tag.wicket_element_visibility = isVisible(tag);
					}
					tag.style.visibility = tag.wicket_element_visibility;
				} else {
					if (!tag.wicket_element_visibility) {
						tag.wicket_element_visibility = isVisible(tag);
					}
					tag.style.visibility = "hidden";
				}
			}
		}
	}

	initialize();
}