/*--------------------------------------------------|

| dTree 2.05 | www.destroydrop.com/javascript/tree/ |

|---------------------------------------------------|

| Copyright (c) 2002-2003 Geir Landrö               |

|                                                   |a

| This script can be used freely as long as all     |

| copyright messages are intact.                    |

|                                                   |

| Updated: 22.04.2003                               |

| Original Heavily Modified     |

| Implemented Tree Serialization  for persistance   |

| & reconstruction of a tree                        |

| as well as IE drag & drop support                 |

|--------------------------------------------------*/

// Node object
function Node(nameSpace, id, pid, name, url, title, target, icon, iconOpen, open, isDragable, dragData, customData, onMouseOverEvent, onMouseOutEvent) {
	this._nameSpace = nameSpace;

	this.id = nameSpace+id;

	this.pid = nameSpace+pid;

	this.name = name;

	this.url = url;

	this.title = title;

	this.target = target;

	this.icon = icon;

	this.iconOpen = iconOpen;
	
	this.isDragable = (isDragable==true);

	this.dragData = dragData;

  this.customData = customData; //not serialized

  this.onMouseOverEvent = onMouseOverEvent; //not serialized

  this.onMouseOutEvent = onMouseOutEvent; //not serialized

	this._io = open || false;

	this._is = false;

	this._ls = false;

	this._hc = false;

	this._ai = 0;

	this._p;


};
Node.prototype.serialize = function() {
	/* serialize structure
	<node>
		<param>
			<type></type>
			<name></name>
			<value></value>
		</param>
		(...)
		<param>
			<type></type>
			<name></name>
			<value></value>
		</param>
	</node>
	*/
	var serialObj = "<node>";
	var item;
	for(item in this) {
		if(typeof(this[item])!='function') {
			serialObj+="<member>";
			if(typeof(this[item])!='boolean' && typeof(this[item])!='number' && typeof(this[item])!='string') {
				serialObj+="<type>"+typeof(this[item])+"</type>";
				serialObj+="<name>"+item+"</name>";
				serialObj+="<value></value>";			//unknown objects are serialized to null
			}
			else {
				serialObj+="<type>"+typeof(this[item])+"</type>";
				serialObj+="<name>"+item+"</name>";
				if(typeof(this[item])=='undefined') serialObj+="<value></value>";
				else serialObj+="<value>"+this[item]+"</value>";
			serialObj+="</member>";
			}
		}
	}
	serialObj+="</node>";
	return serialObj;
}

// Tree object
function dTree(objName) {
	this.config = {

		target			: null,

		folderLinks		: true,

		useSelection		: true,

		useCookies		: false,			//original is 'true' but this conflicts with the use of serialization/reconstruction

		useLines		: true,
		
		useIcons		: true,

		useStatusText		: false,

		closeSameLevel		: false,

		inOrder					: false

	}

	this.icon = {

		root		: 'img/tree_base.gif',

		folder		: 'img/tree_folder.gif',

		folderOpen	: 'img/tree_folderopen.gif',

		node		: 'img/tree_page.gif',

		empty		: 'img/tree_empty.gif',

		line		: 'img/tree_line.gif',
		
		join		: 'img/tree_join.gif',

		joinBottom	: 'img/tree_joinbottom.gif',

		plus		: 'img/tree_plus.gif',

		plusBottom	: 'img/tree_plusbottom.gif',

		minus		: 'img/tree_minus.gif',

		minusBottom	: 'img/tree_minusbottom.gif',

		nlPlus		: 'img/tree_nolines_plus.gif',

		nlMinus		: 'img/tree_nolines_minus.gif'

	};

	this.obj = objName;

	this.aNodes = [];

	this.aIndent = [];

	this._nameSpace= (new Date()).getTime()+"_";

	this.root = new Node(this._nameSpace,'-1');

	this.selectedNode = null;

	this.selectedFound = false;

	this.completed = false;
};

//Tree id helper functions
dTree.prototype.MAX_LEVEL_SIZE = 10000;
dTree.prototype.ROOT_PARENT_ID = -1;
dTree.prototype.ROOT_ID = -2;

dTree.prototype.buildLevelTwoTreeId = function buildLevelTwoTreeId(levelOneId, levelTwoId) {
  return (levelOneId + "_" + levelTwoId);
}

dTree.prototype.isPureLevelOneId = function isPureLevelOneId(treeId) {
  if(treeId.split('_').length == 1)
  {
    return true;
  }
  return false;
}

dTree.prototype.getLevelOneIdFromTreeId = function getLevelOneIdFromTreeId(treeId) {
  return treeId.split('_')[0];
}

dTree.prototype.getLevelTwoIdFromTreeId = function getLevelTwoIdFromTreeId(treeId) {
  return treeId.split('_')[1];
}

dTree.prototype.onSelectNode = function(pid, id) {
	//virtual method
	alert("Virtual method called:onSelectNode\n pid="+pid+", id="+id);
}

dTree.prototype.onClickNode = function(pid, id) {
	//virtual method
	alert("Virtual method called: onClickNode\n pid="+pid+", id="+id);
}

dTree.prototype.onFolderOpenClose = function() {
	//virtual method
	alert("Virtual method called:onFolderOpenClose\n(onFolderOpenClose)");
}

dTree.prototype.destroy = function() {
	var oNode = document.getElementById('mst_root_'+this.obj);
  //remove the div that holds oNode
	oNode.parentNode.parentNode.removeChild(oNode.parentNode);
	oNode = null;
};

dTree.prototype.serialize = function() {
	var str='';
	if(this.selectedNode != null) str = '<serialized selectedNode="'+this.selectedNode+'">';
	else str = '<serialized selectedNode="">';
	for (var n=0; n<this.aNodes.length; n++) {
		str += this.aNodes[n].serialize();
	}
	return str+'</serialize>';
};

dTree.prototype.spawnAsChildNode = function(oParentNode) {
	var oNode = document.createElement('div');
  oNode.style.padding = "5px";
	oNode.innerHTML = this.toString();
	oParentNode.appendChild(oNode);
}

// Adds a new node to the node array

dTree.prototype.add = function(id, pid, name, url, title, target, icon, iconOpen, open, isDragable, dragData, customData, onMouseOverEvent, onMouseOutEvent) {
	if(typeof(isDragable) == 'undefined') isDragable=false;
	if(typeof(dragData)=='undefined') dragData=null; 
	this.aNodes[this.aNodes.length] = new Node(this._nameSpace, id, pid, name, url, title, target, icon, iconOpen, open, isDragable, dragData, customData, onMouseOverEvent, onMouseOutEvent);
	//if(this.aNodes.length==1) this.aNodes[this.aNodes.length-1].serialize();
};

dTree.prototype.sort = function() {
  this.sortChildNodes(this._nameSpace + "-2");
};

// Open/close all nodes

dTree.prototype.openAll = function() {

	this.oAll(true);

};

dTree.prototype.closeAll = function() {

	this.oAll(false);

};

// Outputs the tree to the page
dTree.prototype.toString = function() {

	var str = '<div id="mst_root_'+this.obj+'" class="dtree">\n';

	if (document.getElementById) {

		if (this.config.useCookies) this.selectedNode = this.getSelected();

		str += this.addNode(this.root);

	} else str += 'Browser not supported.';

	str += '</div>';

	if (!this.selectedFound) this.selectedNode = null;

	this.completed = true;

	return str;
};


// Creates the tree structure
dTree.prototype.addNode = function(pNode) {
	var str = '';
	var n=0;

	if (this.config.inOrder) n = pNode._ai;

	for (n; n<this.aNodes.length; n++) {
		if (this.aNodes[n].pid == pNode.id) {
		
			var cn = this.aNodes[n];

			cn._p = pNode;

			cn._ai = n;

			this.setCS(cn, true);
			
			if (!cn.target && this.config.target) cn.target = this.config.target;

			if (cn._hc && !cn._io && this.config.useCookies) cn._io = this.isOpen(cn.id);

			if (!this.config.folderLinks && cn._hc) cn.url = null;

			if (this.config.useSelection && cn.id == this.selectedNode && !this.selectedFound) {

					cn._is = true;

					this.selectedNode = n;

					this.selectedFound = true;

			}

			str += this.node(cn, n);

			if (cn._ls) break;
			
		}

	}

	return str;
};



// Creates the node icon, url and text

dTree.prototype.node = function(node, nodeId) {

	var str = '<div class="dTreeNode">' + this.indent(node, nodeId);

	if (this.config.useIcons) {

		if (!node.icon) node.icon = (this.root.id == node.pid) ? this.icon.root : ((node._hc) ? this.icon.folder : this.icon.node);

		if (!node.iconOpen) node.iconOpen = (node._hc) ? this.icon.folderOpen : this.icon.node;
/*
		if (this.root.id == node.pid) {

			node.icon = this.icon.root;

			node.iconOpen = this.icon.root;

		}
*/
		str += '<img ondragstart="return false;" id="i' + this.obj + nodeId + '" src="' + ((node._io) ? node.iconOpen : node.icon) + '" alt="" />';

	}

	if (node.url) {

		//original implementation:
		//str += '<a id="s' + this.obj + nodeId + '" class="' + ((this.config.useSelection) ? ((node._is ? 'nodeSel' : 'node')) : 'node') + '" href="' + node.url + '"';
		//removes hyperlinking and inserts a cursor type:
		str += '<a href="javascript: ;" id="s' + this.obj + nodeId + '" class="' + ((this.config.useSelection) ? ((node._is ? 'nodeSel' : 'node')) : 'node') + '"';

		if (node.title) str += ' title="' + node.title + '"';

    if (node.onMouseOverEvent) str += ' onMouseOver="' + node.onMouseOverEvent + '"';

    if (node.onMouseOutEvent) str += ' onMouseOut="' + node.onMouseOutEvent + '"';

		if (node.target) str += ' target="' + node.target + '"';

		if (this.config.useStatusText) str += ' onmouseover="window.status=\'' + node.name + '\';return true;" onmouseout="window.status=\'\';return true;" ';
    else {
      str += ' onmouseover="this.style.textDecoration=\'underline\'"';
      str += ' onmouseout="this.style.textDecoration=\'none\'"';
    }
    

		if (this.config.useSelection && ((node._hc && this.config.folderLinks) || !node._hc)) {
			
			if(node.isDragable==true) {

				str+= ' onmousedown="this.dragDrop();" ondragstart="window.event.dataTransfer.setData(\'text\', \'' + node.dragData +  '\');"';

			}

			else str += ' onclick="javascript: ' + this.obj + '.c(' + nodeId + '); ' + this.obj + '.s(' + nodeId + ');"';
		}
    else {
      str += ' onclick="javascript: ' + this.obj + '.c(' + nodeId + ');"';
    }
		
		str += '>';
		
	}

	else if ((!this.config.folderLinks || !node.url) && node._hc && node.pid != this.root.id) {
		str += '<a href="javascript: ' + this.obj + '.o(' + nodeId + ');" class="node"';
		if (node.title) str += ' title="' + node.title + '"';
		str += '>';
  }

  if(node.name)
  	str += node.name;

	if (node.url || ((!this.config.folderLinks || !node.url) && node._hc)) str += '</a>';

	str += '</div>';

	if (node._hc) {
		str += '<div id="d' + this.obj + nodeId + '" class="clip" style="display:' + ((this.root.id == node.pid || node._io) ? 'block' : 'none') + ';">';

		str += this.addNode(node);

		str += '</div>';

	}

	this.aIndent.pop();

	return str;

};



// Adds the empty and line icons

dTree.prototype.indent = function(node, nodeId) {

	var str = '';

	if (this.root.id != node.pid) {

		for (var n=0; n<this.aIndent.length; n++)

			str += '<img ondragstart="return false;" src="' + ( (this.aIndent[n] == 1 && this.config.useLines) ? this.icon.line : this.icon.empty ) + '" alt="" />';

		(node._ls) ? this.aIndent.push(0) : this.aIndent.push(1);

		if (node._hc) {

			str += '<a href="javascript: ' + this.obj + '.o(' + nodeId + ');"><img ondragstart="return false;" id="j' + this.obj + nodeId + '" src="';		//collaps/xpand tree node

			if (!this.config.useLines) str += (node._io) ? this.icon.nlMinus : this.icon.nlPlus;

			else str += ( (node._io) ? ((node._ls && this.config.useLines) ? this.icon.minusBottom : this.icon.minus) : ((node._ls && this.config.useLines) ? this.icon.plusBottom : this.icon.plus ) );

			str += '" alt="" /></a>';

		} else str += '<img ondragstart="return false;" src="' + ( (this.config.useLines) ? ((node._ls) ? this.icon.joinBottom : this.icon.join ) : this.icon.empty) + '" alt="" />';

	}

	return str;

};



// Checks if a node has any children and if it is the last sibling

dTree.prototype.setCS = function(node, setLastSibling) {

	var lastId;

	for (var n=0; n<this.aNodes.length; n++) {
		//alert(">>"+this.aNodes[n].pid+"<<==>>"+node.id+"<<");
		
		var s1= new String(this.aNodes[n].pid);
		var s2 = new String(node.id);
		
		//if(s1.toString() == s2.toString()) alert("eq");
		
		if (this.aNodes[n].pid == node.id) node._hc = true;

		if ((setLastSibling) && (this.aNodes[n].pid == node.pid)) lastId = this.aNodes[n].id;

	}

	if (lastId==node.id) node._ls = true;

};



// Returns the selected node

dTree.prototype.getSelected = function() {

	var sn = this.getCookie('cs' + this.obj);

	return (sn) ? sn : null;

};

// Node clicked. fire click event
dTree.prototype.c = function(id) {
	var cn = this.aNodes[id];
  var ns= new String(cn._nameSpace);				//remove custom 
  var parent = (cn.pid).slice(ns.length, (cn.pid).length);	//namespacing
  var current = (cn.id).slice(ns.length, (cn.id).length);		//outsiders
  
  this.onClickNode(parent,current);
};

// Highlights the selected node

dTree.prototype.s = function(id) {
	if (!this.config.useSelection) return;

	var cn = this.aNodes[id];

	if (cn._hc && !this.config.folderLinks) return;

	if (this.selectedNode != id) {

		if (this.selectedNode || this.selectedNode==0) {

			eOld = document.getElementById("s" + this.obj + this.selectedNode);

			eOld.className = "node";

		}

		eNew = document.getElementById("s" + this.obj + id);

		eNew.className = "nodeSel";

		this.selectedNode = id;

		if (this.config.useCookies) this.setCookie('cs' + this.obj, cn.id);

		var ns= new String(cn._nameSpace);				//remove custom 
		var parent = (cn.pid).slice(ns.length, (cn.pid).length);	//namespacing
		var current = (cn.id).slice(ns.length, (cn.id).length);		//outsiders
		
		this.onSelectNode(parent,current);
	}

};



// Toggle Open or close

dTree.prototype.o = function(id) {

	var cn = this.aNodes[id];

	this.nodeStatus(!cn._io, id, cn._ls);

	cn._io = !cn._io;

	if (this.config.closeSameLevel) this.closeLevel(cn);

	if (this.config.useCookies) this.updateCookie();
	this.onFolderOpenClose();
};



// Open or close all nodes

dTree.prototype.oAll = function(status) {

	for (var n=0; n<this.aNodes.length; n++) {

		if (this.aNodes[n]._hc && this.aNodes[n].pid != this.root.id) {

			this.nodeStatus(status, n, this.aNodes[n]._ls)

			this.aNodes[n]._io = status;

		}

	}

	if (this.config.useCookies) this.updateCookie();
	
	this.onFolderOpenClose();

};


dTree.prototype.getCustomData = function(nId) {
  for (var n=0; n<this.aNodes.length; n++) {
    if (this.aNodes[n].id == this._nameSpace + nId) {
      return this.aNodes[n].customData;
    }
  }
  return null;
}

// Opens the tree to a specific node

dTree.prototype.openTo = function(nId, bSelect, bFirst) {

	if (!bFirst) {

		for (var n=0; n<this.aNodes.length; n++) {
			if (this.aNodes[n].id == this._nameSpace + nId) {

				nId=n;

				break;

			}

		}

	}

	var cn=this.aNodes[nId];

	if (cn.pid==this.root.id || !cn._p) return;

	cn._io = true;

	cn._is = bSelect;

	if (this.completed && cn._hc) this.nodeStatus(true, cn._ai, cn._ls);

	if (this.completed && bSelect) this.s(cn._ai);

	else if (bSelect) this._sn=cn._ai;

	this.openTo(cn._p._ai, false, true);

};



// Closes all nodes on the same level as certain node

dTree.prototype.closeLevel = function(node) {

	for (var n=0; n<this.aNodes.length; n++) {

		if (this.aNodes[n].pid == node.pid && this.aNodes[n].id != node.id && this.aNodes[n]._hc) {

			this.nodeStatus(false, n, this.aNodes[n]._ls);

			this.aNodes[n]._io = false;

			this.closeAllChildren(this.aNodes[n]);

		}

	}

}



// Closes all children of a node

dTree.prototype.closeAllChildren = function(node) {

	for (var n=0; n<this.aNodes.length; n++) {

		if (this.aNodes[n].pid == node.id && this.aNodes[n]._hc) {

			if (this.aNodes[n]._io) this.nodeStatus(false, n, this.aNodes[n]._ls);

			this.aNodes[n]._io = false;

			this.closeAllChildren(this.aNodes[n]);		

		}

	}

}



// Change the status of a node(open or closed)

dTree.prototype.nodeStatus = function(status, id, bottom) {

	eDiv	= document.getElementById('d' + this.obj + id);

	eJoin	= document.getElementById('j' + this.obj + id);

	if (this.config.useIcons) {

		eIcon	= document.getElementById('i' + this.obj + id);

		eIcon.src = (status) ? this.aNodes[id].iconOpen : this.aNodes[id].icon;

	}

	eJoin.src = (this.config.useLines)?

	((status)?((bottom)?this.icon.minusBottom:this.icon.minus):((bottom)?this.icon.plusBottom:this.icon.plus)):

	((status)?this.icon.nlMinus:this.icon.nlPlus);

	eDiv.style.display = (status) ? 'block': 'none';

};





// [Cookie] Clears a cookie

dTree.prototype.clearCookie = function() {

	var now = new Date();

	var yesterday = new Date(now.getTime() - 1000 * 60 * 60 * 24);

	this.setCookie('co'+this.obj, 'cookieValue', yesterday);

	this.setCookie('cs'+this.obj, 'cookieValue', yesterday);

};



// [Cookie] Sets value in a cookie

dTree.prototype.setCookie = function(cookieName, cookieValue, expires, path, domain, secure) {

	document.cookie =

		escape(cookieName) + '=' + escape(cookieValue)

		+ (expires ? '; expires=' + expires.toGMTString() : '')

		+ (path ? '; path=' + path : '')

		+ (domain ? '; domain=' + domain : '')

		+ (secure ? '; secure' : '');

};



// [Cookie] Gets a value from a cookie

dTree.prototype.getCookie = function(cookieName) {

	var cookieValue = '';

	var posName = document.cookie.indexOf(escape(cookieName) + '=');

	if (posName != -1) {

		var posValue = posName + (escape(cookieName) + '=').length;

		var endPos = document.cookie.indexOf(';', posValue);

		if (endPos != -1) cookieValue = unescape(document.cookie.substring(posValue, endPos));

		else cookieValue = unescape(document.cookie.substring(posValue));

	}

	return (cookieValue);

};



// [Cookie] Returns ids of open nodes as a string

dTree.prototype.updateCookie = function() {

	var str = '';

	for (var n=0; n<this.aNodes.length; n++) {

		if (this.aNodes[n]._io && this.aNodes[n].pid != this.root.id) {

			if (str) str += '.';

			str += this.aNodes[n].id;

		}

	}

	this.setCookie('co' + this.obj, str);

};



// [Cookie] Checks if a node id is in a cookie

dTree.prototype.isOpen = function(id) {

	var aOpen = this.getCookie('co' + this.obj).split('.');

	for (var n=0; n<aOpen.length; n++)

		if (aOpen[n] == id) return true;

	return false;

};

// If Push and pop is not implemented by the browser

if (!Array.prototype.push) {

	Array.prototype.push = function array_push() {

		for(var i=0;i<arguments.length;i++)

			this[this.length]=arguments[i];

		return this.length;

	}

};

if (!Array.prototype.pop) {

	Array.prototype.pop = function array_pop() {

		lastElement = this[this.length-1];

		this.length = Math.max(this.length-1,0);

		return lastElement;

	}

};

dTree.prototype.sortChildNodes = function(pid) {
  var childNodes = new Array();
  var childNodesArrayIndex = new Array();
  //get all nodes that has this node as a parent
  for(var i=0; i<this.aNodes.length; i++) {
    if(this.aNodes[i].pid == pid) {
      childNodes[childNodes.length] = this.aNodes[i];
      childNodesArrayIndex[childNodesArrayIndex.length] = i;
    }
  }

  childNodes.sort(this.sortCompareFunction);

  for(var i=0; i<childNodes.length; i++) {
    this.aNodes[childNodesArrayIndex[i]] = childNodes[i];
  }

  //find nodes with childs and sort them
  for(var i=0; i<childNodes.length; i++) {
    this.setCS(childNodes[i], false);
    if(childNodes[i]._hc == true) {
      this.sortChildNodes(childNodes[i].id);
    }
  }
};

dTree.prototype.sortCompareFunction = function(nodeA, nodeB) {
  var lowerA = nodeA.name.toLowerCase();
  var lowerB = nodeB.name.toLowerCase();
  if(lowerA > lowerB) {
    return 1;
  }
  else if(lowerA < lowerB) {
    return -1;
  }
  return 0;
};