/*
 * DO NOT REMOVE THIS NOTICE
 *
 * PROJECT:   mygosuMenu
 * VERSION:   1.1.6 patch 1 CORE5
 * COPYRIGHT: (c) 2003,2004 Cezary Tomczak
 * LINK:      http://gosu.pl/dhtml/mygosumenu.html
 * LICENSE:   BSD (revised)
 */

/*
  Todo, bugs to fix:
  - delay.show = 400 , delay.hide = 400
    go Product Three -> Live Demo -> Test Drive -> Test Three , go fast to Product Four.
    Result: 2 elements highlighted in the same section
  - delay.show = 0 , delay.hide = 400
    go Product Three -> Live Demo , section out , section over, seciont out.
    Result: Live Demo is not highlighted
  - active className changing, unnecessary blink
  - opera: hideSection() exceptions are throwed
*/

function DropDownMenuX(id) {

    /* Type of the menu: "horizontal" or "vertical" */
    this.type = "horizontal";

    /* Type of the menu flow: 
      "up" or "down" if Type is "horizontal" or 
      "left" or "right" for "vertical" */
    this.flow = "up";
    
    this.defaultMaxWidth = 0;

    /* Delay (in miliseconds >= 0): show-hide menu
     * Hide must be > 0 */
    this.delay = {
        "show": 0,
        "hide": 400
    }
    /* Change the default position of sub-menu by Y pixels from top and X pixels from left
     * Negative values are allowed */
    this.position = {
        "level1": { "top": 0, "left": 0},
        "levelX": { "top": 0, "left": 0}
    }

    /* fix ie selectbox bug ? */
    this.fixIeSelectBoxBug = true;

    /* Z-index property for .section */
    this.zIndex = {
        "visible": 500,
        "hidden": -1
    };

    // Browser detection
    this.browser = {
        "ie": Boolean(document.body.currentStyle),
        "ie5": (navigator.appVersion.indexOf("MSIE 5.5") != -1 || navigator.appVersion.indexOf("MSIE 5.0") != -1),
        "ie6": (navigator.appVersion.indexOf("MSIE 6.0") != -1)
    };
    
    if (!this.browser.ie) {
        this.browser.ie5 = false;
        this.browser.ie6 = false;
    }

    this.initialized = false;

    /* Initialize the menu */
    this.initOnce = function() {
        if (!this.initialized)
        {
          if (this.browser.ie && this.browser.ie5) { fixWrap(); }
          fixSections();
          parse(document.getElementById(this.id).childNodes, this.tree, this.id);
        }
        this.initialized = true;
    }

    this.init = function() {
          if (!document.getElementById(this.id)) { return alert("DropDownMenuX.init() failed. Element '"+ this.id +"' does not exist."); }
          if (this.type != "horizontal" && this.type != "vertical") { return alert("DropDownMenuX.init() failed. Unknown menu type: '"+this.type+"'"); }
          parse(document.getElementById(this.id).childNodes, this.tree, this.id);
          //self.initOnce();
          //this.initialized = false;
    }

    /* Search for .section elements and set width for them */
    function fixSections() {
        var arr = document.getElementById(self.id).getElementsByTagName("div");
        var sections = new Array();
        //var widths = new Array();
        var tmpW;
        var item;
        
        for (var i = 0; i < arr.length; i++) {
          item = arr[i];
            if (item.className == "section") {
                sections.push(item);
            }
        }
        for (var i = 0; i < sections.length; i++) {
          item = sections[i];
          tmpW = getMaxWidth(item.childNodes);
          item.style.width = (tmpW) + "px";
          if (self.browser.ie) {
             setMaxWidth(item.childNodes, tmpW);
          }
        }
    }

    function fixWrap() {
        var elements = document.getElementById(self.id).getElementsByTagName("a");
        var element;
        for (var i = 0; i < elements.length; i++) {
          element = elements[i];
            if (/item2/.test(element.className)) {
                element.innerHTML = '<div nowrap="nowrap">'+element.innerHTML+'</div>';
            }
        }
    }

    /* Search for an element with highest width among given nodes, return that width */
    function getMaxWidth(nodes) {
        var maxWidth = self.defaultMaxWidth;
        var item;
        for (var i = 0; i < nodes.length; i++) {
            item = nodes[i];
            if (item.nodeType != 1 )//|| /section/.test(nodes[i].className)) 
             continue; 
            if (item.offsetWidth > maxWidth) { maxWidth = item.offsetWidth; }
            /*
            else if (nodes[i].clientWidth > maxWidth) { maxWidth = nodes[i].clientWidth; }
            else if (nodes[i].style.width > maxWidth) { maxWidth = nodes[i].style.width; }
            else if (nodes[i].offsetParent.offsetWidth > maxWidth) { maxWidth = nodes[i].offsetParent.offsetWidth; }
            */
        }
        return maxWidth;
    }

    /* Set width for item2 elements */
    function setMaxWidth(nodes, maxWidth) {
      var node;
        for (var i = 0; i < nodes.length; i++) {
          node = nodes[i];
            if (node.nodeType == 1 && /item2/.test(node.className) && node.currentStyle) {
                if (self.browser.ie5) {
                    node.style.width = (maxWidth) + "px";
                } else {
                		var w = (maxWidth - parseInt(node.currentStyle.paddingLeft) - parseInt(node.currentStyle.paddingRight));
                		if (w>0)
                    	node.style.width = w + "px";
                    else
                    	node.style.width = (maxWidth) + "px";
                }
            }
        }
    }

    /* Position elements */
    function fixPosition(element, section)
    {
      // position
      var box1 = element;//document.getElementById(id + "-" + (tree.length - 1));
      var box2 = section;//document.getElementById(section);
      //if (1 == box2.nodeType)
      if (/section/.test(box2.className))
      {
        var el = new Element(box1.id);
        if (1 == el.level) {
            if ("horizontal" == self.type) {
                if ("up" == self.flow) {
                   box2.style.top = 
                     - box2.offsetHeight + 
                     box1.offsetTop + 
                     //box1.offsetHeight + 
                     self.position.level1.top + "px";
                  } else {
                    box2.style.top = 
                      box1.offsetTop + 
                      box1.offsetHeight + 
                      self.position.level1.top + "px";
                  } 
                if (self.browser.ie5) {
                    box2.style.left = self.position.level1.left + "px";
                } else {
                    box2.style.left = box1.offsetLeft + self.position.level1.left + "px";
                }
            } else if ("vertical" == self.type) {
                box2.style.top = box1.offsetTop + self.position.level1.top + "px";
                if (self.browser.ie5) {
                    box2.style.left = box1.offsetWidth + self.position.level1.left + "px";
                } else {
                    box2.style.left = box1.offsetLeft + box1.offsetWidth + self.position.level1.left + "px";
                }
            }
        } else {
            box2.style.top = box1.offsetTop + self.position.levelX.top + "px";
            box2.style.left = box1.offsetLeft + box1.offsetWidth + self.position.levelX.left + "px";
        }
      }
    }
		
		
    /* Parse nodes, create events */
    function parse(nodes, tree, id) {
      var node;
        for (var i = 0; i < nodes.length; i++) {
          node = nodes[i];
            if (1 != node.nodeType) {
                continue;
            }
            switch (true) {
                // .item1
                case /\bitem1\b/.test(node.className):
                    node.id = id + "-" + tree.length;
                    tree.push(new Array());
                    node.onmouseover = itemOver;
                    node.onmouseout = itemOut;
                    break;
                // .item2
                case /\bitem2\b/.test(node.className):
                    node.id = id + "-" + tree.length;
                    tree.push(new Array());
                    node.onmouseover = itemOver;
                    node.onmouseout = itemOut;
                    break;
                // .section
                case /\bsection\b/.test(node.className):
                    // id, events
                    node.id = id + "-" + (tree.length - 1) + "-section";
                    node.onmouseover = sectionOver;
                    node.onmouseout = sectionOut;
                    
                    // sections, sectionsShowCnt, sectionsHideCnt
                    self.sections.push(node.id);
                    self.sectionsShowCnt.push(0);
                    self.sectionsHideCnt.push(0);
                    if (self.fixIeSelectBoxBug && self.browser.ie6) {
                        node.innerHTML = nodes[i].innerHTML + '<iframe id="'+node.id+'-iframe" src="javascript:false;" scrolling="no" frameborder="0" style="position: absolute; top: 0px; left: 0px; display: none; filter:alpha(opacity=0);"></iframe>';
                    }
                    break;
            }
            if (node.childNodes) {
                if (/\bsection\b/.test(node.className)) {
                    parse(node.childNodes, tree[tree.length - 1], id + "-" + (tree.length - 1));
                } else {
                    parse(node.childNodes, tree, id);
                }
            }
        }
    }

    /* event, item:onmouseover */
    function itemOver() {
        self.initOnce();
        //debug("itemOver("+this.id+") , visible = " + self.visible);
        sibling = this.nextSibling; 
        while (sibling) {
          fixPosition(this, sibling);
          sibling = sibling.nextSibling;
        }
        self.itemShowCnt++;
        var id_section = this.id + "-section";
        if (self.visible.length) {
            var el = new Element(self.visible.getLast());
            el = document.getElementById(el.getParent().id);
            if (/item\d-active/.test(el.className)) {
                el.className = el.className.replace(/(item\d)-active/, "$1");
            }
        }
        if (self.sections.contains(id_section)) {
            clearTimers();
            self.sectionsHideCnt[self.sections.indexOf(id_section)]++;
            var cnt = self.sectionsShowCnt[self.sections.indexOf(id_section)];
            var timerId = setTimeout(function(a, b) { return function() { self.showSection(a, b); } } (id_section, cnt), self.delay.show);
            self.timers.push(timerId);
        } else {
            if (self.visible.length) {
                clearTimers();
                var timerId = setTimeout(function(a, b) { return function() { self.showItem(a, b); } } (this.id, self.itemShowCnt), self.delay.show);
                self.timers.push(timerId);
            }
        }
    }

    /* event, item:onmouseout */
    function itemOut() {
        //debug("itemOut("+this.id+") , visible = " + self.visible);
        self.itemShowCnt++;
        var id_section = this.id + "-section";
        if (self.sections.contains(id_section)) {
            self.sectionsShowCnt[self.sections.indexOf(id_section)]++;
            if (self.visible.contains(id_section)) {
                var cnt = self.sectionsHideCnt[self.sections.indexOf(id_section)];
                var timerId = setTimeout(function(a, b) { return function() { self.hideSection(a, b); } }(id_section, cnt), self.delay.hide);
                self.timers.push(timerId);
            }
        }
    }

    /* event, section:onmouseover */
    function sectionOver() {
        self.initOnce();
        //self.parse(self.);
        //debug("sectionOver("+this.id+") , visible = " + self.visible);
        self.sectionsHideCnt[self.sections.indexOf(this.id)]++;
        var el = new Element(this.id);
        var parent = document.getElementById(el.getParent().id);
        if (!/item\d-active/.test(parent.className)) {
            parent.className = parent.className.replace(/(item\d)/, "$1-active");
        }
    }

    /* event, section:onmouseout */
    function sectionOut() {
        //debug("sectionOut("+this.id+") , visible = " + self.visible);
        self.sectionsShowCnt[self.sections.indexOf(this.id)]++;
        var cnt = self.sectionsHideCnt[self.sections.indexOf(this.id)];
        var timerId = setTimeout(function(a, b) { return function() { self.hideSection(a, b); } }(this.id, cnt), self.delay.hide);
        self.timers.push(timerId);
    }

    /* Show section (1 argument passed)
     * Try to show section (2 arguments passed) - check cnt with sectionShowCnt */
    this.showSection = function(id, cnt) {
        if (typeof cnt != "undefined") {
            if (cnt != this.sectionsShowCnt[this.sections.indexOf(id)]) { return; }
        }
        //debug("showSection("+id+", "+cnt+") , visible = " + this.visible);
        this.sectionsShowCnt[this.sections.indexOf(id)]++;
        if (this.visible.length) {
            if (id == this.visible.getLast()) { return; }
            var el = new Element(id);
            var parents = el.getParentSections();
            //debug("getParentSections("+el.id+") = " + parents);
            for (var i = this.visible.length - 1; i >= 0; i--) {
                if (parents.contains(this.visible[i])) {
                    break;
                } else {
                    this.hideSection(this.visible[i]);
                }
            }
        }
        var el = new Element(id);
        var parent = document.getElementById(el.getParent().id);
        if (!/item\d-active/.test(parent.className)) {
            parent.className = parent.className.replace(/(item\d)/, "$1-active");
        }
        if (document.all) { document.getElementById(id).style.display = "block"; }
        document.getElementById(id).style.visibility = "visible";
        document.getElementById(id).style.zIndex = this.zIndex.visible;
        if (this.fixIeSelectBoxBug && this.browser.ie6) {
            var div = document.getElementById(id);
            var iframe = document.getElementById(id+"-iframe");
            iframe.style.width = div.offsetWidth + parseInt(div.currentStyle.borderLeftWidth) + parseInt(div.currentStyle.borderRightWidth);
            iframe.style.height = div.offsetHeight + parseInt(div.currentStyle.borderTopWidth) + parseInt(div.currentStyle.borderBottomWidth);
            iframe.style.top = -parseInt(div.currentStyle.borderTopWidth);
            iframe.style.left = -parseInt(div.currentStyle.borderLeftWidth);
            iframe.style.zIndex = div.style.zIndex - 1;
            iframe.style.display = "block";
        }
        this.visible.push(id);
    }

    /* Emulating an empty non-existent section, we have to hide elements, works like showSection() */
    this.showItem = function(id, cnt) {
        if (typeof cnt != "undefined") {
            if (cnt != this.itemShowCnt) { return; }
        }
        this.itemShowCnt++;
        if (this.visible.length) {
            var el = new Element(id + "-section");
            var parents = el.getParentSections();
            //debug("showItem() getParentSections("+el.id+") = " + parents);
            for (var i = this.visible.length - 1; i >= 0; i--) {
                if (parents.contains(this.visible[i])) {
                    break;
                } else {
                    this.hideSection(this.visible[i]);
                }
            }
        }
    }

    /* Hide section (1 argument passed)
     * Try to hide section (2 arguments passed) - check cnt with sectionHideCnt */
    this.hideSection = function(id, cnt) {
        if (typeof cnt != "undefined") {
            if (cnt != this.sectionsHideCnt[this.sections.indexOf(id)]) { return; }
            if (id == this.visible.getLast()) {
                //debug("hideSectionAll("+id+", "+cnt+") , visible = " + this.visible);
                for (var i = this.visible.length - 1; i >= 0; i--) {
                    this.hideSection(this.visible[i]);
                }
                return;
            }
        }
        //debug("hideSection("+id+", "+cnt+") , visible = " + this.visible);
        var el = new Element(id);
        var parent = document.getElementById(el.getParent().id);
        if (/item\d-active/.test(parent.className)) {
            parent.className = parent.className.replace(/(item\d)-active/, "$1");
        }
        document.getElementById(id).style.zIndex = this.zIndex.hidden;
        document.getElementById(id).style.visibility = "hidden";
        if (document.all) { document.getElementById(id).style.display = "none"; }
        if (this.fixIeSelectBoxBug && this.browser.ie6) {
            var iframe = document.getElementById(id+"-iframe");
            iframe.style.display = "none";
        }
        if (this.visible.contains(id)) {
            if (id == this.visible.getLast()) {
                this.visible.pop();
            } else {
                //throw "DropDownMenuX.hideSection('"+id+"', "+cnt+") failed, trying to hide a section that is not the deepest visible section";
                return;
            }
        } else {
            //throw "DropDownMenuX.hideSection('"+id+"', "+cnt+") failed, cannot hide element that is not visible";
            return;
        }
        this.sectionsHideCnt[this.sections.indexOf(id)]++;
    }

    /* Element (.section, .item2 etc) */
    function Element(id) {
        
        this.menu = self;
        this.id = id;

        /* Get Level of given id
         * Examples: menu-1 (1 level), menu-1-4 (2 level) */
        this.getLevel = function() {
            var s = this.id.substr(this.menu.id.length);
            return s.substrCount("-");
        }

        /* Get parent Element */
        this.getParent = function() {
            var s = this.id.substr(this.menu.id.length);
            var a = s.split("-");
            a.pop();
            return new Element(this.menu.id + a.join("-"));
        }

        /* Check whether an element has a parent element */
        this.hasParent = function() {
            var s = this.id.substr(this.menu.id.length);
            var a = s.split("-");
            return a.length > 2;
        }

        /* Check whether an element has a sub-section */
        this.hasChilds = function() {
            return Boolean(document.getElementById(this.id + "-section"));
        }

        /* Get parent section elements for current section */
        this.getParentSections = function() {
            var s = this.id.substr(this.menu.id.length);
            s = s.substr(0, s.length - "-section".length);
            var a = s.split("-");
            a.shift();
            a.pop();
            var s = this.menu.id;
            var parents = [];
            for (var i = 0; i < a.length; i++) {
                s += ("-" + a[i]);
                parents.push(s + "-section");
            }
            return parents;
        }
        
        this.level = this.getLevel();
    }

    /* Clear all timers set with setTimeout() */
    function clearTimers() {
        for (var i = self.timers.length - 1; i >= 0; i--) {
            clearTimeout(self.timers[i]);
            self.timers.pop();
        }
    }

    var self = this;
    this.id = id; /* menu id */
    this.tree = []; /* tree structure of menu */
    this.sections = []; /* all sections, required for timeout */
    this.sectionsShowCnt = [];
    this.sectionsHideCnt = [];
    this.itemShowCnt = 0;
    this.timers = []; // timeout ids
    this.visible = []; /* visible section, ex. Array("menu-0-section", ..) , succession is important: top to bottom */
}

/* Finds the index of the first occurence of item in the array, or -1 if not found */
if (typeof Array.prototype.indexOf == "undefined") {
    Array.prototype.indexOf = function(item) {
        for (var i = 0; i < this.length; i++) {
            if (this[i] === item) {
                return i;
            }
        }
        return -1;
    }
}

/* Check whether array contains given string */
if (typeof Array.prototype.contains == "undefined") {
    Array.prototype.contains = function(s) {
        for (var i = 0; i < this.length; i++) {
            if (this[i] === s) {
                return true;
            }
        }
        return false;
    }
}

/* Counts the number of substring occurrences */
if (typeof String.prototype.substrCount == "undefined") {
    String.prototype.substrCount = function(s) {
        return this.split(s).length - 1;
    }
}

/* Get the last element from the array */
if (typeof Array.prototype.getLast == "undefined") {
    Array.prototype.getLast = function() {
        return this[this.length-1];
    }
}