<?php
/*
 * Title: mapa_googlemaps.php
 *
 * Faz o processamento de um mapfile segundo as necessidades do i3geo, como por exemplo, fazendo a substitui&ccedil;&atilde;o
 * das vari&aacute;veis de conex&atilde;o com banco e outras opera&ccedil;&otilde;es espec&iacute;ficas do i3Geo.
 *
 * &Eacute; utilizado especificamente nas interfaces que utilizam a biblioteca Googlemaps.
 *
 *
 * Parametros:
 *
 * g_sid {string} - codigo da "section" PHP
 *
 * tipolayer {fundo|} - (opcional) indica que a imagem a ser produzida comp&otilde;e o fundo do mapa
 *
 * BBOX {xmin xmax ymin ymax} - extens&atilde;o geogr&aacute;fica a ser utilizada no desenho do mapa
 *
 * WIDTH {numeric} - largura do mapa
 *
 * HEIGHT {numeric} - altura do mapa
 *
 * layer {string} - codigo do layer existente no mapa que ser&aacute; desenhado
 *
 * DESLIGACACHE {sim|nao} - for&ccedil;a a n&atilde;o usar o cache de imagens qd definido como "sim", do contr&aacute;rio, o uso ou n&atilde;o do cache ser&aacute; definido automaticamente
 *
 * TIPOIMAGEM {cinza|sepiaclara|sepianormal|negativo|detectaBordas|embassa|gaussian_blur|selective_blur|mean_removal|pixelate
 * } - filtro de imagem que ser&aacute; aplicado na imagem
 *
 *
 * 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_googlemaps.php
 *
 */
include ("sani_request.php");
// para efeitos de compatibilidade
if (! function_exists('ms_GetVersion')) {
    include_once ("carrega_ext.php");
}

// verifica&ccedil;&atilde;o de seguran&ccedil;a
ini_set("session.use_cookies", 0);
$_SESSION = array();
session_name("i3GeoPHP");
if (@$_GET["g_sid"]) {
    session_id($_GET["g_sid"]);
} elseif (@$_COOKIE["i3GeoPHP"]) {
    session_id($_COOKIE["i3GeoPHP"]);
} else {
    ilegal();
}
session_start([
    'read_and_close' => true
]);
if (@$_SESSION["fingerprint"]) {
    $f = explode(",", $_SESSION["fingerprint"]);
    if (md5('I3GEOSEC' . $_SERVER['HTTP_USER_AGENT'] . session_id()) != $f[0]) {
        ilegal();
    }
} else {
    exit();
}
if (! isset($_SESSION["map_file"])) {
    exit();
}
$map_fileX = $_SESSION["map_file"];
$postgis_mapa = $_SESSION["postgis_mapa"];
$cachedir = $_SESSION["cachedir"];
$i3georendermode = $_SESSION["i3georendermode"];

if (! empty($_GET["request"])) {
    $_GET["REQUEST"] = $_GET["request"];
}
if ($_GET["REQUEST"] == "GetFeatureInfo" || strtolower($_GET["REQUEST"]) == "getfeature") {
    $_GET["DESLIGACACHE"] = "sim";
    $_GET["SRS"] = "EPSG:3857";
} elseif ($_GET["X"] != "") {
    //
    // converte a requisi&ccedil;&atilde;o do tile em coordenadas geo
    // http://wiki.openstreetmap.org/wiki/Slippy_map_tilenames#tile_numbers_to_lon.2Flat_2
    //
    $x = $_GET["X"];
    $y = $_GET["Y"];
    $z = $_GET["Z"];

    $qyfile = dirname($map_fileX) . "/" . $_GET["layer"] . "_qy.map";
    $qy = file_exists($qyfile);
    if ($qy == false && $_GET["cache"] == "sim" && $_GET["DESLIGACACHE"] != "sim") {
        carregaCacheImagem();
    }

    $n = pow(2, $z);
    $lon1 = $x / $n * 360.0 - 180.0;
    $lat2 = rad2deg(atan(sinh(pi() * (1 - 2 * $y / $n))));
    $x ++;
    $y ++;
    $lon2 = $x / $n * 360.0 - 180.0;
    $lat1 = rad2deg(atan(sinh(pi() * (1 - 2 * $y / $n))));
    $x --;
    $y --;

    $projInObj = ms_newprojectionobj("proj=latlong,a=6378137,b=6378137");
    $projOutObj = ms_newprojectionobj("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");

    $poPoint1 = ms_newpointobj();
    $poPoint1->setXY($lon1, $lat1);
    $poPoint1->project($projInObj, $projOutObj);
    $poPoint2 = ms_newpointobj();
    $poPoint2->setXY($lon2, $lat2);
    $poPoint2->project($projInObj, $projOutObj);
    $_GET["BBOX"] = $poPoint1->x . " " . $poPoint1->y . " " . $poPoint2->x . " " . $poPoint2->y;
    $_GET["mapext"] = str_replace(",", " ", $_GET["BBOX"]);
    $_GET["WIDTH"] = 256;
    $_GET["HEIGHT"] = 256;
} elseif (isset($_GET["BBOX"])) {
    $_GET["mapext"] = str_replace(",", " ", $_GET["BBOX"]);
}
// por seguranca
include_once ("funcoes_gerais.php");

$logExec = $_SESSION["logExec"];
if (isset($logExec) && $logExec["mapa_"] == true) {
    i3GeoLog("prog: mapa_googlemaps url: " . implode("&", array_merge($_GET, $_POST)), $_SESSION["dir_tmp"]);
}

restauraCon($map_fileX, $postgis_mapa);

$mapa = ms_newMapObj($map_fileX);
$ret = $mapa->extent;

$cache = false;
$cortePixels = 0;
$versao = versaoMS();

// no caso de projecoes remotas, o mapfile nao e alterado
$numlayers = $mapa->numlayers;
for ($i = 0; $i < $numlayers; ++ $i) {
    $l = $mapa->getlayer($i);
    $layerName = $l->name;
    $l->set("status", MS_OFF);
    // no caso de haver uma mascara definida no layer
    if ($versao["inteiro"] >= 60200) {
        if ($l->mask != "") {
            $lmask = $mapa->getlayerbyname($l->mask);
            if (! empty($postgis_mapa)) {
                if ($lmask->connectiontype == MS_POSTGIS) {
                    $lcon = $l->connection;
                    if (($lcon == " ") || ($lcon == "") || (in_array($lcon, array_keys($postgis_mapa)))) {
                        if (($lcon == " ") || ($lcon == "")) {
                            $lmask->set("connection", $postgis_mapa);
                        } else {
                            $lmask->set("connection", $postgis_mapa[$lcon]);
                        }
                    }
                }
            }
            if ($lmask->getProjection() == "") {
                $lmask->setProjection("proj=latlong,a=6378137,b=6378137");
            }
        }
    }
    if ($layerName == $_GET["layer"] || $l->group == $_GET["layer"] && $l->group != "") {
        $l->set("template", "none.htm");
        $l->set("status", MS_DEFAULT);
        //
        // numero de pixels que serao considerados para corte da imagem no caso de cache ativo e tema de pontos
        //
        $cortePixels = 0;
        if ($l->getmetadata("cortepixels") != "" && $qy == false) {
            $cortePixels = $l->getmetadata("cortepixels");
        }
        // FIXME verificar se foi corrigido em versoes novas do mapserver
        // corrige um bug do mapserver que nao calcula a escala direito
        $l->set("maxscaledenom", $l->maxscaledenom * 100000);
        $l->set("minscaledenom", $l->minscaledenom * 100000);
        $l->set("symbolscaledenom", $l->symbolscaledenom * 100000);
        if ($l->getmetadata("classesnome") != "" || $l->getmetadata("palletefile") != "") {
            autoClasses($l, $mapa);
        }
        if (! empty($postgis_mapa)) {
            if ($l->connectiontype == MS_POSTGIS) {
                $lcon = $l->connection;
                if (($lcon == " ") || ($lcon == "") || (in_array($lcon, array_keys($postgis_mapa)))) {
                    if (($lcon == " ") || ($lcon == "")) {
                        $l->set("connection", $postgis_mapa);
                    } else {
                        $l->set("connection", $postgis_mapa[$lcon]);
                    }
                }
            }
        }
        if ($l->getProjection() == "") {
            $l->setProjection("proj=latlong,a=6378137,b=6378137");
        }
    }
    if ($layerName == $_GET["layer"]) {
        if (strtolower($l->getmetadata("cache")) == "sim") {
            $cache = true;
        }
        //
        // numero de pixels que serao considerados para corte da imagem no caso de cache ativo e tema de pontos
        //
        if ($l->getmetadata("cortepixels") != "" && $qy == false) {
            $cortePixels = $l->getmetadata("cortepixels");
        }
        if ($_GET["REQUEST"] == "GetFeatureInfo" || strtolower($_GET["REQUEST"]) == "getfeature") {
            $l->setmetadata("gml_include_items", "all");
            $l->set("template", "none.htm");
            $l->setmetadata("WMS_INCLUDE_ITEMS", "all");
            $l->setmetadata("WFS_INCLUDE_ITEMS", "all");
            $l->setmetadata("ows_enable_request", "*");
            $l->set("dump", MS_TRUE);
            $l->setmetadata("ows_srs", "AUTO");
            if (strtolower($_GET["REQUEST"]) == "getfeature") {
                $_GET["TYPENAME"] = $l->name;
            }
        }
    }
    if ($layerName == $_GET["layer"] && ($_GET["FORMAT"] == "utfgrid")) {
        $_GET["SRS"] = "EPSG:3857";
        include ("mapa_utfgrid.php");
        exit();
    }
}

//
// qd a cahamda e para um WMS, redireciona para ogc.php
//
if ($_GET["REQUEST"] == "GetFeatureInfo" || $_GET["REQUEST"] == "getfeature") {
    if ($_GET["REQUEST"] == "GetFeatureInfo") {
        $mapa->setsize(256, 256);
        $mapext = explode(",", $_GET["BBOX"]);
        $mapa->setExtent($mapext[0], $mapext[1], $mapext[2], $mapext[3]);
    } else {
        $mapa->setExtent(- 21309420.490489, - 8061966.246171, 21505099.28287, 16906647.661876);
    }
    $req = ms_newowsrequestobj();
    $_GET = array_merge($_GET, $_POST);
    foreach ($_GET as $k => $v) {
        $req->setParameter($k, $v);
    }
    $proto = "http" . ((isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] == "on") ? "s" : "") . "://";
    $server = isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : $_SERVER['SERVER_NAME'];
    $or = $proto . $server . $_SERVER['PHP_SELF'];
    $mapa->setmetadata("wfs_onlineresource", $or . "?" . $_SERVER["QUERY_STRING"]);

    ms_ioinstallstdouttobuffer();
    $mapa->owsdispatch($req);
    $contenttype = ms_iostripstdoutbuffercontenttype();
    header("Content-type: $contenttype");
    ms_iogetStdoutBufferBytes();
    ms_ioresethandlers();
    exit();
}

if ($_GET["layer"] == "") {
    $cache = true;
}

if (($_GET == false) || ($qy) || (strtolower($_GET["DESLIGACACHE"]) == "sim")) {
    $cache = false;
} elseif (trim($_GET["TIPOIMAGEM"]) != "" && trim($_GET["TIPOIMAGEM"]) != "nenhum") {
    $cache = false;
}
if ($_GET["WIDTH"] != 256) {
    $cache = false;
}
if ($cache == true) {
    carregaCacheImagem();
}
$mapa->setsize($_GET["WIDTH"], $_GET["HEIGHT"]);
$mapext = explode(" ", $_GET["mapext"]);
$mapa->setExtent($mapext[0], $mapext[1], $mapext[2], $mapext[3]);
$o = $mapa->outputformat;
$o->set("imagemode", MS_IMAGEMODE_RGBA);

$legenda = $mapa->legend;
$legenda->set("status", MS_OFF);
$escala = $mapa->scalebar;
$escala->set("status", MS_OFF);
//
// se o layer nao for do tipo fundo
//
if ($_GET["tipolayer"] != "fundo") {
    $o->set("transparent", MS_TRUE);
}
if (trim($_GET["TIPOIMAGEM"]) != "" && trim($_GET["TIPOIMAGEM"]) != "nenhum") {
    $o->setOption("QUANTIZE_FORCE", "OFF");
}

//
// se o layer foi marcado para corte altera os parametros para ampliar o mapa
// antes de gerar a imagem
//
if ($cortePixels > 0) {
    // $imagemBranco = $mapa->prepareImage();
    $escalaInicial = $mapa->scaledenom;
    $extensaoInicial = $mapa->extent;
    $wh = 256 + ($cortePixels * 2);
    $mapa->setsize($wh, $wh);
    $ponto = new pointObj();
    $ponto->setxy(($wh / 2), ($wh / 2));
    $mapa->zoomScale($escalaInicial, $ponto, $wh, $wh, $extensaoInicial);
}

if ($qy != true) {
    $img = $mapa->draw();
} else {
    $handle = fopen($qyfile, "r");
    $conteudo = fread($handle, filesize($qyfile));
    fclose($handle);
    $shp = unserialize($conteudo);
    $l = $mapa->getLayerByname($_GET["layer"]);
    $indxlayer = $l->index;
    if ($l->connectiontype !== MS_POSTGIS) {
        foreach ($shp as $indx) {
            $mapa->querybyindex($indxlayer, - 1, $indx, MS_TRUE);
        }
        $qm = $mapa->querymap;
        $qm->set("width", $_GET["WIDTH"]);
        $qm->set("height", $_GET["HEIGHT"]);
        $img = $mapa->drawQuery();
    } else {
        $img = $mapa->draw();
        $c = $mapa->querymap->color;
        $numclasses = $l->numclasses;
        if ($numclasses > 0) {
            $classe0 = $l->getClass(0);
            $classe0->setexpression("");
            $classe0->set("name", " ");
            for ($i = 1; $i < $numclasses; ++ $i) {
                $classe = $l->getClass($i);
                $classe->set("status", MS_DELETE);
            }
        }
        $cor = $classe0->getstyle(0)->color;
        $cor->setrgb($c->red, $c->green, $c->blue);
        $cor = $classe0->getstyle(0)->outlinecolor;
        $cor->setrgb($c->red, $c->green, $c->blue);
        // $v = versaoMS();
        if ($versao["principal"] == 6) {
            $l->open();
            foreach ($shp as $indx) {
                $shape = $l->getShape(new resultObj($indx));
                $shape->draw($mapa, $l, $img);
            }
            $l->close();
        } else {
            $l->open();
            foreach ($shp as $indx) {
                $shape = $l->getfeature($indx, - 1);
                $shape->draw($mapa, $l, $img);
            }
            $l->close();
        }
    }
}
if (! function_exists('imagepng')) {
    $s = PHP_SHLIB_SUFFIX;
    @dl('php_gd.' . $s);
    if (! function_exists('imagepng')) {
        @dl('php_gd2.' . $s);
    }
    if (! function_exists('imagepng')) {
        $_GET["TIPOIMAGEM"] = "";
    }
}
if (trim($_GET["TIPOIMAGEM"]) != "" && trim($_GET["TIPOIMAGEM"]) != "nenhum") {
    if ($img->imagepath == "") {
        echo "Erro IMAGEPATH vazio";
        exit();
    }
    $nomer = ($img->imagepath) . "filtroimgtemp" . nomeRand() . ".png";
    $img->saveImage($nomer);
    //
    // corta a imagem gerada para voltar ao tamanho normal
    //
    if ($cortePixels > 0) {
        cortaImagemDisco($nomer, $cortePixels, 256);
    }
    filtraImg($nomer, trim($_GET["TIPOIMAGEM"]));
    $img = imagecreatefrompng($nomer);
    imagealphablending($img, false);
    imagesavealpha($img, true);
    cabecalhoImagem($nomer);
    imagepng($img);
} else {
    if ($cache == true) {
        $nomer = salvaCacheImagem();
        cabecalhoImagem($nomer);
        carregaCacheImagem();
    } else {
        if ($_SESSION["i3georendermode"] == 0 || ($_SESSION["i3georendermode"] == 1 && $cortePixels > 0)) {
            $nomer = ($img->imagepath) . "temp" . nomeRand() . ".png";
            if ($img->imagepath == "") {
                ilegal();
            }
            $img->saveImage($nomer);
            //
            // corta a imagem gerada para voltar ao tamanho normal
            //
            if ($cortePixels > 0) {
                $img = cortaImagemDisco($nomer, $cortePixels, 256);
            } else {
                $img = imagecreatefrompng($nomer);
                imagealphablending($img, false);
                imagesavealpha($img, true);
            }
            cabecalhoImagem($nomer);
            imagepng($img);
            imagedestroy($img);
            exit();
        }
        if ($_SESSION["i3georendermode"] == 1) {
            ob_clean();
            header('Content-Type: image/png');
            $img->saveImage();
        }
        if ($_SESSION["i3georendermode"] == 2) {
            $nomer = ($img->imagepath) . "temp" . nomeRand() . ".png";
            $img->saveImage($nomer);
            //
            // corta a imagem gerada para voltar ao tamanho normal
            //
            if ($cortePixels > 0) {
                $img = cortaImagemDisco($nomer, $cortePixels, 256);
            }
            cabecalhoImagem($nomer);
            header("X-Sendfile: $nomer");
        }
    }
    exit();
}

function cabecalhoImagem($nome,$tipo="image/png")
{
    if (ob_get_contents()) {
        ob_clean();
    }
    $lastModified = filemtime($nome);
    // set last-modified header
    header("Last-Modified: " . gmdate("D, d M Y H:i:s", $lastModified) . " GMT");
    // make sure caching is turned on
    header('Cache-Control: public,max-age=86400'); // 24 horas
    header("Content-type: " . $tipo);
    header("Etag: " . md5($nome));
    // check if page has changed. If not, send 304 and exit
    if (array_key_exists('HTTP_IF_MODIFIED_SINCE', $_SERVER)) {
        $if_modified_since = strtotime(preg_replace('/;.*$/', '', $_SERVER['HTTP_IF_MODIFIED_SINCE']));
        if ($if_modified_since >= $lastModified) { // Is the Cached version the most recent?
            header($_SERVER['SERVER_PROTOCOL'] . ' 304 Not Modified');
            exit();
        }
    }
}

function salvaCacheImagem()
{
    global $img, $cachedir, $x, $y, $z, $map_fileX, $cortePixels;
    $layer = $_GET["layer"];
    if ($layer == "") {
        $layer = "fundo";
    }
    if ($cachedir == "") {
        $cachedir = dirname(dirname($map_fileX)) . "/cache";
    }
    $c = $cachedir . "/googlemaps/$layer/$z/$x";
    if (! file_exists($c . "/$y.png")) {
        if (! file_exists($cachedir . "/googlemaps/$layer/$z/$x")) {
            mkdir($cachedir . "/googlemaps/$layer/$z/$x", 0744, true);
            chmod($cachedir . "/googlemaps/$layer/$z/$x", 0744);
        }
        $img->saveImage($c . "/$y.png");
        //
        // corta a imagem gerada para voltar ao tamanho normal
        //
        if ($cortePixels > 0) {
            $img = cortaImagemDisco($c . "/$y.png", $cortePixels, 256);
        }
        chmod($c . "/$y.png", 0744);
    }
    return $c . "/$y.png";
}

function carregaCacheImagem()
{
    global $img, $cachedir, $x, $y, $z, $map_fileX, $i3georendermode;
    $layer = $_GET["layer"];
    if ($layer == "") {
        $layer = "fundo";
    }
    if ($cachedir == "") {
        $cachedir = dirname(dirname($map_fileX)) . "/cache";
    }
    $c = $cachedir . "/googlemaps/$layer/$z/$x";
    if($_GET["FORMAT"] == "utfgrid"){
        $nome = $c . "/$y.json";
        $tipo = "application/json; subtype=json";
    } else {
        $nome = $c . "/$y.png";
        $tipo = "image/png";
    }
    if (file_exists($nome)) {
        cabecalhoImagem($nome,$tipo);
        if ($i3georendermode = 0 || $i3georendermode = 1 || empty($i3georendermode)) {
            readfile($nome);
        } else {
            header("X-Sendfile: $nome");
        }
        exit();
    }
}

function nomeRand($n = 10)
{
    $nomes = "";
    $a = 'azertyuiopqsdfghjklmwxcvbnABCDEFGHIJKLMNOPQRSTUVWXYZ';
    $max = 51;
    for ($i = 0; $i < $n; ++ $i) {
        $nomes .= $a{mt_rand(0, $max)};
    }
    return $nomes;
}

function filtraImg($nomer, $tipoimagem)
{
    include_once ("classe_imagem.php");
    $tiposImagem = explode(" ", $tipoimagem);
    foreach ($tiposImagem as $tipoimagem) {
        $m = new Imagem($nomer);
        if ($tipoimagem == "cinza") {
            imagepng($m->cinzaNormal(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "sepiaclara") {
            imagepng($m->sepiaClara(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "sepianormal") {
            imagepng($m->sepiaNormal(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "negativo") {
            imagepng($m->negativo(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "detectaBordas") {
            imagepng($m->detectaBordas(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "embassa") {
            imagepng($m->embassa(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "gaussian_blur") {
            imagepng($m->gaussian_blur(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "selective_blur") {
            imagepng($m->selective_blur(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "mean_removal") {
            imagepng($m->mean_removal(), str_replace("\\", "/", $nomer));
        }
        if ($tipoimagem == "pixelate") {
            imagepng($m->pixelate(), str_replace("\\", "/", $nomer));
        }
    }
}

function ilegal()
{
    $img = imagecreatefrompng("../imagens/ilegal.png");
    imagealphablending($img, false);
    imagesavealpha($img, true);
    ob_clean();
    echo header("Content-type: image/png \n\n");
    imagepng($img);
    exit();
}

function versaoMS()
{
    $v = "5.0.0";
    $vs = explode(" ", ms_GetVersion());
    $cvs = count($vs);
    for ($i = 0; $i < $cvs; ++ $i) {
        if (trim(strtolower($vs[$i])) == "version") {
            $v = $vs[$i + 1];
        }
    }
    $versao["completa"] = $v;
    $v = explode(".", $v);
    $versao["principal"] = $v[0];
    return $versao;
}

/**
 * Corta uma imagem existente em disco
 */
function cortaImagemDisco($arquivo, $cortePixels, $tamanhoFinal = 256)
{
    $img = imagecreatefrompng($arquivo);
    $imgc = imagecreatetruecolor($tamanhoFinal, $tamanhoFinal);
    // necessario, sem isso algumas imagens sao geradas de forma errada
    imagesavealpha($imgc, true);
    $color = imagecolorallocatealpha($imgc, 0x00, 0x00, 0x00, 127);
    imagefill($imgc, 0, 0, $color);
    imagecopy($imgc, $img, 0, 0, $cortePixels, $cortePixels, $tamanhoFinal, $tamanhoFinal);
    imagepng($imgc, $arquivo);
    return $imgc;
}
?>