function markerclusterMapfile()
{
global $dir, $map_file, $layer, $base, $locaplic, $dir_tmp, $postgis_mapa;
if (empty($map_file) && file_exists($dir . "/../../temas/{$layer}.map")) {
$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";
}
}
}
$map_file = $dir_tmp . "/" . nomeRandomico() . ".map";
$mapa = ms_newMapObj($base);
$tempMapa = ms_newMapObj($dir . "/../../temas/{$layer}.map");
$layern = $tempMapa->getlayer(0);
restauraConObj($mapa, $postgis_mapa);
ms_newLayerObj($mapa, $layern);
$mapa->save($map_file);
}
return $map_file;
}
function salva()
{
restauraConObj($this->mapa, $this->postgis_mapa);
$this->mapa->save($this->arquivo);
}
function salva()
{
$this->recalculaSLD();
restauraConObj($this->mapa, $this->postgis_mapa);
$this->mapa->save($this->arquivo);
}
function salva()
{
if ($this->mapa->getmetadata("interface") == "googlemaps") {
$this->mapa->setProjection($this->projO);
}
restauraConObj($this->mapa, $this->postgis_mapa);
$this->mapa->save($this->arquivo);
}
function verifica($map, $solegenda, $tabela, $cache = "sim")
{
global $tipo, $locaplic, $postgis_mapa, $versao, $base, $dir_tmp, $tempo;
$mapUrl = $map;
if ($tipo == "mini" && file_exists('temas/miniaturas/' . $map . ".mini.png") && $cache == "sim") {
Header("Content-type: image/png");
ImagePng(ImageCreateFromPNG('temas/miniaturas/' . $map . ".mini.png"));
exit;
}
if ($tipo == "grande" && file_exists('temas/miniaturas/' . $map . ".grande.png") && $cache == "sim") {
Header("Content-type: image/png");
ImagePng(ImageCreateFromPNG('temas/miniaturas/' . $map . ".grande.png"));
exit;
}
ms_ResetErrorList();
$tema = "";
if (file_exists($map)) {
$tema = $map;
} else {
$map = str_replace("\\", "/", $map);
$map = basename($map);
if (file_exists('temas/' . $map)) {
$tema = 'temas/' . $map;
}
if (file_exists('temas/' . $map . '.map')) {
$tema = 'temas/' . $map . ".map";
}
if (file_exists('temas/' . $map . '.gvp')) {
$tema = 'temas/' . $map . ".gvp";
}
}
if (!file_exists($tema)) {
$tema = $locaplic . "/" . $tema;
}
if ($tipo == "" || $tipo == "todos") {
echo "<hr><br><br><span style='color:red' ><b>Testando: {$tema} </span><pre></b>";
}
if (!file_exists($tema)) {
echo "Arquivo " . $map . " não encontrado.";
exit;
}
if ($tema != "") {
if ($base == "" or !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";
}
}
} else {
if (!file_exists($base)) {
$base = $locaplic . "/aplicmap/" . $base;
}
}
//echo $base;exit;
$mapa = ms_newMapObj($base);
error_reporting(0);
$numlayers = $mapa->numlayers;
for ($i = 0; $i < $numlayers; $i++) {
$layern = $mapa->getlayer($i);
if (!empty($postgis_mapa)) {
if ($layern->connectiontype == MS_POSTGIS) {
$lcon = $layern->connection;
if ($lcon == " " || $lcon == "" || in_array($lcon, array_keys($postgis_mapa))) {
if ($lcon == " " || $lcon == "") {
$layern->set("connection", $postgis_mapa);
} else {
$layern->set("connection", $postgis_mapa[$lcon]);
}
}
}
}
}
if (!stristr($tema, '.php') === FALSE) {
/*
echo "<br>Arquivo <i>$tema</i> é um programa PHP. O teste pode não funcionar.<br>";
include_once($locaplic."/".$tema);
$pegarext = str_replace(".php","",$tema);
$pegarext = str_replace("temas/","",$pegarext);
eval($pegarext."(\$mapa);");
*/
}
if (!stristr($tema, '.map') === FALSE) {
if (file_exists($mapUrl)) {
ms_ResetErrorList();
if (@ms_newMapObj($mapUrl)) {
$nmapa = ms_newMapObj($mapUrl);
} else {
echo "Erro no arquivo {$mapUrl} <br>";
$error = ms_GetErrorObj();
while ($error && $error->code != MS_NOERR) {
printf("<br>Error in %s: %s<br>\n", $error->routine, $error->message);
$error = $error->next();
}
return;
}
} else {
if (@ms_newMapObj($locaplic . "/" . $tema)) {
if (!function_exists("validaAcessoTemas")) {
include $locaplic . "/classesphp/funcoes_gerais.php";
}
if (validaAcessoTemas($locaplic . "/" . $tema, false) == false) {
$nmapa = ms_newMapObj($locaplic . "/" . $tema);
} else {
echo "tema restrito <br>";
exit;
}
} else {
echo "erro no arquivo {$map} <br>";
echo "Obs.: em alguns testes o mapfile pode falhar se o endereço dos arquivos de símbolos estiverem <br>definidos de forma relativa ao invés de absoluta. Nesses casos, ao abrir o i3Geo, <br>o mapfile poderá funcionar. <br>";
$error = ms_GetErrorObj();
while ($error && $error->code != MS_NOERR) {
printf("<br>Error in %s: %s<br>\n", $error->routine, $error->message);
$error = $error->next();
}
return;
}
}
$numlayers = $nmapa->numlayers;
$dados = "";
$simbolos = array();
for ($i = 0; $i < $numlayers; $i++) {
$layern = $nmapa->getlayer($i);
$layern->set("status", MS_DEFAULT);
if (!empty($postgis_mapa)) {
if ($layern->connectiontype == MS_POSTGIS) {
$lcon = $layern->connection;
error_reporting(0);
if ($lcon == " " || $lcon == "" || in_array($lcon, array_keys($postgis_mapa))) {
if ($lcon == " " || $lcon == "") {
$layern->set("connection", $postgis_mapa);
} else {
$layern->set("connection", $postgis_mapa[$lcon]);
}
}
}
}
autoClasses($layern, $nmapa);
error_reporting(0);
if ($layern->classitem != "" && $layern->connectiontype == 7 && $layern->numclasses > 0 && $layern->getmetadata("wms_sld_body") == "") {
$tipotemp = $layern->type;
$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);
}
$sld = $layern->generateSLD();
if ($sld != "") {
$layern->setmetadata("wms_sld_body", str_replace('"', "'", $sld));
}
$layern->set("type", $tipotemp);
}
//pega simbolos locais e aplica no novo mapa
cloneInlineSymbol($layern, $nmapa, $mapa);
$layerAdicionado = ms_newLayerObj($mapa, $layern);
corrigeLayerGrid($layern, $layerAdicionado);
/*
if ($layern->data == ""){
$dados = $layern->connection;
}
else{
$dados = $layern->data;
}
*/
$pegarext = $layern->name;
}
zoomTema($pegarext, $mapa);
}
if (!stristr($tema, '.gvp') === FALSE) {
if (file_exists($mapUrl)) {
$gvsiggvp = $mapUrl;
} else {
$gvsiggvp = $locaplic . "/" . $tema;
}
include_once $locaplic . "/pacotes/gvsig/gvsig2mapfile/class.gvsig2mapfile.php";
$gm = new gvsig2mapfile($gvsiggvp);
$gvsigview = $gm->getViewsNames();
foreach ($gvsigview as $v) {
$dataView = $gm->getViewData($v);
$mapa = $gm->addLayers($mapa, $v, $dataView["layerNames"]);
}
$next = $dataView["extent"];
$ext = $mapa->extent;
$ext->setextent($next[0], $next[1], $next[2], $next[3]);
}
if ($tipo == "mini") {
$mapa->setsize(50, 50);
$sca = $mapa->scalebar;
$sca->set("status", MS_OFF);
}
if ($tipo == "grande") {
$mapa->setsize(300, 300);
$sca = $mapa->scalebar;
$sca->set("status", MS_OFF);
}
if ($tipo == "todos") {
$mapa->setsize(150, 150);
$sca = $mapa->scalebar;
$sca->set("status", MS_OFF);
}
$destino = $dir_tmp . "/" . nomeRandomico() . ".map";
$mapa->save($destino);
validaAcessoTemas($destino, true);
//testa a tabela de atributos
if (isset($_GET["tabela"])) {
include "classesphp/classe_atributos.php";
$t = new Atributos($destino, $map);
restauraCon($destino, $postgis_mapa);
$r = $t->itensTexto();
$colunas = explode(";", $r["itens"]);
$ncolunas = count($colunas);
$registros = $r["valores"];
$nregistros = count($registros);
$error = "";
$error = ms_GetErrorObj();
echo "</div><div style='text-align:left;margin: auto;width:900px;overflow: auto;'>";
while ($error && $error->code != MS_NOERR) {
echo "<br>Error in %s: %s<br>", $error->routine, $error->message;
$error = $error->next();
}
echo "Registros em UTF8 são convertidos para ISO-8859-1<br>";
echo "Registros: " . $nregistros;
"<br>";
echo "<br><b>Tempo leitura (s): ";
echo microtime(true) - $tempo;
echo "</b>";
echo "<table>";
echo "<tr>";
foreach ($colunas as $co) {
echo "<td><b>" . $co . "</b></td>";
}
echo "</tr>";
foreach ($registros as $reg) {
echo "<tr>";
$cc = explode(";", $reg);
foreach ($cc as $c) {
if (mb_detect_encoding($c, "UTF-8", true)) {
$c = mb_convert_encoding($c, "ISO-8859-1", "UTF-8");
}
echo "<td>" . $c . "</td>";
}
echo "</tr>";
}
echo "</table>";
echo "<br><b>Tempo total (montagem da tabela) (s): ";
echo microtime(true) - $tempo;
echo "</b>";
} else {
$mapa = ms_newMapObj($destino);
restauraConObj($mapa, $postgis_mapa);
$objImagem = @$mapa->draw();
//corrige o titulo da legenda
$numlayers = $mapa->numlayers;
for ($j = 0; $j < $numlayers; $j++) {
$l = $mapa->getlayer($j);
if ($l->type != 3 && $l->type != 4) {
$nclass = $l->numclasses;
for ($i = 0; $i < $nclass; $i++) {
$classe = $l->getclass($i);
if ($classe->title === "") {
$classe->title = $classe->name;
}
}
}
}
$objImagemLegenda = @$mapa->drawLegend();
if (!$objImagem) {
echo "Problemas ao gerar o mapa<br>";
$error = "";
$error = ms_GetErrorObj();
while ($error && $error->code != MS_NOERR) {
echo "<br>Error in %s: %s<br>", $error->routine, $error->message;
$error = $error->next();
}
return;
}
if ($objImagem->imagepath == "") {
echo "Erro IMAGEPATH vazio";
}
$nomec = $objImagem->imagepath . nomeRandomico() . "teste.png";
$objImagem->saveImage($nomec);
$nomer = $objImagem->imageurl . basename($nomec);
$nomel = $objImagemLegenda->imagepath . nomeRandomico() . "testel.png";
$objImagemLegenda->saveImage($nomel);
$nomerl = $objImagemLegenda->imageurl . basename($nomel);
if ($tipo == "" || $tipo == "todos") {
if ($solegenda == "nao") {
echo "<img src=" . $nomer . " /><br>";
}
echo "<img src=" . $nomerl . " />";
if ($tipo == "todos") {
//echo "<br>".$dados."<br>";
}
if ($map != "todos") {
echo "<br><b>Tempo (s): ";
echo microtime(true) - $tempo;
echo "</b>";
echo "<br>Erros ocorridos:<br>";
$error = "";
$error = ms_GetErrorObj();
while ($error && $error->code != MS_NOERR) {
echo "<br>Error in %s: %s<br>", $error->routine, $error->message;
$error = $error->next();
}
}
} else {
Header("Content-type: image/png");
ImagePng(ImageCreateFromPNG($nomec));
}
}
}
}
//
//aplica os parametros sobre a grade de coordenadas
//
if (isset($_GET["grade"]) && strtolower($_GET["grade"]) == "sim") {
processaGrade();
}
$oMap->setSymbolSet($locaplic . "/symbols/" . basename($oMap->symbolsetfilename));
$oMap->setFontSet($locaplic . "/symbols/" . basename($oMap->fontsetfilename));
//verifica se existem layers com plugin definido e processa conforme o tipo de plugin
processaPluginI3geo();
//
//caso seja download ou json ou csv
//
processaOutputformatMapfile();
$nomeMapfileTmp = str_replace(".map", "", $nomeMapfileTmp) . ".map";
restauraConObj($oMap, $postgis_mapa);
$oMap->save($nomeMapfileTmp);
validaAcessoTemas($oMap, true);
substituiConObj($oMap, $postgis_mapa);
}
if (ob_get_contents()) {
ob_end_clean();
}
//
//verifica se a requisicao e do tipo TMS.
//
//
//calcula a extensao geografica com base no x,y,z em requisisoes TMS
//quando for do tipo tms $_GET["tms"] contem os parametros do tile
//essa rotina faz um exit ao final
//o cache tms so fucniona se houver apenas uma camada no mapa
$mapa->save($arqtemp . ".map");
if (!file_exists($nomec)) {
if ($objImagem == "") {
$objImagem = $mapa->draw();
$objImagem->saveImage($nomec);
} else {
$i = $mapa->draw();
$objImagem->pasteImage($i, -1);
$objImagem->saveImage($nomec);
}
}
$imagens[] = $nomec;
$duracao[] = $tempo;
//$mapa->save($arqtemp.".map");exit;
}
restauraConObj($mapa, $postgis_mapa);
$mapa->save($arqtemp . ".map");
unlink($arqtemp . ".map");
$mapa = null;
//junta as imagens no gif
include "../../pacotes/gifcreator/GifCreator.php";
$gc = new GifCreator();
$gc->create($imagens, $duracao, 0);
$gifBinary = $gc->getGif();
file_put_contents($arqtemp . ".gif", $gifBinary);
//retorna o gif para o navegador
ob_clean();
header('Content-type: image/gif');
header('Content-Disposition: filename="' . $tema . '.gif"');
echo $gifBinary;
exit;
