//General
//for example: instead of each module writing out script found in moduleMaxMin_OnClick have the functionality cached
//

var ESS_COL_DELIMITER = String.fromCharCode(16);
var ESS_ROW_DELIMITER = String.fromCharCode(15);
var __ess_m_bPageLoaded = false;

window.onload = __ess_Page_OnLoad;

function __ess_ClientAPIEnabled()
{
	return typeof(ess) != 'undefined';
}


function __ess_Page_OnLoad()
{
	if (__ess_ClientAPIEnabled())
	{
		var sLoadHandlers = ess.getVar('__ess_pageload');
		if (sLoadHandlers != null)
			eval(sLoadHandlers);
	}
	__ess_m_bPageLoaded = true;
}

function __ess_KeyDown(iKeyCode, sFunc, e)
{
	if (e == null)
		e = window.event;

	if (e.keyCode == iKeyCode)
	{
		eval(unescape(sFunc));
		return false;
	}
}

function __ess_bodyscroll() 
{
	var oF=document.forms[0];	
	if (__ess_ClientAPIEnabled() && __ess_m_bPageLoaded)
		oF.ScrollTop.value=ess.dom.getByTagName("body")[0].scrollTop;
}

function __ess_setScrollTop(iTop)
{
	if (__ess_ClientAPIEnabled())
	{
		if (iTop == null)
			iTop = document.forms[0].ScrollTop.value;
	
		var sID = ess.getVar('ScrollToControl');
		if (sID != null && sID.length > 0)
		{
			var oCtl = ess.dom.getById(sID);
			if (oCtl != null)
			{
				iTop = ess.dom.positioning.elementTop(oCtl);
				ess.setVar('ScrollToControl', '');
			}
		}
		ess.dom.getByTagName("body")[0].scrollTop = iTop;
	}
}

//Focus logic
function __ess_SetInitialFocus(sID)
{
	var oCtl = ess.dom.getById(sID);	
	if (oCtl != null && __ess_CanReceiveFocus(oCtl))
		oCtl.focus();
}	

function __ess_CanReceiveFocus(e)
{
	//probably should call getComputedStyle for classes that cause item to be hidden
	if (e.style.display != 'none' && e.tabIndex > -1 && e.disabled == false && e.style.visible != 'hidden')
	{
		var eParent = e.parentElement;
		while (eParent != null && eParent.tagName != 'BODY')
		{
			if (eParent.style.display == 'none' || eParent.disabled || eParent.style.visible == 'hidden')
				return false;
			eParent = eParent.parentElement;
		}
		return true;
	}
	else
		return false;
}

//Max/Min Script
function __ess_ContainerMaxMin_OnClick(oLnk, sContentID)
{
	var oContent = ess.dom.getById(sContentID);
	if (oContent != null)
	{
		var oBtn = oLnk.childNodes[0];
		var sContainerID = oLnk.getAttribute('containerid');
		var sCookieID = oLnk.getAttribute('cookieid');
		var sCurrentFile = oBtn.src.toLowerCase().substr(oBtn.src.lastIndexOf('/'));
		var sMaxFile;
		var sMaxIcon;
		var sMinIcon;

		if (ess.getVar('min_icon_' + sContainerID))
			sMinIcon = ess.getVar('min_icon_' + sContainerID);
		else
			sMinIcon = ess.getVar('min_icon');

		if (ess.getVar('max_icon_' + sContainerID))
			sMaxIcon = ess.getVar('max_icon_' + sContainerID);
		else
			sMaxIcon = ess.getVar('max_icon');

		sMaxFile = sMaxIcon.toLowerCase().substr(sMaxIcon.lastIndexOf('/'));

		if (sCurrentFile == sMaxFile)
		{
			oBtn.src = sMinIcon;				
			oContent.style.display = '';
			oBtn.title = ess.getVar('min_text');
			if (sCookieID != null)
			{
				if (ess.getVar('__ess_' + sContainerID + ':defminimized') == 'true')
					ess.dom.setCookie(sCookieID, 'true', 365);
				else
					ess.dom.deleteCookie(sCookieID);
			}
			else
				ess.setVar('__ess_' + sContainerID + '_Visible', 'true');
		}
		else
		{
			oBtn.src = sMaxIcon;				
			oContent.style.display = 'none';
			oBtn.title = ess.getVar('max_text');
			if (sCookieID != null)
			{
				if (ess.getVar('__ess_' + sContainerID + ':defminimized') == 'true')
					ess.dom.deleteCookie(sCookieID);
				else
					ess.dom.setCookie(sCookieID, 'false', 365);				
			}
			else
				ess.setVar('__ess_' + sContainerID + '_Visible', 'false');			
		}
		
		return true;	//cancel postback
	}
	return false;	//failed so do postback
}
//--------------20050318
//--------------20050429 tabpane

function __ess_MouseOverTabPane(e){
	if (e != null){
		if (e.checkshow == 'false'){
			e.all.namedItem("left").className="TabPaneActiveLeft";
			e.all.namedItem("back").className="TabPaneActiveCenter";
			e.all.namedItem("right").className="TabPaneActiveRight";
		}
	}
}

function __ess_MouseOutTabPane(e){
	if (e != null){
		if (e.checkshow == 'false'){
				e.all.namedItem("left").className="TabPaneNormalLeft";
				e.all.namedItem("back").className="TabPaneNormalCenter";
				e.all.namedItem("right").className="TabPaneNormalRight";

		}
	}
}

function __ess_SetTabPane(sFirstTabPaneId, e){	
	var aryTabPanes=ess.getVar(sFirstTabPaneId).split(";");
	
	for (var i = 0; i< aryTabPanes.length-1; i++){
		var oTabPane=ess.dom.getById(aryTabPanes[i]);
		var oSection=ess.dom.getById(oTabPane.getAttribute("sectionid"));
		if(oTabPane.id==e.id)
		{
			oTabPane.className="TabPaneActive";
			oTabPane.all.namedItem("left").className="TabPaneActiveLeft";
			oTabPane.all.namedItem("back").className="TabPaneActiveCenter";
			oTabPane.all.namedItem("right").className="TabPaneActiveRight";
			
			oSection.style.display='';
			oTabPane.checkshow='true';
			ess.setVar(sFirstTabPaneId + ':SelectedTabPaneId', e.id);
		}
		else
		{
			oTabPane.className="TabPaneNormal";
			oTabPane.all.namedItem("left").className="TabPaneNormalLeft";
			oTabPane.all.namedItem("back").className="TabPaneNormalCenter";
			oTabPane.all.namedItem("right").className="TabPaneNormalRight";
			
			oSection.style.display='none';
			oTabPane.checkshow='false';
			//ess.setVar(oTabPane.id + ':exp', 0);
		}
		
			
	}
}


//--------------------------
function __ess_Help_OnClick(sHelpID)
{
	var oHelp = ess.dom.getById(sHelpID);
	if (oHelp != null)
	{
		if (oHelp.style.display == 'none')
			oHelp.style.display = '';
		else
			oHelp.style.display = 'none';

		return true;	//cancel postback
	}
	return false;	//failed so do postback
}

function __ess_SectionMaxMin(oBtn, sContentID)
{
	var oContent = ess.dom.getById(sContentID);
	if (oContent != null)
	{
		var sMaxIcon = oBtn.getAttribute('max_icon');
		var sMinIcon = oBtn.getAttribute('min_icon');
		if (oContent.style.display == 'none')
		{
			oBtn.src = sMinIcon;				
			oContent.style.display = '';
			ess.setVar(oBtn.id + ':exp', 1);
		}
		else
		{
			oBtn.src = sMaxIcon;				
			oContent.style.display = 'none';
			ess.setVar(oBtn.id + ':exp', 0);
		}
		return true;	//cancel postback
	}
	return false;	//failed so do postback
}

//Drag N Drop
function __ess_enableDragDrop()
{
	var aryConts = ess.getVar('__ess_dragDrop').split(";");	
	var aryTitles;

	for (var i=0; i < aryConts.length; i++)
	{
		aryTitles = aryConts[i].split(" ");
		if (aryTitles[0].length > 0)
		{			
			var oCtr = ess.dom.getById(aryTitles[0]);
			var oTitle = ess.dom.getById(aryTitles[1]);
			if (oCtr != null && oTitle != null)
			{
				oCtr.setAttribute('moduleid', aryTitles[2]);
				ess.dom.positioning.enableDragAndDrop(oCtr, oTitle, '__ess_dragComplete()', '__ess_dragOver()');
			}	
		}
	}
}

var __ess_oPrevSelPane;
var __ess_oPrevSelModule;
var __ess_dragEventCount=0;
function __ess_dragOver()
{
	__ess_dragEventCount++;
	if (__ess_dragEventCount % 75 != 0)	//only calculate position every 75 events
		return;
	
	var oCont = ess.dom.getById(ess.dom.positioning.dragCtr.contID);

	var oPane = __ess_getMostSelectedPane(ess.dom.positioning.dragCtr);
		
	if (__ess_oPrevSelPane != null)	//reset previous pane's border
		__ess_oPrevSelPane.pane.style.border = __ess_oPrevSelPane.origBorder;

	if (oPane != null)
	{		
		__ess_oPrevSelPane = oPane;
		oPane.pane.style.border = '4px double ' + ESS_HIGHLIGHT_COLOR;
		var iIndex = __ess_getPaneControlIndex(oCont, oPane);

		var oPrevCtl;
		var oNextCtl;
		for (var i=0; i<oPane.controls.length; i++)
		{
			if (iIndex > i && oPane.controls[i].id != oCont.id)
				oPrevCtl = oPane.controls[i];
			if (iIndex <= i && oPane.controls[i].id != oCont.id)
			{
				oNextCtl = oPane.controls[i];
				break;
			}
		}			
		
		if (__ess_oPrevSelModule != null)
			ess.dom.getNonTextNode(__ess_oPrevSelModule.control).style.border = __ess_oPrevSelModule.origBorder;
			

		if (oNextCtl != null)
		{
			__ess_oPrevSelModule = oNextCtl;
			ess.dom.getNonTextNode(oNextCtl.control).style.borderTop = '5px groove ' + ESS_HIGHLIGHT_COLOR;
		}
		else if (oPrevCtl != null)
		{
			__ess_oPrevSelModule = oPrevCtl;
			ess.dom.getNonTextNode(oPrevCtl.control).style.borderBottom = '5px groove ' + ESS_HIGHLIGHT_COLOR;
		}
	}
}

function __ess_dragComplete()
{
	var oCtl = ess.dom.getById(ess.dom.positioning.dragCtr.contID);
	var sModuleID = oCtl.getAttribute('moduleid');
	
	if (__ess_oPrevSelPane != null)
		__ess_oPrevSelPane.pane.style.border = __ess_oPrevSelPane.origBorder;

	if (__ess_oPrevSelModule != null)
		ess.dom.getNonTextNode(__ess_oPrevSelModule.control).style.border = __ess_oPrevSelModule.origBorder;
		
	var oPane = __ess_getMostSelectedPane(ess.dom.positioning.dragCtr);
	var iIndex;
	if (oPane == null)
	{
		var oPanes = __ess_Panes();
		for (var i=0; i<oPanes.length; i++)
		{
			if (oPanes[i].id == oCtl.parentNode.id)
				oPane = oPanes[i];
		}
	}	
	if (oPane != null)
	{
		iIndex = __ess_getPaneControlIndex(oCtl, oPane);
		__ess_MoveToPane(oPane, oCtl, iIndex);

		ess.callPostBack('MoveToPane', 'moduleid=' + sModuleID, 'pane=' + oPane.paneName, 'order=' + iIndex * 2); 
	}
}

function __ess_MoveToPane(oPane, oCtl, iIndex)
{

	if (oPane != null)
	{
		var aryCtls = new Array();
		for (var i=iIndex; i<oPane.controls.length; i++)
		{
			if (oPane.controls[i].control.id != oCtl.id)
				aryCtls[aryCtls.length] = oPane.controls[i].control;

			ess.dom.removeChild(oPane.controls[i].control);
		}
		ess.dom.appendChild(oPane.pane, oCtl);
		oCtl.style.top=0;
		oCtl.style.left=0;
		oCtl.style.position = 'relative';
		for (var i=0; i<aryCtls.length; i++)
		{
			ess.dom.appendChild(oPane.pane, aryCtls[i]);
		}
		__ess_RefreshPanes();
	}
	else
	{
		oCtl.style.top=0;
		oCtl.style.left=0;
		oCtl.style.position = 'relative';
	}
}

function __ess_RefreshPanes()
{
	var aryPanes = ess.getVar('__ess_Panes').split(';');
	var aryPaneNames = ess.getVar('__ess_PaneNames').split(';');
	__ess_m_aryPanes = new Array();
	for (var i=0; i<aryPanes.length; i++)
	{
		if (aryPanes[i].length > 0)
			__ess_m_aryPanes[__ess_m_aryPanes.length] = new __ess_Pane(ess.dom.getById(aryPanes[i]), aryPaneNames[i]);
	}
}

var __ess_m_aryPanes;
var __ess_m_aryModules;
function __ess_Panes()
{
	if (__ess_m_aryPanes == null)
	{
		__ess_m_aryPanes = new Array();
		__ess_RefreshPanes();
	}
	return __ess_m_aryPanes;
}

function __ess_Modules(sModuleID)
{
	if (__ess_m_aryModules == null)
		__ess_RefreshPanes();
	
	return __ess_m_aryModules[sModuleID];
}

function __ess_getMostSelectedPane(oContent)
{
	var oCDims = new ess.dom.positioning.dims(oContent);
	var iTopScore=0;
	var iScore;
	var oTopPane;
	for (var i=0; i<__ess_Panes().length; i++)
	{
		var oPane = __ess_Panes()[i];
		var oPDims = new ess.dom.positioning.dims(oPane.pane);
		iScore = ess.dom.positioning.elementOverlapScore(oPDims, oCDims);
		
		if (iScore > iTopScore)
		{
			iTopScore = iScore;
			oTopPane = oPane;
		}
	}
	return oTopPane;
}

function __ess_getPaneControlIndex(oContent, oPane)
{
	if (oPane == null)
		return;
	var oCDims = new ess.dom.positioning.dims(oContent);
	var oCtl;
	if (oPane.controls.length == 0)
		return 0;
	for (var i=0; i<oPane.controls.length; i++)
	{
		oCtl = oPane.controls[i];
		var oIDims = new ess.dom.positioning.dims(oCtl.control);
		if (oCDims.t < oIDims.t)
			return oCtl.index;
	}
	if (oCtl != null)
		return oCtl.index+1;
	else
		return 0;
}

//Objects
function __ess_Pane(ctl, sPaneName)
{
	this.pane = ctl;
	this.id = ctl.id;
	this.controls = new Array();
	this.origBorder = ctl.style.border;
	this.paneName = sPaneName;
	
	var iIndex = 0;
	var strModuleOrder='';
	for (var i=0; i<ctl.childNodes.length; i++)
	{
		var oNode = ctl.childNodes[i];
		if (ess.dom.isNonTextNode(oNode))	
		{
			if (__ess_m_aryModules == null)
				__ess_m_aryModules = new Array();

			//if (oNode.tagName == 'A' && oNode.childNodes.length > 0)
			//	oNode = oNode.childNodes[0];	//ESS now embeds anchor tag 
				
			var sModuleID = oNode.getAttribute('moduleid');
			if (sModuleID != null && sModuleID.length > 0)
			{
				strModuleOrder += sModuleID + '~';
				this.controls[this.controls.length] = new __ess_PaneControl(oNode, iIndex);
				__ess_m_aryModules[sModuleID] = oNode.id;
				iIndex+=1;
			}
		}
	}
	this.moduleOrder = strModuleOrder;

}

function __ess_PaneControl(ctl, iIndex)
{
	this.control = ctl;
	this.id = ctl.id;
	this.index = iIndex;
	this.origBorder = ctl.style.border;
	
}