Software Público Brasileiro

<?php
/*
Title: Inicializa o I3Geo via URL

Cria os diretórios temporários para o I3Geo e o mapfile inicial.

Abre o I3Geo com a interface padrão ou uma específica.

File: ms_criamapa.php

About: Licença

I3Geo Interface Integrada de Ferramentas de Geoprocessamento para Internet

Direitos Autorais Reservados (c) 2006 Ministério do Meio Ambiente Brasil
Desenvolvedor: Edmar Moretti edmar.moretti@mma.gov.br

Este programa é software livre; você pode redistribuí-lo
e/ou modificá-lo sob os termos da Licença Pública Geral
GNU conforme publicada pela Free Software Foundation;
tanto a versão 2 da Licença.
Este programa é distribuído na expectativa de que seja útil,
porém, SEM NENHUMA GARANTIA; nem mesmo a garantia implícita
de COMERCIABILIDADE OU ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA.
Consulte a Licença Pública Geral do GNU para mais detalhes.
Você deve ter recebido uma cópia da Licença Pública Geral do
GNU junto com este programa; se não, escreva para a
Free Software Foundation, Inc., no endereço
59 Temple Street, Suite 330, Boston, MA 02111-1307 USA.

About: Parâmetros

temasa - lista separada por espaços com os nomes dos arquivos map que serão adicionados

layers - lista separada por espaços com os nomes dos layers que serão ligados

mapext - extensao geografica que será utilizada

executa - programa ou função em php adicional que será executado via include. O mapfile nessa altura está na variável tmpfname

interface - nome da interface que será utilizada para abrir o mapa As interfaces são arquivos HTML que podem estar no diretório aplicmap

perfil - perfil utilizado para restringir os menus de temas

caminho - caminho para os programas que serão incluídos com "include"

pontos - lista de coordenadas x e y que serão adicionadas como pontos no mapa.

nometemapontos - nome do tema de pontos

debug - ativa o retorno de mensagens de erro do PHP sim|nao

About: Exemplo

http://localhost/i3geo/ms_criamapa.php?temasa=estadosl
*/
//
//verifica se o debug deve ser ativado, checando a variável debug
//
if (!isset($debug))
{error_reporting(0);$debug="nao";}
else
{error_reporting(E_ALL);$debug="sim";}
//
//verifica se a variável $caminho está definida
//
if (isset($_GET["caminho"]))
{$caminho = $_GET["caminho"];}
if (!isset($caminho)){$caminho = "";}
//
//carrega as extensões
//
require_once ($caminho."classesphp/carrega_ext.php");
//
//carrega as funções adicionais
//
require_once ($caminho."classesphp/pega_variaveis.php");
require_once ($caminho."classesphp/funcoes_gerais.php");
require_once ($caminho."ms_configura.php");
//
//define a variável $mapext que define a extensão geográfica do mapa
//
if (!isset($mapext)){$mapext="";}
//
//prepara as variáveis que serão incluidas na sessão
//as variáveis vêm do arquivo ms_configura
//
$dir_tmp_ = $dir_tmp;
$temasdir_ = $temasdir;
$temasaplic_ = $temasaplic;
$locmapserv_ = $locmapserv;
$locaplic_ = $locaplic;
$locsistemas_ = $locsistemas;
$locidentifica_ = $locidentifica;
$R_path_ = $R_path;
$mapext_ = $mapext;
$locmapas_ = $locmapas;
$postgis_con_ = $postgis_con;
$srid_area_ = $srid_area;
$debug_ = $debug;
$ler_extensoes_ = $ler_extensoes;
$postgis_mapa_ = $postgis_mapa;
$perfil_ = $perfil;
if ((isset($navegadoresLocais)) && ($navegadoresLocais != ""))
$navegadoresLocais_ = "sim";
else
$navegadoresLocais_ = "nao";
//
//inicia a sessão
//
session_name("i3GeoPHP");
session_start();
//
//se já houver uma sessão aberta, em funçaõ de outro browser estar ativo, cria uma nova
//
if (!isset($g_sid)){$g_sid="";}
if(isset($_SESSION["map_file"]) || $g_sid!="")
{session_regenerate_id();}
//
//copia as variáveis para a sessão
//
$_SESSION["dir_tmp"] = $dir_tmp_;
$_SESSION["temasdir"] = $temasdir_;
$_SESSION["temasaplic"] = $temasaplic_;
$_SESSION["locmapserv"] = $locmapserv_;
$_SESSION["locaplic"] = $locaplic_;
$_SESSION["locsistemas"] = $locsistemas_;
$_SESSION["locidentifica"] = $locidentifica_;
$_SESSION["R_path"] = $R_path_;
$_SESSION["mapext"] = $mapext_;
$_SESSION["locmapas"] = $locmapas_;
$_SESSION["postgis_con"] = $postgis_con_;
$_SESSION["srid_area"] = $srid_area_;
$_SESSION["debug"] = $debug_;
$_SESSION["ler_extensoes"] = $ler_extensoes_;
$_SESSION["postgis_mapa"] = $postgis_mapa_;
$_SESSION["perfil"] = $perfil_;
$_SESSION["navegadoresLocais"] = $navegadoresLocais_;
//
//pega todas as variáveis da sessão
//
foreach(array_keys($_SESSION) as $k)
{
	eval("\$".$k."='".$_SESSION[$k]."';");
}
//
//monta a apresentação do aguarde
//
if (!isset($interface))
{
	echo "<html><head>";
	echo '<div id="aguarde">';
	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...criando o mapa</p>';
	echo "<center><img src='".$caminho."imagens/i3geo1.jpg'><br><br>";
	echo "<center><img src='".$caminho."imagens/mapserv.png'><br><br>";
	echo "<center><a href='http://mapas.mma.gov.br/download' target=blank ><img src='".$caminho."imagens/somerights20_pt.gif' ></a>";
	echo '<BODY bgcolor="white" style="background-color:white">';
}
//
//define os arquivos .map conforme o tipo de sistema operacional
//
if (strtoupper(substr(PHP_OS, 0, 3) == 'WIN'))
{
	if (!isset($base)){$base = "geral1windows";}
	$estadosl = "estadoslwindows";
}
else
{
	if (!isset($base)){$base = "geral1";}
	$estadosl = "estadosl";
}
if (file_exists($base))
{$mapdefault = ms_newMapObj($base);}
else
{$mapdefault = ms_newMapObj($temasaplic."/".$base.".map");}
//
//pega os parâmetros para a inicialização se os mesmos não forem passados pela URL
//
if (!isset($mapext))
{$mapext = $mapdefault->extent->minx." ".$mapdefault->extent->miny." ".$mapdefault->extent->maxx." ".$mapdefault->extent->maxy;}
if (!isset ($map_reference_image)) //arquivo com a imagem de refer&ecirc;ncia
{$map_reference_image = $mapdefault->reference->image;}
if (!isset ($map_reference_extent)) //extens&atilde;o geogr&aacute;fica da imagem do mapa de refer&ecirc;ncia
{$map_reference_extent = $mapdefault->reference->extent->minx." ".$mapdefault->reference->extent->miny." ".$mapdefault->reference->extent->maxx." ".$mapdefault->reference->extent->maxy;}
if (!isset($interface))
{$interface = "geral.htm";}
//
//cria os diretórios temporários
//
$diretorios = criaDirMapa($dir_tmp);
$_SESSION["mapdir"] = $diretorios[1];
$_SESSION["imgdir"] = $diretorios[2];
//
//cria arquivos para impedir a leitura dos diretórios temporários
//
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ão foi possível gravar no diretório temporário";
	exit;
}
//
//cria os objetos map
//
ms_ResetErrorList();
if (file_exists($base))
{
	$map = ms_newMapObj($base);
	$mapn = ms_newMapObj($base);	
}
else
{
	$map = ms_newMapObj($temasaplic."/".$base.".map");
	$mapn = ms_newMapObj($temasaplic."/".$base.".map");
}
$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();
//
//verifica a lista de temas da inicializacao, adicionando-os se necessário
//
if (!isset($temasa)){$temasa = $estadosl;}
$temasa = str_replace(','," ",$temasa);
$alayers = explode(" ",$temasa);
foreach ($alayers as $arqt)
{
	$arqtemp = "";
	$arqt = trim($arqt);
	if ($arqt == "")
	{continue;}
	if (file_exists($arqt))
	{$arqtemp = $arqt;}
	if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($temasaplic."\\".$arqt.".map")))
	{$arqtemp = $temasaplic."\\".$arqt.".map";}
	elseif (file_exists($temasaplic."/".$arqt.".map"))
	{$arqtemp = $temasaplic."/".$arqt.".map";}
	if ((strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) && (file_exists($temasdir."\\".$arqt.".map")))
	{$arqtemp = $temasdir."\\".$arqt.".map";}
	elseif (file_exists($temasdir."/".$arqt.".map"))
	{$arqtemp = $temasdir."/".$arqt.".map";}
	if ($arqtemp == "")
	{echo "<br>Imposs&iacute;vel acessar tema $arqtemp";}
	else
	{
		if (!@ms_newMapObj($arqtemp))
		{echo "<br>Problemas com a camada $arqtemp<br>";}
		else
		{
			$maptemp = @ms_newMapObj($arqtemp);
			for($i=0;$i<($maptemp->numlayers);$i++)
			{
				$layern = $maptemp->getLayer($i);
				$layern->setmetadata("NOMEORIGINAL",$layern->name);
				if ($layern->name == "estadosl")
				{$layern->set("data",$temasaplic."/dados/estados.shp");}
				ms_newLayerObj($mapn, $layern);
			}
		}	
	}
}
$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();
//
//liga os temas definidos em $layers
//
if (isset($layers))
{
	$layers = str_replace(','," ",$layers);
	$lista = explode(" ", $layers);
	foreach ($lista as $l)
	{
		$arqt = trim($l);
		if ($l == "")
		{continue;}
		if(@$mapn->getLayerByName($l))
		{$layern = $mapn->getLayerByName($l);$layern->set("status",MS_DEFAULT);}
	}
}
$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();
//
//aplica ao mapa os parâmetros passados pela URL
//
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]);}
}
$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();
//
//configura os endereços corretos
//
$protocolo = explode("/",$_SERVER['SERVER_PROTOCOL']);
$w = $mapn->web;
$atual = $w->imagepath;
$w->set("imagepath",$atual.$diretorios[2]."/");
$atual = $w->imageurl;
$w->set("imageurl",$atual.$diretorios[2]."/");
$salvo = $mapn->save($diretorios[0]);
$_SESSION["imgurl"] = $protocolo[0]."://".$_SERVER['HTTP_HOST'].$atual.$diretorios[2]."/";
$_SESSION["tmpurl"] = $protocolo[0]."://".$_SERVER['HTTP_HOST'].$atual;
//
//faz o include de um programa se tiver sido passado pela URL
//
$tmpfname = $diretorios[0];
$_SESSION["map_file"] = $diretorios[0];
$_SESSION["mapext"] = $mapext;
if (isset($executa))
{
	if (file_exists($executa))
	{include ($executa);}
	if (function_exists($executa))
	{eval($executa."();");}
}
$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();
//inclui pontos via url
if (isset($pontos))
{
	require_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."/pontosins";
	// cria o dbf
	$def = array();
	$items = array("COORD");
	foreach ($items as $ni)
	{$def[] = array($ni,"C","254");}
	xbase_create($nomeshp.".dbf", $def);
	$dbname = $nomeshp.".dbf";
	$db=xbase_open($dbname,2);
	$novoshpf = ms_newShapefileObj($nomeshp, $tipol);
	$pontos = explode(" ",trim($pontos));
	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);
	$layer->setmetadata("tema",$nometemapontos);
	$layer->setmetadata("classe","sim");
	$layer->set("type",MS_LAYER_POINT);
	$layer->set("status",MS_DEFAULT);
	$classe = ms_newClassObj($layer);
	$estilo = ms_newStyleObj($classe);
	$estilo->set("symbolname","ponto");
	$estilo->set("size",6);
	$cor = $estilo->color;
	$cor->setRGB(255,0,0);
	$salvo = $mapa->save($tmpfname);
}
$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();
//
//se vc quiser para o script aqui, para verificar erros, descomente a linha abaixo
//
//exit;
//
//verifica os dados de cada layer
//
$mapa = ms_newMapObj($tmpfname);
$path = $mapa->shapepath;
for($i=0;$i<($mapa->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);}
}
$mapa->save($tmpfname);
//
//obtem o IP do usuário e registra no banco de dados
//essa função pode ser comentada sem prejuízos ao funcionamento do I3Geo
require_once($caminho."ms_registraip.php");
//
// gera a url para abrir o mapa
// interface = arquivo html que será aberto
//
if ($interface != "mashup")
{
	if (count(explode(".php",$interface)) > 1)
	{
		if (file_exists($caminho."aplicmap/".$interface))
		{include_once($caminho."aplicmap/".$interface);}
		else 
		{include_once($interface);}
		exit;
	}
	else
	{
		if (file_exists($caminho."aplicmap/".$interface))
		{$urln = $caminho."aplicmap/".$interface."?".session_id();}
		else 
		{$urln = $interface."?".session_id();}
		//header("Location:".$urln);
		echo "<meta http-equiv='refresh' content='0;url=$urln'>";
	}
}
?>