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

var ddlevelsmenu = {
    downarrowpointer: ["images/arrow-down.gif", 11, 7], //path to "down arrow" image that gets added to main menu items (last 2 parameters should be width/height of img)
    rightarrowpointer: ["images/arrow-right.gif", 12, 12], //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 = AppThemeImagesURL + 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, imagedir) {
        AppThemeImagesURL = imagedir;
        this.addEvent(window, function() { ddlevelsmenu.init(mainmenuid, dir) }, "load")
    }

}