';
echo "\n";
//
//pega os endereços para compor a url de chamada do gerador de web services
//ogc.php
//
$protocolo = explode("/",$_SERVER['SERVER_PROTOCOL']);
$protocolo = $protocolo[0];
$protocolo1 = strtolower($protocolo) . '://'.$_SERVER['SERVER_NAME'];
$protocolo = strtolower($protocolo) . '://'.$_SERVER['SERVER_NAME'] .":". $_SERVER['SERVER_PORT'];
$urli3geo = str_replace("/kml.php","",$protocolo.$_SERVER["PHP_SELF"]);
//error_reporting(E_ALL);
if(!isset($perfil)){$perfil = "";}
//
//pega a lista de menus que será processada
//se a variável definida em ms_configura for = "", a busca é feita
//pelo método Menutemas
//
if(!isset($perfil)){$perfil = "";}
if($menutemas != "" || is_array($menutemas))
{
foreach($menutemas as $m)
{
$menus[] = $m["arquivo"];
}
}
else
{
$m = new Menutemas("",$perfil,$locsistemas,$locaplic,"",$urli3geo);
foreach($m->pegaListaDeMenus() as $menu)
{
$menus[] = $menu["url"];
}
}
if(!isset($menus))
$menus = array("/opt/www/html/i3geo/menutemas/menutemas.xml");
//
//monta o xml
//
echo "Menu i3geo00\n";
foreach ($menus as $menu)
{
$xml = simplexml_load_file($menu);
foreach($xml->GRUPO as $grupo)
{
$nome = mb_convert_encoding($grupo->GTIPO,"auto","auto");
$desc = mb_convert_encoding($grupo->DTIPO,"auto","auto");
kml_cabecalho($nome,$desc);
foreach($grupo->SGRUPO as $sgrupo)
{
$nome = mb_convert_encoding($sgrupo->SDTIPO,"auto","auto");
kml_folder($nome);
foreach($sgrupo->TEMA as $tema)
{
$nome = mb_convert_encoding($tema->TNOME,"auto","auto");
$desc = mb_convert_encoding($tema->TDESC,"auto","auto");
$id = mb_convert_encoding($tema->TID,"auto","auto");
$fonte = mb_convert_encoding($tema->TLINK,"auto","auto");
$tipoa = "";
if($tema->TIPOA)
$tipoa = mb_convert_encoding($tema->TIPOA,"auto","auto");
$ogc = sim;
if($tema->TID)
{
$kml = mb_convert_encoding($tema->KML,"auto","auto");
}
if(strtolower($kml) != "nao" && strtolower($tipoa) != "wms")
{
$fonte = "Fonte ";
$legenda = "Legenda ";
$href = "$urli3geo/ogc.php?tema=$id&width=800&height=800&VERSION=1.1.1&REQUEST=GetMap&SRS=EPSG:4326&STYLES=&BGCOLOR=0xFFFFFF&FORMAT=image/png&TRANSPARENT=TRUE&layers=$id";
kml_servico($nome,$fonte,$legenda,$desc,$href);
}
}
echo "\n";
}
echo "\n";
}
}
echo "\n";
function kml_cabecalho($nome,$desc)
{
echo "\n";
echo " ".str_replace("&","&",$nome)."\n";
echo " ".str_replace("&","&",$desc)."\n";
echo " 00\n";
}
function kml_folder($nome)
{
echo " \n";
echo " ".str_replace("&","&",$nome)."\n";
echo " \n";
echo " 00\n";
}
function kml_servico($nome,$fonte,$legenda,$desc,$href)
{
echo " \n";
echo " ".str_replace("&","&",$nome)."\n";
echo " \n";
echo " 0\n";
echo " \n";
echo " onStop\n";
echo " $href\n";
echo " \n";
echo " 9.49014618085-39.3925604735-29.5851853-76.5125927\n";
echo " \n";
}
?>