// JavaScript Document
ArquivoVIP="index.php";
function QualNovoUser(valor){
   var Fe="dialogHeight: 400px;dialogWidth: 250px;dialogHide:yes;help:no;scroll:no;status:no";
   return window.showModalDialog('user.htm',valor,Fe);
}
function TrocaUser(valor){
   retorno=false;
	while (!retorno) retorno=QualNovoUser(valor);
	document.all('owner').innerHTML=retorno.toLowerCase();
}
function CarregaImages() { //v3.0
	var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
	var i,j=d.MM_p.length,a=CarregaImages.arguments; for(i=0; i<a.length; i++)
	if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function AlteraObjeto (vObj,vPropriedade,vValor,vTarget) {
	var vAlvo = (vTarget!='') ? vTarget+'.' : '';
	eval(vAlvo+'document.getElementById("'+vObj+'").' + vPropriedade + '=vValor');
}
function reSize() {
	try {
	   var oBody =ifrm.document.body;
	   var oFrame=document.all("ifrm");
	   oFrame.style.height = oBody.scrollHeight + (oBody.offsetHeight - oBody.clientHeight);
	   oFrame.style.width = oBody.scrollWidth + (oBody.offsetWidth - oBody.clientWidth);
   }
   //An error is raised if the IFrame domain != its container's domain
   catch(e) {
	   window.status =        'Error: ' + e.number + '; ' + e.description;
   }
}
function OpenWord(Arquivo) {
	var Word = new ActiveXObject("Word.Application");
	Word.Documents.Open(Arquivo);
	Word.Visible = true;
	Word = '';
}
function OpenExcel(Arquivo) {
	var oXL = new ActiveXObject("Excel.Application");
	oXL.Visible = true;
	oXL.Workbooks.Open(Arquivo);
	//var oSheet = oWB.ActiveSheet;
	oXL.UserControl = true;
}
function CarregaGaleria() {
	lista.selectedIndex=0;
	ModificaGaleria();
}
function ModificaGaleria() {
	var vVar, vVar2;
	vVar2=TextoGaleria[lista.selectedIndex];
	if (lista.value.substring(lista.value.length-4)==".swf") {
	   vVar ="<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000'  codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width=100% height=300>";
	   vVar+="<param name=movie value='" + lista.value + "'>";
	   vVar+="<param name=quality value=high>";
	   vVar+="<embed  name=emb src='" + lista.value + "' quality=high pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' swliveconnect=true>";
	   vVar+="</embed></object>";
	} else vVar="<img src='" + lista.value + "'>";
	GaleriaImagem.innerHTML = vVar;
	GaleriaTexto.value  = vVar2;
}
function ProximoGaleria () {
	if (lista.selectedIndex!=(lista.length-1)) {
	   lista.selectedIndex++;
	   ModificaGaleria();
	}
}
function VoltarGaleria () {
	if (lista.selectedIndex!=0) {
	   lista.selectedIndex--;
	   ModificaGaleria();
	}
}
function MudaEstiloPasta (vId,vEstilo) {
	vId.toString;
	AlteraObjeto('PTL_' + vId,'className','Pasta' + vEstilo + 'TL','');
	AlteraObjeto('PTC_' + vId,'className','Pasta' + vEstilo + 'TC','');
	AlteraObjeto('PTR_' + vId,'className','Pasta' + vEstilo + 'TR','');
	AlteraObjeto('PEL_' + vId,'className','Pasta' + vEstilo + 'EL','');
	AlteraObjeto('PEC_' + vId,'className','Pasta' + vEstilo + 'EC','');
	AlteraObjeto('PER_' + vId,'className','Pasta' + vEstilo + 'ER','');
	AlteraObjeto('PBL_' + vId,'className','Pasta' + vEstilo + 'BL','');
	AlteraObjeto('PBC_' + vId,'className','Pasta' + vEstilo + 'BC','');
	AlteraObjeto('PBR_' + vId,'className','Pasta' + vEstilo + 'BR','');
}
function PastaEstaAberta (vId) {
	if (main.document.getElementById('F_' + vId).innerHTML=="") return 'Of'
	else return 'On';
}
function SelecionaPasta (vId) {
	// Seleciona uma Pasta (colocando seu estilo como PastaAtXX
	// Se já tiver outra pasta selecionada deseleciona ela primeiro
	// Se esta pasta tiver selecionada, deseleciona
	vId.toString;
	if (main.Selecionado.value!='' && vId!=main.Selecionado.value) {//Outro está selecionado e está selecionado outro
	   MudaEstiloPasta (main.Selecionado.value, PastaEstaAberta (main.Selecionado.value));
	   AlteraObjeto('Selecionado','value','','');
	   }
	if (vId==main.Selecionado.value) {//deselecionando
	   MudaEstiloPasta (vId,PastaEstaAberta (vId));
	   AlteraObjeto('Selecionado','value','','');
	   propriedades.Conteudo(main.Selecionado.value);
	   }
	else {//selecionar o primeiro
	   MudaEstiloPasta (vId,"At");
	   AlteraObjeto('Selecionado','value',vId,'');
	   propriedades.Conteudo(main.Selecionado.value);
	   }
}
function SetaLR (TestLR,vId,vPath){
	var cor='#ffffff';//
   Temp ="<v:shape class=Seta style=width:7;height:16;cursor:hand; fillcolor="+cor+" coordorigin='0 0' coordsize='5 12' ";
	if (TestLR) {
	   Temp+="onclick=\"FechaPasta('" + vId + "','"+vPath+"')\">";
	   Temp+="<v:path v='m 5,0 l 0,5, 5,12, x e'/>";
	} else {
	   Temp+="onclick=\"AbrePasta('" + vId + "','"+vPath+"')\">";
	   Temp+="<v:path v='m 0,0 l 5,5, 0,12, x e'/>";
	}
   Temp+="<v:stroke on=false />";
   Temp+="</v:shape>";
	return Temp;
}
function AbrePasta (vId,vPath) {
	HideMenu();
   AbrePastaPropriedades (vId,vPath);
	if (window.event.ctrlKey) MontaTodasCaixasApartir (vPath,1)
   else MontaCaixas (vPath,1,'');
}
function AbrePastaPropriedades (vId,vPath) {
	AlteraObjeto('Set_' + vId,'innerHTML',SetaLR(true,vId,vPath),'');
	AlteraObjeto('Lin_' + vId,'innerHTML','<table border=0 cellspacing=0 cellpadding=0><tr><td class=LinhaHorizontal></td></tr></table>','');
	MudaEstiloPasta (vId,'On');
}

function FechaPasta (vId,vPath) {
	var ch=String.fromCharCode(34);
	HideMenu();
	vId.toString;
	AlteraObjeto('Set_' + vId,'innerHTML',SetaLR(false,vId,vPath),'');
	AlteraObjeto('Lin_' + vId,'innerHTML','','');
	AlteraObjeto(vId,'innerHTML','','');
	MudaEstiloPasta (vId,'Of');
}
function ResumePasta (vId,vPath) {
	if (window.event.ctrlKey) {
	   var i=1;
	   while (typeof(document.all[(obj='table_'+vId.substr(0,i+=2))])!='object');

	   document.all(obj).innerHTML=document.all('table_'+vId).innerHTML;
	   document.all('LinhaT1_'+vId).className=document.all('LinhaB1_'+vId).className='';
	   document.all('LinhaT2_'+vId).className=document.all('LinhaB2_'+vId).className='';
	   document.all('LinhaT3_'+vId).className=document.all('LinhaB3_'+vId).className='';
	   document.all('LinhaT4_'+vId).className=document.all('LinhaB4_'+vId).className='';
	   document.all(obj).id='table_'+vId;
	   if (typeof(document.all['IdCx'])=='object') {
	      arqCx=document.all['IdCx'].href;
	      arqPRN=document.all['IdPRN'].href;
	      document.all['IdCx'].href=arqCx.substr(0,arqCx.indexOf('?'))+'?path='+vPath;
	      document.all['IdPRN'].href=arqPRN.substr(0,arqPRN.indexOf('?'))+'?path='+vPath;
	   }
   } else window.open(ArquivoVIP+"?path="+vPath);
}
function MontaCaixas (vPath,vTipo,vPathFim) {
//	var vAcao1='<iframe id=caixas height=200 width=700 frameborder=0 src="montar.php';
	var vAcao1='<iframe id=caixas height=1 width=1 frameborder=0 style="VISIBILITY: hidden" src="montar.php';
	AlteraObjeto ('Acao','innerHTML',vAcao1+'?path='+vPath+'&tipo='+vTipo+'&fim='+vPathFim+'"></iframe>','');
}
function MontaTodasCaixasApartir (vPath,vTipo) {
//	var vAcao1='<iframe id=caixas height=200 width=700 frameborder=0 src="montatudo.php';
   var vAcao1='<iframe id=caixas height=1 width=1 frameborder=0 style="VISIBILITY: hidden" src="montatudo.php';
   AlteraObjeto ('Acao2','innerHTML',vAcao1+'?path='+vPath+'&tipo='+vTipo+'"></iframe>','');
}

//-------------------------------------Comandos para Menu POP --------------------------------------------
function left(texto,numero){//Retorna a parte esquerda de uma string
	return texto.substr(0,numero);
}
function right(texto,numero){//Retorna a parte direita de uma string
	return texto.substr(texto.length-numero);
}
function BarraDoCaminhoI2N (caminho) {//Transforma um caminho com \ ou \\ em /, ou seja, c:\eu\ele\nos = c:/eu/ele/nos/
   return caminho.replace("\\","/").replace("//","/").replace("//","/");
}
function UltimaPosicaoDiretorio (caminho) {//Retorna a posição do último diretório mesmo se for  c:\eu\ele\nos\ ou  c:\eu\ele\nos
   $caminho=BarraDoCaminhoI2N (caminho);
   return ((right(caminho,1)=='/') ? caminho.substr(0,caminho.length-1) : caminho).lastIndexOf('/');
}
function UpperDirectory (caminho) {//Retorna o último nome da pasta ex: c:/eu/ele/nos =  nos
	caminho=BarraDoCaminhoI2N (caminho);
	caminho=(right(caminho,1)=='/') ? caminho.substr(0,caminho.length-1) : caminho;
	caminho=(left(caminho,1)=='/') ? caminho.substr(1) : caminho;
	p=caminho.lastIndexOf('/');
	return (p==false) ? caminho : caminho.substr(p+1);
}

function LastDirectory (caminho) {//Retorna a pasta referente a .., ous seja, c:/eu/ele/nos =  c:/eu/ele
   caminho=BarraDoCaminhoI2N (caminho);
	p=UltimaPosicaoDiretorio(caminho);
	return (p==false) ? '' : left(caminho,p+1);
}
function LastMascara (caminho) {//Retorna a pasta referente a .., ous seja, c:/eu/ele/nos =  c:/eu/ele
	p=((caminho.substr(caminho.length-1)=='_') ? caminho.substr(0,caminho.length-1) : caminho).lastIndexOf('_');
	return (p==false) ? '' : caminho.substr(0,p);
}
//-------------------------------------------------------------------------------------------------------------
function ShowMenu(e){
	if (window.event.srcElement.id.substr(0,4)=='PEC_') {
	   var rightedge=ie5? document.body.clientWidth-event.clientX : window.innerWidth-e.clientX;
	   var bottomedge=ie5? document.body.clientHeight-event.clientY : window.innerHeight-e.clientY;
	   if (rightedge<menuobj.offsetWidth)
	      menuobj.style.left=ie5? document.body.scrollLeft+event.clientX-menuobj.offsetWidth : window.pageXOffset+e.clientX-menuobj.offsetWidth
	   else
	      menuobj.style.left=ie5? document.body.scrollLeft+event.clientX : window.pageXOffset+e.clientX;
	   if (bottomedge<menuobj.offsetHeight)
	      menuobj.style.top=ie5? document.body.scrollTop+event.clientY-menuobj.offsetHeight : window.pageYOffset+e.clientY-menuobj.offsetHeight
	   else
	      menuobj.style.top=ie5? document.body.scrollTop+event.clientY : window.pageYOffset+e.clientY;
	   objPasta[0]='';
	   objPasta[1]=window.event.srcElement.innerHTML;
	   objPasta[2]=window.event.srcElement.id.substr(4);
	   objPasta[3]=document.getElementById('PATH_'+objPasta[2]).value;
      objPasta[4]=UpperDirectory (objPasta[3]);
	   script="";
	   script+="  <table width=120 border=0 bordercolor=#000000 bgcolor=#ef8200 cellspacing=0 cellpadding=3>\n";
	   script+="  <tr><td class=MenuTitulo>\n";
	   script+=objPasta[4] + '<br>';
	   script+="  </td></tr>\n";
	   script+="  <tr><td>\n";
	   script+=FazBotao('Criar',true);
	   script+=FazBotao('Renomear',true);
      PodeColar=(objPasta[9]!=0 && objPasta[2]!=objPasta[5] && objPasta[3].substr(0,objPasta[6].length)!=objPasta[6] && objPasta[3]+'/'+objPasta[7]!=objPasta[6]);
      PodeCopiar=(objPasta[2]=='F_0') ? false : ((objPasta[9]==1)? (objPasta[2]!=objPasta[5]) : true);
      PodeRecortar=(objPasta[2]=='F_0') ? false : ((objPasta[9]==2)? (objPasta[2]!=objPasta[5]) : true);
	   script+=FazBotao('Colar',PodeColar);
	   script+=FazBotao('Copiar',PodeCopiar);
	   script+=FazBotao('Recortar',PodeRecortar);
	   script+=FazBotao('Excluir',true);
	   script+=FazBotao('Importar',true);
	   script+=FazBotao('Propriedade',true);
	   script+=FazBotao('Limpar Área',objPasta[9]);
	   script+="    </td></tr>\n";
      if (objPasta[9]) {
	      script+="  <tr><td class=MenuTitulo>Área de Transferencia:\n";
	      script+=objPasta[7];
	      script+="  </td></tr>\n";
      }
	   script+="  </table>\n";
	   menuobj.innerHTML=script;
	   menuobj.style.visibility="visible";
	   statusmenu=true;
	} else HideMenu();
	return !statusmenu;
}
function HideMenu(e){
	menuobj.style.visibility="hidden";
	statusmenu=false;
}
function HotKey (e) {
	if (event.keyCode==27) HideMenu();
}
function FazBotao(Botao,Habilitar){
	retorno="";
   retorno+='<table width=100% border=2 cellpadding=0 cellspacing=1><tr>\n';
   if (Habilitar) retorno+='  <td class=BotaoPOP onmouseover=\"BotaoHover(this)\" onmouseout=\"BotaoNormal(this)\" onclick=\"BotaoClick (\''+Botao+'\')\">'+Botao+'</td>\n'
   else retorno+='  <td class=BotaoPOPDes>'+Botao+'</td>\n';
   retorno+='</tr></table>\n';
   return retorno;
}
function BotaoHover(objeto){
	objeto.className='BotaoPOPHover';
}
function BotaoNormal(objeto){
	objeto.className='BotaoPOP';
}
function Refresh_Pasta(){
   if (objPasta[3]=='') {
      location=Arquivo_Caixas;
   } else {
      if (objPasta[0]=='Renomear' || objPasta[0]=='Propriedade') AbrePasta (objPasta[2],objPasta[3])
      else {
         document.getElementById('Tud_'+IdTemp).removeNode(true);
         if (document.getElementById(objPasta[2]).innerHTML.length<200) {
	         if (objPasta[2]=='F_0') location=Arquivo_Caixas
	         else {
               objPasta[2]=LastMascara(objPasta[2]);
               objPasta[3]=LastDirectory(objPasta[3]);
            }
            AbrePasta (objPasta[2],objPasta[3]);
         }
      }
   }
}
function BotaoClick (Botao){
	objPasta[0]=Botao;
	objPasta[10]=document.all('owner').innerHTML;
   switch (Botao) {
   	case 'Renomear': case 'Excluir':
      	IdTemp=objPasta[2];
         objPasta[2]=LastMascara(objPasta[2]);
         objPasta[3]=LastDirectory(objPasta[3]);
         objPasta[8]=objPasta[4];
	      if (window.showModalDialog('OpMenuPOP.htm',objPasta,Features)) Refresh_Pasta();
         objPasta[8]='';
	      break;
      case 'Colar':
         if (window.showModalDialog('ForModal.htm',objPasta,Features)) location=Arquivo_Caixas;
			break;
      case 'Copiar': case 'Recortar':
      	if (LastDirectory(objPasta[3])!='') {
	         objPasta[5]=objPasta[2];
	         objPasta[6]=objPasta[3];
	         objPasta[7]=objPasta[4];
	         objPasta[9]=(Botao=='Copiar')? 1 : 2;
	         break;
         }
      case 'Limpar Área':
         objPasta[5]='';
	      objPasta[6]='';
			objPasta[7]='';
	      objPasta[9]=0;
         break;
      case 'Criar':
         if (window.showModalDialog('OpMenuPOP.htm',objPasta,Features)) AbrePasta (objPasta[2],objPasta[3]);
         break;
      case 'Propriedade':
			objPasta[10]=QualNovoUser(document.all('owner').innerHTML);
         if (window.showModalDialog('ForModal.htm',objPasta,Features)) {
	         IdTemp=objPasta[2];
	         objPasta[2]=LastMascara(objPasta[2]);
	         objPasta[3]=LastDirectory(objPasta[3]);
	         objPasta[8]=objPasta[4];
            Refresh_Pasta();
         }
         objPasta[8]='';
         break;
   }
}

function loadobjects() {
	if (ie5||ns6){
	   menuobj=document.getElementById('menu');
	   menuobj.style.display='';
	   document.oncontextmenu=ShowMenu;
	   document.onclick=HideMenu;
	   //document.onfocusout=HideMenu;
	   document.onkeydown=HotKey;
	}
}

CarregaImages('setaL.gif','setaL.gif');
CarregaImages('setaR.gif','setaR.gif');
var menuobj;
var IdTemp=0;
var Arquivo_Caixas="caixas.php";
var Features="dialogHeight: 250px;dialogWidth: 450px;dialogHide:yes;help:no;scroll:no;status:no";
var CR=String.fromCharCode(13);
var LF=String.fromCharCode(10);
var ie5=document.all&&document.getElementById;;
var ns6=document.getElementById&&!document.all;
var statusmenu=false;
var NomeBotoes=new Array('Botao','Texto','Id','Path','Pasta','IdTransf','PathTransf','PastaTransf','NomeAnt','TipoTransf','Usuario');
var objPasta= new Array('','','','','','','','','',0,'',NomeBotoes,'POP.php');
/*
0 - Botao
1 - Texto
2 - Id
3 - Path
4 - Pasta
5 - IdTransf
6 - PathTransf
7 - PastaTransf
8 - NomeAnt
9 - TipoTransf
10 - Usuario
11- (Nome dos botoes)
12- (arquivo que será encaminhado)
*/