/////////////////////////////////////////////////////////////////////
//                                                                 //
//                          WebVI-1.0                              //
//                                                                 //
//                    (Web Visual Interface)                       //
//                                                                 //
//               (C) 2005, Sergei 'šlvin' Sobolev                  //
//                                                                 //
//                     http://elvin.ru/webvi                       //
//                                                                 //
/////////////////////////////////////////////////////////////////////



/////////////////////////////////////////////////////////////////////
//                                                                 //
//                           Telement                              //
//                (this library is a part of WebVI)                //
//                              v 1.1                              //
//                          free to use                            //
/////////////////////////////////////////////////////////////////////

var ehtml=new Telement(document.documentElement);

function protofunction(){};

function Tevent(){
	this.f_mouseover=protofunction;
	this.mouseover=protofunction;
	this.f_mouseout=protofunction;
	this.mouseout=protofunction;
	this.f_mouseclick=protofunction;
	this.mouseclick=protofunction;
}

function Telement(element){
//public members---------------------------------------
	this.class_name='Telement';
	this.dom=element;
	if(element)element.telement=this;
	this.param;//reserved for future

//public static methods
	this.all=f_all;
	this.child=f_child;
	this.dom_color=f_dom_color;
	this.dom_background_color=f_dom_background_color;
	this.find=f_find;
	this.hide=f_hide;
	this.is_item_of=f_is_item_of;
	this.items=f_items;
	this.length=f_length;
	//this.move
	this.node=f_node;
	this.parent=f_parent;
	this.parent_tree=f_parent_tree;
	this.plain=f_plain;
	this.root=f_root;
	this.select=f_select;
	//this.swap=f_swap;
	this.show=f_show;

	this.events=new Tevent();
  
//public dynamic methods
	this.push_param=protofunction;//reserved for future
	this.request=protofunction;//reserved for future

//implementation------------------------------------------
	function f_all(id){
		var c=get_all(this.dom,id);
		if(c)
			for(var i=0; i<c.length; i++)
				c[i]=etote(c[i]);
		return(c);
	}

	function f_child(id1,id2,id3,id4,id5,id6,id7,id8,id9,id10){
		return(etote(get_child(this.dom,id1,id2,id3,id4,id5,id6,id7,id8,id9,id10)));
	}
  
	function f_dom_color(color){
		if(color){
			this.dom.style.color=color;
		}else{
			return(convert_color(get_color(this)));
		}
		
		function get_color(e){
			var result;
			if(e){
				result=e.dom.style.color;
				if(result=='')result=get_color(e.parent());
			}
			return(result);
		}
	}
  
	function f_dom_background_color(color){
		if(color){
			this.dom.style.backgroundColor=color;
		}else{
			return(convert_color(get_color(this)));
		}
		
		function get_color(e){
			var result;
			if(e){
				result=e.dom.style.backgroundColor;
				if(result=='')result=get_color(e.parent());
			}
			return(result);
		}
	}

	function f_find(id){
			function helper(n){
				var result=null;
				if(n){
					var i=0;
					var c=n.childNodes;
					while((i<c.length)&&(result==null)){
						if(c[i].id==id){
							result=c[i];
						}else{
							result=helper(c[i]);
							i++;
						}
					}
				}
				return(result);
			}
		return(etote(helper(this.dom)));
	}

	function f_hide(){
		if(this.dom)
			element_hide(this.dom);
	}

	function f_is_item_of(c){
		var result=null;
		if(!c.length)
			c=c.plain();
		for(var i=0; i<c.length; i++){
			if((c[i]==this)||(c[i]==this.dom)){
				result=true;
			}  
		}
		return(result);
	}

	function f_items(){
		var c=get_items(this.dom);
		for(var i=0; i<c.length; i++)
			c[i]=etote(c[i]);
		return(c);
	}

	function f_length(){
		return(this.items().length);
	}

	function f_node(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10){
		return(etote(get_node(this.dom,i1,i2,i3,i4,i5,i6,i7,i8,i9,i10)));
	}
  
	function f_parent(level){
		if(level==null)level=1;
		if(!isNaN(level)){
			//get parent
			if(level<1)level=1;
			var e=this;
			var i=0;
			while(i<level){
				e=etote(parent_element(e.dom));
				i++;
			}
			return(e);
		}else{
			//set parent
			if(level.dom)
				level.dom.appendChild(this.dom);
		}
	}

	function f_parent_tree(){
		var c=parent_tree(this.dom);
		for(var i=0; i<c.length; i++)
			etote(c[i]);
		return(c);
	}

	function f_plain(){
		var c=new Array();
		var s=new Array();
		
		function helper(e){
			e=etote(e);
			c[c.length]=e;
			for(var i=0; i<e.items().length; i++)
				helper(e.items()[i]);
		}
		
		helper(this);
		return(c);
	}

	function f_root(){
		var result=this;
		var e=this.parent();
		while(e){
			result=e;
			e=e.parent();
		}
		return(result);
	}

	function f_select(query){
		//in this version of engine only one construction of query are supported: dom.PROPERTY=VALUE (or dom.style.PROPERTY=VALUE)
		if((!query)||(query==''))return(null);
		var result=new Array();
		a=query.substr(0,query.indexOf('='));
		b=query.substr(query.indexOf('=')+1,query.length);
		if(b.charAt(0)=='"')b=b.substr(1,b.length);
		if(b.charAt(b.length-1)=='"')b=b.substr(0,b.length-1);
		
		var property,value,mode;
		value=b;
		if(a.indexOf('dom.style.')>=0){
			//cascade style sheet property found
			property=a.substr('dom.style.'.length,a.length);
			mode=1;
		}else{
			if(a.indexOf('dom.')>=0){
				//dom property found
				property=a.substr('dom.'.length,a.length);
				mode=2;
			}else{
				//any other instruction (possible property of Telement) found
				//this case is unsupported in this version, but u can program it by self
			}
		}
		
		function test(element){
			var result=false;
			if (mode==1){
				switch (property){
					//LABEL01
					case 'color':if(element.dom.style.color==value)result=true;
					case 'background':if(element.dom.style.background==value)result=true;
					case 'backgroundColor':result=color_equality(element.dom.style.backgroundColor,value);
				}
			}else{
				if(mode==2){
					//LABEL02
					switch (property){
						case 'id':if(element.dom.id==value)result=true;
					}
				}else{
				}
			}
			return(result);
		}
		
		var m=this.plain();
		var i;
		for (i=0;i<m.length;i++){
			if(test(m[i]))result[result.length]=m[i];
		}
		if(result.length==0)return(null);else return(result);
	}
  
	function f_show(){
		if(this.dom)
			element_show(this.dom);
	}

}

function etote(element){
	//From DOM element to Telement
	if(element){
		if(element.telement)
			return(element.telement);
		else 
			if(element.class_name==Telement)
				return(element);
			else
				return(new Telement(element));
	}else return(null);  
}

function tehtml(w){
	if(w)
		return(etote(get_window('w').document.documentElement));
	else
		return(etote(document.documentElement));
}








/////////////////////////////////////////////////////////////////////
//                                                                 //
//                                                                 //
//                      DOM Extens Functions                       //
//                                                                 //
//                                                                 //
/////////////////////////////////////////////////////////////////////
function check_contains(element,node){
	var result=false;
	var i;
	if(node.length){
		for(i=0; i<node.length; i++){
			if(element==node[i])
			result=true;
		}
	}else{
		if(element!=null&&node!=null&&element!=node){
			while((element!=null)&&(element!=node)){
				element=parent_element(element);
			}
			if(element!=null)
				result=true;
		}
	}
	return(result);
} 

function element_show(element,show_type){
	if(element){
		if(!show_type){
			var t=element.tagName;
			if(t=='DIV'||t=='P'||t=='TD'||t=='TH'||t=='TABLE'||t=='H1'||t=='H2'||t=='H3'||t=='H4'||t=='H5'){
				show_type='block';
			}else{
				show_type='inline';
			}  
		}
		element.style.display=show_type;
	}
}

function element_hide(element){
	if(element){
		element.style.display='none';
	}
}

function parent_element(element){
	var type=3;
	while(element!=null&&type!=1){
		element=element.parentNode;
		if(element){
			type=element.nodeType;
		}  
	}
	return(element);
}

function parent_tree(element){
	var c=new Array();
	if(element){
		while(element!=null){
			c[c.length]=element;
			element=parent_element(element);
		}
	}
	return(c);
}

function get_all(node,id){
			function helper(n){
				var i,c;
				if(n){
					c=n.childNodes;
					for(i=0;i<c.length;i++){
						if((c[i].id==id)&&(c[i].nodeType==1)){
							r[r.length]=c[i];
						}
						helper(c[i]);
					}
				}
			}
	
	var r=new Array();
	if(node=='html')node=document.documentElement;
	if(node=='body')node=document.body;
	helper(node);
	if(r.length==0)r=null;
	return(r);
}

function get_items(node){
	var r=new Array();
	if(node)
		if(node.childNodes)
			for(var i=0;i<node.childNodes.length;i++)
				if(node.childNodes[i].nodeType==1)
					r[r.length]=node.childNodes[i];
	return(r);
}

function get_node(node,i1,i2,i3,i4,i5,i6,i7,i8,i9,i10){
				function get_item(node,item){
					var r=null;
					if(node)
						if(node.childNodes){
							var i=0,j=-1;
							while(i<node.childNodes.length){
								if(node.childNodes[i].nodeType==1){
									j++;
									if(j==item){
										r=node.childNodes[i];
										i=node.childNodes.length;
									}
								}
								i++;
							}
						}
					return(r);
				}
				
	if(node=='html')node=document.documentElement;
	if(node=='body')node=document.body;
	var result;
	if(node)
		if(node.childNodes)
			if(i1==null){
				result=node;
			}else{
				result=get_node(helper(node,i1),i2,i3,i4,i5,i6,i7,i8,i9,i10);
			}
	return(result);
}

function get_child(node,id1,id2,id3,id4,id5,id6,id7,id8,id9,id10){
				function helper(node,id){
					var r=null;
					if(node)
						if(node.childNodes){
							var i=0;
							while(i<node.childNodes.length){
									if(node.childNodes[i].nodeType==1&&node.childNodes[i].id==id){
									r=node.childNodes[i];
									i=node.childNodes.length;
								}
								i++;
							}
						}
					return(r);
				}

	if(node=='html')node=document.documentElement;
	if(node=='body')node=document.body;
	var result,result2;
	if(node)
		if(node.childNodes)
			if(id1==null){
				result=node;
			}else{
				result=get_child(helper(node,id1),id2,id3,id4,id5,id6,id7,id8,id9,id10);
			}
	return(result);
}

function get_window(name){
			function helper(ww){    
				var r;
				if(ww){
					for(var i=0; i<ww.frames.length; i++){
						if(ww.frames[i].name==name){
							r=ww.frames[i];
						}else{
							if(!r)r=helper(ww.frames[i]);
						}
					}
					return(r);
				}       
			}
	return(helper(window.top));
}


			/////////////////////////////////////////////////////////////////////
			//                          Log Functions                          //
			/////////////////////////////////////////////////////////////////////
var LOG_PADDING_STEP=4;
var LOG_PADDING='';
var LOG_INVERSE=false;
var LOG_TRIM_SIZE=0;
var LOG_NUMBERS=false;
var LOG_NUMBERSi=0;

function log(s,element,inverse){
	if(element==null){element=document.getElementById('debug_window');}
	if(element){
		if(LOG_TRIM_SIZE>0){
			var ss=element.innerHTML;
			if(element.innerHTML.toUpperCase().countIndexOf('<BR>')>LOG_TRIM_SIZE){
				element.innerHTML=element.innerHTML.substr(0,element.innerHTML.toUpperCase().search_by('<BR>',LOG_TRIM_SIZE)+4);
				
			}
		}
		var d=new Date();
		LOG_NUMBERSi++;
		if(LOG_NUMBERS){
			s=LOG_NUMBERSi+': '+s;
		}
		if(inverse||LOG_INVERSE){
			element.innerHTML=LOG_PADDING+s+element.innerHTML;
		}else{
			element.innerHTML=element.innerHTML+LOG_PADDING+s;
		}
	}
}

function log_ln(s){
  log(s+'<br>');
}

function log_c(s){
  log(s+', ');
}

function log_shr(){
  var i;
  for(i=0;i<LOG_PADDING_STEP;i++){
    LOG_PADDING=LOG_PADDING+'&#160;';
  }
}

function log_shl(){
  var i;
  LOG_PADDING='';
  for(i=LOG_PADDING/6-LOG_PADDING_STEP;i>=0;i--){
    LOG_PADDING=LOG_PADDING+'&#160;';
  }
}