// This script is not freeware!
//
// Multi-Level Drop-Down Menu 2.32
// You can find and buy latest version of the script 
// at the http://spicebrains.com/multi-level-drop-down-menu/
//
// Copyright 2008 SpiceBrains.com
////////////////////////////////////////////////////////////////////////////////////////////////////

var _debug = 0;

// global initializations parameters
if(!mlddm_effect)
{
	var mlddm_shiftx		= 0;
	var mlddm_shifty		= 0;			
	var mlddm_timeout		= 500;		
	var mlddm_effect		= 'none';			
	var mlddm_effect_speed	= 300;
	var mlddm_orientation	= 'h';
	var mlddm_direction		= true;
	var mlddm_md			= 375;
}

// global variables
var MLDDM_CLASS		= 'mlddm';		//	menu identifier
var obj_menu		= new Array();	//	for store menu objects

// initialise all menus identified by <ul class="mlddm">
function mlddminit(md7)
{
	//mlddm_md = md7;

	// fill the array with all <ul> objects
	var candidates = document.getElementsByTagName('ul');
	var index = 0;

	// check all candidates
	for(var i=0; i < candidates.length; i++) 
	{
		// creating menu objects
		if(candidates[i].className == MLDDM_CLASS) 
		{

			// show menu
			candidates[i].style.visibility = 'visible';

			// read initialization parameters
			var obj = candidates[i];
			var value = obj.getAttribute('params');
		
			// create an object and store the handler
			obj_menu[index] = new menu(obj, index, value); 
			index++; 
		}
	}
}

// single layer prototype
function layer(handler)
{
	this.handler		= handler;		// pointer to an object       
	this.showed			= false;		// showed/hidden flag         
	this.level			= 0;			// level                      
	this.outerwidth		= 0;			// layer's width (outer)      
	this.outerheight	= 0;			// layer's height (outer)     
	this.innerwidth		= 0;			// layer's width (inner)      
	this.innerheight	= 0;			// layer's height (inner)     
	this.x				= 0;			// x position                 
	this.y				= 0;			// y position                 
	this.border			= 0;			// border width
	this.topmargin		= 0;			// top margin
	this.shifter		= 0;			// height of the block of inner nodes up to child layer
	this.parentindex	= 0;			// parent's layer index  
	this.reverse		= false;		// default or reverse position (if not enough horizontal space)
	this.timeouts		= new Array();	// pointers backgound open/hide timeout functions
	this.degree			= 0;			// current degree of slide/fade effect
	this.csstext		= '';			// current inline css
}

////////////////////////////////////////////////////////////////////////////////////////////////////
// main menu class
// receive the object handler, object number, and initialization parameters string
function menu(obj, obj_n, params)	
{
	// variables declaration ************************************************************/
	var _handler			= obj;					// mlddm obj                                   
	var _obj_num			= obj_n;				// quantity of menu objects (if there are more than one)     
	var _me					= this;					// alternate pointer to itself
	var _closetimer			= null;					// timer                                      
	var _mouseout			= true;					// flag (to avoid triggering multidrug)
	var _currentlayer		= null;					// active layer (mouseover)
 
	// default parameters
	var _shiftx				= mlddm_shiftx;			// íorizontal submenu shifting (in pixels)
	var _shifty				= mlddm_shifty;			// vertical submenu shifting (in pixels)
	var _timeout			= mlddm_timeout;		// default timeout	
	var _effect				= mlddm_effect;			// default effect (can be none, slide or fade)		
	var _effect_speed		= mlddm_effect_speed;	// specifies the visual effect speed
	var _orientation		= mlddm_orientation;	// specifies the horizontal or vertical orientation (can be 'h' or 'v')
	var _direction			= mlddm_direction;		// (on/off automatic submenus direction (submenus on left side then not enoght right space)
	
	// read parameters from html and change local variables
	var params_array; 
	if(params) 
	{ 
		params_array = params.split(",");
		if(params_array[0]) _shiftx       = params_array[0]*1;	// *1 - string to a numeral convert	
		if(params_array[1]) _shifty       = params_array[1]*1;
		if(params_array[2]) _timeout      = params_array[2]*1;
		if(params_array[3]) _effect		  = params_array[3];
		if(params_array[4]) _effect_speed = params_array[4]*1;
		if(params_array[5]) _orientation  = params_array[5];
		if(params_array[6]) _direction    = params_array[6]*1;

		// it is not allowed if effect speed is equal to zero
		if(!_effect_speed) _effect_speed = 1000;
	}

	// pointer to all layers array
	this._layer = new Array();

	//var _debug;

// declaration of methods  **************************************************************/
// private:
	
	// fade in/fade out effect
	function opacity(index, opac_start, opac_end, speed) 
	{ 
		var current_layer = _me._layer[index];

		//clear timeouts for current layer and get current degree
		for(var z = 0; z < current_layer.timeouts.length; z++) clearTimeout(current_layer.timeouts[z]);
		var degree = current_layer.degree;
		
		// speed for each frame
		var speed = Math.round(1000/speed); 
		var timer = 0; 

		// determine the direction for the blending, 
		// if start and end are the same nothing happens
		if(degree < opac_end)		// show
		{ 
			for(var i = degree; i <= opac_end; i = i + 4) 
			{ 
				current_layer.timeouts[timer] = setTimeout("changeOpac(" + _obj_num + "," + index + "," + i + ")", (timer * speed)); 
				timer++; 
			} 
		}
		else if(degree > opac_end)	// hide
		{ 
			for(var i = degree; i >= opac_end; i = i - 4) 
			{ 
				current_layer.timeouts[timer] = setTimeout("changeOpac(" + _obj_num + "," + index + "," + i + ")", (timer * speed)); 
				timer++; 
			}
		}
	}

	// slide effect
	function slide(index, direction, speed)
	{
		var current_layer = _me._layer[index];

		//clear timeouts for current layer and get current degree
		for(var z = 0; z < current_layer.timeouts.length; z++) clearTimeout(current_layer.timeouts[z]);
		var degree = current_layer.degree;

		// speed for each frame
		var speed = Math.round(1000/speed); 
		var timer = 0; 
		
		if(_orientation == 'h')	_ori = 0;	// horizontal
		else					_ori = 1;	// vertical

		// determine the direction
		if(direction == 'show') 
		{ 
			for(i = degree; i <= 100; i = i + 2) 
			{ 
				current_layer.timeouts[timer] = setTimeout("changePOS(" + _obj_num + "," + index + "," + i + "," + _ori + ")", (timer * speed)); 
				timer++; 
			} 
		} 
		else if(direction == 'hide') 
		{ 
			for(i = degree; i >= 0; i = i - 2) 
			{ 
				current_layer.timeouts[timer] = setTimeout("changePOS(" + _obj_num + "," + index + "," + i + "," + _ori + ")", (timer * speed)); 
				timer++; 
			}
		} 
	}

	// open hidden layer
	function mopen(index)
	{
		if(!_me._layer[index].showed && (mlddm_md==375))// proceed only if layer is hidden
		{
			if(_effect == 'fade')		opacity(index, 0, 100, _effect_speed);	// show using fade effect
			else if(_effect == 'slide')	slide(index, 'show', _effect_speed);	// show using slide effect	
			else						_me._layer[index].handler.style.visibility = 'visible';

			button_on(_me._layer[index].handler);		// turn on top-level button        	
			_me._layer[index].showed = true;			// change status in the hash
		}
	}

	// close showed layer
	function mclose(index)
	{
		if(_me._layer[index].showed)					// proceed only if layer is showed
		{
			if(_effect == 'fade')		opacity(index, 100, 0, _effect_speed);	// hide using fade effect
			else if(_effect == 'slide')	slide(index, 'hide', _effect_speed);	// hide using slide effect
			else						_me._layer[index].handler.style.visibility = 'hidden';
			
			button_off(_me._layer[index].handler);		// turn off top-level button       
			_me._layer[index].showed = false;			// change status in the hash 
		}
	}
	
	// return level of the layer
	function getlevel(layer)
	{
		var level = 0;
		var currentobj = layer;
		while(currentobj.className != MLDDM_CLASS)
		{
			if(currentobj.nodeName == 'UL') level++;
			currentobj = currentobj.parentNode;
		}
		
		return level;
	}
	
	// calculates the button handler by child layer
	function getbutton(layer)
	{
		var button;
		var currobj = layer;
		var index = 0;
		while(currobj.className != MLDDM_CLASS)
		{	
			if(currobj.nodeName == 'LI') 
			{
				index++;
				button = currobj;
			}
			currobj = currobj.parentNode;
		}
		return button;
	}
	
	// turn on button by setting "buttonhover" id
	function button_on(layer)
	{
		// only if it the top level object
		if(getlevel(layer) !=1) return -1;

		var button = getbutton(layer);
		if(button) 
		{
			button = button.getElementsByTagName("a")[0];
			button.id = 'buttonhover';
		}
	}

	// turn off button by setting "buttonnohover" id
	function button_off(layer)
	{
		// only if it the top level object
		if(getlevel(layer) !=1) return -1;

		var button = getbutton(layer);
		if(button) 
		{
			button = button.getElementsByTagName("a")[0];
			button.id = 'buttonnohover';
		}
	}
	
	// return index of the layer by handler
	function getlayerindex(obj) 
	{ 
		for(i = 0; i < _me._layer.length; i++) { if(_me._layer[i].handler == obj) return i; } 
		return -1; 
	}
	
	// return index of the parent layer
	function getparentindex(layer)
	{
		while(layer.className != MLDDM_CLASS)
		{
			layer = layer.parentNode;
			if(layer.nodeName == 'UL') return getlayerindex(layer);
		}
		return -1;
	}

	// get top margin
	function gettopmargin(obj)
	{
		var top = obj.offsetTop;
			obj.style.marginTop = '0px';
		var margintop = top - obj.offsetTop; 
			obj.style.marginTop = margintop+'px';
		return margintop;
	}

	// get height of parent item
	function getparentheight(layer)
	{
		while(layer.className != MLDDM_CLASS) 
		{
			layer = layer.parentNode;
			if(layer.nodeName == 'LI') break;
		}
		return layer.getElementsByTagName("a")[0].offsetHeight; // return height of parent <a> node
	}

	// close all layers
	function closeall() { for(var i=0; i < _me._layer.length; i++) { mclose(i); }}

	// set close timer
	function mclosetime() {	_closetimer = window.setTimeout(closeall, _timeout); }
	
	// cancel close timer
	function mcancelclosetime() { if(_closetimer) { window.clearTimeout(_closetimer); _closetimer = null; }}

	// recalculate and set new position for all layers
	function setpositions(client_width, scroll_left)
	{
		var max_right = client_width + scroll_left;

		// reset all positions to default state 
		for(var i = 0; i < _me._layer.length; i++)
		{
			if(_me._layer[i].level > 1)
			{
				_me._layer[i].handler.style.left = _me._layer[i].x + 'px';
				_me._layer[i].reverse = false;
			}
		}
		
		// if not enought horizontal space for layer - change positon of the layer to reverse
		for(var i = 0; i < _me._layer.length; i++)
		{
			var current_layer = _me._layer[i];
			if(current_layer.level > 1)
			{
				var layer_width  = current_layer.outerwidth;
				var border_width = current_layer.border;
				var layer_absx   = findPos(current_layer.handler)[0];
				
				if((layer_absx + layer_width + border_width*current_layer.level - border_width) > max_right && _direction)
				{
					current_layer.handler.style.left = -layer_width - _shiftx + 'px';
					current_layer.reverse = true;
				}
			}
		}
	}

//public methods:
	// public close all layers
	this.pcloseall = function() { closeall(); };

	// public reset
	this.reset = function() { setpositions(getClientWidth(), getScrollLeft()); };

	// window resize event handler
	this.eventresize = function() { setpositions(getClientWidth(), getScrollLeft()); };

	// scroll event handler
	this.eventscroll = function() { setpositions(getClientWidth(), getScrollLeft()); };

	// mouseover event handler (current object is li-node)
	this.eventover = function()
	{
		if(_mouseout)					// to avoid multidrug triggering 
		{	
			_mouseout = false;			// reset flag
			mcancelclosetime();			// cancel timeout
			var currentli = this;		// current li node
			
			// if current li node have child layer, it will be shown
			var layer = currentli.getElementsByTagName("ul")[0];
			var ind = getlayerindex(layer);
			if(ind >= 0) mopen(ind);
			
			// collect pointers to all layers that will be shown
			var open_layers = new Array();
				
				// try to find first layer within current li node
				open_layers[0] = currentli.getElementsByTagName("ul")[0];
				if(!open_layers[0]) open_layers[0] = 0;
				
				// collect
				var currobj = currentli.parentNode;
				var num = 0;
				while(currobj.className != MLDDM_CLASS)
				{
					if(currobj.nodeName == 'UL') 
					{
						num++;
						open_layers[num] = currobj;
					}
					currobj = currobj.parentNode;
				}
			
			// layers to hide
			var layers_to_hide = new Array(_me._layer.length);
			
			// fill with false values
			for(var i=0; i < layers_to_hide.length; i++) 
				layers_to_hide[i] = false;
			
			// set true flags to all showed layers
			for(var i=0; i < open_layers.length; i++)
				layers_to_hide[getlayerindex(open_layers[i])] = true;
			
			// hide all layers with false flag
			for(var i=0; i < layers_to_hide.length; i++)
				if(!layers_to_hide[i] && (_currentlayer != open_layers[0])) mclose(i);
			
			// show and save current layer
			_currentlayer = open_layers[1];
		}
	};
	this.eventout = function() { _mouseout = true; };	// set mouseout flag
	this.allout   = function() { mclosetime(); };		// turn on close timer
	this.allover  = function() { mcancelclosetime(); }; // cancel close timer
	
// constructor **************************************************************************/
	if(document.getElementById('debug')) _debug = document.getElementById('debug');
	_debug.value = '';

	// calculate width and height of the menu and set width and height fixed (for further easy alignment or centering);
	var css = _handler.style.cssText; // store
	_handler.style.cssText = 'visibility:visible;float:left;border-width:0px;margin:0;padding:0;'; // reset
	_handler.style.cssText = ';width:'+_handler.offsetWidth+'px;'+'height:'+_handler.offsetHeight+'px;'+css; // set+restore

	// find all li nodes and set mouse event handlers 
	// also create all layer objects
	var all_li = _handler.getElementsByTagName("li");
	this._layer[0] = new layer(_handler);					// create zero-level layer (root ul)
	for(var z = 0; z < all_li.length; z++)
	{
		// find <ul>-nodes and create layer objects
		var layer_handler = all_li[z].getElementsByTagName("ul")[0];
		if(layer_handler) this._layer[this._layer.length] = new layer(layer_handler);
		
		// set mouse event handlers
		all_li[z].onmouseover = this.eventover;
		all_li[z].onmouseout  = this.eventout;
	}
	
	// setup event handlers
	_handler.onmouseout  = this.allout;						// set global mouseout event handler
	_handler.onmouseover = this.allover;					// set global onmouseover event handler
	if(_direction) window.onresize = this.eventresize;		// set onresize event handler
	window.onscroll = this.eventscroll;						// set onmove event handler

	// calculate inner width of current layer
	// and set width though css for current layer (for avoid some incompatibility bugs)
	for(var num = 1; num < this._layer.length; num++)
	{
		var nodesww = this._layer[num].handler.childNodes;	// all nodes (with whitespaces) within current layer
		var nodes = new Array();							// all nodes (without whitespaces) within current layer
		var specific_nodes = new Array();					// non <a>-tags within li (deviders, etc)
		var maxwidth = 0;									// width of widest <a>-tag

		// clear array from whitespaces
		for(var x = 0; x < nodesww.length; x++) 
		{	if(!is_ignorable(nodesww[x])) nodes[nodes.length] = nodesww[x]; }
		
		// temporary disable all <li> where non-<a> nodes (deviders, etc) (ie6 fix) 
		// and store to specific_nodes array for following enable
		for(var y = 0; y < nodes.length; y++)
		{
		    var dnodes = nodes[y].getElementsByTagName("*");
			if(dnodes.length && !is_ignorable(dnodes[0]) && dnodes[0].nodeName != 'A') 
			{
				dnodes[0].style.display = 'none';
				specific_nodes[specific_nodes.length] = dnodes[0];
			} 
		}

		// calculate inner width (width of widest <a>-tag)
		for(var z = 0; z < nodes.length; z++)
		{
			var anodes = nodes[z].getElementsByTagName("a");
			if(anodes[0])
			{
				var width = anodes[0].offsetWidth;
				if(width > maxwidth) maxwidth = width;
			}
		}

		// make visible specific nodes
		for(var s = 0; s < specific_nodes.length; s++) specific_nodes[s].style.display = 'block';

		// set width though css for current layer
		this._layer[num].handler.style.width = maxwidth + 'px';
	}

	// calculate and save specific parameters for each layer
	for(var num = 0; num < this._layer.length; num++) // pass all layers
	{
		var current_layer = this._layer[num];

		current_layer.level       = getlevel(current_layer.handler);
		current_layer.parentindex = getparentindex(current_layer.handler);
		current_layer.outerwidth  = current_layer.handler.offsetWidth;
		current_layer.outerheight = current_layer.handler.offsetHeight;
		current_layer.innerwidth  = getchildnode(current_layer.handler.getElementsByTagName("li")[0]).offsetWidth;
		current_layer.innerheight = 0;
		current_layer.border      = (current_layer.outerwidth - current_layer.innerwidth)/2;
		current_layer.topmargin   = gettopmargin(current_layer.handler);
		current_layer.shifter     = getparentheight(current_layer.handler);
	}

	// pass all layers and set default positions
	for(var num = 0; num < this._layer.length; num++)
	{
		var level = this._layer[num].level;				// get level of current layer
		var current_layer = this._layer[num];			// get current layer
		
		// if horizontal orientation: first level layer already have correct position
		if((_orientation == 'h' && level > 1) || (_orientation == 'v' && level > 0))
		{
			// save default relative position
			// Note: offsetTop returns vertical layer position without top-margin
			current_layer.x = this._layer[current_layer.parentindex].innerwidth + _shiftx;
			current_layer.y = current_layer.handler.offsetTop - current_layer.topmargin - current_layer.shifter  + _shifty;

			// setup new positions
			current_layer.handler.style.left = current_layer.x + 'px';
			current_layer.handler.style.top  = current_layer.y + 'px';
		}
	}
	
	// onstart recalculate and set new position for all layers
	setpositions(getClientWidth(), getScrollLeft());
}
// end class menu

// change the opacity for different browsers 
function changeOpac(obj_num, layer_num, opacity)
{
	var object = obj_menu[obj_num];
	var layer  = object._layer[layer_num];

	layer.degree = opacity; // current layer state

	layer.handler.style.opacity			= (opacity / 100); 
	layer.handler.style.MozOpacity		= (opacity / 100); 
	layer.handler.style.KhtmlOpacity	= (opacity / 100); 
	layer.handler.style.filter			= "alpha(opacity="+opacity+")";

	if(opacity > 98) layer.handler.style.filter = 'none';			

	if(opacity  > 0) layer.handler.style.visibility='visible';
	if(opacity <= 0) layer.handler.style.visibility='hidden';
}

// change the POSition for different browsers 
function changePOS(obj_num, layer_num, pos, ori)
{
	var object		= obj_menu[obj_num];
	var layer		= object._layer[layer_num];

	var level		= layer.level;
	var width		= layer.outerwidth;
	var height		= layer.outerheight;
	var margintop	= layer.topmargin;
	var reverse		= layer.reverse;
    
	layer.degree = pos; // current layer position state

	// left to right slide or top to bottom
	if(!reverse)
	{
		if(level == 1 && ori == 0)
		{
			var h = height - pos*height/100; 
			uniclip(layer.handler, h, 2000, 2000, 0);
			layer.handler.style.marginTop = -h+margintop+'px';
		}
		else
		{
			var w = width - pos*width/100; 
			uniclip(layer.handler, 0, 2000, 2000, w);
			layer.handler.style.marginLeft = -w+'px';
		}
	}
	else // reverse moving
	{
		var w = width - pos*width/100;  // w: width->0
		var mw = width - w;				// mw: 0->width
		uniclip(layer.handler, 0, mw, 2000, 0);
		layer.handler.style.marginLeft = w+'px';
	}
	
	// on/off drawn layers
	if(pos <= 0) 
	{	
		layer.handler.style.visibility = 'hidden';	// make hidden
		uniclip(layer.handler, 0, 0, 0, 0);			// reset clip
		layer.handler.style.marginLeft = 'auto';	// reset margin-left
	}
	if(pos  > 0) 
	{
		layer.handler.style.visibility = 'visible';	// make visible
	}
	if(pos  > 98)
	{
		uniclip(layer.handler, 0, 0, 0, 0);			// reset clip
		layer.handler.style.marginLeft = 'auto';	// reset margin-left
	}
}

function mlddmreset() { for(var i=0; i < obj_menu.length; i++) { obj_menu[i].reset(); } }
function mlddmclose() { for(var i=0; i < obj_menu.length; i++) { obj_menu[i].pcloseall(); } }
document.onclick = mlddmclose; // close all layers

// independent functions ///////////////////////////////////////////////////////////////////////////
// Bypass whitespaces. Read more at http://developer.mozilla.org/en/docs/Whitespace_in_the_DOM
function is_all_ws(nod)
{
	return !(/[^\t\n\r ]/.test(nod.data)); 
}

function is_ignorable(nod)
{
	return ( nod.nodeType == 8) || 
           ((nod.nodeType == 3) && is_all_ws(nod) ); 
}

function node_after(sib)
{
	while((sib = sib.nextSibling)) { if(!is_ignorable(sib)) return sib; }
	return null;
}

// return real child node
function getchildnode(handler)
{
	var node = handler.childNodes[0];
	if(is_ignorable(node)) node = node_after(node);
	return node;
}

// univesal css clip
function uniclip(handler, x1, y1, x2, y2)
{
	if((x1 == 0) && (y1 == 0) && (x2 == 0) && (y2 == 0))
	{	
		var csstext = handler.style.cssText;
		handler.style.cssText = csstext.replace(/clip: {0,2}.*\);{0,1}/i, '');;
		return;
	}

	handler.style.clip = 'rect('+x1+'px, '+y1+'px, '+x2+'px, '+y2+'px)';
}

////////////////////////////////////////////////////////////////////////////////////////////////////
function getClientWidth()
{
	//return document.compatMode=='CSS1Compat' && !window.opera?document.documentElement.clientWidth:document.body.clientWidth;
	return document.documentElement.clientWidth;
}
function getClientHeight()
{
	//return document.compatMode=='CSS1Compat' && !window.opera?document.documentElement.clientHeight:document.body.clientHeight;
	return document.documentElement.clientHeight;
}

function getScrollLeft()
{
	return document.compatMode=='CSS1Compat' && !window.opera?document.documentElement.scrollLeft:document.body.scrollLeft;
}

////////////////////////////////////////////////////////////////////////////////////////////////////
function findPos(obj) 
{
	var curleft = curtop = 0;
	if(obj.offsetParent) 
	{
		do 
		{
			curleft += obj.offsetLeft;
			curtop  += obj.offsetTop;
		} 
		while(obj = obj.offsetParent);
	}
	
	return [curleft,curtop];
}

// automatic loader ////////////////////////////////////////////////////////////////////////////////
_LOADERS = Array();

function callAllLoaders() 
{
	var i, loaderFunc;

	for(i=0; i<_LOADERS.length; i++) 
	{
		loaderFunc = _LOADERS[i];
		if(loaderFunc != callAllLoaders) loaderFunc();
	}
}

function appendLoader(loaderFunc) 
{
	if(window.onload && window.onload != callAllLoaders) _LOADERS[_LOADERS.length] = window.onload;
	window.onload = callAllLoaders;
	_LOADERS[_LOADERS.length] = loaderFunc;
}

// auto start script
//appendLoader(mlddminit);