VStringBuilder = function()
{
	this.aStr = new Array();
	this.append = function(str) { this.aStr[this.aStr.length ] = str; }
	this.toString = function() { return this.aStr.join(""); }
	this.init = function() { this.aStr = null; this.aStr = new Array(); }
}

VArrayList = function()
{
	this.array = new Array();
	this.add = function(obj) { this.array[this.array.length] = obj; }
	this.removeAt = function(index) { this.array.splice(index, 1); }
	this.count = function() { return this.array.length; }
	this.clear() = function() { this.array.splice(0, this.array.length); }
	this.contains(obj) = function() { return this.indexOf(obj) != -1; }
	this.indexOf(obj) = function() { for (var i=0; i<this.array.length; i++) { if (this.array[i]==obj) return i; } return -1; }
	this.remove(obj) = function() { var i = this.indexOf(obj); if (i!=-1) this.removeAt(i); }
}

/*///////////////////////////////////////////////////////////
VHashTable Class
///////////////////////////////////////////////////////////*/
VHashTable = function()
{
	this.hashtable = new Array();
	this.item = VHashTable_item;
	this.containsKey = VHashTable_containsKey;
	this.remove = VHashTable_remove;
	this.set = VHashTable_set;
	this.add = VHashTable_add;
	this.count = VHashTable_count;
	this.keys = VHashTable_keys;
	this.isHashTable = true;
}
		
function VHashTable_containsKey(key) 
{ 
	for (var i in this.hashtable) 
	{
		if (i == key && this.hashtable[i] != null) 
			return true;
	}
	return false;
}
	
function VHashTable_remove(key) 
{
	var value = this.hashtable[key];
  this.hashtable[key] = null;
  return value;
}
	
function VHashTable_add(key, value) 
{ 
	this.hashtable[key] = value; 
}
	
function VHashTable_count() 
{ 
	var size = 0;
   for (var i in this.hashtable) 
   {
		if (this.hashtable[i] != null) 
			size++;
	}
  return size;
}

function VHashTable_keys()
{
	var keys = new Array();
  for (var i in this.hashtable) 
  {
		if (this.hashtable[i] != null) 
			keys.push(i);
  }
  return keys;
}

function VHashTable_item(key)
{
	return this.hashtable[key];
}

function VHashTable_set(key, value)
{
	this.hashtable[key] = value;
}

/*///////////////////////////////////////////////////////////
ListSerializer Class
///////////////////////////////////////////////////////////*/
ListSerializer = function()
{
	this.serialize = ListSerializer_Serialize;
	this.deserialize = ListSerializer_Deserialize;
}

function ListSerializer_Deserialize(xml)
{
	if (xml == '' || xml == "undefined")
		return new VHashTable();
		
	var doc = new ActiveXObject("Microsoft.XMLDOM");
	doc.loadXML(xml);
	return ListSerializer_DeserializeList(doc.documentElement);	
}

function ListSerializer_DeserializeList(element)
{
	var list = new VHashTable();
	var items = element.selectNodes("item");
	for (var i=0; i<items.length; i++)
	{
		islist = (items[i].getAttribute("list") == "1");
		if (!islist)
			list.add(items[i].getAttribute("key"), items[i].text);
		else
			list.add(items[i].getAttribute("key"), ListSerializer_DeserializeList(items[i]));
	}
	return list;
}

function ListSerializer_Serialize(list)
{
	var doc = new ActiveXObject("Microsoft.XMLDOM");
	var root = doc.createElement("item");
	root.setAttribute("list", "1");
	doc.appendChild(root);
	ListSerializer_SerializeList(doc, root, list);
	
	return root.xml;
}

function ListSerializer_SerializeList(doc, parentElement, list)
{
	var keys = list.keys();
	for (var i=0; i<keys.length; i++)
	{
		var itemElem = doc.createElement("item");
		itemElem.setAttribute("key", keys[i]);
		parentElement.appendChild(itemElem);
		
		var item = list.item(keys[i]);
		if (item.isHashTable)
		{
			itemElem.setAttribute("list", "1");
			ListSerializer_SerializeList(doc, itemElem, item);
		}
		else
		{
			itemElem.text = item.toString();
		}
	}
}

/*///////////////////////////////////////////////////////////
Base64 Encoding
///////////////////////////////////////////////////////////*/
var VBase64Key = "ABCDEFGHIJKLMNOP" +
                "QRSTUVWXYZabcdef" +
                "ghijklmnopqrstuv" +
                "wxyz0123456789+/" +
                "=";

// Base64 encode an input string.
function VBase64Encode(input) 
{
  var output = "";
  var chr1, chr2, chr3 = "";
  var enc1, enc2, enc3, enc4 = "";
  var i = 0;

  do {
      chr1 = input.charCodeAt(i++);
      chr2 = input.charCodeAt(i++);
      chr3 = input.charCodeAt(i++);

      enc1 = chr1 >> 2;
      enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
      enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
      enc4 = chr3 & 63;

      if (isNaN(chr2)) {
        enc3 = enc4 = 64;
      } else if (isNaN(chr3)) {
        enc4 = 64;
      }

      output = output + 
        VBase64Key.charAt(enc1) + 
        VBase64Key.charAt(enc2) + 
        VBase64Key.charAt(enc3) + 
        VBase64Key.charAt(enc4);
      chr1 = chr2 = chr3 = "";
      enc1 = enc2 = enc3 = enc4 = "";
  } while (i < input.length);

  return output;
}

// Decode the base64 encoded input string.
function VBase64Decode(input) 
{
  var output = "";
  var chr1, chr2, chr3 = "";
  var enc1, enc2, enc3, enc4 = "";
  var i = 0;

  // remove all characters that are not A-Z, a-z, 0-9, +, /, or =
  var base64test = /[^A-Za-z0-9\+\/\=]/g;
  if (base64test.exec(input)) {
      alert("There were invalid base64 characters in the input text.\n" +
            "Valid base64 characters are A-Z, a-z, 0-9, '+', '/', and '='\n" +
            "Expect errors in decoding.");
  }
  input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");

  do {
      enc1 = VBase64Key.indexOf(input.charAt(i++));
      enc2 = VBase64Key.indexOf(input.charAt(i++));
      enc3 = VBase64Key.indexOf(input.charAt(i++));
      enc4 = VBase64Key.indexOf(input.charAt(i++));

      chr1 = (enc1 << 2) | (enc2 >> 4);
      chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
      chr3 = ((enc3 & 3) << 6) | enc4;

      output = output + String.fromCharCode(chr1);

      if (enc3 != 64) {
        output = output + String.fromCharCode(chr2);
      }
      if (enc4 != 64) {
        output = output + String.fromCharCode(chr3);
      }

      chr1 = chr2 = chr3 = "";
      enc1 = enc2 = enc3 = enc4 = "";

  } while (i < input.length);

  return output;
}