/*
Copyright (c) 2003-2008, Peter Tyrrell and Andornot Consulting Inc.

Permission is hereby granted, free of charge, to any person
obtaining a copy of this software and associated documentation
files (the "Software"), to deal in the Software without
restriction, including without limitation the rights to use,
copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the
Software is furnished to do so, subject to the following
conditions:

The above copyright notice and this permission notice shall be
included in all copies or substantial portions of the Software.

Neither the name "Peter Tyrrell" nor "Andornot Consulting Inc."
may be used to endorse or promote products derived from this software
without specific prior written permission.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
OTHER DEALINGS IN THE SOFTWARE.
*/

/* EVENTS */
// attach rewind to page load
addEvent(window, "load", RewindSearch);

// event listener
function addEvent(o,e,f)
{
	if (o.addEventListener){ o.addEventListener(e,f,true); return true; }
	else if (o.attachEvent){ return o.attachEvent("on"+e,f); }
	else { return false; }
}

/* HELPERS */

String.prototype.trim = function() { return this.replace(/^\s+|\s+$/g, ""); };
String.prototype.trimSeparator = function(separator) 
{
	var output = this;
	if (output.indexOf(separator + separator) != -1)
	{
		output = output.replace(separator + separator, separator);	
	}
	if (output.indexOf(separator) == 0)
	{
		output = output.substring(separator.length, output.length);
	}
	else if (output.lastIndexOf(separator) == (output.length - separator.length))
	{
		output = output.substring(0, (output.length - separator.length));
	} 
	return output;
}

/*
GetQueryParamByKey() returns the query parameter value if any match found for key, or an empty string
*/
function GetQueryParamByKey(key, strQuery)
{
	if (!strQuery)
	{
		strQuery = window.location.search.substring(1);
	}
	var regex = new RegExp(key + "=([^&]+)");
	var keyMatch = strQuery.match(regex);
	var output = "";
	if (keyMatch != null)
	{
	    output = keyMatch[1];
	}
	return output;
}

/*
ResetAll() clears hidden inputs that contain QIx values
*/
function ResetAll(oForm)
{
	if (!oForm)
	{
		oForm = document.getElementById("qbe_form");
		if (!oForm)
		{
			oForm = document.getElementsByName("qbe_form")[0];
		}
		if (!oForm)
		{
			oForm = document.forms[0];	
		}
	}
	
    for (var i = 0; i < oForm.elements.length; i++)
    {
        if (oForm.elements[i].type == "hidden" && oForm.elements[i].name.toUpperCase().substring(0,2) == "QI")
        {
            oForm.elements[i].value = "";
        }    
    }    
}

/*
ValidateForm(oForm) ensures some search text has been entered in QIx or QY inputs
*/
function ValidateForm(oForm)
{
    var isValid = false;
    var i;
	
    for (i = 0; i < oForm.elements.length; i++)
    {
        if (oForm.elements[i].name.toUpperCase().substring(0,2) == "QI" || oForm.elements[i].name.toUpperCase().substring(0,2) == "QY")
        {
            if (oForm.elements[i].value != "")
            {
                isValid = true;
                return true;
            }
        }
    }
		
	alert("Please enter search criteria.");
	return false;
}

/*
GetTextbaseName() fetches the TN input value on the page, returns null if not found
*/
function GetTextbaseName()
{
	var output = "";
	var target = document.getElementById('TN');
	if (target == null)
	{
		target = document.getElementsByName('TN')[0];
	}
	if (target == null)
	{
		return null;	
	}
	output = target.value;
	return output;
}

/*
SetBU() sets the BU input value to window.location.href excluding query string
*/
function SetBU()
{
    var target = document.getElementById("BU");
    if (target == null)
    {
        target = document.getElementsByName("BU")[0];
    }
    var bu = window.location.href.indexOf("?") == -1 ? window.location.href : window.location.href.substring(0, window.location.href.indexOf("?"));
    target.value = bu;
}


/*******************************************************************************
REWIND
Functions to return to search page without hard-coding urls into results pages,
for both 'new search' and 'revise search'
*******************************************************************************/

/*
RewindSearch() loads form values if conditions are met.
Is attached to search page load event by addEvent()
*/
function RewindSearch()
{
	var remember = GetQueryParamByKey("remember");
	
	if (remember == "true")
	{
		var strFormState;
		var cookieName = null;
		
		var elCookieName = document.getElementById('RewindCookieName');
		if (elCookieName)
		{
			cookieName = elCookieName.value;	
		}
		else
		{
			var tn = GetTextbaseName();
			if (tn)
			{
				cookieName = GetTextbaseName() + "AndornotRewind";
			}	
		}
		
		if (!cookieName)
		{
			return;	
		}

		strFormState = GetRewindCookie(cookieName);
		if (strFormState)
		{
			var oForm;
			oForm = document.getElementById("qbe_form");
			if (!oForm)
			{
				oForm = document.getElementsByName("qbe_form")[0];
			}
			if (!oForm)
			{
			    oForm = document.forms[0];
			}
			if (oForm)
			{
				SetFormState(oForm, strFormState);
			}
		}
	}
}


/*
SetRewind() fires on search form submit, writes user-affected form settings to cookie
*/
function SetRewind(cookieName)
{
	if (!navigator.cookieEnabled)
	{
		return;
	}
	
	var oForm;
	var arrFormState = [];
	var strFormState = "";
	
	oForm = document.getElementById("qbe_form");
	if (!oForm)
	{
		oForm = document.getElementsByName("qbe_form")[0];
	}
	if (!oForm)
	{
	    oForm = document.forms[0];
	}
	if (oForm)
	{
		arrFormState = GetFormState(oForm);
		if (arrFormState.length > 0)
		{
			strFormState = arrFormState.join("&");
			if (!cookieName)
			{
				SetRewindCookie(GetTextbaseName() + "AndornotRewind", strFormState, null, "/");	
			}
			else
			{
				SetRewindCookie(cookieName, strFormState, null, "/");	
			}
		}
	}
}

/*
GetFormState() polls the supplied form, returns array of name/value strings ("name=value")
*/
function GetFormState(oForm)
{
	var output = [];
	var intFormLength = oForm.elements.length;
	var strValue = "";
	var strKey = "";
	var i = 0;
	
	for (i=0;i<intFormLength;i++)
	{
		if (oForm.elements[i].type)
		{
			strValue = "";
			
			if (oForm.elements[i].type.substring(0,6) == "select")
			{
				strValue = oForm.elements[i].selectedIndex;
			}	
			else if (oForm.elements[i].type == "checkbox" || oForm.elements[i].type == "radio")
			{
				strValue = oForm.elements[i].checked.toString();
			}
			else if (oForm.elements[i].type == "text")
			{
				strValue = oForm.elements[i].value;	
			}
			else if (oForm.elements[i].type == "hidden" && oForm.elements[i].name.toUpperCase().substring(0,2) == "QI")
			{
				strValue = oForm.elements[i].value;	
			}
			
			if (strValue != "")
			{
				// preferentially use id as key
				if (oForm.elements[i].id != "")
				{
					strKey = oForm.elements[i].id;
				}
				else
				{
					strKey = oForm.elements[i].name.toUpperCase();
				}
				output[output.length] = strKey + "=" + encodeURIComponent(strValue);
			}
		}	
	}
	return output;
}

/*
SetFormState() populates the supplied form with supplied name/value settings 
*/
function SetFormState(oForm, strFormState)
{
	var intFormLength = oForm.elements.length;
	var strValue = "";
	var strKey = "";
	var i = 0;
	
	for (i=0;i<intFormLength;i++)
	{
		if (oForm.elements[i].type)
		{
			strKey = "";
			if (oForm.elements[i].id != "")
			{
				strKey = oForm.elements[i].id;
			}
			else
			{
				strKey = oForm.elements[i].name;
			}
			
			strValue = "";
			strValue = GetQueryParamByKey(strKey, strFormState);
			
			if (strValue != "")
			{
				strValue = decodeURIComponent(strValue);
				
				switch (oForm.elements[i].type)
				{
					case "select-one":
						oForm.elements[i].selectedIndex = parseInt(strValue);
						break;
					case "select-multiple":
						oForm.elements[i].selectedIndex = parseInt(strValue);
						break;
					case "checkbox":
						if (strValue == "true")
						{
							oForm.elements[i].checked = true;
						}
						else
						{
							oForm.elements[i].checked = false;
						}
						break;
					case "radio":
						if (strValue == "true")
						{
							oForm.elements[i].checked = true;
						}
						else
						{
							oForm.elements[i].checked = false;
						}
						break;
					case "text":
						oForm.elements[i].value = strValue;
						break;
					case "textarea":
						oForm.elements[i].innerHTML = strValue;
						break;
					case "hidden":
						if (oForm.elements[i].name.toUpperCase().substring(0,2) == "QI")
						{
							oForm.elements[i].value = strValue;
						}
						break;
				}
			}
		}	
	}
}

function GetRewindCookie( name ) 
{
	var start = document.cookie.indexOf( name + "=" );
	var len = start + name.length + 1;
	if ( ( !start ) && ( name != document.cookie.substring( 0, name.length ) ) ) 
	{
		return null;
	}
	if ( start == -1 )
	{
		return null;
	}
	var end = document.cookie.indexOf( ';', len );
	if ( end == -1 )
	{
		end = document.cookie.length;
	}
	return decodeURIComponent( document.cookie.substring( len, end ) );
}

function SetRewindCookie( name, value, expires, path, domain, secure ) 
{
    var output = "";
	var today = new Date();
	today.setTime( today.getTime() );
	if ( expires ) 
	{
		expires = expires * 1000 * 60 * 60 * 24;
	}
	var expires_date = new Date( today.getTime() + (expires) );
	output = name + '=' + encodeURIComponent( value ) +
		( ( expires ) ? '; expires='+expires_date.toGMTString() : '' ) +
		( ( path ) ? '; path=' + path : '' ) +
		( ( domain ) ? '; domain=' + domain : '' ) +
		( ( secure ) ? '; secure' : '' );
		
	document.cookie = output;
}


/*************************************************
ADDREMOVEME
Functions for extending WebPublisher search/edit forms
*************************************************/

/*
AddRemoveMe() adds calling element's value to a target element if not already there,
or removes calling element's value from a target element if found.
Multiple additions are separated by a supplied separator string (e.g. " / " typical for a search form).
Used to update hidden or text inputs with checkboxes and radio buttons.
Caller and target assumed to have a value property.
*/
function AddRemoveMe(me, targetID, strSeparator)
{
	AddRemoveValue(me.value, targetID, strSeparator);
}

/*
AddRemoveValue is like AddRemoveMe except passes a string instead of the originating object.
*/
function AddRemoveValue(value, targetID, strSeparator)
{
  var target;
  target = document.getElementById(targetID);
  if (!target)
  {
  	target = document.getElementsByName(targetID)[0];
  }
  value = value.trim();
  var index = target.value.indexOf(value);
    
  // if value not found, add value 
  if (index == -1)
  {
    target.value += strSeparator + value;
  }
  // if value is found, remove value
  else if (index != -1)
  {
    var pre = target.value.substring(0, index);
    var post = target.value.substring(index + value.length, target.value.length);
    target.value = pre+post;
  }

  //Remove extraneous separators
  target.value = target.value.trimSeparator(strSeparator)
}


/*********************************************************************
AutoBoolean "google-izes" Inmagic text inputs:
forces words/terms to be separated by a given boolean operator
in the named search boxes.
**********************************************************************/
function AutoBoolean(BooleanChar, targetList, stemOn)
{
	var sep = "|";
	var targetArray = new Array();
	targetArray = targetList.split(sep);
	var i = 0;
	var CurrentTarget;
	var InitialTargetValue;
	var oForm;
	
	oForm = document.forms.qbe_form;
	if (oForm == null)
	{
		oForm = document.forms[0];		
	}
	
	for (i=0;i<targetArray.length;i++)
	{
		CurrentTarget = oForm.elements[targetArray[i]];
		InitialTargetValue = CurrentTarget.value.trim();
		CurrentTarget.value = makeAutobooleanQuery(BooleanChar, splitStr(InitialTargetValue, /("[^"]*")|([^"\s]+(\s|$))/g), stemOn);
	}
}


function splitStr(strAddr, splitWith)
{
        var tmpStr  = new String(strAddr);
        return tmpStr.match(splitWith);
}

function makeAutobooleanQuery(BooleanChar, myArray, stemOn)
{
	if (!myArray)
	{ 
		return '';
	}

	var tempArray = new Array();
	var i = 0;
	var j = 0;
	var str = '';
	var AddBooleanNext = true;

	for (i = 0; i < myArray.length; i++)
	{
		str = myArray[i].trim().toLowerCase();
		
		if (str != '')
		{	
				switch (str)
				{
					case '!':
						tempArray[j++] = str;
						if (j > 0)
						{
							AddBooleanNext = false;
						}
						break;
					case '/':
						tempArray[j++] = str;
						if (j > 0)
						{
							AddBooleanNext = false;
						}
						break;
					case '&':
						tempArray[j++] = str;
						if (j > 0)
						{
							AddBooleanNext = false;
						}
						break;
					case ':':
						tempArray[j++] = str;
						if (j > 0)
						{
							AddBooleanNext = false;
						}
						break;
					case 'a':
						break;
					case 'an':
						break;
					case 'and':
						break;
					case 'by':
						break;
					case 'for':
						break;
					case 'from':
						break;
					case 'of':
						break;
					case 'the':
						break;
					case 'to':
						break;
					default:
						if (str.match(/^(w|p){1}\d+$/g) != null)
						{
							tempArray[j++] = str;
							AddBooleanNext = false;
							break;
						}
						else
						{
							if (AddBooleanNext == true && j > 0)
							{
								tempArray[j++] = BooleanChar;
							}
							if (stemOn && (stemOn == true) && (str.indexOf("\"") != 0) && (str.lastIndexOf("*") == -1))
							{
							    tempArray[j++] = str + "*";   
							}
							else
							{
							    tempArray[j++] = str;
							}
							AddBooleanNext = true;
						}
				}
		}
	}

	return tempArray.join(' ');
}