// Title: tigra menu
// Description: See the demo at url
// URL: http://www.softcomplex.com/products/tigra_menu/
// Version: 2.0 (commented source)
// Date: 04-05-2003 (mm-dd-yyyy)
// Contact: feedback@softcomplex.com (specify product title in the subject)
// Tech. Support: http://www.softcomplex.com/forum/forumdisplay.php?fid=40
// Notes: This script is free. Visit official site for further details.

// --------------------------------------------------------------------------------
// global collection containing all menus on current page
var A_MENUS = [];
//a global variable that controls the maximum length of the text to be shown

function StringBuilder(value)
{
    this.strings = new Array("");
    this.append(value);
}
StringBuilder.prototype.append = function(value)
{
    if(typeof(value) == "number" && !value)
        value = '0';
    if(value)this.strings.push(value);
}
StringBuilder.prototype.clear = function()
{
    this.strings.length = 1;
}
StringBuilder.prototype.toString = function()
{
    return this.strings.join("");
}

// --------------------------------------------------------------------------------
// menu class
function menu (a_items, a_tpl, element_id) {
	// browser check
	if (!document.body || !document.body.style)
		return;
    this.element = document.getElementById(element_id);
	// store items structure
	this.a_config = a_items;

	// store template structure
	this.a_tpl = a_tpl;

	// get menu id
	this.n_id = A_MENUS.length;

	// declare collections
	this.a_index = [];
	this.a_children = [];
    
	// default level scope description structure
	this.a_tpl_def = {
		'block_top'  : 16,
		'block_left' : 16,
		'top'        : 20,
		'left'       : 4,
		'width'      : 120,
		'height'     : 22,
		'hide_delay' : 0,
		'expd_delay' : 0,
		'mode'      : 'hover',
		'css'        : {
			'inner' : '',
			'outer' : ''
		}
	};

	// assign methods and properties required to imulate parent item
	this.getprop = function (s_key) {
		return this.a_tpl_def[s_key];
	};

	this.o_root = this;
	this.n_depth = -1;
	this.n_x = 0;
	this.n_y = 0;
    this.html = new StringBuilder();
	// 	init items recursively
	for (n_order = 0; n_order < a_items.length; n_order++)
		new menu_item(this, n_order);
		
	document.write(this.html.toString());
	
	// register self in global collection
	A_MENUS[this.n_id] = this;

    var childArray = this.o_root.element.childNodes;
    var childArrayLength = childArray.length;
    var index=0;
    var theIndexArray = this.a_index;
    var temp;
    for(var i=0;i<childArrayLength;i++)
    {
        if(childArray[i].tagName == 'A')
        {
            temp = theIndexArray[index].e_oelement = childArray[i];
        	theIndexArray[index].e_ielement = temp.firstChild;
	        theIndexArray[index].i_element = temp.nextSibling;
            i++;
            index++;
        }
    }
	// make root level visible
	for (var n_order = 0; n_order < this.a_children.length; n_order++) {
	   
		this.a_children[n_order].e_oelement.style.visibility = 'visible';
		this.a_children[n_order].i_element.style.visibility = 'visible';
	}

}
menu.prototype.collapse = function(n_id) {
	// cancel item open delay
	clearTimeout(this.o_showtimer);

	// by default collapse to root level
	var n_tolevel = (n_id ? this.a_index[n_id].n_depth : 0);

	// hide all items over the level specified
	for (n_id = 0; n_id < this.a_index.length; n_id++) {
		var o_curritem = this.a_index[n_id];
		if (o_curritem.n_depth > n_tolevel && o_curritem.b_visible) {
			o_curritem.e_oelement.style.visibility = 'hidden';
			o_curritem.i_element.style.visibility = 'hidden';
			o_curritem.b_visible = false;
		}
	}

	// reset current item if mouse has gone out of items
	if (!n_id)
		this.o_current = null;
}
var A_MENU_OPENED_ID = null;
var A_MENU_OPENED_ITEM_ID = null;

menu.prototype.expand = function(n_id) {

	// expand only when mouse is over some menu item
	if (this.o_hidetimer)
		return;
    
	// lookup current item
	var o_item = this.a_index[n_id];
    if (A_MENU_OPENED_ID != null && A_MENU_OPENED_ITEM_ID != null){
        if(A_MENU_OPENED_ID != o_item.o_root.n_id){
            A_MENUS[A_MENU_OPENED_ID].collapse(A_MENU_OPENED_ITEM_ID);
            A_MENU_OPENED_ID = null;
            A_MENU_OPENED_ITEM_ID = null;
        }
    }
    
	// close previously opened items
	if (this.o_current && this.o_current.n_depth >= o_item.n_depth)
		this.collapse(o_item.n_id);
	this.o_current = o_item;

	// exit if there are no children to open
	if (!o_item.a_children)
		return;
    
	// show direct child items
	for (var n_order = 0; n_order < o_item.a_children.length; n_order++) {
		var o_curritem = o_item.a_children[n_order];
		o_curritem.e_oelement.style.visibility = 'visible';
		o_curritem.i_element.style.visibility = 'visible';
		o_curritem.i_element.style.zIndex = o_curritem.e_oelement.style.zIndex - 1;
		o_curritem.b_visible = true;		
	}
	
	//adjust the width and position to the display text
//	if(!o_item.child_width_adjusted && o_item.a_children){
//        var max_width = 0;
//        var original_width = 0;
//        var current_item;
//        for (var n_order = 0; n_order < o_item.a_children.length; n_order++){
//            current_item = o_item.a_children[n_order];
//        	if(current_item.e_oelement.offsetWidth>max_width){
//		        max_width = current_item.e_oelement.offsetWidth;		        
//		    }
//		    if(original_width == 0){
//		        original_width = parseInt(current_item.e_oelement.style.width);
//		    }
//		}		
//	    for (var n_order = 0; n_order < o_item.a_children.length; n_order++){
//	        current_item = o_item.a_children[n_order];
//		    current_item.e_oelement.style.width = max_width;
//		    current_item.i_element.style.width = max_width;
//		    if(current_item.a_children){		        
//		        for(var child_index = 0;child_index < current_item.a_children.length;child_index++){		        
//		            current_item.a_children[child_index].e_oelement.style.left = (parseInt(current_item.a_children[child_index].e_oelement.style.left)+max_width-original_width)+'px';
//		            current_item.a_children[child_index].i_element.style.left = (parseInt(current_item.a_children[child_index].e_oelement.style.left)+max_width-original_width)+'px';
//		        }
//		    }
//        }
//        o_item.child_width_adjusted = true;
//    }
    if(!o_item.child_width_adjusted && o_item.a_children){
        //setTimeout('menu_shift_items(A_MENUS['+o_item.o_root.n_id+'].a_index['+n_id+']);',500);
        menu_shift_items(o_item);
    }
	A_MENU_OPENED_ID = o_item.o_root.n_id;
	A_MENU_OPENED_ITEM_ID = n_id;

}
function menu_shift_items(o_item){
    var new_height = 0;
    var original_height = 0;
    var current_item;
    for (var n_order = 0; n_order < o_item.a_children.length; n_order++){
        current_item = o_item.a_children[n_order];
        original_height = parseInt(current_item.e_oelement.style.height);
        new_height = parseInt(current_item.e_oelement.offsetHeight);        
	    if(new_height > original_height){
	        menu_shift_items_down(o_item.a_children,n_order+1,new_height-original_height-1);
        }
        else{
            new_height = parseInt(current_item.e_oelement.firstChild.offsetHeight);
            if(new_height > original_height){
                menu_shift_items_down(o_item.a_children,n_order+1,new_height-original_height-1); 
            }
        }
    }
    o_item.child_width_adjusted = true;
}
function menu_shift_items_down(a_children,start,howmuch){
    for(var child_index = start;child_index< a_children.length;child_index++){
        a_children[child_index].e_oelement.style.top = 
            (parseInt(a_children[child_index].e_oelement.style.top)+howmuch)+'px';
        a_children[child_index].i_element.style.top = 
            (parseInt(a_children[child_index].i_element.style.top)+howmuch)+'px';
        if(a_children[child_index].a_children){
            menu_shift_items_down(a_children[child_index].a_children,0,howmuch);
        }
    }
}

menu.prototype.onclick = function(n_id) {
	// don't go anywhere if item has no link defined
	return Boolean(this.a_index[n_id].a_config[1]);
}
menu.prototype.onmouseout = function(n_id) {

	// lookup new item's object
	var o_item = this.a_index[n_id];

	// apply rollout
	o_item.e_oelement.className = o_item.getstyle(0, 0);
	o_item.e_ielement.className = o_item.getstyle(1, 0);

	// update status line
	//o_item.upstatus(7);

	// run mouseover timer
	this.o_hidetimer = setTimeout('A_MENUS['+ this.n_id +'].collapse();',
		o_item.getprop('hide_delay'));
}
menu.prototype.onmouseover = function(n_id) {

	// cancel mouseoute menu close and item open delay
	clearTimeout(this.o_hidetimer);
	this.o_hidetimer = null;
	clearTimeout(this.o_showtimer);

	// lookup new item's object
	var o_item = this.a_index[n_id];

	// apply rollover
	o_item.e_oelement.className = o_item.getstyle(0, 1);
	o_item.e_ielement.className = o_item.getstyle(1, 1);

	// if onclick open is set then no more actions required
	if (o_item.getprop('expd_delay') < 0)
		return;

	// run expand timer
	this.o_showtimer = setTimeout('A_MENUS['+ this.n_id +'].expand(' + n_id + ');',
		o_item.getprop('expd_delay'));

}
menu.prototype.onmousedown = function(n_id) {

	// lookup new item's object
	var o_item = this.a_index[n_id];

	// apply mouse down style
	o_item.e_oelement.className = o_item.getstyle(0, 2);
	o_item.e_ielement.className = o_item.getstyle(1, 2);

	this.expand(n_id);
//	this.items[id].switch_style('onmousedown');
}


// --------------------------------------------------------------------------------
// menu item Class
function menu_item (o_parent, n_order) {
    this.child_width_adjusted = false;
    this.html = o_parent.html;
	// store parameters passed to the constructor
	this.n_depth  = o_parent.n_depth + 1;
	this.a_config = o_parent.a_config[n_order + (this.n_depth ? 3 : 0)];

	this.b_visible = !this.n_depth;

	// return if required parameters are missing
	if (!this.a_config) return;
    
	// store info from parent item
	this.o_root    = o_parent.o_root;
	this.o_parent  = o_parent;
	this.n_order   = n_order;

	// register in global and parent's collections
	this.n_id = this.o_root.a_index.length;
	this.o_root.a_index[this.n_id] = this;
	o_parent.a_children[n_order] = this;

	// calculate item's coordinates
	var o_root = this.o_root,
		a_tpl  = this.o_root.a_tpl;

	this.n_x = n_order
		? o_parent.a_children[n_order - 1].n_x + this.getprop('left')
		: o_parent.n_x + this.getprop('block_left');

	this.n_y = n_order
		? o_parent.a_children[n_order - 1].n_y + this.getprop('top')
		: o_parent.n_y + this.getprop('block_top');

    this.e_ielement_id = 'e' + this.o_root.n_id + '_' + this.n_id + 'i';
	this.e_oelement_id = 'e' + this.o_root.n_id + '_' + this.n_id + 'o';
	this.i_element_id = 'i' + this.o_root.n_id + '_' + this.n_id + 'o';

	// generate item's HMTL
    var sb = this.html;        
    sb.append('<a id="');sb.append(this.e_oelement_id);sb.append('"');
    sb.append(' class="');sb.append(this.getstyle(0, 0));
    sb.append('" href="');sb.append(this.a_config[1]);
    sb.append('"');
    if(this.a_config[2] && this.a_config[2]['tw'])
        sb.append(' target="'+ this.a_config[2]['tw'] + '"'); 
    sb.append(' style="position: absolute; top: ');sb.append(this.n_y);sb.append('px; left: ');
    sb.append( this.n_x );sb.append('px; width: ');sb.append(this.getprop('width'));sb.append('px; height: ');
    sb.append(this.getprop('height'));
    sb.append('px; visibility: hidden;');sb.append(' z-index: ');sb.append(this.n_depth);    
    sb.append(';" ');
    sb.append('onclick="return A_MENUS[');sb.append(this.o_root.n_id);sb.append('].onclick(');sb.append(this.n_id);
    sb.append(');" onmouseout="A_MENUS[');sb.append(this.o_root.n_id);sb.append('].onmouseout(');sb.append(this.n_id);
    if (this.getprop('mode') == 'click') {
        sb.append(');" onmousedown="A_MENUS[');sb.append(this.o_root.n_id);sb.append('].onmouseover(');sb.append(this.n_id);
    }
    else {
        sb.append(');" onmouseover="A_MENUS[');sb.append(o_root.n_id);sb.append('].onmouseover(');sb.append(this.n_id);
	    sb.append(');" onmousedown="A_MENUS[');sb.append(o_root.n_id);sb.append('].onmousedown(');sb.append(this.n_id);
    }
    sb.append(');">');
    //text
    sb.append('<div id="');sb.append(this.e_ielement_id);
    sb.append('" class="');sb.append(this.getstyle(1, 0));    
    sb.append('" title="');sb.append(this.a_config[0]);
    sb.append('">');
    //style="overflow:hidden;white-space:nowrap;text-overflow:ellipsis;"
	sb.append(this.a_config[0]);sb.append("</div></a>");

	if (this.getprop('mode') == 'click') {
        sb.append('<div id="');
        sb.append(this.i_element_id);
        sb.append('" + style="position: absolute; top: ');
        sb.append(this.n_y);
        sb.append('px; left: ');
        sb.append(this.n_x);sb.append('px; width: ');
        sb.append(this.getprop('width'));sb.append('px; height: ');
        sb.append(this.getprop('height'));sb.append('px; visibility: hidden;');
        sb.append(' z-index: -1 ;"></div>');

    }
	else if (this.getprop('type') == 'dynamic')
	{
	    if( (this.getstyle(1, 0).indexOf("l0oout") <= 0 && this.getstyle(1, 0).indexOf("l0iout") <= 0))
    		{
			sb.append('<div id="');
			sb.append(this.i_element_id);
			sb.append('" style="position: absolute; top: ');
			sb.append(this.n_y);sb.append('px; left: ');sb.append(this.n_x);sb.append('px; width: ');
			sb.append(this.getprop('width'));sb.append('px; height: ');
			sb.append(this.getprop('height'));sb.append('px; visibility: hidden;');
			sb.append(' z-index: -1 ;"></div>');
		}
		else
		{
	        sb.append('<div id="');
	        sb.append(this.i_element_id);		        
	        sb.append('" style="position: absolute; top: ');
	        sb.append(this.n_y);sb.append('px; left: ');sb.append(this.n_x);sb.append('px; width: ');
	        sb.append('0px; height: 0px; visibility: hidden; background-color:Transparent; z-index: -2 ;"></div>');
		}
	}
	else
	{
	 	if( (this.getstyle(1, 0) != 'rccnavl0oout' && this.getstyle(1, 0) != 'rccnavl0iout') &&
	 	    (this.getstyle(1, 0) != 'adminnavl0oout' && this.getstyle(1, 0) != 'adminnavl0iout') &&
	 	    (this.getstyle(1, 0) != 'cms_site_page_admin_menul0oout' && this.getstyle(1, 0) != 'cms_site_page_admin_menul0iout'))
    		{
	        sb.append('<div id="');
	        sb.append(this.i_element_id);sb.append('" style="position: absolute; top: ');
	        sb.append(this.n_y);sb.append('px; left: ');sb.append(this.n_x);sb.append('px; width: ');
	        sb.append(this.getprop('width'));sb.append('px; height: ');
	        sb.append(this.getprop('height'));sb.append('px; visibility: hidden; z-index: -1 ;"></div>');
		}
		else
		{
	        sb.append('<div id="');
	        sb.append(this.i_element_id);
	        sb.append('" style="position: absolute; top: ');
	        sb.append(this.n_y);sb.append('px; left: ');sb.append(this.n_x);sb.append('px; width: ');
	        sb.append('0px; height: 0px; visibility: hidden; background-color:Transparent; z-index: -2 ;"></div>');
		}
    }

	
	// no more initialization if leaf
	if (this.a_config.length < 4)
		return;

	// node specific methods and properties
	this.a_children = [];

	// init downline recursively
	for (var n_order = 0; n_order < this.a_config.length - 3; n_order++)
		new menu_item(this, n_order);

}

// --------------------------------------------------------------------------------
// reads property from template file, inherits from parent level if not found
// ------------------------------------------------------------------------------------------
menu_item.prototype.getprop = function(s_key) {

	// check if value is defined for current level
	var s_value = null,
		a_level = this.o_root.a_tpl[this.n_depth];

	// return value if explicitly defined
	if (a_level)
		s_value = a_level[s_key];

	// request recursively from parent levels if not defined
	return (s_value == null ? this.o_parent.getprop(s_key) : s_value);
}
// --------------------------------------------------------------------------------
// reads property from template file, inherits from parent level if not found
// ------------------------------------------------------------------------------------------
menu_item.prototype.getstyle = function(n_pos, n_state) {

	var a_css = this.getprop('css');
	var a_oclass = a_css[n_pos ? 'inner' : 'outer'];

	// same class for all states
	if (typeof(a_oclass) == 'string')
		return a_oclass;

	// inherit class from previous state if not explicitly defined
	for (var n_currst = n_state; n_currst >= 0; n_currst--)
		if (a_oclass[n_currst])
			return a_oclass[n_currst];
}

// ------------------------------------------------------------------------------------------
// updates status bar message of the browser
// ------------------------------------------------------------------------------------------
//function mitem_upstatus (b_clear) {
//	window.setTimeout("window.status=unescape('" + (b_clear
//		? ''
//		: (this.a_config[2] && this.a_config[2]['sb']
//			? escape(this.a_config[2]['sb'])
//			: escape(this.a_config[0]) + (this.a_config[1]
//				? ' ('+ escape(this.a_config[1]) + ')'
//				: ''))) + "')", 10);
//}

// --------------------------------------------------------------------------------
// that's all folks
