//Rich HTML Balloon Tooltip: http://www.dynamicdrive.com/dynamicindex5/balloontooltip.htm
//Created: September 10th, 2006
//
// Modified by J Thompson, May 15th 2008
// - Formatting changed to how I like it.
// - Arrowhead always on
// - Added functions to display contents of tooltip in new window if link is clicked.

var disappeardelay  = 100;                                            // tooltip disappear delay (in milliseconds)
var verticaloffset  = 0;                                              // vertical offset of tooltip from anchor link
var arrowheadimg    = ["images/arrowdown.gif", "images/arrowup.gif"]; // path to down and up arrow images
var arrowheadheight = 10;                                             // height of arrow image (amount to reveal)
var ie = document.all;
var ns6 = document.getElementById && !document.all;

verticaloffset = verticaloffset + arrowheadheight;

function getposOffset(what, offsettype)
{
	var totaloffset = (offsettype == "left") ? what.offsetLeft : what.offsetTop;
	var parentEl = what.offsetParent;
	while (parentEl != null)
	{
		totaloffset = (offsettype == "left") ? totaloffset + parentEl.offsetLeft : totaloffset + parentEl.offsetTop;
		parentEl = parentEl.offsetParent;
	}
	return totaloffset;
}

function showhide(obj, e)
{
	dropmenuobj.style.left = dropmenuobj.style.top = "-500px";
	if(e.type == "mouseover") obj.visibility = "visible";
}

function iecompattest()
{
	return (document.compatMode && document.compatMode != "BackCompat") ? document.documentElement : document.body;
}

function clearbrowseredge(obj, whichedge)
{
	var windowedge;
	if(whichedge == "rightedge")
	{
		edgeoffsetx = 0;
		windowedge = ie && !window.opera ? iecompattest().scrollLeft + iecompattest().clientWidth - 15 : window.pageXOffset + window.innerWidth - 15;
		dropmenuobj.contentmeasure = dropmenuobj.offsetWidth;
		if(windowedge-dropmenuobj.x < dropmenuobj.contentmeasure) edgeoffsetx = dropmenuobj.contentmeasure - obj.offsetWidth;
		return edgeoffsetx;
	}
	else
	{
		edgeoffsety = 0;
		var topedge = ie && !window.opera ? iecompattest().scrollTop : window.pageYOffset;
		windowedge = ie && !window.opera ? iecompattest().scrollTop + iecompattest().clientHeight - 15 : window.pageYOffset + window.innerHeight - 18;
		dropmenuobj.contentmeasure = dropmenuobj.offsetHeight;
		if(windowedge-dropmenuobj.y < dropmenuobj.contentmeasure) edgeoffsety = dropmenuobj.contentmeasure + obj.offsetHeight + (verticaloffset * 2);
		return edgeoffsety;
	}
}

//main ballooon tooltip function
function displayballoontip(obj, e)
{
	if(window.event) event.cancelBubble = true;
	else if(e.stopPropagation) e.stopPropagation();
	//hide previous tooltip?
	if(typeof dropmenuobj != "undefined") dropmenuobj.style.visibility = "hidden";
	clearhidemenu();
	dropmenuobj = document.getElementById(obj.getAttribute("rel"));
	showhide(dropmenuobj.style, e);
	dropmenuobj.x = getposOffset(obj, "left");
	dropmenuobj.y = getposOffset(obj, "top") + verticaloffset;
	dropmenuobj.style.left = dropmenuobj.x - clearbrowseredge(obj, "rightedge") + "px";
	dropmenuobj.style.top = dropmenuobj.y - clearbrowseredge(obj, "bottomedge") + obj.offsetHeight + "px";
	displaytiparrow();
}

//function to display optional arrow image associated with tooltip
function displaytiparrow()
{
	tiparrow = document.getElementById("arrowhead");
	tiparrow.src = (edgeoffsety != 0) ? arrowheadimg[0] : arrowheadimg[1];
	//modify "left" value depending on whether there's no room on right edge of browser to display it, respectively
	tiparrow.style.left = (edgeoffsetx != 0)
		? parseInt(dropmenuobj.style.left) + dropmenuobj.offsetWidth - tiparrow.offsetWidth - 10 + "px"
		: parseInt(dropmenuobj.style.left) + 5 + "px";
	//modify "top" value depending on whether there's no room on right edge of browser to display it, respectively
	tiparrow.style.top = (edgeoffsety != 0)
		? parseInt(dropmenuobj.style.top) + dropmenuobj.offsetHeight - tiparrow.offsetHeight + arrowheadheight + "px"
		: parseInt(dropmenuobj.style.top) - arrowheadheight + "px";
	tiparrow.style.visibility = "visible";
}

function delayhidemenu()
{
	delayhide = setTimeout("dropmenuobj.style.visibility = 'hidden'; dropmenuobj.style.left = 0; tiparrow.style.visibility = 'hidden'", disappeardelay);
}

function clearhidemenu()
{
	if(typeof delayhide != "undefined") clearTimeout(delayhide);
}

//tests if a link has "rel" defined and it's the ID of an element on page
function reltoelement(linkobj)
{
	var relvalue = linkobj.getAttribute("rel");
	return (relvalue != null
	        && relvalue != ""
	        && document.getElementById(relvalue) != null
	        && document.getElementById(relvalue).className == "balloonstyle") ? true : false;
}

function makepage(obj)
{
	return "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n" + 
	       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\"\n" +
           "   \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n\n" +
           "<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"en\" lang=\"en\">\n" +
           "<head>\n" +
           "  <title>Details</title>\n" +
           "  <meta http-equiv=\"pragma\" content=\"no-cache\">\n" +
           "  <meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\">\n" +
           "  <link rel=\"stylesheet\" type=\"text/css\" href=\"styles/strings.css\" />\n" +
           "</head>\n\n<body>\n" +
           obj +
           "\n</body>\n</html>\n";
}

function displayinwindow(obj, e)
{
	var pw = window.open("about:blank", "_new");
	pw.document.open();
	pw.document.write(makepage(obj));
	//pw.document.write(obj);
	pw.document.close();
}

function initalizetooltip()
{
	var all_links = document.getElementsByTagName("a");
	tiparrow = document.createElement("img");
	tiparrow.setAttribute("src", arrowheadimg[0]);
	tiparrow.setAttribute("id", "arrowhead");
	document.body.appendChild(tiparrow);
	for(var i = 0; i < all_links.length; i++)
	{
		if(reltoelement(all_links[i]))
		{
			//link has "rel" defined and it's the ID of an element on page
			all_links[i].onmouseover = function(e)
			{
				var evtobj = window.event ? window.event : e;
				displayballoontip(this, evtobj);
			};
			all_links[i].onmouseout = delayhidemenu;
		}
	}
}

if(window.addEventListener) window.addEventListener("load", initalizetooltip, false);
else
{
	if(window.attachEvent) window.attachEvent("onload", initalizetooltip);
	else if(document.getElementById) window.onload = initalizetooltip;
}