/**
 * dropDownMenu v0.5 sw edition
 * An easy to implement dropDown Menu for Websites, that may be based on styled list tags
 *
 * Works for IE 5.5+ PC, Mozilla 1+ all Plattforms, Opera 7+
  */
/**
 * Container Class (Prototype) for the dropDownMenu
 *
 * @param idOrElement     String|HTMLElement  root Node of the menu (ul)
 * @param name            String              name of the variable that stores the result
 *                                            of this constructor function
 * @param customConfigFunction  Function            optional config function to override the default settings
 *                                            for an example see Menu.prototype.config
 */
var Menu = Class.create();
Menu.prototype = {

	initialize: function(idOrElement, name, customConfigFunction) {

		this.name = name;
		this.type = "menu";
		this.closeDelayTimer = null;
		this.closingMenuItem = null;

		this.config();
		if (typeof customConfigFunction == "function") {
			this.customConfig = customConfigFunction;
			this.customConfig();
		}
		this.rootContainer = new MenuContainer(idOrElement, this);
	},

	config: function() {
	  this.collapseBorders = true;
	  this.quickCollapse = true;
	  this.closeDelayTime = 500;
	}

}

var MenuContainer = Class.create();
MenuContainer.prototype = {
	initialize: function(idOrElement, parent) {
		this.type = "menuContainer";
  		this.menuItems = [];
		this.init(idOrElement, parent);
	},

	init: function(idOrElement, parent) {
	  this.element = $(idOrElement);
	  this.parent = parent;
	  this.parentMenu = (this.type == "menuContainer") ? ((parent) ? parent.parent : null) : parent;
	  this.root = parent instanceof Menu ? parent : parent.root;
	  this.id = this.element.id;

	  if (this.type == "menuContainer") {
	  	if (this.element.hasClassName("level1")) this.menuType = "horizontal";
		else if (this.element.hasClassName("level2")) this.menuType = "dropdown";
		else this.menuType = "flyout";

	    if (this.menuType == "flyout" || this.menuType == "dropdown") {
	      this.isOpen = false;
	     
		  Element.setStyle(this.element,{
	      	position: "absolute",
	      	top: "0px",
	      	left: "0px",
	      	display: "block",
	      	visibility: "hidden"});
	      	
	      	
	    } else {
	      this.isOpen = true;
	    }
	  } else {
	    this.isOpen = this.parentMenu.isOpen;
	  }

	  var childNodes = this.element.childNodes;
	  if (childNodes == null) return;

	  for (var i = 0; i < childNodes.length; i++) {
	    var node = childNodes[i];
	    if (node.nodeType == 1) {
	      if (this.type == "menuContainer") {
	        if (node.tagName.toLowerCase() == "li") {
	          this.menuItems.push(new MenuItem(node, this));
	        }
	      } else {
	        if (node.tagName.toLowerCase() == "div") {
	          this.subMenu = new MenuContainer(node, this);
	        }
	      }
	    }
	  }
	},

	getBorders: function(element) {
	  var ltrb = ["Left","Top","Right","Bottom"];
	  var result = {};
	  for (var i = 0; i < ltrb.length; ++i) {
	    if (this.element.currentStyle)
	      var value = parseInt(this.element.currentStyle["border"+ltrb[i]+"Width"]);
	    else if (window.getComputedStyle)
	      var value = parseInt(window.getComputedStyle(this.element, "").getPropertyValue("border-"+ltrb[i].toLowerCase()+"-width"));
	    else
	      var value = parseInt(this.element.style["border"+ltrb[i]]);
	    result[ltrb[i].toLowerCase()] = isNaN(value) ? 0 : value;
	  }
	  return result;
	},

	open: function() {
	  if (this.root.closeDelayTimer) window.clearTimeout(this.root.closeDelayTimer);
	  this.parentMenu.closeAll(this);
	  this.isOpen = true;

	  if (this.menuType == "dropdown") {
		  
		  	var menuNode = $( "menu" );
			
			if( menuNode.offsetParent )
			{
					for( var posX = 0, posY = 0; menuNode.offsetParent; menuNode = menuNode.offsetParent )
					{
							posX += menuNode.offsetLeft;
							posY += menuNode.offsetTop;
					}
			}
			
	        var leftPosFix = Position.positionedOffset(this.parent.element)[0];
	    	var maxW =  posX + Element.getWidth( "menu" );//( window.innerWidth ? window.innerWidth : document.body.offsetWidth );

		var need_center = false;
		if(  ( leftPosFix + Element.getWidth( this.element ) ) > maxW )
		{
			var leftPosFix_1 = leftPosFix;			
    			var leftPosFix   = Position.positionedOffset(this.parent.element)[0] - Element.getWidth( this.element ) + Element.getWidth( this.parent.element );
			var leftPosFix_2 = leftPosFix;			
			
			var left_1 = (  maxW - leftPosFix_1 );
			var left_2 = ( ( leftPosFix_2 ) + Element.getWidth( this.element ) );

			if( left_1 >= left_2 )
			{
				leftPosFix = leftPosFix_1;
			}else{
				leftPosFix =  leftPosFix_2;			
			}		
			
			if(  ( leftPosFix + Element.getWidth( this.element ) ) > maxW )
			{
				need_center = true;
				
			}else if( leftPosFix < 0 )
			{
				need_center = true;
			}
			
/*			if( (  Position.positionedOffset( "menu" )[0] + Element.getWidth( "menu" )  ) < Position.positionedOffset(this.parent.element)[0] + Element.getWidth( this.parent.element ) )
			{
				//need_center = true;
			}*/
			
			if( leftPosFix < posX )
			{
				need_center = true;
			}

			if( need_center )
			{
				var sStart = posX + (  Element.getWidth( "menu" ) / 2 );
				leftPosFix   = ( sStart ) - ( Element.getWidth( this.element ) / 2 )
			}
		}

		Element.setStyle(this.element,{
			left: (leftPosFix) + "px",
			top: (Position.positionedOffset(this.parent.element)[1] + Element.getHeight(this.parent.element)) + "px"
		});
	
		
	  } else if (this.menuType == "flyout") {
	    var parentMenuBorders = this.parentMenu ? this.parentMenu.getBorders() : new Object();
	    var thisBorders = this.getBorders();
	    if (
	      (Position.positionedOffset(this.parentMenu.element)[0] + this.parentMenu.element.offsetWidth + this.element.offsetWidth + 20) >
	      (window.innerWidth ? window.innerWidth : document.body.offsetWidth)
	    ) {
			Element.setStyle(this.element,{
	      		left: (- this.element.offsetWidth - (this.root.collapseBorders ?  0 : parentMenuBorders["left"])) + "px"
			});
	    } else {
			Element.setStyle(this.element,{
	    		left: (this.parentMenu.element.offsetWidth - parentMenuBorders["left"] - (this.root.collapseBorders ?  Math.min(parentMenuBorders["right"], thisBorders["left"]) : 0)) + "px"
			});
	    }
		Element.setStyle(this.element,{
	    	top: (this.parent.element.offsetTop - parentMenuBorders["top"] - this.menuItems[0].element.offsetTop) + "px"
		});
	  }
	  Element.setStyle(this.element,{visibility: "visible"});
	},

	close: function() {
		Element.setStyle(this.element,{visibility: "hidden"});
		this.isOpen = false;
		this.closeAll();
	},

	closeAll: function(trigger) {
		for (var i = 0; i < this.menuItems.length; ++i) {
			this.menuItems[i].closeItem(trigger);
		}
	}

}

var MenuItem = Class.create();

Object.extend(Object.extend(MenuItem.prototype, MenuContainer.prototype), {
	initialize: function(idOrElement, parent) {
		var menuItem = this;
		this.type = "menuItem";
		this.subMenu;
		this.init(idOrElement, parent);
		if (this.subMenu) {
			this.element.onmouseover = function() {
				menuItem.subMenu.open();
			}
		} else {
		if (this.root.quickCollapse) {
		  this.element.onmouseover = function() {
			menuItem.parentMenu.closeAll();
		  }
		}
		  }
		  var linkTag = this.element.getElementsByTagName("A")[0];
		  if (linkTag) {
		 linkTag.onfocus = this.element.onmouseover;
		 this.link = linkTag;
		 this.text = linkTag.text;
		  }
		  if (this.subMenu) {
		this.element.onmouseout = function() {
		  if (menuItem.root.openDelayTimer) window.clearTimeout(menuItem.root.openDelayTimer);
		  if (menuItem.root.closeDelayTimer) window.clearTimeout(menuItem.root.closeDelayTimer);
		  eval(menuItem.root.name + ".closingMenuItem = menuItem");
		  menuItem.root.closeDelayTimer = window.setTimeout(menuItem.root.name + ".closingMenuItem.subMenu.close()", menuItem.root.closeDelayTime);
		}
		  }
	},

	openItem: function() {
	  this.isOpen = true;
	  if (this.subMenu) { this.subMenu.open(); }
	},

	closeItem: function(trigger) {
	  this.isOpen = false;
	  if (this.subMenu) {
	    if (this.subMenu != trigger) this.subMenu.close();
	  }
	}
});

var menu;
var min_items_per_column = 14;
var two_columns_width    = "387px";
var tree_columns_width   = "580px";
var four_columns_width   = "772px";

function configMenu() {   

   //get all sub menus
   var rootNode = $( this.name );
   
   //get all columns
   var columns  = rootNode.select( ".submenu_column" );

   for( var cC = 0; cC < columns.length; cC++ )
   {
	    reorder_column( columns[cC], rootNode );
   }

  this.closeDelayTime = 300;
}

function reorder_column( column )
{ 
    var links = column.select( "a" );
    
    var links_size = links.length;
    var new_size   = links_size;
    
    var columns    = 4;
    
    var per_column = Math.ceil( links_size / columns );
    
    if( per_column < min_items_per_column )
    {
	    var columns    = 3;
	    var per_column = Math.ceil( links_size / columns );
    }
    
    if( per_column < min_items_per_column )
    {
	    var columns    = 2;
	    var per_column = Math.ceil( links_size / columns );
    }
    
    if ( links_size < 25 && links_size > 10)
    { 
      var columns = 2;
      var per_column = Math.ceil( links_size / columns ); 
    }else if( per_column < min_items_per_column )
    {
	     return;
    }
    
    if( columns < 2 ){ return; }
    
    var parentNode = column.parentNode;
    
    switch( columns )
    {
          case 2:
              parentNode.style.width = two_columns_width;
            break;
          case 3:
              parentNode.style.width = tree_columns_width
            break;  
	  case 4:
	      parentNode.style.width = four_columns_width
	    break;
    }
    var new_columns = new Array();
    for( var cC = 1; cC < columns; cC ++ )
    {	
	    new_columns[cC -1] = document.createElement( "div" );
	    new_columns[cC -1].className = "submenu_column";
	    parentNode.appendChild( new_columns[cC -1] );
    }
    for( var cL = 0; cL < links_size; cL++)
    {
	    if( ( cL + 1 ) > ( per_column * 3 ) )
	    {
		    new_columns[ 2 ].appendChild( links[ cL ] );
	    }
	    else if( ( cL + 1 ) > ( per_column * 2 ) )
	    {
		    new_columns[ 1 ].appendChild( links[ cL ] );
	    }
	    else if( ( cL + 1 ) > ( per_column  ) )
	    {
		    new_columns[ 0 ].appendChild( links[ cL ] );
	    }
    }
}

function initMenu() {
  menu = new Menu('root', 'menu', configMenu);
}
Event.observe(window, 'load', initMenu, false);