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 gml2wkt($gml)
{
    // Parse GML file
    include "funcoes_gerais.php";
    $k = array_keys($_GET);
    session_name("i3GeoPHP");
    session_id($_GET[$k[0]]);
    session_start();
    //var_dump($_SESSION);exit;
    $nome = $_SESSION["dir_tmp"] . "/gml_" . nomeRandomico();
    $nomegml = $nome . ".gml";
    $nomemap = $_SESSION["map_file"];
    $gml = str_replace("xsi:schemaLocation", "erro", $gml);
    gravaDados(array($gml), $nomegml);
    $map = new mapObj($nomemap);
    $layer = ms_newLayerObj($map);
    $layer->setConnectionType(MS_OGR);
    $layer->set("connection", $nomegml);
    $layer->set("template", "none.html");
    $layer->set("type", MS_LAYER_POLYGON);
    $layer->set("name", $nome);
    $layer->set("status", MS_DEFAULT);
    $layer->setmetadata("tema", $nome);
    $classe = ms_newClassObj($layer);
    $novoestilo = ms_newStyleObj($classe);
    $ncor = $novoestilo->color;
    $ncor->setrgb(255, 255, 255);
    //$map->save($nomemap);
    //exit;
    $layer->queryByrect($map->extent);
    $sopen = $layer->open();
    $shape = $layer->getShape($layer->getResult(0));
    $wkt = $shape->towkt();
    return json_encode(array($wkt));
}

 function __construct($map_file, $nomeImagem = "", $locaplic = "")
 {
     include dirname(__FILE__) . "/../ms_configura.php";
     $this->postgis_mapa = $postgis_mapa;
     if (file_exists($locaplic . "/funcoes_gerais.php")) {
         include_once $locaplic . "/funcoes_gerais.php";
     } else {
         include_once "funcoes_gerais.php";
     }
     $this->locaplic = $locaplic;
     $this->mapa = ms_newMapObj($map_file);
     substituiConObj($this->mapa, $postgis_mapa);
     $this->arquivo = str_replace(".map", "", $map_file) . ".map";
     if ($nomeImagem == "") {
         $this->nomeImagem = nomeRandomico();
     }
 }

if ($_FILES['i3GEOuploadcsv']['name'] == "") {
    echo "Arquivo não definido";
    exit;
}
if (isset($_FILES['i3GEOuploadcsv']['name'])) {
    echo "<p class='paragrafo' >Carregando o arquivo...</p>";
    ob_flush();
    flush();
    sleep(1);
    $arqcsv = $_FILES['i3GEOuploadcsv']['tmp_name'];
    $nomePrefixo = str_replace(" ", "_", removeAcentos($_FILES['i3GEOuploadcsv']['name']));
    $nomePrefixo = str_replace(".", "", $nomePrefixo);
    $nomePrefixo = strip_tags($nomePrefixo);
    $nomePrefixo = htmlspecialchars($nomePrefixo, ENT_QUOTES);
    $nomePrefixo = $nomePrefixo . md5(uniqid(rand(), true));
    $nomePrefixo = $nomePrefixo . "_" . nomeRandomico(4) . ".csv";
    $Arquivo = $_FILES['i3GEOuploadcsv']['tmp_name'];
    $status = move_uploaded_file($Arquivo, $dir_tmp . "/" . $nomePrefixo);
    if ($status != 1) {
        echo "<p class='paragrafo' >Ocorreu um erro no envio do arquivo";
        exit;
    }
    if (!file_exists($dir_tmp . "/" . $nomePrefixo)) {
        echo "<p class='paragrafo' >Ocorreu algum problema no envio do arquivo " . $dir_tmp . "/" . $nomePrefixo;
        paraAguarde();
        exit;
    }
    $arqcsv = $dir_tmp . "/" . $nomePrefixo;
    $checkphp = fileContemString($dirmap . "/" . $nomePrefixo, "<?");
    if ($checkphp == true) {
        unlink($dirmap . "/" . $nomePrefixo);

 function graficotema($lista, $tamanho = "50", $tipo = "PIE", $outlinecolor = "", $offset = 0, $mesmoTema = false)
 {
     if (!$this->layer) {
         return "erro";
     }
     $nome = pegaNome($this->layer);
     $novolayer = ms_newLayerObj($this->mapa, $this->layer);
     $nomer = nomeRandomico();
     $novolayer->set("name", $nomer);
     $novolayer->set("group", "");
     $novolayer->setmetadata("cache", "nao");
     $novolayer->set("type", MS_LAYER_CHART);
     $novolayer->setprocessing("CHART_TYPE={$tipo}");
     $novolayer->setprocessing("CHART_SIZE={$tamanho}");
     $nclasses = $novolayer->numclasses;
     for ($i = 0; $i < $nclasses; ++$i) {
         $c = $novolayer->getclass($i);
         $c->set("status", MS_DELETE);
     }
     $novolayer->set("status", MS_DEFAULT);
     $novolayer->setmetadata("tema", "grafico de " . $nome);
     $lista = explode("*", $lista);
     foreach ($lista as $l) {
         $ll = explode(",", $l);
         $novac = ms_newClassObj($novolayer);
         $novac->set("name", $ll[0]);
         $novoestilo = ms_newStyleObj($novac);
         $novoestilo->setBinding(MS_STYLE_BINDING_SIZE, $ll[0]);
         $cor = $novoestilo->color;
         $cor->setrgb($ll[1], $ll[2], $ll[3]);
         if ($outlinecolor != "") {
             $o = explode(",", $outlinecolor);
             $corl = $novoestilo->outlinecolor;
             $corl->setrgb($o[0], $o[1], $o[2]);
         }
         if ($tipo == "PIE") {
             $novoestilo->set("offsetx", $offset);
         }
     }
     if ($mesmoTema == true) {
         $this->layer->set("status", MS_DELETE);
         $novolayer->set("name", $this->layer->name);
         $novolayer->setmetadata("tema", $this->layer->getmetadata("tema"));
     }
 }

$fingerprint = $_SESSION["fingerprint"];
$f = explode(",", $fingerprint);
if ($f[0] != md5('I3GEOSEC' . $_SERVER['HTTP_USER_AGENT'] . session_id())) {
    echo "erro";
    return;
}
include dirname(__FILE__) . "/../../classesphp/funcoes_gerais.php";
$map_file = $_SESSION["map_file"];
if (empty($map_file)) {
    exit;
}
$map_file = str_replace(".map", "", $map_file) . ".map";
restauraCon($map_file, $_SESSION["postgis_mapa"]);
$base = basename($map_file);
$dir = dirname($map_file);
$novo_mapfile = $dir . "/" . nomeRandomico(5) . $base;
copy($map_file, $novo_mapfile);
chmod($novo_mapfile, 0744);
$mapa = ms_newMapObj($novo_mapfile);
$mapa->setProjection(pegaProjecaoDefault("proj4"));
$numlayers = $mapa->numlayers;
$layers = array();
for ($i = 0; $i < $numlayers; ++$i) {
    $l = $mapa->getLayer($i);
    $l->setmetadata("permiteogc", "sim");
    if ($l->status != MS_DEFAULT) {
        $l->set("status", MS_DELETE);
    } else {
        $layers[] = $l->name;
    }
}

<?php

include_once dirname(__FILE__) . "/../safe.php";
verificaBlFerramentas(basename(dirname(__FILE__)), $i3geoBlFerramentas, false);
//
//faz a busca da fun&ccedil;&atilde;o que deve ser executada
//
$retorno = "";
//string que ser&aacute; retornada ao browser via JSON
switch (strtoupper($funcao)) {
    /*
    Valor: TELAREMOTA
    
    Registra um ID para permitir o acesso ao mapa atual por outro navegador.
    
    O ID &eacute; adicionado à string $_SESSION["fingerprint"] separado por ','
    
    <Mapa->telaRemota>
    */
    case "TELAREMOTA":
        $codigo = nomeRandomico();
        $_SESSION["fingerprint"] .= "," . $codigo;
        $retorno = $codigo;
        break;
}
if (isset($map_file) && isset($postgis_mapa) && $map_file != "") {
    restauraCon($map_file, $postgis_mapa);
}
cpjson($retorno);

 function criaToponimia($item, $position, $partials, $offsetx, $offsety, $minfeaturesize, $mindistance, $force, $shadowcolor, $shadowsizex, $shadowsizey, $outlinecolor, $cor, $sombray, $sombrax, $sombra, $fundo, $angulo, $tamanho, $fonte, $tipo, $wrap, $novotema = "sim")
 {
     error_reporting(0);
     if (!$this->layer) {
         return "erro";
     }
     $this->removeToponimia();
     if (!isset($tipo)) {
         $tipo = "";
     }
     if ($item != "") {
         if ($novotema == "sim") {
             $nome = pegaNome($this->layer);
             $novolayer = ms_newLayerObj($this->mapa, $this->layer);
             $nomer = nomeRandomico();
             $novolayer->set("name", $nomer);
             $novolayer->set("group", "");
             $novolayer->set("type", $this->layer->type);
             $nclasses = $novolayer->numclasses;
             for ($i = 0; $i < $nclasses; ++$i) {
                 $c = $novolayer->getclass($i);
                 $c->set("status", MS_DELETE);
             }
             $novac = ms_newClassObj($novolayer);
             $novolayer->set("status", MS_DEFAULT);
             $novolayer->setmetadata("tema", "texto de " . $nome);
             $novolayer->setmetadata("tip", "");
             $novolayer->setmetadata("tiles", "nao");
             $novolayer->setmetadata("identifica", "nao");
             $novolayer->set("labelitem", $item);
         } else {
             $nomer = $this->layer->name;
             $novolayer = $this->mapa->getlayerbyname($nomer);
         }
         $novolayer->setmetadata("cache", "");
         $this->layer = $novolayer;
     } else {
         //$novac = $this->layer->getclass(0);
         $nomer = $this->layer->name;
     }
     if (!($this->vi >= 60200)) {
         $this->layer->set("labelitem", $item);
     }
     $nclasses = $this->layer->numclasses;
     for ($i = 0; $i < $nclasses; ++$i) {
         $novac = $this->layer->getclass($i);
         if ($this->vi >= 60200) {
             //$indiceLabel = $novac->addLabel(new labelObj());
             $s = "CLASS LABEL TEXT '[" . $item . "]' END END";
             $novac->updateFromString($s);
             $label = $novac->getLabel($indiceLabel);
         } else {
             $label = $novac->label;
         }
         if ($wrap != "") {
             $label->set("maxlength", 1);
             $s = $novac->getTextString;
             $s = "CLASS LABEL WRAP '{$wrap}' END END";
             $novac->updateFromString($s);
         }
         if ($this->vi >= 60200) {
             $label = $novac->getLabel($indiceLabel);
         } else {
             $label = $novac->label;
         }
         if ($fonte != "bitmap") {
             //$label->set("type",MS_TRUETYPE);
             $label->updatefromstring("LABEL TYPE TRUETYPE END");
             $label->set("font", $fonte);
             $label->set("size", $tamanho);
         } else {
             //$label->set("type",MS_BITMAP);
             $label->updatefromstring("LABEL TYPE BITMAP END");
             //$label->set("font",$fonte);
             $t = MS_TINY;
             if ($tamanho > 5) {
                 $t = MS_TINY;
             }
             if ($tamanho >= 7) {
                 $t = MS_SMALL;
             }
             if ($tamanho >= 10) {
                 $t = MS_MEDIUM;
             }
             if ($tamanho >= 12) {
                 $t = MS_LARGE;
             }
             if ($tamanho >= 14) {
                 $t = MS_GIANT;
             }
             $label->set("size", $t);
         }
         if ($angulo > 0) {
             $label->set("angle", $angulo);
         }
         if ($angulo == "AUTO") {
             $label->updatefromstring("LABEL ANGLE AUTO END");
         }
         if (strtoupper($angulo) == "CURVO" || strtoupper($angulo) == "FOLLOW") {
             $label->updatefromstring("LABEL ANGLE FOLLOW END");
//.........这里部分代码省略.........

    $arquivo = $dirmap . "/" . $_FILES['i3GEOimportarwmc']['name'];
}
if ($_POST["i3GEOimportarwmcurl"]) {
    $s = PHP_SHLIB_SUFFIX;
    if (!function_exists('curl_init')) {
        @dl('php_curl' . '.' . $s);
    }
    if (!function_exists('curl_init')) {
        echo "curl não instalado";
    } else {
        $curl = curl_init();
        curl_setopt($curl, CURLOPT_URL, $_POST["i3GEOimportarwmcurl"]);
        curl_setopt($curl, CURLOPT_RETURNTRANSFER, true);
        $result = curl_exec($curl);
        curl_close($curl);
        $arquivo = $dirmap . "/" . nomeRandomico();
        gravaDados(array($result), $arquivo);
    }
}
if ($arquivo != "") {
    incluiWMC();
}
paraAguarde();
function incluiWMC()
{
    global $map_file, $arquivo;
    $mapa = ms_newMapObj($map_file);
    $proj = $mapa->getprojection();
    $mapa->loadMapContext($arquivo, "MS_TRUE");
    $layers = $mapa->getalllayernames();
    foreach ($layers as $nome) {

function criarNovoLayer()
{
    global $locaplic, $codigoMap;
    include_once "{$locaplic}/classesphp/funcoes_gerais.php";
    $mapfile = $locaplic . "/temas/" . $codigoMap . ".map";
    $mapa = ms_newMapObj($mapfile);
    $nl = ms_newLayerObj($mapa);
    $nl->set("name", nomeRandomico());
    $nl->set("type", MS_LAYER_LINE);
    $mapa->save($mapfile);
    removeCabecalho($mapfile);
    return array("layers" => array($nl->name));
}

     if ($layer->type == 2) {
         $objLine = $shapes[0]->line(0);
         $pontoA = $objLine->point(0);
         $pontoB = $shapes[0]->getCentroid();
     }
     $retorno = array("ax" => $pontoA->x, "ay" => $pontoA->y, "bx" => $pontoB->x, "by" => $pontoB->y);
     break;
 case "MELHORCAMINHO":
     //converte os parametros em um arquivo YAML
     $mapa = ms_newMapObj($map_file);
     $layer = $mapa->getlayerbyname($_GET["raster"]);
     $cost_surface_path = $layer->data;
     $prefixo = nomeRandomico(3);
     //verifica se o mapa de custo existe
     if (file_exists($cost_surface_path)) {
         $pathresult = $dir_tmp . "/melhorcaminho_" . nomeRandomico();
         //cria a pasta onde os resultados serao armazenados
         mkdir($pathresult, 0744);
         $pta = $_GET["pta"];
         $ptb = $_GET["ptb"];
         //parametros para o calculo de melhor caminho e linha reta
         $best = array("p1" => array("calculation_type" => "best_path", "file_prefix" => $prefixo, "start_coord" => "[{$pta}]", "stop_coord" => "[{$ptb}]"));
         $cart = array("p2" => array("calculation_type" => "cartesian_straight_line_cost", "file_prefix" => $prefixo, "start_coord" => "[{$pta}]", "stop_coord" => "[{$ptb}]"));
         //guarda os processos que serao executados
         $processos = array($best, $cart);
         //parametros para calculo do buffer
         if ($buffer > 0) {
             $buf = array("p3" => array("calculation_type" => "best_path_within_buffer", "buffer_km" => $_GET["buffer"], "file_prefix" => $prefixo, "start_coord" => "[{$pta}]", "stop_coord" => "[{$ptb}]"));
             $processos[] = $buf;
         }
         //parametros para calculo com reclassificacao

/**
 * Altera a representacao de um layer mostrando circulos cujo tamanho corresponde a um valor
 * @param nome do arquivo mapfile em uso
 * @param nome do layer que sera processado
 * @param variatamanho|variacor|continuo tipo de processo
 */
function classes2circulos($map_file, $tema, $tipo)
{
    $nome = basename($map_file) . $tema . $tipo;
    $mapa = ms_newMapObj($map_file);
    $teste = $mapa->getlayerbyname($nome);
    if ($teste != "") {
        return "";
    }
    $l = $mapa->getlayerbyname($tema);
    if ($l->getmetadata("METAESTAT_DERIVADO") == "sim") {
        return "";
    }
    $layer = ms_newLayerObj($mapa, $l);
    $l->set("status", MS_OFF);
    $layer->set("status", MS_DEFAULT);
    $layer->set("opacity", 50);
    $layer->set("name", $nome);
    $meta = new Metaestat();
    if ($layer->type != MS_LAYER_POINT) {
        $layer->set("type", 0);
        $regiao = $meta->listaTipoRegiao($layer->getmetadata("METAESTAT_CODIGO_TIPO_REGIAO"));
        //repare que existe uma virgula apos o nome da coluna com a geometria, isso e necessario para substituir a string correta
        if ($regiao["colunacentroide"] != "") {
            $stringgeo = "g." . $regiao["colunageo"] . ",";
            $data = str_replace($stringgeo, "g." . $regiao["colunacentroide"] . ",", $layer->data);
        } else {
            $stringgeo = 'st_setsrid(g.".' . $regiao["colunageo"] . '.",".' . $regiao["srid"] . '.")';
            $data = str_replace($stringgeo, "st_centroid({$stringgeo})", $layer->data);
        }
        $layer->set("data", $data);
    }
    $numclasses = $layer->numclasses;
    if ($tipo == "variatamanho" || $tipo == "variacor") {
        if ($tipo == "variatamanho") {
            $layer->setmetadata("tema", $layer->getmetadata("tema") . " - circ");
        }
        if ($tipo == "variacor") {
            $layer->setmetadata("tema", $layer->getmetadata("tema") . " - ponto");
        }
        if ($numclasses > 0) {
            for ($i = 0; $i < $numclasses; ++$i) {
                $classe = $layer->getClass($i);
                $estilo = $classe->getstyle(0);
                $estilo->set("symbolname", "ponto");
                if ($tipo == "variatamanho") {
                    $estilo->set("size", $i * 6);
                }
                if ($tipo == "variacor") {
                    $estilo->set("size", 12);
                }
            }
        }
    }
    if ($tipo == "continuo") {
        $nometemp = str_replace(basename($map_file), nomeRandomico(5) . basename($map_file), $map_file);
        $mapa->save($nometemp);
        //$mapatemp = ms_newMapObj($nometemp);
        $medidavariavel = $meta->listaMedidaVariavel("", $layer->getmetadata("METAESTAT_ID_MEDIDA_VARIAVEL"));
        include_once dirname(__FILE__) . "/../../classesphp/classe_alteraclasse.php";
        $m = new Alteraclasse($nometemp, $layer->name, "", "");
        $valores = $m->pegaValores($m->mapa, $m->layer, $medidavariavel["colunavalor"], true, 0);
        $min = min($valores);
        $max = max($valores);
        $layer->setmetadata("tema", $layer->getmetadata("tema") . " - cont");
        $layer->set("type", MS_LAYER_CHART);
        $layer->set("opacity", 60);
        $layer->setprocessing("CHART_TYPE=pie");
        $layer->setprocessing("CHART_SIZE_RANGE=" . $medidavariavel["colunavalor"] . " 10 150 " . $min . " " . $max);
        if ($numclasses > 0) {
            for ($i = 0; $i < $numclasses; ++$i) {
                $classe = $layer->getClass($i);
                $classe->set("status", MS_DELETE);
            }
        }
        $classe = ms_newClassObj($layer);
        $novoestilo = ms_newStyleObj($classe);
        //$novoestilo->set("symbolname","ponto");
        $novoestilo->set("size", "6");
        $ncor = $novoestilo->color;
        $ncor->setrgb(247, 145, 29);
        $ncor = $novoestilo->outlinecolor;
        $ncor->setrgb(255, 255, 255);
        //$novoestilo->setbinding(MS_STYLE_BINDING_SIZE, $medidavariavel["colunavalor"]);
        //
        $classe = ms_newClassObj($layer);
        $novoestilo = ms_newStyleObj($classe);
        //$novoestilo->set("symbolname","ponto");
        $novoestilo->set("size", "6");
        $ncor = $novoestilo->color;
        $ncor->setrgb(247, 145, 29);
        $ncor = $novoestilo->outlinecolor;
        $ncor->setrgb(255, 255, 255);
    }
    $layer->setmetadata("METAESTAT_DERIVADO", "sim");
//.........这里部分代码省略.........

 function shpPT2shp($locaplic, $para)
 {
     if (!$this->layer) {
         return "erro";
     }
     $this->layer->set("template", "none.htm");
     $diretorio = dirname($this->arquivo);
     $tipol = MS_SHP_ARC;
     $tipos = MS_SHAPE_LINE;
     if ($para == "poligono") {
         $tipol = MS_SHP_POLYGON;
         $tipos = MS_SHAPE_POLYGON;
     }
     $novonomelayer = nomeRandomico();
     $nomeshp = $diretorio . "/" . $novonomelayer;
     $items = pegaItens($this->layer);
     // cria o dbf
     $def = array();
     foreach ($items as $ni) {
         $temp = strtoupper($ni);
         $def[] = array($temp, "C", "254");
     }
     //para manipular dbf
     if ($this->dbaseExiste == false) {
         include_once dirname(__FILE__) . "/../pacotes/phpxbase/api_conversion.php";
         $db = xbase_create($nomeshp . ".dbf", $def);
     } else {
         $db = dbase_create($nomeshp . ".dbf", $def);
     }
     $dbname = $nomeshp . ".dbf";
     $reg = array();
     $novoshpf = ms_newShapefileObj($nomeshp . ".shp", $tipol);
     $this->layer->open();
     $prjMapa = $this->mapa->getProjection();
     $prjTema = $this->layer->getProjection();
     $ret = $this->mapa->extent;
     if ($prjTema != "" && $prjMapa != $prjTema) {
         $projOutObj = ms_newprojectionobj($prjTema);
         $projInObj = ms_newprojectionobj($prjMapa);
         $ret->project($projInObj, $projOutObj);
     }
     $this->layer->whichShapes($ret);
     $linha = ms_newLineObj();
     $pponto = "";
     $pontos = array();
     while ($shape = $this->layer->nextShape()) {
         $lin = $shape->line(0);
         $pt = $lin->point(0);
         if ($pponto == "") {
             $pponto = $pt;
         }
         if ($prjTema != "" && $prjMapa != $prjTema) {
             $pt->project($projInObj, $projOutObj);
         }
         $pontos[] = $pt->x;
         $pontos[] = $pt->y;
     }
     $pontos = implode(" ", $pontos);
     $pontos = xy2wkt($pontos);
     if ($para == "poligono") {
         $shape = ms_shapeObjFromWkt($pontos["poligono"]);
     } else {
         $shape = ms_shapeObjFromWkt($pontos["linha"]);
     }
     foreach ($items as $ni) {
         $reg[] = "-";
     }
     $novoshpf->addShape($shape);
     if ($this->dbaseExiste == false) {
         xbase_add_record($db, $reg);
         xbase_close($db);
     } else {
         dbase_add_record($db, $reg);
         dbase_close($db);
     }
     $this->layer->close();
     //cria o novo layer
     $layer = criaLayer($this->mapa, MS_LAYER_LINE, MS_DEFAULT, "", $metaClasse = "SIM");
     $layer->set("data", $nomeshp);
     $layer->setmetadata("tema", $novonomelayer . " (linear)");
     $layer->setmetadata("download", "sim");
     $layer->setmetadata("temalocal", "sim");
     $classe = $layer->getclass(0);
     $estilo = $classe->getstyle(0);
     $estilo->set("symbolname", "linha");
     if ($para == "poligono") {
         $layer->set("type", MS_LAYER_POLYGON);
         $layer->set("opacity", "50");
         $layer->setmetadata("tema", $novonomelayer . " (poligonal)");
     }
     return "ok";
 }

 }
 $ArquivoDest = strip_tags($ArquivoDest);
 $ArquivoDest = htmlspecialchars($ArquivoDest, ENT_QUOTES);
 verificaNome($ArquivoDest);
 verificaNome($_FILES['i3GEOuploaddbffile']['name']);
 //sobe arquivo
 $Arquivo = $_FILES['i3GEOuploaddbffile']['tmp_name'];
 $status = move_uploaded_file($Arquivo, $dirmap . "/" . $ArquivoDest);
 if ($status != 1) {
     echo "Ocorreu um erro no envio do arquivo";
     paraAguarde();
     exit;
 }
 $nome = explode(".", $ArquivoDest);
 $nome = $nome[0];
 $nome = $nome . "_" . nomeRandomico(4);
 $nomeshp = $dirmap . "/" . $nome . ".shp";
 if ($status == 1) {
     if (!isset($tema)) {
         $nomex = strtoupper($i3GEOuploaddbfnomex);
         $nomey = strtoupper($i3GEOuploaddbfnomey);
         //converte de csv para dbf
         if ($i3GEOuploaddbftipoarquivo != "dbf") {
             if ($i3GEOuploaddbftipoarquivo == "csvpv") {
                 $separador = ";";
             }
             if ($i3GEOuploaddbftipoarquivo == "csvv") {
                 $separador = ",";
             }
             include_once dirname(__FILE__) . "/../../pacotes/phpxbase/api_conversion.php";
             include_once dirname(__FILE__) . "/../../pacotes/parsecsv/parsecsv.lib.php";

 function gravaImagemCorpo()
 {
     $imgo = $this->mapa->draw();
     $nome = $imgo->imagepath . nomeRandomico() . ".png";
     $salva = $imgo->saveImage($nome);
     if ($salva != -1) {
         return $imgo->imageurl . basename($nome);
     } else {
         return "erro";
     }
 }

     }
     $retorno = retornaReferencia($ext);
     break;
     /*
      Valor: REFERENCIADINAMICA
     
     Gera a imagem do mapa de referência de forma dinâmica, variando com a escala do mapa atual.
     */
 /*
  Valor: REFERENCIADINAMICA
 
 Gera a imagem do mapa de referência de forma dinâmica, variando com a escala do mapa atual.
 */
 case "REFERENCIADINAMICA":
     //$objMapa = ms_newMapObj($map_file);
     $nomeImagem = nomeRandomico();
     $ext = $_pg["ext"];
     if (!isset($ext)) {
         $ext = "";
     }
     $retorno = retornaReferenciaDinamica($ext, $_pg["w"], $_pg["h"]);
     break;
     /*
      Valor: MUDAOUTPUTFORMAT
     
     Muda o OUTPUTFORMAT.
     
     <Mapa->mudaoutputformat>
     */
 /*
  Valor: MUDAOUTPUTFORMAT

function graficopizza($data, $width, $inclinacao, $shadow_height, $cores, $map_file, $temaedit)
{
    ////////////////////////////////////////////////////////////////
    // PHP script made by Rasmus Petersen - http://www.peters1.dk //
    ////////////////////////////////////////////////////////////////
    include_once "funcoes_gerais.php";
    //<img src="http://www.domain.dk/piechart.php?data=10*9*11*10&label=Denmark*Germany*USA*Sweden" />
    $show_label = false;
    // true = show label, false = don't show label.
    $show_percent = false;
    // true = show percentage, false = don't show percentage.
    $show_text = true;
    // true = show text, false = don't show text.
    $show_parts = false;
    // true = show parts, false = don't show parts.
    $label_form = 'square';
    // 'square' or 'round' label.
    if (!isset($width)) {
        $width = 50;
    }
    if (!isset($inclinacao)) {
        $inclinacao = 1.5;
    }
    if (!isset($shadow_height)) {
        $shadow_height = 10;
    }
    $background_color = 'FFFFFF';
    // background-color of the chart...
    $text_color = '000000';
    // text-color.
    $colors = array('003366', 'CCD6E0', '7F99B2', 'F7EFC6', 'C6BE8C', 'CC6600', '990000', '520000', 'BFBFC1', '808080');
    // colors of the slices.
    $colorsp = explode("*", $cores);
    //cores das fatias
    //$shadow_height = 16; // Height on shadown.
    $shadow_dark = true;
    // true = darker shadow, false = lighter shadow...
    // DON'T CHANGE ANYTHING BELOW THIS LINE...
    $height = $width / $inclinacao;
    $data = explode('*', $data);
    $img = ImageCreateTrueColor($width, $height + ceil($shadow_height));
    imagetruecolortopalette($img, false, 256);
    // convert
    $white = imagecolorresolve($img, 255, 255, 255);
    // resolve given palette entry
    imagecolortransparent($img, $white);
    ImageFill($img, 0, 0, $white);
    foreach ($colorsp as $colorkode) {
        $fill_color[] = colorRGB($img, $colorkode);
        $shadow_color[] = colorRGBshadow($img, $colorkode, $shadow_dark);
    }
    $centerX = round($width / 2);
    $centerY = round($height / 2);
    $diameterX = $width - 4;
    $diameterY = $height - 4;
    $data_sum = array_sum($data);
    $start = 270;
    $value_counter = 0;
    $value = 0;
    $cd = count($data);
    for ($i = 0; $i < $cd; ++$i) {
        $value += $data[$i];
        $end = ceil($value / $data_sum * 360) + 270;
        $slice[] = array($start, $end, $shadow_color[$value_counter % count($shadow_color)], $fill_color[$value_counter % count($fill_color)]);
        $start = $end;
        $value_counter++;
    }
    for ($i = $centerY + $shadow_height; $i > $centerY; $i--) {
        for ($j = 0; $j < count($slice); ++$j) {
            ImageFilledArc($img, $centerX, $i, $diameterX, $diameterY, $slice[$j][0], $slice[$j][1], $slice[$j][2], IMG_ARC_PIE);
        }
    }
    for ($j = 0; $j < count($slice); ++$j) {
        ImageFilledArc($img, $centerX, $centerY, $diameterX, $diameterY, $slice[$j][0], $slice[$j][1], $slice[$j][3], IMG_ARC_PIE);
    }
    $nome = nomeRandomico(20) . ".png";
    $nomefisico = dirname($map_file) . "/" . $nome;
    $nomeurl = $nome;
    Imagepng($img, $nomefisico);
    ImageDestroy($img);
    return $nomefisico . "," . $nomeurl;
}

function testaMapaImg($tema)
{
    global $locaplic, $postgis_mapa, $versao, $base, $dir_tmp, $tempo;
    $base = mapaBase($locaplic, $versao, $base);
    $mapa = ms_newMapObj($base);
    error_reporting(0);
    ms_ResetErrorList();
    try {
        ms_newMapObj($tema);
    } catch (Exception $e) {
        return array("imgMapa" => "", "imgLegenda" => "", "tempo" => microtime(true) - $tempo, "erro" => "Objeto map nao pode ser criado. Erro fatal.");
    }
    if (@ms_newMapObj($tema)) {
        $nmapa = ms_newMapObj($tema);
    } else {
        $erro = "";
        $error = ms_GetErrorObj();
        while ($error && $error->code != MS_NOERR) {
            $erro .= "<br>Error in %s: %s<br>\n";
            $erro .= "<br>" . $error->routine;
            $erro .= "<br>" . $error->message;
            $error = $error->next();
        }
        return array("imgMapa" => "", "imgLegenda" => "", "tempo" => microtime(true) - $tempo, "erro" => $erro);
    }
    substituiConObj($mapa, $postgis_mapa);
    substituiConObj($nmapa, $postgis_mapa);
    $numlayers = $nmapa->numlayers;
    $dados = "";
    $simbolos = array();
    for ($i = 0; $i < $numlayers; $i++) {
        $layern = $nmapa->getlayer($i);
        $layern->set("status", MS_DEFAULT);
        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);
        $pegarext = $layern->name;
    }
    zoomTema($pegarext, $mapa);
    $mapa->setsize(500, 500);
    $sca = $mapa->scalebar;
    $sca->set("status", MS_OFF);
    $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) {
        $error = "";
        $erro = "";
        $error = ms_GetErrorObj();
        while ($error && $error->code != MS_NOERR) {
            $erro .= "<br>Error in %s: %s<br>";
            $erro .= "<br>" . $error->routine;
            $erro .= "<br>" . $error->message;
            $error = $error->next();
        }
        return array("imgMapa" => "", "imgLegenda" => "", "tempo" => microtime(true) - $tempo, "erro" => $erro);
    }
    if ($objImagem->imagepath == "") {
        return array("imgMapa" => "", "imgLegenda" => "", "tempo" => microtime(true) - $tempo, "erro" => "Erro IMAGEPATH vazio");
    }
    $nomec = $objImagem->imagepath . nomeRandomico() . "teste.png";
    $objImagem->saveImage($nomec);
    $nomel = $objImagemLegenda->imagepath . nomeRandomico() . "testel.png";
    $objImagemLegenda->saveImage($nomel);
    $erro = "";
    $error = "";
    $error = ms_GetErrorObj();
    while ($error && $error->code != MS_NOERR) {
//.........这里部分代码省略.........

function restauraMapaAdmin($id_mapa, $dir_tmp)
{
    if (filter_var($id_mapa, FILTER_VALIDATE_INT) === false) {
        exit;
    }
    include dirname(__FILE__) . "/../admin/php/conexao.php";
    if (!empty($esquemaadmin)) {
        $esquemaadmin = str_replace(".", "", $esquemaadmin) . ".";
    }
    $q = $dbh->query("select * from " . $esquemaadmin . "i3geoadmin_mapas where id_mapa={$id_mapa} ", PDO::FETCH_ASSOC);
    $mapasalvo = $q->fetchAll();
    $dbh = null;
    $dbhw = null;
    $mapasalvo = $mapasalvo[0];
    $base = "";
    if (strtoupper($mapasalvo[&q