Software Público Brasileiro

/*
Title: WMS Time

Acessa um serviço WMS-T, baseado em uma lista pré-definida, e monta as imagens em uma sequência temporal.
As imagens podem ser apresentadas em sequência, simulando uma animação.

Veja:

<i3GEO.arvoreDeTemas.conectarwmst>

Arquivo:

i3geo/ferramentas/wmstime/index.js.php

Licenca:

GPL2

i3Geo Interface Integrada de Ferramentas de Geoprocessamento para Internet

Direitos Autorais Reservados (c) 2006 Minist&eacute;rio do Meio Ambiente Brasil
Desenvolvedor: Edmar Moretti edmar.moretti@gmail.com

Este programa &eacute; software livre; voc&ecirc; pode redistribu&iacute;-lo
e/ou modific&aacute;-lo sob os termos da Licen&ccedil;a P&uacute;blica Geral
GNU conforme publicada pela Free Software Foundation;

Este programa &eacute; distribu&iacute;do na expectativa de que seja &uacute;til,
por&eacute;m, SEM NENHUMA GARANTIA; nem mesmo a garantia impl&iacute;cita
de COMERCIABILIDADE OU ADEQUA&Ccedil;&Atilde;O A UMA FINALIDADE ESPEC&Iacute;FICA.
Consulte a Licen&ccedil;a P&uacute;blica Geral do GNU para mais detalhes.
Voc&ecirc; deve ter recebido uma c&oacute;pia da Licen&ccedil;a P&uacute;blica Geral do
GNU junto com este programa; se n&atilde;o, escreva para a
Free Software Foundation, Inc., no endere&ccedil;o
59 Temple Street, Suite 330, Boston, MA 02111-1307 USA.
*/
//parametrosURL();
//tipo = 1 anual, 2 mensal, 3 diario
wms_configura = {
	"1": {
		titulo: "Active Fires (1 month - Terra/MODIS)",
		servico:"http://neowms.sci.gsfc.nasa.gov/wms/wms?",
		layers:"MOD14A1_M_FIRE",
		styles:"rgb",
		srs:"EPSG:4326",
		format:"image/jpeg",
		descricao:"Dados acumulados de um m&ecirc;s mar&ccedil;o de 2000 a mar&ccedil;o de 2009. Fire is a recurring part of nature.  Wildfires can be caused by lightning striking a forest canopy or, in a few isolated cases, by lava or hot rocks ejected from erupting volcanoes.  Most fires worldwide are started by humans, sometimes accidentally and sometimes on purpose.  Not all fires are bad.  Fire clears away dead and dying underbrush, which can help restore forest ecosystems to good health.  Humans use fire as a tool in slash-and-burn agriculture to speed up the process of breaking down unwanted vegetation into the soil.  Humans also use fire to clear away old-growth forests to make room for living spaces, roads, and fields for raising crops and cattle.  But not all fires are good.  Wildfires can destroy natural resources and human structures.  Globally, fire plays a major role in Earth&apos;s carbon cycle by releasing carbon into the air, and by consuming trees that would otherwise absorb carbon from the air during photosynthesis.  These maps show the locations of actively burning fires around the world, detected by instruments aboard NASA satellites.",
		anoInicio: 2006,
		mesInicio: 1,
		diaInicio: 1,
		anoFim: 2006,
		mesFim: 12,
		diaFim: 1,
		tipo: 2
	}
};
ins = "<p class='paragrafo'>"+$trad(1,i3GEOF.wmstime.dicionario)+":</p>";
ins += "<div class='styled-select'><select  onchange='escolheuServico(this.value)'>";
ins += "<option value='' >---</option>";
for(key in wms_configura){
	ins += "<option value='"+key+"'>"+wms_configura[key].titulo+"</option>";
}
ins += "</select></div>";
ins += "<br><div class='i3geoForm i3geoFormIconeEdita'><input  type=text id=iServico /></div>";
ins += "<br><p class='paragrafo' ><TEXTAREA id='WMS_descricao' rows='3' style='width:95%' >Metadados</TEXTAREA></p>";

ins += "<table class='lista6'>";
ins += "<tr><td>"+$trad(2,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='0' id=WMS_anoinicio size=4 /></div></td>";
ins += "<td>"+$trad(3,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='0' id=WMS_anofim size=4 /></div></td></tr>";

ins += "<tr><td>"+$trad(4,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='nulo' id=WMS_mesinicio size=4 /></div></td>";
ins += "<td>"+$trad(5,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='nulo' id=WMS_mesfim size=4 /></div></td></tr>";

ins += "<tr><td>"+$trad(6,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='nulo' id=WMS_diainicio size=4 /></div></td>";
ins += "<td>"+$trad(7,i3GEOF.wmstime.dicionario)+" </td><td><div class='i3geoForm100'><input  type=text value='nulo' id=WMS_diafim size=4 /></div></td></tr>";

ins += "</table>";
//ins += "<div style='position:absolute;left:120px;top:180px'>"
ins += "<br><p class='paragrafo'>" + $trad(8,i3GEOF.wmstime.dicionario);
ins += "<div id='divumaImagemPor' class='styled-select' ></div>";

ins += "<br><input id='botao1' size=18 type='button' value='"+$trad(9,i3GEOF.wmstime.dicionario)+"' />";
ins += "</div>";

$i("parametros").innerHTML = ins;
idServicoEscolhido = "";
emPausa = true;
b = new YAHOO.widget.Button(
	"botao1",
	{onclick:{fn: iniciaImagens}}
);
b.addClass("rodar150");

b = new YAHOO.widget.Button(
	"voltar",
	{
		onclick: function(){
			$i('quadroAnima').style.display='none';
			$i('parametros').style.display='block';
		}
	}
);
b.addClass("rodar150");

/*
Function: escolheuServico

Monta a tela de parametros ap&oacute;s um servi&ccedil;o ter sido escolhido

Parametro:

idWMS {String} - id do servi&ccedil;o escolhido
*/
function escolheuServico(idWMS){
	idServicoEscolhido = idWMS;
	tipoServico = wms_configura[idWMS].tipo;
	servico = wms_configura[idWMS].servico+"&VERSION=1.1.1&REQUEST=GetMap&layers="+wms_configura[idWMS].layers+"&styles="+wms_configura[idWMS].styles+"&srs="+wms_configura[idWMS].srs+"&format="+wms_configura[idWMS].format;
	$i("iServico").value = servico;
	$i("WMS_descricao").value = wms_configura[idWMS].descricao;

	$i("WMS_anoinicio").value = wms_configura[idWMS].anoInicio;
	//if(tipoServico > 1)
	$i("WMS_mesinicio").value = wms_configura[idWMS].mesInicio;
	//if(tipoServico > 2)
	$i("WMS_diainicio").value = wms_configura[idWMS].diaInicio;
	$i("WMS_anofim").value = wms_configura[idWMS].anoFim;
	//if(tipoServico > 1)
	$i("WMS_mesfim").value = wms_configura[idWMS].mesFim;
	//if(tipoServico > 2)
	$i("WMS_diafim").value = wms_configura[idWMS].diaFim;

	var ins = "<select id='umaImagemPor' >";
	if(tipoServico == 1){
		ins += "<option value='ano' selected >"+$trad(10,i3GEOF.wmstime.dicionario)+"</option></select>";
	}
	if(tipoServico == 2){
		ins += "<option value='ano' >"+$trad(10,i3GEOF.wmstime.dicionario)+"</option>";
		ins += "<option value='mes' selected >"+$trad(11,i3GEOF.wmstime.dicionario)+"</option></select>";
	}
	if(tipoServico == 3){
		ins += "<option value='ano'  >"+$trad(10,i3GEOF.wmstime.dicionario)+"</option>";
		ins += "<option value='mes' >"+$trad(11,i3GEOF.wmstime.dicionario)+"</option>";
		ins += "<option value='dia' selected >"+$trad(12,i3GEOF.wmstime.dicionario)+"</option></select>";
	}
	$i("divumaImagemPor").innerHTML = ins;
}
/*
Function: iniciaImagens

Inicia a tela de apresenta&ccedil;&atilde;o das imagens
*/
function iniciaImagens(){
	$i("imagens").innerHTML = "";
	$i("imagensLidas").innerHTML = "";
	$i("marcaTempo").innerHTML = "";
	$i("parametros").style.display="none";
	$i("quadroAnima").style.display="block";
	if(window.parent.i3GEO.parametros.mapexten){
		bbox = window.parent.i3GEO.parametros.mapexten.split(" ");
		bbox = bbox.toString();
	}
	else
	bbox = "-51.0347433181,-25.2688559441,-43.4155582517,-21.1417973665";
	//var time = "2008-01-01"
	w = window.parent.i3GEO.parametros.w; //985
	h = window.parent.i3GEO.parametros.h;
	dw = 540;
	dh = 245;

	anoInicio = $i("WMS_anoinicio").value;
	mesInicio = $i("WMS_mesinicio").value;
	diaInicio = $i("WMS_diainicio").value;

	anoFim = $i("WMS_anofim").value;
	mesFim = $i("WMS_mesfim").value;
	diaFim = $i("WMS_diafim").value;

	intervalo = 1;
	id = 1;

	ids = new Array();
	quantasLidas = 0;
	onde = $i("imagens");
	ondeContador = $i("imagensLidas");
	ondeContador.style.display="block";
	ondeControle = $i("controle");
	idsValidos = new Array();
	idsTempo = new Array();
	parouQuantas = 0;
	ondeMarcaTempo = $i("marcaTempo");
	ondeData = $i("marcaData");
	tempoAnima = 500;

	if($i("umaImagemPor").value == "mes"){
		dataFixa = diaInicio;
		if(dataFixa < 10){dataFixa = "0"+dataFixa;}
		var anoAtual = anoInicio;
		var mesAtual = mesInicio;
		while (anoAtual <= anoFim){
			while (mesAtual < 13){
				var mes = mesAtual;
				if(mes < 10){mes = "0"+mes;}
				criaImg(anoAtual+"-"+mes+"-"+dataFixa,id);
				criaImgStatus(anoAtual+"-"+mes+"-"+dataFixa,id);
				ids.push(id);
				idsTempo.push(anoAtual+"-"+mes+"-"+dataFixa);
				id++;
				mesAtual++;
				if(anoAtual == anoFim && mesAtual > mesFim){mesAtual = 13;}
			}
			mesAtual = 1;
			anoAtual++;
		}
	}
	if($i("umaImagemPor").value == "dia"){
		var anoAtual = anoInicio;
		var mesAtual = mesInicio;
		var diaAtual = diaInicio;
		while (anoAtual <= anoFim){
			while (mesAtual < 13){
				var mes = mesAtual;
				if(mes < 10){mes = "0"+mes;}
				while (diaAtual < 31){
					var dia = diaAtual;
					if(diaAtual < 10){dia = "0"+dia;}
					criaImg(anoAtual+"-"+mes+"-"+dia,id);
					criaImgStatus(anoAtual+"-"+mes+"-"+dia,id);
					ids.push(id);
					idsTempo.push(anoAtual+"-"+mes+"-"+dia);
					id++;
					diaAtual++;
					if(mesAtual == mesFim && diaAtual > diaFim){diaAtual = 32;}
				}
				mesAtual++;
				if(anoAtual == anoFim && mesAtual > mesFim){mesAtual = 13;}
			}
			mesAtual = 1;
			anoAtual++;
		}
	}
}
/*
function: criaImg

Cria um elemento do tipo IMG com base no servi&ccedil;o escolhido e nos parametros de tempo

Parametros:

tempo {string} - data da imagem que ser&aacute; requisitada

id {string} - id que ser&aacute; definido para a imagem
*/
function criaImg(tempo,id){
	var novoel = document.createElement("img");
	var p = "absolute";
	//if(id==1){var p = "relative"}
	novoel.id = id;
	novoel.style.position = p;
	novoel.style.top = "0px";
	novoel.style.left = "0px";
	novoel.style.width = dw+"px";
	novoel.style.height = dh+"px";
	novoel.style.cursor = "pointer";
	novoel.src = $i("iServico").value+"&width="+dw+"&height="+dh+"&bbox="+bbox+"&time="+tempo; //"../../imagens/atlas1.jpg";
	novoel.title = $trad(13,i3GEOF.wmstime.dicionario);
	novoel.onclick = function(){
		adicionaMapa(idServicoEscolhido);
	};
	novoel.onload = function(){
		$i("status"+this.id).innerHTML = " <span style=color:red >OK</span>";
		idsValidos.push(this.id);
		parouQuantas++;
		if(idsValidos.length == ids.length)
		{pararStatus();}
	};
	onde.appendChild(novoel);
}
/*
Function: criaImgStatus

Cria um &iacute;cone que permite parar a apresenta&ccedil;&atilde;o da anima&ccedil;&atilde;o em uma determinada imagem

Parametros:

tempo {string} - data da imagem

id {string} - id da imagem
*/
function criaImgStatus(tempo,id){
	var novoel = document.createElement("div");
	novoel.id = "lida"+id;
	novoel.style.width="200px";
	novoel.innerHTML = "Imagem: "+tempo+"...<span style=cursor:pointer;color:blue onclick='pararImagem(\""+id+"\")' id='status"+id+"' >parar</span>";
	ondeContador.appendChild(novoel);
}
/*
Function: pararImagem

Parar a apresenta&ccedil;&atilde;o da anima&ccedil;&atilde;o em uma determinada imagem

Parametro:

id {string} - id da imagem
*/
function pararImagem(id){
	if($i(id)){
		$i(id).src = "";
		//onde.removeChild(document.getElementById(id))
		idsValidos.push(id);
		$i("status"+id).innerHTML = $trad(14,i3GEOF.wmstime.dicionario);
		parouQuantas++;
		if(parouQuantas == ids.length)
		{pararStatus();}
	}
	else
	{i3GEO.janela.tempoMsg($trad(15,i3GEOF.wmstime.dicionario));}
}
/*
Function: pararStatus

Para o gr&aacute;fico que mostra o status das imagens
*/
function pararStatus(){
	ondeContador.style.display = "none";
	ondeControle.style.display="block";
	ondeMarcaTempo.style.display="block";
	ondeMarcaTempo.style.top = "10px";
	ondeControle.style.top = dh + 50 + "px";
	ondeData.style.top = dh + 30 + "px";
	ondeData.style.width = dw+"px";
	desativaQuadros();
	criaMarcadorTempo();
	//ajustaIds()
	ativaQuadro(1);
}
function ajustaIds(){

}
/*
Function: criaMarcadorTempo

Cria o gr&aacute;fico que mostra as imagens dispon&iacute;veis. Serve de base para indicar qual imagem est&aacute; sendo mostrada
*/
function criaMarcadorTempo(){
	var nmarcas = ids.length;
	distanciaMarcas = parseInt(dw / nmarcas);
	var ins = "";
	var ini = parseInt((distanciaMarcas*i - (distanciaMarcas/2)));
	for(var i=1;i<=nmarcas;i++){
		ins += "<img title='"+$trad(16,i3GEOF.wmstime.dicionario)+"' onclick='adicionaMapa(\""+i+"\")' onmouseover='mostraI(\""+i+"\")' onmouseout='escondeI(\""+i+"\")' style='position:absolute;top:"+(dh + 10)+"px;left:"+parseInt((distanciaMarcas*i - (distanciaMarcas/2)))+"px;' src='../../imagens/dot1.gif' id='marcaTempo"+i+"' />";
	}
	ins += "<img style='position:absolute;top:"+(dh - 5)+"px;left:"+parseInt((distanciaMarcas - (distanciaMarcas/2)))+"px;' src='../../imagens/dot1red.gif' id='marcaDeTempo' />";
	ins += "<img style='position:absolute;top:"+(dh + 10)+"px;left:"+parseInt((distanciaMarcas - (distanciaMarcas/2)))+"px;' src='../../imagens/dot1cinza.gif' id='marcaGranulo' />";
	ngranulo = nmarcas;
	tgranulo = (parseInt((distanciaMarcas*i - (distanciaMarcas/2))) - ini) / 10;
	tempoGranulo = tempoAnima / 10;
	ondeMarcaTempo.innerHTML = ins;
	marcaVermelha = $i("marcaDeTempo");
	imgGranulo = $i("marcaGranulo");
	pararFilme();
	iniciarFilme();
}
/*
Function: mostraI

Mostra uma imagem espec&iacute;fica

Parametro:

obj {dom} - objeto contendo a imagem
*/
function mostraI(obj){
	$i(obj).style.display="block";
	ondeData.innerHTML = "YYMMDD: "+idsTempo[obj-1];
	if($i(quadroAtual))
	$i(quadroAtual).style.display = "none";
	else
	$i("1").style.display = "none";
}
/*
Function: escondeI

Esconde uma imagem

Parametro:

obj {dom} - objeto contendo a imagem
*/
function escondeI(obj){
	$i(obj).style.display="none";
	ondeData.innerHTML = "";
	if($i(quadroAtual))
	$i(quadroAtual).style.display = "block";
	else
	$i("1").style.display = "block";
}
/*
Function: adicionaMapa

Adiciona uma camada ao mapa baseado na imagem vista na tela

*/
function adicionaMapa(idMarca){
	//aguarde("block");
	idMarca = parseInt(idMarca,10);
	var serv = wms_configura[idServicoEscolhido];
	var fim = function(retorno){
		//aguarde("none");
		if (retorno.data.erro)
		{i3GEO.janela.tempoMsg(retorno.data.erro);}
		else
		{window.parent.i3GEO.atualiza("");}
	};
	var p = window.parent.i3GEO.configura.locaplic+"/classesphp/mapa_controle.php?g_sid="+window.parent.i3GEO.configura.sid+"&funcao=adicionatemawms";
	p += "&servico="+serv.servico;
	if(serv.styles == "")
	p += "&nome=";
	else
	p += "&nome="+serv.styles;
	p += "&tema="+serv.layers;
	p += "&proj="+serv.srs;
	p += "&formato="+serv.format;
	p += "&tipo=estilo";
	p += "&versao=1.1.1";
	p += "&nomecamada="+serv.titulo+" "+idsTempo[idMarca-1];
	p += "&tiporep=&suportasld=nao";
	p += "&formatosinfo=text/plain,application/vnd.ogc.gml";
	p += "&time="+idsTempo[idMarca-1];
	var cp = new cpaint();
	cp.set_response_type("JSON");
	cp.call(p,"wmstime",fim);

}
function desativaQuadros(){
	var n = idsValidos.length;
	for(var i=0;i<n;i++){
		$i(idsValidos[i]).style.display = "none";
	}
}
function ativaQuadro(i){
	var q = $i(i);
	if(q){
		q.style.position = "relative";
		q.style.display = "block";
	}
	if($i("marcaTempo"+i)){
		$i("marcaTempo"+i).style.display = "block";
	}
	if($i("marcaTempo"+(i))){
		marcaVermelha.style.left = $i("marcaTempo"+(i)).style.left;
	}
}
function pausarFilme(){
	emPausa = !emPausa;
	if(emPausa == false){
		anima();
	}
	else{
		imgGranulo.style.display="none";
		pulaGranulo = 11;
		try{
			clearTimeout(ganima);
		}catch(e){}
	}
}
function esconderMarcasTempo(){
	var n = idsValidos.length;
	for(var i=0;i<n;i++){
		if($i("marcaTempo"+i)){
			$i("marcaTempo"+i).style.display = "none";
		}
	}
}
function pararFilme(){
	emPausa = false;
	imgGranulo.style.left = parseInt((distanciaMarcas - (distanciaMarcas/2)))+"px";
	quadroAtual = 0;
	desativaQuadros();
	ativaQuadro(ids[0]);
	imgGranulo.style.display="none";
	ondeData.innerHTML = "";
	try{
		//clearTimeout(tanima)
		clearTimeout(ganima);
	}catch(e){}
}
function iniciarFilme(){
	emPausa = false;
	esconderMarcasTempo();
	imgGranulo.style.display="block";
	//tanima = setTimeout("anima()",tempoAnima)
	//ganima = setTimeout("animacaoGranulo()",tempoGranulo)
	anima();
}
function rebobina(){
	esconderMarcasTempo();
	pararFilme();
}
function anima(){
	desativaQuadros();
	ativaQuadro(ids[quadroAtual]);
	ondeData.innerHTML = idsTempo[quadroAtual];
	quadroAtual++;
	if(quadroAtual < idsValidos.length){
		//tanima = setTimeout("anima()",tempoAnima)
		pulaGranulo = 0;
		imgGranulo.style.left = $i("marcaTempo"+quadroAtual).style.left;
		ganima = setTimeout("animacaoGranulo()",tempoGranulo);
	}
	else{
		imgGranulo.style.display="none";
	}
}
function animacaoGranulo(){
	imgGranulo.style.left = parseInt(imgGranulo.style.left) +  tgranulo + "px";
	pulaGranulo++;
	//if(quadroAtual < idsValidos.length)
	if(pulaGranulo <= 10)
	ganima = setTimeout("animacaoGranulo()",tempoGranulo);
	else
	anima();
}
function maisrapido(){
	tempoGranulo = tempoGranulo - 10;
}
function maislento(){
	tempoGranulo = tempoGranulo + 10;
}