function setKey(aKey, aKeysList, aKeySep) {
  aKeySep = aKeySep || ",";
  if(aKeysList!="") {
  	return aKeysList+aKeySep+aKey;
  }
  else {
  	return aKey;
  }
}  

function delKey(aKey, aKeysList, aKeySep) {
  aKeySep = aKeySep || ",";
  var oldList = explode(aKeySep, aKeysList);
  var newList = new Array();
  if(oldList.length) {
  	k = 0;
  	for(i=0;i<oldList.length;i++) {
  		if(oldList[i]!=aKey) {
  			newList[k] = oldList[i];
  			k++;
  		}
  	}
  }
  return implode(aKeySep, newList);
}

function getKeyVal(aKey, aKeysList, aKeySep) {
  aKeySep = aKeySep || "&";
  if(aKeysList) {
	  var prefix = aKey + "=";
	  var begin = aKeysList.indexOf(prefix);
	  if (begin == -1) {
	    return false;
	  } 
	  var end = aKeysList.indexOf(aKeySep, begin);
	  if (end == -1) {
	    end = aKeysList.length;
	  }
	  return aKeysList.substring(begin + prefix.length, end);
  }
  else {
  	  return false;
  }
}

function setKeyVal(aKey, aValue, aKeysList, aKeySep) {
  aKeySep = aKeySep || "&";
  var newStr = "";
  var prefix = aKey + "=";
  var begin = aKeysList.indexOf(prefix);
  if (begin == -1) {
    if(aKeysList) {
    	newStr = aKeysList + aKeySep + prefix + aValue;
    }
    else {
    	newStr = prefix + aValue;
    }
  } 
  else {
  	newStr = aKeysList.substring(0, begin + prefix.length);
  	var end = aKeysList.indexOf(aKeySep, begin + prefix.length);
  	if (end == -1) {
    	newStr += aValue;
  	}
  	else {
  		newStr += aValue + aKeysList.substr(end);
  	}
  }
  return newStr;
}

function delKeyVal(aKey, aKeysList, aKeySep) {
  aKeySep = aKeySep || "&";
  var newStr = "";
  if(aKeysList) {
	  var prefix = aKey + "=";
	  var begin = aKeysList.indexOf(prefix);
	  if (begin == -1) {
    	newStr = aKeysList;
	  } 
	  else {
	  	if(begin!=0) {
			begin=begin-1;
		}
	  	newStr = aKeysList.substring(0, begin);
	  	var end = aKeysList.indexOf(aKeySep, begin + prefix.length);
	  	if (end != -1) {
	  		if(begin==0) {
	  			end=end+1;
	  		}
	  		newStr += aKeysList.substr(end);
	  	}
	  }
  }
  return newStr;
}


function implode(aSep, aArray) {
	var newStr = "";
	if(aArray.length) {
		newStr = aArray[0];
		for(i=1;i<aArray.length;i++) {
			newStr = newStr+aSep+aArray[i];
		}
	}
	return newStr;
}

function explode(aSep, aString) {
	return aString.split(aSep);
}


function copy_clip(meintext){
 if (window.clipboardData) 
   {
   // the IE-manier
   window.clipboardData.setData("Text", meintext);
   }
   else if (window.netscape) 
   { 
   // you have to sign the code to enable this, or see notes below 
   netscape.security.PrivilegeManager.enablePrivilege('UniversalXPConnect');
   var clip = Components.classes['@mozilla.org/widget/clipboard;1'].createInstance(Components.interfaces.nsIClipboard);
   if (!clip) return;
   var trans = Components.classes['@mozilla.org/widget/transferable;1'].createInstance(Components.interfaces.nsITransferable);
   if (!trans) return;
   trans.addDataFlavor('text/unicode');
   var str = new Object();
   var len = new Object();
   var str = Components.classes["@mozilla.org/supports-string;1"].createInstance(Components.interfaces.nsISupportsString);
   var copytext=meintext;
   str.data=copytext;
   trans.setTransferData("text/unicode",str,copytext.length*2);
   var clipid=Components.interfaces.nsIClipboard;
   if (!clip) return;
   clip.setData(trans,null,clipid.kGlobalClipboard);
   }
   //alert("Following info was copied to your clipboard:\n\n" + meintext);
}

function escapeASCII(Str) {
	var reg=/(\W)/gi;
	return Str.replace(reg, function ($1) {return ($1.charCodeAt(0)>254?$1:"%"+(($1.charCodeAt(0)).toString(16)).toUpperCase())});
}

// ====================================================================
//       URLEncode and URLDecode functions
//
// Copyright Albion Research Ltd. 2002
// http://www.albionresearch.com/
//
// You may copy these functions providing that 
// (a) you leave this copyright notice intact, and 
// (b) if you use these functions on a publicly accessible
//     web site you include a credit somewhere on the web site 
//     with a link back to http://www.albionresarch.com/
//
// If you find or fix any bugs, please let us know at albionresearch.com
//
// SpecialThanks to Neelesh Thakur for being the first to
// report a bug in URLDecode() - now fixed 2003-02-19.
// ====================================================================
function URLEncode( )
{
	// The Javascript escape and unescape functions do not correspond
	// with what browsers actually do...
	var SAFECHARS = "0123456789" +					// Numeric
					"ABCDEFGHIJKLMNOPQRSTUVWXYZ" +	// Alphabetic
					"abcdefghijklmnopqrstuvwxyz" +
					"-_.!~*'()";					// RFC2396 Mark characters
	var HEX = "0123456789ABCDEF";

	var plaintext = document.URLForm.F1.value;
	var encoded = "";
	for (var i = 0; i < plaintext.length; i++ ) {
		var ch = plaintext.charAt(i);
	    if (ch == " ") {
		    encoded += "+";				// x-www-urlencoded, rather than %20
		} else if (SAFECHARS.indexOf(ch) != -1) {
		    encoded += ch;
		} else {
		    var charCode = ch.charCodeAt(0);
			if (charCode > 255) {
			    alert( "Unicode Character '" + ch + "' cannot be encoded using standard URL encoding.\n" +
				        "(URL encoding only supports 8-bit characters.)\n" +
						"A space (+) will be substituted." );
				encoded += "+";
			} else {
				encoded += "%";
				encoded += HEX.charAt((charCode >> 4) & 0xF);
				encoded += HEX.charAt(charCode & 0xF);
			}
		}
	} // for

	document.URLForm.F2.value = encoded;
	return false;
}

function URLDecode( )
{
   // Replace + with ' '
   // Replace %xx with equivalent character
   // Put [ERROR] in output if %xx is invalid.
   var HEXCHARS = "0123456789ABCDEFabcdef"; 
   var encoded = document.URLForm.F2.value;
   var plaintext = "";
   var i = 0;
   while (i < encoded.length) {
       var ch = encoded.charAt(i);
	   if (ch == "+") {
	       plaintext += " ";
		   i++;
	   } else if (ch == "%") {
			if (i < (encoded.length-2) 
					&& HEXCHARS.indexOf(encoded.charAt(i+1)) != -1 
					&& HEXCHARS.indexOf(encoded.charAt(i+2)) != -1 ) {
				plaintext += unescape( encoded.substr(i,3) );
				i += 3;
			} else {
				alert( 'Bad escape combination near ...' + encoded.substr(i) );
				plaintext += "%[ERROR]";
				i++;
			}
		} else {
		   plaintext += ch;
		   i++;
		}
	} // while
   document.URLForm.F1.value = plaintext;
   return false;
}