/*------------------------------------------------------------------------------
	CJG MENU v1.0 - Html Tree Menu Structure - Copyright (C) 2002 CARLOS GUERLLOY  
	cjgmenu@guerlloy.com
	guerlloy@hotmail.com
	carlos@weinstein.com.ar
	Buenos Aires, Argentina
	--------------------------------------------------------------------------------
	This program is free software; you can  redistribute it and/or  modify it  under
	the terms   of the   GNU General   Public License   as published   by the   Free
	Software Foundation; either  version 2   of the  License, or  (at  your  option)
	any  later version. This program  is  distributed in  the hope that  it  will be
	useful,  but  WITHOUT  ANY  WARRANTY;  without  even  the   implied  warranty of
	MERCHANTABILITY  or FITNESS  FOR A  PARTICULAR  PURPOSE.  See the  GNU   General
	Public License for   more details. You  should have received  a copy of  the GNU
	General Public License along  with this  program; if   not, write  to the   Free
	Software  Foundation, Inc.,  59 Temple Place,  Suite 330, Boston,  MA 02111-1307
	USA
	------------------------------------------------------------------------------*/
	var showfoldericon=0;
	var showfileicon=0;
	var shownodelines=0;
	var showroot=0;
	var folderimages='img';
	var foldericons='ico';
	var imgattrs=' width=19 height=16 border=0';
	var imgroot='folderopen.gif';
	var imgfolderclose='folderclose.gif';
	var imgfolderopen='folderopen.gif';
	var imgplustop='plustop.gif';
	var imgplustopbot='plustopbot.gif';
	var imgplusmiddle='plusmiddle.gif';
	var imgplusbottom='plusbottom.gif';
	var imgminusmiddle='minusmiddle.gif';
	var imgminustop='minustop.gif';
	var imgminustopbot='minustopbot.gif';
	var imgminusbottom='minusbottom.gif';
	var imgjoinmiddle='joinmiddle.gif';
	var imgjointop='jointop.gif';
	var imgjointopbot='jointopbot.gif';
	var imgjoinbottom='joinbottom.gif';
	var imglinemiddle='linemiddle.gif';
	var imglinebottom='linebottom.gif';
	var imgfiledefault='page.gif';
	
	var VLABEL=0;
	var VHREF=1;
	var VTARGET=2;
	var VICON=3;
	var VOPEN=4;
	var VPARENT=5;
	var VNAME=6;
	var VPOS=7;
	var VHEIGHT=8;
	var VMENU=9;
	
	var IROOT=0;
	var IFOLDER=0;
	var IPLUS=2;
	var IMINUS=3;
	var IJOIN=4;
	var ILINE=5;
	var IFILE=6;
	var ICLOSE=0;
	var IOPEN=1;
	var IMIDDLE=0;
	var IBOTTOM=1;
	var ITOP=2;
	var ITOPBOT=3;
	
	var seqname=0;
	var selback='';
	
	function menuhtml(sm,id) {
		var i,s,o,starget,shref,sfolder,sfile,splus,sjoin,stomenu; 
		if(arguments.length<1) sm="root[VMENU]";
		if(arguments.length<2) id=0; seqname=id+1;
		var m=eval(sm);
		//alert(m.length);
		s="<TABLE class=tm id=m"+id+" border='0' cellspacing=0 cellpadding=0 width='100%'>\n";
		if(showfoldericon) sfolder='<IMG align=absmiddle src="'+menuimg(IFOLDER,ICLOSE)+'" '+imgattrs+'>'; else sfolder='';
		if(id==0 && showfoldericon && shownodelines && showroot) s+='<TR><TD><IMG src="'+menuimg(IROOT)+'" '+imgattrs+'>\n';
		for(i=0;i<m.length;i++) {
			o=m[i]; 
			o[VPOS]=IMIDDLE;
			if(i==m.length-1) o[VPOS]=IBOTTOM; 
			if(id==0 && !showroot && shownodelines) {
				if(!i) o[VPOS]=ITOP; if(m.length==1) o[VPOS]=ITOPBOT;
			}
			if(o[VTARGET]!='') starget=' target="'+o[VTARGET]+'"'; else starget='';
			if(o[VHREF]!='') shref=' href="'+o[VHREF]+'"'; else shref=' href="#"';
			if(shownodelines)  splus=''; else splus='';
			if(o[VMENU]!='') {
				s+="<TR bgcolor='#F2F2F2'>";
					s+="<TD width='7' bgcolor='#767A7D'><table cellpadding='0' cellspacing='0'><tr><td width='15'></td></tr></table><A onclick='menuanchor(this,\""+sm+"\","+i+");'>"+splus+"</A></TD>";
					s+="<TD height='20'>&nbsp;&nbsp;<A id=t"+id+"_"+i+shref+starget+" onclick='menuopen(this,\""+sm+"\","+i+");'><font face='tahoma' style='font-size : 8pt;'><b>"+o[VLABEL]+"</b></font></A></TD>";
				s+="</TR><tr><td colspan='2' height='1' bgcolor='#FFFFFF'></td></tr>\n";
			} else {
				if(showfileicon) sfile='<IMG align=absmiddle src="'+menuimg(IFILE,o[VICON])+'" '+imgattrs+'>'; else sfile='';
				//alert (o[VLABEL]);
				if(o[VLABEL] !=''){
					s+="<TR bgcolor='#F2F2F2'>";
						s+="<TD width='7'></TD>";
						s+="<TD height='16'>";
							s+="<table border='0' cellpadding='0' cellspacing='0' width='190'>";
								s+="<tr>";
									s+="<td width='12'></td>";
									s+="<td width='5' valign='top'>";
										s+="<table cellpadding='0' cellspacing='0'>";
											s+="<tr>";
												s+="<td height='7'></td>";
											s+="</tr>";
											s+="<tr>";
												s+="<td bgcolor='#000000' width='2' height='2'></td>";
											s+="</tr>";
										s+="</table>";
									s+="</td>";
									s+="<td width='5'></td>";
									s+="<td><A id=t"+id+"_"+i+shref+starget+"><font face='tahoma' style='font-size : 8pt;'>"+o[VLABEL]+"</font></A></TD>";
								s+="</tr>";
							s+="</table>";
						s+="</td>";
					s+="</TR>\n";  
				}
			}
		}
		s+="</TABLE>\n";
		return(s);
	}
	
	function menuanchor(este,sm,opt) {
		var m=eval(sm); 
		if(m[opt][VOPEN]) menuclose(este,sm,opt); else menuopen(este,sm,opt);
	}
	
	function menuopen(este,sm,opt) {
		//menucollapseall()
		var m=eval(sm);
		var n;
		if(m[opt][VOPEN]) return;
		var t0=este.parentElement.parentElement.children.tags('TD')[0];
		var t1=este.parentElement.parentElement.children.tags('TD')[1];
		if(shownodelines) t0.children.tags('A')[0].children.tags('IMG')[0].src=menuimg(IMINUS,m[opt][VPOS]);
		if(showfoldericon) t1.children.tags('IMG')[0].src=menuimg(IFOLDER,IOPEN);
		n=seqname++; t1.innerHTML+=menuhtml(sm+'['+opt+'][VMENU]',n); 
		m[opt][VOPEN]=1; m[opt][VNAME]="m"+n;
		for(var i=0;i<m[opt][VMENU].length;i++) m[opt][VMENU][i][VPARENT]=m[opt];
		if(shownodelines) menubacktd(m[opt],0);
	}
	
	function menuclose(este,sm,opt) {
		var m=eval(sm);
		var t0=este.parentElement.parentElement.children.tags('TD')[0];
		var t1=este.parentElement.parentElement.children.tags('TD')[1];
		t0.innerHTML=t0.innerHTML.match(/.*<\/A>/);
		if(shownodelines) t0.children.tags('A')[0].children.tags('IMG')[0].src=menuimg(IPLUS,m[opt][VPOS]);
		t1.innerHTML=t1.innerHTML.match(/.*<\/A>/);
		if(showfoldericon) t1.children.tags('IMG')[0].src=menuimg(IFOLDER,ICLOSE);
		if(shownodelines) menubacktd(m[opt],1); menuclosevar(m[opt]);
	}
	
	function menuclosevar(o) {
		var i;
		if(o[VMENU]!="") {
			o[VNAME]=""; 
			o[VOPEN]=0;
			o[VHEIGHT]=0;
			for(i=0;i<o[VMENU].length;i++) menuclosevar(o[VMENU][i]); 
		}
	}
	
	function menuline(n,bottom) {
		var s,i;
		s='<TABLE class=tm border=0 cellspacing=0 cellpadding=0>';
		for(var i=0;i<n;i++) s+='<TR><TD><IMG src="'+menuimg(ILINE,bottom)+'" '+imgattrs+'></TD></TR>';
		s+='</TABLE>'; return(s); 
	}
		
	function menubacktd(o,neg) {
		var t0,s,e1;
		l=o[VMENU].length; 
		if(neg) { l=-o[VHEIGHT]; o=o[VPARENT]; }
		while(o!='') {
			o[VHEIGHT]+=l; 
			e1=eval(o[VNAME]); 
			t0=e1.parentElement.parentElement.children.tags('TD')[0];
			s=t0.innerHTML.match(/<A.*<\/A>/); s+=menuline(o[VHEIGHT],o[VPOS]); t0.innerHTML=s; 
			o=o[VPARENT];
		}
	}
	
	function menusel(t) { 
		if(selback!='') { eval(selback).className=''; }
		selback=t.id; t.className=''; 
	}
	
	
	function menuimg(t,s) {
		var img,dir;
		dir=folderimages;
			switch(t) {
				case IROOT: img=imgroot; break;
				case IFOLDER: switch(s) {
						  case ICLOSE: img=imgfolderclose; break;
						  case IOPEN: img=imgfolderopen; break; } break;
				case IPLUS: switch(s) {	      
						  case ITOP: img=imgplustop; break;
						  case ITOPBOT: img=imgplustopbot; break;
						  case IMIDDLE: img=imgplusmiddle; break;
						  case IBOTTOM: img=imgplusbottom; break; } break;
				case IMINUS: switch(s) {	      
						  case ITOP: img=imgminustop; break;
						  case ITOPBOT: img=imgminustopbot; break;
						  case IMIDDLE: img=imgminusmiddle; break;
						  case IBOTTOM: img=imgminusbottom; break; } break;
				case IJOIN: switch(s) {	      
						  case ITOP: img=imgjointop; break;
						  case ITOPBOT: img=imgjointopbot; break;
						  case IMIDDLE: img=imgjoinmiddle; break;
						  case IBOTTOM: img=imgjoinbottom; break; }
						  if(!shownodelines) img=imglinebottom; break;
				case ILINE: switch(s) {	      
						  case IBOTTOM: case ITOPBOT: img=imglinebottom; break;
						  default: img=imglinemiddle; break; } break;
				case IFILE: if(s=='') img=imgfiledefault; else { dir=foldericons; img=s; } break;
			} 
		return(dir+"/"+img);
	}
	
	function menuhere() { document.write(menuhtml()); }
	function menuexpand(r,i) { return(menuclick(r,i,false)); }
	function menucollapse(r,i) { return(menuclick(r,i,true)); }
	
	function menuclick(r,n,oc) {
		var m,qt,mh,o,i;
		if(r[VNAME]=='') return(false);
		mh=eval(r[VNAME]); m=r[VMENU];
		if(typeof(n)=='number') i=n; else { for(i=0;i<m.length;i++) if(n==m[i][VLABEL]) break; if(i==m.length) return(false); }
		qt=mh.children.tags('TBODY')[0].children.tags('TR'); o=m[i]; 
		if(o[VMENU]!='') { if(o[VOPEN]==oc) qt[i].children.tags('TD')[0].children.tags('A')[0].click(); } 
		return(o);
	}
	
	function menucollapseall() {
		var i,qt,o,m; 
		qt=m0.children.tags('TBODY')[0].children.tags('TR'); m=root[VMENU];
		for(i=0;i<m.length;i++) {
			o=m[i]; 
			if(o[VMENU]!='') {
				if(o[VOPEN]) qt[i].children.tags('TD')[0].children.tags('A')[0].click();
				menuclosevar(o); 
			}
		}
	}