Reconstrução dos códigos da ferramenta Conexão WMS

Edmar Moretti
1 parent c3447d85
Showing 73 changed files with 2173 additions and 1686 deletions Show diff stats
classesphp/mapa_controle.php
classesphp/wmswfs.php
css/i3geo7.css.php
ferramentas/conectargeorss/dicionario.js
ferramentas/conectargeorss/index.js
ferramentas/conectarservicos/index.js
ferramentas/conectarwms/dependencias.php
ferramentas/conectarwms/dicionario.js
ferramentas/conectarwms/exec.php
ferramentas/conectarwms/imagens/rss.gif
ferramentas/conectarwms/index.htm
ferramentas/conectarwms/index.js
ferramentas/conectarwms/listalayers.php
ferramentas/conectarwms/template_mst.html
ferramentas/conectarwmsxxx/dicionario.js
ferramentas/conectarwmsxxx/imagens/rss.gif
ferramentas/conectarwmsxxx/index.htm
ferramentas/conectarwmsxxx/index.js
ferramentas/conectarwmsxxx/listalayers.php
ferramentas/editorgm/editorgm_compacto.js
@@ -1855,6 +1855,7 @@ switch (strtoupper($funcao))
 		*/
 	case "TEMASWMS":
 		include_once("wmswfs.php");
+		error_reporting(0);
 		$servico = $_pg["servico"];
 		restauraCon($map_file,$postgis_mapa);
 		$retorno = temaswms();
-<?php
-/*
-Title: wmswfs.php
-
-Fun&ccedil;&otilde;es de uso geral para realizar a leitura e o processamento de Web Services nos padr&otilde;es OGC.
-Atualmente, processa apenas servi&ccedil;os no padr&atilde;o WMS.
-
-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�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.
-
-Arquivo:
-
-i3geo/classesphp/wmswfs.php
-*/
-/*
-Function: gravaCacheWMS
-
-L&ecirc; o getcapabilities de um WMS e salva em disco se o mesmo n&atilde;o tiver sido salvo antes
-
-O arquivo &eacute; gravado no diret&oacute;rio tempor&aacute;rio
-
-Parametros:
-
-$servico {string} - endere&ccedil;o do WMS
-
-Global:
-
-$dir_tmp {string} - (opcional) endere&ccedil;o do diret&oacute;rio tempor&aacute;rio onde o cache ser&aacute; armazenado. Se n&atilde;o for definido, tenta obter das vari&aacute;veis de configura&ccedil;&atilde;o existentes em i3geo/ms_configura.php
-
-Return:
-
-{string} - Nome do arquivo criado. Retorna a palavra "erro" se tiver ocorrido um erro.
-*/
-function gravaCacheWMS($servico)
-{
-	global $dir_tmp, $i3geo_proxy_server;
-	if($dir_tmp == ""){
-		include(dirname(__FILE__)."/../ms_configura.php");
-	}
-	//error_reporting(0);
-	try{
-		$teste = explode("=",$servico);
-		if ( count($teste) > 1 ){
-			$servico = $servico."&";
-		}
-		else{
-			$teste = explode("?",$servico);
-			if ( count($teste) == 1 ){
-				$servico = $servico."?";
-			}
-		}
-		$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS";
-		$teste = explode("version",strtolower($wms_service_request));
-		if(count($teste) == 1){
-			$wms_service_request .= "&VERSION=1.1.1";
-		}
-		$nome = $dir_tmp."/wms".md5($servico).".xml";
-		//echo ($wms_service_request);exit;
-		if(!file_exists($nome)){
-			//$wms_capabilities = file($wms_service_request);
-			$curl = curl_init();
-			curl_setopt ($curl, CURLOPT_URL, $wms_service_request);
-			curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
-			curl_setopt($curl, CURLOPT_HEADER, 0);
-			if(isset($i3geo_proxy_server) && $i3geo_proxy_server != ""){
-				curl_setopt($curl, CURLOPT_PROXY, $i3geo_proxy_server);
-			}
-			$wms_capabilities = curl_exec($curl);
-			curl_close ($curl);
-			if( !$wms_capabilities || $wms_capabilities == ""){
-				return "erro";
-			}
-			else{
-				$fp = fopen($nome, 'w');
-				//fwrite($fp, implode("",$wms_capabilities));
-				fwrite($fp,$wms_capabilities);
-				fclose($fp);
-			}
-		}
-		return $nome;
-	}
-	catch(Exception $e){return "erro";}
-}
-/*
-Function: existeTemaWFS
-
-Verifica se existe um tema em um servico WFS.
-
-Globais:
-
-$wfs {string} - endere&ccedil;o do servi&ccedil;o
-
-$tema {string} - tema (layer) que ser&aacute; verificado
-
-Retorno:
-
-{string} - sim|nao
-*/
-function existeTemaWFS()
-{
-	global $wfs,$tema;
-	$capabilities = implode("",$wfs);
-	$dom = new DomDocument();
-	$dom->loadXML($capabilities);
-	$xpath = new DOMXPath($dom);
-	$query = '//WFS_Capabilities/FeatureTypeList/FeatureType';
-	$entries = $xpath->query($query);
-	foreach($entries as $e)
-	{
-		$e->getElementsByTagName("Name");
-		$n = $e->nodeValue;
-		if ($n == $tema)
-		{return "sim";}
-	}
-	return "nao";
-}
-/*
-Function: existeWFS
-
-Verifica se existe um servico WFS invocando o getcapabilities.
-
-Global:
-
-$servico {string} - endere&ccedil;o do servi&ccedil;o
-
-Retorno:
-
-{string} - nao|true
-*/
-function existeWFS()
-{
-	global $servico;
-	$teste = explode("=",$servico);
-	if ( count($teste) > 1 ){$servico = $servico."&";}
-	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WFS";
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	if( !($wfs_capabilities = file($wms_service_request)) ) {
-		# Cannot download the capabilities file.
-		return "nao";
-	}
-	else
-	{return $wfs_capabilities;}
-}
-/*
-Function: getcapabilities
-
-Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado.
-
-Global:
-
-$servico {string} - Endere&ccedil;o do web service.
-
-Retorno:
-
-{string}
-*/
-function getcapabilities()
-{
-	global $servico;
-	$teste = explode("=",$servico);
-	if ( count($teste) > 1 ){$servico = $servico."&";}
-	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS&version=1.1.0";
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	if( !($wms_capabilities = file($wms_service_request)) ) {
-		# Cannot download the capabilities file.
-		$cp->set_data("Erro de acesso");
-		return;
-	}
-	$wms_capabilities = implode("",$wms_capabilities);
-	return(xml2html($wms_capabilities));
-}
-/*
-function: getcapabilities2
-
-Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado pr&eacute;-formatado (WMS).
-
-Global:
-
-$servico {string} - Endere&ccedil;o do web service.
-
-Retorno:
-
-{string}
-*/
-function getcapabilities2()
-{
-	global $servico;
-	$teste = explode("=",$servico);
-	if ( count($teste) > 1 ){$servico = $servico."&";}
-	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS";
-	$teste = explode("version",strtolower($wms_service_request));
-	if(count($teste) == 1)
-	{$wms_service_request .= "&VERSION=1.1.1";}
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	if( !($wms_capabilities = file($wms_service_request)) ) {
-		# Cannot download the capabilities file.
-		$cp->set_data("Erro de acesso");
-		return;
-	}
-	$wms_capabilities = implode("",$wms_capabilities);
-	$dom = new DomDocument();
-	$dom->loadXML($wms_capabilities);
-	$xpath = new DOMXPath($dom);
-	$retorno = "";
-	$query = '//WMT_MS_Capabilities/Service/Name';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$rn = $xpath->registerNamespace("tag", "http://www.opengis.net/wms");
-		$entries = $xpath->query('/tag:WMS_Capabilities/tag:Service/tag:Name');
-	}
-
-	$temp = "";
-	foreach ($entries as $entry){$temp .= $entry->nodeValue;}
-	$retorno .= "<b>Nome: </b>".$temp;
-
-	$query = '//WMT_MS_Capabilities/Service/Title';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$entries = $xpath->query('/tag:WMS_Capabilities/tag:Service/tag:Title');
-	}
-	$temp = "";
-	foreach ($entries as $entry){$temp .= $entry->nodeValue;}
-	$retorno .= "<br><br><b>T&iacute;tulo: </b>".$temp;
-
-	$query = '//WMT_MS_Capabilities/Service/Abstract';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$entries = $xpath->query('/tag:WMS_Capabilities/tag:Service/tag:Abstract');
-	}
-	$temp = "";
-	foreach ($entries as $entry){$temp .= $entry->nodeValue;}
-	$retorno .= "<br><br><b>Resumo: </b>".$temp;
-
-	$query = '//WMT_MS_Capabilities/Service/KeywordList';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$entries = $xpath->query('/tag:WMS_Capabilities/tag:Service/tag:KeywordList');
-	}
-	$temp = "";
-	foreach ($entries as $entry){$temp .= $entry->nodeValue.".";}
-	$retorno .= "<br><br><b>Palavras-chave: </b>".$temp;
-
-	$query = '//WMT_MS_Capabilities/Service/ContactInformation';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$entries = $xpath->query('/tag:WMS_Capabilities/tag:Service/tag:ContactInformation');
-	}
-	$temp = "";
-	foreach ($entries as $entry){$temp .= $entry->nodeValue.".";}
-	$retorno .= "<br><br><b>Contato: </b>".$temp;
-
-	return($retorno);
-}
-/*
-getcapabilities3
-
-Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado formatado (WFS).
-
-Global:
-
-$servico {string} - Endere&ccedil;o do web service.
-
-
-*/
-function getcapabilities3()
-{
-	global $servico;
-	$teste = explode("=",$servico);
-	if ( count($teste) > 1 ){$servico = $servico."&";}
-	$wms_service_request = $servico . "request=getcapabilities&service=wfs&version=1.0.0";
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	if( !($wms_capabilities = file($wms_service_request)) ) {
-		# Cannot download the capabilities file.
-		$cp->set_data("Erro de acesso");
-		return;
-	}
-	$wms_capabilities = implode("",$wms_capabilities);
-	$dom = new DomDocument();
-	$dom->loadXML($wms_capabilities);
-	$retorno = "";
-	$services = $dom->getElementsByTagName("Service");
-	foreach ($services as $service)
-	{
-		$vs = $service->getElementsByTagName("Name");
-		$temp = "";
-		foreach ($vs as $v)
-		{$temp .= $v->nodeValue;}
-		$retorno .= "<b>Nome: </b>".$temp;
-		$vs = $service->getElementsByTagName("Title");
-		$temp = "";
-		foreach ($vs as $v)
-		{$temp .= $v->nodeValue;}
-		$retorno .= "<br><br><b>T&iacute;tulo: </b>".$temp;
-	}
-	return($retorno);
-}
-/*
-Function: temaswms
-
-Lista os temas de um web service WMS.
-
-Globais:
-
-$servico {string} - Endere&ccedil;o do web service.
-
-$id_ws {string} - (opcional) id do servi&ccedil;o registrado no sistema de administra&ccedil;&atilde;o do i3geo. Se definido, &eacute; feito o registro de tentativa de acesso ao servi&ccedil;o no sistema de administra&ccedil;&atilde;o
-
-Retorno:
-
-{html} - htaml formatado para permitir a escolha de uma camada
-*/
-function temaswms()
-{
-	global $servico,$id_ws;
-	//para admin1/cadastros/servicos/exec.php
-	$_GET["funcao"] = "lista";
-	$wms_service_request = gravaCacheWMS($servico);
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	//$wms_service_request = "c://temp//teste.xml";
-	if(file_exists(dirname(__FILE__)."/../admin1/cadastros/servicos/exec.php")){
-		include_once(dirname(__FILE__)."/../admin1/cadastros/servicos/exec.php");
-	}
-	else{
-		include_once(dirname(__FILE__)."/../admin/php/admin.php");
-		include_once(dirname(__FILE__)."/../admin/php/webservices.php");
-	}
-
-	//error_reporting(0);
-	if($wms_service_request == "erro") {
-		# Cannot download the capabilities file.
-		//registra a tentativa de acesso
-		if(isset($id_ws))
-		{
-			adicionaAcesso($id_ws,false);
-		}
-		$cp->set_data("Erro de acesso");
-		return;
-	}
-	elseif(isset($id_ws))
-	{
-		if($id_ws != "")
-		adicionaAcesso($id_ws,true);
-	}
-	$handle = fopen ($wms_service_request, "r");
-	$wms_capabilities = fread($handle, filesize($wms_service_request));
-	fclose ($handle);
-	$dom = new DomDocument();
-	$dom->loadXML($wms_capabilities);
-
-	//var_dump($dom);exit;
-	//$layers = wms_layers($dom);
-	$xpath = new DOMXPath($dom);
-	//verifica sld
-	$suporta = "nao";
-	$query = '//WMT_MS_Capabilities/Capability/UserDefinedSymbolization';
-	$entries = $xpath->query($query);
-	if($entries->length == 0){
-		$suporta = "sim";
-	}
-	else{
-		foreach($entries as $e)
-		{$n = $e->getAttribute("SupportSLD");}
-		if ($n == 1){$suporta = "sim";}
-	}
-	$xpath = new DOMXPath($dom);
-	//var_dump($xpath);exit;
-	$q = '//WMT_MS_Capabilities/Capability';
-	$query = $q.'/Layer';
-	$layers = $xpath->query($query);
-	if($layers == FALSE || $layers->length == 0){
-		$teste = $xpath->registerNamespace("tag", "http://www.opengis.net/wms");
-		$q = '/tag:WMS_Capabilities/tag:Capability';
-		$query = $q.'/tag:Layer';
-		$layers = $xpath->query($query);
-	}
-	//var_dump($layers);exit;
-	$retorna = array();
-	foreach ($layers as $layer)
-	{
-		$layers1 = $xpath->query('/Layer',$layer);
-		if($layers1->length == 0) //v 1.3.0
-		{$layers1 = $layers;}
-		else{
-			$r = pegaTag($layer);
-			$retorna = imprimeTag($r,$retorna);
-		}
-		foreach ($layers1 as $layer1)
-		{
-			$layers2 = $xpath->query('Layer',$layer1);
-			$r1 = pegaTag($layer1);
-			$camada1 = $r1["nome"];
-			$titulocamada1 = $r1["titulo"];
-			$retorna = imprimeTag($r1,$retorna);
-			if($r1["estilos"])
-			{$retorna = imprimeEstilos($r1["estilos"],$suporta,$retorna,$camada1,$titulocamada1);}
-			else
-			{
-				if($layers2->length == 0)
-				$retorna[] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada1 . "\",\"\",\"default\",\"".$camada1." ".$titulocamada1."\",\"".$suporta."\")' value='" . $camada1 . "'/> default<i>".$titulocamada1."</i></span><br>";
-			}
-			foreach ($layers2 as $layer2)
-			{
-				$layers3 = $xpath->query('Layer',$layer2);
-				$r2 = pegaTag($layer2);
-				$camada2 = $r2["nome"];
-				$titulocamada2 = $r2["titulo"];
-				$retorna = imprimeTag($r2,$retorna);
-				if($r2["estilos"])
-				{$retorna = imprimeEstilos($r2["estilos"],$suporta,$retorna,$camada2,$titulocamada2);}
-				else
-				{
-					if($layers3->length == 0)
-					$retorna[] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada2 . "\",\"\",\"default\",\"".$camada2." ".$titulocamada2."\",\"".$suporta."\")' value='" . $camada2 . "'/> default <i>".$titulocamada2."</i></span><br>";
-				}
-				foreach ($layers3 as $layer3)
-				{
-					$r3 = pegaTag($layer3);
-					$camada3 = $r3["nome"];
-					$titulocamada3 = $r3["titulo"];
-					$retorna = imprimeTag($r3,$retorna);
-					if($r3["estilos"])
-					{$retorna = imprimeEstilos($r3["estilos"],$suporta,$retorna,$camada3,$titulocamada3);}
-					else
-					{
-						$retorna[] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada3 . "\",\"\",\"default\",\"".$camada3." ".$titulocamada3."\",\"".$suporta."\")' value='" . $camada3 . "'/> default <i>".$titulocamada3."</i></span><br>";
-					}
-				}
-			}
-			if(count($layers2) == 1){$retorna[] = "<hr>";}
-		}
-	}
-	$retorna[] = "<p class='paragrafo'>Proje&ccedil;&atilde;o:</p><div class='styled-select'><input type='text' id='proj' value='".implode(",",wms_srs($dom))."' /></div>";
-	$retorna[] = "<br><p class='paragrafo'>Formatos imagem:</p><div class='styled-select'><input type='text' id='formatos' value='".implode(",",wms_formats($dom))."' /></div>";
-	$retorna[] = "<br><p class='paragrafo'>Formatos de informa&ccedil;&atilde;o:</p><div class='styled-select'><input type='text' id='formatosinfo' value='".implode(",",wms_formatsinfo($dom))."' /></div>";
-	$retorna[] = "<br><p class='paragrafo'>Vers&atilde;o:</p><div class='styled-select'><input type='text' id='versao' value='".implode(",",wms_version($dom))."' /></div>";
-	$retorna[] = "<br><p class='paragrafo'>Suporta SLD:</p><div class='styled-select'><input type='text' id='suportasld' value='".$suporta."' /></div>";
-	return(implode($retorna));
-}
-/*
-Function: listaLayersWMS
-
-Lista os temas de um web service WMS e retorna o resultado como um array.
-
-Globais:
-
-$servico {string} - Endere&ccedil;o do web service.
-
-$nivel - n&iacute;vel do layer na hierarquia existente no getcapabilities
-
-$nomelayer - nome do layer que cont&eacute;m os pr�ximos layers
-
-Retorno:
-
-{array}
-*/
-function listaLayersWMS()
-{
-	global $servico,$nivel,$id_ws,$nomelayer,$tipo_ws;
-
-	if(!isset($nomelayer)){
-		$nomelayer = "undefined";
-	}
-	//para o caso do sistema de metadados estatisticos
-	$wms_service_request = gravaCacheWMS($servico);
-	include_once(dirname(__FILE__)."/../admin/php/admin.php");
-	include_once(dirname(__FILE__)."/../admin/php/webservices.php");
-
-
-	if($tipo_ws != "WMSMETAESTAT" && $nivel < 2){
-		if($wms_service_request == "erro") {
-			//registra a tentativa de acesso
-			if(isset($id_ws)){
-				adicionaAcesso($id_ws,false);
-			}
-			$cp->set_data("Erro de acesso");
-			return;
-		}
-		elseif(isset($id_ws)){
-			adicionaAcesso($id_ws,true);
-		}
-	}
-
-	$handle = fopen ($wms_service_request, "r");
-	$wms_capabilities = fread ($handle, filesize ($wms_service_request));
-	fclose ($handle);
-
-	$dom = new DomDocument();
-	$dom->loadXML($wms_capabilities);
-	$xpath = new DOMXPath($dom);
-	$q = '//WMT_MS_Capabilities/Capability';
-	$res = array();
-	if($nomelayer != "undefined"){
-		for($i=0; $i < $nivel-1 ; ++$i){
-			$q .= "/Layer";
-		}
-		$layersanteriores = $xpath->query($q);
-		foreach ($layersanteriores as $layeranterior){
-			$r1 = pegaTag($layeranterior);
-			//echo "<pre>";var_dump($layeranterior);
-			if($r1["nome"] == $nomelayer || $r1["titulo"] == $nomelayer)
-			{
-				$layers = $xpath->query('Layer',$layeranterior);
-				foreach ($layers as $layer)
-				{
-					$r = pegaTag($layer);
-					if(!$r["nome"]){$r["nome"] = $r["titulo"];}
-					$res[] = array("nome"=>$r["nome"],"titulo"=>$r["titulo"],"estilos"=>$r["estilos"],"srs"=>wms_srs($dom),"formats"=>wms_formats($dom),"version"=>wms_version($dom),"formatsinfo"=>wms_formatsinfo($dom));
-				}
-				if($layers->length == 0)
-				{
-					$res[] = array("nome"=>$r1["nome"],"titulo"=>$r1["titulo"],"estilos"=>(array(array("nome"=>"default","titulo"=>"default"))),"srs"=>wms_srs($dom),"formats"=>wms_formats($dom),"version"=>wms_version($dom),"formatsinfo"=>wms_formatsinfo($dom));
-				}
-			}
-		}
-	}
-	else{
-		//
-		//pega os layers no primeiro n&iacute;vel
-		//
-		$q .= "/Layer";
-		$layers = $xpath->query($q);
-		$res = array();
-		foreach ($layers as $layer){
-			$r = pegaTag($layer);
-			//var_dump($r);
-			if(!$r["nome"]){
-				$r["nome"] = $r["titulo"];
-			}
-			if(array_search("Style",$r["tags"]) || array_search("Layer",$r["tags"])){
-				$res[] = array(
-						"nome"=>$r["nome"],
-						"titulo"=>$r["titulo"],
-						"estilos"=>$r["estilos"],
-						"srs"=>wms_srs($dom),
-						"formats"=>wms_formats($dom),
-						"version"=>wms_version($dom),
-						"formatsinfo"=>wms_formatsinfo($dom)
+<?php
+/*
+ * Title: wmswfs.php
+ *
+ * Fun&ccedil;&otilde;es de uso geral para realizar a leitura e o processamento de Web Services nos padr&otilde;es OGC.
+ * Atualmente, processa apenas servi&ccedil;os no padr&atilde;o WMS.
+ *
+ * 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�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.
+ *
+ * Arquivo:
+ *
+ * i3geo/classesphp/wmswfs.php
+ */
+/*
+ * Function: gravaCacheWMS
+ *
+ * L&ecirc; o getcapabilities de um WMS e salva em disco se o mesmo n&atilde;o tiver sido salvo antes
+ *
+ * O arquivo &eacute; gravado no diret&oacute;rio tempor&aacute;rio
+ *
+ * Parametros:
+ *
+ * $servico {string} - endere&ccedil;o do WMS
+ *
+ * Global:
+ *
+ * $dir_tmp {string} - (opcional) endere&ccedil;o do diret&oacute;rio tempor&aacute;rio onde o cache ser&aacute; armazenado. Se n&atilde;o for definido, tenta obter das vari&aacute;veis de configura&ccedil;&atilde;o existentes em i3geo/ms_configura.php
+ *
+ * Return:
+ *
+ * {string} - Nome do arquivo criado. Retorna a palavra "erro" se tiver ocorrido um erro.
+ */
+function gravaCacheWMS($servico) {
+	global $dir_tmp, $i3geo_proxy_server;
+	if ($dir_tmp == "") {
+		include (dirname ( __FILE__ ) . "/../ms_configura.php");
+	}
+	// error_reporting(0);
+	try {
+		$teste = explode ( "=", $servico );
+		if (count ( $teste ) > 1) {
+			$servico = $servico . "&";
+		} else {
+			$teste = explode ( "?", $servico );
+			if (count ( $teste ) == 1) {
+				$servico = $servico . "?";
+			}
+		}
+		$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS";
+		$teste = explode ( "version", strtolower ( $wms_service_request ) );
+		if (count ( $teste ) == 1) {
+			$wms_service_request .= "&VERSION=1.1.1";
+		}
+		$nome = $dir_tmp . "/wms" . md5 ( $servico ) . ".xml";
+		// echo ($wms_service_request);exit;
+		if (! file_exists ( $nome )) {
+			// $wms_capabilities = file($wms_service_request);
+			$curl = curl_init ();
+			curl_setopt ( $curl, CURLOPT_URL, $wms_service_request );
+			curl_setopt ( $curl, CURLOPT_RETURNTRANSFER, 1 );
+			curl_setopt ( $curl, CURLOPT_HEADER, 0 );
+			if (isset ( $i3geo_proxy_server ) && $i3geo_proxy_server != "") {
+				curl_setopt ( $curl, CURLOPT_PROXY, $i3geo_proxy_server );
+			}
+			$wms_capabilities = curl_exec ( $curl );
+			curl_close ( $curl );
+			if (! $wms_capabilities || $wms_capabilities == "") {
+				return "erro";
+			} else {
+				$fp = fopen ( $nome, 'w' );
+				// fwrite($fp, implode("",$wms_capabilities));
+				fwrite ( $fp, $wms_capabilities );
+				fclose ( $fp );
+			}
+		}
+		return $nome;
+	} catch ( Exception $e ) {
+		return "erro";
+	}
+}
+/*
+ * Function: existeTemaWFS
+ *
+ * Verifica se existe um tema em um servico WFS.
+ *
+ * Globais:
+ *
+ * $wfs {string} - endere&ccedil;o do servi&ccedil;o
+ *
+ * $tema {string} - tema (layer) que ser&aacute; verificado
+ *
+ * Retorno:
+ *
+ * {string} - sim|nao
+ */
+function existeTemaWFS() {
+	global $wfs, $tema;
+	$capabilities = implode ( "", $wfs );
+	$dom = new DomDocument ();
+	$dom->loadXML ( $capabilities );
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WFS_Capabilities/FeatureTypeList/FeatureType';
+	$entries = $xpath->query ( $query );
+	foreach ( $entries as $e ) {
+		$e->getElementsByTagName ( "Name" );
+		$n = $e->nodeValue;
+		if ($n == $tema) {
+			return "sim";
+		}
+	}
+	return "nao";
+}
+/*
+ * Function: existeWFS
+ *
+ * Verifica se existe um servico WFS invocando o getcapabilities.
+ *
+ * Global:
+ *
+ * $servico {string} - endere&ccedil;o do servi&ccedil;o
+ *
+ * Retorno:
+ *
+ * {string} - nao|true
+ */
+function existeWFS() {
+	global $servico;
+	$teste = explode ( "=", $servico );
+	if (count ( $teste ) > 1) {
+		$servico = $servico . "&";
+	}
+	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WFS";
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	if (! ($wfs_capabilities = file ( $wms_service_request ))) {
+		// Cannot download the capabilities file.
+		return "nao";
+	} else {
+		return $wfs_capabilities;
+	}
+}
+/*
+ * Function: getcapabilities
+ *
+ * Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado.
+ *
+ * Global:
+ *
+ * $servico {string} - Endere&ccedil;o do web service.
+ *
+ * Retorno:
+ *
+ * {string}
+ */
+function getcapabilities() {
+	global $servico;
+	$teste = explode ( "=", $servico );
+	if (count ( $teste ) > 1) {
+		$servico = $servico . "&";
+	}
+	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS&version=1.1.0";
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	if (! ($wms_capabilities = file ( $wms_service_request ))) {
+		// Cannot download the capabilities file.
+		$cp->set_data ( "Erro de acesso" );
+		return;
+	}
+	$wms_capabilities = implode ( "", $wms_capabilities );
+	return (xml2html ( $wms_capabilities ));
+}
+/*
+ * function: getcapabilities2
+ *
+ * Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado pr&eacute;-formatado (WMS).
+ *
+ * Global:
+ *
+ * $servico {string} - Endere&ccedil;o do web service.
+ *
+ * Retorno:
+ *
+ * {string}
+ */
+function getcapabilities2() {
+	global $servico;
+	$teste = explode ( "=", $servico );
+	if (count ( $teste ) > 1) {
+		$servico = $servico . "&";
+	}
+	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WMS";
+	$teste = explode ( "version", strtolower ( $wms_service_request ) );
+	if (count ( $teste ) == 1) {
+		$wms_service_request .= "&VERSION=1.1.1";
+	}
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	if (! ($wms_capabilities = file ( $wms_service_request ))) {
+		// Cannot download the capabilities file.
+		$cp->set_data ( "Erro de acesso" );
+		return;
+	}
+	$wms_capabilities = implode ( "", $wms_capabilities );
+	$dom = new DomDocument ();
+	$dom->loadXML ( $wms_capabilities );
+	$xpath = new DOMXPath ( $dom );
+	$retorno = "";
+	$query = '//WMT_MS_Capabilities/Service/Name';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$rn = $xpath->registerNamespace ( "tag", "http://www.opengis.net/wms" );
+		$entries = $xpath->query ( '/tag:WMS_Capabilities/tag:Service/tag:Name' );
+	}
+
+	$temp = "";
+	foreach ( $entries as $entry ) {
+		$temp .= $entry->nodeValue;
+	}
+	$retorno .= "<b>Nome: </b>" . $temp;
+
+	$query = '//WMT_MS_Capabilities/Service/Title';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$entries = $xpath->query ( '/tag:WMS_Capabilities/tag:Service/tag:Title' );
+	}
+	$temp = "";
+	foreach ( $entries as $entry ) {
+		$temp .= $entry->nodeValue;
+	}
+	$retorno .= "<br><br><b>T&iacute;tulo: </b>" . $temp;
+
+	$query = '//WMT_MS_Capabilities/Service/Abstract';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$entries = $xpath->query ( '/tag:WMS_Capabilities/tag:Service/tag:Abstract' );
+	}
+	$temp = "";
+	foreach ( $entries as $entry ) {
+		$temp .= $entry->nodeValue;
+	}
+	$retorno .= "<br><br><b>Resumo: </b>" . $temp;
+
+	$query = '//WMT_MS_Capabilities/Service/KeywordList';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$entries = $xpath->query ( '/tag:WMS_Capabilities/tag:Service/tag:KeywordList' );
+	}
+	$temp = "";
+	foreach ( $entries as $entry ) {
+		$temp .= $entry->nodeValue . ".";
+	}
+	$retorno .= "<br><br><b>Palavras-chave: </b>" . $temp;
+
+	$query = '//WMT_MS_Capabilities/Service/ContactInformation';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$entries = $xpath->query ( '/tag:WMS_Capabilities/tag:Service/tag:ContactInformation' );
+	}
+	$temp = "";
+	foreach ( $entries as $entry ) {
+		$temp .= $entry->nodeValue . ".";
+	}
+	$retorno .= "<br><br><b>Contato: </b>" . $temp;
+
+	return ($retorno);
+}
+/*
+ * getcapabilities3
+ *
+ * Chama a fun&ccedil;&atilde;o getcapabilities e retorna o resultado formatado (WFS).
+ *
+ * Global:
+ *
+ * $servico {string} - Endere&ccedil;o do web service.
+ *
+ *
+ */
+function getcapabilities3() {
+	global $servico;
+	$teste = explode ( "=", $servico );
+	if (count ( $teste ) > 1) {
+		$servico = $servico . "&";
+	}
+	$wms_service_request = $servico . "request=getcapabilities&service=wfs&version=1.0.0";
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	if (! ($wms_capabilities = file ( $wms_service_request ))) {
+		// Cannot download the capabilities file.
+		$cp->set_data ( "Erro de acesso" );
+		return;
+	}
+	$wms_capabilities = implode ( "", $wms_capabilities );
+	$dom = new DomDocument ();
+	$dom->loadXML ( $wms_capabilities );
+	$retorno = "";
+	$services = $dom->getElementsByTagName ( "Service" );
+	foreach ( $services as $service ) {
+		$vs = $service->getElementsByTagName ( "Name" );
+		$temp = "";
+		foreach ( $vs as $v ) {
+			$temp .= $v->nodeValue;
+		}
+		$retorno .= "<b>Nome: </b>" . $temp;
+		$vs = $service->getElementsByTagName ( "Title" );
+		$temp = "";
+		foreach ( $vs as $v ) {
+			$temp .= $v->nodeValue;
+		}
+		$retorno .= "<br><br><b>T&iacute;tulo: </b>" . $temp;
+	}
+	return ($retorno);
+}
+/*
+ * Function: temaswms
+ *
+ * Lista os temas de um web service WMS.
+ *
+ * Globais:
+ *
+ * $servico {string} - Endere&ccedil;o do web service.
+ *
+ * $id_ws {string} - (opcional) id do servi&ccedil;o registrado no sistema de administra&ccedil;&atilde;o do i3geo. Se definido, &eacute; feito o registro de tentativa de acesso ao servi&ccedil;o no sistema de administra&ccedil;&atilde;o
+ *
+ * Retorno:
+ *
+ * {html} - htaml formatado para permitir a escolha de uma camada
+ */
+function temaswms() {
+	global $servico, $id_ws;
+	// para admin1/cadastros/servicos/exec.php
+	$_GET ["funcao"] = "lista";
+	$wms_service_request = gravaCacheWMS ( $servico );
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	// $wms_service_request = "c://temp//teste.xml";
+	if (file_exists ( dirname ( __FILE__ ) . "/../admin1/cadastros/servicos/exec.php" )) {
+		include_once (dirname ( __FILE__ ) . "/../admin1/cadastros/servicos/exec.php");
+	} else {
+		include_once (dirname ( __FILE__ ) . "/../admin/php/admin.php");
+		include_once (dirname ( __FILE__ ) . "/../admin/php/webservices.php");
+	}
+
+	// error_reporting(0);
+	if ($wms_service_request == "erro") {
+		// Cannot download the capabilities file.
+		// registra a tentativa de acesso
+		if (isset ( $id_ws )) {
+			adicionaAcesso ( $id_ws, false );
+		}
+		$cp->set_data ( "Erro de acesso" );
+		return;
+	} elseif (isset ( $id_ws )) {
+		if ($id_ws != "")
+			adicionaAcesso ( $id_ws, true );
+	}
+	$handle = fopen ( $wms_service_request, "r" );
+	$wms_capabilities = fread ( $handle, filesize ( $wms_service_request ) );
+	fclose ( $handle );
+	$dom = new DomDocument ();
+	$dom->loadXML ( $wms_capabilities );
+
+	// var_dump($dom);exit;
+	// $layers = wms_layers($dom);
+	$xpath = new DOMXPath ( $dom );
+	// verifica sld
+	$suporta = "nao";
+	$query = '//WMT_MS_Capabilities/Capability/UserDefinedSymbolization';
+	$entries = $xpath->query ( $query );
+	if ($entries->length == 0) {
+		$suporta = "sim";
+	} else {
+		foreach ( $entries as $e ) {
+			$n = $e->getAttribute ( "SupportSLD" );
+		}
+		if ($n == 1) {
+			$suporta = "sim";
+		}
+	}
+	$xpath = new DOMXPath ( $dom );
+	// var_dump($xpath);exit;
+	$q = '//WMT_MS_Capabilities/Capability';
+	$query = $q . '/Layer';
+	$layers = $xpath->query ( $query );
+	if ($layers == FALSE || $layers->length == 0) {
+		$teste = $xpath->registerNamespace ( "tag", "http://www.opengis.net/wms" );
+		$q = '/tag:WMS_Capabilities/tag:Capability';
+		$query = $q . '/tag:Layer';
+		$layers = $xpath->query ( $query );
+	}
+	// var_dump($layers);exit;
+	$retorna = array ();
+	foreach ( $layers as $layer ) {
+		$layers1 = $xpath->query ( '/Layer', $layer );
+		if ($layers1->length == 0) // v 1.3.0
+{
+			$layers1 = $layers;
+		} else {
+			$r = pegaTag ( $layer );
+			$retorna = imprimeTag ( $r, $retorna );
+		}
+		foreach ( $layers1 as $layer1 ) {
+			$layers2 = $xpath->query ( 'Layer', $layer1 );
+			$r1 = pegaTag ( $layer1 );
+			$camada1 = $r1 ["nome"];
+			$titulocamada1 = $r1 ["titulo"];
+			$retorna = imprimeTag ( $r1, $retorna );
+			if ($r1 ["estilos"]) {
+				$retorna = imprimeEstilos ( $r1 ["estilos"], $suporta, $retorna, $camada1, $titulocamada1 );
+			} else {
+				if ($layers2->length == 0){
+					$retorna [] = imprimeEstilos2 ($camada1, $titulocamada1, $suporta);
+					//$retorna [] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada1 . "\",\"\",\"default\",\"" . $camada1 . " " . $titulocamada1 . "\",\"" . $suporta . "\")' value='" . $camada1 . "'/> default<i>" . $titulocamada1 . "</i></span><br>";
+				}
+			}
+			foreach ( $layers2 as $layer2 ) {
+				$layers3 = $xpath->query ( 'Layer', $layer2 );
+				$r2 = pegaTag ( $layer2 );
+				$camada2 = $r2 ["nome"];
+				$titulocamada2 = $r2 ["titulo"];
+				$retorna = imprimeTag ( $r2, $retorna );
+				if ($r2 ["estilos"]) {
+					$retorna = imprimeEstilos ( $r2 ["estilos"], $suporta, $retorna, $camada2, $titulocamada2 );
+				} else {
+					if ($layers3->length == 0)
+						$retorna [] = imprimeEstilos2 ($camada2, $titulocamada2, $suporta);
+						//$retorna [] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada2 . "\",\"\",\"default\",\"" . $camada2 . " " . $titulocamada2 . "\",\"" . $suporta . "\")' value='" . $camada2 . "'/> default <i>" . $titulocamada2 . "</i></span><br>";
+				}
+				foreach ( $layers3 as $layer3 ) {
+					$r3 = pegaTag ( $layer3 );
+					$camada3 = $r3 ["nome"];
+					$titulocamada3 = $r3 ["titulo"];
+					$retorna = imprimeTag ( $r3, $retorna );
+					if ($r3 ["estilos"]) {
+						$retorna = imprimeEstilos ( $r3 ["estilos"], $suporta, $retorna, $camada3, $titulocamada3 );
+					} else {
+						$retorna [] = imprimeEstilos2 ($camada3, $titulocamada3, $suporta);
+						//$retorna [] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"tema\",\"" . $camada3 . "\",\"\",\"default\",\"" . $camada3 . " " . $titulocamada3 . "\",\"" . $suporta . "\")' value='" . $camada3 . "'/> default <i>" . $titulocamada3 . "</i></span><br>";
+					}
+				}
+			}
+			if (count ( $layers2 ) == 1) {
+				$retorna [] = "<hr>";
+			}
+		}
+	}
+
+	$retorna [] = "<div class='form-group label-fixed condensed' ><label class='control-label' for='proj'>Proje&ccedil;&atilde;o</label><input class='form-control input-lg' type='text' id='proj' value='" . implode ( ",", wms_srs ( $dom ) ) . "' /></div>";
+	$retorna [] = "<div class='form-group label-fixed condensed' ><label class='control-label' for='formatos'>Formatos imagem</label><input class='form-control input-lg' type='text' id='formatos' value='" . implode ( ",", wms_formats ( $dom ) ) . "' /></div>";
+	$retorna [] = "<div class='form-group label-fixed condensed' ><label class='control-label' for='formatosinfo'>Formatos de informa&ccedil;&atilde;o</label><input class='form-control input-lg' type='text' id='formatosinfo' value='" . implode ( ",", wms_formatsinfo ( $dom ) ) . "' /></div>";
+	$retorna [] = "<div class='form-group label-fixed condensed' ><label class='control-label' for='versao'>Vers&atilde;o</label><input class='form-control input-lg' type='text' id='versao' value='" . implode ( ",", wms_version ( $dom ) ) . "' /></div>";
+	$retorna [] = "<div class='form-group label-fixed condensed' ><label class='control-label' for='suportasld'>Suporta SLD</label><input class='form-control input-lg' type='text' id='suportasld' value='" . $suporta . "' /></div>";
+
+	//$retorna [] = "<h5>Proje&ccedil;&atilde;o:</h5><div class='styled-select'><input type='text' id='proj' value='" . implode ( ",", wms_srs ( $dom ) ) . "' /></div>";
+	//$retorna [] = "<br><p class='paragrafo'>Formatos imagem:</p><div class='styled-select'><input type='text' id='formatos' value='" . implode ( ",", wms_formats ( $dom ) ) . "' /></div>";
+	//$retorna [] = "<br><p class='paragrafo'>Formatos de informa&ccedil;&atilde;o:</p><div class='styled-select'><input type='text' id='formatosinfo' value='" . implode ( ",", wms_formatsinfo ( $dom ) ) . "' /></div>";
+	//$retorna [] = "<br><p class='paragrafo'>Vers&atilde;o:</p><div class='styled-select'><input type='text' id='versao' value='" . implode ( ",", wms_version ( $dom ) ) . "' /></div>";
+	//$retorna [] = "<br><p class='paragrafo'>Suporta SLD:</p><div class='styled-select'><input type='text' id='suportasld' value='" . $suporta . "' /></div>";
+	return (implode ( $retorna ));
+}
+/*
+ * Function: listaLayersWMS
+ *
+ * Lista os temas de um web service WMS e retorna o resultado como um array.
+ *
+ * Globais:
+ *
+ * $servico {string} - Endere&ccedil;o do web service.
+ *
+ * $nivel - n&iacute;vel do layer na hierarquia existente no getcapabilities
+ *
+ * $nomelayer - nome do layer que cont&eacute;m os pr�ximos layers
+ *
+ * Retorno:
+ *
+ * {array}
+ */
+function listaLayersWMS() {
+	global $servico, $nivel, $id_ws, $nomelayer, $tipo_ws;
+
+	if (! isset ( $nomelayer )) {
+		$nomelayer = "undefined";
+	}
+	// para o caso do sistema de metadados estatisticos
+	$wms_service_request = gravaCacheWMS ( $servico );
+	include_once (dirname ( __FILE__ ) . "/../admin/php/admin.php");
+	include_once (dirname ( __FILE__ ) . "/../admin/php/webservices.php");
+
+	if ($tipo_ws != "WMSMETAESTAT" && $nivel < 2) {
+		if ($wms_service_request == "erro") {
+			// registra a tentativa de acesso
+			if (isset ( $id_ws )) {
+				adicionaAcesso ( $id_ws, false );
+			}
+			$cp->set_data ( "Erro de acesso" );
+			return;
+		} elseif (isset ( $id_ws )) {
+			adicionaAcesso ( $id_ws, true );
+		}
+	}
+
+	$handle = fopen ( $wms_service_request, "r" );
+	$wms_capabilities = fread ( $handle, filesize ( $wms_service_request ) );
+	fclose ( $handle );
+
+	$dom = new DomDocument ();
+	$dom->loadXML ( $wms_capabilities );
+	$xpath = new DOMXPath ( $dom );
+	$q = '//WMT_MS_Capabilities/Capability';
+	$res = array ();
+	if ($nomelayer != "undefined") {
+		for($i = 0; $i < $nivel - 1; ++ $i) {
+			$q .= "/Layer";
+		}
+		$layersanteriores = $xpath->query ( $q );
+		foreach ( $layersanteriores as $layeranterior ) {
+			$r1 = pegaTag ( $layeranterior );
+			// echo "<pre>";var_dump($layeranterior);
+			if ($r1 ["nome"] == $nomelayer || $r1 ["titulo"] == $nomelayer) {
+				$layers = $xpath->query ( 'Layer', $layeranterior );
+				foreach ( $layers as $layer ) {
+					$r = pegaTag ( $layer );
+					if (! $r ["nome"]) {
+						$r ["nome"] = $r ["titulo"];
+					}
+					$res [] = array (
+							"nome" => $r ["nome"],
+							"titulo" => $r ["titulo"],
+							"estilos" => $r ["estilos"],
+							"srs" => wms_srs ( $dom ),
+							"formats" => wms_formats ( $dom ),
+							"version" => wms_version ( $dom ),
+							"formatsinfo" => wms_formatsinfo ( $dom )
+					);
+				}
+				if ($layers->length == 0) {
+					$res [] = array (
+							"nome" => $r1 ["nome"],
+							"titulo" => $r1 ["titulo"],
+							"estilos" => (array (
+									array (
+											"nome" => "default",
+											"titulo" => "default"
+									)
+							)),
+							"srs" => wms_srs ( $dom ),
+							"formats" => wms_formats ( $dom ),
+							"version" => wms_version ( $dom ),
+							"formatsinfo" => wms_formatsinfo ( $dom )
+					);
+				}
+			}
+		}
+	} else {
+		//
+		// pega os layers no primeiro n&iacute;vel
+		//
+		$q .= "/Layer";
+		$layers = $xpath->query ( $q );
+		$res = array ();
+		foreach ( $layers as $layer ) {
+			$r = pegaTag ( $layer );
+			// var_dump($r);
+			if (! $r ["nome"]) {
+				$r ["nome"] = $r ["titulo"];
+			}
+			if (array_search ( "Style", $r ["tags"] ) || array_search ( "Layer", $r ["tags"] )) {
+				$res [] = array (
+						"nome" => $r ["nome"],
+						"titulo" => $r ["titulo"],
+						"estilos" => $r ["estilos"],
+						"srs" => wms_srs ( $dom ),
+						"formats" => wms_formats ( $dom ),
+						"version" => wms_version ( $dom ),
+						"formatsinfo" => wms_formatsinfo ( $dom )
+				)
+				;
+			}
+		}
+	}
+	// exit;
+	return ($res);
+}
+function imprimeEstilos($es, $suporta, $retorna, $tval, $tituloalternativo) {
+	foreach ( $es as $e ) {
+		$nomeestilo = $e ["nome"];
+		$nomecamada = $e ["titulo"];
+		$tituloestilo = $e ["titulo"];
+		$onclick = "seltema(\"estilo\",\"" . $tval . "\",\"\",\"" . $nomeestilo . "\",\"" . $tituloalternativo . " " . $nomecamada . " " . $tituloestilo . "\",\"" . $suporta . "\")";
+
+		$retorna [] = <<<EOT
+<div class="list-group condensed">
+<div class="row-content text-left">
+<a onclick='$onclick' role="button" class="btn btn-default btn-fab btn-fab-max" href="javascript:void(0)">
+<span class="material-icons">visibility</span>
+</a>
+<label class="nomeTema" >
+<a onclick='$onclick' href="javascript:void(0)"><h4>
+$nomeestilo
+</h4></a>
+<h6>$tituloestilo</h6>
+</label>
+</div>
+</div>
+EOT;
+
+		// $retorna[] = "<button class='btn btn-primary btn-sm btn-raised' onClick='".onclick."' value='" . $nomeestilo . "'/>" . $nomeestilo." <i>".$tituloestilo."</i></span><br>";
+	}
+	return $retorna;
+}
+function imprimeEstilos2($camada1, $titulocamada1, $suporta) {
+		$onclick = "seltema(\"tema\",\"" . $camada1 . "\",\"\",\"default\",\"" . $camada1 . " " . $titulocamada1 . "\",\"" . $suporta . "\")";
+		$retorna = <<<EOT
+<div class="list-group condensed">
+<div class="row-content text-left">
+<a onclick='$onclick' role="button" class="btn btn-default btn-fab btn-fab-max" href="javascript:void(0)">
+<span class="material-icons">visibility</span>
+</a>
+<label class="nomeTema" >
+<a onclick='$onclick' href="javascript:void(0)"><h4>
+default
+</h4></a>
+<h6>$titulocamada1</h6>
+</label>
+</div>
+</div>
+EOT;
+
+	return $retorna;
+}
+
+function imprimeTag($r, $retorna) {
+	if (! $r ["nome"]) {
+		$retorna [] = "<h4>" . $r ["titulo"] . "</h4>";
+	} else {
+		$retorna [] = "<hr>";
+		$retorna [] = "<h3>" . $r ["nome"] . "</h3>";
+		//$retorna [] = "<h4>" . $r ["titulo"] . "</h4>";
+		$retorna [] = "<h5>" . $r ["resumo"] . "</h5>";
+	}
+	return $retorna;
+}
+function pegaTag($layer) {
+	// error_reporting(0);
+	$noslayer = $layer->childNodes;
+	$resultado = array (
+			"estiloas" => array (),
+			"tags" => array ()
+	);
+	for($i = 0; $i < $noslayer->length; ++ $i) {
+		$tnome = $noslayer->item ( $i )->tagName;
+		$tvalor = $noslayer->item ( $i )->nodeValue;
+		if ($tnome) {
+			// echo "<br>".$tnome;
+			if ($tnome == "Title") {
+				$resultado ["titulo"] = $tvalor;
+			}
+			if ($tnome == "Name") {
+				$resultado ["nome"] = $tvalor;
+			}
+			if ($tnome == "Abstract") {
+				$resultado ["resumo"] = $tvalor;
+			}
+
+			if ($tnome == "Style") {
+				$ss = $noslayer->item ( $i )->childNodes;
+				$ssl = $ss->length;
+				$n = "";
+				$t = "";
+				for($s = 0; $s < $ssl; $s ++) {
+					$snome = $ss->item ( $s )->tagName;
+					$svalor = $ss->item ( $s )->nodeValue;
+					if ($snome) {
+						if ($snome == "Title") {
+							$t = $svalor;
+						}
+						if ($snome == "Name") {
+							$n = $svalor;
+						}
+					}
+				}
+				// echo "<pre>";echo $n;
+				if ($n != "") {
+					array_push ( $resultado ["estilos"], array (
+							"nome" => $n,
+							"titulo" => $t
+					) );
+				}
+			}
+			array_push ( $resultado ["tags"], $tnome );
+			// echo "<pre>";var_dump($resultado);
+		}
+	}
+	return $resultado;
+}
+
+/*
+ * temaswfs
+ *
+ * Lista os temas de um web service WFS.
+ *
+ * parameters:
+ * $servico - Endere&ccedil;o do web service.
+ *
+ * $cp - Objeto CPAINT.
+ */
+function temaswfs() {
+	global $servico, $cp;
+	$teste = explode ( "=", $servico );
+	if (count ( $teste ) > 1) {
+		$servico = $servico . "&";
+	}
+	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WFS";
+	// -------------------------------------------------------------
+	// Test that the capabilites file has successfully downloaded.
+	//
+	if (! ($wms_capabilities = file ( $wms_service_request ))) {
+		// Cannot download the capabilities file.
+		$cp->set_data ( "Erro de acesso" );
+		return;
+	}
+	$wms_capabilities = implode ( "", $wms_capabilities );
+	$dom = new DomDocument ();
+	$dom->loadXML ( $wms_capabilities );
+	$services = $dom->getElementsByTagName ( "Service" );
+	foreach ( $services as $service ) {
+		$vs = $service->getElementsByTagName ( "Name" );
+		$serv = "";
+		foreach ( $vs as $v ) {
+			$serv .= $v->nodeValue;
+		}
+	}
+	$layers = $dom->getElementsByTagName ( "FeatureType" );
+	foreach ( $layers as $layer ) {
+		$vs = $layer->getElementsByTagName ( "Title" );
+		$temp1 = "";
+		foreach ( $vs as $v ) {
+			$temp1 .= $v->nodeValue;
+		}
+
+		$vs = $layer->getElementsByTagName ( "Abstract" );
+		$temp2 = "";
+		foreach ( $vs as $v ) {
+			$temp2 .= $v->nodeValue;
+		}
+
+		$vs = $layer->getElementsByTagName ( "SRS" );
+		$temp3 = array ();
+		foreach ( $vs as $v ) {
+			$temp3 [] = $v->nodeValue;
+		}
+		$temp3 = implode ( "#", $temp3 );
+
+		$vs = $layer->getElementsByTagName ( "Name" );
+		$temp = "";
+		foreach ( $vs as $v ) {
+			$temp .= $v->nodeValue;
+		}
+		$temp = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"" . $temp . "\",\"" . $temp1 . "\",\"" . $temp3 . "\",\"" . $serv . "\")' /><span style=color:red >" . $temp . "</span><br>";
+		$retorno .= "<br>" . $temp . $temp1 . "<br>" . $temp2 . "<hr>";
+	}
+	$cp->set_data ( $retorno );
+}
+/*
+ * Function: xml2html
+ *
+ * Converte caracteres XML em HTML.
+ *
+ * Parametro:
+ *
+ * $str {string} - Xml que ser&aacute; convertido
+ *
+ * Retorno:
+ *
+ * {string}
+ */
+function xml2html($str) {
+	$str = ereg_replace ( "&", "&amp;", $str );
+	$str = ereg_replace ( "<", "&lt;", $str );
+	$str = ereg_replace ( ">", "&gt;<BR>", $str );
+	return $str;
+}
+/*
+ * wms_descricao
+ *
+ * Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (n�).
+ */
+function wms_descricao($dom, $xp) {
+	$xpath = new DOMXPath ( $dom );
+	$query = $xp;
+	$entries = $xpath->query ( $query );
+	$n = "";
+	foreach ( $entries as $entry ) {
+		$n = $entry->nodeValue;
+	}
+	return $n;
+}
+/*
+ * wms_descricaov
+ *
+ * Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (atributo).
+ */
+function wms_descricaov($dom, $xp, $attrib) {
+	$xpath = new DOMXPath ( $dom );
+	$query = $xp;
+	$entries = $xpath->query ( $query );
+	$n = "";
+	foreach ( $entries as $entry ) {
+		$n = $entry->getAttribute ( $attrib );
+	}
+	return $n;
+}
+/*
+ * wms_descricaon
+ *
+ * Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (filho de um n�).
+ */
+function wms_descricaon($dom, $xp, $n) {
+	$ctx = xpath_new_context ( $dom );
+	$xpnode = xpath_eval ( $ctx, $xp );
+	$dtnode = $xpnode->nodeset [$n]->first_child ();
+	return $dtnode->content;
+}
+/*
+ * wms_title
+ *
+ * Retorna o t&iacute;tulo de um WMS.
+ */
+function wms_title($dom) {
+	//
+	// Read the WMS service title and return it as text.
+	//
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Service/Title';
+	$entries = $xpath->query ( $query );
+	foreach ( $entries as $entry ) {
+		$nomeserv = $entry->nodeValue;
+	}
+	return $nomeserv;
+}
+/*
+ * wms_onlineresource
+ *
+ * Retorna o recurso on-line de um WMS.
+ */
+function wms_onlineresource($dom) {
+	//
+	// Read the WMS online resource URL and return it as text.
+	//
+	$xp = "/WMT_MS_Capabilities/Service/OnlineResource";
+	$ctx = xpath_new_context ( $dom );
+	$xpnode = xpath_eval ( $ctx, $xp );
+	return $xpnode->nodeset [0]->get_attribute ( "href" );
+}
+/*
+ * wms_formats
+ *
+ * Retorna os formatos de imagem de um WMS.
+ */
+function wms_formats($dom) {
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Capability/Request/GetMap/Format';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$teste = $xpath->registerNamespace ( "tag", "http://www.opengis.net/wms" );
+		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Request/tag:GetMap/tag:Format';
+		$entries = $xpath->query ( $q );
+	}
+	$arr = array ();
+	foreach ( $entries as $entry ) {
+		$arr [] = $entry->nodeValue;
+	}
+	return $arr;
+}
+/*
+ * wms_formatsinfo
+ *
+ * Retorna os formatos existentes de retorno da op&ccedil;&atilde;o getfeatureinfo.
+ */
+function wms_formatsinfo($dom) {
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Capability/Request/GetFeatureInfo/Format';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$teste = $xpath->registerNamespace ( "tag", "http://www.opengis.net/wms" );
+		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Request/tag:GetCapabilities/tag:Format';
+		$entries = $xpath->query ( $q );
+	}
+	$arr = array ();
+	foreach ( $entries as $entry ) {
+		$arr [] = $entry->nodeValue;
+	}
+	return $arr;
+}
+/*
+ * wms_estilos
+ *
+ * Retorna os estilos de um WMS.
+ */
+function wms_estilos($dom) {
+	//
+	// Read the WMS image formats and return them as an array.
+	//
+	// $xp = "/Style";
+	// $ctx = xpath_new_context($dom);
+	// $xpnode = xpath_eval($ctx,$xp);
+	// return $xpnode->nodeset;
+	$return = $dom->getElementsByTagName ( "Style" );
+}
+/*
+ * wms_exceptions
+ *
+ * Retorna as exceptions de um WMS.
+ */
+function wms_exceptions($dom) {
+	//
+	// Read the WMS exception formats and return them as an array.
+	//
+	$xp = "/WMT_MS_Capabilities/Capability/Exception/Format";
+	$ctx = xpath_new_context ( $dom );
+	$xpnode = xpath_eval ( $ctx, $xp );
+	$arr = array ();
+	for($i = 0; $i < sizeof ( $xpnode->nodeset ); ++ $i) {
+		$dtnode = $xpnode->nodeset [0]->first_child ();
+		array_push ( $arr, $dtnode->content );
+	}
+	return $arr;
+}
+/*
+ * wms_version
+ *
+ * Retorna a versao.
+ */
+function wms_version($dom) {
+	$n = $dom->getElementsByTagName ( 'WMT_MS_Capabilities' );
+	$params = $dom->getElementsByTagName ( '*' );
+
+	foreach ( $params as $param ) {
+		$v = $param->getAttribute ( 'version' );
+		break;
+	}
+	return $v;
+}
+/*
+ * wms_layers
+ *
+ * Retorna os layers de um WMS.
+ */
+function wms_layers($dom) {
+	//
+	// Read the WMS first level layers and return an
+	// array of nodes.
+	//
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Capability/Layer/Layer/Layer';
+	$entries = $xpath->query ( $query );
+	if ($entries->length == 0) {
+		$query = '//WMT_MS_Capabilities/Capability/Layer';
+		$entries = $xpath->query ( $query );
+	} else {
+		$query = '//WMT_MS_Capabilities/Capability/Layer/Layer';
+		$entries = $xpath->query ( $query );
+	}
+	return $entries;
+}
+/*
+ * wms_xpnode2content
+ *
+ * Read the content child node of an element tag node WMS.
+ */
+function wms_xpnode2content($xp_node) {
+	//
+	// Read the content child node of an element tag
+	// node.
+	//
+	$content = "";
+	if ($xp_node->nodeset [0]) {
+		$node = $xp_node->nodeset [0]->first_child ();
+		$content = $node->content;
+	}
+	return $content;
+}
+/*
+ * wms_srs
+ *
+ * Retorna os SRSs WMS.
+ */
+function wms_srs($dom) {
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Capability/Layer/SRS';
+	$entries = $xpath->query ( $query );
+	if ($entries == FALSE || $entries->length == 0) {
+		$teste = $xpath->registerNamespace ( "tag", "http://www.opengis.net/wms" );
+		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Layer/tag:CRS';
+		$entries = $xpath->query ( $q );
+	}
+
+	$srs = "";
+	// utiliza apenas os epsg do Brasil
+	$single = array ();
+	foreach ( $entries as $entry ) {
+		$arr [] = $entry->nodeValue;
+		if ($entry->nodeValue == "CRS:84") {
+			$single [] = "CRS:84";
+		}
+		if ($entry->nodeValue == "EPSG:4326") {
+			$single [] = "EPSG:4326";
+		}
+		if ($entry->nodeValue == "EPSG:4618") {
+			$single [] = "EPSG:4618";
+		}
+	}
+	if (count ( $single ) > 0) {
+		$arr = $single;
+	}
+	return $arr;
+}
+/*
+ * wms_bbox
+ *
+ * Retorna o BBOX de um WMS.
+ */
+function wms_bbox($dom) {
+	$xpath = new DOMXPath ( $dom );
+	$query = '//WMT_MS_Capabilities/Capability/Layer/LatLonBoundingBox';
+	$entries = $xpath->query ( $query );
+	foreach ( $entries as $entry ) {
+		$bbox = $entry->nodeValue;
+	}
+	if ($bbox == '-1,-1,-1,-1') {
+		return '-180,-90,180,90';
+	} else {
+		return wms_bbox2txt ( $bbox );
+	}
+}
+/*
+ * wms_bbox2txt
+ *
+ * Convert a BoundingBox node into a text string de um wms.
+ */
+function wms_bbox2txt($node) {
+	//
+	// Convert a BoundingBox node into a text string.
+	//
+	if ($node) {
+		$txt .= 1 * $node->get_attribute ( "minx" );
+		$txt .= ",";
+		$txt .= 1 * $node->get_attribute ( "miny" );
+		$txt .= ",";
+		$txt .= 1 * $node->get_attribute ( "maxx" );
+		$txt .= ",";
+		$txt .= 1 * $node->get_attribute ( "maxy" );
+	} else {
+		$txt = "-180,-90,180,90";
+	}
+	return $txt;
+}
+/*
+ * wms_layer2html
+ *
+ * Convert a Layer node into an HTML representation wms.
+ */
+function wms_layer2html($node, $tipo, $layer) {
+	//
+	// Convert a Layer node into an HTML representation.
+	//
+	$ctx = xpath_new_context ( $node );
+	$xp_title = xpath_eval ( $ctx, "/Title" );
+	$xp_name = xpath_eval ( $ctx, "/Name" );
+	if (wms_xpnode2content ( $xp_name ) == "") {
+		$xp_name = xpath_eval ( $ctx, "/name" );
+	}
+	$xp_srs = xpath_eval ( $ctx, "/SRS" );
+	$xp_llbbox = xpath_eval ( $ctx, "/LatLonBoundingBox" );
+	$xp_bbox = xpath_eval ( $ctx, "/BoundingBox" );
+	$txt_title = wms_xpnode2content ( $xp_title );
+	$txt_name = wms_xpnode2content ( $xp_name );
+	$txt_srs = strtoupper ( wms_xpnode2content ( $xp_srs ) );
+	$node_llbbox = $xp_llbbox->nodeset [0];
+	$node_bbox = $xp_bbox->nodeset [0];
+	$queryable = 0;
+	if ($node->get_attribute ( "queryable" )) {
+		$queryable = 1;
+	}
+	$opaque = 0;
+	if ($node->get_attribute ( "opaque" )) {
+		$opaque = 1;
+	}
+	// legenda
+	$xp_legenda = xpath_eval ( $ctx, "/LegendURL/OnlineResource" );
+	$nodelegenda = $xp_legenda->nodeset [0];
+	if ($nodelegenda) {
+		$legenda = $nodelegenda->get_attribute ( "href" );
+	}
+
+	$html = "<INPUT TYPE='radio' NAME='checks' VALUE='$txt_name' onClick='toggle(event,\"$tipo\",\"$layer\",\"$legenda\",\"$txt_title\")'>";
+	$html .= "&nbsp;&nbsp;";
+	$html .= $txt_title . "\n";
+	$html .= wms_hidden ( "bbox_$txt_name", wms_bbox2txt ( $node_bbox ) );
+	$html .= wms_hidden ( "llbox_$txt_name", wms_bbox2txt ( $node_llbbox ) );
+	$html .= wms_hidden ( "srs_$txt_name", $txt_srs );
+	$html .= wms_hidden ( "query_$txt_name", $queryable );
+	$html .= wms_hidden ( "opaque_$txt_name", $opaque );
+	$html .= "<BR>";
+	return $html;
+}
+/*
+ * wms_layer3html
+ *
+ * Convert a Layer node into an HTML representation sem radio.
+ */
+function wms_layer3html($node) {
+	//
+	// Convert a Layer node into an HTML representation sem radio.
+	//
+	$ctx = xpath_new_context ( $node );
+	$xp_title = xpath_eval ( $ctx, "/Title" );
+	$xp_abs = xpath_eval ( $ctx, "/Abstract" );
+	$txt_title = wms_xpnode2content ( $xp_title );
+	$txt_abs = wms_xpnode2content ( $xp_abs );
+	$html .= "<b>" . $txt_title . "</b><i style='color:gray'>" . "-" . $txt_abs . "</i>\n";
+	$html .= "<BR>";
+	return $html;
+}
+/*
+ * wms_layer4html
+ *
+ * Convert a Layer into an HTML WMS.
+ */
+function wms_layer4html($layer) {
+	$estilos = wms_estilos ( $layer );
+	if (count ( $estilos ) > 0) {
+		$ctxl = xpath_new_context ( $layer );
+		$xp_namel = xpath_eval ( $ctxl, "/Name" );
+		if (wms_xpnode2content ( $xp_namel ) == "") {
+			$xp_namel = xpath_eval ( $ctxl, "/name" );
+		}
+		$txt_namel = wms_xpnode2content ( $xp_namel );
+		$html .= wms_layer3html ( $layer );
+		foreach ( $estilos as $estilo ) {
+			$html .= wms_layer2html ( $estilo, "estilo", $txt_namel );
+		}
+	} else {
+		$html .= wms_layer2html ( $layer, "tema", "" );
+	}
+	return $html;
+}
  
-				);
-			}
-		}
-	}
-	//exit;
-	return($res);
-}
-
-function imprimeEstilos($es,$suporta,$retorna,$tval,$tituloalternativo)
-{
-	foreach($es as $e)
-	{
-		//$tval = $e["titulo"];
-		$nomeestilo = $e["nome"];
-		$nomecamada = $e["titulo"];
-		//if($nomecamada == "default" || $nomecamada == "")
-		//{$nomecamada = $tituloalternativo;}
-		$tituloestilo = $e["titulo"];
-		$retorna[] = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"estilo\",\"" . $tval . "\",\"\",\"" . $nomeestilo . "\",\"".$tituloalternativo." ".$nomecamada." ".$tituloestilo."\",\"".$suporta."\")' value='" . $nomeestilo . "'/><span style=color:blue >" . $nomeestilo." <i>".$tituloestilo."</i></span><br>";
-	}
-	return $retorna;
-}
-function imprimeTag($r,$retorna)
-{
-	if(!$r["nome"])
-	{$retorna[] =  "<br><span style='color:brown;font-size:14pt' ><b>".$r["titulo"]."</b></span><br>";}
-	else
-	{
-		$retorna[] =  "<hr>";
-		$retorna[] =  "<br><span style='color:brown;font-size:12pt' ><b>".$r["nome"]."</b></span><br>";
-		$retorna[] =  "<br><span style='color:black;font-size:12pt' ><b>".$r["titulo"]."</b></span><br>";
-		$retorna[] =  "<br><span style='color:gray;font-size:9pt' >".$r["resumo"]."</span><br>";
-	}
-	return $retorna;
-}
-function pegaTag($layer)
-{
-	//error_reporting(0);
-	$noslayer = $layer->childNodes;
-	$resultado = array(
-		"estiloas" => array(),
-		"tags" => array()
-	);
-	for ($i = 0; $i < $noslayer->length; ++$i){
-		$tnome = $noslayer->item($i)->tagName;
-		$tvalor = $noslayer->item($i)->nodeValue;
-		if($tnome){
-			//echo "<br>".$tnome;
-			if ($tnome == "Title")
-			{$resultado["titulo"] = $tvalor;}
-			if ($tnome == "Name")
-			{$resultado["nome"] = $tvalor;}
-			if ($tnome == "Abstract")
-			{$resultado["resumo"] = $tvalor;}
-
-			if ($tnome == "Style"){
-				$ss = $noslayer->item($i)->childNodes;
-				$ssl = $ss->length;
-				$n = "";
-				$t = "";
-				for ($s = 0; $s < $ssl; $s++)
-				{
-					$snome = $ss->item($s)->tagName;
-					$svalor = $ss->item($s)->nodeValue;
-					if($snome)
-					{
-						if ($snome == "Title")
-						{$t=$svalor;}
-						if ($snome == "Name")
-						{$n=$svalor;}
-					}
-				}
-				//echo "<pre>";echo $n;
-				if($n != ""){
-					array_push($resultado["estilos"],array("nome"=>$n,"titulo"=>$t));
-				}
-			}
-			array_push($resultado["tags"],$tnome);
-			//echo "<pre>";var_dump($resultado);
-		}
-	}
-	return $resultado;
-}
-
-
-/*
-temaswfs
-
-Lista os temas de um web service WFS.
-
-parameters:
-$servico - Endere&ccedil;o do web service.
-
-$cp - Objeto CPAINT.
-*/
-function temaswfs()
-{
-	global $servico,$cp;
-	$teste = explode("=",$servico);
-	if ( count($teste) > 1 ){$servico = $servico."&";}
-	$wms_service_request = $servico . "REQUEST=GetCapabilities&SERVICE=WFS";
-	# -------------------------------------------------------------
-	# Test that the capabilites file has successfully downloaded.
-	#
-	if( !($wms_capabilities = file($wms_service_request)) ) {
-		# Cannot download the capabilities file.
-		$cp->set_data("Erro de acesso");
-		return;
-	}
-	$wms_capabilities = implode("",$wms_capabilities);
-	$dom = new DomDocument();
-	$dom->loadXML($wms_capabilities);
-	$services = $dom->getElementsByTagName("Service");
-	foreach ($services as $service)
-	{
-		$vs = $service->getElementsByTagName("Name");
-		$serv = "";
-		foreach ($vs as $v)
-		{$serv .= $v->nodeValue;}
-	}
-	$layers = $dom->getElementsByTagName("FeatureType");
-	foreach ($layers as $layer)
-	{
-		$vs = $layer->getElementsByTagName("Title");
-		$temp1 = "";
-		foreach ($vs as $v)
-		{$temp1 .= $v->nodeValue;}
-
-		$vs = $layer->getElementsByTagName("Abstract");
-		$temp2 = "";
-		foreach ($vs as $v)
-		{$temp2 .= $v->nodeValue;}
-
-		$vs = $layer->getElementsByTagName("SRS");
-		$temp3 = array();
-		foreach ($vs as $v)
-		{$temp3[] = $v->nodeValue;}
-		$temp3 = implode("#",$temp3);
-
-		$vs = $layer->getElementsByTagName("Name");
-		$temp = "";
-		foreach ($vs as $v)
-		{$temp .= $v->nodeValue;}
-		$temp = "<input style='cursor:pointer' type=radio NAME='checks' onClick='seltema(\"" . $temp . "\",\"" .$temp1. "\",\"" . $temp3 . "\",\"" . $serv ."\")' /><span style=color:red >" . $temp . "</span><br>";
-		$retorno .= "<br>".$temp.$temp1."<br>".$temp2."<hr>";
-	}
-	$cp->set_data($retorno);
-}
-/*
-Function: xml2html
-
-Converte caracteres XML em HTML.
-
-Parametro:
-
-$str {string} - Xml que ser&aacute; convertido
-
-Retorno:
-
-{string}
-*/
-function xml2html ( $str )
-{
-	$str = ereg_replace("&","&amp;",$str);
-	$str = ereg_replace("<","&lt;",$str);
-	$str = ereg_replace(">","&gt;<BR>",$str);
-	return $str;
-}
-/*
-wms_descricao
-
-Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (n�).
-*/
-function wms_descricao ( $dom,$xp )
-{
-	$xpath = new DOMXPath($dom);
-	$query = $xp;
-	$entries = $xpath->query($query);
-	$n = "";
-	foreach ($entries as $entry)
-	{
-		$n = $entry->nodeValue;
-	}
-	return $n;
-}
-/*
-wms_descricaov
-
-Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (atributo).
-*/
-function wms_descricaov ( $dom,$xp,$attrib )
-{
-	$xpath = new DOMXPath($dom);
-	$query = $xp;
-	$entries = $xpath->query($query);
-	$n = "";
-	foreach ($entries as $entry)
-	{
-		$n = $entry->getAttribute($attrib);
-	}
-	return $n;
-}
-/*
-wms_descricaon
-
-Retorna a descri&ccedil;&atilde;o de um servi&ccedil;o (filho de um n�).
-*/
-function wms_descricaon ( $dom,$xp,$n ) {
-	$ctx = xpath_new_context($dom);
-	$xpnode = xpath_eval($ctx,$xp);
-	$dtnode = $xpnode->nodeset[$n]->first_child();
-	return $dtnode->content;
-}
-/*
-wms_title
-
-Retorna o t&iacute;tulo de um WMS.
-*/
-function wms_title ( $dom ) {
-	#
-	# Read the WMS service title and return it as text.
-	#
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Service/Title';
-	$entries = $xpath->query($query);
-	foreach ($entries as $entry){$nomeserv = $entry->nodeValue;}
-	return $nomeserv;
-}
-/*
-wms_onlineresource
-
-Retorna o recurso on-line de um WMS.
-*/
-function wms_onlineresource ( $dom ) {
-	#
-	# Read the WMS online resource URL and return it as text.
-	#
-	$xp = "/WMT_MS_Capabilities/Service/OnlineResource";
-	$ctx = xpath_new_context($dom);
-	$xpnode = xpath_eval($ctx,$xp);
-	return $xpnode->nodeset[0]->get_attribute("href");
-}
-/*
-wms_formats
-
-Retorna os formatos de imagem de um WMS.
-*/
-function wms_formats ( $dom )
-{
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Capability/Request/GetMap/Format';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$teste = $xpath->registerNamespace("tag", "http://www.opengis.net/wms");
-		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Request/tag:GetMap/tag:Format';
-		$entries = $xpath->query($q);
-	}
-	$arr = array();
-	foreach ($entries as $entry)
-	{
-		$arr[] = $entry->nodeValue;
-	}
-	return $arr;
-}
-/*
-wms_formatsinfo
-
-Retorna os formatos existentes de retorno da op&ccedil;&atilde;o getfeatureinfo.
-*/
-function wms_formatsinfo ( $dom )
-{
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Capability/Request/GetFeatureInfo/Format';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$teste = $xpath->registerNamespace("tag", "http://www.opengis.net/wms");
-		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Request/tag:GetCapabilities/tag:Format';
-		$entries = $xpath->query($q);
-	}
-	$arr = array();
-	foreach ($entries as $entry)
-	{
-		$arr[] = $entry->nodeValue;
-	}
-	return $arr;
-}
-/*
-wms_estilos
-
-Retorna os estilos de um WMS.
-*/
-function wms_estilos ( $dom ) {
-	#
-	# Read the WMS image formats and return them as an array.
-	#
-	//$xp = "/Style";
-	//$ctx = xpath_new_context($dom);
-	//$xpnode = xpath_eval($ctx,$xp);
-	//return $xpnode->nodeset;
-	$return = $dom->getElementsByTagName("Style");
-
-}
-/*
-wms_exceptions
-
-Retorna as exceptions de um WMS.
-*/
-function wms_exceptions ( $dom ) {
-	#
-	# Read the WMS exception formats and return them as an array.
-	#
-	$xp = "/WMT_MS_Capabilities/Capability/Exception/Format";
-	$ctx = xpath_new_context($dom);
-	$xpnode = xpath_eval($ctx,$xp);
-	$arr = array();
-	for( $i = 0; $i < sizeof($xpnode->nodeset); ++$i ) {
-		$dtnode = $xpnode->nodeset[0]->first_child();
-		array_push($arr,$dtnode->content);
-	}
-	return $arr;
-}
-/*
-wms_version
-
-Retorna a versao.
-*/
-function wms_version ( $dom )
-{
-	$n = $dom->getElementsByTagName('WMT_MS_Capabilities');
-	$params = $dom->getElementsByTagName('*');
-
-	foreach ($params as $param) {
-		$v = $param -> getAttribute('version');
-		break;
-	}
-	return $v;
-}
-/*
-wms_layers
-
-Retorna os layers de um WMS.
-*/
-function wms_layers ( $dom ) {
-	#
-	# Read the WMS first level layers and return an
-	# array of nodes.
-	#
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Capability/Layer/Layer/Layer';
-	$entries = $xpath->query($query);
-	if ($entries->length == 0)
-	{
-		$query = '//WMT_MS_Capabilities/Capability/Layer';
-		$entries = $xpath->query($query);
-	}
-	else
-	{
-		$query = '//WMT_MS_Capabilities/Capability/Layer/Layer';
-		$entries = $xpath->query($query);
-	}
-	return $entries;
-}
-/*
-wms_xpnode2content
-
-Read the content child node of an element tag node WMS.
-*/
-function wms_xpnode2content( $xp_node ) {
-	#
-	# Read the content child node of an element tag
-	# node.
-	#
-	$content = "";
-	if( $xp_node->nodeset[0] ) {
-		$node = $xp_node->nodeset[0]->first_child();
-		$content = $node->content;
-	}
-	return $content;
-}
-/*
-wms_srs
-
-Retorna os SRSs WMS.
-*/
-function wms_srs( $dom )
-{
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Capability/Layer/SRS';
-	$entries = $xpath->query($query);
-	if($entries == FALSE || $entries->length == 0){
-		$teste = $xpath->registerNamespace("tag", "http://www.opengis.net/wms");
-		$q = '/tag:WMS_Capabilities/tag:Capability/tag:Layer/tag:CRS';
-		$entries = $xpath->query($q);
-	}
-
-	$srs = "";
-	//utiliza apenas os epsg do Brasil
-	$single = array();
-	foreach ($entries as $entry)
-	{
-		$arr[] = $entry->nodeValue;
-		if ($entry->nodeValue == "CRS:84")
-		{$single[] = "CRS:84";}
-		if ($entry->nodeValue == "EPSG:4326")
-		{$single[] = "EPSG:4326";}
-		if ($entry->nodeValue == "EPSG:4618")
-		{$single[] = "EPSG:4618";}
-	}
-	if (count($single) > 0)
-	{$arr = $single;}
-	return $arr;
-}
-/*
-wms_bbox
-
-Retorna o BBOX de um WMS.
-*/
-function wms_bbox( $dom )
-{
-	$xpath = new DOMXPath($dom);
-	$query = '//WMT_MS_Capabilities/Capability/Layer/LatLonBoundingBox';
-	$entries = $xpath->query($query);
-	foreach ($entries as $entry){$bbox = $entry->nodeValue;}
-	if ($bbox == '-1,-1,-1,-1')
-	{return '-180,-90,180,90';}
-	else
-	{return wms_bbox2txt($bbox);}
-}
-/*
-wms_bbox2txt
-
-Convert a BoundingBox node into a text string de um wms.
-*/
-function wms_bbox2txt( $node ) {
-	#
-	# Convert a BoundingBox node into a text string.
-	#
-	if( $node ) {
-		$txt .= 1 * $node->get_attribute("minx");
-		$txt .= ",";
-		$txt .= 1 * $node->get_attribute("miny");
-		$txt .= ",";
-		$txt .= 1 * $node->get_attribute("maxx");
-		$txt .= ",";
-		$txt .= 1 * $node->get_attribute("maxy");
-	}
-	else {
-		$txt = "-180,-90,180,90";
-	}
-	return $txt;
-}
-/*
-wms_layer2html
-
-Convert a Layer node into an HTML representation wms.
-*/
-function wms_layer2html( $node, $tipo , $layer ) {
-	#
-	# Convert a Layer node into an HTML representation.
-	#
-	$ctx = xpath_new_context($node);
-	$xp_title  = xpath_eval($ctx,"/Title");
-	$xp_name   = xpath_eval($ctx,"/Name");
-	if (wms_xpnode2content($xp_name) == ""){$xp_name = xpath_eval($ctx,"/name");}
-	$xp_srs    = xpath_eval($ctx,"/SRS");
-	$xp_llbbox = xpath_eval($ctx,"/LatLonBoundingBox");
-	$xp_bbox   = xpath_eval($ctx,"/BoundingBox");
-	$txt_title = wms_xpnode2content($xp_title);
-	$txt_name  = wms_xpnode2content($xp_name);
-	$txt_srs   = strtoupper(wms_xpnode2content($xp_srs));
-	$node_llbbox = $xp_llbbox->nodeset[0];
-	$node_bbox   = $xp_bbox->nodeset[0];
-	$queryable = 0;
-	if ( $node->get_attribute("queryable") ) {
-		$queryable = 1;
-	}
-	$opaque = 0;
-	if ( $node->get_attribute("opaque") ) {
-		$opaque = 1;
-	}
-	//legenda
-	$xp_legenda   = xpath_eval($ctx,"/LegendURL/OnlineResource");
-	$nodelegenda = $xp_legenda->nodeset[0];
-	if($nodelegenda)
-	{  $legenda = $nodelegenda->get_attribute("href");}
-
-	$html  = "<INPUT TYPE='radio' NAME='checks' VALUE='$txt_name' onClick='toggle(event,\"$tipo\",\"$layer\",\"$legenda\",\"$txt_title\")'>";
-	$html .= "&nbsp;&nbsp;";
-	$html .= $txt_title . "\n";
-	$html .= wms_hidden("bbox_$txt_name", wms_bbox2txt($node_bbox));
-	$html .= wms_hidden("llbox_$txt_name", wms_bbox2txt($node_llbbox));
-	$html .= wms_hidden("srs_$txt_name", $txt_srs);
-	$html .= wms_hidden("query_$txt_name", $queryable );
-	$html .= wms_hidden("opaque_$txt_name", $opaque );
-	$html .= "<BR>";
-	return $html;
-}
-/*
-wms_layer3html
-
-Convert a Layer node into an HTML representation sem radio.
-*/
-function wms_layer3html( $node ) {
-	#
-	# Convert a Layer node into an HTML representation sem radio.
-	#
-	$ctx = xpath_new_context($node);
-	$xp_title  = xpath_eval($ctx,"/Title");
-	$xp_abs  = xpath_eval($ctx,"/Abstract");
-	$txt_title = wms_xpnode2content($xp_title);
-	$txt_abs = wms_xpnode2content($xp_abs);
-	$html .= "<b>".$txt_title . "</b><i style='color:gray'>" . "-" . $txt_abs . "</i>\n";
-	$html .= "<BR>";
-	return $html;
-}
-/*
-wms_layer4html
-
-Convert a Layer into an HTML WMS.
-*/
-function wms_layer4html( $layer ) {
-	$estilos = wms_estilos($layer);
-	if (count($estilos) > 0)
-	{
-		$ctxl = xpath_new_context($layer);
-		$xp_namel   = xpath_eval($ctxl,"/Name");
-		if (wms_xpnode2content($xp_namel) == ""){$xp_namel = xpath_eval($ctxl,"/name");}
-		$txt_namel  = wms_xpnode2content($xp_namel);
-		$html .= wms_layer3html($layer);
-		foreach ($estilos as $estilo)
-		{
-			$html .= wms_layer2html($estilo,"estilo",$txt_namel);
-		}
-	}
-	else
-	{
-		$html .= wms_layer2html($layer,"tema","");
-	}
-	return $html;
-}
-
 ?>
@@ -31,7 +31,7 @@ i3GEOF.conectargeorss.dicionario = {
 		es : ""
 	} ],
 	'sel' : [ {
-		pt : "Digite o endere&ccedil;o do servi&ccedil;o ou escolha da lista abaixo. Utilize as guias acima para ver o resultado da conex&atilde;o",
+		pt : "Digite o endere&ccedil;o do servi&ccedil;o ou escolha da lista abaixo",
 		en : "",
 		es : ""
 	} ]
@@ -168,8 +168,12 @@ i3GEOF.conectargeorss = {
 		if (retorno.data != undefined){
 			retorno = retorno.data;
 			for (i=0;i<retorno.length; i++){
-				ins += "<div class='list-group condensed'><div class='row-content text-left'>" +
-					"<label class='nomeTema'><a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' href='javascript:void(0)'><h4>" + retorno[i].title + "</h4></a></label></div></div>";
+				ins += "<div class='list-group condensed'><div class='row-content text-left'>"
+				+ "<a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' role='button' class='btn btn-default btn-fab btn-fab-max' href='javascript:void(0)'>"
+				+ "<span class='material-icons'>visibility</span></a><label style='width:200px;' class='nomeTema' >"
+				+ "<a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' href='javascript:void(0)'><h4>"
+				+ retorno[i].title +
+				+ "</h4></a></label></div></div>";
 			}
 			$i("resultadoget").innerHTML = ins;
 		}
@@ -75,26 +75,10 @@ i3GEOF.conectarservicos =
 			);
 		},
 		wms: function(){
-			i3GEO.janela.cria(
-					"440px",
-					"400px",
-					i3GEO.configura.locaplic + "/ferramentas/conectarwms/index.htm",
-					"",
-					"",
-					"<span class='i3GeoTituloJanelaBsNolink' >" + $trad("a4") + "</span></div>",
-					"i3GEO.conectarwms",
-					false,
-					"hd",
-					"",
-					"",
-					"",
-					false,
-					"",
-					"",
-					"nao",
-					"",
-					"28"
-			);
+			i3GEO.util.scriptTag(i3GEO.configura.locaplic
+					+ "/ferramentas/conectarwms/dependencias.php",
+					"i3GEOF.conectarwms.iniciaJanelaFlutuante()",
+			"i3GEOF.conectarwms_script");
 		},
 		kml: function() {
 			i3GEO.util.scriptTag(i3GEO.configura.locaplic
@@ -0,0 +1,24 @@
+<?php
+include(dirname(__FILE__)."/../blacklist.php");
+verificaBlFerramentas(basename(dirname(__FILE__)));
+
+
+/**
+ * Carrega os programas javascript necessarios para a ferramenta
+ * Esse programa e usado na tag <script> ou com a funcao scripttag do i3Geo
+ * Alem de carregar os scripts, carrega tambem o template no formato MUSTACHE, definindo a variavel
+ * javascript i3GEOF.carregakml.MUSTACHE
+ * O template e substituido pelos valores definidos em index.js no momento da inicializacao da ferramenta
+ */
+if(extension_loaded('zlib')){
+	ob_start('ob_gzhandler');
+}
+header("Content-type: text/javascript");
+include("index.js");
+include("dicionario.js");
+echo "\n";
+
+if(extension_loaded('zlib')){
+	ob_end_flush();
+}
+?>
 \ No newline at end of file
@@ -20,6 +20,16 @@ i3GEOF.conectarwms.dicionario = {
 		en : "",
 		es : "Servicio no definido"
 	} ],
+	'listaLayers' : [ {
+		pt : "Lista as camadas do WMS",
+		en : "",
+		es : ""
+	} ],
+	'sel' : [ {
+		pt : "Digite o endere&ccedil;o do servi&ccedil;o ou escolha da lista abaixo",
+		en : "",
+		es : ""
+	} ],
 	5 : [ {
 		pt : "Ooops! Problemas ao acessar o servi&ccedil;o.",
 		en : "",
@@ -0,0 +1,34 @@
+<?php
+include_once(dirname(__FILE__)."/../safe.php");
+verificaBlFerramentas(basename(dirname(__FILE__)),$i3geoBlFerramentas,false);
+//
+//faz a busca da fun&ccedil;&atilde;o que deve ser executada
+//
+$retorno = ""; //string que ser&aacute; retornada ao browser via JSON
+switch (strtoupper($funcao)){
+/*
+Valor: ADICIONATEMAGEORSS
+
+Adiciona um tema baseado em um RSS.
+
+<Mapa->adicionaTemaGeoRSS>
+*/
+	case "ADICIONATEMAGEORSS":
+		include_once(dirname(__FILE__)."/../../classesphp/classe_mapa.php");
+		$m = new Mapa($map_file);
+		$retorno = $m->adicionaTemaGeoRSS($_GET["servico"],$dir_tmp,$locaplic,$_GET["canal"]);
+		if ($retorno != "erro"){
+			$m->salva();
+			$_SESSION["contadorsalva"]++;
+			redesenhaMapa();
+		}
+		else{
+			$retorno = "erro.Nenhum dado espacializado foi encontrado.";
+		}
+	break;
+}
+if(isset($map_file) && isset($postgis_mapa) && $map_file != ""){
+	restauraCon($map_file,$postgis_mapa);
+}
+cpjson($retorno);
+?>
 \ No newline at end of file
@@ -1,141 +0,0 @@
-<!DOCTYPE html>
-<html>
-<head>
-<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
-<meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1.0, user-scalable=0">
-<script src="../../js/i3geo.js"></script>
-<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap/css/bootstrap.min.css">
-<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap-material-design/dist/css/bootstrap-material-design.min.css">
-<link rel="stylesheet" type="text/css" href="../../css/default.css">
-</head>
-<body id="i3geo" style='background-color: #477596; height: 400px; visibility:visible' class="yui-skin-sam bd">
-		<div class='yui-navset' style='top: 0px; cursor: pointer; left: 0px; margin-left: 2px;'>
-			<ul class="yui-nav" style="border-width: 0pt 0pt 0px; border-color: rgb(240, 240, 240); border-bottom-color: white;">
-				<li>
-					<div id='guia1' style='text-align: center; left: 0px;'>
-						<a>
-							<em>Servi&ccedil;os</em>
-						</a>
-					</div>
-				</li>
-				<li>
-					<div id='guia2' style='text-align: center; left: 0px;'>
-						<a>
-							<em>Metadados</em>
-						</a>
-					</div>
-				</li>
-				<li>
-					<div id='guia3' style='text-align: center; left: 0px;'>
-						<a>
-							<em>Lista de temas</em>
-						</a>
-					</div>
-				</li>
-			</ul>
-		</div>
-
-		<div class='container-fluid bd' id="guia1obj">
-			<h5>
-				<a href="../../documentacao/ajuda/The_ArcIMS_OGC_WMS_Connector.pdf" target=blank>Veja como criar web services no ARCIMS</a>
-			</h5>
-			<h5>
-				<a href="../../documentacao/ajuda/ArcGIS9.x.html" target=blank>Veja como utilizar web services no ARCGIS</a>
-			</h5>
-			<h5>Digite o endere&ccedil;o do servi&ccedil;o ou escolha da lista abaixo. Utilize as guias acima para ver o resultado da conex&atilde;o. Por padr&atilde;o, utiliza-se a vers&atilde;o
-				1.1.0 do GetCapabilities. Voc&ecirc; pode adicionar um outro, bastando incluir no endere&ccedil;o do servi&ccedil;o "&amp;version=1.3.0" por exemplo.</h5>
-
-			<div class='form-group label-fixed condensed'>
-				<input class="form-control input-lg" type='text' id='servico' value='' />
-			</div>
-
-			<div style="width: 100%;" class='form-group label-fixed condensed'>
-				<div id=RSSwms class="input-group"></div>
-			</div>
-			<br>
-			<div id=RSSbt style="text-align: left;"></div>
-		</div>
-		<div class='container-fluid' id="guia2obj">
-			<p class=paragrafo>
-				<input type=button id="getCapabilities" value="Descri&ccedil;&atilde;o do WMS" />
-			</p>
-			<div id=resultadoget style="display: block; position: relative; top: 5px; left: 1px" class=paragrafo></div>
-		</div>
-		<div class='container-fluid' id="guia3obj">
-			<p class=paragrafo>
-				Ap&oacute;s a conex&atilde;o ser estabelecida e surgir a lista de temas, selecione a camada que ser&aacute; adicionada ao mapa.
-				<br>
-			</p>
-			<div id=textoSLD style="display: none; font-size: 10px">
-				<p class=paragrafo>
-					Opcionalmente vc pode indicar o tipo de representa&ccedil;&atilde;o que ser&aacute; utilizada.
-					<br>
-					N&atilde;o altere o tipo de representa&ccedil;&atilde;o se a camada escolhida for uma imagem (dados raster) ou se voc&ecirc; tiver d&uacute;vidas sobre ela.
-					<br>
-				</p>
-				<div class=styled-select>
-					<select id=tiporep>
-						<option value="">---</option>
-						<option value="poligonal">poligonal</option>
-						<option value="linear">linear</option>
-						<option value="pontual">pontual</option>
-					</select>
-				</div>
-			</div>
-			<div id=listatemas class=paragrafo></div>
-		</div>
-
-		<div id="aguarde">Aguarde...</div>
-
-	<script type="text/javascript" src="index.js"></script>
-	<script type="text/javascript">
-		$.material.init();
-		var b = new YAHOO.widget.Button("getCapabilities", {
-			onclick : {
-				fn : getcapabilities
-			}
-		});
-		b.addClass("rodar");
-		g_locaplic = "../..";
-		iniciaListaWS();
-		function iniciaListaWS() {
-			g_RSSwms = new Array("");
-			aguarde("block");
-
-			if (document.getElementById("RSSwms")) {
-				if (g_RSSwms.length > 0) {
-					var p = g_locaplic
-							+ "/classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss="
-							+ g_RSSwms.join("|") + "&tipo=WMS";
-					var cp = new cpaint();
-					//cp.set_debug(2)
-					cp.set_response_type("JSON");
-					cp.call(p, "listaRSSwsARRAY", mostraRetornowmsRSS);
-				}
-			}
-		}
-		function mostraRetornowmsRSS(retorno) {
-			var reg = /Erro/gi;
-			if (retorno.data.rss.search(reg) != -1) {
-				i3GEO.janela.tempoMsg("OOps! Ocorreu um erro\n" + retorno.data);
-				return;
-			}
-			var canais = retorno.data.canais;
-			var ncanais = canais.length;
-			$i("RSSbt").innerHTML = retorno.data.rss;
-			var i, ins = "";
-			ins += "<select class='form-control' size='5' onchange='registraws(this.value)' style='width:100%;' >";
-			for (i = 0; i < ncanais; i++) {
-				var caso = canais[i];
-				var valor = "'" + caso.link + "','" + caso.id_ws + "','"
-						+ caso.tipo_ws + "'";
-				ins += "<option value=" + valor + " >" + caso.title
-						+ "</option>";
-			}
-			ins += "</select>";
-			document.getElementById("RSSwms").innerHTML = ins;
-			aguarde("none");
-		}
-	</script>
-</body>
-</html>
-/*
-Title: Conex&atilde;o com WMS
-
-Acrescenta ao mapa um novo tema com base em um endere&ccedil;o de WMS
-
-O usu&aacute;rio pode indicar o endere&ccedil;o ou escolher de uma lista. A lista &eacute; pr&eacute;-definida por meio do sistema de administra&ccedil;&atilde;o
-do i3Geo.
-
-Veja:
-
-<ADICIONATEMAWMS>
-
-Arquivo:
-
-i3geo/ferramentas/conectarwms/index.js
-
-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.
-*/
-//variaveis globais
-g_tipo = ""; //tipo de tema
-g_tema = ""; //tema selecionado do ws
-g_legenda = ""; //legenda do tema
-g_nometema = ""; //nome do tema
-g_idws = "";
-g_sid = window.parent.i3GEO.configura.sid;
-var g_tipows = "";//obtido do mapfile
-//ativaGuias("");
-//mostraGuia("guia1");
-i3GEO.guias.mostraGuiaFerramenta("guia1");
-if($i("guia1")){
-	$i("guia1").onclick = function(){
-		//mostraGuia("guia1");
-		i3GEO.guias.mostraGuiaFerramenta("guia1");
-		$i("resultadoget").innerHTML = "";
-	};
+if(typeof(i3GEOF) === 'undefined'){
+	var i3GEOF = {};
 }
-if($i("guia2")){
-	$i("guia2").onclick = function(){clickGuia2();};
-}
-if($i("guia3")){
-	$i("guia3").onclick = function(){clickGuia3();};
-}
-function aguarde(valor){
-	if(document.getElementById("aguarde"))
-	document.getElementById("aguarde").style.display = valor;
-}
-/*
-Function: listaRSS
-
-Monta a lista de servi&ccedil;os WMS cadastrados no sistema de administra&ccedil;&atilde;o do i3Geo
-
-Veja:
-
-<LISTARSSWSARRAY>
  
-Parametros:
-
-g_RSS {Array} - array com a lista de RSS que cont&eacute;m a lista de WMS cadastrados. Se for um array com um &uacute;nico elemento vazio,
-ser&aacute; utilizado o endere&ccedil;o default do i3GEO (g_RSS = new Array(""))
-
-onde {Stribg} - id do elemento HTML que receber&aacute; a lista de endere&ccedil;os formatada
-*/
-function listaRSS(g_RSS,onde)
-{
-	var mostraRetornoRSS = function(retorno){
-		aguarde("none");
-		var reg = /Erro/gi;
-		if (retorno.data.rss.search(reg) != -1)
-		{
-			i3GEO.janela.tempoMsg($trad('erro',i3GEOF.conectarwms.dicionario)+"\n"+retorno.data);
-			return;
-		}
-		var canais = retorno.data.canais;
-		var ncanais = canais.length;
-		var ins = "<br>"+retorno.data.rss;
-		for (var i=0;i<ncanais; i++)
-		{
-			var caso = canais[i];
-			ins += "\<p class=clique onclick=\"registraws('"+caso.link+"','"+caso.id_ws+"','"+caso.tipo_ws+"')\" \>\<b\>"+caso.title+"\<\/b\>&nbsp;"+caso.description+"&nbsp;("+caso.author+")";
-			if(caso.nacessos > 0)
-			{
-				var pc = (parseInt(caso.nacessosok) * 100) / parseInt(caso.nacessos);
-				ins += " \<span style=color:gray \>("+$trad('disponibilidade',i3GEOF.conectarwms.dicionario)+": "+pc+"%, "+$trad('acessos',i3GEOF.conectarwms.dicionario)+": "+caso.nacessos+")\<\/span>\<\/p\>";
+/*
+Classe: i3GEOF.conectarwmsi3GEOF.conectarwms
+ */
+i3GEOF.conectarwms = {
+		IDWS: "",
+		TIPO: "",
+		TIPOWS: "WMS",
+		TEMA: "",
+		LEGENDA: "",
+		NOMETEMA: "",
+		/*
+	Variavel: aguarde
+
+	Estilo do objeto DOM com a imagem de aguarde existente no cabe&ccedil;alho da janela.
+		 */
+		aguarde: "",
+		/**
+		 * Template no formato mustache. E preenchido na carga do javascript com o programa dependencias.php
+		 */
+		MUSTACHE : "",
+		/**
+		 * Susbtitutos para o template
+		 */
+		mustacheHash : function() {
+			var dicionario = i3GEO.idioma.objetoIdioma(i3GEOF.conectarwms.dicionario);
+			return dicionario;
+		},
+		/*
+	Function: inicia
+
+	Inicia a ferramenta. &Eacute; chamado por criaJanelaFlutuante
+
+	Parametro:
+
+	iddiv {String} - id do div que receber&aacute; o conteudo HTML da ferramenta
+		 */
+		inicia: function(iddiv){
+			if(i3GEOF.conectarwms.MUSTACHE == ""){
+				$.get(i3GEO.configura.locaplic + "/ferramentas/conectarwms/template_mst.html", function(template) {
+					i3GEOF.conectarwms.MUSTACHE = template;
+					i3GEOF.conectarwms.inicia(iddiv);
+				});
+				return;
 			}
-		}
-		document.getElementById(onde).innerHTML = ins+"<br><br>";
-	};
-	if (document.getElementById(onde))
-	{
-		if (g_RSS.length > 0)
-		{
-			var p = "../../classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss="+g_RSS.join("|")+"&tipo=GEORSS";
+			$i(iddiv).innerHTML = i3GEOF.conectarwms.html();
+			var b, monta = function(retorno){
+				if (retorno.data.rss.search(/Erro/gi) != -1){
+					i3GEO.janela.tempoMsg("OOps! Ocorreu um erro\n"+retorno.data);
+					return;
+				}
+				var canais = retorno.data.canais;
+				var ncanais = canais.length;
+				var i, ins = "";
+				ins += "<select class='form-control' onchange='i3GEOF.conectarwms.registraws(this.value)' style='width:100%;' >";
+				ins += "<option value='' >---</option>";
+				for (i = 0; i < ncanais; i++) {
+					var caso = canais[i];
+					var valor = "'" + caso.link + "','"	+ caso.id_ws + "'";
+					ins += "<option value=" + valor + " >"+caso.title+"</option>";
+				}
+				ins += "</select>";
+				document.getElementById("RSSgeo").innerHTML = ins;
+			};
+
+			var p = i3GEO.configura.locaplic + "/classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss=&tipo=WMS";
 			var cp = new cpaint();
-			//cp.set_debug(2)
 			cp.set_response_type("JSON");
-			cp.call(p,"listaRSSwsARRAY",mostraRetornoRSS);
-		}
-	}
-}
-/*
-Function: getcapabilities
-
-Abre uma nova janela com o resultado da chamada GETCAPABILITIES sobre o WMS escolhido
-*/
-function getcapabilities()
-{
-	if ($i("servico").value == ""){i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));}
-	else
-	{window.open($i("servico").value+"&service=wms&request=getcapabilities&version=1.1.1");}
-}
-/*
-Function: clickGuia2
-
-Mostra as principais informa&ccedil;&otilde;es sobre o WMS escolhido tendo como fonte o getcapabilities
-
-Veja:
-
-<GETCAPABILITIES2>
-*/
-function clickGuia2()
-{
-	//mostraGuia("guia2");
-	i3GEO.guias.mostraGuiaFerramenta("guia2");
-	if ($i("servico").value == ""){i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));}
-	else
-	{
-		var metadados = function(retorno){
-			if (retorno.data != undefined)
-			{
-				aguarde("none");
-				$i("resultadoget").innerHTML = retorno.data;
+			cp.call(p,"listaRSSwsARRAY",monta);
+		},
+		/*
+	Function: html
+
+	Gera o c&oacute;digo html para apresenta&ccedil;&atilde;o das op&ccedil;&otilde;es da ferramenta
+
+	Retorno:
+
+	String com o c&oacute;digo html
+		 */
+		html:function() {
+			var ins = Mustache.render(i3GEOF.conectarwms.MUSTACHE, i3GEOF.conectarwms.mustacheHash());
+			return ins;
+		},
+		/*
+	Function: iniciaJanelaFlutuante
+
+	Cria a janela flutuante para controle da ferramenta.
+		 */
+		iniciaJanelaFlutuante: function(){
+			var minimiza,cabecalho,janela,divid,titulo;
+			if($i("i3GEOF.conectarwms")){
+				return;
 			}
-			else
-			{
-				aguarde("none");
-				$i("resultadoget").innerHTML = "<p style=color:red >"+$trad('erro',i3GEOF.conectarwms.dicionario)+"<br>";
+			//cria a janela flutuante
+			minimiza = function(){
+				i3GEO.janela.minimiza("i3GEOF.conectarwms",200);
+			};
+			titulo = "<span class='i3GeoTituloJanelaBsNolink' >" + $trad("a4") + "</span></div>";
+			janela = i3GEO.janela.cria(
+					"600px",
+					"500px",
+					"",
+					"",
+					"",
+					titulo,
+					"i3GEOF.conectarwms",
+					false,
+					"hd",
+					"",
+					minimiza,
+					"",
+					true,
+					"",
+					"",
+					"",
+					"",
+					"28"
+			);
+			divid = janela[2].id;
+			i3GEOF.conectarwms.aguarde = $i("i3GEOF.conectarwms_imagemCabecalho").style;
+			$i("i3GEOF.conectarwms_corpo").style.backgroundColor = "white";
+			i3GEOF.conectarwms.inicia(divid);
+		},
+		adiciona: function(id){
+			var url, temp, cp, p;
+			if(i3GEOF.conectarwms.aguarde.visibility === "visible"){
+				return;
 			}
-		};
-		$i("guia2obj").style.display="block";
-		aguarde("block");
-		var p = "../../classesphp/mapa_controle.php?g_sid="+g_sid+"&funcao=getcapabilities2&servico="+$i("servico").value;
-		var cp = new cpaint();
-		//cp.set_debug(2)
-		cp.set_response_type("JSON");
-		cp.call(p,"getcapabilities2",metadados);
-	}
-}
-/*
-Function: clickGuia3
-
-Lista as camadas existentes no WMS escolhido.
-
-O resultado da chamada em PHP &eacute; uma string HTML j&aacute; formatada. O "radio" aponta para a fun&ccedil;&atilde;o "adiciona"
-
-Veja:
-
-<TEMASWMS>
-*/
-function clickGuia3(codLayer)
-{
-	//mostraGuia("guia3");
-	i3GEO.guias.mostraGuiaFerramenta("guia3");
-	var listatemas = function(retorno){
-		g_idws = "";
-		aguarde("none");
-		if ((retorno.data != "erro") && (retorno.data != undefined)){
-			$i("listatemas").innerHTML = retorno.data;
-			g_tipo = ""; //tipo de tema
-			g_tema = ""; //tema selecionado do ws
-			g_legenda = ""; //legenda do tema
-			g_nometema = ""; //nome do tema
-			g_sld = "";
-			if ($i("suportasld")){
-				if ($i("suportasld").value != "nao")				{
-					if ($i("textoSLD"))
-					$i("textoSLD").style.display = "block";
+			if($i("servicoWms").value !== ""){
+				i3GEOF.conectarwms.aguarde.visibility = "visible";
+				temp = function(retorno){
+					i3GEOF.conectarwms.aguarde.visibility = "hidden";
+					i3GEO.atualiza();
+				};
+				cp = new cpaint();
+				cp.set_response_type("JSON");
+				p = i3GEO.configura.locaplic+"/ferramentas/conectarwms/exec.php?g_sid="+i3GEO.configura.sid+"&funcao=adicionaTemaGeoRSS&canal="+id+"&servico="+$i("servicoWms").value;
+				cp.call(p,"foo",temp);
+			}
+		},
+		listaLayers: function(codLayer){
+			if(i3GEOF.conectarwms.aguarde.visibility === "visible"){
+				return;
+			}
+			var listatemas = function(retorno){
+				i3GEOF.conectarwms.aguarde.visibility = "hidden";
+				i3GEOF.conectarwms.IDWS = "";
+				if ((retorno.data != "erro") && (retorno.data != undefined)){
+					$i("resultadoget").innerHTML = retorno.data;
+					i3GEOF.conectarwms.TIPO = ""; //tipo de tema
+					i3GEOF.conectarwms.TEMA = ""; //tema selecionado do ws
+					i3GEOF.conectarwms.LEGENDA = ""; //legenda do tema
+					i3GEOF.conectarwms.NOMETEMA = ""; //nome do tema
+					g_sld = "";
+					if ($i("suportasld")){
+						if ($i("suportasld").value != "nao")				{
+							if ($i("textoSLD"))
+								$i("textoSLD").style.display = "block";
+						}
+					}
+					//ativa um layer caso tenha sido enviado como um parametro no inicio da ferramenta
+					i3GEOF.conectarwms.ativaAutoLayer(codLayer);
+				}
+				else{
+					$i("resultadoget").innerHTML = "<h5 class='alert alert-danger'>"+$trad('erro',i3GEOF.conectarwms.dicionario)+"</h5>";
 				}
+			};
+			if ($i("servicoWms").value == ""){
+				i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));
 			}
-			//ativa um layer caso tenha sido enviado como um parametro no inicio da ferramenta
-			ativaAutoLayer(codLayer);
-		}
-		else{
-			//$i("listatemas").innerHTML = "erro";
-		}
-	};
-	if ($i("servico").value == ""){
-		i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));
-	}
-	else
-	{
-		$i("listatemas").innerHTML = "";
-		aguarde("block");
-		var p = "../../classesphp/mapa_controle.php?g_sid="+g_sid+"&funcao=temaswms&id_ws="+g_idws+"&servico="+$i("servico").value;
-		var cp = new cpaint();
-		//cp.set_debug(2)
-		cp.set_response_type("JSON");
-		cp.call(p,"temaswms",listatemas);
-	}
-}
-function ativaAutoLayer(codLayer){
-	if(codLayer && codLayer != ""){
-		var container, rs, nrs, i, r, codLayer1;
-		codLayer1 = codLayer.split(":");
-		if(codLayer1.length > 0){
-			codLayer1 = codLayer1[1];
-		}
-		else{
-			codLayer1 = codLayer1[0];
-		}
-		container = $i("listatemas");
-		if(container){
-			rs = container.getElementsByTagName("input");
-			nrs = rs.length;
-
-			for(i = 0; i < nrs; i++){
-				r = rs[i];
-				if(r.type === "radio" && (r.value === codLayer || r.value === codLayer1)){
-					r.onclick.call();
-					r.checked = true;
-					r.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.scrollIntoView(true);
+			else{
+				$i("resultadoget").innerHTML = "";
+				i3GEOF.conectarwms.aguarde.visibility = "visible";
+				var p = i3GEO.configura.locaplic + "/classesphp/mapa_controle.php?g_sid="+i3GEO.configura.sid+"&funcao=temaswms&id_ws="+i3GEOF.conectarwms.IDWS+"&servico="+$i("servicoWms").value;
+				var cp = new cpaint();
+				cp.set_response_type("JSON");
+				cp.call(p,"temaswms",listatemas);
+			}
+		},
+		registraws: function(nome,id_ws,tipo){
+			$i("servicoWms").value = nome;
+			if(arguments.length == 2){
+				i3GEOF.conectarwms.IDWS = id_ws;
+			}
+			else {
+				i3GEOF.conectarwms.IDWS = "";
+			}
+			i3GEOF.conectarwms.listaLayers();
+
+			i3GEOF.conectarwms.TIPO = ""; //tipo de tema
+			i3GEOF.conectarwms.TIPOWS = "WMS"; //tipo de servico
+			i3GEOF.conectarwms.TEMA = ""; //tema selecionado do ws
+			i3GEOF.conectarwms.LEGENDA = ""; //legenda do tema
+			i3GEOF.conectarwms.NOMETEMA = ""; //nome do tema
+			if(tipo){
+				i3GEOF.conectarwms.TIPOWS = tipo;
+			}
+			i3GEOF.conectarwms.listaLayers();
+		},
+		montaCanais: function(retorno){
+			var i,ins = "<h5>"+ $trad('selecionaItem',i3GEOF.conectarwms.dicionario)+"</h5>";
+			i3GEOF.conectarwms.aguarde.visibility = "hidden";
+			if (retorno.data != undefined){
+				retorno = retorno.data;
+				for (i=0;i<retorno.length; i++){
+					ins += "<div class='list-group condensed'><div class='row-content text-left'>" +
+					"<label class='nomeTema'><a onclick='i3GEOF.conectarwms.adiciona(\""+i+"\");return false;' href='javascript:void(0)'><h4>" + retorno[i].title + "</h4></a></label></div></div>";
+				}
+				$i("resultadoget").innerHTML = ins;
+			}
+			else{
+				$i("resultadoget").innerHTML = "<h5 class='alert alert-danger'>"+$trad('erro',i3GEOF.conectarwms.dicionario)+"</h5>";
+			}
+		},
+		ativaAutoLayer: function (codLayer){
+			if(codLayer && codLayer != ""){
+				var container, rs, nrs, i, r, codLayer1;
+				codLayer1 = codLayer.split(":");
+				if(codLayer1.length > 0){
+					codLayer1 = codLayer1[1];
+				}
+				else{
+					codLayer1 = codLayer1[0];
+				}
+				container = $i("resultadoget");
+				if(container){
+					rs = container.getElementsByTagName("input");
+					nrs = rs.length;
+
+					for(i = 0; i < nrs; i++){
+						r = rs[i];
+						if(r.type === "radio" && (r.value === codLayer || r.value === codLayer1)){
+							r.onclick.call();
+							r.checked = true;
+							r.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.scrollIntoView(true);
+						}
+					}
+				}
+			}
+		},
+		seltema: function(tipo,tema,legenda,nometema,nomecamada,sldflag){
+			i3GEOF.conectarwms.TIPO = tipo; //tipo de tema
+			i3GEOF.conectarwms.TIPOWS = "WMS"; //tipo de servico
+			i3GEOF.conectarwms.TEMA = tema; //tema selecionado do ws
+			i3GEOF.conectarwms.LEGENDA = legenda; //legenda do tema
+
+			if (tema != ""){
+				var retorno = function(retorno){
+					i3GEOF.conectarwms.aguarde.visibility = "hidden";
+					if(retorno.data != "ok"){
+						i3GEO.janela.tempoMsg($trad('erro2',i3GEOF.conectarwms.dicionario));aguarde("none");
+					}
+					else{
+						i3GEO.atualiza();
+					}
+				};
+				i3GEOF.conectarwms.aguarde.visibility = "visible";
+				var tiporep = "";
+				if($i("tiporep")){
+					tiporep = $i("tiporep").value;
+				}
+				var url = i3GEO.configura.locaplic + "/classesphp/mapa_controle.php?g_sid="+i3GEO.configura.sid;
+				if($i("servicoWms").value.split("?").length === 1){
+					$i("servicoWms").value = $i("servicoWms").value+"?";
+				}
+				if($i("proj").value === ""){
+					$i("proj").value = "EPSG:4326";
+				}
+				var p = "&funcao=adicionatemawms&servico="+$i("servicoWms").value+"&tema="+i3GEOF.conectarwms.tema+"&nome="+nometema+"&proj="+$i("proj").value+"&formato="+$i("formatos").value+"&tipo="+tipo+"&versao="+$i("versao").value+"&nomecamada="+nomecamada+"&tiporep="+tiporep+"&suportasld="+sldflag+"&formatosinfo="+$i("formatosinfo").value;
+				if(g_tipows == "WMS-Tile"){
+					p += "&tile=1";
+				}
+				else{
+					p += "&tile=0";
 				}
+				var cp = new cpaint();
+				cp.set_transfer_mode("POST");
+				cp.set_response_type("JSON");
+				cp.call(url,"adicionatemawms",retorno,p);
 			}
 		}
-	}
-}
-
-/*
-Function: registraws
-
-Armazena em vari&aacute;veis locais os parametros do WMS escolhido e ativa a guia 3, mostrando a lista de camadas dispon&iacute;veis
-
-Parametros:
-
-nome {string} - nome do WMS
-
-id_ws {String} - id do WMS
-*/
-function registraws(nome,id_ws,tipo)
-{
-	$i("servico").value = nome;
-	g_tipo = ""; //tipo de tema
-	g_tipows = "WMS"; //tipo de servico
-	g_tema = ""; //tema selecionado do ws
-	g_legenda = ""; //legenda do tema
-	g_nometema = ""; //nome do tema
-	if(arguments.length == 2)
-	g_idws = id_ws;
-	else
-	g_idws = "";
-	if(tipo){
-		g_tipows = tipo;
-	}
-	clickGuia3();
-}
-/*
-Function: seltema
-
-Inclui um LAYER, escolhido de um WMS, no mapa atual
-
-Veja:
-
-<ADICIONATEMAWMS>
-
-*/
-function seltema(tipo,tema,legenda,nometema,nomecamada,sldflag)
-{
-	g_tipo = tipo; //tipo de tema
-	g_tema = tema; //tema selecionado do ws
-	g_legenda = legenda; //legenda do tema
-	g_nometema = nometema; //nome do tema
-	g_nomecamada = nomecamada; //nome que vai na legenda
-	g_sld = sldflag; //suporta ou nao sld
-	if (g_tema != "")
-	{
-		var retorno = function(retorno)
-		{
-			aguarde("none");
-			if(retorno.data != "ok")
-			{i3GEO.janela.tempoMsg($trad('erro2',i3GEOF.conectarwms.dicionario));aguarde("none");}
-			else
-			{window.parent.i3GEO.atualiza();}
+};
+function seltema (tipo,tema,legenda,nometema,nomecamada,sldflag){
+	i3GEOF.conectarwms.TIPO = tipo; //tipo de tema
+	i3GEOF.conectarwms.TEMA = tema; //tema selecionado do ws
+	i3GEOF.conectarwms.LEGENDA = legenda; //legenda do tema
+
+	if (tema != ""){
+		var retorno = function(retorno)	{
+			if(retorno.data != "ok"){
+				i3GEO.janela.tempoMsg($trad('erro2',i3GEOF.conectarwms.dicionario));
+			}
+			else{
+				i3GEO.atualiza();
+			}
 		};
-		aguarde("block");
+
 		var tiporep = "";
 		if($i("tiporep")){
 			tiporep = $i("tiporep").value;
 		}
-		var url = "../../classesphp/mapa_controle.php?g_sid="+g_sid;
-		if($i("servico").value.split("?").length === 1){
-			$i("servico").value = $i("servico").value+"?";
+		var url = i3GEO.configura.locaplic + "/classesphp/mapa_controle.php?g_sid="+i3GEO.configura.sid;
+		if($i("servicoWms").value.split("?").length === 1){
+			$i("servicoWms").value = $i("servicoWms").value+"?";
 		}
 		if($i("proj").value === ""){
 			$i("proj").value = "EPSG:4326";
 		}
-		var p = "&funcao=adicionatemawms&servico="+$i("servico").value+"&tema="+g_tema+"&nome="+g_nometema+"&proj="+$i("proj").value+"&formato="+$i("formatos").value+"&tipo="+g_tipo+"&versao="+$i("versao").value+"&nomecamada="+g_nomecamada+"&tiporep="+tiporep+"&suportasld="+g_sld+"&formatosinfo="+$i("formatosinfo").value;
-		if(g_tipows == "WMS-Tile"){
+		var p = "&funcao=adicionatemawms&servico="+$i("servicoWms").value+"&tema="+tema+"&nome="+nometema
+		+"&proj="+$i("proj").value+"&formato="+$i("formatos").value
+		+"&tipo="+tipo+"&versao="+$i("versao").value
+		+"&nomecamada="+nomecamada+"&tiporep="+tiporep+"&suportasld="+sldflag+"&formatosinfo="+$i("formatosinfo").value;
+		if(i3GEOF.conectarwms.TIPOWS == "WMS-Tile"){
 			p += "&tile=1";
 		}
 		else{
@@ -321,41 +321,7 @@ function seltema(tipo,tema,legenda,nometema,nomecamada,sldflag)
 		}
 		var cp = new cpaint();
 		cp.set_transfer_mode("POST");
-		//cp.set_debug(2)
 		cp.set_response_type("JSON");
 		cp.call(url,"adicionatemawms",retorno,p);
 	}
-}
-/*
-Function abrejanelaIframe
-
-Abre uma janela flutuante contendo um iframe
-
-Parametros:
-
-w {string} - largura
-
-h {string} - altura
-
-s {string} - src do iframe
-*/
-function abrejanelaIframe(){
-	var s = "../../admin/html/webservices.html?tipo=wms";
-	var janelaeditor = i3GEO.janela.cria(
-			"1000",
-			"500",
-			s,
-			parseInt(Math.random()*100,10),
-			10,
-			s,
-			"janela"+window.parent.i3GEO.util.randomRGB(),
-			false,
-			"hd",
-			"",
-			"",
-			"",
-			true,
-			window.parent.i3GEO.configura.locaplic+"/imagens/oxygen/16x16/application-x-smb-workgroup.png"
-		);
-	YAHOO.util.Event.addListener(janelaeditor[0].close, "click", iniciaListaWS,janelaeditor[0].panel,{id:janelaeditor[0].id},true);
-}
 \ No newline at end of file
+};
 \ No newline at end of file
@@ -1,84 +0,0 @@
-<?php
-/**
- * Este programa e utilizado pela ferramenta buscainde
- * E uma copia da ferramenta conctarwms sem mostrar as guias de esolha de servico
- * Isso pq o endereco do servico e um parametro obtido em $_GET["servico"]
- */
-include (dirname(__FILE__)."/../../classesphp/sani_request.php");
-include(dirname(__FILE__)."../../ms_configura.php");
-include(dirname(__FILE__)."../blacklist.php");
-verificaBlFerramentas(basename(dirname(__FILE__)),$i3geoBlFerramentas,true);
-?>
-<html>
-
-<head>
-<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
-<link rel="stylesheet" type="text/css" href="../../css/i3geo_ferramentas6.css">
-<title></title>
-<style type="text/css" >button{background:url(../../imagens/tic.png) 98% 50% no-repeat;}</style>
-<link rel="stylesheet" type="text/css" href="../../pacotes/yui290/build/button/assets/skins/sam/button.css"/>
-<style type="text/css">
-body {
-	margin:0;
-	padding:0;border:0px;
-}
-p{
-	text-align: left;
-}
-.guiaobj {
-	background-color: white;
-	display: block;
-	height: 97%;
-	left: 0;
-	overflow: auto;
-	text-align: left;
-	top: 0;
-	width: 98%;
-}
-</style>
-</head>
-<body class="yui-skin-sam" style="background-color: white;">
-
-		<div class=guiaobj id="guia3obj" style="left:0px;display:block;">
-			<div id=listatemas style="display:block;position:relative;top:10px;left:0px;">
-			Aguarde...
-			</div>
-		</div>
-
-<input type=hidden id=servico value="<?php echo $_GET["servico"];?>" />
-
-<script type="text/javascript" src="../../classesjs/i3geo.js"></script>
-<script type="text/javascript" src="index.js"></script>
-
-<script type="text/javascript" >
-//
-//tenta pegar o codigo do layer do endereco do servico
-//
-var buscarEm = ["LAYER","LAYERS","layer","layers","tema","typename","typeName"],
-	n = buscarEm.length,
-	i,s,partes,
-	b = [],
-	codLayer = "",
-	u = window.location.href;
-
-//acrescenta novas strings
-for(i = 0; i < n; i++){
-	b.push("&" + buscarEm[i] + "=");
-	b.push("?" + buscarEm[i] + "=");
-}
-n = b.length;
-//quebra as strings pra achar o padrao
-for(i = 0; i < n; i++){
-	s = b[i];
-	partes = u.split(s);
-	if(partes.length > 1){
-		partes = partes[1].split("&");
-		codLayer = partes[0];
-	}
-}
-g_locaplic = "../..";
-//console.info(codLayer)
-clickGuia3(codLayer);
-</script>
-</body>
-</html>
@@ -0,0 +1,11 @@
+<div class="container-fluid">
+	<div class='form-group label-fixed condensed'>
+		<label class="control-label" for="servicoWms">{{{sel}}}</label>
+		<input class="form-control input-lg" type='text' id='servicoWms' value='' />
+	</div>
+	<div class='form-group label-fixed condensed'>
+		<div style="width: 100%;" class="input-group" id='RSSgeo'></div>
+	</div>
+	<button onclick="i3GEOF.conectarwms.listaLayers()" class='btn btn-primary btn-sm btn-raised'>{{{listaLayers}}}</button>
+	<div id="resultadoget" ></div>
+</div>
 \ No newline at end of file
@@ -0,0 +1,28 @@
+//+$trad(1,i3GEOF.conectarwms.dicionario)+
+i3GEOF.conectarwms.dicionario = {
+	'erro' : [ {
+		pt : "Oops! Ocorreu um erro",
+		en : "",
+		es : "¡Oops! Ocurri&oacute; un error"
+	} ],
+	'disponibilidade' : [ {
+		pt : "disponibilidade",
+		en : "",
+		es : "disponibilidad"
+	} ],
+	'acessos' : [ {
+		pt : "acessos considerados",
+		en : "",
+		es : "Accesos considerados"
+	} ],
+	'servico' : [ {
+		pt : "Servi&ccedil;o n&atilde;o definido",
+		en : "",
+		es : "Servicio no definido"
+	} ],
+	5 : [ {
+		pt : "Ooops! Problemas ao acessar o servi&ccedil;o.",
+		en : "",
+		es : "¡Oops! Problemas para acceder al servicio."
+	} ]
+};
 \ No newline at end of file
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<head>
+<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
+<meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1.0, user-scalable=0">
+<script src="../../js/i3geo.js"></script>
+<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap/css/bootstrap.min.css">
+<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap-material-design/dist/css/bootstrap-material-design.min.css">
+<link rel="stylesheet" type="text/css" href="../../css/default.css">
+</head>
+<body id="i3geo" style='background-color: #477596; height: 400px; visibility:visible' class="yui-skin-sam bd">
+		<div class='yui-navset' style='top: 0px; cursor: pointer; left: 0px; margin-left: 2px;'>
+			<ul class="yui-nav" style="border-width: 0pt 0pt 0px; border-color: rgb(240, 240, 240); border-bottom-color: white;">
+				<li>
+					<div id='guia1' style='text-align: center; left: 0px;'>
+						<a>
+							<em>Servi&ccedil;os</em>
+						</a>
+					</div>
+				</li>
+				<li>
+					<div id='guia2' style='text-align: center; left: 0px;'>
+						<a>
+							<em>Metadados</em>
+						</a>
+					</div>
+				</li>
+				<li>
+					<div id='guia3' style='text-align: center; left: 0px;'>
+						<a>
+							<em>Lista de temas</em>
+						</a>
+					</div>
+				</li>
+			</ul>
+		</div>
+
+		<div class='container-fluid bd' id="guia1obj">
+			<h5>
+				<a href="../../documentacao/ajuda/The_ArcIMS_OGC_WMS_Connector.pdf" target=blank>Veja como criar web services no ARCIMS</a>
+			</h5>
+			<h5>
+				<a href="../../documentacao/ajuda/ArcGIS9.x.html" target=blank>Veja como utilizar web services no ARCGIS</a>
+			</h5>
+			<h5>Digite o endere&ccedil;o do servi&ccedil;o ou escolha da lista abaixo. Utilize as guias acima para ver o resultado da conex&atilde;o. Por padr&atilde;o, utiliza-se a vers&atilde;o
+				1.1.0 do GetCapabilities. Voc&ecirc; pode adicionar um outro, bastando incluir no endere&ccedil;o do servi&ccedil;o "&amp;version=1.3.0" por exemplo.</h5>
+
+			<div class='form-group label-fixed condensed'>
+				<input class="form-control input-lg" type='text' id='servico' value='' />
+			</div>
+
+			<div style="width: 100%;" class='form-group label-fixed condensed'>
+				<div id=RSSwms class="input-group"></div>
+			</div>
+			<br>
+			<div id=RSSbt style="text-align: left;"></div>
+		</div>
+		<div class='container-fluid' id="guia2obj">
+			<p class=paragrafo>
+				<input type=button id="getCapabilities" value="Descri&ccedil;&atilde;o do WMS" />
+			</p>
+			<div id=resultadoget style="display: block; position: relative; top: 5px; left: 1px" class=paragrafo></div>
+		</div>
+		<div class='container-fluid' id="guia3obj">
+			<p class=paragrafo>
+				Ap&oacute;s a conex&atilde;o ser estabelecida e surgir a lista de temas, selecione a camada que ser&aacute; adicionada ao mapa.
+				<br>
+			</p>
+			<div id=textoSLD style="display: none; font-size: 10px">
+				<p class=paragrafo>
+					Opcionalmente vc pode indicar o tipo de representa&ccedil;&atilde;o que ser&aacute; utilizada.
+					<br>
+					N&atilde;o altere o tipo de representa&ccedil;&atilde;o se a camada escolhida for uma imagem (dados raster) ou se voc&ecirc; tiver d&uacute;vidas sobre ela.
+					<br>
+				</p>
+				<div class=styled-select>
+					<select id=tiporep>
+						<option value="">---</option>
+						<option value="poligonal">poligonal</option>
+						<option value="linear">linear</option>
+						<option value="pontual">pontual</option>
+					</select>
+				</div>
+			</div>
+			<div id=listatemas class=paragrafo></div>
+		</div>
+
+		<div id="aguarde">Aguarde...</div>
+
+	<script type="text/javascript" src="index.js"></script>
+	<script type="text/javascript">
+		$.material.init();
+		var b = new YAHOO.widget.Button("getCapabilities", {
+			onclick : {
+				fn : getcapabilities
+			}
+		});
+		b.addClass("rodar");
+		g_locaplic = "../..";
+		iniciaListaWS();
+		function iniciaListaWS() {
+			g_RSSwms = new Array("");
+			aguarde("block");
+
+			if (document.getElementById("RSSwms")) {
+				if (g_RSSwms.length > 0) {
+					var p = g_locaplic
+							+ "/classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss="
+							+ g_RSSwms.join("|") + "&tipo=WMS";
+					var cp = new cpaint();
+					//cp.set_debug(2)
+					cp.set_response_type("JSON");
+					cp.call(p, "listaRSSwsARRAY", mostraRetornowmsRSS);
+				}
+			}
+		}
+		function mostraRetornowmsRSS(retorno) {
+			var reg = /Erro/gi;
+			if (retorno.data.rss.search(reg) != -1) {
+				i3GEO.janela.tempoMsg("OOps! Ocorreu um erro\n" + retorno.data);
+				return;
+			}
+			var canais = retorno.data.canais;
+			var ncanais = canais.length;
+			$i("RSSbt").innerHTML = retorno.data.rss;
+			var i, ins = "";
+			ins += "<select class='form-control' size='5' onchange='registraws(this.value)' style='width:100%;' >";
+			for (i = 0; i < ncanais; i++) {
+				var caso = canais[i];
+				var valor = "'" + caso.link + "','" + caso.id_ws + "','"
+						+ caso.tipo_ws + "'";
+				ins += "<option value=" + valor + " >" + caso.title
+						+ "</option>";
+			}
+			ins += "</select>";
+			document.getElementById("RSSwms").innerHTML = ins;
+			aguarde("none");
+		}
+	</script>
+</body>
+</html>
@@ -0,0 +1,361 @@
+/*
+Title: Conex&atilde;o com WMS
+
+Acrescenta ao mapa um novo tema com base em um endere&ccedil;o de WMS
+
+O usu&aacute;rio pode indicar o endere&ccedil;o ou escolher de uma lista. A lista &eacute; pr&eacute;-definida por meio do sistema de administra&ccedil;&atilde;o
+do i3Geo.
+
+Veja:
+
+<ADICIONATEMAWMS>
+
+Arquivo:
+
+i3geo/ferramentas/conectarwms/index.js
+
+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.
+*/
+//variaveis globais
+g_tipo = ""; //tipo de tema
+g_tema = ""; //tema selecionado do ws
+g_legenda = ""; //legenda do tema
+g_nometema = ""; //nome do tema
+g_idws = "";
+g_sid = window.parent.i3GEO.configura.sid;
+var g_tipows = "";//obtido do mapfile
+//ativaGuias("");
+//mostraGuia("guia1");
+i3GEO.guias.mostraGuiaFerramenta("guia1");
+if($i("guia1")){
+	$i("guia1").onclick = function(){
+		//mostraGuia("guia1");
+		i3GEO.guias.mostraGuiaFerramenta("guia1");
+		$i("resultadoget").innerHTML = "";
+	};
+}
+if($i("guia2")){
+	$i("guia2").onclick = function(){clickGuia2();};
+}
+if($i("guia3")){
+	$i("guia3").onclick = function(){clickGuia3();};
+}
+function aguarde(valor){
+	if(document.getElementById("aguarde"))
+	document.getElementById("aguarde").style.display = valor;
+}
+/*
+Function: listaRSS
+
+Monta a lista de servi&ccedil;os WMS cadastrados no sistema de administra&ccedil;&atilde;o do i3Geo
+
+Veja:
+
+<LISTARSSWSARRAY>
+
+Parametros:
+
+g_RSS {Array} - array com a lista de RSS que cont&eacute;m a lista de WMS cadastrados. Se for um array com um &uacute;nico elemento vazio,
+ser&aacute; utilizado o endere&ccedil;o default do i3GEO (g_RSS = new Array(""))
+
+onde {Stribg} - id do elemento HTML que receber&aacute; a lista de endere&ccedil;os formatada
+*/
+function listaRSS(g_RSS,onde)
+{
+	var mostraRetornoRSS = function(retorno){
+		aguarde("none");
+		var reg = /Erro/gi;
+		if (retorno.data.rss.search(reg) != -1)
+		{
+			i3GEO.janela.tempoMsg($trad('erro',i3GEOF.conectarwms.dicionario)+"\n"+retorno.data);
+			return;
+		}
+		var canais = retorno.data.canais;
+		var ncanais = canais.length;
+		var ins = "<br>"+retorno.data.rss;
+		for (var i=0;i<ncanais; i++)
+		{
+			var caso = canais[i];
+			ins += "\<p class=clique onclick=\"registraws('"+caso.link+"','"+caso.id_ws+"','"+caso.tipo_ws+"')\" \>\<b\>"+caso.title+"\<\/b\>&nbsp;"+caso.description+"&nbsp;("+caso.author+")";
+			if(caso.nacessos > 0)
+			{
+				var pc = (parseInt(caso.nacessosok) * 100) / parseInt(caso.nacessos);
+				ins += " \<span style=color:gray \>("+$trad('disponibilidade',i3GEOF.conectarwms.dicionario)+": "+pc+"%, "+$trad('acessos',i3GEOF.conectarwms.dicionario)+": "+caso.nacessos+")\<\/span>\<\/p\>";
+			}
+		}
+		document.getElementById(onde).innerHTML = ins+"<br><br>";
+	};
+	if (document.getElementById(onde))
+	{
+		if (g_RSS.length > 0)
+		{
+			var p = "../../classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss="+g_RSS.join("|")+"&tipo=GEORSS";
+			var cp = new cpaint();
+			//cp.set_debug(2)
+			cp.set_response_type("JSON");
+			cp.call(p,"listaRSSwsARRAY",mostraRetornoRSS);
+		}
+	}
+}
+/*
+Function: getcapabilities
+
+Abre uma nova janela com o resultado da chamada GETCAPABILITIES sobre o WMS escolhido
+*/
+function getcapabilities()
+{
+	if ($i("servico").value == ""){i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));}
+	else
+	{window.open($i("servico").value+"&service=wms&request=getcapabilities&version=1.1.1");}
+}
+/*
+Function: clickGuia2
+
+Mostra as principais informa&ccedil;&otilde;es sobre o WMS escolhido tendo como fonte o getcapabilities
+
+Veja:
+
+<GETCAPABILITIES2>
+*/
+function clickGuia2()
+{
+	//mostraGuia("guia2");
+	i3GEO.guias.mostraGuiaFerramenta("guia2");
+	if ($i("servico").value == ""){i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));}
+	else
+	{
+		var metadados = function(retorno){
+			if (retorno.data != undefined)
+			{
+				aguarde("none");
+				$i("resultadoget").innerHTML = retorno.data;
+			}
+			else
+			{
+				aguarde("none");
+				$i("resultadoget").innerHTML = "<p style=color:red >"+$trad('erro',i3GEOF.conectarwms.dicionario)+"<br>";
+			}
+		};
+		$i("guia2obj").style.display="block";
+		aguarde("block");
+		var p = "../../classesphp/mapa_controle.php?g_sid="+g_sid+"&funcao=getcapabilities2&servico="+$i("servico").value;
+		var cp = new cpaint();
+		//cp.set_debug(2)
+		cp.set_response_type("JSON");
+		cp.call(p,"getcapabilities2",metadados);
+	}
+}
+/*
+Function: clickGuia3
+
+Lista as camadas existentes no WMS escolhido.
+
+O resultado da chamada em PHP &eacute; uma string HTML j&aacute; formatada. O "radio" aponta para a fun&ccedil;&atilde;o "adiciona"
+
+Veja:
+
+<TEMASWMS>
+*/
+function clickGuia3(codLayer)
+{
+	//mostraGuia("guia3");
+	i3GEO.guias.mostraGuiaFerramenta("guia3");
+	var listatemas = function(retorno){
+		g_idws = "";
+		aguarde("none");
+		if ((retorno.data != "erro") && (retorno.data != undefined)){
+			$i("listatemas").innerHTML = retorno.data;
+			g_tipo = ""; //tipo de tema
+			g_tema = ""; //tema selecionado do ws
+			g_legenda = ""; //legenda do tema
+			g_nometema = ""; //nome do tema
+			g_sld = "";
+			if ($i("suportasld")){
+				if ($i("suportasld").value != "nao")				{
+					if ($i("textoSLD"))
+					$i("textoSLD").style.display = "block";
+				}
+			}
+			//ativa um layer caso tenha sido enviado como um parametro no inicio da ferramenta
+			ativaAutoLayer(codLayer);
+		}
+		else{
+			//$i("listatemas").innerHTML = "erro";
+		}
+	};
+	if ($i("servico").value == ""){
+		i3GEO.janela.tempoMsg($trad('servico',i3GEOF.conectarwms.dicionario));
+	}
+	else
+	{
+		$i("listatemas").innerHTML = "";
+		aguarde("block");
+		var p = "../../classesphp/mapa_controle.php?g_sid="+g_sid+"&funcao=temaswms&id_ws="+g_idws+"&servico="+$i("servico").value;
+		var cp = new cpaint();
+		//cp.set_debug(2)
+		cp.set_response_type("JSON");
+		cp.call(p,"temaswms",listatemas);
+	}
+}
+function ativaAutoLayer(codLayer){
+	if(codLayer && codLayer != ""){
+		var container, rs, nrs, i, r, codLayer1;
+		codLayer1 = codLayer.split(":");
+		if(codLayer1.length > 0){
+			codLayer1 = codLayer1[1];
+		}
+		else{
+			codLayer1 = codLayer1[0];
+		}
+		container = $i("listatemas");
+		if(container){
+			rs = container.getElementsByTagName("input");
+			nrs = rs.length;
+
+			for(i = 0; i < nrs; i++){
+				r = rs[i];
+				if(r.type === "radio" && (r.value === codLayer || r.value === codLayer1)){
+					r.onclick.call();
+					r.checked = true;
+					r.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.previousElementSibling.scrollIntoView(true);
+				}
+			}
+		}
+	}
+}
+
+/*
+Function: registraws
+
+Armazena em vari&aacute;veis locais os parametros do WMS escolhido e ativa a guia 3, mostrando a lista de camadas dispon&iacute;veis
+
+Parametros:
+
+nome {string} - nome do WMS
+
+id_ws {String} - id do WMS
+*/
+function registraws(nome,id_ws,tipo)
+{
+	$i("servico").value = nome;
+	g_tipo = ""; //tipo de tema
+	g_tipows = "WMS"; //tipo de servico
+	g_tema = ""; //tema selecionado do ws
+	g_legenda = ""; //legenda do tema
+	g_nometema = ""; //nome do tema
+	if(arguments.length == 2)
+	g_idws = id_ws;
+	else
+	g_idws = "";
+	if(tipo){
+		g_tipows = tipo;
+	}
+	clickGuia3();
+}
+/*
+Function: seltema
+
+Inclui um LAYER, escolhido de um WMS, no mapa atual
+
+Veja:
+
+<ADICIONATEMAWMS>
+
+*/
+function seltema(tipo,tema,legenda,nometema,nomecamada,sldflag)
+{
+	g_tipo = tipo; //tipo de tema
+	g_tema = tema; //tema selecionado do ws
+	g_legenda = legenda; //legenda do tema
+	g_nometema = nometema; //nome do tema
+	g_nomecamada = nomecamada; //nome que vai na legenda
+	g_sld = sldflag; //suporta ou nao sld
+	if (g_tema != "")
+	{
+		var retorno = function(retorno)
+		{
+			aguarde("none");
+			if(retorno.data != "ok")
+			{i3GEO.janela.tempoMsg($trad('erro2',i3GEOF.conectarwms.dicionario));aguarde("none");}
+			else
+			{window.parent.i3GEO.atualiza();}
+		};
+		aguarde("block");
+		var tiporep = "";
+		if($i("tiporep")){
+			tiporep = $i("tiporep").value;
+		}
+		var url = "../../classesphp/mapa_controle.php?g_sid="+g_sid;
+		if($i("servico").value.split("?").length === 1){
+			$i("servico").value = $i("servico").value+"?";
+		}
+		if($i("proj").value === ""){
+			$i("proj").value = "EPSG:4326";
+		}
+		var p = "&funcao=adicionatemawms&servico="+$i("servico").value+"&tema="+g_tema+"&nome="+g_nometema+"&proj="+$i("proj").value+"&formato="+$i("formatos").value+"&tipo="+g_tipo+"&versao="+$i("versao").value+"&nomecamada="+g_nomecamada+"&tiporep="+tiporep+"&suportasld="+g_sld+"&formatosinfo="+$i("formatosinfo").value;
+		if(g_tipows == "WMS-Tile"){
+			p += "&tile=1";
+		}
+		else{
+			p += "&tile=0";
+		}
+		var cp = new cpaint();
+		cp.set_transfer_mode("POST");
+		//cp.set_debug(2)
+		cp.set_response_type("JSON");
+		cp.call(url,"adicionatemawms",retorno,p);
+	}
+}
+/*
+Function abrejanelaIframe
+
+Abre uma janela flutuante contendo um iframe
+
+Parametros:
+
+w {string} - largura
+
+h {string} - altura
+
+s {string} - src do iframe
+*/
+function abrejanelaIframe(){
+	var s = "../../admin/html/webservices.html?tipo=wms";
+	var janelaeditor = i3GEO.janela.cria(
+			"1000",
+			"500",
+			s,
+			parseInt(Math.random()*100,10),
+			10,
+			s,
+			"janela"+window.parent.i3GEO.util.randomRGB(),
+			false,
+			"hd",
+			"",
+			"",
+			"",
+			true,
+			window.parent.i3GEO.configura.locaplic+"/imagens/oxygen/16x16/application-x-smb-workgroup.png"
+		);
+	YAHOO.util.Event.addListener(janelaeditor[0].close, "click", iniciaListaWS,janelaeditor[0].panel,{id:janelaeditor[0].id},true);
+}
 \ No newline at end of file
@@ -0,0 +1,84 @@
+<?php
+/**
+ * Este programa e utilizado pela ferramenta buscainde
+ * E uma copia da ferramenta conctarwms sem mostrar as guias de esolha de servico
+ * Isso pq o endereco do servico e um parametro obtido em $_GET["servico"]
+ */
+include (dirname(__FILE__)."/../../classesphp/sani_request.php");
+include(dirname(__FILE__)."../../ms_configura.php");
+include(dirname(__FILE__)."../blacklist.php");
+verificaBlFerramentas(basename(dirname(__FILE__)),$i3geoBlFerramentas,true);
+?>
+<html>
+
+<head>
+<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
+<link rel="stylesheet" type="text/css" href="../../css/i3geo_ferramentas6.css">
+<title></title>
+<style type="text/css" >button{background:url(../../imagens/tic.png) 98% 50% no-repeat;}</style>
+<link rel="stylesheet" type="text/css" href="../../pacotes/yui290/build/button/assets/skins/sam/button.css"/>
+<style type="text/css">
+body {
+	margin:0;
+	padding:0;border:0px;
+}
+p{
+	text-align: left;
+}
+.guiaobj {
+	background-color: white;
+	display: block;
+	height: 97%;
+	left: 0;
+	overflow: auto;
+	text-align: left;
+	top: 0;
+	width: 98%;
+}
+</style>
+</head>
+<body class="yui-skin-sam" style="background-color: white;">
+
+		<div class=guiaobj id="guia3obj" style="left:0px;display:block;">
+			<div id=listatemas style="display:block;position:relative;top:10px;left:0px;">
+			Aguarde...
+			</div>
+		</div>
+
+<input type=hidden id=servico value="<?php echo $_GET["servico"];?>" />
+
+<script type="text/javascript" src="../../classesjs/i3geo.js"></script>
+<script type="text/javascript" src="index.js"></script>
+
+<script type="text/javascript" >
+//
+//tenta pegar o codigo do layer do endereco do servico
+//
+var buscarEm = ["LAYER","LAYERS","layer","layers","tema","typename","typeName"],
+	n = buscarEm.length,
+	i,s,partes,
+	b = [],
+	codLayer = "",
+	u = window.location.href;
+
+//acrescenta novas strings
+for(i = 0; i < n; i++){
+	b.push("&" + buscarEm[i] + "=");
+	b.push("?" + buscarEm[i] + "=");
+}
+n = b.length;
+//quebra as strings pra achar o padrao
+for(i = 0; i < n; i++){
+	s = b[i];
+	partes = u.split(s);
+	if(partes.length > 1){
+		partes = partes[1].split("&");
+		codLayer = partes[0];
+	}
+}
+g_locaplic = "../..";
+//console.info(codLayer)
+clickGuia3(codLayer);
+</script>
+</body>
+</html>
...	...	@@ -1855,6 +1855,7 @@ switch (strtoupper($funcao))
1855	1855	*/
1856	1856	case "TEMASWMS":
1857	1857	include_once("wmswfs.php");
	1858	+ error_reporting(0);
1858	1859	$servico = $_pg["servico"];
1859	1860	restauraCon($map_file,$postgis_mapa);
1860	1861	$retorno = temaswms();
...	...
...	...	@@ -31,7 +31,7 @@ i3GEOF.conectargeorss.dicionario = {
31	31	es : ""
32	32	} ],
33	33	'sel' : [ {
34		- pt : "Digite o endereço do serviço ou escolha da lista abaixo. Utilize as guias acima para ver o resultado da conexão",
	34	+ pt : "Digite o endereço do serviço ou escolha da lista abaixo",
35	35	en : "",
36	36	es : ""
37	37	} ]
...	...
...	...	@@ -168,8 +168,12 @@ i3GEOF.conectargeorss = {
168	168	if (retorno.data != undefined){
169	169	retorno = retorno.data;
170	170	for (i=0;i<retorno.length; i++){
171		- ins += "<div class='list-group condensed'><div class='row-content text-left'>" +
172		- "<label class='nomeTema'><a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' href='javascript:void(0)'><h4>" + retorno[i].title + "</h4></a></label></div></div>";
	171	+ ins += "<div class='list-group condensed'><div class='row-content text-left'>"
	172	+ + "<a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' role='button' class='btn btn-default btn-fab btn-fab-max' href='javascript:void(0)'>"
	173	+ + "<span class='material-icons'>visibility</span></a><label style='width:200px;' class='nomeTema' >"
	174	+ + "<a onclick='i3GEOF.conectargeorss.adiciona(\""+i+"\");return false;' href='javascript:void(0)'><h4>"
	175	+ + retorno[i].title +
	176	+ + "</h4></a></label></div></div>";
173	177	}
174	178	$i("resultadoget").innerHTML = ins;
175	179	}
...	...
...	...	@@ -75,26 +75,10 @@ i3GEOF.conectarservicos =
75	75	);
76	76	},
77	77	wms: function(){
78		- i3GEO.janela.cria(
79		- "440px",
80		- "400px",
81		- i3GEO.configura.locaplic + "/ferramentas/conectarwms/index.htm",
82		- "",
83		- "",
84		- "<span class='i3GeoTituloJanelaBsNolink' >" + $trad("a4") + "</span></div>",
85		- "i3GEO.conectarwms",
86		- false,
87		- "hd",
88		- "",
89		- "",
90		- "",
91		- false,
92		- "",
93		- "",
94		- "nao",
95		- "",
96		- "28"
97		- );
	78	+ i3GEO.util.scriptTag(i3GEO.configura.locaplic
	79	+ + "/ferramentas/conectarwms/dependencias.php",
	80	+ "i3GEOF.conectarwms.iniciaJanelaFlutuante()",
	81	+ "i3GEOF.conectarwms_script");
98	82	},
99	83	kml: function() {
100	84	i3GEO.util.scriptTag(i3GEO.configura.locaplic
...	...
...	...	@@ -0,0 +1,24 @@
	1	+<?php
	2	+include(dirname(__FILE__)."/../blacklist.php");
	3	+verificaBlFerramentas(basename(dirname(__FILE__)));
	4	+
	5	+
	6	+/**
	7	+ * Carrega os programas javascript necessarios para a ferramenta
	8	+ * Esse programa e usado na tag <script> ou com a funcao scripttag do i3Geo
	9	+ * Alem de carregar os scripts, carrega tambem o template no formato MUSTACHE, definindo a variavel
	10	+ * javascript i3GEOF.carregakml.MUSTACHE
	11	+ * O template e substituido pelos valores definidos em index.js no momento da inicializacao da ferramenta
	12	+ */
	13	+if(extension_loaded('zlib')){
	14	+ ob_start('ob_gzhandler');
	15	+}
	16	+header("Content-type: text/javascript");
	17	+include("index.js");
	18	+include("dicionario.js");
	19	+echo "\n";
	20	+
	21	+if(extension_loaded('zlib')){
	22	+ ob_end_flush();
	23	+}
	24	+?>
0	25	\ No newline at end of file
...	...
...	...	@@ -20,6 +20,16 @@ i3GEOF.conectarwms.dicionario = {
20	20	en : "",
21	21	es : "Servicio no definido"
22	22	} ],
	23	+ 'listaLayers' : [ {
	24	+ pt : "Lista as camadas do WMS",
	25	+ en : "",
	26	+ es : ""
	27	+ } ],
	28	+ 'sel' : [ {
	29	+ pt : "Digite o endereço do serviço ou escolha da lista abaixo",
	30	+ en : "",
	31	+ es : ""
	32	+ } ],
23	33	5 : [ {
24	34	pt : "Ooops! Problemas ao acessar o serviço.",
25	35	en : "",
...	...
...	...	@@ -0,0 +1,34 @@
	1	+<?php
	2	+include_once(dirname(__FILE__)."/../safe.php");
	3	+verificaBlFerramentas(basename(dirname(__FILE__)),$i3geoBlFerramentas,false);
	4	+//
	5	+//faz a busca da função que deve ser executada
	6	+//
	7	+$retorno = ""; //string que será retornada ao browser via JSON
	8	+switch (strtoupper($funcao)){
	9	+/*
	10	+Valor: ADICIONATEMAGEORSS
	11	+
	12	+Adiciona um tema baseado em um RSS.
	13	+
	14	+<Mapa->adicionaTemaGeoRSS>
	15	+*/
	16	+ case "ADICIONATEMAGEORSS":
	17	+ include_once(dirname(__FILE__)."/../../classesphp/classe_mapa.php");
	18	+ $m = new Mapa($map_file);
	19	+ $retorno = $m->adicionaTemaGeoRSS($_GET["servico"],$dir_tmp,$locaplic,$_GET["canal"]);
	20	+ if ($retorno != "erro"){
	21	+ $m->salva();
	22	+ $_SESSION["contadorsalva"]++;
	23	+ redesenhaMapa();
	24	+ }
	25	+ else{
	26	+ $retorno = "erro.Nenhum dado espacializado foi encontrado.";
	27	+ }
	28	+ break;
	29	+}
	30	+if(isset($map_file) && isset($postgis_mapa) && $map_file != ""){
	31	+ restauraCon($map_file,$postgis_mapa);
	32	+}
	33	+cpjson($retorno);
	34	+?>
0	35	\ No newline at end of file
...	...
...	...	@@ -1,141 +0,0 @@
1		-<!DOCTYPE html>
2		-<html>
3		-<head>
4		-<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
5		-<meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1.0, user-scalable=0">
6		-<script src="../../js/i3geo.js"></script>
7		-<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap/css/bootstrap.min.css">
8		-<link rel="stylesheet" type="text/css" href="../../pacotes/bootstrap-material-design/dist/css/bootstrap-material-design.min.css">
9		-<link rel="stylesheet" type="text/css" href="../../css/default.css">
10		-</head>
11		-<body id="i3geo" style='background-color: #477596; height: 400px; visibility:visible' class="yui-skin-sam bd">
12		- <div class='yui-navset' style='top: 0px; cursor: pointer; left: 0px; margin-left: 2px;'>
13		- <ul class="yui-nav" style="border-width: 0pt 0pt 0px; border-color: rgb(240, 240, 240); border-bottom-color: white;">
14		- <li>
15		- <div id='guia1' style='text-align: center; left: 0px;'>
16		- <a>
17		- <em>Serviços</em>
18		- </a>
19		- </div>
20		- </li>
21		- <li>
22		- <div id='guia2' style='text-align: center; left: 0px;'>
23		- <a>
24		- <em>Metadados</em>
25		- </a>
26		- </div>
27		- </li>
28		- <li>
29		- <div id='guia3' style='text-align: center; left: 0px;'>
30		- <a>
31		- <em>Lista de temas</em>
32		- </a>
33		- </div>
34		- </li>
35		- </ul>
36		- </div>
37		-
38		- <div class='container-fluid bd' id="guia1obj">
39		- <h5>
40		- <a href="../../documentacao/ajuda/The_ArcIMS_OGC_WMS_Connector.pdf" target=blank>Veja como criar web services no ARCIMS</a>
41		- </h5>
42		- <h5>
43		- <a href="../../documentacao/ajuda/ArcGIS9.x.html" target=blank>Veja como utilizar web services no ARCGIS</a>
44		- </h5>
45		- <h5>Digite o endereço do serviço ou escolha da lista abaixo. Utilize as guias acima para ver o resultado da conexão. Por padrão, utiliza-se a versão
46		- 1.1.0 do GetCapabilities. Você pode adicionar um outro, bastando incluir no endereço do serviço "&version=1.3.0" por exemplo.</h5>
47		-
48		- <div class='form-group label-fixed condensed'>
49		- <input class="form-control input-lg" type='text' id='servico' value='' />
50		- </div>
51		-
52		- <div style="width: 100%;" class='form-group label-fixed condensed'>
53		- <div id=RSSwms class="input-group"></div>
54		- </div>
55		- <br>
56		- <div id=RSSbt style="text-align: left;"></div>
57		- </div>
58		- <div class='container-fluid' id="guia2obj">
59		- <p class=paragrafo>
60		- <input type=button id="getCapabilities" value="Descrição do WMS" />
61		- </p>
62		- <div id=resultadoget style="display: block; position: relative; top: 5px; left: 1px" class=paragrafo></div>
63		- </div>
64		- <div class='container-fluid' id="guia3obj">
65		- <p class=paragrafo>
66		- Após a conexão ser estabelecida e surgir a lista de temas, selecione a camada que será adicionada ao mapa.
67		- <br>
68		- </p>
69		- <div id=textoSLD style="display: none; font-size: 10px">
70		- <p class=paragrafo>
71		- Opcionalmente vc pode indicar o tipo de representação que será utilizada.
72		- <br>
73		- Não altere o tipo de representação se a camada escolhida for uma imagem (dados raster) ou se você tiver dúvidas sobre ela.
74		- <br>
75		- </p>
76		- <div class=styled-select>
77		- <select id=tiporep>
78		- <option value="">---</option>
79		- <option value="poligonal">poligonal</option>
80		- <option value="linear">linear</option>
81		- <option value="pontual">pontual</option>
82		- </select>
83		- </div>
84		- </div>
85		- <div id=listatemas class=paragrafo></div>
86		- </div>
87		-
88		- <div id="aguarde">Aguarde...</div>
89		-
90		- <script type="text/javascript" src="index.js"></script>
91		- <script type="text/javascript">
92		- $.material.init();
93		- var b = new YAHOO.widget.Button("getCapabilities", {
94		- onclick : {
95		- fn : getcapabilities
96		- }
97		- });
98		- b.addClass("rodar");
99		- g_locaplic = "../..";
100		- iniciaListaWS();
101		- function iniciaListaWS() {
102		- g_RSSwms = new Array("");
103		- aguarde("block");
104		-
105		- if (document.getElementById("RSSwms")) {
106		- if (g_RSSwms.length > 0) {
107		- var p = g_locaplic
108		- + "/classesphp/wscliente.php?funcao=listaRSSwsARRAY&rss="
109		- + g_RSSwms.join("\|") + "&tipo=WMS";
110		- var cp = new cpaint();
111		- //cp.set_debug(2)
112		- cp.set_response_type("JSON");
113		- cp.call(p, "listaRSSwsARRAY", mostraRetornowmsRSS);
114		- }
115		- }
116		- }
117		- function mostraRetornowmsRSS(retorno) {
118		- var reg = /Erro/gi;
119		- if (retorno.data.rss.search(reg) != -1) {
120		- i3GEO.janela.tempoMsg("OOps! Ocorreu um erro\n" + retorno.data);
121		- return;
122		- }
123		- var canais = retorno.data.canais;
124		- var ncanais = canais.length;
125		- $i("RSSbt").innerHTML = retorno.data.rss;
126		- var i, ins = "";
127		- ins += "<select class='form-control' size='5' onchange='registraws(this.value)' style='width:100%;' >";
128		- for (i = 0; i < ncanais; i++) {
129		- var caso = canais[i];
130		- var valor = "'" + caso.link + "','" + caso.id_ws + "','"
131		- + caso.tipo_ws + "'";
132		- ins += "<option value=" + valor + " >" + caso.title
133		- + "</option>";
134		- }
135		- ins += "</select>";
136		- document.getElementById("RSSwms").innerHTML = ins;
137		- aguarde("none");
138		- }
139		- </script>
140		-</body>
141		-</html>
...	...	@@ -1,84 +0,0 @@
1		-<?php
2		-/**
3		- * Este programa e utilizado pela ferramenta buscainde
4		- * E uma copia da ferramenta conctarwms sem mostrar as guias de esolha de servico
5		- * Isso pq o endereco do servico e um parametro obtido em $_GET["servico"]
6		- */
7		-include (dirname(__FILE__)."/../../classesphp/sani_request.php");
8		-include(dirname(__FILE__)."../../ms_configura.php");
9		-include(dirname(__FILE__)."../blacklist.php");
10		-verificaBlFerramentas(basename(dirname(__FILE__)),$i3geoBlFerramentas,true);
11		-?>
12		-<html>
13		-
14		-<head>
15		-<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
16		-<link rel="stylesheet" type="text/css" href="../../css/i3geo_ferramentas6.css">
17		-<title></title>
18		-<style type="text/css" >button{background:url(../../imagens/tic.png) 98% 50% no-repeat;}</style>
19		-<link rel="stylesheet" type="text/css" href="../../pacotes/yui290/build/button/assets/skins/sam/button.css"/>
20		-<style type="text/css">
21		-body {
22		- margin:0;
23		- padding:0;border:0px;
24		-}
25		-p{
26		- text-align: left;
27		-}
28		-.guiaobj {
29		- background-color: white;
30		- display: block;
31		- height: 97%;
32		- left: 0;
33		- overflow: auto;
34		- text-align: left;
35		- top: 0;
36		- width: 98%;
37		-}
38		-</style>
39		-</head>
40		-<body class="yui-skin-sam" style="background-color: white;">
41		-
42		- <div class=guiaobj id="guia3obj" style="left:0px;display:block;">
43		- <div id=listatemas style="display:block;position:relative;top:10px;left:0px;">
44		- Aguarde...
45		- </div>
46		- </div>
47		-
48		-<input type=hidden id=servico value="<?php echo $_GET["servico"];?>" />
49		-
50		-<script type="text/javascript" src="../../classesjs/i3geo.js"></script>
51		-<script type="text/javascript" src="index.js"></script>
52		-
53		-<script type="text/javascript" >
54		-//
55		-//tenta pegar o codigo do layer do endereco do servico
56		-//
57		-var buscarEm = ["LAYER","LAYERS","layer","layers","tema","typename","typeName"],
58		- n = buscarEm.length,
59		- i,s,partes,
60		- b = [],
61		- codLayer = "",
62		- u = window.location.href;
63		-
64		-//acrescenta novas strings
65		-for(i = 0; i < n; i++){
66		- b.push("&" + buscarEm[i] + "=");
67		- b.push("?" + buscarEm[i] + "=");
68		-}
69		-n = b.length;
70		-//quebra as strings pra achar o padrao
71		-for(i = 0; i < n; i++){
72		- s = b[i];
73		- partes = u.split(s);
74		- if(partes.length > 1){
75		- partes = partes[1].split("&");
76		- codLayer = partes[0];
77		- }
78		-}
79		-g_locaplic = "../..";
80		-//console.info(codLayer)
81		-clickGuia3(codLayer);
82		-</script>
83		-</body>
84		-</html>
...	...	@@ -0,0 +1,11 @@
	1	+<div class="container-fluid">
	2	+ <div class='form-group label-fixed condensed'>
	3	+ <label class="control-label" for="servicoWms">{{{sel}}}</label>
	4	+ <input class="form-control input-lg" type='text' id='servicoWms' value='' />
	5	+ </div>
	6	+ <div class='form-group label-fixed condensed'>
	7	+ <div style="width: 100%;" class="input-group" id='RSSgeo'></div>
	8	+ </div>
	9	+ <button onclick="i3GEOF.conectarwms.listaLayers()" class='btn btn-primary btn-sm btn-raised'>{{{listaLayers}}}</button>
	10	+ <div id="resultadoget" ></div>
	11	+</div>
0	12	\ No newline at end of file
...	...