/*
 * 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
 *
 * Customized by Techniker Krankenkasse
 * @Version 2009-09-23 19:58
 */

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

Wicket.AutoCompleteSettings =  {
	enterHidesWithNoSelection : false
};

Wicket.AutoComplete=function(elementId, callbackUrl, cfg, indicatorId){
    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;
	
	//XXX customized by TK: NEW
	//check wether cookies are enabled - without cookies no autocompletion
	var cookiesEnabled=areCookiesEnabled();
	
	// 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 = 300;

    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(obj.value=='' && obj.name=='searchText') obj.value='Suche oder Webcode'; // XXX customized by TK: NEW
          	obj.className=obj.className.replace(new RegExp(" highlight\\b"), ""); // XXX customized by TK: NEW
          	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) {
                        var value = getSelectedValue();
                        if(handleSelection(value)) {
                          obj.value = value;
                          if(typeof objonchange=="function") objonchange(event);
                        }
                        hideAutoComplete();
                        hidingAutocomplete = 1;
                        if ('searchText'==obj.name) { // XXX customized by TK: NEW
                      	   document.tksearchform.submit(); // XXX customized by TK: NEW
                        } // XXX customized by TK: NEW
                    } else if (Wicket.AutoCompleteSettings.enterHidesWithNoSelection) {
                        hideAutoComplete();
                        hidingAutocomplete = 1;
                    }
                    mouseactive = 0;
                    if(typeof objonkeydown=="function") objonkeydown(event);
                    return true;
                break;
                default:
            }
        }

        obj.onkeyup=function(event){
            switch(wicketKeyCode(Wicket.fixEvent(event))){
                case KEY_ENTER:
	                return killEvent(event);
                case KEY_TAB:
                    if (cfg.showListOnFocusGain)
                        updateChoices();
                    break;
                case KEY_UP:
                case KEY_DOWN:
                case KEY_ESC:
                case KEY_RIGHT:
                case KEY_LEFT:
                case KEY_SHIFT:
                case KEY_ALT:
                case KEY_CTRL:
                break;
                default:
    	            updateChoices();
            }
			if(typeof objonkeyup=="function")objonkeyup(event);
            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(event);
        }
    }

    function handleSelection(input) {
        var menu = getAutocompleteMenu();
        var attr = menu.firstChild.childNodes[selected].attributes['onselect'];
        return attr ? eval(attr.value) : input;
    }

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

    function getAutocompleteMenu() {
        var inputFieldNode=document.getElementById(elementId); // XXX customized by TK: NEW
        var choiceDiv=document.getElementById(getMenuId());
        if (choiceDiv==null) {
        	var container = document.createElement("div"); 
            container.className ="wicket-aa-container";
            if(cfg.className)
              container.className += ' ' + cfg.className;
             //document.body.appendChild(container); // XXX customized by TK: DELETED
            inputFieldNode.parentNode.appendChild(container); // XXX customized by TK: NEW
        	//	container.style.display="none"; // XXX customized by TK: DELETED
        	//	container.style.overflow="auto"; // XXX customized by TK: DELETED
          //  container.style.position="absolute"; // XXX customized by TK: DELETED            
            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() {
    	var node=getAutocompleteMenu().parentNode;
    	
        return node;
    }
    
    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;
        }
        if(cookiesEnabled){ // XXX customized by TK: ADDED
        	localThrottler.throttle(getMenuId(), throttleDelay, actualUpdateChoices);
        } // XXX customized by TK: ADDED
    }

    // XXX customized by TK: NEW function
    function areCookiesEnabled(){ 
        //try to set a session cookie
        document.cookie = "tkwicketcookietest=42; path=/";
        //check wether we can read the cookie
        //note: document.cookie returns name=value only and no other params
        var cookiesEnabled = document.cookie.length > 1;
        //if there are existing cookies, check if we found our cookie
        if (cookiesEnabled){
            //search with regular expression for our cookie: either with a heading semicolon or whitespace 
            //(if there are other cookies before our one and to avoid a hit of a similar cookie like "XXXtkwicketcookietest") 
            //or at the beginning of the cookie string
            var cookiepos = document.cookie.search(/[;\s]tkwicketcookietest=42|^tkwicketcookietest=42/);
            cookiesEnabled = cookiepos != -1;
		    }
        //the cookie is not needed any longer, thus delete it
        var rightNow = new Date();
        var pastDate = new Date(rightNow.getTime() - (1000 * 60));
        document.cookie = "tkwicketcookietest=42; path=/; expires=" + pastDate.toGMTString();  
        //return the result
        return cookiesEnabled;
    }


    function actualUpdateChoices()
    {
    	showIndicator();
        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 showIndicator() {
    	if (indicatorId!=null) {
    		Wicket.$(indicatorId).style.display='';
    	}
    }
    
    function hideIndicator() {
    	if (indicatorId!=null) {
    		Wicket.$(indicatorId).style.display='none';
    	}
    }
    
    function processValue(param) {
        return (encodeURIComponent)?encodeURIComponent(param):escape(param);
    }

    function showAutoComplete(){
        // var position=getPosition(wicketGet(elementId)); // XXX customized by TK: DELETED
        var container = getAutocompleteContainer();
        var input=wicketGet(elementId); 
        // var index=getOffsetParentZIndex(elementId); // XXX customized by TK: DELETED
        container.show();
        // container.style.zIndex=(!isNaN(Number(index))?Number(index)+1:index); // XXX customized by TK: DELETED
        // container.style.left=position[0]+'px' // XXX customized by TK: DELETED
        // container.style.top=(input.offsetHeight+position[1])+'px'; // XXX customized by TK: DELETED
        // if(cfg.adjustInputWidth) // XXX customized by TK: DELETED
          // container.style.width=input.offsetWidth+'px'; // XXX customized by TK: DELETED
        visible=1;
        hideShowCovered();
    }

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

    function getPosition(obj) {
        var leftPosition=0;
        var topPosition=0;
        do {
            topPosition += obj.offsetTop || 0;
            leftPosition += obj.offsetLeft || 0;
            obj = obj.offsetParent;
        } while (obj);
        return [leftPosition,topPosition];
    }

    function doUpdateChoices(resp){
    
    	// check if the input hasn't been cleared in the meanwhile
    	var input=wicketGet(elementId);
   		if ((Wicket.Focus.getFocusedElement() != input) || !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;
                var value = getSelectedValue();
                if(value = handleSelection(value)) {
                  wicketGet(elementId).value = value;
                  if(typeof objonchange=="function") objonchange();
                  if ('searchText'==input.name) {  // XXX customized by TK: NEW
                 	   document.tksearchform.submit();  // XXX customized by TK: NEW
                  } // XXX customized by TK: NEW
                }
                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();
        hideIndicator();
    }
    
    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; // XXX customized by TK: DELETED
	    if (menu.firstChild!=null){   // XXX customized by TK: ADDED (empty response after expiration)
				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)) // XXX customized by TK: DELETED
					// height+=node.offsetHeight; // XXX customized by TK: DELETED
		
					node = node.nextSibling;
				}
	      //  if (cfg.maxHeight > -1) { // XXX customized by TK: DELETED
				// 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) // XXX customized by TK: DELETED
					//initialDelta = menu.parentNode.offsetHeight - height; // XXX customized by TK: DELETED
	        	// height = height<cfg.maxHeight ? height+initialDelta : cfg.maxHeight; // XXX customized by TK: DELETED
	        	// menu.parentNode.style.height=height+"px"; // XXX customized by TK: DELETED
	      //  } // XXX customized by TK: DELETED
			} // XXX customized by TK: ADDED (empty response after expiration)
    }
    
    // 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=getStyle(obj,"z-index"); 
    		}
    		obj=obj.offsetParent;     		
    	} while (obj && index == "auto");
    	return index;
    }

    function hideShowCovered(){
        if (!/msie/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 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();
}