/************************************************************************************************************
	(C) www.dhtmlgoodies.com, October 2005
	
	Update log:
	December, 19th, 2005 - Version 1.1: Added support for several trees on a page
	January,  25th, 2006 - Version 1.2: Added onclick event to text nodes.
	February, 3rd 2006 - Dynamic load nodes by use of Ajax
	
	
	This is a script from www.dhtmlgoodies.com. You will find this and a lot of other scripts at our website.	
	
	Terms of use:
	You are free to use this script as long as the copyright message is kept intact. However, you may not
	redistribute, sell or repost it without our permission.
	
	Thank you!
	
	www.dhtmlgoodies.com
	Alf Magne Kalleland
	
	************************************************************************************************************/
		
	/* var idOfFolderTrees = ['dg_tree','dg_tree2']; */
	var idOfFolderTrees = ['sitemap_tree'];
	
	var imageFolder = 'pics/icons/';	// Path to images
	var folderImage = 'folder.gif';
	var plusImage = 'dg_plus.gif';
	var minusImage = 'dg_minus.gif';
	var gblInitExpandedNodes = '';	// Cookie - initially expanded nodes;
	var useAjaxToLoadNodesDynamically = true;
	var ajaxRequestFile = 'pagenode.php';
	var contextMenuActive = false;	// Set to false if you don't want to be able to delete and add new nodes dynamically
	
	var ajaxObjectArray = new Array();
	var treeUlCounter = 4000;
	var nodeId = 1;
	var gblExpandInProgress = false;  /* set to true during expand */
	var gblMaxTries = 120;
	var gblSingleThreadInitTree = false; /* set to true to single thread the rebuild of init tree and disallow async click opening of trees */

	function expandAll(treeId)
	{
		var menuItems = document.getElementById(treeId).getElementsByTagName('LI');
		for(var no=0;no<menuItems.length;no++){
			var subItems = menuItems[no].getElementsByTagName('UL');
			if(subItems.length>0 && subItems[0].style.display!='block'){
				showHideNode(false,menuItems[no].id.replace(/[^0-9]/g,''),gblMaxTries);
				removeChildNodesFromInitExpandedList(menuItems[no].id);
			}			
		}
	}
	
	function collapseAll(treeId)
	{
		var menuItems = document.getElementById(treeId).getElementsByTagName('LI');
		for(var no=0;no<menuItems.length;no++){
			var subItems = menuItems[no].getElementsByTagName('UL');
			if(subItems.length>0 && subItems[0].style.display=='block'){
				showHideNode(false,menuItems[no].id.replace(/[^0-9]/g,''),gblMaxTries);
			}			
		}
		//Set_Cookie('dg_expandedNodes','',500);

		saveNodeListToSession('');
	}
	
	function saveNodeListToSession(nodelist) 
	{
		ajaxObjectArray[ajaxObjectArray.length] = new sack();
		var ajaxIndex = ajaxObjectArray.length-1;
		ajaxObjectArray[ajaxIndex].requestFile = ajaxRequestFile + '?node_list='+nodelist;
		ajaxObjectArray[ajaxIndex].onCompletion = function() { saveNodeListToSessionComplete(ajaxIndex); };
		ajaxObjectArray[ajaxIndex].runAJAX();		// Execute AJAX function
	}
	
	function saveNodeListToSessionComplete(ajaxIndex) 
	{
		ajaxObjectArray[ajaxIndex] = false;
	}

	function getNodeDataFromServer(ajaxIndex,ulId,parentId)
	{
		document.getElementById(ulId).innerHTML = ajaxObjectArray[ajaxIndex].response;
		ajaxObjectArray[ajaxIndex] = false;
		parseSubItems(ulId,parentId);
	}

	function parseSubItems(ulId,parentId)
	{
		if(gblInitExpandedNodes){
			var nodes = gblInitExpandedNodes.split(',');
		}
		var branchObj = document.getElementById(ulId);
		var menuItems = branchObj.getElementsByTagName('LI');	// Get an array of all menu items
		for(var no=0;no<menuItems.length;no++){
			var imgs = menuItems[no].getElementsByTagName('IMG');
//			if(imgs.length>0)continue;
			
			if (imgs.length > 0 && menuItems[no].firstChild.tagName=='IMG') {
				continue;
			}
			
			nodeId++;
			var subItems = menuItems[no].getElementsByTagName('UL');
			var img = document.createElement('IMG');
			img.src = imageFolder + plusImage;
			img.onclick = showHideNode;
			img.style.cursor = 'pointer';
			if(subItems.length==0)img.style.visibility='hidden';else{
				subItems[0].id = 'tree_ul_' + treeUlCounter;
				treeUlCounter++;
			}
			var aTag = menuItems[no].getElementsByTagName('A')[0];
// uncomment next line to make text nodes clickable
//			aTag.onclick = showHideNode;
			if(contextMenuActive)aTag.oncontextmenu = showContextMenu;

							
			menuItems[no].insertBefore(img,aTag);
			//menuItems[no].id = 'dg_treeNode' + nodeId;
			if(!menuItems[no].id)menuItems[no].id = 'dg_treeNode' + nodeId;
			var folderImg = document.createElement('IMG');
			if(menuItems[no].className){
				folderImg.src = imageFolder + menuItems[no].className;
			}else{
				folderImg.src = imageFolder + folderImage;
			}
			menuItems[no].insertBefore(folderImg,aTag);
			
			var tmpParentId = menuItems[no].getAttribute('cat_id');
			if(!tmpParentId)tmpParentId = menuItems[no].tmpParentId;
			if(tmpParentId && nodes[tmpParentId])showHideNode(false,nodes[no],gblMaxTries);
		}		
	}
		
	function refreshTreeNode(inputId) {
		/* find the first UL in the tree */
		if(!document.getElementById('dg_treeNode'+inputId))return;
		thisNode = document.getElementById('dg_treeNode'+inputId).getElementsByTagName('IMG')[0]; 
		var parentNode = thisNode.parentNode;
		thisNode.src = thisNode.src.replace(minusImage,plusImage);
		var ul = parentNode.getElementsByTagName('UL')[0];
		
		if(!ul.hasChildNodes()) return;
		var cat_id = ul.firstChild.getAttribute('cat_id');
		/* remove all the LI's under UL */
		while (ul.hasChildNodes())
			ul.removeChild(ul.lastChild);

/*	change NOCATCLICK next line */
		/* add back an LI containing the original key */			
		/* restore the Loading message */		
		var li = document.createElement('LI');
		li.className='loading_anim.gif';
		li.setAttribute('cat_id',cat_id)
		var a = document.createElement('A');
		a.href = '#';
		a.innerHTML = '<span class=small>Loading...</span>';
		li.appendChild(a);
		ul.appendChild(li);
		ul.id = 'newNode' + Math.round(Math.random()*1000000);
		parseSubItems(ul.id);		

		showHideNode(false,inputId);
		return false;		
	}
	
	function rescheduleShowHide(inputId,triesLeft) {
		/* if a node is not ready to be expanded, reschedule the showHideNode here */
		if (!inputId) return;
		var maxTries = 120;
		var timeBetweenTries = 500;
		
		var triesLeftParm;
		if (triesLeft)
			triesLeftParm = triesLeft;
		else
			triesLeftParm = maxTries;

		triesLeftParm--;
		if (triesLeftParm>0) {
			window.setTimeout("showHideNode(false," + inputId + "," + triesLeftParm + ")", timeBetweenTries);
		} else {
			/* can't find the node after 30 seconds; delete it from the list */
			gblInitExpandedNodes = gblInitExpandedNodes.replace(',' + inputId,'');
			saveNodeListToSession(gblInitExpandedNodes);
		}
	}

	function removeChildNodesFromInitExpandedList(ulId)
	{
		/* removes any subcategories cat_id's from the initExpandedList that may be open under the category being closed */
		var menuItems = ulId.getElementsByTagName('LI');	// Get an array of all menu items
		for(var no=0;no<menuItems.length;no++){
			var subItems = menuItems[no].getElementsByTagName('UL');
			for(var sno=0;sno<subItems.length;sno++)
				removeChildNodesFromInitExpandedList(subItems[sno]);
			var cat_id = menuItems[no].id.replace(/[^0-9]/g,'');
			if(cat_id)
				gblInitExpandedNodes = gblInitExpandedNodes.replace(',' + cat_id,'');
		}
	}
	
	function showHideNode(e,inputId,triesLeft)
	{
		if(gblExpandInProgress && gblSingleThreadInitTree) {
			rescheduleShowHide(inputId,triesLeft);
			return;
		}
		if(inputId){
			if(!document.getElementById('dg_treeNode'+inputId)) {
				rescheduleShowHide(inputId,triesLeft);
				return;
			}
			
			thisNode = document.getElementById('dg_treeNode'+inputId).getElementsByTagName('IMG')[0]; 
		}else {
			thisNode = this;
			if(this.tagName=='A')thisNode = this.parentNode.getElementsByTagName('IMG')[0];	
			
		}

		if(!thisNode.style) {
			rescheduleShowHide(inputId,triesLeft);
			return;
		}
		
		if(thisNode.style.visibility=='hidden') {
			return;
		}

		var gblInitExpandedNodesOrig = gblInitExpandedNodes;

		gblExpandInProgress = true;
		
		var parentNode = thisNode.parentNode;
		inputId = parentNode.id.replace(/[^0-9]/g,'');
		
		var ul = parentNode.getElementsByTagName('UL')[0];
		var nosave = ul.getAttribute('nosave');	// nosave tag is set to prevent saving this node in the initList
		
		if(thisNode.src.indexOf(plusImage)>=0){
			thisNode.src = thisNode.src.replace(plusImage,minusImage);
			ul.style.display='block';
			
			if (!nosave) {
				if(!gblInitExpandedNodes)gblInitExpandedNodes = ',';
				if(gblInitExpandedNodes.indexOf(',' + inputId + ',')<0) gblInitExpandedNodes = gblInitExpandedNodes + inputId + ',';
			}
			if(useAjaxToLoadNodesDynamically){	// Using AJAX/XMLHTTP to get data from the server
				var firstLi = ul.getElementsByTagName('LI')[0];
				var parentId = firstLi.getAttribute('cat_id');
				var loaded = firstLi.getAttribute('loaded');	// loaded tag is set once the UL is loaded
				var onlyActive = firstLi.getAttribute('show_all');	// show_all tag is set once the UL is loaded
				if(!parentId)parentId = firstLi.parentId;
					
				if(parentId && !loaded){  
					ajaxObjectArray[ajaxObjectArray.length] = new sack();
					var ajaxIndex = ajaxObjectArray.length-1;
					ajaxObjectArray[ajaxIndex].requestFile = ajaxRequestFile + '?cat_id=' + parentId + 
'&node_id=' + inputId + '&show_all=' + onlyActive;
					ajaxObjectArray[ajaxIndex].onCompletion = function() { 
getNodeDataFromServer(ajaxIndex,ul.id,parentId); gblExpandInProgress = false; };	// Specify function that will be executed after file has been found
					ajaxObjectArray[ajaxIndex].runAJAX();		// Execute AJAX function
				}			
			}
		}else{
			thisNode.src = thisNode.src.replace(minusImage,plusImage);
			ul.style.display='none';
			if (!nosave) {
				gblInitExpandedNodes = gblInitExpandedNodes.replace(',' + inputId,'');
				removeChildNodesFromInitExpandedList(ul);
			}
			gblExpandInProgress = false;
		}	
		
		if (gblInitExpandedNodes != gblInitExpandedNodesOrig)
			saveNodeListToSession(gblInitExpandedNodes);
		
		/* enabling node restore function - still buggy - debugging it in process */
		//Set_Cookie('dg_expandedNodes',gblInitExpandedNodes,500);
		/* disabling node restore function - buggy */
		//Set_Cookie('dg_expandedNodes','',500);
		
		
		return false;
	}
	
	var okToCreateSubNode = true;
	function addNewNode(e)
	{
		if(!okToCreateSubNode)return;
		setTimeout('okToCreateSubNode=true',200);
		contextMenuObj.style.display='none';
		okToCreateSubNode = false;
		source = contextMenuSource;
		while(source.tagName.toLowerCase()!='li')source = source.parentNode;
		
	
		/*
		if (e.target) source = e.target;
			else if (e.srcElement) source = e.srcElement;
			if (source.nodeType == 3) // defeat Safari bug
				source = source.parentNode; */
		//while(source.tagName.toLowerCase()!='li')source = source.parentNode;
		var nameOfNewNode = prompt('Name of new node');
		if(!nameOfNewNode)return;

		uls = source.getElementsByTagName('UL');
		if(uls.length==0){
			var ul = document.createElement('UL');
			source.appendChild(ul);
			
		}else{
			ul = uls[0];
			ul.style.display='block';
		}
		var img = source.getElementsByTagName('IMG');
		img[0].style.visibility='visible';
		var li = document.createElement('LI');
		li.className='dg_sheet.gif';
		var a = document.createElement('A');
		a.href = '#';
		a.innerHTML = nameOfNewNode;
		li.appendChild(a);
		ul.id = 'newNode' + Math.round(Math.random()*1000000);
		ul.appendChild(li);
		parseSubItems(ul.id);
		saveNewNode(nameOfNewNode,source.getElementsByTagName('A')[0].id);
		
	}
	
	/* Save a new node */
	function saveNewNode(nodeText,parentId)
	{
		self.status = 'Ready to save node ' + nodeText + ' which is a sub item of ' + parentId;
		// Use an ajax method here to save this new node. example below:
		/*
		ajaxObjectArray[ajaxObjectArray.length] = new sack();
		var ajaxIndex = ajaxObjectArray.length-1;
		ajaxObjectArray[ajaxIndex].requestFile = ajaxRequestFile + '?newNode=' + nodeText + '&cat_id=' + parentId		
			
		ajaxObjectArray[ajaxIndex].onCompletion = function() { self.status = 'New node has been saved'; };	// Specify 
function that will be executed after file has been found					
		ajaxObjectArray[ajaxIndex].runAJAX();		// Execute AJAX function
		*/		
	}
	
	function deleteNode()
	{
		if(!okToCreateSubNode)return;		
		setTimeout('okToCreateSubNode=true',200);		
		contextMenuObj.style.display='none';
		source = contextMenuSource;
		
		if(!confirm('Click OK to delete the node ' + source.innerHTML))return;
		okToCreateSubNode = false;
		
		var parentLi = source.parentNode.parentNode.parentNode;
		while(source.tagName.toLowerCase()!='li')source = source.parentNode;		

		var lis = source.parentNode.getElementsByTagName('LI');
		source.parentNode.removeChild(source);
		if(lis.length==0)parentLi.getElementsByTagName('IMG')[0].style.visibility='hidden';
		deleteNodeOnServer(source.id);
	}
	
	function deleteNodeOnServer(nodeId)
	{
		self.status = 'Ready to delete node' + nodeId;
		// Use an ajax method here to save this new node. example below:
		/*
		ajaxObjectArray[ajaxObjectArray.length] = new sack();
		var ajaxIndex = ajaxObjectArray.length-1;
		ajaxObjectArray[ajaxIndex].requestFile = ajaxRequestFile + '?deleteNodeId=' + nodeId					
		ajaxObjectArray[ajaxIndex].onCompletion = function() { self.status = 'Node has been deleted successfully'; };	// 
Specify function that will be executed after file has been found					
		ajaxObjectArray[ajaxIndex].runAJAX();		// Execute AJAX function
		*/				
		
	}
	
	function initTree(gblInitExpandedNodesStart)
	{
//		alert('initTree loading passed='+gblInitExpandedNodes);
		gblInitExpandedNodes = gblInitExpandedNodesStart;
		for(var treeCounter=0;treeCounter<idOfFolderTrees.length;treeCounter++){
			var dg_tree = document.getElementById(idOfFolderTrees[treeCounter]);
			if (!dg_tree) return;
			var menuItems = dg_tree.getElementsByTagName('LI');	// Get an array of all menu items
			for(var no=0;no<menuItems.length;no++){					
				nodeId++;
				var subItems = menuItems[no].getElementsByTagName('UL');
				var img = document.createElement('IMG');
				img.src = imageFolder + plusImage;
				img.style.cursor = 'pointer';
				img.onclick = showHideNode;
				if(subItems.length==0)img.style.visibility='hidden';else{
					subItems[0].id = 'tree_ul_' + treeUlCounter;
					treeUlCounter++;
				}
				var aTag = menuItems[no].getElementsByTagName('A')[0];
				if(contextMenuActive)aTag.oncontextmenu = showContextMenu;
/*	change NOCATCLICK next line */
/*  uncomment next line to make text nodes clickable */
/*				aTag.onclick = showHideNode;  */
				menuItems[no].insertBefore(img,aTag);
				if(!menuItems[no].id)menuItems[no].id = 'dg_treeNode' + nodeId;
				var folderImg = document.createElement('IMG');
				if(menuItems[no].className){
					folderImg.src = imageFolder + menuItems[no].className;
				}else{
					folderImg.src = imageFolder + folderImage;
				}
				menuItems[no].insertBefore(folderImg,aTag);
			}	
		
		}
//		gblInitExpandedNodes = Get_Cookie('dg_expandedNodes');
		
		if(gblInitExpandedNodes){
			var nodes = gblInitExpandedNodes.split(',');
			/* gblInitExpandedNodes = ''; */
			for(var no=0;no<nodes.length;no++){
//				if(nodes[no])showHideNode(false,nodes[no]);	

				if (gblSingleThreadInitTree) {
					if(nodes[no])singleThreadShowHideNode(nodes[no],gblMaxTries);	
				} else {
					if(nodes[no])showHideNode(false,nodes[no],gblMaxTries);	
				}
			}			
		}			
		
	}

	function singleThreadShowHideNode(inputId,triesLeft) {
		var timeBetweenTries = 500;

		if (triesLeft<1) {
			/* can't find the node after 30 seconds; delete it from the list */
			gblInitExpandedNodes = gblInitExpandedNodes.replace(',' + inputId,'');
			saveNodeListToSession(gblInitExpandedNodes);
			return;
		}
		
		if (gblExpandInProgress) {
			window.setTimeout("singleThreadShowHideNode(" + inputId + "," + (triesLeft-1) + ")",timeBetweenTries);			
			return;
		}
		
		showHideNode(false,inputId,gblMaxTries);
	}
	
	//window.onload = initTree;


	;