<?php

/**
 * @copyright (C) 2013 iJoomla, Inc. - All rights reserved.
 * @license GNU General Public License, version 2 (http://www.gnu.org/licenses/gpl-2.0.html)
 * @author iJoomla.com <webmaster@ijoomla.com>
 * @url https://www.jomsocial.com/license-agreement
 * The PHP code portions are distributed under the GPL license. If not otherwise stated, all images, manuals, cascading style sheets, and included JavaScript *are NOT GPL, and are released under the IJOOMLA Proprietary Use License v1.0
 * More info at https://www.jomsocial.com/license-agreement
 */

use Joomla\CMS\Factory;
use Joomla\CMS\Language\Text;
use Joomla\Filesystem\File;

// no direct access
defined('_JEXEC') or die('Restricted access');

jimport('joomla.filesystem.file');
jimport('joomla.utilities.utility');

// Disable jpeg warning | gd-jpeg, libjpeg: recoverable error: Premature end of JPEG
// that are produced by certain jpeg encoding
ini_set('gd.jpeg_ignore_warning', 1);

require_once(JPATH_ROOT . '/components/com_community/libraries/core.php');

class CImageHelper {

    // Resize the given image to a dest path. Src must exist
    // If original size is smaller, do not resize just make a copy
    static public function resize($srcPath, $destPath, $destType, $destWidth, $destHeight, $sourceX = 0, $sourceY = 0, $currentWidth = 0, $currentHeight = 0, $gifAnimationPath = '') {
        // Set output quality
        $config = CFactory::getConfig();
        $imgQuality = $config->get('output_image_quality');

        // For small target size, override with much higher image quality: 96
        if ($destWidth < 200 || $destHeight < 200) {
            $imgQuality = 99;
        }

        $pngQuality = ($imgQuality - 100) / 11.111111;
        $pngQuality = round(abs($pngQuality));

        // See if we can grab image transparency
        $image = CImageHelper::open($srcPath, $destType);
        if (!is_resource($image) && !$image instanceof \GdImage) {
            echo 'Image resize fail.';
            return false;
        }

        $transparentIndex = imagecolortransparent($image);

        // Create new image resource
        $image_p = ImageCreateTrueColor($destWidth, $destHeight);
        $background = ImageColorAllocate($image_p, 255, 255, 255);

        // test if memory is enough
        if ($image_p == FALSE) {
            echo 'Image resize fail. Please increase PHP memory';
            return false;
        }

        // Set the new image background width and height
        $resourceWidth = $destWidth;
        $resourceHeight = $destHeight;

        if (empty($currentHeight) && empty($currentWidth)) {
            list($currentWidth, $currentHeight) = getimagesize($srcPath);
        }
        // If image is smaller, just copy to the center
        $targetX = 0;
        $targetY = 0;

        // If the height and width is smaller, copy it to the center.
        if ($destType != 'image/jpg' && $destType != 'image/jpeg' && $destType != 'image/pjpeg' && $destType == 'image/png' && $destType == 'image/x-png') {
            if (($currentHeight < $destHeight) && ($currentWidth < $destWidth)) {
                $targetX = intval(($destWidth - $currentWidth) / 2);
                $targetY = intval(($destHeight - $currentHeight) / 2);

                // Since the
                $destWidth = $currentWidth;
                $destHeight = $currentHeight;
            }
        }

        // Resize GIF/PNG to handle transparency
        if ($destType == 'image/gif') {

            $imageEngine = $config->get('imageengine');
            $magickPath = $config->get('magickPath');
            if (class_exists('Imagick') && $gifAnimationPath) {
                // Put the new image in temporary dest path, and move them using
                // Joomla API to ensure new folder is created
                //$tempFilename = $jconfig->getValue('tmp_path').'/'. md5($destPath);
                $tempFilename = $srcPath;

                $thumb = $imagick = new Imagick($srcPath);
                //$thumb->readImage($srcPath);

                $format = $imagick->getImageFormat();
                if ($format == 'GIF' && $gifAnimationPath) {
                    $gifAnimationPath = JPATH_ROOT.'/'.$gifAnimationPath; // get the absolute path
                    $imagick = $imagick->coalesceImages();
                    do {
                        $imagick->resizeImage($destWidth, $destHeight, Imagick::FILTER_BOX, 1);
                    } while ($imagick->nextImage());
                    $imagick = $imagick->deconstructImages();
                    $imagick->writeImages($gifAnimationPath, true);

                    // can be added some more gifs
                    $imagick = $imagick->coalesceImages();
                    do {
                        $imagick->resizeImage($destWidth, $destHeight, Imagick::FILTER_BOX, 1);
                    } while ($imagick->nextImage());
                    $imagick = $imagick->deconstructImages();
                    $imagick->writeImages($gifAnimationPath, true);
                }

                $thumb->readImage($srcPath);
                $thumb->cropThumbnailImage($destWidth, $destHeight);
                $thumb->writeImage($tempFilename);

                $thumb->clear();
                $thumb->destroy();

                // Move to the correct path
                File::move($tempFilename, $destPath);
                return;
            }else{
                $colorTransparent = imagecolortransparent($image);
                imagepalettecopy($image, $image_p);
                imagefill($image_p, 0, 0, $colorTransparent);
                imagecolortransparent($image_p, $colorTransparent);
                imagetruecolortopalette($image_p, true, 256);
                imagecopyresized($image_p, $image, (int) $targetX, (int) $targetY, (int) $sourceX, (int) $sourceY, (int) $destWidth, (int) $destHeight, (int) $currentWidth, (int) $currentHeight);
            }

        } else if ($destType == 'image/png' || $destType == 'image/x-png') {
            // Disable alpha blending to keep the alpha channel
            imagealphablending($image_p, false);
            imagesavealpha($image_p, true);
            $transparent = imagecolorallocatealpha($image_p, 255, 255, 255, 127);

            imagefilledrectangle($image_p, 0, 0, $resourceWidth, $resourceHeight, $transparent);
            imagecopyresampled($image_p, $image, (int) $targetX, (int) $targetY, (int) $sourceX, (int) $sourceY, (int) $destWidth, (int) $destHeight, (int) $currentWidth, (int) $currentHeight);
        } else {
            // Turn off alpha blending to keep the alpha channel
            imagealphablending($image_p, false);
            imagecopyresampled($image_p, $image, (int) $targetX, (int) $targetY, (int) $sourceX, (int) $sourceY, (int) $destWidth, (int) $destHeight, (int) $currentWidth, (int) $currentHeight);
        }

        // Output
        ob_start();

        // Test if type is png
        if ($destType == 'image/png' || $destType == 'image/x-png') {
            imagepng($image_p, null, $pngQuality);
        } elseif ($destType == 'image/gif') {
            imagegif($image_p);
        } else {
            // We default to use jpeg
            imagejpeg($image_p, null, $imgQuality);
        }

        $output = ob_get_contents();
        ob_end_clean();

        // @todo, need to verify that the $output is indeed a proper image data
        return File::write($destPath, $output);
    }

    // if dest height/width is empty, then resize propotional to origianl width/height
    static public function resizeProportional($srcPath, $destPath, $destType, $destWidth = 0, $destHeight = 0, $gifAnimationPath = '') {
        list($currentWidth, $currentHeight) = getimagesize($srcPath);

        $config = CFactory::getConfig();

        if ($currentWidth == 0 || $currentHeight == 0) {
            return false;
        }

        if ($destWidth) {
            $destHeight = intval($destWidth / $currentWidth * $currentHeight);
        } else if ($destHeight) {
            $destWidth = intval($destHeight / $currentHeight * $currentWidth);
        } else {
            $destHeight = $currentHeight;
            $destWidth = $currentWidth;
        }

        $imageEngine = $config->get('imageengine');
        $magickPath = $config->get('magickPath');

        if(($gifAnimationPath && (!class_exists('Imagick') && empty($magickPath))) && CFactory::getConfig()->get('enable_animated_gif')){
            return Text::_('COM_COMMUNITY_IMAGICK_NOT_INSTALLED_ERROR');
        }

        // Use imageMagick if available
        if (class_exists('Imagick') && ($imageEngine == 'auto' || $imageEngine == 'imagick')) {
            if (is_file($srcPath)) {
                $thumb = $imagick = new Imagick($srcPath);
                //$thumb->readImage($srcPath);

                $format = $imagick->getImageFormat();
                if ($format == 'GIF' && $gifAnimationPath) {
                    $gifAnimationPath = JPATH_ROOT.'/'.$gifAnimationPath; // get the absolute path
                    $imagick = $imagick->coalesceImages();
                    do {
                        $imagick->resizeImage($destWidth, $destHeight, Imagick::FILTER_BOX, 1);
                    } while ($imagick->nextImage());
                    $imagick = $imagick->deconstructImages();
                    $imagick->writeImages($gifAnimationPath, true);

                    // can be added some more gifs
                    $imagick = $imagick->coalesceImages();
                    do {
                        $imagick->resizeImage($destWidth, $destHeight, Imagick::FILTER_BOX, 1);
                    } while ($imagick->nextImage());
                    $imagick = $imagick->deconstructImages();
                    $imagick->writeImages($gifAnimationPath, true);
                }

                $thumb->cropThumbnailImage($destWidth, $destHeight);
                $thumb->writeImage($destPath);

                $thumb->clear();
                $thumb->destroy();

                return true;
            }
        } else if (!empty($magickPath) && !class_exists('Imagick')) {
            // Execute the command to resize. In windows, the commands are executed differently.
            if (CStringHelper::strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
                $file = rtrim($config->get('magickPath'), '/') . '/convert.exe';
                $command = '"' . rtrim($config->get('magickPath'), '/') . '/convert.exe"';
            } else {
                $file = rtrim($config->get('magickPath'), '/') . '/convert';
                $command = '"' . rtrim($config->get('magickPath'), '/') . '/convert"';
            }

            if (is_file($file) && function_exists('exec')) {
                $execute = $command . ' -resize ' . $destWidth . 'x' . $destHeight . ' ' . $srcPath . ' ' . $gifAnimationPath;
                exec($execute);

                // Test if the files are created, otherwise we know the exec failed.
                if (is_file($gifAnimationPath)) {
                    return CImageHelper::resize($srcPath, $destPath, $destType, $destWidth, $destHeight);
                }
            }
        }

        // IF all else fails, we try to use GD
        return CImageHelper::resize($srcPath, $destPath, $destType, $destWidth, $destHeight, 0, 0, 0, 0, $gifAnimationPath);
    }

    /**
     * Method to create a thumbnail for an image
     *
     * @param	$srcPath	The original source of the image.
     * @param	$destPath	The destination path for the image
     * @param	$destType	The destination image type.
     * @param	$destWidth	The width of the thumbnail.
     * @param	$destHeight	The height of the thumbnail.
     *
     * @return	bool		True on success.
     */
    static public function createThumb($srcPath, $destPath, $destType, $destWidth = 64, $destHeight = 64) {
        // Get the image size for the current original photo
        list( $currentWidth, $currentHeight ) = getimagesize($srcPath);
        $config = CFactory::getConfig();
        //$jconfig = Factory::getConfig();
        $app = Factory::getApplication();

        // Find the correct x/y offset and source width/height. Crop the image squarely, at the center.
        if ($currentWidth == $currentHeight) {
            $sourceX = 0;
            $sourceY = 0;
        } else if ($currentWidth > $currentHeight) {
            $sourceX = intval(( $currentWidth - $currentHeight ) / 2);
            $sourceY = 0;
            $currentWidth = $currentHeight;
        } else {
            $sourceX = 0;
            $sourceY = intval(( $currentHeight - $currentWidth ) / 2);
            $currentHeight = $currentWidth;
        }

        $imageEngine = $config->get('imageengine');
        $magickPath = $config->get('magickPath');

        // Use imageMagick if available
        if (class_exists('Imagick') && ($imageEngine == 'auto' || $imageEngine == 'imagick' )) {
            // Put the new image in temporary dest path, and move them using
            // Joomla API to ensure new folder is created
            //$tempFilename = $jconfig->getValue('tmp_path').'/'. md5($destPath);
            $tempFilename = $app->getCfg('tmp_path') . '/' . md5($destPath);

            $thumb = new Imagick($srcPath);
            $thumb->readImage($srcPath);
            $thumb->readImage($srcPath);
            $thumb->cropThumbnailImage($destWidth, $destHeight);
            $thumb->writeImage($tempFilename);

            $thumb->clear();
            $thumb->destroy();

            // Move to the correct path
            File::move($tempFilename, $destPath);
            return true;
        } else if (!empty($magickPath) && !class_exists('Imagick')) {
            // Execute the command to resize. In windows, the commands are executed differently.
            if (CStringHelper::strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
                $file = rtrim($config->get('magickPath'), '/') . '/convert.exe';
                $command = '"' . rtrim($config->get('magickPath'), '/') . '/convert.exe"';
            } else {
                $file = rtrim($config->get('magickPath'), '/') . '/convert';
                $command = '"' . rtrim($config->get('magickPath'), '/') . '/convert"';
            }


            if (is_file($file) && function_exists('exec')) {
                $execute = $command . ' -convert ' . $destWidth . 'x' . $destHeight . '+' . $sourceX . '+' . $sourceY . ' ' . $srcPath . ' ' . $destPath;
                exec($execute);

                // Test if the files are created, otherwise we know the exec failed.
                if (is_file($destPath)) {
                    return true;
                }
            }
        }

        // IF all else fails, we try to use GD
        return CImageHelper::resize($srcPath, $destPath, $destType, $destWidth, $destHeight, $sourceX, $sourceY, $currentWidth, $currentHeight);
    }

    static public function getExtension($type) {
        $type = CStringHelper::strtolower($type);

        if ($type == 'image/png' || $type == 'image/x-png') {
            return '.png';
        } elseif ($type == 'image/gif') {
            return '.gif';
        }

        // We default to use jpeg
        return '.jpg';
    }

    static public function isValidType($type) {
        $type = CStringHelper::strtolower($type);
        $validType = array('image/png', 'image/x-png', 'image/gif', 'image/jpeg', 'image/pjpeg');

        return in_array($type, $validType);
    }

    /**
     *
     * @param string $filename
     * @return boolean
     */
    public static function isMemoryNeededExceed($filename) {
        $MB = pow(1024, 2);  // number of bytes in 1M
        $K64 = 65536;    // number of bytes in 64
        $TWEAKFACTOR = 1.5;

        $imageInfo = @getimagesize($filename);

        if ($imageInfo) {
            $channels = isset($imageInfo['channels']) ? $imageInfo['channels'] : 8;
            $imageInfo['bits'] = isset($imageInfo['bits']) ? $imageInfo['bits'] : 8;
            $memoryNeeded = round(
                ( $imageInfo[0] * $imageInfo[1] * $imageInfo['bits'] * $channels / 8 + $K64 ) * $TWEAKFACTOR
            );

            $memory_limit = ini_get('memory_limit');

            switch ($memory_limit[strlen($memory_limit) - 1]) {
                case 'M':
                case 'm':
                    $memory_limit = (int) $memory_limit * 1048576;
                    break;
                case 'K':
                case 'k':
                    $memory_limit = (int) $memory_limit * 1024;
                    break;
                case 'G':
                case 'g':
                    $memory_limit = (int) $memory_limit * 1073741824;
                    break;
                default:
                    $memory_limit;
                    break;
            }
           
            if ($memoryNeeded > $memory_limit) {
                return false;
            } else {
                return true;
            }
        }
    }

    static public function isValid($file) {
        $config = CFactory::getConfig();

        // Use imagemagick if available
        $imageEngine = $config->get('imageengine');
        $magickPath = $config->get('magickPath');

        if (class_exists('Imagick') && ($imageEngine == 'auto' || $imageEngine == 'imagick' )) {
            $thumb = new Imagick();

            try {
                $imageOk = $thumb->readImage($file);
                $thumb->destroy();
            } catch (Exception $e) {
                $imageOk = false;
            }
            return $imageOk;
        } else if (!empty($magickPath) && !class_exists('Imagick')) {
            // Execute the command to resize. In windows, the commands are executed differently.
            if (CStringHelper::strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
                $identifyFile = rtrim($config->get('magickPath'), '/') . '/identify.exe';
                $command = 'start /D"' . rtrim($config->get('magickPath'), '/') . '" identify.exe -ping "' . $file . '"';
            } else {
                $identifyFile = rtrim($config->get('magickPath'), '/') . '/identify';
                $command = '"' . rtrim($config->get('magickPath'), '/') . '/identify" -ping "' . $file . '"';
            }

            if (is_file($identifyFile) && function_exists('exec')) {
                $output = exec($command);

                // Test if there's any output, otherwise we know the exec failed.
                if (!empty($output)) {
                    return true;
                }
            }
        }


        # JPEG:
        if (function_exists('imagecreatefromjpeg')) {
            $im = @imagecreatefromjpeg($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromgif')) {
            # GIF:
            $im = @imagecreatefromgif($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefrompng')) {
            # PNG:
            $im = @imagecreatefrompng($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromgd')) {
            # GD File:
            $im = @imagecreatefromgd($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromgd2')) {
            # GD2 File:
            $im = @imagecreatefromgd2($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromwbmp')) {
            # WBMP:
            $im = @imagecreatefromwbmp($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromxbm')) {
            # XBM:
            $im = @imagecreatefromxbm($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromxpm')) {
            # XPM:
            $im = @imagecreatefromxpm($file);
            if ($im !== false) {
                return true;
            }
        }

        // If all failed, this photo is invalid
        return false;
    }

    static public function open($file, $type) {
        // @rule: Test for JPG image extensions
        if (function_exists('imagecreatefromjpeg') && ( ( $type == 'image/jpg') || ( $type == 'image/jpeg' ) || ( $type == 'image/pjpeg' ) )) {

            $im = @imagecreatefromjpeg($file);

            if ($im !== false) {
                return $im;
            }
        }

        // @rule: Test for png image extensions
        if (function_exists('imagecreatefrompng') && ( ( $type == 'image/png') || ( $type == 'image/x-png' ) )) {
            $im = @imagecreatefrompng($file);

            if ($im !== false) {
                return $im;
            }
        }

        // @rule: Test for png image extensions
        if (function_exists('imagecreatefromgif') && ( ( $type == 'image/gif') )) {
            $im = @imagecreatefromgif($file);

            if ($im !== false) {
                return $im;
            }
        }

        if (function_exists('imagecreatefromgd')) {
            # GD File:
            $im = @imagecreatefromgd($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromgd2')) {
            # GD2 File:
            $im = @imagecreatefromgd2($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromwbmp')) {
            # WBMP:
            $im = @imagecreatefromwbmp($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromxbm')) {
            # XBM:
            $im = @imagecreatefromxbm($file);
            if ($im !== false) {
                return true;
            }
        }

        if (function_exists('imagecreatefromxpm')) {
            # XPM:
            $im = @imagecreatefromxpm($file);
            if ($im !== false) {
                return true;
            }
        }

        // If all failed, this photo is invalid
        return false;
    }

    static public function getSize($source) {
        $obj = new stdClass();
        list( $obj->width, $obj->height) = getimagesize($source);
        return $obj;
    }

    /*
     * Resize the thumbnail to respect the aspect ratio
     */

    static public function resizeAspectRatio($source, $destination, $thumb_width, $thumb_height) {

        //get extension type
        $type = explode('.',$source);
        $type = strtolower($type[count($type)-1]);
        if($type == 'jpg' || $type == 'jpeg'){
            $image = imagecreatefromjpeg($source);
        }else{
            $image = imagecreatefrompng($source);
        }

        $filename = $destination;

        $width = imagesx($image);
        $height = imagesy($image);

        $original_aspect = $width / $height;
        $thumb_aspect = $thumb_width / $thumb_height;

        if ($original_aspect >= $thumb_aspect) {
            // If image is wider than thumbnail (in aspect ratio sense)
            $new_height = $thumb_height;
            $new_width = $width / ($height / $thumb_height);
        } else {
            // If the thumbnail is wider than the image
            $new_width = $thumb_width;
            $new_height = $height / ($width / $thumb_width);
        }

        $thumb = imagecreatetruecolor($thumb_width, $thumb_height);

        // Resize and crop
        imagecopyresampled($thumb, $image, 0 - ($new_width - $thumb_width) / 2, // Center the image horizontally
            0 - ($new_height - $thumb_height) / 2, // Center the image vertically
            0, 0, $new_width, $new_height, $width, $height);
        imagejpeg($thumb, $filename, 80);
    }

    static public function autoRotate($imagePath, $orientation = null) {
        if (!$orientation) {
            // Read orientation data from original file
            $orientation = CImageHelper::getOrientation($imagePath);
        }

        // Rotate resized files ince it is smaller
        switch ($orientation) {
            case 1: // nothing
                break;

            case 2: // horizontal flip
                break;

            case 3: // 180 rotate left
                CImageHelper::rotate($imagePath, $imagePath, 180);
                break;

            case 4: // vertical flip
                break;

            case 5: // vertical flip + 90 rotate right
                break;

            case 6: // 90 rotate right
                CImageHelper::rotate($imagePath, $imagePath, -90);
                break;

            case 7: // horizontal flip + 90 rotate right
                break;

            case 8: // 90 rotate left
                CImageHelper::rotate($imagePath, $imagePath, 90);
                break;
        }
    }

    /**
     * Rotate the source image and store it to dest path
     * Return true if successful and false otherwise
     */
    static public function rotate($srcPath, $destPath, $degrees) {
        $config = CFactory::getConfig();
        $app = Factory::getApplication();

        // Set output quality
        $imgQuality = $config->get('output_image_quality');

        $imageEngine = $config->get('imageengine');
        $magickPath = $config->get('magickPath');

        $info = getimagesize($srcPath);
        $imgType = image_type_to_mime_type($info[2]);
        $rotate = null;

        // Use imageMagick if available
        if (class_exists('Imagick') && ($imageEngine == 'auto' || $imageEngine == 'imagick' )) {
            $tmpPath = $app->getCfg('tmp_path') . '/' . basename($srcPath);

            $image = new Imagick();
            $image->readImage($srcPath);
            // ImageMagick seems to rotate it counter-clockwise, hence have
            // to multiply the degress by -1
            $image->rotateImage(new ImagickPixel(), $degrees * (-1));
            $image->writeImage($tmpPath);
            $image->clear();
            $image->destroy();

            File::move($tmpPath, $destPath);

            return true;
        } else if ($imgType == 'image/png' && function_exists('imagecreatefrompng')) {
            $source = imagecreatefrompng($srcPath);

            if ($degrees == '90') {
                $rotatedImage = CImageHelper::rotatePNGImage($source);
            } else if ($degrees == '-90') {
                $rotatedImage = CImageHelper::rotatePNGImage(CImageHelper::rotatePNGImage(CImageHelper::rotatePNGImage($source)));
            }

            ob_start();

            imagepng($rotatedImage);
            $output = ob_get_contents();

            ob_end_clean();

            // @todo, need to verify that the $output is indeed a proper image data
            return File::write($destPath, $output);
        } else if (($imgType == 'image/jpeg') && function_exists('imagecreatefromjpeg') && function_exists('imagerotate')) {
            // @todo: Support rotation for other image type other than JPEG
            // Load
            $source = imagecreatefromjpeg($srcPath);

            // Rotate
            $rotate = imagerotate($source, $degrees, 0);

            if ($rotate) {
                // Output
                ob_start();

                // Test if type is png
// 				if( $destType == 'image/png' || $destType == 'image/x-png' )
// 				{
// 					imagepng( $image_p );
// 				}
// 				elseif ( $destType == 'image/gif')
// 				{
// 					imagegif( $image_p );
// 				}
// 				else
                {
                    // We default to use jpeg
                    imagejpeg($rotate, null, $imgQuality);
                }

                $output = ob_get_contents();
                ob_end_clean();

                // @todo, need to verify that the $output is indeed a proper image data
                return File::write($destPath, $output);
            }
        }

        return false;
    }

    /**
     * Rotate png image by 90 degree
     */
    static public function rotatePNGImage($image) {
        $width = imagesx($image);
        $height = imagesy($image);
        $newImage = imagecreatetruecolor($height, $width);
        imagealphablending($newImage, false); //drawing color -> alpha channel information, replacing the destination pixel
        imagesavealpha($newImage, true);

        for ($w = 0; $w < $width; $w++) {
            for ($h = 0; $h < $height; $h++) {
                $ref = imagecolorat($image, $w, $h);
                imagesetpixel($newImage, $h, ($width - 1) - $w, $ref); //assign width size to the height to produce a 90 degree
            }
        }
        return $newImage;
    }

    /**
     * Detect image Orientation. Return false if not found
     */
    static public function getOrientation($srcPath) {

        // Make sure the function exist
        if (!function_exists('exif_read_data')) {
            return false;
        }

        $exif = array();

        try {
            $exif = @exif_read_data($srcPath);
        } catch (Exception $e) {
            return false;
        }

        // See if orientation data is there
        if (!isset($exif['Orientation'])) {
            return false;
        }
        return $exif['Orientation'];
    }

    /**
     * Method to add watermark on existing image.
     *
     * @param	string	$backgroundImagePath	The path to the image that needs to be added with watermark.
     * @param	string	$destinationPath		The path to the image output
     * @param	string	$destinationType		The type of the output file
     * @param	string	$watermarkImagePath		The path to the watermark image.
     * @param	int		$positionX				The x position of where the watermark should be positioned.
     * @param	int		$positionY				The y position of where the watermark should be positioned.
     *
     * @return	bool	True on sucess.
     * */
    static public function addWatermark($backgroundImagePath, $destinationPath, $destinationType, $watermarkImagePath, $positionX = 0, $positionY = 0, $deleteBackgroundImage = true) {
        // Set output quality
        $config = CFactory::getConfig();
        $imgQuality = $config->get('output_image_quality');
        $pngQuality = ($imgQuality - 100) / 11.111111;
        $pngQuality = round(abs($pngQuality));

        $watermarkInfo = getimagesize($watermarkImagePath);
        $background = CImageHelper::open($backgroundImagePath, $destinationType);
        $watermark = CImageHelper::open($watermarkImagePath, $watermarkInfo['mime']);
        list( $backgroundWidth, $backgroundHeight ) = getimagesize($backgroundImagePath);

        // Get overlay image width and hight
        $watermarkWidth = imagesx($watermark);
        $watermarkHeight = imagesy($watermark);

        // Combine background image and watermark into a single output image
        imagecopy($background, $watermark, $positionX, $positionY, 0, 0, $watermarkWidth, $watermarkHeight);

        // Output
        ob_start();

        // Test if type is png
        if ($destinationType == 'image/png' || $destinationType == 'image/x-png') {
            imagepng($background, null, $pngQuality);
        } elseif ($destinationType == 'image/gif') {
            imagegif($background);
        } else {
            imagejpeg($background, null, $imgQuality);
        }

        $output = ob_get_contents();
        ob_end_clean();

        // Delete old image
        if (is_file($backgroundImagePath) && $deleteBackgroundImage) {
            File::delete($backgroundImagePath);
        }

        // Free any memory from the existing image resources
        imagedestroy($background);
        imagedestroy($watermark);

        return File::write($destinationPath, $output);
    }

    /**
     * Retrieve the proper x and y position depending on the user's choice of the watermark position.
     * */
    static public function getPositions($location, $imageWidth, $imageHeight, $watermarkWidth, $watermarkHeight) {
        $position = new stdClass();

        $position->x = null;
        $position->y = null;
        // @rule: Get the appropriate X/Y position for the avatar
        switch ($location) {
            case 'top':
                $position->x = ($imageWidth / 2) - ( $watermarkWidth / 2 );
                $position->y = 0;
                break;
            case 'bottom':
                $position->x = ($imageWidth / 2) - ( $watermarkWidth / 2 );
                $position->y = $imageHeight - $watermarkHeight;
                break;
            case 'left':
                $position->x = 0;
                $position->y = ( $imageHeight / 2 ) - ($watermarkHeight / 2);
                break;
            case 'right':
                $position->x = $imageWidth - $watermarkWidth;
                $position->y = ( $imageHeight / 2 ) - ($watermarkHeight / 2);
                break;
        }
        return $position;
    }

    /**
     * Retrieves the appropriate image file name which is already hashed.
     *
     * @param	string	$data	A unique data to be hashed
     *
     * */
    static public function getHashName($data) {
        $name = JApplicationHelper::getHash($data);
        $name = CStringHelper::substr($name, 0, 24);

        return $name;
    }

    static public function checkImageSize($fileSize){

        $config = CFactory::getConfig();

        $uploadlimit = (double) $config->get('maxuploadsize');
        $uploadlimit = ($uploadlimit * 1024 * 1024);

        $phpLimit = self::parse_size(ini_get('upload_max_filesize'));

        if($fileSize < $uploadlimit && $fileSize < $phpLimit && $uploadlimit != 0){
            return true;
        }

        return false;

    }

    static function parse_size($size) {
        $unit = preg_replace('/[^bkmgtpezy]/i', '', $size); // Remove the non-unit characters from the size.
        $size = preg_replace('/[^0-9\.]/', '', $size); // Remove the non-numeric characters from the size.
        if ($unit) {
            // Find the position of the unit in the ordered string which is the power of magnitude to multiply a kilobyte by.
            return round($size * pow(1024, stripos('bkmgtpezy', $unit[0])));
        }
        else {
            return round($size);
        }
    }

}

/**
 * Deprecated since 1.8
 * Use CImageHelper::resize instead.
 */
function cImageResize($srcPath, $destPath, $destType, $destWidth, $destHeight, $sourceX = 0, $sourceY = 0, $currentWidth = 0, $currentHeight = 0) {
    return CImageHelper::resize($srcPath, $destPath, $destType, $destWidth, $destHeight, $sourceX, $sourceY, $currentWidth, $currentHeight);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::resizeProportional instead.
 */
function cImageResizePropotional($srcPath, $destPath, $destType, $destWidth = 0, $destHeight = 0) {
    return CImageHelper::resizeProportional($srcPath, $destPath, $destType, $destWidth, $destHeight);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::createThumb instead.
 */
function cImageCreateThumb($srcPath, $destPath, $destType, $destWidth = 64, $destHeight = 64) {
    return CImageHelper::createThumb($srcPath, $destPath, $destType, $destWidth, $destHeight);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::getExtension instead.
 */
function cImageTypeToExt($type) {
    return CImageHelper::getExtension($type);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::isValidType instead.
 */
function cValidImageType($type) {
    return CImageHelper::isValidType($type);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::isValid instead.
 */
function cValidImage($file) {
    return CImageHelper::isValid($file);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::open instead.
 */
function cImageOpen($file, $type) {
    return CImageHelper::open($file, $type);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::getSize instead.
 */
function cImageGetSize($source) {
    return CImageHelper::getSize($source);
}

/**
 * Deprecated since 1.8
 * Use CImageHelper::addWatermark instead.
 */
function cImageAddWatermark($backgroundImagePath, $destinationPath, $destinationType, $watermarkImagePath, $positionX = 0, $positionY = 0) {
    return CImageHelper::addWatermark($backgroundImagePath, $destinationPath, $destinationType, $watermarkImagePath, $positionX, $positionY);
}