//** 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: ["soubory/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: ["soubory/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")
  }

}