// 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.

// 28 sept 2004
// top < 0 hoogte van het item wordt door de inhoud bepaald, volgende item -top t.o.v. de onderzijde 
// van het vorige item
// TODO voor netscape, onder IE werkt het wel
// width < 0 breedte afhankelijk van inhoud, resultaat is breedte inhoud - width
// indien width < 0 dan left is t.o.v. de rechterzijde van het vorige item

// Added 7 sept 2007 JG
// b_selected property and cookie to remember which item and path are selected


// --------------------------------------------------------------------------------
// global collection containing all menus on current page
var A_MENUS = [];


//Cookie functions added 7 sept 2007

function createCookie(name,value,days) {
	if (days) {
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	document.cookie = name+"="+value+expires+"; path=/";
}

function readCookie(name) {
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function eraseCookie(name) {
	createCookie(name,"",-1);
}










// --------------------------------------------------------------------------------
// menu class

function menu (a_items, a_tpl) {

	// browser check
	if (!document.body || !document.body.style)
		return;

	// 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 = [];

	// assigh methods and event handlers
	this.expand      = menu_expand;
	this.collapse    = menu_collapse;

	this.onclick     = menu_onclick;
  
  // 7 sept 2007
  // option not to collapse items when a item is selected
  // false is the default value
  this.b_no_collapse = true;
  
	this.onmouseout  = menu_onmouseout;
	this.onmouseover = menu_onmouseover;
	this.onmousedown = menu_onmousedown;

	// 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,
    'make_space': false,
		'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.b_selected = false;
  

	// 	init items recursively
	for (n_order = 0; n_order < a_items.length; n_order++)
		new menu_item(this, n_order);

	// register self in global collection
	A_MENUS[this.n_id] = this;

	// make root level visible 
  // 10 sept 2007 
  
  // check if value is defined for current level
	var b_makespace = false;
  var a_level = this.o_root.a_tpl[0];
	// return value if explicitly defined
	if (a_level)
		b_makespace = a_level['make_space'];

  if (b_makespace)
  {
	  for (var n_order = 0; n_order < this.a_children.length; n_order++)
	    this.a_children[n_order].e_oelement.style.display = 'block';
  } else {
	  for (var n_order = 0; n_order < this.a_children.length; n_order++)
    this.a_children[n_order].e_oelement.style.visibility = 'visible';
  }
    
  //7 sept 2007
  //select item
  var n_sel_id = readCookie('TigraID');
  select_item(this,this.a_index[n_sel_id]);
  //expand the selected item
  if (this.b_no_collapse)
  {
    var o_sel_item = this.a_index[n_sel_id];
    var a_pad = [];
    while (o_sel_item != o_sel_item.o_root) {
      a_pad[a_pad.length] = o_sel_item;
      o_sel_item = o_sel_item.o_parent;
    }
    for (var i=a_pad.length-1; i>=0; i--) 
    { 
      this.expand(a_pad[i].n_id);
    }
  }
  
    
}

// --------------------------------------------------------------------------------
function menu_collapse (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);
	
  //var b_makespace = this.a_index[n_id].getprop('make_space');
	// 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) {
      //10 sept 2007
      if (o_curritem.getprop('make_space')) {
  			o_curritem.e_oelement.style.display = 'none';
      } else {
        o_curritem.e_oelement.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;
}

// --------------------------------------------------------------------------------
function menu_expand (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];

	// 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;
    
  //var b_makespace = o_item.getprop('make_space');
	// 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];
    //10 sept 2007
    if (o_curritem.getprop('make_space')) {
		  o_curritem.e_oelement.style.display = 'block';
    } else {
      o_curritem.e_oelement.style.visibility = 'visible';
    }
		o_curritem.b_visible = true;
	}
}

// --------------------------------------------------------------------------------
//
// --------------------------------------------------------------------------------
function menu_onclick (n_id) {
	// don't go anywhere if item has no link defined
	return Boolean(this.a_index[n_id].a_config[1]);
}
// --------------------------------------------------------------------------------


function menu_onmouseout (n_id) {

	// lookup new item's object	
	var o_item = this.a_index[n_id];
  
  //7 sept 2007
  var n_styleid = o_item.b_selected ? 3 : 0;  
	// apply rollout
	o_item.e_oelement.className = o_item.getstyle(0, n_styleid);
	o_item.e_ielement.className = o_item.getstyle(1, n_styleid);
	
	// update status line	
	o_item.upstatus(7);

  if (!this.b_no_collapse)
  {
  	// run mouseover timer
  	this.o_hidetimer = setTimeout('A_MENUS['+ this.n_id +'].collapse();',
  		o_item.getprop('hide_delay'));
  }
}

// --------------------------------------------------------------------------------


function menu_onmouseover (n_id) {
  if (!this.b_no_collapse)
  {
  	// 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];

	// update status line	
	o_item.upstatus();
  
  //7 sept 2007
  var n_styleid = o_item.b_selected ? 3 : 1;   
	// apply rollover
	o_item.e_oelement.className = o_item.getstyle(0, n_styleid);
	o_item.e_ielement.className = o_item.getstyle(1, n_styleid);

  if (!this.b_no_collapse)
  {	
  	// 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'));
  }

}

// --------------------------------------------------------------------------------
// called when mouse button is pressed on menu item
// --------------------------------------------------------------------------------

function select_item(o_menu,o_sel_item)
{
  o_menu.o_selected_item = o_sel_item;  
  while (o_sel_item != o_sel_item.o_root) {
    o_sel_item.b_selected = true;
    o_menu.onmouseout(o_sel_item.n_id);
    o_sel_item = o_sel_item.o_parent;
  }
}



function menu_onmousedown (n_id) {
	
	// lookup new item's object	
	var o_item = this.a_index[n_id];
  
  //7 sept 2007
  // deselect item
  if (this.o_selected_item != null)
  {
    this.o_selected_item.b_selected = false;
    this.onmouseout(this.o_selected_item.n_id);
    this.o_selected_item = null;
  }
  // nieuwe selectie zetten
  select_item(this,o_item);

  var n_styleid = o_item.b_selected ? 3 : 2
	// apply mouse down style
	o_item.e_oelement.className = o_item.getstyle(0, n_styleid);
	o_item.e_ielement.className = o_item.getstyle(1, n_styleid);

	this.expand(n_id);
//	this.items[id].switch_style('onmousedown');

  //7 sept 2007
  createCookie('TigraID',n_id);
}


// --------------------------------------------------------------------------------
// menu item Class
function menu_item (o_parent, n_order) {

	// 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)];

	// 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;

	// assign methods
	this.getprop  = mitem_getprop;
	this.getstyle = mitem_getstyle;
	this.upstatus = mitem_upstatus;
  
  
// bepaal breedte item
var breedte = this.getprop('width');
var wijd = (breedte <= 0) ? 0 : breedte; 

// bepaal x-coord item
//var newleft = n_order
//? ( (breedte <= 0) ? o_parent.a_children[n_order - 1].e_ielement.offsetWidth - breedte : 0 )
//: 0;

// wijzig breedte item indien noodzakelijk	

if(n_order)
{
	if (breedte <= 0)
	{
		newleft = o_parent.a_children[n_order - 1].e_ielement.offsetWidth- breedte;
	}
	else
	{
		newleft = 0;
	}
}
else
{
	newleft = 0;
}



//var newleft = 0; // te verwijderen als bovenstaande opties werken onder Netscape
newleft += this.getprop('left');  
  
  
  
  

	this.n_x = n_order
		//? o_parent.a_children[n_order - 1].n_x + this.getprop('left')
		? o_parent.a_children[n_order - 1].n_x + newleft
		: o_parent.n_x + this.getprop('block_left');
    
// bepaal y-coord item	
var newtop = n_order 
?	( (this.getprop('top') < 0)? o_parent.a_children[n_order - 1].e_ielement.offsetHeight - this.getprop('top') + 1 : this.getprop('top'))
: 0;

	this.n_y = n_order
		//? o_parent.a_children[n_order - 1].n_y + this.getprop('top')
		? o_parent.a_children[n_order - 1].n_y + newtop
		: o_parent.n_y + this.getprop('block_top');
    
  var b_makespace = this.getprop('make_space');
      
	var HTML = '<a id="e' + o_root.n_id + '_'
			 + this.n_id +'o" class="' + this.getstyle(0, 0) + '" href="' + this.a_config[1] + '"'
			 + (this.a_config[2] && this.a_config[2]['tw'] ? ' target="'
			 + this.a_config[2]['tw'] + '"' : '') + ' style="'
       // 10 sept 2007
       + (b_makespace ? 'position: relative; ':'position: absolute; ') 
       + (b_makespace ? 'float: left; ' : '') 
       //+ 'position: relative; '
       //+ 'float: left; ' 
       +' top: '
			 + this.n_y + 'px; left: ' + this.n_x+ 'px; ' 
       //+ 'width: '+ this.getprop('width') + 'px;'
			 + ((this.getprop('width') < 0) ? '' : 'width: ' + wijd + 'px; ')
       +' height: '+ this.getprop('height') + 'px; '
       // 10 sept 2007
       + (b_makespace ? 'display: none; ' : 'visibility: hidden; ') 
       //+ 'display: none; ' 
			 +' z-index: ' + this.n_depth + ';" '
			 + 'onclick="return A_MENUS[' + o_root.n_id + '].onclick('
			 + this.n_id + ');" onmouseout="A_MENUS[' + o_root.n_id + '].onmouseout('
			 + this.n_id + ');" onmouseover="A_MENUS[' + o_root.n_id + '].onmouseover('
			 + this.n_id + ');" onmousedown="A_MENUS[' + o_root.n_id + '].onmousedown('
			 + this.n_id + ');"><div  id="e' + o_root.n_id + '_'
			 + this.n_id +'i" class="' + this.getstyle(1, 0) + '">'
			 + this.a_config[0] 
       + "</div></a>\n"

    document.write(HTML);

	this.e_ielement = document.getElementById('e' + o_root.n_id + '_' + this.n_id + 'i');
	this.e_oelement = document.getElementById('e' + o_root.n_id + '_' + this.n_id + 'o');
  
// wijzig breedte item indien noodzakelijk	
if (breedte < 0) {
  this.e_ielement.style.width = this.e_ielement.offsetWidth - breedte;  
}

	this.b_visible = !this.n_depth;
  this.b_selected = false;

	// 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
// ------------------------------------------------------------------------------------------
function mitem_getprop (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
// ------------------------------------------------------------------------------------------
function mitem_getstyle (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