//** 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

//** July 7th, 08'- Creation Date

//** July 16th, 08'- Updated to v 1.3:
        //1) Adds "Side Bar" orientation option.
        //2) Drop Down Menus now auto adjust their positioning if too close to either right or bottom window edges.
        //3) Enhanced IFRAME shim "coverage" on the page.

//** July 19th, 08'- Updated to v 1.31: Drop down menu now positions at top of window edge if there's neither room downwards or upwards to settle.
//** Aug 13th, 08'- v1.32: Moved "rel" attribute from menu's <li> elements to inner <a>, for validation reasons

//** Sept 10th, 08'- Updated to v 1.4:
        //1) Added optional "sliding" animation when sub menus are revealed.
        //2) Arrow images now dynamically positioned, instead of relying on CSS's "right" property

var ddlevelsmenu={

downarrowpointer: ["js/arrow-down.gif", 0,0], //path to "down arrow" image that gets added to main menu items (last 2 parameters should be width/height of img)
rightarrowpointer: ["js/arrow-right.gif", 0,0], //path to "right arrow" image that gets added to LI elements within drop down menu containing additional menus
hideinterval: 200, //delay in milliseconds before sub menu(s) disappears onmouseout.
revealanimate: true, //enable sliding animation when revealing sub menus? (true/false)
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
topitemsindex: -1,
ulindex: -1,
hidetimers: {}, //object array timer
shimadded: false,
isff3orabove: /Firefox[\/\s](\d+\.\d+)/.test(navigator.userAgent) && RegExp.$1>=3, //detect FF3 or above

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){
        var pointer=document.createElement("img")
        pointer.src=imginfo[0]
        pointer.style.width=imginfo[1]+"px"
        pointer.style.height=imginfo[2]+"px"
        pointer.style.left=target.offsetWidth-imginfo[2]-2+"px"
        pointer.className=imgclass
        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"
        shim.setAttribute("src", location.protocol=="https:"? this.httpsiframesrc : "about:blank")
        shim.setAttribute("frameborder", "0")
        target.appendChild(shim)
        try{
                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)])
                }, "click")
        }
        this.subuls[mainmenuid][submenupos]=submenu
        header._dimensions={w:header.offsetWidth, h:header.offsetHeight, submenuw:submenu.offsetWidth, submenuh:submenu.offsetHeight}
        this.getoffsetof(header)
        submenu.style.left=0
        submenu.style.top=0
        submenu.style.visibility="hidden"
        this.addEvent(header, function(e){ //mouseover event
                if (!ddlevelsmenu.isContained(this, e)){
                        if (typeof ddlevelsmenu.hidetimers[this._master][parseInt(this._pos)]!="undefined")
                                clearTimeout(ddlevelsmenu.hidetimers[this._master][parseInt(this._pos)])
                        if (this._istoplevel)
                                ddlevelsmenu.css(this, "selected", "add")
                        var submenu=ddlevelsmenu.subuls[this._master][parseInt(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.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.style.top=menutop+"px"
                        if (ddlevelsmenu.revealanimate==false || ddlevelsmenu.isff3orabove){ //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.ff2scrollInfo={x:scrollX, y:scrollY}
                        }
                        ddlevelsmenu.showmenu(header, submenu, dir)
                }
        }, "mouseover")
        this.addEvent(header, function(e){ //mouseout event
                if (this._istoplevel){
                        var submenu=ddlevelsmenu.subuls[this._master][parseInt(this._pos)]
                        if (!ddlevelsmenu.isContained(this, e) && !ddlevelsmenu.isContained(submenu, e)) //hide drop down ul if mouse moves out of menu bar item but not into drop down ul itself
                                ddlevelsmenu.hidemenu(submenu)
                }
                else if (!this._istoplevel && !ddlevelsmenu.isContained(this, e)){
                        var headerlist=this
                        ddlevelsmenu.hidetimers[this._master][parseInt(this._pos)]=setTimeout(function(){
                                var submenu=ddlevelsmenu.subuls[headerlist._master][parseInt(headerlist._pos)]
                                ddlevelsmenu.hidemenu(submenu)
                        }, ddlevelsmenu.hideinterval)
                }
        }, "mouseout")
},

showmenu:function(header, submenu, dir){
        if (this.revealanimate){
                submenu._curanimatepoint=0
                var endpoint=(header._istoplevel && dir=="topbar")? submenu.offsetHeight : submenu.offsetWidth
                submenu.style.width=submenu.style.height=0
                submenu.style.overflow="hidden"
                submenu.style.visibility="visible"
                clearTimeout(submenu._animatetimer)
                submenu._animatetimer=setInterval(function(){ddlevelsmenu.revealmenu(header, submenu, endpoint, dir)}, 10)
        }
        else{
                submenu.style.visibility="visible"
        }
},

revealmenu:function(header, submenu, endpoint, dir){
        if (submenu._curanimatepoint<endpoint){
                if (submenu._curanimatepoint==0) //reset either width or height of sub menu to "auto" when animation begins
                        submenu.style[header._istoplevel && dir=="topbar"? "width" : "height"]="auto"
                submenu._curanimatepoint= submenu._curanimatepoint + 5 + (submenu._curanimatepoint/10)
                submenu.style[header._istoplevel && dir=="topbar"? "height" : "width"]=submenu._curanimatepoint+"px"
        }
        else{
                if (submenu.ff2scrollInfo) //if this is FF2 or below (meaning shim hasn't been applied yet
                        this.positionshim(header, submenu, dir, submenu.ff2scrollInfo.x, submenu.ff2scrollInfo.y)
                submenu.style[header._istoplevel && dir=="topbar"? "height" : "width"]="auto"
                submenu.style.overflow="visible"
                clearInterval(submenu._animatetimer)
        }
},


hidemenu:function(submenu){
        if (typeof submenu._pos!="undefined"){ //if submenu is outermost UL drop down menu
                this.css(this.topitems[submenu._master][parseInt(submenu._pos)], "selected", "remove")
                this.hideshim()
        }
        clearTimeout(submenu._animatetimer)
        submenu.style.left=0
        submenu.style.top="-1000px"
        submenu.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)});
},

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 array on object
        if (!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")
        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'))
                        dropul.style.zIndex=2000 //give drop down menus a high z-index
                        dropul._master=mainmenuid  //Indicate which main menu this main UL is associated with
                        dropul._pos=this.topitemsindex //Indicate which main menu item this main UL is associated with
                        this.addEvent(dropul, function(){ddlevelsmenu.hidemenu(this)}, "click")
                       // var arrowpointer=(dir=="sidebar")? "rightarrowpointer" : "downarrowpointer"

                      //  this.addpointer(menuitem, arrowpointer, this[arrowpointer])
                        this.buildmenu(mainmenuid, menuitem, dropul, this.ulindex, true, dir) //build top level menu
                        //dropul.onmouseover=function(){
                                //do nothing
                        //}
                        this.addEvent(dropul, function(e){ //hide menu if mouse moves out of main UL element into open space
                                if (!ddlevelsmenu.isContained(this, e) && !ddlevelsmenu.isContained(ddlevelsmenu.topitems[this._master][parseInt(this._pos)], e)){
                                        var dropul=this
                                        ddlevelsmenu.hidetimers[this._master][parseInt(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
                                this.addpointer(parentli.getElementsByTagName("a")[0], "rightarrowpointer", this.rightarrowpointer)
                                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")
},

setup:function(mainmenuid, dir){
        this.addEvent(window, function(){ddlevelsmenu.init(mainmenuid, dir)}, "load")
}

}