<?php
/*
 * This file is part of the GWF project, you may use this software under the
 * terms of your license agreement.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NON-INFRINGEMENT. IN NO EVENT
 * SHALL THE COPYRIGHT HOLDERS OR ANYONE DISTRIBUTING THE SOFTWARE BE LIABLE
 * FOR ANY DAMAGES OR OTHER LIABILITY, WHETHER IN CONTRACT, TORT OR OTHERWISE,
 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
 * DEALINGS IN THE SOFTWARE.
 */
if(isset($_GET['src']))
{
    @ini_set('max_execution_time', 0);
    define('DEBUG', true);
    define('DS', DIRECTORY_SEPARATOR);

    //Load Pt
    require dirname(__FILE__).DS.'include'.DS.'pt'.DS.'load.php';
    define('SITEPATH', Util::makeStdPath('./../../../'));

    Core::load('images');
    $dir = Util::getTempDir().DIRECTORY_SEPARATOR.'scale_image';
    if(!file_exists($dir))
    {
        Util::makePublicDir($dir);
    }

    $etag = md5($_SERVER['REQUEST_URI']);
    $imageFile = $dir.DIRECTORY_SEPARATOR.$etag;
    if(isset($_SERVER['HTTP_IF_NONE_MATCH']) && file_exists($imageFile))
    {
        $clientTag = trim(stripslashes($_SERVER['HTTP_IF_NONE_MATCH']), '"');
        if($clientTag == $etag)
        {
            header("Etag: \"{$etag}\"");
            header('HTTP/1.1 304 Not Modified');
            exit();
        }
    }
    
    $image = new Image();
    if(file_exists($imageFile))
    {
        Response::setHeader('content-type', 'image/jpeg');
        Response::setHeader('Etag', "\"{$etag}\"");
        readfile($imageFile);
        exit();
    }

    $src = $_GET['src'];
    if(strpos($src, 'http://') !== false)
    {
        Core::load('network');
        $url = parse_url($src);

        $server = '';
        if(isset($url['user']))
        {
            $server .= $url['user'];
            if(isset($url['pass']))
            {
                $server .= ':'.$url['pass'];
            }
            $server .= '@';
        }
        $server .= $url['host'];

        if(isset($url['port']))
        {
            $server .= ':'.$url['port'];
        }

        $getStr = $url['path'];
        if(isset($url['query']))
        {
            $getStr .= '?'.$url['query'];
        }

        if(isset($url['fragment']))
        {
            $getStr .= '#'.$url['fragment'];
        }

	try
	{
	  $http = new HTTPRequest($server);
	  $imageData = $http->get($getStr);
	}
	catch(GenericException $e)
	{
	    Response::setStatus(HTTP::INTERNAL_SERVER_ERROR);
	    die((string)$e);
	}

        if($imageData instanceof HTTPResponse)
        {
            $tmpFile = $dir.DIRECTORY_SEPARATOR.md5(microtime());
            file_put_contents($tmpFile, $imageData->getContent());
            $image->load($tmpFile);
            unlink($tmpFile);
        }
        else
        {
            $tmpFile = $http->getTempFile();
            $image->load($tmpFile);
            $http->cleanup();
        }
    }
    else
    {
        $src = str_replace(SITEPATH, '', $src);
        $src = SITEPATH.DIRECTORY_SEPARATOR.trim($src, DIRECTORY_SEPARATOR);
        if(!file_exists($src))
        {
            Response::setStatus(HTTP::NOT_FOUND);
            exit();
        }
        $image->load($src);
    }

    Response::setHeader('Etag', "\"{$etag}\"");

    if(isset($_GET['w']) && is_numeric($_GET['w']))
    {
        $width = (int)$_GET['w'];

        if(isset($_GET['h']) && is_numeric($_GET['h']))
        {
                $height = (int)$_GET['h'];

                if(isset($_GET['t']) && $_GET['t'])
                {
                        $image->applyFilter(new ScaleAndCropImage($width, $height));
                }
                else
                {
                    if($image->width >= $width || $image->height >= $height)
                    {
                        $image->applyFilter(new ScaleImage($width, $height));
                    }
                }
        }
        else
        {
            if($image->width >= $width || $image->height >= $height)
            {
                $height = $width * min($image->width,$image->height)/max($image->width, $image->height);
                $image->applyFilter(new ScaleImage($width, $height));
            }
        }
    }
    elseif(isset($_GET['h']))
    {
        $height = (int)$_GET['h'];
        $width = $height * min($image->width,$image->height)/max($image->width, $image->height);
        $image->applyFilter(new ScaleImage($width, $height));
    }

    $image->save($imageFile, 'image/jpeg');
    Response::setHeader('Content-Type', 'image/jpeg');
    $image->output('image/jpeg');
}
?>