/**************************************************************************
	Copyright (c) 2001 Geir Landrö (drop@destroydrop.com)
	JavaScript Tree - www.destroydrop.com/hugi/javascript/tree/
	Version 0.96	

	This script can be used freely as long as all copyright messages are
	intact.
**************************************************************************/

// Arrays for nodes and icons
var nodes		= new Array();
var openNodes	= new Array();
var icons		= new Array(12);
var defaultimgpath = "img";
var imgpath;
var OpenIconsEffect = true; // Cuando se crean más de dos árboles en una misma página,
                            // no se puede usar el efecto visual de iconos abiertos.  
							// a menos que los identificadores en cada uno de los árboles
							// sean totalmente distintos.

// Loads all icons that are used in the tree
function preloadIcons(iconspath) {	
	imgpath = iconspath;
	icons[0] = new Image();
	icons[0].src = iconspath + "/plus.gif";
	icons[1] = new Image();
	icons[1].src = iconspath + "/plusbottom.gif";
	icons[2] = new Image();
	icons[2].src = iconspath + "/minus.gif";
	icons[3] = new Image();
	icons[3].src = iconspath + "/minusbottom.gif";
	icons[4] = new Image();
	icons[4].src = iconspath + "/folder.gif";  // el nombre de este gif no puede cambiar porque se emplea abajo sin extensión.
	icons[5] = new Image();
	if (OpenIconsEffect) icons[5].src = iconspath + "/folderopen.gif"
	else icons[5].src = iconspath + "/folder.gif";
	icons[6] = new Image();
	icons[6].src = iconspath + "/base.gif"	
	icons[7] = new Image();
	icons[7].src = iconspath + "/line.gif";		
	icons[8] = new Image();
	icons[8].src = iconspath + "/empty.gif";			
	icons[9] = new Image();
	icons[9].src = iconspath + "/join.gif";	
	icons[10] = new Image();
	icons[10].src = iconspath + "/joinbottom.gif";	
	icons[11] = new Image();
	if (OpenIconsEffect) icons[11].src = iconspath + "/page.gif"
	else icons[11].src = iconspath + "/folder.gif";
}

// Create the tree
// Si openNode es cero, muestra el arbol completamente abierto.
function createTree(arrName, treeName, startNode, openNode, iconsPath) {
	if(!treeName) treeName = '';
	nodes = arrName;
	if (nodes.length > 0) {
		if (iconsPath != null) preloadIcons(iconsPath)
		else preloadIcons(defaultimgpath);
		if (startNode == null) startNode = 0;
		if (openNode != 0 || openNode != null) setOpenNodes(openNode);		
		if (openNode == 0) openTree();	
		if (startNode !=0) {
			var nodeValues = nodes[getArrayId(startNode)].split("|");
			document.write("<a href=\"" + nodeValues[3] + "\" onmouseover=\"window.status='" + nodeValues[2] + "';return true;\" onmouseout=\"window.status=' ';return true;\"><img src=\"" + icons[5].src + "\" align=\"absbottom\" alt=\"\" />" + nodeValues[2] + "</a><br />");
		} else document.write("<img src=\"" + icons[6].src + "\" align=\"absbottom\" alt=\"\" /><b> " + treeName + "</b><br>");
	
		var recursedNodes = new Array();				
		addNode(startNode, recursedNodes);		
	}	
}

// Returns the position of a node in the array
function getArrayId(node) {
	for (i=0; i<nodes.length; i++) {
		var nodeValues = nodes[i].split("|");
		if (nodeValues[0]==node) return i;
	}
}

// Puts in array nodes that will be open
function setOpenNodes(openNode) {
	for (i=0; i<nodes.length; i++) {
		var nodeValues = nodes[i].split("|");
		if (nodeValues[0]==openNode) {
			if (!isNodeOpen(nodeValues[0])) openNodes.push(nodeValues[0]);
			setOpenNodes(nodeValues[1]);
		}
	} 
}

// Checks if a node is open
function isNodeOpen(node) {
	for (i=0; i<openNodes.length; i++)
		if (openNodes[i]==node) return true;
	return false;
}
// Checks if a node has any children
function hasChildNode(parentNode) {
	for (i=0; i< nodes.length; i++) {
		var nodeValues = nodes[i].split("|");
		if (nodeValues[1] == parentNode) return true;
	}
	return false;
}

// Checks if a node is the last sibling
function lastSibling (node, parentNode) {
	var lastChild = 0;
	for (i=0; i< nodes.length; i++) {
		var nodeValues = nodes[i].split("|");
		if (nodeValues[1] == parentNode)
			lastChild = nodeValues[0];
	}
	if (lastChild==node) return true;
	return false;
}

// Adds a new node in the tree
function addNode(parentNode, recursedNodes, opened) {
	
	for (var i = 0; i < nodes.length; i++) {	

		var nodeValues = nodes[i].split("|");				
		if (nodeValues[1] == parentNode) {

			var ls	= lastSibling(nodeValues[0], nodeValues[1]);
			var hcn	= hasChildNode(nodeValues[0]);
			var ino = isNodeOpen(nodeValues[0]);

			// Write out line & empty icons
			for (g=0; g<recursedNodes.length; g++) {
				if (recursedNodes[g] == 1) document.write("<img src=\"" + icons[7].src + "\" align=\"absbottom\" alt=\"\" />");
				else  document.write("<img src=\"" + icons[8].src + "\" align=\"absbottom\" alt=\"\" />");
			}

			// put in array line & empty icons
			if (ls) recursedNodes.push(0);
			else recursedNodes.push(1);

			// Write out join icons
			if (hcn) {
				if (ls) {
					document.write("<a href=\"javascript: oc(" + nodeValues[0] + ", 1);\"><img id=\"join" + nodeValues[0] + "\" src=\"" + imgpath + "/");
					 	if (ino) document.write("minus");
						else document.write("plus");
					document.write("bottom.gif\" align=\"absbottom\" alt=\"Open/Close node\" /></a>");
				} else {
					document.write("<a href=\"javascript: oc(" + nodeValues[0] + ", 0);\"><img id=\"join" + nodeValues[0] + "\" src=\"" + imgpath + "/");
						if (ino) document.write("minus");
						else document.write("plus");
					document.write(".gif\" align=\"absbottom\" alt=\"Open/Close node\" /></a>");
				}
			} else {
				if (ls) document.write("<img src=\"" + icons[9].src + "\" align=\"absbottom\" alt=\"\" />");
				else document.write("<img src=\"" + icons[10].src + "\" align=\"absbottom\" alt=\"\" />");
			}

			// Start link
			document.write("<a target=\"" + nodeValues[4] + "\" href=\"" + nodeValues[3] + "\" onmouseover=\"window.status='" + nodeValues[2] + "';return true;\" onmouseout=\"window.status=' ';return true;\">");
			
			// Write out folder & page icons
			if (hcn) {
				document.write("<img id=\"icon" + nodeValues[0] + "\" src=\"" + imgpath + "/folder")
				if (ino && OpenIconsEffect) document.write("open");
				document.write(".gif\" align=\"absbottom\" alt=\"Folder\" /> ");			
			} else document.write("<img id=\"icon" + nodeValues[0] + "\" src=\"" + icons[11].src + "\" align=\"absbottom\" alt=\"Page\" /> ");
			
			// Write out node name
			document.write(nodeValues[2]);

			// End link
			document.write("</a><br />");
			
			// If node has children write out divs and go deeper
			if (hcn) {
				document.write("<div id=\"div" + nodeValues[0] + "\"");
					if (!ino) document.write(" style=\"display: none;\"");
				document.write(">");							
				addNode(nodeValues[0], recursedNodes, opened);
				document.write("</div>");
			}
			
			// remove last line or empty icon 
			recursedNodes.pop();
		}
	}
}

// Opens or closes a node
function oc(node, bottom) {
	var theDiv = document.getElementById("div" + node);
	var theJoin	= document.getElementById("join" + node);
	var theIcon = document.getElementById("icon" + node);
	
	if (theDiv.style.display == 'none') {
		if (bottom==1) theJoin.src = icons[3].src;
		else theJoin.src = icons[2].src;
		theIcon.src = icons[5].src;
		theDiv.style.display = '';
	} else {
		if (bottom==1) theJoin.src = icons[1].src;
		else theJoin.src = icons[0].src;
		theIcon.src = icons[4].src;
		theDiv.style.display = 'none';
	}
}

// Devuelve una lista con los identificadores de las hojas del arbol (nodos sin hijos).
function leavesList() {
	var listaDeHojas = '';
	for (x=0; x<nodes.length; x++) { // Notar que el contador no puede ser i, que es usado en setOpenNodes()
		var nodeValues = nodes[x].split("|");		
		var hasNoChildren = true;
		for (y=0; y<nodes.length; y++) {
			nodeValues2 = nodes[y].split("|");										
			if (nodeValues2[1]==nodeValues[0]) hasNoChildren = false;
		}		
		if (hasNoChildren) {
			if (listaDeHojas == '') listaDeHojas = nodeValues[0]
			else listaDeHojas = listaDeHojas + ',' + nodeValues[0]; 			
		}
	}	
	return listaDeHojas;
}

// Abre el arbol completamente.
function openTree() {
	for (i=0; i<nodes.length; i++) {
		var nodeValues = nodes[i].split("|");	
		if (!isNodeOpen(nodeValues[0])) openNodes.push(nodeValues[0]);			
	} 
}

// Push and pop not implemented in IE(crap!    don´t know about NS though)
if(!Array.prototype.push) {
	function array_push() {
		for(var i=0;i<arguments.length;i++)
			this[this.length]=arguments[i];
		return this.length;
	}
	Array.prototype.push = array_push;
}
if(!Array.prototype.pop) {
	function array_pop(){
		lastElement = this[this.length-1];
		this.length = Math.max(this.length-1,0);
		return lastElement;
	}
	Array.prototype.pop = array_pop;
}