//** all levels navigational menu- (c) dynamic drive dhtml code library: http://www.dynamicdrive.com
//** script download/ instructions page: http://www.dynamicdrive.com/dynamicindex1/ddlevelsmenu/
//** usage terms: http://www.dynamicdrive.com/notice.htm

//** current version: 3.03 see changelog.txt for details

if (typeof dd_domreadycheck=="undefined") //global variable to detect if dom is ready
	var dd_domreadycheck=false

var ddlevelsmenu={
enableshim: true, //enable iframe shim to prevent drop down menus from being hidden below select or flash elements? (tip: disable if not in use, for efficiency)

arrowpointers:{
	downarrow: ["./images/arrow-down.png", 12,12], //[path_to_down_arrow, arrowwidth, arrowheight]
	rightarrow: ["./images/arrow-down.png", 12,12], //[path_to_right_arrow, arrowwidth, arrowheight]
	showarrow: {toplevel: true, sublevel: true} //show arrow images on top level items and sub level items, respectively?
},
hideinterval: 200, //delay in milliseconds before entire menu disappears onmouseout.
effects: {enableswipe: true, enableslide: true, enablefade: true, duration: 200},
httpsiframesrc: "blank.htm", //if menu is run on a secure (https) page, the iframe shim feature used by the script should point to an *blank* page *within* the secure area to prevent an ie security prompt. specify full url to that page on your server (leave as is if not applicable).

///no need to edit beyond here////////////////////

topmenuids: [], //array containing ids of all the primary menus on the page
topitems: {}, //object array containing all top menu item links
subuls: {}, //object array containing all uls
lastactivesubul: {}, //object object containing info for last mouse out menu item's ul
topitemsindex: -1,
ulindex: -1,
hidetimers: {}, //object array timer
shimadded: false,
nonff: !/firefox[\/\s](\d+\.\d+)/.test(navigator.useragent), //detect non ff browsers
ismobile:navigator.useragent.match(/(ipad)|(iphone)|(ipod)|(android)|(webos)/i) != null, //boolean check for popular mobile browsers

getoffset:function(what, offsettype){
	return (what.offsetparent)? what[offsettype]+this.getoffset(what.offsetparent, offsettype) : what[offsettype]
},

getoffsetof:function(el){
	el._offsets={left:this.getoffset(el, "offsetleft"), top:this.getoffset(el, "offsettop")}
},

getwindowsize:function(){
	this.docwidth=window.innerwidth? window.innerwidth-10 : this.standardbody.clientwidth-10
	this.docheight=window.innerheight? window.innerheight-15 : this.standardbody.clientheight-18
},

gettopitemsdimensions:function(){
	for (var m=0; m<this.topmenuids.length; m++){
		var topmenuid=this.topmenuids[m]
		for (var i=0; i<this.topitems[topmenuid].length; i++){
			var header=this.topitems[topmenuid][i]
			var submenu=document.getelementbyid(header.getattribute('rel'))
			header._dimensions={w:header.offsetwidth, h:header.offsetheight, submenuw:submenu.offsetwidth, submenuh:submenu.offsetheight}
		}
	}
},

iscontained:function(m, e){
	var e=window.event || e
	var c=e.relatedtarget || ((e.type=="mouseover")? e.fromelement : e.toelement)
	while (c && c!=m)try {c=c.parentnode} catch(e){c=m}
	if (c==m)
		return true
	else
		return false
},

addpointer:function(target, imgclass, imginfo, beforeorafter){
	var pointer=document.createelement("img")
	pointer.src=imginfo[0]
	pointer.style.width=imginfo[1]+"px"
	pointer.style.height=imginfo[2]+"px"
	if(imgclass=="rightarrowpointer"){
		pointer.style.left=target.offsetwidth-imginfo[2]-2+"px"
	}
	pointer.classname=imgclass
	var target_firstel=target.childnodes[target.firstchild.nodetype!=1? 1 : 0] //see if the first child element within a is a span (found in sliding doors technique)
	if (target_firstel && target_firstel.tagname=="span"){
		target=target_firstel //arrow should be added inside this span instead if found
	}
	if (beforeorafter=="before")
		target.insertbefore(pointer, target.firstchild)
	else
		target.appendchild(pointer)
},

css:function(el, targetclass, action){
	var needle=new regexp("(^|\\s+)"+targetclass+"($|\\s+)", "ig")
	if (action=="check")
		return needle.test(el.classname)
	else if (action=="remove")
		el.classname=el.classname.replace(needle, "")
	else if (action=="add" && !needle.test(el.classname))
		el.classname+=" "+targetclass
},

addshimmy:function(target){
	var shim=(!window.opera)? document.createelement("iframe") : document.createelement("div") //opera 9.24 doesnt seem to support transparent iframes
	shim.classname="ddiframeshim"
	target.appendchild(shim)
	try{
		shim.style.display='none'
		shim.style.filter='progid:dximagetransform.microsoft.alpha(style=0,opacity=0)'
	}
	catch(e){}
	return shim
},

positionshim:function(header, submenu, dir, scrollx, scrolly){
	if (header._istoplevel){
		var scrolly=window.pageyoffset? window.pageyoffset : this.standardbody.scrolltop
		var topgap=header._offsets.top-scrolly
		var bottomgap=scrolly+this.docheight-header._offsets.top-header._dimensions.h
		if (topgap>0){
			this.shimmy.topshim.style.left=scrollx+"px"
			this.shimmy.topshim.style.top=scrolly+"px"
			this.shimmy.topshim.style.width="99%"
			this.shimmy.topshim.style.height=topgap+"px" //distance from top window edge to top of menu item
		}
		if (bottomgap>0){
			this.shimmy.bottomshim.style.left=scrollx+"px"
			this.shimmy.bottomshim.style.top=header._offsets.top + header._dimensions.h +"px"
			this.shimmy.bottomshim.style.width="99%"
			this.shimmy.bottomshim.style.height=bottomgap+"px" //distance from bottom of menu item to bottom window edge
		}
	}
},

hideshim:function(){
	this.shimmy.topshim.style.width=this.shimmy.bottomshim.style.width=0
	this.shimmy.topshim.style.height=this.shimmy.bottomshim.style.height=0
},


buildmenu:function(mainmenuid, header, submenu, submenupos, istoplevel, dir){
	header._master=mainmenuid //indicate which top menu this header is associated with
	header._pos=submenupos //indicate pos of sub menu this header is associated with
	header._istoplevel=istoplevel
	if (istoplevel){
		this.addevent(header, function(e){
		ddlevelsmenu.hidemenu(ddlevelsmenu.subuls[this._master][parseint(this._pos)].parentnode)
		}, "click")
	}
	this.subuls[mainmenuid][submenupos]=submenu
	header._dimensions={w:header.offsetwidth, h:header.offsetheight, submenuw:submenu.offsetwidth, submenuh:submenu.offsetheight}
	this.getoffsetof(header)
	submenu.parentnode.style.left=0
	submenu.parentnode.style.top=0
	submenu.parentnode.style.visibility="hidden"
	submenu.style.visibility="hidden"
	this.addevent(header, function(e){ //mouseover event
		if (ddlevelsmenu.ismobile || !ddlevelsmenu.iscontained(this, e)){
			var submenu=ddlevelsmenu.subuls[this._master][parseint(this._pos)]
			if (this._istoplevel){
				ddlevelsmenu.css(this, "selected", "add")
				cleartimeout(ddlevelsmenu.hidetimers[this._master][this._pos])
			}
			ddlevelsmenu.getoffsetof(header)
			var scrollx=window.pagexoffset? window.pagexoffset : ddlevelsmenu.standardbody.scrollleft
			var scrolly=window.pageyoffset? window.pageyoffset : ddlevelsmenu.standardbody.scrolltop
			var submenurightedge=this._offsets.left + this._dimensions.submenuw + (this._istoplevel && dir=="topbar"? 0 : this._dimensions.w)
			var submenubottomedge=this._offsets.top + this._dimensions.submenuh
			//sub menu starting left position
			var menuleft=(this._istoplevel? this._offsets.left + (dir=="sidebar"? this._dimensions.w : 0) : this._dimensions.w)
			if (submenurightedge-scrollx>ddlevelsmenu.docwidth){
				menuleft+= -this._dimensions.submenuw + (this._istoplevel && dir=="topbar" ? this._dimensions.w : -this._dimensions.w)
			}
			submenu.parentnode.style.left=menuleft+"px"
			//sub menu starting top position
			var menutop=(this._istoplevel? this._offsets.top + (dir=="sidebar"? 0 : this._dimensions.h) : this.offsettop)
			if (submenubottomedge-scrolly>ddlevelsmenu.docheight){ //no room downwards?
				if (this._dimensions.submenuh<this._offsets.top+(dir=="sidebar"? this._dimensions.h : 0)-scrolly){ //move up?
					menutop+= - this._dimensions.submenuh + (this._istoplevel && dir=="topbar"? -this._dimensions.h : this._dimensions.h)
				}
				else{ //top of window edge
					menutop+= -(this._offsets.top-scrolly) + (this._istoplevel && dir=="topbar"? -this._dimensions.h : 0)
				}
			}
			submenu.parentnode.style.top=menutop+"px"
			if (ddlevelsmenu.enableshim && (ddlevelsmenu.effects.enableswipe==false || ddlevelsmenu.nonff)){ //apply shim immediately only if animation is turned off, or if on, in non ff2.x browsers
				ddlevelsmenu.positionshim(header, submenu, dir, scrollx, scrolly)
			}
			else{
				submenu.ffscrollinfo={x:scrollx, y:scrolly}
			}
			ddlevelsmenu.showmenu(header, submenu, dir)
			if (!ddlevelsmenu.ismobile){
				if (e.preventdefault)
					e.preventdefault()
				if (e.stoppropagation)
					e.stoppropagation()
			}
			else{ //if is mobile
				if (header._istoplevel || e.target.parentnode.getelementsbytagname('ul').length>0){ //if user clicks on a header (instead of a menu item)
					e.preventdefault()
					e.stoppropagation()
				}
			}
		}
	}, (this.ismobile)? "click" : "mouseover")
	this.addevent(header, function(e){ //mouseout event
		var submenu=ddlevelsmenu.subuls[this._master][parseint(this._pos)]
		if (this._istoplevel){
			if (!ddlevelsmenu.iscontained(this, e) && !ddlevelsmenu.iscontained(submenu.parentnode, e)) //hide drop down div if mouse moves out of menu bar item but not into drop down div itself
				ddlevelsmenu.hidemenu(submenu.parentnode)
		}
		else if (!this._istoplevel && !ddlevelsmenu.iscontained(this, e)){
			ddlevelsmenu.hidemenu(submenu.parentnode)
		}

	}, "mouseout")
},

setopacity:function(el, value){
	el.style.opacity=value
	if (typeof el.style.opacity!="string"){ //if it's not a string (ie: number instead), it means property not supported
		el.style.mozopacity=value
		try{
			if (el.filters){
				el.style.filter="progid:dximagetransform.microsoft.alpha(opacity="+ value*100 +")"
			}
		} catch(e){}
	}
},

showmenu:function(header, submenu, dir){
	if (this.effects.enableswipe || this.effects.enablefade){
		if (this.effects.enableswipe){
			var endpoint=(header._istoplevel && dir=="topbar")? header._dimensions.submenuh : header._dimensions.submenuw
			submenu.parentnode.style.width=submenu.parentnode.style.height=0
			submenu.parentnode.style.overflow="hidden"
		}
		if (this.effects.enablefade){
			submenu.parentnode.style.width=submenu.offsetwidth+"px"
			submenu.parentnode.style.height=submenu.offsetheight+"px"
			this.setopacity(submenu.parentnode, 0) //set opacity to 0 so menu appears hidden initially
		}
		submenu._curanimatedegree=0
		submenu.parentnode.style.visibility="visible"
		submenu.style.visibility="visible"
		clearinterval(submenu._animatetimer)
		submenu._starttime=new date().gettime() //get time just before animation is run
		submenu._animatetimer=setinterval(function(){ddlevelsmenu.revealmenu(header, submenu, endpoint, dir)}, 10)
	}
	else{
		submenu.parentnode.style.visibility="visible"
		submenu.style.visibility="visible"
	}
},

revealmenu:function(header, submenu, endpoint, dir){
	var elapsed=new date().gettime()-submenu._starttime //get time animation has run
	if (elapsed<this.effects.duration){
		if (this.effects.enableswipe){
			if (submenu._curanimatedegree==0){ //reset either width or height of sub menu to "auto" when animation begins
				submenu.parentnode.style[header._istoplevel && dir=="topbar"? "width" : "height"]=(header._istoplevel && dir=="topbar"? submenu.offsetwidth : submenu.offsetheight)+"px"
			}
			submenu.parentnode.style[header._istoplevel && dir=="topbar"? "height" : "width"]=(submenu._curanimatedegree*endpoint)+"px"
			if (this.effects.enableslide){
				submenu.style[header._istoplevel && dir=="topbar"? "top" : "left"]=math.floor((submenu._curanimatedegree-1)*endpoint)+"px"
			}
		}
		if (this.effects.enablefade){
			this.setopacity(submenu.parentnode, submenu._curanimatedegree)
		}
	}
	else{
		clearinterval(submenu._animatetimer)
		if (this.effects.enableswipe){
			submenu.parentnode.style.width=submenu.offsetwidth+"px"
			submenu.parentnode.style.height=submenu.offsetheight+"px"
			submenu.parentnode.style.overflow="visible"
			if (this.effects.enableslide){
				submenu.style.top=0;
				submenu.style.left=0;
			}
		}
		if (this.effects.enablefade){
			this.setopacity(submenu.parentnode, 1)
			submenu.parentnode.style.filter=""
		}
		if (this.enableshim && submenu.ffscrollinfo) //if this is ff browser (meaning shim hasn't been applied yet
			this.positionshim(header, submenu, dir, submenu.ffscrollinfo.x, submenu.ffscrollinfo.y)
	}
	submenu._curanimatedegree=(1-math.cos((elapsed/this.effects.duration)*math.pi)) / 2
},

hidemenu:function(submenu){
	if (typeof submenu._pos!="undefined"){ //if submenu is outermost div drop down menu
		this.css(this.topitems[submenu._master][parseint(submenu._pos)], "selected", "remove")
		if (this.enableshim)
			this.hideshim()
	}
	clearinterval(submenu.firstchild._animatetimer)
	submenu.style.left=0
	submenu.style.top="-1000px"
	submenu.style.visibility="hidden"
	submenu.firstchild.style.visibility="hidden"
},


addevent:function(target, functionref, tasktype) {
	if (target.addeventlistener)
		target.addeventlistener(tasktype, functionref, false);
	else if (target.attachevent)
		target.attachevent('on'+tasktype, function(){return functionref.call(target, window.event)});
},

domready:function(functionref){ //based on code from the jquery library
	if (dd_domreadycheck){
		functionref()
		return
	}
	// mozilla, opera and webkit nightlies currently support this event
	if (document.addeventlistener) {
		// use the handy event callback
		document.addeventlistener("domcontentloaded", function(){
			document.removeeventlistener("domcontentloaded", arguments.callee, false )
			functionref();
			dd_domreadycheck=true
		}, false )
	}
	else if (document.attachevent){
		// if ie and not an iframe
		// continually check to see if the document is ready
		if ( document.documentelement.doscroll && window == window.top) (function(){
			if (dd_domreadycheck){
				functionref()
				return
			}
			try{
				// if ie is used, use the trick by diego perini
				// http://javascript.nwbox.com/iecontentloaded/
				document.documentelement.doscroll("left")
			}catch(error){
				settimeout( arguments.callee, 0)
				return;
			}
			//and execute any waiting functions
			functionref();
			dd_domreadycheck=true
		})();
	}
	if (document.attachevent && parent.length>0) //account for page being in iframe, in which above doesn't fire in ie
		this.addevent(window, function(){functionref()}, "load");
},


init:function(mainmenuid, dir){
	this.standardbody=(document.compatmode=="css1compat")? document.documentelement : document.body
	this.topitemsindex=-1
	this.ulindex=-1
	this.topmenuids.push(mainmenuid)
	this.topitems[mainmenuid]=[] //declare array on object
	this.subuls[mainmenuid]=[] //declare array on object
	this.hidetimers[mainmenuid]=[] //declare hide entire menu timer
	this.enableshim = (this.ismobile)? false : this.enableshim //disable shim if mobile browser
	if (this.enableshim && !this.shimadded){
		this.shimmy={}
		this.shimmy.topshim=this.addshimmy(document.body) //create top iframe shim obj
		this.shimmy.bottomshim=this.addshimmy(document.body) //create bottom iframe shim obj
		this.shimadded=true
	}
	var menubar=document.getelementbyid(mainmenuid)
	var alllinks=menubar.getelementsbytagname("a")
	var shelldivs=[]
	this.getwindowsize()
	for (var i=0; i<alllinks.length; i++){
		if (alllinks[i].getattribute('rel')){
			this.topitemsindex++
			this.ulindex++
			var menuitem=alllinks[i]
			this.topitems[mainmenuid][this.topitemsindex]=menuitem //store ref to main menu links
			var dropul=document.getelementbyid(menuitem.getattribute('rel'))
			var shelldiv=document.createelement("div") // create div which will contain the ul
			shelldiv.classname="ddsubmenustyle"
			dropul.removeattribute("class")
			shelldiv.appendchild(dropul)
			document.body.appendchild(shelldiv) //move main divs to end of document
			shelldivs.push(shelldiv)
			shelldiv.style.zindex=2000 //give drop down menus a high z-index
			shelldiv._master=mainmenuid  //indicate which main menu this main div is associated with
			shelldiv._pos=this.topitemsindex //indicate which main menu item this main div is associated with
			this.addevent(shelldiv, function(e){  // 3.03 code
				e.stoppropagation()
				e.cancelbubble = true
			}, "touchstart")
			this.addevent(shelldiv, function(e){  // 3.03 code
				ddlevelsmenu.hidemenu(this)
			}, "click")			
			var arrowclass=(dir=="sidebar")? "rightarrowpointer" : "downarrowpointer"
			var arrowpointer=(dir=="sidebar")? this.arrowpointers.rightarrow : this.arrowpointers.downarrow
			if (this.arrowpointers.showarrow.toplevel)
				this.addpointer(menuitem, arrowclass, arrowpointer, (dir=="sidebar")? "before" : "after")
			this.buildmenu(mainmenuid, menuitem, dropul, this.ulindex, true, dir) //build top level menu
			shelldiv.onmouseover=function(){
				cleartimeout(ddlevelsmenu.hidetimers[this._master][this._pos])
			}
			this.addevent(shelldiv, function(e){ //hide menu if mouse moves out of main div element into open space
				if (!ddlevelsmenu.iscontained(this, e) && !ddlevelsmenu.iscontained(ddlevelsmenu.topitems[this._master][parseint(this._pos)], e)){
					var dropul=this
					if (ddlevelsmenu.enableshim)
						ddlevelsmenu.hideshim()
					ddlevelsmenu.hidetimers[this._master][this._pos]=settimeout(function(){
						ddlevelsmenu.hidemenu(dropul)
					}, ddlevelsmenu.hideinterval)
				}
			}, "mouseout")
			var subuls=dropul.getelementsbytagname("ul")
			for (var c=0; c<subuls.length; c++){
				this.ulindex++
				var parentli=subuls[c].parentnode
				var subshell=document.createelement("div")
				subshell.appendchild(subuls[c])
				parentli.appendchild(subshell)
				if (this.arrowpointers.showarrow.sublevel)
					this.addpointer(parentli.getelementsbytagname("a")[0], "rightarrowpointer", this.arrowpointers.rightarrow, "before")
				this.buildmenu(mainmenuid, parentli, subuls[c], this.ulindex, false, dir) //build sub level menus
			}
		}
	} //end for loop
	this.addevent(window, function(){ddlevelsmenu.getwindowsize(); ddlevelsmenu.gettopitemsdimensions()}, "resize")
	if (this.ismobile){  // 3.03 code
		this.addevent(document, function(e){
			for (var i=0; i<shelldivs.length; i++){
				ddlevelsmenu.hidemenu(shelldivs[i])
			}
		}, 'touchstart')
	}
},

setup:function(mainmenuid, dir){
	this.domready(function(){ddlevelsmenu.init(mainmenuid, dir)})
}

}