//----------------------------------------------//
//	Created by: Romulo do Nascimento Ferreira	//
//	Email: romulo.nf@gmail.com					//
//----------------------------------------------//

// NOTICE: This code may be use dto any purpose without further
// permission from the author. You may remove this notice from the
// final code, however its appreciated if you keep the author name/email.
// Email me if theres something needing improvement


var drag = false;
var mouse_down=false;
var colOrder=[];
var borderLeftStyle=[];
var borderLeftColor=[];
var cellBackgroundColor=[];
var borderLeftWidth=[];
var colNames=[];

function setTableColMovable(tableName,ColOrderFieldName,colNames) {
  tabelaDrag = document.getElementById(tableName);
  ColOrderField = document.getElementById(ColOrderFieldName);
  linhas = tabelaDrag.getElementsByTagName("TR");
  celulas = tabelaDrag.getElementsByTagName("TD");
  linhaUm = tabelaDrag.rows[0]
  ordenacaoMaxima = linhaUm.cells.length
  
  //store columns order
  for (x=0;x<linhaUm.cells.length;x++) 
    {
  	//arrastar(celulas[x]);
  	celulas[x].onselectstart = function () { return false; } //prevent text selection
	celulas[x].onmousedown = arrastar	
  	celulas[x].onmouseover = pintar
  	celulas[x].onmouseout = pintar
  	celulas[x].onmouseup = pintar
    colOrder[x]=colNames[x];
    //linhaUm.cells[x].style.cursor="Move";
    }
  
    //store cells styles
    for(x=0; x<linhas.length; x++) {
      borderLeftStyle[x]=[];
      borderLeftColor[x]=[];    
      cellBackgroundColor[x]=[];
      borderLeftWidth[x]=[];    
    	for (y=0; y<linhas[x].cells.length; y++) {
    	 borderLeftStyle[x][y]=linhas[x].cells[y].style.borderLeftStyle;
    	 borderLeftColor[x][y]=linhas[x].cells[y].style.borderLeftColor;
    	 cellBackgroundColor[x][y]=linhas[x].cells[y].style.backgroundColor;
    	 borderLeftWidth[x][y]=linhas[x].cells[y].style.borderLeftWidth;
    	 }
    }
  }

function getColOrder()
  {
  return colOrder
  }
  
function moveArrayCol(myArray,source,destination)
  {
  val=myArray.splice(source,1);
  if (source < destination)
    {myArray.splice(destination-1,0,val);}
  else
    {myArray.splice(destination,0,val);}
  return myArray
  }

function capturarColuna(obj) {
  coluna = cellIndex(obj)
return coluna
}

function orderTd (obj) {
  //document.title=obj.tagName;
  // in case of mouseup onto TD child element (A,input, etc), find parent node (TD)
  var i=1; //to avoid crazy loop, limit depth to 10
  while ((obj.tagName != "TD") && (i<10))
  	{
	obj=obj.parentNode;
	i++;
	} 
  destino = cellIndex(obj)
  if (destino == null) return
  if (coluna == destino) return
  
  for (x=0; x<linhas.length; x++) 
    {
  	tds = linhas[x].cells;
	//document.title=tds.length;
  	var celula = linhas[x].removeChild(tds[coluna])
  		if (coluna < destino) 
        		{
  		  	linhas[x].insertBefore(celula, tds[destino-1])
  		  	}
  		else 
        		{
  		  	linhas[x].insertBefore(celula, tds[destino]);
  		  	}
  	}
  moveArrayCol(colOrder,coluna,destino);
  //alert(colOrder);
}


function arrastar(e){
	if (!e) e=window.event;
  	if (e.target) targ = e.target
  	else if (e.srcElement) targ=e.srcElement
	
	//if (!ev) ev=window.event
	//colunaAtual = cellIndex(this))
	//window.status='dragTable';
	if (targ.tagName == "FONT") //only when clic on td, not in td child elements
		{
		capturarColuna(this);
		mouse_down=true;
		//drag = true;
		for (x=0; x<linhas.length; x++) {linhas[x].cells[cellIndex(this)].style.opacity=0.5;linhas[x].cells[cellIndex(this)].style.filter="alpha(opacity=50)";}
		for (x=0;x<linhaUm.cells.length;x++) {celulas[x].style.cursor="Move";} // move cursor for header line			
		return false;
		}
}

function pintar(e) {
if (!e) e=window.event
ev = e.type

	if (ev == "mouseover") 
		{
		if (drag) 
			{
			for (x=0; x<linhas.length; x++) 
				{
				if (cellIndex(this) !=coluna) 
					{ //(this.style.borderStyle !="dashed") {
					linhas[x].cells[cellIndex(this)].style.borderLeftStyle="solid";
					linhas[x].cells[cellIndex(this)].style.borderLeftColor="red";
					linhas[x].cells[cellIndex(this)].style.borderLeftWidth="2px";
					}
				}
			}
		}
	
	else if (ev == "mouseout") 
		{
		if (mouse_down) {drag=true}
		if (drag) 
        		{
			for (x=0; x<linhas.length; x++)  
          			{
				if (cellIndex(this) !=coluna) //restore original style 
            				{
            				linhas[x].cells[cellIndex(this)].style.borderLeftStyle=borderLeftStyle[x][cellIndex(this)];
            				linhas[x].cells[cellIndex(this)].style.borderLeftColor=borderLeftColor[x][cellIndex(this)];
            				linhas[x].cells[cellIndex(this)].style.backgroundColor=cellBackgroundColor[x][cellIndex(this)];            
            				linhas[x].cells[cellIndex(this)].style.borderLeftWidth=borderLeftWidth[x][cellIndex(this)];
					linhas[x].cells[cellIndex(this)].style.opacity=1; 
					linhas[x].cells[cellIndex(this)].style.filter="alpha(opacity=100)";       
            				}
				//else
					//{
					//paint source column in yellow
					//linhas[x].cells[cellIndex(this)].style.backgroundColor="yellow";
					//linhas[x].cells[cellIndex(this)].style.opacity=0.5;
					//linhas[x].cells[cellIndex(this)].style.filter="alpha(opacity=50)";				
					//}
          			}
        		}
  		}


	else if (ev == "mouseup") 
		{
  		if (e.target) targ = e.target
  		else if (e.srcElement) targ=e.srcElement
		mouse_down=false;
		if (drag)
			{
  			orderTd(targ)
  			drag = false
  			//put columns new order in hidden field
  			ColOrderField.value=colOrder;
			}
		//restore styles
  		for(x=0; x<linhas.length; x++) 
			{
  			for (y=0; y<linhas[x].cells.length; y++)
				{
  				linhas[x].cells[y].style.borderLeftStyle=borderLeftStyle[x][y];
  				linhas[x].cells[y].style.borderLeftColor=borderLeftColor[x][y];
  				linhas[x].cells[y].style.backgroundColor=cellBackgroundColor[x][y];
  				linhas[x].cells[y].style.borderLeftWidth=borderLeftWidth[x][y];
				linhas[x].cells[y].style.opacity=1;
				linhas[x].cells[y].style.filter="alpha(opacity=100)";
				linhas[x].cells[y].style.cursor="Auto";
  				}
  			}

   		}

}






function cellIndex(td) {
    var ci = -1;
    var parent_row = ascendDOM(td, 'tr');
    for (var i = 0; i < parent_row.cells.length; i++) {
        if (td === parent_row.cells[i]) {
            ci = i;
        }
    }
    return ci;
}

function ascendDOM(e,target) {
    while (e.nodeName.toLowerCase() !=target &&
           e.nodeName.toLowerCase() !='html')
        e=e.parentNode;
    return (e.nodeName.toLowerCase() == 'html')? null : e;
}