Correção na ativação de camadas que possuem parametros sql, evitando que o statu…

…s seja sempre inserido como DEFAULT

Correção na ativação de camadas que possuem parametros sql, evitando que o statu…
…s seja sempre inserido como DEFAULT
Edmar Moretti
1 parent 0922b760
Showing 6 changed files with 1796 additions and 1746 deletions Show diff stats
classesphp/classe_metaestatinfo.php
classesphp/mapa_controle.php
classesphp/mapa_inicia.php
ferramentas/parametrossql/exec.php
ferramentas/parametrossql/index.js
ms_criamapa.php
@@ -510,6 +510,7 @@ class MetaestatInfo{
             $this->nomecache = $this->nomecache . $this->nomeRandomico(5);
         }
         $arq = $this->dir_tmp."/".$this->nomecache.".map";
+
         if(!file_exists($arq)){
             $meta = $this->listaMedidaVariavel("",$id_medida_variavel);
             //evita agregar regioes qd nao e necessario
@@ -578,14 +579,14 @@ class MetaestatInfo{
                 $titulo = array();
                 //adiciona as classes novas
                 $expressao[] = "([".$item."]<=".($calc["quartil1"]).")";
-                $titulo[] = "Quartil 1: <=".$calc["quartil1"];
+                $titulo[] = "<=".round($calc["quartil1"],3);
                 $expressao[] = "(([".$item."]>".($calc["quartil1"]).")and([".$item."]<=".($calc["quartil2"])."))";
-                $titulo[] = "Quartil 2: >".$calc["quartil1"]." e <= ".$calc["quartil2"];
+                $titulo[] = "> ".round($calc["quartil1"],3)." e <= ".round($calc["quartil2"],3);
                 if($calc["quartil3"] != 0){
                     $expressao[] = "(([".$item."]>".($calc["quartil2"]).")and([".$item."]<=".($calc["quartil3"])."))";
-                    $titulo[] = "Quartil 3: >".$calc["quartil2"]." e <= ".$calc["quartil3"];
+                    $titulo[] = "> ".round($calc["quartil2"],3)." e <= ".round($calc["quartil3"],3);
                     $expressao[] = "([".$item."]>".($calc["quartil3"]).")";
-                    $titulo[] = "Quartil 4: >".$calc["quartil3"];
+                    $titulo[] = "> ".round($calc["quartil3"],3);
                 }
                 if($calc["quartil1"] > 0){
                     $classes[] = array(
@@ -736,6 +737,7 @@ class MetaestatInfo{
                 fwrite($fp,$dado."\n");
             }
         }
+
         return array("mapfile"=>$arq,"layer"=>$this->nomecache,"titulolayer"=>$titulolayer);
     }
     /**
@@ -249,6 +249,7 @@ if ($funcao == &quot;criaMapa&quot;) {
     cpjson($id);
     return;
 }
+
 if (! isset($map_file)) {
     // nesse caso &eacute; necess&aacute;rio criar o diret&oacute;rio tempor&aacute;rio e iniciar o mapa
     // $cp->set_data(array("erro"=>"linkquebrado"));
-<?php
-/*
-Title: mapa_inicia.php
-
-Inicia um novo mapa.
-
-Gera as imagens necess&aacute;rias para abrir o mapa e calcula um conjunto de vari&aacute;veis necess&aacute;rias
-ao funcionamento do i3Geo. Os dados s&atilde;o devolvidos como um objeto json. Conforme a interface
-que ser&aacute; utilizada pelo mapa, s&atilde;o feitos ajustes espec&iacute;ficos.
-
-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 copia 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/mapa_inicia.php
-*/
-
-/*
-Function: iniciaMapa
-
-Inicia um mapa e obt&eacute;m os par&acirc;metros necess&aacute;rios para o funcionamento da interface HTML.
-
-Para permitir a troca din&acirc;mica de interfaces, s&atilde;o gravados no mapfile os METADATA status e opacity, com o prefixo "ol" para OpenLayers e "gm" para Google Maps e Earth
-
-Globais:
-
-$interface - nome da interface que ser&aacute; utilizada pelo mapa padrao|openlayers|googlemaps|googleearth|flamingo . O valor de $interface &eacute; tamb&eacute;m armazenado no metadata "interface" do objeto Map, podendo ser utilizada em outros programas do i3Geo.
-
-$openid - indica se o usu&aacute;rio foi ou n&atilde;o autenticado em alguma rede social (veja i3geo/pacotes/openid)
-
-$interfacePadrao - interface definida em ms_configura.php
-
-$navegadoresLocais - array que indica quais usu&aacute;rios podem navegar no servidor
-
-$cp - Objeto CPAINT.
-
-$map_file - Arquivo map file.
-
-$mapext - Extens&atilde;o geogr&aacute;fica do mapa.
-
-$w - Largura da imagem do mapa.
-
-$h - Altura da imagem do mapa.
-
-$R_path - Vari&aacute;vel definida no arquivo ms_configura.php que indica se o software R est&aacute; instalado.
-
-$locmapserv - Vari&aacute;vel definida no arquivo ms_configura.php que indica nome do mapserver cgi.
-
-$kmlurl - url de um arquivo kml que ser&aacute; inserido no mapa. V&aacute;lido para a interface google maps
-
-Retorno:
-
-{JSON}
-
-(start code)
-
-{
-	variaveis:,
-	temas:[{
-		"name":,
-		"status":,
-		"tema":,
-		"transparency":,
-		"type":,
-		"sel":,
-		"escala":,
-		"download":,
-		"features":,
-		"connectiontype":,
-		"zoomtema":,
-		"contextoescala":,
-		"etiquetas":,
-		"identifica":,
-		"editorsql":,
-		"escondido":
-	}]
-}
-
-(end)
-*/
-function iniciaMapa()
-{
-	global $googleApiKey,$i3geoPermiteLogin, $dir_tmp, $logExec, $postgis_mapa,$statusFerramentas,$saikuUrl,$emailInstituicao,$openid,$interfacePadrao,$mensagemInicia,$kmlurl,$tituloInstituicao,$tempo,$navegadoresLocais,$locaplic,$map_file,$mapext,$w,$h,$R_path,$locmapserv,$utilizacgi,$expoeMapfile,$interface;
-	//
-	//verifica se algum tema e restrito a determinado usuario
-	//as funcoes de validacao encontram-se em funcoes_gerais.php
-	//
-	if(!function_exists("validaAcessoTemas")){
-		include_once("funcoes_gerais.php");
-	}
-	validaAcessoTemas($map_file);
-
-	if($dir_tmp != "" && isset($logExec) && $logExec["init"] == true){
-		i3GeoLog("prog: iniciaMapa interface: $interface",$dir_tmp);
-	}
-
-	if(!isset($kmlurl)){
-		$kmlurl = "";
-	}
-	//error_reporting(0);
-	if(!isset($interface)){
-		$interface = "";
-	}
-	if($interface == "openlayers"){
-		$m = ms_newMapObj($map_file);
-		$e = $m->extent;
-		$ext = ($e->minx)." ".($e->miny)." ".($e->maxx)." ".($e->maxy);
-		$c = $m->numlayers;
-		for ($i=0;$i < $c;++$i){
-			$layer = $m->getlayer($i);
-			if($layer->status == 2){
-				$layer->setmetadata("olstatus","DEFAULT");
-			}
-			else{
-				$layer->setmetadata("olstatus","OFF");
-			}
-			$layer->setmetadata("olopacity",$layer->opacity);
-			//error_log($layer->name);
-		}
-		$m->save($map_file);
-	}
-	if($interface == "googlemaps")
-	{
-		$m = ms_newMapObj($map_file);
-		$e = $m->extent;
-		$ext = ($e->minx)." ".($e->miny)." ".($e->maxx)." ".($e->maxy);
-		if($interface == "googlemaps"){
-			$m->setProjection("+proj=merc +a=6378137 +b=6378137 +lat_ts=0.0 +lon_0=0.0 +x_0=0.0 +y_0=0 +k=1.0 +units=m");
-		}
-		$c = $m->numlayers;
-		for ($i=0;$i < $c;++$i)
-		{
-			$layer = $m->getlayer($i);
-			if($layer->status == 2)
-			{$layer->setmetadata("gmstatus","DEFAULT");}
-			else
-			{$layer->setmetadata("gmstatus","OFF");}
-			$layer->setmetadata("gmopacity",$layer->opacity);
-			if($layer->name == "mundo" || $layer->name == "estados")
-			{$layer->set("status",MS_OFF);}
-			if($layer->type == MS_LAYER_POLYGON || $layer->type == MS_LAYER_RASTER)
-			{
-				if($layer->opacity == "" || $layer->opacity == 100)
-				{
-					$layer->set("opacity",50);
-				}
-			}
-			if($layer->name == "rosadosventos" || $layer->name == "copyright")
-			{$layer->set("status",MS_DELETE);}
-		}
-		$temp = $m->scalebar;
-		$temp->set("status",MS_OFF);
-		$c = $m->imagecolor;
-		$c->setrgb(255,255,255);
-		if($interface == "googleearth")
-		{
-			$m->selectOutputFormat("jpeg");
-			$of = $m->outputformat;
-			$of->set("driver","AGG/PNG");
-		}
-		else
-		{$of = $m->outputformat;}
-		$of->set("imagemode",MS_IMAGEMODE_RGBA);
-		$of->set("transparent",MS_ON);
-		$m->save($map_file);
-	}
-	$protocolo = explode("/",$_SERVER['SERVER_PROTOCOL']);
-	$protocolo = $protocolo[0];
-	$protocolo = strtolower($protocolo) . '://'.$_SERVER['SERVER_NAME'] .":". $_SERVER['SERVER_PORT'];
-	$urli3geo = str_replace("/classesphp/mapa_controle.php","",$protocolo.$_SERVER["PHP_SELF"]);
-	//altera o tamanho do query map para ficar igual ao do mapa
-	include_once("classe_mapa.php");
-	//error_reporting(0);
-	if(!function_exists("sobeAnno")){
-		include_once("funcoes_gerais.php");
-	}
-	sobeAnno($map_file);
-	$m = new Mapa($map_file);
-	if(isset($w))
-	{
-		$m->mudaQS($w,$h);
-		$m = new Mapa($map_file);
-		$m->mapa->setsize($w,$h);
-	}
-	//error_reporting(0);
-	//
-	//verifica se a legenda deve ser embebida no mapa
-	//
-	$legenda = $m->mapa->legend;
-	$legenda->set("status",MS_OFF);
-	//
-	//salva as altera&ccedil;&otilde;es feitas
-	//
-	$m->mapa->setmetadata("ows_enable_request","*");
-	$m->salva();
-	//
-	//cuidado ao mexer aqui
-	//o mapa precisa ser salvo para registrar a extens&atilde;o geogr&aacute;fica
-	//
-	//$imgo = $m->mapa->draw();
-	$imgo = $m->mapa->prepareImage();
-	$m->salva($map_file);
-	//$e = $m->mapa->extent;
-	//$ext = ($e->minx)." ".($e->miny)." ".($e->maxx)." ".($e->maxy);
-	$escalaMapa = $m->mapa->scaledenom;
-	$celula = $m->mapa->cellsize;
-	//
-	//pega os parametros de cada tema
-	//
-	$qyfile = str_replace(".map",".qy",$map_file);
-	$arqsel = (file_exists($qyfile)) ? true : false;
-	$m = New Mapa($map_file,$locaplic);
-	$temas = $m->parametrosTemas();
-	$versao = versao();
-	$temp = $m->mapa->scalebar;
-	$temp->set("status",MS_OFF);
-	$of = $m->mapa->outputformat;
-	$of->set("imagemode",MS_IMAGEMODE_RGBA);
-	$of->setOption("QUANTIZE_FORCE","OFF");
-	$of->set("driver","AGG/PNG");
-	$m->mapa->setmetadata("interface",$interface);
-	$m->salva();
-	$nomes = nomeRandomico(12);
-	if($imgo->imagepath == "")
-	{echo "Erro IMAGEPATH vazio";exit;}
-	$nomer = ($imgo->imagepath)."mapa".$nomes.".png";
-	//$imgo->saveImage($nomer);
-	if (isset($utilizacgi) && strtolower($utilizacgi) == "sim")
-	{$nomer = $locmapserv."?map=".$map_file."&mode=map";}
-	else
-	{$nomer = ($imgo->imageurl).basename($nomer);}
-	//pega a cor de fundo do mapa
-	$c = $m->mapa->imagecolor;
-	$cordefundo = $c->red.",".$c->green.",".$c->blue;
-	//pega o texto de copyright
-	$copyright = "";
-	$lc = @$m->mapa->getlayerbyname("copyright");
-	if($lc != "" && $lc->status == MS_DEFAULT ){
-		if($versao["principal"] >= 6){
-			$shape = $lc->getShape(new resultObj(0));
-			$copyright = $shape->text;
-		}
-		else{
-			$shape = $lc->getfeature(0,-1);
-			$copyright = $shape->text;
-		}
-	}
-	$res["editor"] = "nao";
-	//
-	//papeis do usuario se estiver logado
-	//
-	$res["papeis"] = array();
-	$logado = "nao";
-	$res["i3geoPermiteLogin"] = "sim";
-	if(isset($i3geoPermiteLogin) && $i3geoPermiteLogin == false){
-		$_COOKIE = array();
-		$res["i3geoPermiteLogin"] = "nao";
-	}
-	if(!empty($_COOKIE["i3geocodigologin"])){
-		session_write_close();
-		session_name("i3GeoLogin");
-		session_id($_COOKIE["i3geocodigologin"]);
-		session_start();
-		//var_dump($_SESSION);exit;
-		$logado = "sim";
-		if(!empty($_SESSION["usuario"]) && $_SESSION["usuario"] == $_COOKIE["i3geousuariologin"]){
-			$res["papeis"] = $_SESSION["papeis"];
-		}
-		else{
-			$logado = "nao";
-		}
-		//verifica se o usuario logado pode ver as opcoes de edicao do sistema de admin dentro do mapa
-		foreach($res["papeis"] as $p){
-			if($p < 3){
-				$res["editor"] = "sim";
-			}
-		}
-	}
-	//
-	$res["mapexten"] = $ext;
-	$res["mapscale"] = $escalaMapa;
-	$res["mapres"] = $m->mapa->resolution;
-	$res["pixelsize"] = $celula;
-	//TODO depreciar na documentacao e ms_configura
-	/*
-	if ((isset($expoeMapfile)) && ($expoeMapfile == "nao"))
-	{$res["mapfile"] = "";}
-	else
-	{$res["mapfile"] = $map_file;}
-	*/
-	$res["mapfile"] = "";
-	$res["cgi"] = "";//$locmapserv;
-	$res["extentTotal"] = $ext;
-	$res["mapimagem"] = "";//$nomer;
-	$geoip = "nao";
-	if (file_exists($locaplic."/pacotes/geoip") && file_exists($locaplic."/pacotes/geoip/GeoLiteCity.dat"))
-	{$geoip = "sim";}
-	$res["geoip"] = $geoip;
-	$res["listavisual"] = (file_exists($locaplic."/imagens/visual")) ? implode(",",listaDiretorios($locaplic."/imagens/visual")) : "";
-	//TODO depreciar na documentacao
-	$res["utilizacgi"] = "nao";//$utilizacgi;
-	$res["versaoms"] = $versao["principal"];
-	$res["versaomscompleta"] = $versao["completa"];
-    $res["versaoint"] = $versao["inteiro"];
-	$res["mensagens"] = $m->pegaMensagens();
-	$res["r"] = (isset($R_path)) ? "sim" : "nao";
-	$res["extentref"] = "";
-	$res["kmlurl"] = $kmlurl;
-	$res["mensageminicia"] = $mensagemInicia;
-	$res["interfacePadrao"] = $interfacePadrao;
-	$res["w"] = $w;
-	$res["h"] = $h;
-	$res["titulo"] = $tituloInstituicao;
-	$res["tempo"] = microtime(1) - $tempo;
-	$res["erro"] = '';
-	$res["mappath"] = "";//$imgo->imagepath;
-	$res["mapurl"] = "";//$imgo->imageurl;
-	$res["navegacaoDir"] = $navegadoresLocais;
-	if($openid == true)
-	{$res["autenticadoopenid"] = "sim";}
-	else
-	{$res["autenticadoopenid"] = "nao";}
-	$res["emailInstituicao"] = $emailInstituicao;
-	$res["cordefundo"] = $cordefundo;
-	$res["copyright"] = $copyright;
-	$res["logado"] = $logado;
-	$res["saikuUrl"] = $saikuUrl;
-	$res["statusFerramentas"] = $statusFerramentas;
-	$res["googleApiKey"] = $googleApiKey;
-	//parametros de inicializacao armazenados com o mapa quando o usuario utiliza a opcao de salvar mapa no nbanco de dados
-	$customizacoesinit = $m->mapa->getmetadata("CUSTOMIZACOESINIT");
-	$res["editavel"] = $m->mapa->getmetadata("EDITAVEL");
-	$m->mapa->setmetadata("CUSTOMIZACOESINIT","");
-	$m->salva();
-	restauraCon($map_file,$postgis_mapa);
-	copy($map_file,(str_replace(".map","reinc.map",$map_file)));
-	copy($map_file,(str_replace(".map","seguranca.map",$map_file)));
-	ob_clean();
-	cpjson(array("variaveis"=>$res,"temas"=>$temas,"customizacoesinit"=>$customizacoesinit));
-}
+<?php
+
+/*
+ * Title: mapa_inicia.php
+ *
+ * Inicia um novo mapa.
+ *
+ * Gera as imagens necess&aacute;rias para abrir o mapa e calcula um conjunto de vari&aacute;veis necess&aacute;rias
+ * ao funcionamento do i3Geo. Os dados s&atilde;o devolvidos como um objeto json. Conforme a interface
+ * que ser&aacute; utilizada pelo mapa, s&atilde;o feitos ajustes espec&iacute;ficos.
+ *
+ * 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 copia 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/mapa_inicia.php
+ */
+
+/*
+ * Function: iniciaMapa
+ *
+ * Inicia um mapa e obt&eacute;m os par&acirc;metros necess&aacute;rios para o funcionamento da interface HTML.
+ *
+ * Para permitir a troca din&acirc;mica de interfaces, s&atilde;o gravados no mapfile os METADATA status e opacity, com o prefixo "ol" para OpenLayers e "gm" para Google Maps e Earth
+ *
+ * Globais:
+ *
+ * $interface - nome da interface que ser&aacute; utilizada pelo mapa padrao|openlayers|googlemaps|googleearth|flamingo . O valor de $interface &eacute; tamb&eacute;m armazenado no metadata "interface" do objeto Map, podendo ser utilizada em outros programas do i3Geo.
+ *
+ * $openid - indica se o usu&aacute;rio foi ou n&atilde;o autenticado em alguma rede social (veja i3geo/pacotes/openid)
+ *
+ * $interfacePadrao - interface definida em ms_configura.php
+ *
+ * $navegadoresLocais - array que indica quais usu&aacute;rios podem navegar no servidor
+ *
+ * $cp - Objeto CPAINT.
+ *
+ * $map_file - Arquivo map file.
+ *
+ * $mapext - Extens&atilde;o geogr&aacute;fica do mapa.
+ *
+ * $w - Largura da imagem do mapa.
+ *
+ * $h - Altura da imagem do mapa.
+ *
+ * $R_path - Vari&aacute;vel definida no arquivo ms_configura.php que indica se o software R est&aacute; instalado.
+ *
+ * $locmapserv - Vari&aacute;vel definida no arquivo ms_configura.php que indica nome do mapserver cgi.
+ *
+ * $kmlurl - url de um arquivo kml que ser&aacute; inserido no mapa. V&aacute;lido para a interface google maps
+ *
+ * Retorno:
+ *
+ * {JSON}
+ *
+ * (start code)
+ *
+ * {
+ * variaveis:,
+ * temas:[{
+ * "name":,
+ * "status":,
+ * "tema":,
+ * "transparency":,
+ * "type":,
+ * "sel":,
+ * "escala":,
+ * "download":,
+ * "features":,
+ * "connectiontype":,
+ * "zoomtema":,
+ * "contextoescala":,
+ * "etiquetas":,
+ * "identifica":,
+ * "editorsql":,
+ * "escondido":
+ * }]
+ * }
+ *
+ * (end)
+ */
+function iniciaMapa()
+{
+    global $googleApiKey, $i3geoPermiteLogin, $dir_tmp, $logExec, $postgis_mapa, $statusFerramentas, $saikuUrl, $emailInstituicao, $openid, $interfacePadrao, $mensagemInicia, $kmlurl, $tituloInstituicao, $tempo, $navegadoresLocais, $locaplic, $map_file, $mapext, $w, $h, $R_path, $locmapserv, $utilizacgi, $expoeMapfile, $interface;
+    //
+    // verifica se algum tema e restrito a determinado usuario
+    // as funcoes de validacao encontram-se em funcoes_gerais.php
+    //
+    if (! function_exists("validaAcessoTemas")) {
+        include_once ("funcoes_gerais.php");
+    }
+    validaAcessoTemas($map_file);
+
+    if ($dir_tmp != "" && isset($logExec) && $logExec["init"] == true) {
+        i3GeoLog("prog: iniciaMapa interface: $interface", $dir_tmp);
+    }
+
+    if (! isset($kmlurl)) {
+        $kmlurl = "";
+    }
+    // error_reporting(0);
+    if (! isset($interface)) {
+        $interface = "";
+    }
+    if ($interface == "openlayers") {
+        $m = ms_newMapObj($map_file);
+        $e = $m->extent;
+        $ext = ($e->minx) . " " . ($e->miny) . " " . ($e->maxx) . " " . ($e->maxy);
+        $c = $m->numlayers;
+        for ($i = 0; $i < $c; ++ $i) {
+            $layer = $m->getlayer($i);
+            if ($layer->status == 2) {
+                $layer->setmetadata("olstatus", "DEFAULT");
+            } else {
+                $layer->setmetadata("olstatus", "OFF");
+            }
+            $layer->setmetadata("olopacity", $layer->opacity);
+            // error_log($layer->name);
+        }
+        $m->save($map_file);
+    }
+    if ($interface == "googlemaps") {
+        $m = ms_newMapObj($map_file);
+        $e = $m->extent;
+        $ext = ($e->minx) . " " . ($e->miny) . " " . ($e->maxx) . " " . ($e->maxy);
+        if ($interface == "googlemaps") {
+            $m->setProjection("+proj=merc +a=6378137 +b=6378137 +lat_ts=0.0 +lon_0=0.0 +x_0=0.0 +y_0=0 +k=1.0 +units=m");
+        }
+        $c = $m->numlayers;
+        for ($i = 0; $i < $c; ++ $i) {
+            $layer = $m->getlayer($i);
+            if ($layer->status == 2) {
+                $layer->setmetadata("gmstatus", "DEFAULT");
+            } else {
+                $layer->setmetadata("gmstatus", "OFF");
+            }
+            $layer->setmetadata("gmopacity", $layer->opacity);
+            if ($layer->name == "mundo" || $layer->name == "estados") {
+                $layer->set("status", MS_OFF);
+            }
+            if ($layer->type == MS_LAYER_POLYGON || $layer->type == MS_LAYER_RASTER) {
+                if ($layer->opacity == "" || $layer->opacity == 100) {
+                    $layer->set("opacity", 50);
+                }
+            }
+            if ($layer->name == "rosadosventos" || $layer->name == "copyright") {
+                $layer->set("status", MS_DELETE);
+            }
+        }
+        $temp = $m->scalebar;
+        $temp->set("status", MS_OFF);
+        $c = $m->imagecolor;
+        $c->setrgb(255, 255, 255);
+        if ($interface == "googleearth") {
+            $m->selectOutputFormat("jpeg");
+            $of = $m->outputformat;
+            $of->set("driver", "AGG/PNG");
+        } else {
+            $of = $m->outputformat;
+        }
+        $of->set("imagemode", MS_IMAGEMODE_RGBA);
+        $of->set("transparent", MS_ON);
+        $m->save($map_file);
+    }
+    $protocolo = explode("/", $_SERVER['SERVER_PROTOCOL']);
+    $protocolo = $protocolo[0];
+    $protocolo = strtolower($protocolo) . '://' . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'];
+    $urli3geo = str_replace("/classesphp/mapa_controle.php", "", $protocolo . $_SERVER["PHP_SELF"]);
+    // altera o tamanho do query map para ficar igual ao do mapa
+    include_once ("classe_mapa.php");
+    // error_reporting(0);
+    if (! function_exists("sobeAnno")) {
+        include_once ("funcoes_gerais.php");
+    }
+    sobeAnno($map_file);
+    $m = new Mapa($map_file);
+    if (isset($w)) {
+        $m->mudaQS($w, $h);
+        $m = new Mapa($map_file);
+        $m->mapa->setsize($w, $h);
+    }
+    // error_reporting(0);
+    //
+    // verifica se a legenda deve ser embebida no mapa
+    //
+    $legenda = $m->mapa->legend;
+    $legenda->set("status", MS_OFF);
+    //
+    // salva as altera&ccedil;&otilde;es feitas
+    //
+    $m->mapa->setmetadata("ows_enable_request", "*");
+    $m->salva();
+    //
+    // cuidado ao mexer aqui
+    // o mapa precisa ser salvo para registrar a extens&atilde;o geogr&aacute;fica
+    //
+    // $imgo = $m->mapa->draw();
+    $imgo = $m->mapa->prepareImage();
+    $m->salva($map_file);
+    // $e = $m->mapa->extent;
+    // $ext = ($e->minx)." ".($e->miny)." ".($e->maxx)." ".($e->maxy);
+    $escalaMapa = $m->mapa->scaledenom;
+    $celula = $m->mapa->cellsize;
+    //
+    // pega os parametros de cada tema
+    //
+    $qyfile = str_replace(".map", ".qy", $map_file);
+    $arqsel = (file_exists($qyfile)) ? true : false;
+    $m = new Mapa($map_file, $locaplic);
+    $temas = $m->parametrosTemas();
+    $versao = versao();
+    $temp = $m->mapa->scalebar;
+    $temp->set("status", MS_OFF);
+    $of = $m->mapa->outputformat;
+    $of->set("imagemode", MS_IMAGEMODE_RGBA);
+    $of->setOption("QUANTIZE_FORCE", "OFF");
+    $of->set("driver", "AGG/PNG");
+    $m->mapa->setmetadata("interface", $interface);
+    $m->salva();
+    $nomes = nomeRandomico(12);
+    if ($imgo->imagepath == "") {
+        echo "Erro IMAGEPATH vazio";
+        exit();
+    }
+    $nomer = ($imgo->imagepath) . "mapa" . $nomes . ".png";
+    // $imgo->saveImage($nomer);
+    if (isset($utilizacgi) && strtolower($utilizacgi) == "sim") {
+        $nomer = $locmapserv . "?map=" . $map_file . "&mode=map";
+    } else {
+        $nomer = ($imgo->imageurl) . basename($nomer);
+    }
+    // pega a cor de fundo do mapa
+    $c = $m->mapa->imagecolor;
+    $cordefundo = $c->red . "," . $c->green . "," . $c->blue;
+    // pega o texto de copyright
+    $copyright = "";
+    $lc = @$m->mapa->getlayerbyname("copyright");
+    if ($lc != "" && $lc->status == MS_DEFAULT) {
+        if ($versao["principal"] >= 6) {
+            $shape = $lc->getShape(new resultObj(0));
+            $copyright = $shape->text;
+        } else {
+            $shape = $lc->getfeature(0, - 1);
+            $copyright = $shape->text;
+        }
+    }
+    $res["editor"] = "nao";
+    //
+    // papeis do usuario se estiver logado
+    //
+    $res["papeis"] = array();
+    $logado = "nao";
+    $res["i3geoPermiteLogin"] = "sim";
+    if (isset($i3geoPermiteLogin) && $i3geoPermiteLogin == false) {
+        $_COOKIE = array();
+        $res["i3geoPermiteLogin"] = "nao";
+    }
+    if (! empty($_COOKIE["i3geocodigologin"])) {
+        session_write_close();
+        session_name("i3GeoLogin");
+        session_id($_COOKIE["i3geocodigologin"]);
+        session_start();
+        // var_dump($_SESSION);exit;
+        $logado = "sim";
+        if (! empty($_SESSION["usuario"]) && $_SESSION["usuario"] == $_COOKIE["i3geousuariologin"]) {
+            $res["papeis"] = $_SESSION["papeis"];
+        } else {
+            $logado = "nao";
+        }
+        // verifica se o usuario logado pode ver as opcoes de edicao do sistema de admin dentro do mapa
+        foreach ($res["papeis"] as $p) {
+            if ($p < 3) {
+                $res["editor"] = "sim";
+            }
+        }
+    }
+    //
+    $res["mapexten"] = $ext;
+    $res["mapscale"] = $escalaMapa;
+    $res["mapres"] = $m->mapa->resolution;
+    $res["pixelsize"] = $celula;
+    // TODO depreciar na documentacao e ms_configura
+    /*
+     * if ((isset($expoeMapfile)) && ($expoeMapfile == "nao"))
+     * {$res["mapfile"] = "";}
+     * else
+     * {$res["mapfile"] = $map_file;}
+     */
+    $res["mapfile"] = "";
+    $res["cgi"] = ""; // $locmapserv;
+    $res["extentTotal"] = $ext;
+    $res["mapimagem"] = ""; // $nomer;
+    $geoip = "nao";
+    if (file_exists($locaplic . "/pacotes/geoip") && file_exists($locaplic . "/pacotes/geoip/GeoLiteCity.dat")) {
+        $geoip = "sim";
+    }
+    $res["geoip"] = $geoip;
+    $res["listavisual"] = (file_exists($locaplic . "/imagens/visual")) ? implode(",", listaDiretorios($locaplic . "/imagens/visual")) : "";
+    // TODO depreciar na documentacao
+    $res["utilizacgi"] = "nao"; // $utilizacgi;
+    $res["versaoms"] = $versao["principal"];
+    $res["versaomscompleta"] = $versao["completa"];
+    $res["versaoint"] = $versao["inteiro"];
+    $res["mensagens"] = $m->pegaMensagens();
+    $res["r"] = (isset($R_path)) ? "sim" : "nao";
+    $res["extentref"] = "";
+    $res["kmlurl"] = $kmlurl;
+    $res["mensageminicia"] = $mensagemInicia;
+    $res["interfacePadrao"] = $interfacePadrao;
+    $res["w"] = $w;
+    $res["h"] = $h;
+    $res["titulo"] = $tituloInstituicao;
+    $res["tempo"] = microtime(1) - $tempo;
+    $res["erro"] = '';
+    $res["mappath"] = ""; // $imgo->imagepath;
+    $res["mapurl"] = ""; // $imgo->imageurl;
+    $res["navegacaoDir"] = $navegadoresLocais;
+    if ($openid == true) {
+        $res["autenticadoopenid"] = "sim";
+    } else {
+        $res["autenticadoopenid"] = "nao";
+    }
+    $res["emailInstituicao"] = $emailInstituicao;
+    $res["cordefundo"] = $cordefundo;
+    $res["copyright"] = $copyright;
+    $res["logado"] = $logado;
+    $res["saikuUrl"] = $saikuUrl;
+    $res["statusFerramentas"] = $statusFerramentas;
+    $res["googleApiKey"] = $googleApiKey;
+    // parametros de inicializacao armazenados com o mapa quando o usuario utiliza a opcao de salvar mapa no nbanco de dados
+    $customizacoesinit = $m->mapa->getmetadata("CUSTOMIZACOESINIT");
+    $res["editavel"] = $m->mapa->getmetadata("EDITAVEL");
+    $m->mapa->setmetadata("CUSTOMIZACOESINIT", "");
+    $m->salva();
+    restauraCon($map_file, $postgis_mapa);
+    copy($map_file, (str_replace(".map", "reinc.map", $map_file)));
+    copy($map_file, (str_replace(".map", "seguranca.map", $map_file)));
+    ob_clean();
+    cpjson(array(
+        "variaveis" => $res,
+        "temas" => $temas,
+        "customizacoesinit" => $customizacoesinit
+    ));
+}
 ?>
@@ -99,7 +99,9 @@ switch (strtoupper($funcao))
 						}
 						$layer->set("data",$data);
 					}
-					$layer->set("status",MS_DEFAULT);
+					if(isset($_GET["ativacamada"])){
+					   $layer->set("status",MS_DEFAULT);
+					}
 					$layer->setmetadata("PLUGINI3GEO",'{"plugin":"parametrossql","ativo":"sim"}');
 					$layer->setmetadata("TEMA",$layer1->getmetadata("TEMA")." - ".$titulos);
 					//$layer->set("name","plugin".nomeRandomico());
@@ -163,6 +163,7 @@ i3GEOF.parametrossql = {
 			};
 			p = i3GEO.configura.locaplic+"/ferramentas/parametrossql/exec.php?g_sid="+i3GEO.configura.sid
 				+ "&funcao=aplicar"
+				+ "&ativacamada=sim"
 				+ "&tema=" + camada.name
 				+ "&chaves=&valores=" + par.join(",");
 			cp = new cpaint();
-<?php
-/*
-Title: Inicializa o i3Geo via URL ms_criamapa.php
-
-Esse &eacute; o programa principal de inicializa&ccedil;&atilde;o, podendo ser chamado diretamente pelo navegador web.
-
-Cria os diret&oacute;rios tempor&aacute;rios em ms_tmp, incluindo o mapfile (http://mapserver.org/mapfile/index.html#mapfile) que ser&aacute; a base para o funcionamento do mapa.
-
-Com o uso de par&acirc;metros &eacute; poss&iacute;vel alterar o processo padr&atilde;o de cria&ccedil;&atilde;o do mapa, como por exemplo, podem ser adicionadas novas camadas ou modificada a abrang&ecirc;ncia espacial do mapa.
-
-A inicializa&ccedil;&atilde;o padr&atilde;o abrir&aacute; uma interface HTML com todas as funcionalidades dispon&iacute;veis, por&eacute;m &eacute; poss&iacute;vel escolher qualquer outro HTML para a apresenta&ccedil;&atilde;o do mapa.
-
-No diret&oacute;rio i3geo/interface est&atilde;o os arquivos HTML que formatam a apresenta&ccedil;&atilde;o do mapa. Al&eacute;m desses arquivos, podem ser criados outros, conforme a necessidade do usu&aacute;rio.
-
-Os par&acirc;metros podem ser utilizados na chamada do i3geo via navegador, p.e.,
-
-http://localhost/i3geo/ms_criamapa.php?temasa=estadosl
-
-A ordem dos par&acirc;metros n&atilde;o &eacute; importante, mas o primeiro deve ser precedido de "?". Os demais par&acirc;metros devem ser acrescentados sempre precedidos de "&", p.e.,
-
-http://localhost/i3geo/ms_criamapa.php?temasa=estadosl bioma&layers=estadosl bioma
-
-Caso a inicializa&ccedil;&atilde;o do i3geo ocorra por um outro programa PHP, o ms_criamapa.php deve ser executado via include. Nesse caso, os par&acirc;metros devem ser especificados como vari&aacute;veis, p.e.,
-
-$temasa="bioma";
-
-include("ms_criamapa.php");
-
-Observa&ccedil;&otilde;es:
-
-Os cookies passados ao servidor s&atilde;o eliminados com a linha
-
-$_COOKIE = array();
-
-Se a sua aplica&ccedil;&atilde;o precisa de cookies, comente essa linha do programa.
-
-A interface HTML padr&atilde;o de abertura do mapa &eacute; definido em uma vari&aacute;vel no arquivo ms_configura.php, podendo ser alterada se necess&aacute;rio.
-
-Link:
-
-http://localhost/i3geo/ms_criamapa.php
-
-Licen&ccedil;a:
-
-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.
-
-Arquivo: i3geo/ms_criamapa.php
-
-Par&acirc;metros:
-
-base - arquivo mapfile que servir&aacute; de base para a cria&ccedil;&atilde;o do mapa. Por default, s&atilde;o utilizados os arquivos existentes em i3geo/aplicmap (geral1windows, geral1,...)
-	Essa vari&aacute;vel pode ser definida em ms_configura tamb&eacute;m. Se n&atilde;o estiver definida em nenhum lugar, o i3Geo tentar&aacute; descobrir o arquivo adequado a ser utilizado. Voc&ecirc; pode utilizar essa op&ccedil;&atilde;o para abrir um mapa com as camadas que voc&ecirc; quiser, mas para evitar redund&acirc;ncias, prefira o uso de &temasa
-
-temasa - lista, separada por espa&ccedil;os, com os nomes dos arquivos map ou gvsig que ser&atilde;o adicionados ao mapa. Se o arquivo n&atilde;o estiver no diret&oacute;rio i3geo/temas, o nome deve incluir o caminho completo no servidor. O arquivo pode conter mais de um layer pois todos os existentes ser&atilde;o adicionados ao mapa. Por default, todos os layers encontrados nos mapfiles s&atilde;o adicionados ao mapa com o status de desenho em OFF.
-
-layers - lista, separada por espa&ccedil;os, com os nomes dos layers que ser&atilde;o ligados. A lista deve conter os nomes dos layers e n&atilde;o os nomes dos mapfiles acrescentados ao mapa. Por exemplo, ao adicionar com "temasa" um mapfile chamado "transporte" que contenha os layers "estradas" e "ferrovias" os dois layers ser&atilde;o adicionados ao mapa. Para que esses dois layers fiquem vis&iacute;veis no mapa deve-se utilizar &layers=estradas ferrovias.
-
-desligar - lista com os nomes dos temas que ser&atilde;o for&ccedil;ados a inicializar desligados, ou seja, com STATUS OFF
-
-mapext - extensao geografica que ser&aacute; utilizada. Por padr&atilde;o, a extens&atilde;o geogr&aacute;fica &eacute; definida para abranger o Brasil todo. Para alterar o padr&atilde;o deve-se utilizar o par&acirc;metro mapext para especificar a nova abrang&ecirc;ncia. Essa abrang&ecirc;ncia deve ser definida em coordenadas no formato d&eacute;cimos de grau e na proje&ccedil;&atilde;o geogr&aacute;fica. Exemplo: &mapext=-54 -30 -50 -12. Observe que a ordem dos valores s&atilde;o xmin ymin xmax ymax
-
-interface - nome da interface que ser&aacute; utilizada para abrir o mapa. As interfaces s&atilde;o arquivos HTML que podem estar no diret&oacute;rio aplicmap. Por default, utiliza-se o geral.htm. Vc pode copiar esse html e alter&aacute;-lo para customizar o mapa. Para chamar o html customizado, utilize ms_criamapa.php?interface=meumapa.htm
-
-perfil - perfil utilizado para restringir os menus de temas. ms_criamapa.php?perfil=usu&aacute;rio1
-
-caminho - caminho relativo que indica o local onde a interface do mapa esta localizada.
-
-pontos - lista de coordenadas x e y que ser&atilde;o adicionadas como pontos no mapa.
-
-nometemapontos - nome do tema de pontos
-
-linhas - lista de coordenadas x e y que ser&atilde;o adicionadas como linhas no mapa. As coordenadas de linhas diferentes devem ser separadas por ",", por exemplo: -54 -12 -50 -12,-50 -1 -50 -2 -50 -3
-
-nometemalinhas - nome do tema de linhas
-
-poligonos - lista de coordenadas x e y que ser&atilde;o adicionadas como pol&iacute;gonos no mapa. As coordenadas dos v&eacute;rtices de pol&iacute;gonos diferentes devem ser separadas por ",".
-
-nometemapoligonos - nome do tema de pol&iacute;gonos
-
-simbolo - nome do s&iacute;mbolo que ser&aacute; utilizado para desenhar os elementos inseridos (veja arquivo de s&iacute;mbolos em i3geo/symbols)
-
-corsimbolo - cor do s&iacute;mbolo definido em RGB separados por espa&ccedil;o ou v&iacute;rgula
-
-tamanhosimbolo - tamanho do s&iacute;mbolo em pixels
-
-wkt - insere elementos no mapa com coordenadas definidas em wkt
-
-nometemawkt - nome do tema em wkt
-
-idioma - idioma da interface (veja os idiomas dispon&iacute;veis em classe_idioma.js)
-
-kmlurl - url de um arquivo KML que ser&aacute; incluido no mapa. V&aacute;lido apenas na interface google maps
-
-url_wms - endere&ccedil;o de um WMS (ser&aacute; incluido como uma camada no mapa)
-
-layer_wms - nome do layer
-
-style_wms - estilo do layer
-
-nome_wms - nome da camada (titulo)
-
-srs_wms - c&oacute;digo da proje&ccedil;&atilde;o
-
-image_wms - tipo de imagem dispon&iacute;vel
-
-versao_wms - Vers&atilde;o do WMS (necess&aacute;rio quando da inclus&atilde;o de uma camada WMS diretamente pela URL)
-
-restauramapa - id do mapa armazenado no sistema de administracao e que ser&aacute; restaurado para ser aberto novamente
-
-filtros - filtros podem ser adicionados incluindo o parametro da seguinte forma: &map_layer_<nomedotema>_filter=
-
-  Exemplo de filtro
-
-  http://localhost/i3geo/ms_criamapa.php?temasa=_lbiomashp&map_layer__lbiomashp_filter=(('[CD_LEGENDA]'='CAATINGA'))&temasa=_lbiomashp
-
-  no caso de camadas Postgis basta usar map_layer__lbiomashp_filter=cd_legenda='CAATINGA'
-
- largura - largura em pixel do mapa
-
- altura - altura em pixels do mapa
-
- DESLIGACACHE - sim|nao forca o desligamento do cache em todos os layers
-*/
-
-if(isset($_GET["ajuda"])){
-	echo "<pre>";
-	echo"
+<?php
+/*
+ * Title: Inicializa o i3Geo via URL ms_criamapa.php
+ *
+ * Esse &eacute; o programa principal de inicializa&ccedil;&atilde;o, podendo ser chamado diretamente pelo navegador web.
+ *
+ * Cria os diret&oacute;rios tempor&aacute;rios em ms_tmp, incluindo o mapfile (http://mapserver.org/mapfile/index.html#mapfile) que ser&aacute; a base para o funcionamento do mapa.
+ *
+ * Com o uso de par&acirc;metros &eacute; poss&iacute;vel alterar o processo padr&atilde;o de cria&ccedil;&atilde;o do mapa, como por exemplo, podem ser adicionadas novas camadas ou modificada a abrang&ecirc;ncia espacial do mapa.
+ *
+ * A inicializa&ccedil;&atilde;o padr&atilde;o abrir&aacute; uma interface HTML com todas as funcionalidades dispon&iacute;veis, por&eacute;m &eacute; poss&iacute;vel escolher qualquer outro HTML para a apresenta&ccedil;&atilde;o do mapa.
+ *
+ * No diret&oacute;rio i3geo/interface est&atilde;o os arquivos HTML que formatam a apresenta&ccedil;&atilde;o do mapa. Al&eacute;m desses arquivos, podem ser criados outros, conforme a necessidade do usu&aacute;rio.
+ *
+ * Os par&acirc;metros podem ser utilizados na chamada do i3geo via navegador, p.e.,
+ *
+ * http://localhost/i3geo/ms_criamapa.php?temasa=estadosl
+ *
+ * A ordem dos par&acirc;metros n&atilde;o &eacute; importante, mas o primeiro deve ser precedido de "?". Os demais par&acirc;metros devem ser acrescentados sempre precedidos de "&", p.e.,
+ *
+ * http://localhost/i3geo/ms_criamapa.php?temasa=estadosl bioma&layers=estadosl bioma
+ *
+ * Caso a inicializa&ccedil;&atilde;o do i3geo ocorra por um outro programa PHP, o ms_criamapa.php deve ser executado via include. Nesse caso, os par&acirc;metros devem ser especificados como vari&aacute;veis, p.e.,
+ *
+ * $temasa="bioma";
+ *
+ * include("ms_criamapa.php");
+ *
+ * Observa&ccedil;&otilde;es:
+ *
+ * Os cookies passados ao servidor s&atilde;o eliminados com a linha
+ *
+ * $_COOKIE = array();
+ *
+ * Se a sua aplica&ccedil;&atilde;o precisa de cookies, comente essa linha do programa.
+ *
+ * A interface HTML padr&atilde;o de abertura do mapa &eacute; definido em uma vari&aacute;vel no arquivo ms_configura.php, podendo ser alterada se necess&aacute;rio.
+ *
+ * Link:
+ *
+ * http://localhost/i3geo/ms_criamapa.php
+ *
+ * Licen&ccedil;a:
+ *
+ * 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.
+ *
+ * Arquivo: i3geo/ms_criamapa.php
+ *
+ * Par&acirc;metros:
+ *
+ * base - arquivo mapfile que servir&aacute; de base para a cria&ccedil;&atilde;o do mapa. Por default, s&atilde;o utilizados os arquivos existentes em i3geo/aplicmap (geral1windows, geral1,...)
+ * Essa vari&aacute;vel pode ser definida em ms_configura tamb&eacute;m. Se n&atilde;o estiver definida em nenhum lugar, o i3Geo tentar&aacute; descobrir o arquivo adequado a ser utilizado. Voc&ecirc; pode utilizar essa op&ccedil;&atilde;o para abrir um mapa com as camadas que voc&ecirc; quiser, mas para evitar redund&acirc;ncias, prefira o uso de &temasa
+ *
+ * temasa - lista, separada por espa&ccedil;os, com os nomes dos arquivos map ou gvsig que ser&atilde;o adicionados ao mapa. Se o arquivo n&atilde;o estiver no diret&oacute;rio i3geo/temas, o nome deve incluir o caminho completo no servidor. O arquivo pode conter mais de um layer pois todos os existentes ser&atilde;o adicionados ao mapa. Por default, todos os layers encontrados nos mapfiles s&atilde;o adicionados ao mapa com o status de desenho em OFF.
+ *
+ * layers - lista, separada por espa&ccedil;os, com os nomes dos layers que ser&atilde;o ligados. A lista deve conter os nomes dos layers e n&atilde;o os nomes dos mapfiles acrescentados ao mapa. Por exemplo, ao adicionar com "temasa" um mapfile chamado "transporte" que contenha os layers "estradas" e "ferrovias" os dois layers ser&atilde;o adicionados ao mapa. Para que esses dois layers fiquem vis&iacute;veis no mapa deve-se utilizar &layers=estradas ferrovias.
+ *
+ * desligar - lista com os nomes dos temas que ser&atilde;o for&ccedil;ados a inicializar desligados, ou seja, com STATUS OFF
+ *
+ * mapext - extensao geografica que ser&aacute; utilizada. Por padr&atilde;o, a extens&atilde;o geogr&aacute;fica &eacute; definida para abranger o Brasil todo. Para alterar o padr&atilde;o deve-se utilizar o par&acirc;metro mapext para especificar a nova abrang&ecirc;ncia. Essa abrang&ecirc;ncia deve ser definida em coordenadas no formato d&eacute;cimos de grau e na proje&ccedil;&atilde;o geogr&aacute;fica. Exemplo: &mapext=-54 -30 -50 -12. Observe que a ordem dos valores s&atilde;o xmin ymin xmax ymax
+ *
+ * interface - nome da interface que ser&aacute; utilizada para abrir o mapa. As interfaces s&atilde;o arquivos HTML que podem estar no diret&oacute;rio aplicmap. Por default, utiliza-se o geral.htm. Vc pode copiar esse html e alter&aacute;-lo para customizar o mapa. Para chamar o html customizado, utilize ms_criamapa.php?interface=meumapa.htm
+ *
+ * perfil - perfil utilizado para restringir os menus de temas. ms_criamapa.php?perfil=usu&aacute;rio1
+ *
+ * caminho - caminho relativo que indica o local onde a interface do mapa esta localizada.
+ *
+ * pontos - lista de coordenadas x e y que ser&atilde;o adicionadas como pontos no mapa.
+ *
+ * nometemapontos - nome do tema de pontos
+ *
+ * linhas - lista de coordenadas x e y que ser&atilde;o adicionadas como linhas no mapa. As coordenadas de linhas diferentes devem ser separadas por ",", por exemplo: -54 -12 -50 -12,-50 -1 -50 -2 -50 -3
+ *
+ * nometemalinhas - nome do tema de linhas
+ *
+ * poligonos - lista de coordenadas x e y que ser&atilde;o adicionadas como pol&iacute;gonos no mapa. As coordenadas dos v&eacute;rtices de pol&iacute;gonos diferentes devem ser separadas por ",".
+ *
+ * nometemapoligonos - nome do tema de pol&iacute;gonos
+ *
+ * simbolo - nome do s&iacute;mbolo que ser&aacute; utilizado para desenhar os elementos inseridos (veja arquivo de s&iacute;mbolos em i3geo/symbols)
+ *
+ * corsimbolo - cor do s&iacute;mbolo definido em RGB separados por espa&ccedil;o ou v&iacute;rgula
+ *
+ * tamanhosimbolo - tamanho do s&iacute;mbolo em pixels
+ *
+ * wkt - insere elementos no mapa com coordenadas definidas em wkt
+ *
+ * nometemawkt - nome do tema em wkt
+ *
+ * idioma - idioma da interface (veja os idiomas dispon&iacute;veis em classe_idioma.js)
+ *
+ * kmlurl - url de um arquivo KML que ser&aacute; incluido no mapa. V&aacute;lido apenas na interface google maps
+ *
+ * url_wms - endere&ccedil;o de um WMS (ser&aacute; incluido como uma camada no mapa)
+ *
+ * layer_wms - nome do layer
+ *
+ * style_wms - estilo do layer
+ *
+ * nome_wms - nome da camada (titulo)
+ *
+ * srs_wms - c&oacute;digo da proje&ccedil;&atilde;o
+ *
+ * image_wms - tipo de imagem dispon&iacute;vel
+ *
+ * versao_wms - Vers&atilde;o do WMS (necess&aacute;rio quando da inclus&atilde;o de uma camada WMS diretamente pela URL)
+ *
+ * restauramapa - id do mapa armazenado no sistema de administracao e que ser&aacute; restaurado para ser aberto novamente
+ *
+ * filtros - filtros podem ser adicionados incluindo o parametro da seguinte forma: &map_layer_<nomedotema>_filter=
+ *
+ * Exemplo de filtro
+ *
+ * http://localhost/i3geo/ms_criamapa.php?temasa=_lbiomashp&map_layer__lbiomashp_filter=(('[CD_LEGENDA]'='CAATINGA'))&temasa=_lbiomashp
+ *
+ * no caso de camadas Postgis basta usar map_layer__lbiomashp_filter=cd_legenda='CAATINGA'
+ *
+ * largura - largura em pixel do mapa
+ *
+ * altura - altura em pixels do mapa
+ *
+ * DESLIGACACHE - sim|nao forca o desligamento do cache em todos os layers
+ */
+if (isset($_GET["ajuda"])) {
+    echo "<pre>";
+    echo "
 Par&acirc;metros:
 base - arquivo mapfile que servir&aacute; de base para a cria&ccedil;&atilde;o do mapa. Por default, s&atilde;o utilizados os arquivos existentes em i3geo/aplicmap (geral1windows, geral1,...)
@@ -215,1239 +214,1280 @@ filtros - filtros podem ser adicionados incluindo o parametro da seguinte forma:
  largura - largura em pixel do mapa
  altura - altura em pixels do mapa
-	";
-	exit;
-}
-//$_COOKIE = array();
-
-//
-//quando $funcao existe, &eacute; pq o ms_criamapa.php est&aacute;
-//sendo utilizado como um include em classesphp/mapa_controle.php
-//
-
-if(!isset($funcao)){
-	ob_end_clean();
-	/*
-	 Carrega as extens&otilde;es PHP
-
-	 Carrega as extens&otilde;es utilizadas no programa de inicializa&ccedil;&atilde;o.
-	 A carga das extens&otilde;es geralmente &eacute; necess&aacute;ria nas instala&ccedil;&otilde;es windows (ms4w) ou quando as mesmas n&atilde;o s&atilde;o carregadas pela pr&oacute;pria inicializa&ccedil;&atilde;o do PHP.
-	 */
-	include_once (dirname(__FILE__)."/classesphp/carrega_ext.php");
-	/*
-	 Include dos arquivos PHP.
-
-	 Inclui os programas php com fun&ccedil;&otilde;es utilizadas pelo ms_criamapa.php
-	 */
-	include_once (dirname(__FILE__)."/classesphp/sani_request.php");
-	include_once (dirname(__FILE__)."/classesphp/funcoes_gerais.php");
-	if(!isset($_GET["interface"])){
-	    $_GET["interface"] = "";
-	}
-	$interface = $_GET["interface"];
-}
-$parurl = array_merge($_GET,$_POST);
-//
-//$base pode vir do ms_configura ou da URL
-//o ms_configura pode ter sido inserido antes
-//
-if(empty($base) && !empty($parurl["base"])){
-	$base = $parurl["base"];
-}
-
-ms_ResetErrorList();
-$metaestatids = @$parurl["metaestatids"];
-$temasa = @$parurl["temasa"];
-$layers = @$parurl["layers"];
-$desligar = @$parurl["desligar"];
-$mapext = @$parurl["mapext"];
-$executa = "";//$parurl["executa"];
-$perfil = @$parurl["perfil"];
-$caminho = @$parurl["caminho"];
-$pontos = @$parurl["pontos"];
-$nometemapontos = @$parurl["nometemapontos"];
-$linhas = @$parurl["linhas"];
-$nometemalinhas = @$parurl["nometemalinhas"];
-$poligonos = @$parurl["poligonos"];
-$nometemapoligonos = @$parurl["nometemapoligonos"];
-$simbolo = @$parurl["simbolo"];
-$corsimbolo = @$parurl["corsimbolo"];
-$tamanhosimbolo = @$parurl["tamanhosimbolo"];
-$wkt = @$parurl["wkt"];
-$nometemawkt = @$parurl["nometemawkt"];
-$idioma = @$parurl["idioma"];
-$kmlurl = @$parurl["kmlurl"];
-$url_wms = @$parurl["url_wms"];
-$layer_wms = @$parurl["layer_wms"];
-$style_wms = @$parurl["style_wms"];
-$nome_wms = @$parurl["nome_wms"];
-$srs_wms = @$parurl["srs_wms"];
-$image_wms = @$parurl["image_wms"];
-$versao_wms = @$parurl["versao_wms"];
-$gvsigview = @$parurl["gvsigview"];
-$restauramapa = @$parurl["restauramapa"];
-
-$versao = versao();
-$versao = $versao["principal"];
-
-//
-//a vari&aacute;vel $base pode ser definida em ms_configura, mas a prefer&ecirc;ncia &eacute; pela defini&ccedil;&atilde;o j&aacute; existente
-//por isso, $base &eacute; guardada em uma vari&aacute;vel e retomada apos o include de ms_configura.php
-//se restauramapa estiver definido, usa o mapfile guardado no banco de  administracao como a base
-//
-if(!isset($dir_tmp)){
-	include_once (dirname(__FILE__)."/ms_configura.php");
-	if(!empty($parurl["base"])){
-		$base = $parurl["base"];
-	}
-	if(!empty($parurl["interface"])){
-		$interface = $parurl["interface"];
-	}
-}
-if(isset($logExec) && $logExec["init"] == true){
-	i3GeoLog("prog: ms_criamapa url: ".implode("&",array_merge($_GET,$_POST)),$dir_tmp);
-}
-if(!empty($restauramapa)){
-	$base = restauraMapaAdmin($restauramapa,$dir_tmp);
-	$m = ms_newMapObj($base);
-	$w = $m->web;
-	$w->set("imagepath",dirname($w->imagepath)."/");
-	$w->set("imageurl",dirname($w->imageurl)."/");
-	$m->save($base);
-}else{
-	if(isset($base)){
-		$tempBaseX = $base;
-	}
-	if(isset($tempBaseX) && $tempBaseX != ""){
-		$base = $tempBaseX;
-	}
-}
-//verifica se o usuario trocou a senha do master
-if($_SERVER['SERVER_NAME'] != "localhost" && ($i3geomaster[0]["usuario"] == "admin" && $i3geomaster[0]["senha"] == "admin") ){
-	echo json_encode(array("bloqueado"=>"Bloqueado. ATENCAO!!! Acesso bloqueado: edite o arquivo i3geo/ms_configura.php e altere o login e senha da variavel i3geomaster"));
-	exit;
-}
-/*
-Define o cookie para o idioma da interface
-*/
-if(isset($idioma) && $idioma != ""){
-	setcookie("i3geolingua", $idioma);
-}
-/*
-Cria os diretorios tempor&aacute;rios que ser&atilde;o utilizados pelo i3geo para armazenar as imagens e outros dados.
-*/
-$diretorios = criaDirMapa($dir_tmp,$cachedir);
-if(!$diretorios){
-	echo "<p style=color:red ><b>N&atilde;o foi poss&iacute;vel criar os diret&oacute;rios tempor&aacute;rios em $dir_tmp.</b></p>";
-	exit;
-}
-criaIndex($dir_tmp,$diretorios);
-$tmpfname = $diretorios[0];
-$protocolo = explode("/",$_SERVER['SERVER_PROTOCOL']);
-/*
-Prepara as vari&aacute;veis que ser&atilde;o incluidas na se&ccedil;&atilde;o
-
-As vari&aacute;veis v&ecirc;m do arquivo ms_configura.php e s&atilde;o armazenadas em uma se&ccedil;&atilde;o com nome espec&iacute;fico para o i3geo.
-*/
-if (!isset($mapext) || empty($mapext)){
-	$mapext="";
-}
-else{
-	$mapext = str_replace(","," ",$mapext);
-	setcookie("i3geoUltimaExtensao", $mapext);
-}
-$saikuUrl_ = $saikuUrl;
-$cachedir_ = $cachedir;
-$dir_tmp_ = $dir_tmp;
-$emailInstituicao_ = $emailInstituicao;
-$locmapserv_ = $locmapserv;
-$locaplic_ = $locaplic;
-//$locsistemas_ = $locsistemas;
-//$locidentifica_ = $locidentifica;
-$R_path_ = $R_path;
-$mapext_ = $mapext;
-
-$debug_ = @$debug;
-$ler_extensoes_ = $ler_extensoes;
-$postgis_mapa_ = $postgis_mapa;
-$tituloInstituicao_ = $tituloInstituicao;
-//$atlasxml_ = $atlasxml;
-$expoeMapfile_ = $expoeMapfile;
-$googleApiKey_ = $googleApiKey;
-$mensagemInicia_ = $mensagemInicia;
-$interfacePadrao_ = $interfacePadrao;
-if(empty($interface)){
-	$interface_ = $interfacePadrao;
-}
-if(isset($kmlurl)){
-	$kmlurl_ = $kmlurl;
-}
-//
-//se houver string de conex&atilde;o para substitui&ccedil;&atilde;o
-//o modo cgi n&atilde;o ir&aacute; funcionar
-//
-if($postgis_mapa != ""){
-	$utilizacgi = "nao";
-}
-if(!isset($perfil)){
-	$perfil="";
-}
-$perfil_ = $perfil;
-$utilizacgi_ = $utilizacgi;
-if ((isset($navegadoresLocais)) && ($navegadoresLocais != "")){
-	$navegadoresLocais_ = "sim";
-}
-else{
-	$navegadoresLocais_ = "nao";
-}
-if(empty($i3georendermode)){
-	$i3georendermode_ = 0;
-}
-else{
-	$i3georendermode_ = $i3georendermode;
-}
-if(empty($statusFerramentas)){
-	$statusFerramentas_ = array();
-}
-else{
-	$statusFerramentas_ = $statusFerramentas;
-}
-if(empty($logExec)){
-	$logExec_ = "";
-}
-else{
-	$logExec_ = $logExec;
-}
-if(!isset($i3geoPermiteLogin)){
-	$i3geoPermiteLogin_ = "";
-}
-else{
-	$i3geoPermiteLogin_ = $i3geoPermiteLogin;
-}
-/*
-Inicia a se&ccedil;&atilde;o
-
-O i3geo inicia uma se&ccedil;&atilde;o espec&iacute;fica no servidor, denominada i3GeoPHP.
-Se j&aacute; houver uma se&ccedil;&atilde;o aberta, em fun&ccedil;&atilde;o de outro browser estar ativo, cria uma nova. Faz a c&oacute;pia das vari&aacute;veis definidas para itens da se&ccedil;&atilde;o.
-*/
-session_name("i3GeoPHP");
-session_start();
-//echo $_SESSION["map_file"];exit;
-if (!isset($g_sid)){$g_sid="";}
-if(isset($_SESSION["map_file"]) || $g_sid != "" || $g_sid == "undefined"){
-	session_regenerate_id();
-	$_SESSION = array();
-}
-/*
-Aguarde
-
-Monta a apresenta&ccedil;&atilde;o do aguarde.
-
-Aqui &eacute; necess&aacute;rio verificar se $executa est&aacute; definido
-isso pq algumas aplica&ccedil;&otilde;es podem ser prejudicadas caso o aguarde seja mostrado
-*/
-$_SESSION["dir_tmp"] = $dir_tmp_;
-$_SESSION["cachedir"] = $cachedir_;
-$_SESSION["emailInstituicao"] = $emailInstituicao_;
-$_SESSION["locmapserv"] = $locmapserv_;
-$_SESSION["locaplic"] = $locaplic_;
-$_SESSION["R_path"] = $R_path_;
-$_SESSION["mapext"] = $mapext_;
-$_SESSION["debug"] = $debug_;
-$_SESSION["ler_extensoes"] = $ler_extensoes_;
-$_SESSION["postgis_mapa"] = $postgis_mapa_;
-$_SESSION["perfil"] = $perfil_;
-$_SESSION["navegadoresLocais"] = $navegadoresLocais_;
-$_SESSION["utilizacgi"] = $utilizacgi_;
-$_SESSION["tituloInstituicao"] = $tituloInstituicao_;
-$_SESSION["expoeMapfile"] = $expoeMapfile;
-$_SESSION["googleApiKey"] = $googleApiKey_;
-$_SESSION["mensagemInicia"] = $mensagemInicia_;
-$_SESSION["interfacePadrao"] = $interfacePadrao_;
-$_SESSION["logExec"] = $logExec_;
-$_SESSION["i3geoPermiteLogin"] = $i3geoPermiteLogin_;
-if(!isset($customDir)){
-    $customDir = "";
-}
-$_SESSION["customDir"] = $customDir;
-if(isset($interface_)){
-	$_SESSION["interface"] = $interface_;
-}
-if(isset($kmlurl_)){
-	$_SESSION["kmlurl"] = $kmlurl_;
-}
-//rotina de seguran&ccedil;a, ver http://shiflett.org/articles/the-truth-about-sessions
-$fingerprint = 'I3GEOSEC' . $_SERVER['HTTP_USER_AGENT'];
-$_SESSION['fingerprint'] = md5($fingerprint . session_id());
-$_SESSION["mapdir"] = $diretorios[1];
-$_SESSION["imgdir"] = $diretorios[2];
-$_SESSION["contadorsalva"] = 0;//essa variavel e utilizada pela ferramenta telaremota. Toda vez que o mapa e salvo, acrescenta 1 (veja classesphp/mapa_controle.php)
-$_SESSION["i3georendermode"] = $i3georendermode_;
-$_SESSION["saikuUrl"] = $saikuUrl_;
-$_SESSION["logExec"] = $logExec_;
-$_SESSION["i3geoPermiteLogin"] = $i3geoPermiteLogin_;
-
-//sao arrays
-$postgis_mapa = $postgis_mapa_;
-$_SESSION["statusFerramentas"] = $statusFerramentas_;
-/*
-Define os arquivos .map
-
-Seleciona os arquivos mapfile que ser&atilde;o carregados como base conforme o tipo de sistema operacional.
-
-A vari&aacute;vel $base pode ser definida como um par&acirc;metro na inicializa&ccedil;&atilde;o, caso contr&aacute;rio ser&aacute; utilizado o valor definido em ms_configura.php ou o i3Geo tentar&aacute; descobrir o melhor arquivo a ser usado, conforme o que existir em i3geo/aplicmap.
-
-Os arquivos .map padr&atilde;o s&atilde;o armazenados em i3geo/aplicmap.
-O arquivo &eacute; lido conforma a caracter&iacute;stica do sistema operacional.
-
-*/
-$versao = versao();
-$versao = $versao["principal"];
-if(!isset($base) || $base == ""){
-	if (strtoupper(substr(PHP_OS, 0, 3) == 'WIN')){
-		$base = $locaplic."/aplicmap/geral1windowsv".$versao.".map";
-	}
-	else{
-		if($base == "" && file_exists('/var/www/i3geo/aplicmap/geral1debianv'.$versao.'.map')){
-			$base = "/var/www/i3geo/aplicmap/geral1debianv".$versao.".map";
-		}
-		if($base == "" && file_exists('/var/www/html/i3geo/aplicmap/geral1fedorav'.$versao.'.map')){
-			$base = "/var/www/html/i3geo/aplicmap/geral1fedorav".$versao.".map";
-		}
-		if($base == "" && file_exists('/opt/www/html/i3geo/aplicmap/geral1fedorav'.$versao.'.map')){
-			$base = "/opt/www/html/i3geo/aplicmap/geral1v".$versao.".map";
-		}
-		if($base == ""){
-			$base = $locaplic."/aplicmap/geral1v".$versao.".map";
-		}
-	}
-}
-//error_log($base);
-//if(!isset($estadosl))
-//{$estadosl = "estadosl";}
-/*
-Cria os objetos map que ser&atilde;o processados
-
-O arquivo definido em $base &eacute; lido como um objeto map. Esse objeto ser&aacute; processado para incluir novos layers e alterar outros par&acirc;metros definidos pelo usu&aacute;rio.
-*/
-if (file_exists($base)){
-	$map = ms_newMapObj($base);
-	$mapn = ms_newMapObj($base);
-}
-else{
-	$map = ms_newMapObj($locaplic."/aplicmap/".$base.".map");
-	$mapn = ms_newMapObj($locaplic."/aplicmap/".$base.".map");
-}
-
-/*
-Par&acirc;metros adicionais.
-
-Processa os par&acirc;metros para a inicializa&ccedil;&atilde;o verificando se foram passados pela URL ou n&atilde;o.
-*/
-if (!isset($mapext)){
-	$mapext = $map->extent->minx." ".$map->extent->miny." ".$map->extent->maxx." ".$map->extent->maxy;
-}
-//arquivo com a imagem de refer&ecirc;ncia
-if (!isset ($map_reference_image)){
-	$map_reference_image = $map->reference->image;
-}
-//extens&atilde;o geogr&aacute;fica da imagem do mapa de refer&ecirc;ncia
-if (!isset ($map_reference_extent)){
-	$map_reference_extent = $map->reference->extent->minx." ".$map->reference->extent->miny." ".$map->reference->extent->maxx." ".$map->reference->extent->maxy;
-}
-if(empty($interface)){
-	if(!isset($interfacePadrao)){
-		$interfacePadrao = "ol.htm";
-	}
-	$interface = $interfacePadrao;
-}
-
-if(isset($layers) && !isset($temasa)){
-	$temasa = $layers;
-}
-
-incluiTemasIniciais();
-
-if(isset($layers)){
-	ligaTemas();
-}
-if(isset($desligar)){
-	desligaTemasIniciais();
-}
-if (isset($map_reference_image)){
-	$mapn->reference->set("image",$map_reference_image);
-}
-$extr = $mapn->reference->extent;
-if (isset($map_reference_extent)){
-	$temp = explode(" ",$map_reference_extent);
-	foreach ($temp as $t)	{
-		if ($t != ""){
-			$newext[] = $t;
-		}
-	}
-	if (count($newext) == 4){
-		$extr->setextent($newext[0], $newext[1], $newext[2], $newext[3]);
-	}
-}
-$ext = $mapn->extent;
-$newext = array();
-if ((isset($mapext)) && ($mapext != "")){
-	$temp = explode(" ",$mapext);
-	foreach ($temp as $t)	{
-		if ($t != ""){
-			$newext[] = $t;
-		}
-	}
-	if (count($newext) == 4){
-		$ext->setextent($newext[0], $newext[1], $newext[2], $newext[3]);
-	}
-}
-else{
-	//algumas aplicacoes usam essa variavel (SAIKU)
-	$mapext = $ext->minx." ".$ext->miny." ".$ext->maxx." ".$ext->maxy;
-}
-
-/*
-Configura os endere&ccedil;os corretos no mapfile.
-
-Altera as propriedades imagepath e imageurl corrigindo os caminhos padr&atilde;o conforme o diret&oacute;rio criado para armazenar o mapa de trabalho.
-*/
-
-$w = $mapn->web;
-$atual = $w->imagepath;
-$w->set("imagepath",$atual.$diretorios[2]."/");
-$atual = $w->imageurl;
-$w->set("imageurl",$atual.$diretorios[2]."/");
-
-$projecao = pegaProjecaoDefault("proj4");
-if($projecao != ""){
-	$mapn->setProjection($projecao);
-}
-//aplica o tamanho do mapa
-if(isset($parurl["largura"]) && isset($parurl["altura"])){
-    $mapn->setsize($parurl["largura"],$parurl["altura"]);
-}
-
-$tmpfname = str_replace(".map","",$tmpfname).".map";
-$salvo = $mapn->save($tmpfname);
-
-$_SESSION["imgurl"] = strtolower($protocolo[0])."://".$_SERVER['HTTP_HOST'].$atual.$diretorios[2]."/";
-$_SESSION["tmpurl"] = strtolower($protocolo[0])."://".$_SERVER['HTTP_HOST'].$atual;
-$_SESSION["map_file"] = $tmpfname;
-$_SESSION["mapext"] = $mapext;
-if (isset($executa)){
-	if (file_exists($executa)){
-		//include_once ($executa);
-	}
-	if (function_exists($executa)){
-		//eval($executa."();");
-	}
-}
-if(isset($wkt)){
-	insereWKTUrl();
-}
-
-if(isset($pontos)){
-	inserePontosUrl();
-}
-
-if(isset($linhas)){
-	insereLinhasUrl();
-}
-
-if(isset($poligonos)){
-	inserePoligonosUrl();
-}
-
-if(isset($url_wms)){
-	incluiTemaWms();
-}
-
-adaptaLayers($tmpfname,$versao);
-
-//if (file_exists($locaplic."/pacotes/geoip") && file_exists($locaplic."/pacotes/geoip/GeoLiteCity.dat")){
-//	require_once(dirname(__FILE__)."/ms_registraip.php");
-//}
-if ($interface != "mashup"){
-	abreInterface($interface,$caminho);
-}
-
-/*
-Adapta os dados de cada layer.
-
-Faz altera&ccedil;&otilde;es em cada layer caso sejam necess&aacute;rias.
-*/
-function adaptaLayers($tmpfname,$versao){
-	global $parurl;
-	$mapa = ms_newMapObj($tmpfname);
-	$path = $mapa->shapepath;
-	$numlayers = $mapa->numlayers;
-	for($i=0;$i<$numlayers;++$i){
-		$layer = $mapa->getLayer($i);
-		$ok = true;
-		if ($layer->connection == ""){
-			$ok = false;
-			$d = $layer->data;
-			if((file_exists($d)) || (file_exists($d.".shp"))){
-				$ok = true;
-			}
-			else{
-				if((file_exists($path."/".$d)) || (file_exists($path."/".$d.".shp"))){
-					$ok = true;
-				}
-			}
-		}
-		if ($ok == false){
-			$layer->set("status",MS_OFF);
-		}
-		//para impedir erros na legenda
-		if($layer->getmetadata("classe") == ""){
-			$layer->setmetadata("classe","");
-		}
-		if($versao > 5){
-			$pr = $layer->getProcessing();
-			if(!in_array("LABEL_NO_CLIP=True",$pr)){
-				$layer->setprocessing("LABEL_NO_CLIP=True");
-			}
-			if(!in_array("POLYLINE_NO_CLIP=True",$pr)){
-				$layer->setprocessing("POLYLINE_NO_CLIP=True");
-			}
-
-		}
-		//
-		//verifica se deve aplicar filtro
-		//
-		$filtro = @$parurl["map_layer_".$layer->name."_filter"];
-		if(!empty($filtro)){
-			$layer->setmetadata("CACHE","nao");
-			$layer->setfilter($filtro);
-		}
-		corrigeLayerPath($layer,$mapa);
-	}
-	$mapa->save($tmpfname);
-	erroCriacao();
-}
-/*
-Redireciona para o HTML definido em $interface, abrindo o mapa
-*/
-function abreInterface($interface,$caminho){
-    $nomeInterface = explode(".",basename($interface));
-	if (count(explode(".php",$interface)) > 1){
-		if(file_exists($caminho."interface/".$interface)){
-			include_once($caminho."interface/".$interface);
-		}
-		exit;
-	}
-	else{
-		if(file_exists($caminho."interface/".$interface)){
-			$urln = $caminho."interface/".$interface."?&".session_id();
-		}
-		else{
-			$urln = $interface."?&".session_id();
-		}
-		if(!headers_sent()){
-			header("Location:".$urln);
-		}
-		else{
-			echo "<meta http-equiv='refresh' content='0;url=$urln'>";
-		}
-	}
-}
-/*
-Desliga os temas definidos na vari&aacute;vel $desligar
-*/
-function desligaTemasIniciais()
-{
-	global $desligar,$mapn;
-	$layers = str_replace(','," ",$desligar);
-	$lista = explode(" ", $layers);
-	foreach ($lista as $l)
-	{
-		if ($l == "")
-		{continue;}
-		if(@$mapn->getLayerByName($l))
-		{$layern = $mapn->getLayerByName($l);$layern->set("status",MS_OFF);}
-		$grupos = $mapn->getLayersIndexByGroup($l);
-		if(count($grupos) > 0)
-		{
-			for ($i = 0;$i < count($grupos);++$i)
-			{
-				$layern = $mapn->getLayer($grupos[$i]);
-				if(strtolower($layern->group) == strtolower($l))
-				{
-					$layern->set("status",MS_OFF);
-				}
-			}
-		}
-	}
-	erroCriacao();
-}
-/*
-Liga os temas definidos na vari&aacute;vel $layers
-*/
-function ligaTemas()
-{
-	global $layers,$mapn;
-	if (isset($layers))
-	{
-		$layers = str_replace(','," ",$layers);
-		$lista = explode(" ", $layers);
-		foreach ($lista as $l)
-		{
-			if ($l == "")
-			{continue;}
-			if(@$mapn->getLayerByName($l))
-			{$layern = $mapn->getLayerByName($l);$layern->set("status",MS_DEFAULT);}
-			$grupos = $mapn->getLayersIndexByGroup($l);
-			if(count($grupos) > 0)
-			{
-				for ($i = 0;$i < count($grupos);++$i)
-				{
-					$layern = $mapn->getLayer($grupos[$i]);
-					if(strtolower($layern->group) == strtolower($l))
-					{
-						$layern->set("status",MS_DEFAULT);
-					}
-				}
-			}
-		}
-	}
-	erroCriacao();
-}
-/*
-Inclui os temas definidos na vari&aacute;vel $temasa
-
-Os temas devem estar em i3geo/temas
-*/
-function incluiTemasIniciais(){
-	global $temasa,$mapn,$locaplic,$metaestatids,$layers;
-	if (strtoupper(substr(PHP_OS, 0, 3)) == 'WIN'){
-		$temasdir = $locaplic."\\temas";
-	}
-	else {
-		$temasdir = $locaplic."/temas";
-	}
-	if (!isset($temasa)){
-		$temasa = "";
-	}
-	$temasa = str_replace(','," ",$temasa);
-	$alayers = explode(" ",$temasa);
-	if(isset($metaestatids)){
-	    //localhost/i3geo/ms_criamapa.php?metaestatids=25,12&layers=25
-	    include_once (dirname(__FILE__) . "/classesphp/classe_metaestatinfo.php");
-	    $metaestatids = str_replace(','," ",$metaestatids);
-	    $metaestatids = explode(" ",$metaestatids);
-	    $metaestatidsligados = $layers;
-	    $metaestatidsligados = str_replace(','," ",$metaestatidsligados);
-	    $metaestatidsligados = explode(" ",$metaestatidsligados);
-	    foreach($metaestatids as $metaestatid){
-	        //$_pg["filtro"] = str_replace('"', "'", $_pg["filtro"]);
-	        $m = new MetaestatInfo();
-
-	        $parametros = $m->listaParametro($metaestatid,"","",true,true);
-	        //id_parametro_medida,coluna
-	        $filtroPar = array();
-	        foreach($parametros as $parametro){
-	            $valoresparametro = $m->valorUnicoMedidaVariavel($metaestatid,$parametro["coluna"]);
-	            $valormaior = $valoresparametro[count($valoresparametro) - 1];
-	            $filtroPar[] =  " ".$parametro["coluna"] . "::text = '" . $valormaior[$parametro["coluna"]] . "' ";
-	        }
-	        //var_dump($filtroPar);exit;
-	        $mapfilemetaestat = $m->mapfileMedidaVariavel(
-	            $metaestatid,
-	            implode(" AND ",$filtroPar),
-	            0,
-	            "polygon",
-	            "",
-	            "",
-	            "",
-	            "",
-	            "",
-	            false,
-	            false
-	        );
-	        //array(3) { ["mapfile"]=> string(52) "/tmp/ms_tmp/AAAAc20ad4d76fe97759aa27a0c99bff6710.map" ["layer"]=> string(36) "AAAAc20ad4d76fe97759aa27a0c99bff6710" ["titulolayer"]=> string(0) "" }
-	        //var_dump ($mapfilemetaestat);
-	        //exit;
-	        array_push($alayers,$mapfilemetaestat["mapfile"]);
-
-	        if(in_array($metaestatid,$metaestatidsligados)){
-	            $maptemp = @ms_newMapObj($mapfilemetaestat["mapfile"]);
-	            $maptemp->getlayerbyname($mapfilemetaestat["layer"])->set("status",MS_DEFAULT);
-	            $maptemp->save($mapfilemetaestat["mapfile"]);
-	        }
-	    }
-	}
-
-	$existeraster = false;
-	foreach ($alayers as $arqt)	{
-		$arqtemp = "";
-		$arqt = trim($arqt);
-		if ($arqt == "")
-		{continue;}
-		$extensao = ".map";
-		if(file_exists($arqt)){
-			$arqtemp = $arqt;
-		}
-		if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($locaplic."\\aplicmap\\".$arqt.$extensao))){
-			$arqtemp = $locaplic."\\aplicmap\\".$arqt.$extensao;
-		}
-		elseif (file_exists($locaplic."/aplicmap/".$arqt.$extensao)){
-			$arqtemp = $locaplic."/aplicmap/".$arqt.$extensao;
-		}
-		if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($temasdir."\\".$arqt.$extensao))){
-			$arqtemp = $temasdir."\\".$arqt.$extensao;
-		}
-		elseif (file_exists($temasdir."/".$arqt.$extensao)){
-			$arqtemp = $temasdir."/".$arqt.$extensao;
-		}
-		if($arqtemp == ""){
-			//echo "<br>Imposs&iacute;vel acessar tema $arqtemp";
-		}
-		else{
-			if ($extensao == ".map" && !@ms_newMapObj($arqtemp)){
-				echo "<br>Problemas com a camada $arqtemp<br>";
-			}
-			else{
-				$maptemp = @ms_newMapObj($arqtemp);
-				for($i=0;$i<($maptemp->numlayers);++$i){
-					//error_reporting(0);
-					$layern = $maptemp->getLayer($i);
-					if($layern->type == MS_LAYER_RASTER)
-					{$existeraster = true;}
-					if ($layern->name == "estadosl"){
-						$layern->set("data",$locaplic."/aplicmap/dados/estados.shp");
-					}
-					$layern->setmetadata("nomeoriginal",$layern->name);
-					$nNome = str_replace(".map","",basename($arqtemp));
-					$layern->setmetadata("arquivotemaoriginal",$nNome);
-					autoClasses($layern,$mapn);
-					//
-					//necess&aacute;rio para n&atilde;o alterar a extens&atilde;o do mapa por esse par&acirc;metro
-					//
-					$layern->setmetadata("aplicaextensao","");
-					//cria e aplica sld se for wms e existirem classes
-					if($layern->classitem != "" && $layern->connectiontype == 7 && $layern->numclasses > 0 && $layern->getmetadata("wms_sld_body") == ""){
-						$tipotemp = $layern->type;
-						$statustemp = $layern->status;
-						$tiporep = $layern->getmetadata("tipooriginal");
-						$layern->set("type",MS_LAYER_POLYGON);
-						if ($tiporep == "linear")
-						{$layern->set("type",MS_LAYER_LINE);}
-						if ($tiporep == "pontual")
-						{$layern->set("type",MS_LAYER_POINT);}
-						$layern->set("status",MS_DEFAULT);
-						$sld = $layern->generateSLD();
-						if($sld != "")
-						$layern->setmetadata("wms_sld_body",str_replace('"',"'",$sld));
-						$layern->set("type",$tipotemp);
-						$layern->set("status",$statustemp);
-					}
-					cloneInlineSymbol($layern,$maptemp,$mapn);
-					$layerAdicionado = ms_newLayerObj($mapn, $layern);
-					//echo $layern->name;
-					corrigeLayerGrid($layern,$layerAdicionado);
-				}
-			}
-		}
-	}
-	erroCriacao();
-}
-/*
-Cria os arquivos vazios index.htm e index.html nos diretorios tempor&aacute;rios
-*/
-function criaIndex($dir_tmp,$diretorios)
-{
-	if (!file_exists($dir_tmp."/index.htm"))
-	{
-		$f = fopen($dir_tmp."/index.htm","x");
-		fclose($f);
-		$f = fopen($dir_tmp."/index.html","x");
-		fclose($f);
-		$f = fopen($dir_tmp."/".$diretorios[1]."/index.html","x");
-		fclose($f);
-		$f = fopen($dir_tmp."/".$diretorios[1]."/index.htm","x");
-		fclose($f);
-		$f = fopen($dir_tmp."/".$diretorios[2]."/index.html","x");
-		fclose($f);
-		$f = fopen($dir_tmp."/".$diretorios[2]."/index.htm","x");
-		fclose($f);
-	}
-	if (!file_exists($dir_tmp."/index.htm"))
-	{
-		echo "Erro. N&atilde;o foi poss&iacute;vel gravar no diret&oacute;rio tempor&aacute;rio";
-		exit;
-	}
-}
-/*
-Mostra a mensagem de aguarde
-*/
-function mostraAguarde()
-{
-	global $interface,$mensagemInicia,$tituloInstituicao;
-	if (!isset($interface))
-	{
-		echo "<html><head>";
-		echo '<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1"></head>';
-		echo "<title>".$tituloInstituicao."</title>";
-		echo '<div id="aguarde"><center>';
-		echo '<p class=paguarde style="font-family: Verdana, Arial, Helvetica, sans-serif;color:black;text-align:center;font-size:12pt"><b>'.$mensagemInicia.'</b><br> Aguarde...preparando o mapa</p>';
-		echo '<table><tr>';
-		echo "<td colspan=3 ><center><img src='".dirname(__FILE__)."/imagens/i3geo1.jpg'></td></tr>";
-		echo "<tr><td><center><img src='".dirname(__FILE__)."/imagens/pspb.png'></td>";
-		echo "<td><center><img src='".dirname(__FILE__)."/imagens/mapserv.png'></td>";
-		echo "<td><center><img src='".dirname(__FILE__)."/imagens/yui-logo.png'></td>";
-		echo "<td><center><a href='http://mapas.mma.gov.br/download' target=blank ><img src='".dirname(__FILE__)."/imagens/somerights20_pt.gif' ></a></td>";
-		echo "</tr></table>";
-		echo '<BODY bgcolor="white" style="background-color:white">';
-	}
-}
-/*
-Insere elementos no mapa a partir de uma string definida em wkt
-*/
-function insereWKTUrl()
-{
-	global $tamanhosimbolo,$simbolo,$corsimbolo,$wkt,$nometemawkt,$dir_tmp,$imgdir,$tmpfname,$locaplic;
-	include_once "pacotes/phpxbase/api_conversion.php";
-	if (!isset($nometemapontos))
-	{$nometemapontos="WKT";}
-	if ($nometemapontos == "")
-	{$nometemapontos="WKT";}
-	//
-	//cria o shape file
-	//
-	$shape = ms_shapeObjFromWkt($wkt);
-	$tipol = $shape->type;
-	if($tipol == 0){$tipol = 3;}
-	$nomeshp = $dir_tmp."/".$imgdir."/wkts";
-	// cria o dbf
-	$def = array();
-	$items = array("COORD");
-	foreach ($items as $ni)
-	{$def[] = array($ni,"C","254");}
-	if(!function_exists(dbase_create))
-	{xbase_create($nomeshp.".dbf", $def);}
-	else
-	{dbase_create($nomeshp.".dbf", $def);}
-	$dbname = $nomeshp.".dbf";
-	$db=xbase_open($dbname,2);
-	if ($tipol == 1)
-	{$novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_ARC);}
-	if ($tipol == 3)
-	{$novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_MULTIPOINT);}
-	if ($tipol == 2)
-	{$novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_POLYGON);}
-	$reg[] = "";
-	$novoshpf->addShape($shape);
-	xbase_add_record($db,$reg);
-	$novoshpf->free();
-	xbase_close($db);
-	//adiciona o layer
-	$mapa = ms_newMapObj($tmpfname);
-	$layer = ms_newLayerObj($mapa);
-	$layer->set("name","wktins");
-	$layer->set("data",$nomeshp.".shp");
-	$layer->setmetadata("DOWNLOAD","sim");
-	$layer->setmetadata("temalocal","sim");
-	$layer->setmetadata("tema",$nometemawkt);
-	$layer->setmetadata("classe","sim");
-	$layer->set("type",$shape->type);
-	$layer->set("status",MS_DEFAULT);
-	$classe = ms_newClassObj($layer);
-	$classe->set("name"," ");
-	$estilo = ms_newStyleObj($classe);
-	if($shape->type == 0)
-	{
-		if(!isset($simbolo))
-		$estilo->set("symbolname","ponto");
-		if(!isset($tamanhosimbolo))
-		$estilo->set("size",6);
-	}
-	if($shape->type == 1)
-	{
-		if(!isset($simbolo))
-		$estilo->set("symbolname","linha");
-		if(!isset($tamanhosimbolo))
-		$estilo->set("size",3);
-	}
-	if($shape->type == 2)
-	{$layer->set("opacity","50");}
-
-	$cor = $estilo->color;
-	if(!isset($corsimbolo))
-	{$corsimbolo ="255,0,0";}
-	$corsimbolo = str_replace(" ",",",$corsimbolo);
-	$corsimbolo = explode(",",$corsimbolo);
-	$cor->setRGB($corsimbolo[0],$corsimbolo[1],$corsimbolo[2]);
-
-	$salvo = $mapa->save($tmpfname);
-	erroCriacao();
-}
-/*
-Insere um tema do tipo ponto
-
-*/
-function inserePontosUrl()
-{
-	global $pontos,$tamanhosimbolo,$simbolo,$corsimbolo,$nometemapontos,$dir_tmp,$imgdir,$tmpfname,$locaplic;
-	include_once "pacotes/phpxbase/api_conversion.php";
-	if (!isset($nometemapontos))
-	{$nometemapontos="Pontos";}
-	if ($nometemapontos == "")
-	{$nometemapontos="Pontos";}
-	//
-	//cria o shape file
-	//
-	$tipol = MS_SHP_POINT;
-	$nomeshp = $dir_tmp."/".$imgdir."/".nomeRandomico();
-	// cria o dbf
-	$def = array();
-	$items = array("COORD");
-	foreach ($items as $ni)
-	{$def[] = array($ni,"C","254");}
-	if(!function_exists(dbase_create)){
-		xbase_create($nomeshp.".dbf", $def);
-	}
-	else{
-		dbase_create($nomeshp.".dbf", $def);
-	}
-	$dbname = $nomeshp.".dbf";
-	$db=xbase_open($dbname,2);
-	$novoshpf = ms_newShapefileObj($nomeshp, $tipol);
-	$pontos = explode(" ",trim($pontos));
-	if(count($pontos) == 1){
-		$pontos = explode(",",trim($pontos[0]));
-	}
-	foreach ($pontos as $p){
-		if (is_numeric($p)){
-			$pontosn[] = $p;
-		}
-	}
-	$pontos = $pontosn;
-	for ($ci = 0;$ci < count($pontos);$ci=$ci+2){
-		$reg = array();
-		$reg[] = $pontos[$ci]." ".$pontos[$ci+1];
-		$shape = ms_newShapeObj($tipol);
-		$linha = ms_newLineObj();
-		$linha->addXY($pontos[$ci],$pontos[$ci+1]);
-		$shape->add($linha);
-		$novoshpf->addShape($shape);
-		xbase_add_record($db,$reg);
-	}
-	$novoshpf->free();
-	xbase_close($db);
-	//adiciona o layer
-	$mapa = ms_newMapObj($tmpfname);
-	$layer = ms_newLayerObj($mapa);
-	$layer->set("name","pontoins");
-	$layer->set("data",$nomeshp.".shp");
-	$layer->setmetadata("DOWNLOAD","sim");
-	$layer->setmetadata("tema",$nometemapontos);
-	$layer->setmetadata("classe","sim");
-	$layer->setmetadata("temalocal","sim");
-	$layer->setmetadata("ATLAS","nao");
-	$layer->set("type",MS_LAYER_POINT);
-	$layer->set("status",MS_DEFAULT);
-	$classe = ms_newClassObj($layer);
-	$classe->set("name"," ");
-	$estilo = ms_newStyleObj($classe);
-
-	if(!isset($simbolo))
-	{$simbolo = "ponto";}
-	$estilo->set("symbolname",$simbolo);
-	if(!isset($tamanhosimbolo))
-	{$tamanhosimbolo = 6;}
-	$estilo->set("size",$tamanhosimbolo);
-	$cor = $estilo->color;
-	if(!isset($corsimbolo))
-	{$corsimbolo ="255,0,0";}
-	$corsimbolo = str_replace(" ",",",$corsimbolo);
-	$corsimbolo = explode(",",$corsimbolo);
-	$cor->setRGB($corsimbolo[0],$corsimbolo[1],$corsimbolo[2]);
-
-	$salvo = $mapa->save($tmpfname);
-	erroCriacao();
-}
-/*
-Insere um tema do tipo linear
-
-As linhas devem ter os pontos separados por espa&ccedil;os e cada linha separada por v&iacute;rgula
-
-*/
-function insereLinhasUrl()
-{
-	global $tamanhosimbolo,$simbolo,$corsimbolo,$linhas,$nometemalinhas,$dir_tmp,$imgdir,$tmpfname,$locaplic;
-	include_once "pacotes/phpxbase/api_conversion.php";
-	if (!isset($nometemalinhas))
-	{$nometemalinhas="Linhas";}
-	if ($nometemalinhas == "")
-	{$nometemalinhas="Linhas";}
-	//
-	//cria o shape file
-	//
-	$tipol = MS_SHP_ARC;
-	$nomeshp = $dir_tmp."/".$imgdir."/".nomeRandomico();
-	// cria o dbf
-	$def = array();
-	$items = array("COORD");
-	foreach ($items as $ni){
-		$def[] = array($ni,"C","254");
-	}
-	if(!function_exists(dbase_create)){
-		xbase_create($nomeshp.".dbf", $def);
-	}
-	else{
-		dbase_create($nomeshp.".dbf", $def);
-	}
-	$dbname = $nomeshp.".dbf";
-	$db=xbase_open($dbname,2);
-	$novoshpf = ms_newShapefileObj($nomeshp, $tipol);
-	$linhas = explode(",",trim($linhas));
-	$pontosLinhas = array(); //guarda os pontos de cada linha em arrays
-	foreach ($linhas as $l){
-		$tempPTs = explode(" ",trim($l));
-		$temp = array();
-		foreach ($tempPTs as $p){
-			if (is_numeric($p)){
-				$temp[] = $p;
-			}
-		}
-		$pontosLinhas[] = $temp;
-	}
-	foreach ($pontosLinhas as $ptsl){
-		$linhas = $ptsl;
-		$shape = ms_newShapeObj(MS_SHAPE_LINE);
-		$linha = ms_newLineObj();
-		$reg = array();
-		$reg[] = implode(",",$ptsl);
-		for ($ci = 0;$ci < count($linhas);$ci=$ci+2){
-			$linha->addXY($linhas[$ci],$linhas[$ci+1]);
-
-		}
-		$shape->add($linha);
-		$novoshpf->addShape($shape);
-		xbase_add_record($db,$reg);
-	}
-	$novoshpf->free();
-	xbase_close($db);
-	//adiciona o layer
-	$mapa = ms_newMapObj($tmpfname);
-	$layer = ms_newLayerObj($mapa);
-	$layer->set("name","linhains");
-	$layer->set("data",$nomeshp.".shp");
-	$layer->setmetadata("DOWNLOAD","sim");
-	$layer->setmetadata("temalocal","sim");
-	$layer->setmetadata("tema",$nometemalinhas);
-	$layer->setmetadata("classe","sim");
-	$layer->setmetadata("ATLAS","nao");
-	$layer->set("type",MS_LAYER_LINE);
-	$layer->set("status",MS_DEFAULT);
-	$classe = ms_newClassObj($layer);
-	$classe->set("name"," ");
-	$estilo = ms_newStyleObj($classe);
-
-	if(isset($simbolo)){
-		$simbolo = "linha";
-		$estilo->set("symbolname",$simbolo);
-	}
-	if(!isset($tamanhosimbolo)){
-		$tamanhosimbolo = 4;
-	}
-	$estilo->set("width",$tamanhosimbolo);
-	$cor = $estilo->color;
-	if(!isset($corsimbolo))
-	{$corsimbolo ="255,0,0";}
-	$corsimbolo = str_replace(" ",",",$corsimbolo);
-	$corsimbolo = explode(",",$corsimbolo);
-	$cor->setRGB($corsimbolo[0],$corsimbolo[1],$corsimbolo[2]);
-
-	$salvo = $mapa->save($tmpfname);
-	erroCriacao();
-}
-/*
-Insere um tema poligonal.
-
-Os pol&iacute;gonos devem ter os pontos separados por espa&ccedil;os e cada pol&iacute;gono separado por v&iacute;rgula
-*/
-function inserePoligonosUrl()
-{
-	global $tamanhosimbolo,$simbolo,$corsimbolo,$poligonos,$nometemapoligonos,$dir_tmp,$imgdir,$tmpfname,$locaplic;
-	include_once "pacotes/phpxbase/api_conversion.php";
-	if (!isset($nometemapoligonos))
-	{$nometemapoligonos="Poligonos";}
-	if ($nometemapoligonos == "")
-	{$nometemapoligonos="Poligonos";}
-	//
-	//cria o shape file
-	//
-	$tipol = MS_SHP_POLYGON;
-	$nomeshp = $dir_tmp."/".$imgdir."/".nomeRandomico();
-	// cria o dbf
-	$def = array();
-	$items = array("COORD");
-	foreach ($items as $ni)
-	{$def[] = array($ni,"C","254");}
-	if(!function_exists(dbase_create))
-	{xbase_create($nomeshp.".dbf", $def);}
-	else
-	{dbase_create($nomeshp.".dbf", $def);}
-	$dbname = $nomeshp.".dbf";
-	$db=xbase_open($dbname,2);
-	$novoshpf = ms_newShapefileObj($nomeshp, $tipol);
-	$linhas = explode(",",trim($poligonos));
-	$pontosLinhas = array(); //guarda os pontos de cada linha em arrays
-	foreach ($linhas as $l)
-	{
-		$tempPTs = explode(" ",trim($l));
-		$temp = array();
-		foreach ($tempPTs as $p)
-		if (is_numeric($p)){$temp[] = $p;}
-		$pontosLinhas[] = $temp;
-	}
-	foreach ($pontosLinhas as $ptsl)
-	{
-		$linhas = $ptsl;
-		$shape = ms_newShapeObj(MS_SHAPE_POLYGON);
-		$linha = ms_newLineObj();
-		$reg = array();
-		$reg[] = "";
-		for ($ci = 0;$ci < count($linhas);$ci=$ci+2)
-		{
-			$linha->addXY($linhas[$ci],$linhas[$ci+1]);
-		}
-		$shape->add($linha);
-		$novoshpf->addShape($shape);
-		xbase_add_record($db,$reg);
-	}
-	$novoshpf->free();
-	xbase_close($db);
-	//adiciona o layer
-	$mapa = ms_newMapObj($tmpfname);
-	$layer = ms_newLayerObj($mapa);
-	$layer->set("name","linhains");
-	$layer->set("data",$nomeshp.".shp");
-	$layer->setmetadata("DOWNLOAD","sim");
-	$layer->setmetadata("temalocal","sim");
-	$layer->setmetadata("tema",$nometemapoligonos);
-	$layer->setmetadata("classe","sim");
-	$layer->setmetadata("ATLAS","nao");
-	$layer->set("type",MS_LAYER_POLYGON);
-	$layer->set("opacity","50");
-	$layer->set("status",MS_DEFAULT);
-	$classe = ms_newClassObj($layer);
-	$classe->set("name"," ");
-	$estilo = ms_newStyleObj($classe);
-
-	$cor = $estilo->color;
-	if(!isset($corsimbolo))
-	{$corsimbolo ="255,0,0";}
-	$corsimbolo = str_replace(" ",",",$corsimbolo);
-	$corsimbolo = explode(",",$corsimbolo);
-	$cor->setRGB($corsimbolo[0],$corsimbolo[1],$corsimbolo[2]);
-
-	$salvo = $mapa->save($tmpfname);
-	erroCriacao();
-}
-/*
-Inclui no mapa um tema do tipo WMS
-*/
-function incluiTemaWms()
-{
-	global $nome_wms,$url_wms,$layer_wms,$style_wms,$srs_wms,$image_wms,$versao_wms,$tmpfname,$locaplic;
-	include_once ($locaplic."/classesphp/classe_mapa.php");
-	if(!$nome_wms)
-	{$nome = $layer_wms." ".$style_wms;}
-	else
-	$nome = $nome_wms;
-	$m = new Mapa($tmpfname);
-	$m->adicionatemawms($layer_wms,$url_wms,$style_wms,$srs_wms,$image_wms,$locaplic,"",$versao_wms,$nome,"","","","","nao","text/plain","");
-	$salvo = $m->salva($tmpfname);
-	//echo $tmpfname;exit;
-	erroCriacao();
-}
-/*
-Projeto gvsig
-*/
-function incluiMapaGvsig($gvsiggvp,$gvsigview=""){
-
-}
-/*
-Captura e mostra os erros de processamento do mapserver
-*/
-function erroCriacao(){
-	$error = ms_GetErrorObj();
-	while($error && $error->code != MS_NOERR)
-	{
-		printf("<br>Error in %s: %s<br>\n", $error->routine, $error->message);
-		$error = $error->next();
-	}
-	ms_ResetErrorList();
-}
-/*
-Cria os diret&oacute;rios tempor&aacute;rios para a aplica&ccedil;&atilde;o.
-
-Parametro:
-
-$dir_tmp {string} - Diret&oacute;rio tempor&aacute;rio (no servidor) utilizado pelo mapserver.
-
-$cachedir {string} - Diret&oacute;rio de cache tempor&aacute;rio definido no ms_configura.php
-
-Retorno:
-
-{boleano}
-*/
-function criaDirMapa($dir_tmp,$cachedir=""){
-	if(empty($dir_tmp)){
-		return false;
-	}
-	if(!file_exists($dir_tmp)){
-		@mkdir ($dir_tmp,0744);
-	}
-	if(file_exists($dir_tmp)){
-		foreach(glob($dir_tmp . '/{,.}*.php', GLOB_BRACE) as $f) {
-			unlink ($f);
-		}
-		$tmpdirname = nomeRandomico();
-		$crdir = @mkdir ($dir_tmp."/".$tmpdirname,0744);
-		chmod($dir_tmp."/".$tmpdirname,0744);
-		$crdiri = @mkdir ($dir_tmp."/img".$tmpdirname,0744);
-		chmod($dir_tmp."/img".$tmpdirname,0744);
-		$mapfile = $dir_tmp."/".$tmpdirname."/".$tmpdirname.".map";
-		$tmpimgname = "img".$tmpdirname;
-		if(!file_exists($dir_tmp."/comum")){
-			@mkdir($dir_tmp."/comum",0744);
-		}
-		if(!file_exists($dir_tmp."/saiku-datasources")){
-			//utilizado para armazenar os arquivos de fonte de dados do SAIKU
-			@mkdir($dir_tmp."/saiku-datasources",0744);
-			chmod($dir_tmp."/saiku-datasources",0744);
-		}
-		//
-		if($cachedir == ""){
-			if(!file_exists($dir_tmp."/cache")){
-				@mkdir($dir_tmp."/cache",0744);
-				chmod($dir_tmp."/cache",0744);
-				@mkdir($dir_tmp."/cache/googlemaps",0744);
-				chmod($dir_tmp."/cache/googlemaps",0744);
-			}
-		}
-		else{
-			if(!file_exists($cachedir)){
-				@mkdir($cachedir,0744);
-				chmod($cachedir,0744);
-				@mkdir($cachedir."/googlemaps",0744);
-				chmod($cachedir."/googlemaps",0744);
-			}
-		}
-		if(file_exists($dir_tmp."/".$tmpdirname)){
-			return array($mapfile,$tmpdirname,$tmpimgname);
-		}
-		else{
-			return false;
-		}
-	}
-	else{
-		return false;
-	}
-}
-?>
+	";
+    exit();
+}
+// $_COOKIE = array();
+
+//
+// quando $funcao existe, &eacute; pq o ms_criamapa.php est&aacute;
+// sendo utilizado como um include em classesphp/mapa_controle.php
+//
+
+if (! isset($funcao)) {
+    ob_end_clean();
+    /*
+     * Carrega as extens&otilde;es PHP
+     *
+     * Carrega as extens&otilde;es utilizadas no programa de inicializa&ccedil;&atilde;o.
+     * A carga das extens&otilde;es geralmente &eacute; necess&aacute;ria nas instala&ccedil;&otilde;es windows (ms4w) ou quando as mesmas n&atilde;o s&atilde;o carregadas pela pr&oacute;pria inicializa&ccedil;&atilde;o do PHP.
+     */
+    include_once (dirname(__FILE__) . "/classesphp/carrega_ext.php");
+    /*
+     * Include dos arquivos PHP.
+     *
+     * Inclui os programas php com fun&ccedil;&otilde;es utilizadas pelo ms_criamapa.php
+     */
+    include_once (dirname(__FILE__) . "/classesphp/sani_request.php");
+    include_once (dirname(__FILE__) . "/classesphp/funcoes_gerais.php");
+    if (! isset($_GET["interface"])) {
+        $_GET["interface"] = "";
+    }
+    $interface = $_GET["interface"];
+}
+$parurl = array_merge($_GET, $_POST);
+//
+// $base pode vir do ms_configura ou da URL
+// o ms_configura pode ter sido inserido antes
+//
+if (empty($base) && ! empty($parurl["base"])) {
+    $base = $parurl["base"];
+}
+
+ms_ResetErrorList();
+$metaestatids = @$parurl["metaestatids"];
+$temasa = @$parurl["temasa"];
+$layers = @$parurl["layers"];
+$desligar = @$parurl["desligar"];
+$mapext = @$parurl["mapext"];
+$executa = ""; // $parurl["executa"];
+$perfil = @$parurl["perfil"];
+$caminho = @$parurl["caminho"];
+$pontos = @$parurl["pontos"];
+$nometemapontos = @$parurl["nometemapontos"];
+$linhas = @$parurl["linhas"];
+$nometemalinhas = @$parurl["nometemalinhas"];
+$poligonos = @$parurl["poligonos"];
+$nometemapoligonos = @$parurl["nometemapoligonos"];
+$simbolo = @$parurl["simbolo"];
+$corsimbolo = @$parurl["corsimbolo"];
+$tamanhosimbolo = @$parurl["tamanhosimbolo"];
+$wkt = @$parurl["wkt"];
+$nometemawkt = @$parurl["nometemawkt"];
+$idioma = @$parurl["idioma"];
+$kmlurl = @$parurl["kmlurl"];
+$url_wms = @$parurl["url_wms"];
+$layer_wms = @$parurl["layer_wms"];
+$style_wms = @$parurl["style_wms"];
+$nome_wms = @$parurl["nome_wms"];
+$srs_wms = @$parurl["srs_wms"];
+$image_wms = @$parurl["image_wms"];
+$versao_wms = @$parurl["versao_wms"];
+$gvsigview = @$parurl["gvsigview"];
+$restauramapa = @$parurl["restauramapa"];
+
+$versao = versao();
+$versao = $versao["principal"];
+
+//
+// a vari&aacute;vel $base pode ser definida em ms_configura, mas a prefer&ecirc;ncia &eacute; pela defini&ccedil;&atilde;o j&aacute; existente
+// por isso, $base &eacute; guardada em uma vari&aacute;vel e retomada apos o include de ms_configura.php
+// se restauramapa estiver definido, usa o mapfile guardado no banco de administracao como a base
+//
+if (! isset($dir_tmp)) {
+    include_once (dirname(__FILE__) . "/ms_configura.php");
+    if (! empty($parurl["base"])) {
+        $base = $parurl["base"];
+    }
+    if (! empty($parurl["interface"])) {
+        $interface = $parurl["interface"];
+    }
+}
+if (isset($logExec) && $logExec["init"] == true) {
+    i3GeoLog("prog: ms_criamapa url: " . implode("&", array_merge($_GET, $_POST)), $dir_tmp);
+}
+if (! empty($restauramapa)) {
+    $base = restauraMapaAdmin($restauramapa, $dir_tmp);
+    $m = ms_newMapObj($base);
+    $w = $m->web;
+    $w->set("imagepath", dirname($w->imagepath) . "/");
+    $w->set("imageurl", dirname($w->imageurl) . "/");
+    $m->save($base);
+} else {
+    if (isset($base)) {
+        $tempBaseX = $base;
+    }
+    if (isset($tempBaseX) && $tempBaseX != "") {
+        $base = $tempBaseX;
+    }
+}
+// verifica se o usuario trocou a senha do master
+if ($_SERVER['SERVER_NAME'] != "localhost" && ($i3geomaster[0]["usuario"] == "admin" && $i3geomaster[0]["senha"] == "admin")) {
+    echo json_encode(array(
+        "bloqueado" => "Bloqueado. ATENCAO!!! Acesso bloqueado: edite o arquivo i3geo/ms_configura.php e altere o login e senha da variavel i3geomaster"
+    ));
+    exit();
+}
+/*
+ * Define o cookie para o idioma da interface
+ */
+if (isset($idioma) && $idioma != "") {
+    setcookie("i3geolingua", $idioma);
+}
+/*
+ * Cria os diretorios tempor&aacute;rios que ser&atilde;o utilizados pelo i3geo para armazenar as imagens e outros dados.
+ */
+$diretorios = criaDirMapa($dir_tmp, $cachedir);
+if (! $diretorios) {
+    echo "<p style=color:red ><b>N&atilde;o foi poss&iacute;vel criar os diret&oacute;rios tempor&aacute;rios em $dir_tmp.</b></p>";
+    exit();
+}
+criaIndex($dir_tmp, $diretorios);
+$tmpfname = $diretorios[0];
+$protocolo = explode("/", $_SERVER['SERVER_PROTOCOL']);
+/*
+ * Prepara as vari&aacute;veis que ser&atilde;o incluidas na se&ccedil;&atilde;o
+ *
+ * As vari&aacute;veis v&ecirc;m do arquivo ms_configura.php e s&atilde;o armazenadas em uma se&ccedil;&atilde;o com nome espec&iacute;fico para o i3geo.
+ */
+if (! isset($mapext) || empty($mapext)) {
+    $mapext = "";
+} else {
+    $mapext = str_replace(",", " ", $mapext);
+    setcookie("i3geoUltimaExtensao", $mapext);
+}
+$saikuUrl_ = $saikuUrl;
+$cachedir_ = $cachedir;
+$dir_tmp_ = $dir_tmp;
+$emailInstituicao_ = $emailInstituicao;
+$locmapserv_ = $locmapserv;
+$locaplic_ = $locaplic;
+// $locsistemas_ = $locsistemas;
+// $locidentifica_ = $locidentifica;
+$R_path_ = $R_path;
+$mapext_ = $mapext;
+
+$debug_ = @$debug;
+$ler_extensoes_ = $ler_extensoes;
+$postgis_mapa_ = $postgis_mapa;
+$tituloInstituicao_ = $tituloInstituicao;
+// $atlasxml_ = $atlasxml;
+$expoeMapfile_ = $expoeMapfile;
+$googleApiKey_ = $googleApiKey;
+$mensagemInicia_ = $mensagemInicia;
+$interfacePadrao_ = $interfacePadrao;
+if (empty($interface)) {
+    $interface_ = $interfacePadrao;
+}
+if (isset($kmlurl)) {
+    $kmlurl_ = $kmlurl;
+}
+//
+// se houver string de conex&atilde;o para substitui&ccedil;&atilde;o
+// o modo cgi n&atilde;o ir&aacute; funcionar
+//
+if ($postgis_mapa != "") {
+    $utilizacgi = "nao";
+}
+if (! isset($perfil)) {
+    $perfil = "";
+}
+$perfil_ = $perfil;
+$utilizacgi_ = $utilizacgi;
+if ((isset($navegadoresLocais)) && ($navegadoresLocais != "")) {
+    $navegadoresLocais_ = "sim";
+} else {
+    $navegadoresLocais_ = "nao";
+}
+if (empty($i3georendermode)) {
+    $i3georendermode_ = 0;
+} else {
+    $i3georendermode_ = $i3georendermode;
+}
+if (empty($statusFerramentas)) {
+    $statusFerramentas_ = array();
+} else {
+    $statusFerramentas_ = $statusFerramentas;
+}
+if (empty($logExec)) {
+    $logExec_ = "";
+} else {
+    $logExec_ = $logExec;
+}
+if (! isset($i3geoPermiteLogin)) {
+    $i3geoPermiteLogin_ = "";
+} else {
+    $i3geoPermiteLogin_ = $i3geoPermiteLogin;
+}
+/*
+ * Inicia a se&ccedil;&atilde;o
+ *
+ * O i3geo inicia uma se&ccedil;&atilde;o espec&iacute;fica no servidor, denominada i3GeoPHP.
+ * Se j&aacute; houver uma se&ccedil;&atilde;o aberta, em fun&ccedil;&atilde;o de outro browser estar ativo, cria uma nova. Faz a c&oacute;pia das vari&aacute;veis definidas para itens da se&ccedil;&atilde;o.
+ */
+session_name("i3GeoPHP");
+session_start();
+// echo $_SESSION["map_file"];exit;
+if (! isset($g_sid)) {
+    $g_sid = "";
+}
+if (isset($_SESSION["map_file"]) || $g_sid != "" || $g_sid == "undefined") {
+    session_regenerate_id();
+    $_SESSION = array();
+}
+/*
+ * Aguarde
+ *
+ * Monta a apresenta&ccedil;&atilde;o do aguarde.
+ *
+ * Aqui &eacute; necess&aacute;rio verificar se $executa est&aacute; definido
+ * isso pq algumas aplica&ccedil;&otilde;es podem ser prejudicadas caso o aguarde seja mostrado
+ */
+$_SESSION["dir_tmp"] = $dir_tmp_;
+$_SESSION["cachedir"] = $cachedir_;
+$_SESSION["emailInstituicao"] = $emailInstituicao_;
+$_SESSION["locmapserv"] = $locmapserv_;
+$_SESSION["locaplic"] = $locaplic_;
+$_SESSION["R_path"] = $R_path_;
+$_SESSION["mapext"] = $mapext_;
+$_SESSION["debug"] = $debug_;
+$_SESSION["ler_extensoes"] = $ler_extensoes_;
+$_SESSION["postgis_mapa"] = $postgis_mapa_;
+$_SESSION["perfil"] = $perfil_;
+$_SESSION["navegadoresLocais"] = $navegadoresLocais_;
+$_SESSION["utilizacgi"] = $utilizacgi_;
+$_SESSION["tituloInstituicao"] = $tituloInstituicao_;
+$_SESSION["expoeMapfile"] = $expoeMapfile;
+$_SESSION["googleApiKey"] = $googleApiKey_;
+$_SESSION["mensagemInicia"] = $mensagemInicia_;
+$_SESSION["interfacePadrao"] = $interfacePadrao_;
+$_SESSION["logExec"] = $logExec_;
+$_SESSION["i3geoPermiteLogin"] = $i3geoPermiteLogin_;
+if (! isset($customDir)) {
+    $customDir = "";
+}
+$_SESSION["customDir"] = $customDir;
+if (isset($interface_)) {
+    $_SESSION["interface"] = $interface_;
+}
+if (isset($kmlurl_)) {
+    $_SESSION["kmlurl"] = $kmlurl_;
+}
+// rotina de seguran&ccedil;a, ver http://shiflett.org/articles/the-truth-about-sessions
+$fingerprint = 'I3GEOSEC' . $_SERVER['HTTP_USER_AGENT'];
+$_SESSION['fingerprint'] = md5($fingerprint . session_id());
+$_SESSION["mapdir"] = $diretorios[1];
+$_SESSION["imgdir"] = $diretorios[2];
+$_SESSION["contadorsalva"] = 0; // essa variavel e utilizada pela ferramenta telaremota. Toda vez que o mapa e salvo, acrescenta 1 (veja classesphp/mapa_controle.php)
+$_SESSION["i3georendermode"] = $i3georendermode_;
+$_SESSION["saikuUrl"] = $saikuUrl_;
+$_SESSION["logExec"] = $logExec_;
+$_SESSION["i3geoPermiteLogin"] = $i3geoPermiteLogin_;
+
+// sao arrays
+$postgis_mapa = $postgis_mapa_;
+$_SESSION["statusFerramentas"] = $statusFerramentas_;
+/*
+ * Define os arquivos .map
+ *
+ * Seleciona os arquivos mapfile que ser&atilde;o carregados como base conforme o tipo de sistema operacional.
+ *
+ * A vari&aacute;vel $base pode ser definida como um par&acirc;metro na inicializa&ccedil;&atilde;o, caso contr&aacute;rio ser&aacute; utilizado o valor definido em ms_configura.php ou o i3Geo tentar&aacute; descobrir o melhor arquivo a ser usado, conforme o que existir em i3geo/aplicmap.
+ *
+ * Os arquivos .map padr&atilde;o s&atilde;o armazenados em i3geo/aplicmap.
+ * O arquivo &eacute; lido conforma a caracter&iacute;stica do sistema operacional.
+ *
+ */
+$versao = versao();
+$versao = $versao["principal"];
+if (! isset($base) || $base == "") {
+    if (strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) {
+        $base = $locaplic . "/aplicmap/geral1windowsv" . $versao . ".map";
+    } else {
+        if ($base == "" && file_exists('/var/www/i3geo/aplicmap/geral1debianv' . $versao . '.map')) {
+            $base = "/var/www/i3geo/aplicmap/geral1debianv" . $versao . ".map";
+        }
+        if ($base == "" && file_exists('/var/www/html/i3geo/aplicmap/geral1fedorav' . $versao . '.map')) {
+            $base = "/var/www/html/i3geo/aplicmap/geral1fedorav" . $versao . ".map";
+        }
+        if ($base == "" && file_exists('/opt/www/html/i3geo/aplicmap/geral1fedorav' . $versao . '.map')) {
+            $base = "/opt/www/html/i3geo/aplicmap/geral1v" . $versao . ".map";
+        }
+        if ($base == "") {
+            $base = $locaplic . "/aplicmap/geral1v" . $versao . ".map";
+        }
+    }
+}
+// error_log($base);
+// if(!isset($estadosl))
+// {$estadosl = "estadosl";}
+/*
+ * Cria os objetos map que ser&atilde;o processados
+ *
+ * O arquivo definido em $base &eacute; lido como um objeto map. Esse objeto ser&aacute; processado para incluir novos layers e alterar outros par&acirc;metros definidos pelo usu&aacute;rio.
+ */
+if (file_exists($base)) {
+    $map = ms_newMapObj($base);
+    $mapn = ms_newMapObj($base);
+} else {
+    $map = ms_newMapObj($locaplic . "/aplicmap/" . $base . ".map");
+    $mapn = ms_newMapObj($locaplic . "/aplicmap/" . $base . ".map");
+}
+
+/*
+ * Par&acirc;metros adicionais.
+ *
+ * Processa os par&acirc;metros para a inicializa&ccedil;&atilde;o verificando se foram passados pela URL ou n&atilde;o.
+ */
+if (! isset($mapext)) {
+    $mapext = $map->extent->minx . " " . $map->extent->miny . " " . $map->extent->maxx . " " . $map->extent->maxy;
+}
+// arquivo com a imagem de refer&ecirc;ncia
+if (! isset($map_reference_image)) {
+    $map_reference_image = $map->reference->image;
+}
+// extens&atilde;o geogr&aacute;fica da imagem do mapa de refer&ecirc;ncia
+if (! isset($map_reference_extent)) {
+    $map_reference_extent = $map->reference->extent->minx . " " . $map->reference->extent->miny . " " . $map->reference->extent->maxx . " " . $map->reference->extent->maxy;
+}
+if (empty($interface)) {
+    if (! isset($interfacePadrao)) {
+        $interfacePadrao = "ol.htm";
+    }
+    $interface = $interfacePadrao;
+}
+
+if (isset($layers) && ! isset($temasa)) {
+    $temasa = $layers;
+}
+
+incluiTemasIniciais();
+
+if (isset($layers)) {
+    ligaTemas();
+}
+if (isset($desligar)) {
+    desligaTemasIniciais();
+}
+if (isset($map_reference_image)) {
+    $mapn->reference->set("image", $map_reference_image);
+}
+$extr = $mapn->reference->extent;
+if (isset($map_reference_extent)) {
+    $temp = explode(" ", $map_reference_extent);
+    foreach ($temp as $t) {
+        if ($t != "") {
+            $newext[] = $t;
+        }
+    }
+    if (count($newext) == 4) {
+        $extr->setextent($newext[0], $newext[1], $newext[2], $newext[3]);
+    }
+}
+$ext = $mapn->extent;
+$newext = array();
+if ((isset($mapext)) && ($mapext != "")) {
+    $temp = explode(" ", $mapext);
+    foreach ($temp as $t) {
+        if ($t != "") {
+            $newext[] = $t;
+        }
+    }
+    if (count($newext) == 4) {
+        $ext->setextent($newext[0], $newext[1], $newext[2], $newext[3]);
+    }
+} else {
+    // algumas aplicacoes usam essa variavel (SAIKU)
+    $mapext = $ext->minx . " " . $ext->miny . " " . $ext->maxx . " " . $ext->maxy;
+}
+
+/*
+ * Configura os endere&ccedil;os corretos no mapfile.
+ *
+ * Altera as propriedades imagepath e imageurl corrigindo os caminhos padr&atilde;o conforme o diret&oacute;rio criado para armazenar o mapa de trabalho.
+ */
+
+$w = $mapn->web;
+$atual = $w->imagepath;
+$w->set("imagepath", $atual . $diretorios[2] . "/");
+$atual = $w->imageurl;
+$w->set("imageurl", $atual . $diretorios[2] . "/");
+
+$projecao = pegaProjecaoDefault("proj4");
+if ($projecao != "") {
+    $mapn->setProjection($projecao);
+}
+// aplica o tamanho do mapa
+if (isset($parurl["largura"]) && isset($parurl["altura"])) {
+    $mapn->setsize($parurl["largura"], $parurl["altura"]);
+}
+
+$tmpfname = str_replace(".map", "", $tmpfname) . ".map";
+$salvo = $mapn->save($tmpfname);
+
+$_SESSION["imgurl"] = strtolower($protocolo[0]) . "://" . $_SERVER['HTTP_HOST'] . $atual . $diretorios[2] . "/";
+$_SESSION["tmpurl"] = strtolower($protocolo[0]) . "://" . $_SERVER['HTTP_HOST'] . $atual;
+$_SESSION["map_file"] = $tmpfname;
+$_SESSION["mapext"] = $mapext;
+if (isset($executa)) {
+    if (file_exists($executa)) {
+        // include_once ($executa);
+    }
+    if (function_exists($executa)) {
+        // eval($executa."();");
+    }
+}
+if (isset($wkt)) {
+    insereWKTUrl();
+}
+
+if (isset($pontos)) {
+    inserePontosUrl();
+}
+
+if (isset($linhas)) {
+    insereLinhasUrl();
+}
+
+if (isset($poligonos)) {
+    inserePoligonosUrl();
+}
+
+if (isset($url_wms)) {
+    incluiTemaWms();
+}
+
+adaptaLayers($tmpfname, $versao);
+
+// if (file_exists($locaplic."/pacotes/geoip") && file_exists($locaplic."/pacotes/geoip/GeoLiteCity.dat")){
+// require_once(dirname(__FILE__)."/ms_registraip.php");
+// }
+if ($interface != "mashup") {
+    abreInterface($interface, $caminho);
+}
+
+/*
+ * Adapta os dados de cada layer.
+ *
+ * Faz altera&ccedil;&otilde;es em cada layer caso sejam necess&aacute;rias.
+ */
+function adaptaLayers($tmpfname, $versao)
+{
+    global $parurl;
+    $mapa = ms_newMapObj($tmpfname);
+    $path = $mapa->shapepath;
+    $numlayers = $mapa->numlayers;
+    for ($i = 0; $i < $numlayers; ++ $i) {
+        $layer = $mapa->getLayer($i);
+        $ok = true;
+        if ($layer->connection == "") {
+            $ok = false;
+            $d = $layer->data;
+            if ((file_exists($d)) || (file_exists($d . ".shp"))) {
+                $ok = true;
+            } else {
+                if ((file_exists($path . "/" . $d)) || (file_exists($path . "/" . $d . ".shp"))) {
+                    $ok = true;
+                }
+            }
+        }
+        if ($ok == false) {
+            $layer->set("status", MS_OFF);
+        }
+        // para impedir erros na legenda
+        if ($layer->getmetadata("classe") == "") {
+            $layer->setmetadata("classe", "");
+        }
+        if ($versao > 5) {
+            $pr = $layer->getProcessing();
+            if (! in_array("LABEL_NO_CLIP=True", $pr)) {
+                $layer->setprocessing("LABEL_NO_CLIP=True");
+            }
+            if (! in_array("POLYLINE_NO_CLIP=True", $pr)) {
+                $layer->setprocessing("POLYLINE_NO_CLIP=True");
+            }
+        }
+        //
+        // verifica se deve aplicar filtro
+        //
+        $filtro = @$parurl["map_layer_" . $layer->name . "_filter"];
+        if (! empty($filtro)) {
+            $layer->setmetadata("CACHE", "nao");
+            $layer->setfilter($filtro);
+        }
+        corrigeLayerPath($layer, $mapa);
+    }
+    $mapa->save($tmpfname);
+    erroCriacao();
+}
+
+/*
+ * Redireciona para o HTML definido em $interface, abrindo o mapa
+ */
+function abreInterface($interface, $caminho)
+{
+    $nomeInterface = explode(".", basename($interface));
+    if (count(explode(".php", $interface)) > 1) {
+        if (file_exists($caminho . "interface/" . $interface)) {
+            include_once ($caminho . "interface/" . $interface);
+        }
+        exit();
+    } else {
+        if (file_exists($caminho . "interface/" . $interface)) {
+            $urln = $caminho . "interface/" . $interface . "?&" . session_id();
+        } else {
+            $urln = $interface . "?&" . session_id();
+        }
+        if (! headers_sent()) {
+            header("Location:" . $urln);
+        } else {
+            echo "<meta http-equiv='refresh' content='0;url=$urln'>";
+        }
+    }
+}
+
+/*
+ * Desliga os temas definidos na vari&aacute;vel $desligar
+ */
+function desligaTemasIniciais()
+{
+    global $desligar, $mapn;
+    $layers = str_replace(',', " ", $desligar);
+    $lista = explode(" ", $layers);
+    foreach ($lista as $l) {
+        if ($l == "") {
+            continue;
+        }
+        if (@$mapn->getLayerByName($l)) {
+            $layern = $mapn->getLayerByName($l);
+            $layern->set("status", MS_OFF);
+        }
+        $grupos = $mapn->getLayersIndexByGroup($l);
+        if (count($grupos) > 0) {
+            for ($i = 0; $i < count($grupos); ++ $i) {
+                $layern = $mapn->getLayer($grupos[$i]);
+                if (strtolower($layern->group) == strtolower($l)) {
+                    $layern->set("status", MS_OFF);
+                }
+            }
+        }
+    }
+    erroCriacao();
+}
+
+/*
+ * Liga os temas definidos na vari&aacute;vel $layers
+ */
+function ligaTemas()
+{
+    global $layers, $mapn;
+    if (isset($layers)) {
+        $layers = str_replace(',', " ", $layers);
+        $lista = explode(" ", $layers);
+        foreach ($lista as $l) {
+            if ($l == "") {
+                continue;
+            }
+            if (@$mapn->getLayerByName($l)) {
+                $layern = $mapn->getLayerByName($l);
+                $layern->set("status", MS_DEFAULT);
+            }
+            $grupos = $mapn->getLayersIndexByGroup($l);
+            if (count($grupos) > 0) {
+                for ($i = 0; $i < count($grupos); ++ $i) {
+                    $layern = $mapn->getLayer($grupos[$i]);
+                    if (strtolower($layern->group) == strtolower($l)) {
+                        $layern->set("status", MS_DEFAULT);
+                    }
+                }
+            }
+        }
+    }
+    erroCriacao();
+}
+
+/*
+ * Inclui os temas definidos na vari&aacute;vel $temasa
+ *
+ * Os temas devem estar em i3geo/temas
+ */
+function incluiTemasIniciais()
+{
+    global $temasa, $mapn, $locaplic, $metaestatids, $layers;
+    if (strtoupper(substr(PHP_OS, 0, 3)) == 'WIN') {
+        $temasdir = $locaplic . "\\temas";
+    } else {
+        $temasdir = $locaplic . "/temas";
+    }
+    if (! isset($temasa)) {
+        $temasa = "";
+    }
+    $temasa = str_replace(',', " ", $temasa);
+    $alayers = explode(" ", $temasa);
+    if (isset($metaestatids)) {
+        // localhost/i3geo/ms_criamapa.php?metaestatids=25,12&layers=25
+        include_once (dirname(__FILE__) . "/classesphp/classe_metaestatinfo.php");
+        $metaestatids = str_replace(',', " ", $metaestatids);
+        $metaestatids = explode(" ", $metaestatids);
+        $metaestatidsligados = $layers;
+        $metaestatidsligados = str_replace(',', " ", $metaestatidsligados);
+        $metaestatidsligados = explode(" ", $metaestatidsligados);
+        foreach ($metaestatids as $metaestatid) {
+            // $_pg["filtro"] = str_replace('"', "'", $_pg["filtro"]);
+            $m = new MetaestatInfo();
+
+            $parametros = $m->listaParametro($metaestatid, "", "", true, true);
+            // id_parametro_medida,coluna
+            $filtroPar = array();
+            $tituloPar = array();
+            foreach ($parametros as $parametro) {
+                $valoresparametro = $m->valorUnicoMedidaVariavel($metaestatid, $parametro["coluna"]);
+                //var_dump($valoresparametro);
+                //exit();
+                $valormaior = $valoresparametro[count($valoresparametro) - 1];
+                $filtroPar[] = " " . $parametro["coluna"] . "::text = '" . $valormaior[$parametro["coluna"]] . "' ";
+                $tituloPar[] = $parametro["coluna"] . ": " . $valormaior[$parametro["coluna"]];
+            }
+            $dadosMedida = $m->listaMedidaVariavel("", $metaestatid);
+            // var_dump($dadosMedida);exit;
+            $tituloCamada = mb_convert_encoding($dadosMedida["nomemedida"],"ISO-8859-1",mb_detect_encoding($dadosMedida["nomemedida"]));
+            if(count($tituloPar)>0){
+                $tituloCamada = $tituloCamada." (".implode(" ,",$tituloPar)." )";
+            }
+            $mapfilemetaestat = $m->mapfileMedidaVariavel($metaestatid, implode(" AND ", $filtroPar), 0, "polygon", $tituloCamada, "", "", "", "", false, false);
+            // array(3) { ["mapfile"]=> string(52) "/tmp/ms_tmp/AAAAc20ad4d76fe97759aa27a0c99bff6710.map" ["layer"]=> string(36) "AAAAc20ad4d76fe97759aa27a0c99bff6710" ["titulolayer"]=> string(0) "" }
+            // var_dump ($mapfilemetaestat);
+            // exit;
+            array_push($alayers, $mapfilemetaestat["mapfile"]);
+
+            if (in_array($metaestatid, $metaestatidsligados)) {
+                $maptemp = @ms_newMapObj($mapfilemetaestat["mapfile"]);
+                $maptemp->getlayerbyname($mapfilemetaestat["layer"])->set("status", MS_DEFAULT);
+                $maptemp->save($mapfilemetaestat["mapfile"]);
+            }
+        }
+    }
+
+    $existeraster = false;
+    foreach ($alayers as $arqt) {
+        $arqtemp = "";
+        $arqt = trim($arqt);
+        if ($arqt == "") {
+            continue;
+        }
+        $extensao = ".map";
+        if (file_exists($arqt)) {
+            $arqtemp = $arqt;
+        }
+        if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($locaplic . "\\aplicmap\\" . $arqt . $extensao))) {
+            $arqtemp = $locaplic . "\\aplicmap\\" . $arqt . $extensao;
+        } elseif (file_exists($locaplic . "/aplicmap/" . $arqt . $extensao)) {
+            $arqtemp = $locaplic . "/aplicmap/" . $arqt . $extensao;
+        }
+        if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($temasdir . "\\" . $arqt . $extensao))) {
+            $arqtemp = $temasdir . "\\" . $arqt . $extensao;
+        } elseif (file_exists($temasdir . "/" . $arqt . $extensao)) {
+            $arqtemp = $temasdir . "/" . $arqt . $extensao;
+        }
+        if ($arqtemp == "") {
+            // echo "<br>Imposs&iacute;vel acessar tema $arqtemp";
+        } else {
+            if ($extensao == ".map" && ! @ms_newMapObj($arqtemp)) {
+                echo "<br>Problemas com a camada $arqtemp<br>";
+            } else {
+                $maptemp = @ms_newMapObj($arqtemp);
+                for ($i = 0; $i < ($maptemp->numlayers); ++ $i) {
+                    // error_reporting(0);
+                    $layern = $maptemp->getLayer($i);
+                    if ($layern->type == MS_LAYER_RASTER) {
+                        $existeraster = true;
+                    }
+                    if ($layern->name == "estadosl") {
+                        $layern->set("data", $locaplic . "/aplicmap/dados/estados.shp");
+                    }
+                    $layern->setmetadata("nomeoriginal", $layern->name);
+                    $nNome = str_replace(".map", "", basename($arqtemp));
+                    $layern->setmetadata("arquivotemaoriginal", $nNome);
+                    autoClasses($layern, $mapn);
+                    //
+                    // necess&aacute;rio para n&atilde;o alterar a extens&atilde;o do mapa por esse par&acirc;metro
+                    //
+                    $layern->setmetadata("aplicaextensao", "");
+                    // cria e aplica sld se for wms e existirem classes
+                    if ($layern->classitem != "" && $layern->connectiontype == 7 && $layern->numclasses > 0 && $layern->getmetadata("wms_sld_body") == "") {
+                        $tipotemp = $layern->type;
+                        $statustemp = $layern->status;
+                        $tiporep = $layern->getmetadata("tipooriginal");
+                        $layern->set("type", MS_LAYER_POLYGON);
+                        if ($tiporep == "linear") {
+                            $layern->set("type", MS_LAYER_LINE);
+                        }
+                        if ($tiporep == "pontual") {
+                            $layern->set("type", MS_LAYER_POINT);
+                        }
+                        $layern->set("status", MS_DEFAULT);
+                        $sld = $layern->generateSLD();
+                        if ($sld != "")
+                            $layern->setmetadata("wms_sld_body", str_replace('"', "'", $sld));
+                        $layern->set("type", $tipotemp);
+                        $layern->set("status", $statustemp);
+                    }
+                    cloneInlineSymbol($layern, $maptemp, $mapn);
+                    $layerAdicionado = ms_newLayerObj($mapn, $layern);
+                    // echo $layern->name;
+                    corrigeLayerGrid($layern, $layerAdicionado);
+                }
+            }
+        }
+    }
+    erroCriacao();
+}
+
+/*
+ * Cria os arquivos vazios index.htm e index.html nos diretorios tempor&aacute;rios
+ */
+function criaIndex($dir_tmp, $diretorios)
+{
+    if (! file_exists($dir_tmp . "/index.htm")) {
+        $f = fopen($dir_tmp . "/index.htm", "x");
+        fclose($f);
+        $f = fopen($dir_tmp . "/index.html", "x");
+        fclose($f);
+        $f = fopen($dir_tmp . "/" . $diretorios[1] . "/index.html", "x");
+        fclose($f);
+        $f = fopen($dir_tmp . "/" . $diretorios[1] . "/index.htm", "x");
+        fclose($f);
+        $f = fopen($dir_tmp . "/" . $diretorios[2] . "/index.html", "x");
+        fclose($f);
+        $f = fopen($dir_tmp . "/" . $diretorios[2] . "/index.htm", "x");
+        fclose($f);
+    }
+    if (! file_exists($dir_tmp . "/index.htm")) {
+        echo "Erro. N&atilde;o foi poss&iacute;vel gravar no diret&oacute;rio tempor&aacute;rio";
+        exit();
+    }
+}
+
+/*
+ * Mostra a mensagem de aguarde
+ */
+function mostraAguarde()
+{
+    global $interface, $mensagemInicia, $tituloInstituicao;
+    if (! isset($interface)) {
+        echo "<html><head>";
+        echo '<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1"></head>';
+        echo "<title>" . $tituloInstituicao . "</title>";
+        echo '<div id="aguarde"><center>';
+        echo '<p class=paguarde style="font-family: Verdana, Arial, Helvetica, sans-serif;color:black;text-align:center;font-size:12pt"><b>' . $mensagemInicia . '</b><br> Aguarde...preparando o mapa</p>';
+        echo '<table><tr>';
+        echo "<td colspan=3 ><center><img src='" . dirname(__FILE__) . "/imagens/i3geo1.jpg'></td></tr>";
+        echo "<tr><td><center><img src='" . dirname(__FILE__) . "/imagens/pspb.png'></td>";
+        echo "<td><center><img src='" . dirname(__FILE__) . "/imagens/mapserv.png'></td>";
+        echo "<td><center><img src='" . dirname(__FILE__) . "/imagens/yui-logo.png'></td>";
+        echo "<td><center><a href='http://mapas.mma.gov.br/download' target=blank ><img src='" . dirname(__FILE__) . "/imagens/somerights20_pt.gif' ></a></td>";
+        echo "</tr></table>";
+        echo '<BODY bgcolor="white" style="background-color:white">';
+    }
+}
+
+/*
+ * Insere elementos no mapa a partir de uma string definida em wkt
+ */
+function insereWKTUrl()
+{
+    global $tamanhosimbolo, $simbolo, $corsimbolo, $wkt, $nometemawkt, $dir_tmp, $imgdir, $tmpfname, $locaplic;
+    include_once "pacotes/phpxbase/api_conversion.php";
+    if (! isset($nometemapontos)) {
+        $nometemapontos = "WKT";
+    }
+    if ($nometemapontos == "") {
+        $nometemapontos = "WKT";
+    }
+    //
+    // cria o shape file
+    //
+    $shape = ms_shapeObjFromWkt($wkt);
+    $tipol = $shape->type;
+    if ($tipol == 0) {
+        $tipol = 3;
+    }
+    $nomeshp = $dir_tmp . "/" . $imgdir . "/wkts";
+    // cria o dbf
+    $def = array();
+    $items = array(
+        "COORD"
+    );
+    foreach ($items as $ni) {
+        $def[] = array(
+            $ni,
+            "C",
+            "254"
+        );
+    }
+    if (! function_exists(dbase_create)) {
+        xbase_create($nomeshp . ".dbf", $def);
+    } else {
+        dbase_create($nomeshp . ".dbf", $def);
+    }
+    $dbname = $nomeshp . ".dbf";
+    $db = xbase_open($dbname, 2);
+    if ($tipol == 1) {
+        $novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_ARC);
+    }
+    if ($tipol == 3) {
+        $novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_MULTIPOINT);
+    }
+    if ($tipol == 2) {
+        $novoshpf = ms_newShapefileObj($nomeshp, MS_SHP_POLYGON);
+    }
+    $reg[] = "";
+    $novoshpf->addShape($shape);
+    xbase_add_record($db, $reg);
+    $novoshpf->free();
+    xbase_close($db);
+    // adiciona o layer
+    $mapa = ms_newMapObj($tmpfname);
+    $layer = ms_newLayerObj($mapa);
+    $layer->set("name", "wktins");
+    $layer->set("data", $nomeshp . ".shp");
+    $layer->setmetadata("DOWNLOAD", "sim");
+    $layer->setmetadata("temalocal", "sim");
+    $layer->setmetadata("tema", $nometemawkt);
+    $layer->setmetadata("classe", "sim");
+    $layer->set("type", $shape->type);
+    $layer->set("status", MS_DEFAULT);
+    $classe = ms_newClassObj($layer);
+    $classe->set("name", " ");
+    $estilo = ms_newStyleObj($classe);
+    if ($shape->type == 0) {
+        if (! isset($simbolo))
+            $estilo->set("symbolname", "ponto");
+        if (! isset($tamanhosimbolo))
+            $estilo->set("size", 6);
+    }
+    if ($shape->type == 1) {
+        if (! isset($simbolo))
+            $estilo->set("symbolname", "linha");
+        if (! isset($tamanhosimbolo))
+            $estilo->set("size", 3);
+    }
+    if ($shape->type == 2) {
+        $layer->set("opacity", "50");
+    }
+
+    $cor = $estilo->color;
+    if (! isset($corsimbolo)) {
+        $corsimbolo = "255,0,0";
+    }
+    $corsimbolo = str_replace(" ", ",", $corsimbolo);
+    $corsimbolo = explode(",", $corsimbolo);
+    $cor->setRGB($corsimbolo[0], $corsimbolo[1], $corsimbolo[2]);
+
+    $salvo = $mapa->save($tmpfname);
+    erroCriacao();
+}
+
+/*
+ * Insere um tema do tipo ponto
+ *
+ */
+function inserePontosUrl()
+{
+    global $pontos, $tamanhosimbolo, $simbolo, $corsimbolo, $nometemapontos, $dir_tmp, $imgdir, $tmpfname, $locaplic;
+    include_once "pacotes/phpxbase/api_conversion.php";
+    if (! isset($nometemapontos)) {
+        $nometemapontos = "Pontos";
+    }
+    if ($nometemapontos == "") {
+        $nometemapontos = "Pontos";
+    }
+    //
+    // cria o shape file
+    //
+    $tipol = MS_SHP_POINT;
+    $nomeshp = $dir_tmp . "/" . $imgdir . "/" . nomeRandomico();
+    // cria o dbf
+    $def = array();
+    $items = array(
+        "COORD"
+    );
+    foreach ($items as $ni) {
+        $def[] = array(
+            $ni,
+            "C",
+            "254"
+        );
+    }
+    if (! function_exists(dbase_create)) {
+        xbase_create($nomeshp . ".dbf", $def);
+    } else {
+        dbase_create($nomeshp . ".dbf", $def);
+    }
+    $dbname = $nomeshp . ".dbf";
+    $db = xbase_open($dbname, 2);
+    $novoshpf = ms_newShapefileObj($nomeshp, $tipol);
+    $pontos = explode(" ", trim($pontos));
+    if (count($pontos) == 1) {
+        $pontos = explode(",", trim($pontos[0]));
+    }
+    foreach ($pontos as $p) {
+        if (is_numeric($p)) {
+            $pontosn[] = $p;
+        }
+    }
+    $pontos = $pontosn;
+    for ($ci = 0; $ci < count($pontos); $ci = $ci + 2) {
+        $reg = array();
+        $reg[] = $pontos[$ci] . " " . $pontos[$ci + 1];
+        $shape = ms_newShapeObj($tipol);
+        $linha = ms_newLineObj();
+        $linha->addXY($pontos[$ci], $pontos[$ci + 1]);
+        $shape->add($linha);
+        $novoshpf->addShape($shape);
+        xbase_add_record($db, $reg);
+    }
+    $novoshpf->free();
+    xbase_close($db);
+    // adiciona o layer
+    $mapa = ms_newMapObj($tmpfname);
+    $layer = ms_newLayerObj($mapa);
+    $layer->set("name", "pontoins");
+    $layer->set("data", $nomeshp . ".shp");
+    $layer->setmetadata("DOWNLOAD", "sim");
+    $layer->setmetadata("tema", $nometemapontos);
+    $layer->setmetadata("classe", "sim");
+    $layer->setmetadata("temalocal", "sim");
+    $layer->setmetadata("ATLAS", "nao");
+    $layer->set("type", MS_LAYER_POINT);
+    $layer->set("status", MS_DEFAULT);
+    $classe = ms_newClassObj($layer);
+    $classe->set("name", " ");
+    $estilo = ms_newStyleObj($classe);
+
+    if (! isset($simbolo)) {
+        $simbolo = "ponto";
+    }
+    $estilo->set("symbolname", $simbolo);
+    if (! isset($tamanhosimbolo)) {
+        $tamanhosimbolo = 6;
+    }
+    $estilo->set("size", $tamanhosimbolo);
+    $cor = $estilo->color;
+    if (! isset($corsimbolo)) {
+        $corsimbolo = "255,0,0";
+    }
+    $corsimbolo = str_replace(" ", ",", $corsimbolo);
+    $corsimbolo = explode(",", $corsimbolo);
+    $cor->setRGB($corsimbolo[0], $corsimbolo[1], $corsimbolo[2]);
+
+    $salvo = $mapa->save($tmpfname);
+    erroCriacao();
+}
+
+/*
+ * Insere um tema do tipo linear
+ *
+ * As linhas devem ter os pontos separados por espa&ccedil;os e cada linha separada por v&iacute;rgula
+ *
+ */
+function insereLinhasUrl()
+{
+    global $tamanhosimbolo, $simbolo, $corsimbolo, $linhas, $nometemalinhas, $dir_tmp, $imgdir, $tmpfname, $locaplic;
+    include_once "pacotes/phpxbase/api_conversion.php";
+    if (! isset($nometemalinhas)) {
+        $nometemalinhas = "Linhas";
+    }
+    if ($nometemalinhas == "") {
+        $nometemalinhas = "Linhas";
+    }
+    //
+    // cria o shape file
+    //
+    $tipol = MS_SHP_ARC;
+    $nomeshp = $dir_tmp . "/" . $imgdir . "/" . nomeRandomico();
+    // cria o dbf
+    $def = array();
+    $items = array(
+        "COORD"
+    );
+    foreach ($items as $ni) {
+        $def[] = array(
+            $ni,
+            "C",
+            "254"
+        );
+    }
+    if (! function_exists(dbase_create)) {
+        xbase_create($nomeshp . ".dbf", $def);
+    } else {
+        dbase_create($nomeshp . ".dbf", $def);
+    }
+    $dbname = $nomeshp . ".dbf";
+    $db = xbase_open($dbname, 2);
+    $novoshpf = ms_newShapefileObj($nomeshp, $tipol);
+    $linhas = explode(",", trim($linhas));
+    $pontosLinhas = array(); // guarda os pontos de cada linha em arrays
+    foreach ($linhas as $l) {
+        $tempPTs = explode(" ", trim($l));
+        $temp = array();
+        foreach ($tempPTs as $p) {
+            if (is_numeric($p)) {
+                $temp[] = $p;
+            }
+        }
+        $pontosLinhas[] = $temp;
+    }
+    foreach ($pontosLinhas as $ptsl) {
+        $linhas = $ptsl;
+        $shape = ms_newShapeObj(MS_SHAPE_LINE);
+        $linha = ms_newLineObj();
+        $reg = array();
+        $reg[] = implode(",", $ptsl);
+        for ($ci = 0; $ci < count($linhas); $ci = $ci + 2) {
+            $linha->addXY($linhas[$ci], $linhas[$ci + 1]);
+        }
+        $shape->add($linha);
+        $novoshpf->addShape($shape);
+        xbase_add_record($db, $reg);
+    }
+    $novoshpf->free();
+    xbase_close($db);
+    // adiciona o layer
+    $mapa = ms_newMapObj($tmpfname);
+    $layer = ms_newLayerObj($mapa);
+    $layer->set("name", "linhains");
+    $layer->set("data", $nomeshp . ".shp");
+    $layer->setmetadata("DOWNLOAD", "sim");
+    $layer->setmetadata("temalocal", "sim");
+    $layer->setmetadata("tema", $nometemalinhas);
+    $layer->setmetadata("classe", "sim");
+    $layer->setmetadata("ATLAS", "nao");
+    $layer->set("type", MS_LAYER_LINE);
+    $layer->set("status", MS_DEFAULT);
+    $classe = ms_newClassObj($layer);
+    $classe->set("name", " ");
+    $estilo = ms_newStyleObj($classe);
+
+    if (isset($simbolo)) {
+        $simbolo = "linha";
+        $estilo->set("symbolname", $simbolo);
+    }
+    if (! isset($tamanhosimbolo)) {
+        $tamanhosimbolo = 4;
+    }
+    $estilo->set("width", $tamanhosimbolo);
+    $cor = $estilo->color;
+    if (! isset($corsimbolo)) {
+        $corsimbolo = "255,0,0";
+    }
+    $corsimbolo = str_replace(" ", ",", $corsimbolo);
+    $corsimbolo = explode(",", $corsimbolo);
+    $cor->setRGB($corsimbolo[0], $corsimbolo[1], $corsimbolo[2]);
+
+    $salvo = $mapa->save($tmpfname);
+    erroCriacao();
+}
+
+/*
+ * Insere um tema poligonal.
+ *
+ * Os pol&iacute;gonos devem ter os pontos separados por espa&ccedil;os e cada pol&iacute;gono separado por v&iacute;rgula
+ */
+function inserePoligonosUrl()
+{
+    global $tamanhosimbolo, $simbolo, $corsimbolo, $poligonos, $nometemapoligonos, $dir_tmp, $imgdir, $tmpfname, $locaplic;
+    include_once "pacotes/phpxbase/api_conversion.php";
+    if (! isset($nometemapoligonos)) {
+        $nometemapoligonos = "Poligonos";
+    }
+    if ($nometemapoligonos == "") {
+        $nometemapoligonos = "Poligonos";
+    }
+    //
+    // cria o shape file
+    //
+    $tipol = MS_SHP_POLYGON;
+    $nomeshp = $dir_tmp . "/" . $imgdir . "/" . nomeRandomico();
+    // cria o dbf
+    $def = array();
+    $items = array(
+        "COORD"
+    );
+    foreach ($items as $ni) {
+        $def[] = array(
+            $ni,
+            "C",
+            "254"
+        );
+    }
+    if (! function_exists(dbase_create)) {
+        xbase_create($nomeshp . ".dbf", $def);
+    } else {
+        dbase_create($nomeshp . ".dbf", $def);
+    }
+    $dbname = $nomeshp . ".dbf";
+    $db = xbase_open($dbname, 2);
+    $novoshpf = ms_newShapefileObj($nomeshp, $tipol);
+    $linhas = explode(",", trim($poligonos));
+    $pontosLinhas = array(); // guarda os pontos de cada linha em arrays
+    foreach ($linhas as $l) {
+        $tempPTs = explode(" ", trim($l));
+        $temp = array();
+        foreach ($tempPTs as $p)
+            if (is_numeric($p)) {
+                $temp[] = $p;
+            }
+        $pontosLinhas[] = $temp;
+    }
+    foreach ($pontosLinhas as $ptsl) {
+        $linhas = $ptsl;
+        $shape = ms_newShapeObj(MS_SHAPE_POLYGON);
+        $linha = ms_newLineObj();
+        $reg = array();
+        $reg[] = "";
+        for ($ci = 0; $ci < count($linhas); $ci = $ci + 2) {
+            $linha->addXY($linhas[$ci], $linhas[$ci + 1]);
+        }
+        $shape->add($linha);
+        $novoshpf->addShape($shape);
+        xbase_add_record($db, $reg);
+    }
+    $novoshpf->free();
+    xbase_close($db);
+    // adiciona o layer
+    $mapa = ms_newMapObj($tmpfname);
+    $layer = ms_newLayerObj($mapa);
+    $layer->set("name", "linhains");
+    $layer->set("data", $nomeshp . ".shp");
+    $layer->setmetadata("DOWNLOAD", "sim");
+    $layer->setmetadata("temalocal", "sim");
+    $layer->setmetadata("tema", $nometemapoligonos);
+    $layer->setmetadata("classe", "sim");
+    $layer->setmetadata("ATLAS", "nao");
+    $layer->set("type", MS_LAYER_POLYGON);
+    $layer->set("opacity", "50");
+    $layer->set("status", MS_DEFAULT);
+    $classe = ms_newClassObj($layer);
+    $classe->set("name", " ");
+    $estilo = ms_newStyleObj($classe);
+
+    $cor = $estilo->color;
+    if (! isset($corsimbolo)) {
+        $corsimbolo = "255,0,0";
+    }
+    $corsimbolo = str_replace(" ", ",", $corsimbolo);
+    $corsimbolo = explode(",", $corsimbolo);
+    $cor->setRGB($corsimbolo[0], $corsimbolo[1], $corsimbolo[2]);
+
+    $salvo = $mapa->save($tmpfname);
+    erroCriacao();
+}
+
+/*
+ * Inclui no mapa um tema do tipo WMS
+ */
+function incluiTemaWms()
+{
+    global $nome_wms, $url_wms, $layer_wms, $style_wms, $srs_wms, $image_wms, $versao_wms, $tmpfname, $locaplic;
+    include_once ($locaplic . "/classesphp/classe_mapa.php");
+    if (! $nome_wms) {
+        $nome = $layer_wms . " " . $style_wms;
+    } else
+        $nome = $nome_wms;
+    $m = new Mapa($tmpfname);
+    $m->adicionatemawms($layer_wms, $url_wms, $style_wms, $srs_wms, $image_wms, $locaplic, "", $versao_wms, $nome, "", "", "", "", "nao", "text/plain", "");
+    $salvo = $m->salva($tmpfname);
+    // echo $tmpfname;exit;
+    erroCriacao();
+}
+
+/*
+ * Projeto gvsig
+ */
+function incluiMapaGvsig($gvsiggvp, $gvsigview = "")
+{}
+
+/*
+ * Captura e mostra os erros de processamento do mapserver
+ */
+function erroCriacao()
+{
+    $error = ms_GetErrorObj();
+    while ($error && $error->code != MS_NOERR) {
+        printf("<br>Error in %s: %s<br>\n", $error->routine, $error->message);
+        $error = $error->next();
+    }
+    ms_ResetErrorList();
+}
+
+/*
+ * Cria os diret&oacute;rios tempor&aacute;rios para a aplica&ccedil;&atilde;o.
+ *
+ * Parametro:
+ *
+ * $dir_tmp {string} - Diret&oacute;rio tempor&aacute;rio (no servidor) utilizado pelo mapserver.
+ *
+ * $cachedir {string} - Diret&oacute;rio de cache tempor&aacute;rio definido no ms_configura.php
+ *
+ * Retorno:
+ *
+ * {boleano}
+ */
+function criaDirMapa($dir_tmp, $cachedir = "")
+{
+    if (empty($dir_tmp)) {
+        return false;
+    }
+    if (! file_exists($dir_tmp)) {
+        @mkdir($dir_tmp, 0744);
+    }
+    if (file_exists($dir_tmp)) {
+        foreach (glob($dir_tmp . '/{,.}*.php', GLOB_BRACE) as $f) {
+            unlink($f);
+        }
+        $tmpdirname = nomeRandomico();
+        $crdir = @mkdir($dir_tmp . "/" . $tmpdirname, 0744);
+        chmod($dir_tmp . "/" . $tmpdirname, 0744);
+        $crdiri = @mkdir($dir_tmp . "/img" . $tmpdirname, 0744);
+        chmod($dir_tmp . "/img" . $tmpdirname, 0744);
+        $mapfile = $dir_tmp . "/" . $tmpdirname . "/" . $tmpdirname . ".map";
+        $tmpimgname = "img" . $tmpdirname;
+        if (! file_exists($dir_tmp . "/comum")) {
+            @mkdir($dir_tmp . "/comum", 0744);
+        }
+        if (! file_exists($dir_tmp . "/saiku-datasources")) {
+            // utilizado para armazenar os arquivos de fonte de dados do SAIKU
+            @mkdir($dir_tmp . "/saiku-datasources", 0744);
+            chmod($dir_tmp . "/saiku-datasources", 0744);
+        }
+        //
+        if ($cachedir == "") {
+            if (! file_exists($dir_tmp . "/cache")) {
+                @mkdir($dir_tmp . "/cache", 0744);
+                chmod($dir_tmp . "/cache", 0744);
+                @mkdir($dir_tmp . "/cache/googlemaps", 0744);
+                chmod($dir_tmp . "/cache/googlemaps", 0744);
+            }
+        } else {
+            if (! file_exists($cachedir)) {
+                @mkdir($cachedir, 0744);
+                chmod($cachedir, 0744);
+                @mkdir($cachedir . "/googlemaps", 0744);
+                chmod($cachedir . "/googlemaps", 0744);
+            }
+        }
+        if (file_exists($dir_tmp . "/" . $tmpdirname)) {
+            return array(
+                $mapfile,
+                $tmpdirname,
+                $tmpimgname
+            );
+        } else {
+            return false;
+        }
+    } else {
+        return false;
+    }
+}
+?>
 \ No newline at end of file