XoopsModules25x / apcal

thumbs/phpthumb.functions.php

<?php
//////////////////////////////////////////////////////////////
//   phpThumb() by James Heinrich <info@silisoftware.com>   //
//        available at http://phpthumb.sourceforge.net      //
//         and/or https://github.com/JamesHeinrich/phpThumb //
//////////////////////////////////////////////////////////////
///                                                         //
// phpthumb.functions.php - general support functions       //
//                                                         ///
//////////////////////////////////////////////////////////////

/**
 * Class phpthumb_functions
 */
class phpthumb_functions
{

    /**
     * @param $functionname
     * @return bool
     */
    public static function user_function_exists($functionname)
    {
        if (function_exists('get_defined_functions')) {
            static $get_defined_functions = array();
            if (empty($get_defined_functions)) {
                $get_defined_functions = get_defined_functions();
            }

            return in_array(strtolower($functionname), $get_defined_functions['user']);
        }

        return function_exists($functionname);
    }

    /**
     * @param $functionname
     * @return bool
     */
    public static function builtin_function_exists($functionname)
    {
        if (function_exists('get_defined_functions')) {
            static $get_defined_functions = array();
            if (empty($get_defined_functions)) {
                $get_defined_functions = get_defined_functions();
            }

            return in_array(strtolower($functionname), $get_defined_functions['internal']);
        }

        return function_exists($functionname);
    }

    /**
     * @param         $version1
     * @param         $version2
     * @param  string $operator
     * @return int
     */
    public static function version_compare_replacement_sub($version1, $version2, $operator = '')
    {
        // If you specify the third optional operator argument, you can test for a particular relationship.
        // The possible operators are: <, lt, <=, le, >, gt, >=, ge, ==, =, eq, !=, <>, ne respectively.
        // Using this argument, the function will return 1 if the relationship is the one specified by the operator, 0 otherwise.

        // If a part contains special version strings these are handled in the following order:
        // (any string not found in this list) < (dev) < (alpha = a) < (beta = b) < (RC = rc) < (#) < (pl = p)
        static $versiontype_lookup = array();
        if (empty($versiontype_lookup)) {
            $versiontype_lookup['dev']   = 10001;
            $versiontype_lookup['a']     = 10002;
            $versiontype_lookup['alpha'] = 10002;
            $versiontype_lookup['b']     = 10003;
            $versiontype_lookup['beta']  = 10003;
            $versiontype_lookup['RC']    = 10004;
            $versiontype_lookup['rc']    = 10004;
            $versiontype_lookup['#']     = 10005;
            $versiontype_lookup['pl']    = 10006;
            $versiontype_lookup['p']     = 10006;
        }
        $version1 = (isset($versiontype_lookup[$version1]) ? $versiontype_lookup[$version1] : $version1);
        $version2 = (isset($versiontype_lookup[$version2]) ? $versiontype_lookup[$version2] : $version2);

        switch ($operator) {
            case '<':
            case 'lt':
                return (int)($version1 < $version2);
                break;
            case '<=':
            case 'le':
                return (int)($version1 <= $version2);
                break;
            case '>':
            case 'gt':
                return (int)($version1 > $version2);
                break;
            case '>=':
            case 'ge':
                return (int)($version1 >= $version2);
                break;
            case '==':
            case '=':
            case 'eq':
                return (int)($version1 == $version2);
                break;
            case '!=':
            case '<>':
            case 'ne':
                return (int)($version1 != $version2);
                break;
        }
        if ($version1 == $version2) {
            return 0;
        } elseif ($version1 < $version2) {
            return -1;
        }

        return 1;
    }

    /**
     * @param            $version1
     * @param            $version2
     * @param  string    $operator
     * @return int|mixed
     */
    public static function version_compare_replacement($version1, $version2, $operator = '')
    {
        if (function_exists('version_compare')) {
            // built into PHP v4.1.0+
            return version_compare($version1, $version2, $operator);
        }

        // The function first replaces _, - and + with a dot . in the version strings
        $version1 = strtr($version1, '_-+', '...');
        $version2 = strtr($version2, '_-+', '...');

        // and also inserts dots . before and after any non number so that for example '4.3.2RC1' becomes '4.3.2.RC.1'.
        // Then it splits the results like if you were using explode('.',$ver). Then it compares the parts starting from left to right.
        $version1 = preg_replace('#([0-9]+)([A-Z]+)([0-9]+)#i', '$1.$2.$3', $version1);
        $version2 = preg_replace('#([0-9]+)([A-Z]+)([0-9]+)#i', '$1.$2.$3', $version2);

        $parts1      = explode('.', $version1);
        $parts2      = explode('.', $version1);
        $parts_count = max(count($parts1), count($parts2));
        for ($i = 0; $i < $parts_count; $i++) {
            $comparison = phpthumb_functions::version_compare_replacement_sub($version1, $version2, $operator);
            if ($comparison != 0) {
                return $comparison;
            }
        }

        return 0;
    }

    /**
     * @param $arg
     * @return string
     */
    public static function escapeshellarg_replacement($arg)
    {
        if (function_exists('escapeshellarg') && !phpthumb_functions::FunctionIsDisabled('escapeshellarg')) {
            return escapeshellarg($arg);
        }

        return '\'' . str_replace('\'', '\\\'', $arg) . '\'';
    }

    /**
     * @return array
     */
    public static function phpinfo_array()
    {
        static $phpinfo_array = array();
        if (empty($phpinfo_array)) {
            ob_start();
            phpinfo();
            $phpinfo = ob_get_contents();
            ob_end_clean();
            $phpinfo_array = explode("\n", $phpinfo);
        }

        return $phpinfo_array;
    }

    /**
     * @return array
     */
    public static function exif_info()
    {
        static $exif_info = array();
        if (empty($exif_info)) {
            // based on code by johnschaefer at gmx dot de
            // from PHP help on gd_info()
            $exif_info     = array(
                'EXIF Support'           => '',
                'EXIF Version'           => '',
                'Supported EXIF Version' => '',
                'Supported filetypes'    => ''
            );
            $phpinfo_array = phpthumb_functions::phpinfo_array();
            foreach ($phpinfo_array as $line) {
                $line = trim(strip_tags($line));
                foreach ($exif_info as $key => $value) {
                    if (strpos($line, $key) === 0) {
                        $newvalue        = trim(str_replace($key, '', $line));
                        $exif_info[$key] = $newvalue;
                    }
                }
            }
        }

        return $exif_info;
    }

    /**
     * @param $imagetype
     * @return bool|mixed|string
     */
    public static function ImageTypeToMIMEtype($imagetype)
    {
        if (function_exists('image_type_to_mime_type') && ($imagetype >= 1) && ($imagetype <= 16)) {
            // PHP v4.3.0+
            return image_type_to_mime_type($imagetype);
        }
        static $image_type_to_mime_type = array(
            1  => 'image/gif',                     // IMAGETYPE_GIF
            2  => 'image/jpeg',                    // IMAGETYPE_JPEG
            3  => 'image/png',                     // IMAGETYPE_PNG
            4  => 'application/x-shockwave-flash', // IMAGETYPE_SWF
            5  => 'image/psd',                     // IMAGETYPE_PSD
            6  => 'image/bmp',                     // IMAGETYPE_BMP
            7  => 'image/tiff',                    // IMAGETYPE_TIFF_II (intel byte order)
            8  => 'image/tiff',                    // IMAGETYPE_TIFF_MM (motorola byte order)
            9  => 'application/octet-stream',      // IMAGETYPE_JPC
            10 => 'image/jp2',                     // IMAGETYPE_JP2
            11 => 'application/octet-stream',      // IMAGETYPE_JPX
            12 => 'application/octet-stream',      // IMAGETYPE_JB2
            13 => 'application/x-shockwave-flash', // IMAGETYPE_SWC
            14 => 'image/iff',                     // IMAGETYPE_IFF
            15 => 'image/vnd.wap.wbmp',            // IMAGETYPE_WBMP
            16 => 'image/xbm',                     // IMAGETYPE_XBM

            'gif'  => 'image/gif',                 // IMAGETYPE_GIF
            'jpg'  => 'image/jpeg',                // IMAGETYPE_JPEG
            'jpeg' => 'image/jpeg',                // IMAGETYPE_JPEG
            'png'  => 'image/png',                 // IMAGETYPE_PNG
            'bmp'  => 'image/bmp',                 // IMAGETYPE_BMP
            'ico'  => 'image/x-icon'
        );

        return (isset($image_type_to_mime_type[$imagetype]) ? $image_type_to_mime_type[$imagetype] : false);
    }

    /**
     * @param $width
     * @param $height
     * @param $angle
     * @return array
     */
    public static function TranslateWHbyAngle($width, $height, $angle)
    {
        if (($angle % 180) == 0) {
            return array($width, $height);
        }
        $newwidth  = (abs(sin(deg2rad($angle))) * $height) + (abs(cos(deg2rad($angle))) * $width);
        $newheight = (abs(sin(deg2rad($angle))) * $width) + (abs(cos(deg2rad($angle))) * $height);

        return array($newwidth, $newheight);
    }

    /**
     * @param $string
     * @return string
     */
    public static function HexCharDisplay($string)
    {
        $len    = strlen($string);
        $output = '';
        for ($i = 0; $i < $len; $i++) {
            $output .= ' 0x' . str_pad(dechex(ord($string{$i})), 2, '0', STR_PAD_LEFT);
        }

        return $output;
    }

    /**
     * @param $HexColorString
     * @return int
     */
    public static function IsHexColor($HexColorString)
    {
        return preg_match('#^[0-9A-F]{6}$#i', $HexColorString);
    }

    /**
     * @param       $gdimg_hexcolorallocate
     * @param       $R
     * @param       $G
     * @param       $B
     * @param  bool $alpha
     * @return int
     */
    public static function ImageColorAllocateAlphaSafe(&$gdimg_hexcolorallocate, $R, $G, $B, $alpha = false)
    {
        if (phpthumb_functions::version_compare_replacement(PHP_VERSION, '4.3.2', '>=') && ($alpha !== false)) {
            return imagecolorallocatealpha($gdimg_hexcolorallocate, $R, $G, $B, (int)$alpha);
        } else {
            return imagecolorallocate($gdimg_hexcolorallocate, $R, $G, $B);
        }
    }

    /**
     * @param       $gdimg_hexcolorallocate
     * @param       $HexColorString
     * @param  bool $dieOnInvalid
     * @param  bool $alpha
     * @return int
     */
    public static function ImageHexColorAllocate(
        &$gdimg_hexcolorallocate,
        $HexColorString,
        $dieOnInvalid = false,
        $alpha = false
    ) {
        if (!is_resource($gdimg_hexcolorallocate)) {
            die('$gdimg_hexcolorallocate is not a GD resource in ImageHexColorAllocate()');
        }
        if (phpthumb_functions::IsHexColor($HexColorString)) {
            $R = hexdec(substr($HexColorString, 0, 2));
            $G = hexdec(substr($HexColorString, 2, 2));
            $B = hexdec(substr($HexColorString, 4, 2));

            return phpthumb_functions::ImageColorAllocateAlphaSafe($gdimg_hexcolorallocate, $R, $G, $B, $alpha);
        }
        if ($dieOnInvalid) {
            die('Invalid hex color string: "' . $HexColorString . '"');
        }

        return imagecolorallocate($gdimg_hexcolorallocate, 0x00, 0x00, 0x00);
    }

    /**
     * @param $hexcolor
     * @return string
     */
    public static function HexColorXOR($hexcolor)
    {
        return strtoupper(str_pad(dechex(~hexdec($hexcolor) & 0xFFFFFF), 6, '0', STR_PAD_LEFT));
    }

    /**
     * @param $img
     * @param $x
     * @param $y
     * @return array|bool
     */
    public static function GetPixelColor(&$img, $x, $y)
    {
        if (!is_resource($img)) {
            return false;
        }

        return @imagecolorsforindex($img, @imagecolorat($img, $x, $y));
    }

    /**
     * @param $currentPixel
     * @param $targetPixel
     * @return int|mixed
     */
    public static function PixelColorDifferencePercent($currentPixel, $targetPixel)
    {
        $diff = 0;
        foreach ($targetPixel as $channel => $currentvalue) {
            $diff = max($diff, (max($currentPixel[$channel], $targetPixel[$channel]) - min($currentPixel[$channel], $targetPixel[$channel])) / 255);
        }

        return $diff * 100;
    }

    /**
     * @param $r
     * @param $g
     * @param $b
     * @return float
     */
    public static function GrayscaleValue($r, $g, $b)
    {
        return round(($r * 0.30) + ($g * 0.59) + ($b * 0.11));
    }

    /**
     * @param $OriginalPixel
     * @return array
     */
    public static function GrayscalePixel($OriginalPixel)
    {
        $gray = phpthumb_functions::GrayscaleValue($OriginalPixel['red'], $OriginalPixel['green'], $OriginalPixel['blue']);

        return array('red' => $gray, 'green' => $gray, 'blue' => $gray);
    }

    /**
     * @param $rgb
     * @return int
     */
    public static function GrayscalePixelRGB($rgb)
    {
        $r = ($rgb >> 16) & 0xFF;
        $g = ($rgb >> 8) & 0xFF;
        $b = $rgb & 0xFF;

        return ($r * 0.299) + ($g * 0.587) + ($b * 0.114);
    }

    /**
     * @param        $width
     * @param        $height
     * @param  null  $maxwidth
     * @param  null  $maxheight
     * @param  bool  $allow_enlarge
     * @param  bool  $allow_reduce
     * @return mixed
     */
    public static function ScaleToFitInBox(
        $width,
        $height,
        $maxwidth = null,
        $maxheight = null,
        $allow_enlarge = true,
        $allow_reduce = true
    ) {
        $maxwidth  = (is_null($maxwidth) ? $width : $maxwidth);
        $maxheight = (is_null($maxheight) ? $height : $maxheight);
        $scale_x   = 1;
        $scale_y   = 1;
        if (($width > $maxwidth) || ($width < $maxwidth)) {
            $scale_x = ($maxwidth / $width);
        }
        if (($height > $maxheight) || ($height < $maxheight)) {
            $scale_y = ($maxheight / $height);
        }
        $scale = min($scale_x, $scale_y);
        if (!$allow_enlarge) {
            $scale = min($scale, 1);
        }
        if (!$allow_reduce) {
            $scale = max($scale, 1);
        }

        return $scale;
    }

    /**
     * @param $dst_img
     * @param $src_img
     * @param $dst_x
     * @param $dst_y
     * @param $src_x
     * @param $src_y
     * @param $dst_w
     * @param $dst_h
     * @param $src_w
     * @param $src_h
     * @return bool
     */
    public static function ImageCopyResampleBicubic(
        $dst_img,
        $src_img,
        $dst_x,
        $dst_y,
        $src_x,
        $src_y,
        $dst_w,
        $dst_h,
        $src_w,
        $src_h
    ) {
        // ron at korving dot demon dot nl
        // http://www.php.net/imagecopyresampled

        $scaleX = ($src_w - 1) / $dst_w;
        $scaleY = ($src_h - 1) / $dst_h;

        $scaleX2 = $scaleX / 2.0;
        $scaleY2 = $scaleY / 2.0;

        $isTrueColor = imageistruecolor($src_img);

        for ($y = $src_y; $y < $src_y + $dst_h; $y++) {
            $sY   = $y * $scaleY;
            $siY  = (int)$sY;
            $siY2 = (int)$sY + $scaleY2;

            for ($x = $src_x; $x < $src_x + $dst_w; $x++) {
                $sX   = $x * $scaleX;
                $siX  = (int)$sX;
                $siX2 = (int)$sX + $scaleX2;

                if ($isTrueColor) {
                    $c1 = imagecolorat($src_img, $siX, $siY2);
                    $c2 = imagecolorat($src_img, $siX, $siY);
                    $c3 = imagecolorat($src_img, $siX2, $siY2);
                    $c4 = imagecolorat($src_img, $siX2, $siY);

                    $r = (($c1 + $c2 + $c3 + $c4) >> 2) & 0xFF0000;
                    $g = ((($c1 & 0x00FF00) + ($c2 & 0x00FF00) + ($c3 & 0x00FF00) + ($c4 & 0x00FF00)) >> 2) & 0x00FF00;
                    $b = ((($c1 & 0x0000FF) + ($c2 & 0x0000FF) + ($c3 & 0x0000FF) + ($c4 & 0x0000FF)) >> 2);
                } else {
                    $c1 = imagecolorsforindex($src_img, imagecolorat($src_img, $siX, $siY2));
                    $c2 = imagecolorsforindex($src_img, imagecolorat($src_img, $siX, $siY));
                    $c3 = imagecolorsforindex($src_img, imagecolorat($src_img, $siX2, $siY2));
                    $c4 = imagecolorsforindex($src_img, imagecolorat($src_img, $siX2, $siY));

                    $r = ($c1['red'] + $c2['red'] + $c3['red'] + $c4['red']) << 14;
                    $g = ($c1['green'] + $c2['green'] + $c3['green'] + $c4['green']) << 6;
                    $b = ($c1['blue'] + $c2['blue'] + $c3['blue'] + $c4['blue']) >> 2;
                }
                imagesetpixel($dst_img, $dst_x + $x - $src_x, $dst_y + $y - $src_y, $r + $g + $b);
            }
        }

        return true;
    }

    /**
     * @param $x_size
     * @param $y_size
     * @return bool
     */
    public static function ImageCreateFunction($x_size, $y_size)
    {
        $ImageCreateFunction = 'ImageCreate';
        if (phpthumb_functions::gd_version() >= 2.0) {
            $ImageCreateFunction = 'ImageCreateTrueColor';
        }
        if (!function_exists($ImageCreateFunction)) {
            return phpthumb::ErrorImage($ImageCreateFunction . '() does not exist - no GD support?');
        }
        if (($x_size <= 0) || ($y_size <= 0)) {
            return phpthumb::ErrorImage('Invalid image dimensions: ' . $ImageCreateFunction . '(' . $x_size . ', ' . $y_size . ')');
        }

        return $ImageCreateFunction(round($x_size), round($y_size));
    }

    /**
     * @param       $dst_im
     * @param       $src_im
     * @param       $dst_x
     * @param       $dst_y
     * @param       $src_x
     * @param       $src_y
     * @param       $src_w
     * @param       $src_h
     * @param  int  $opacity_pct
     * @return bool
     */
    public static function ImageCopyRespectAlpha(
        &$dst_im,
        &$src_im,
        $dst_x,
        $dst_y,
        $src_x,
        $src_y,
        $src_w,
        $src_h,
        $opacity_pct = 100
    ) {
        $opacipct = $opacity_pct / 100;
        for ($x = $src_x; $x < $src_w; $x++) {
            for ($y = $src_y; $y < $src_h; $y++) {
                $RealPixel    = phpthumb_functions::GetPixelColor($dst_im, $dst_x + $x, $dst_y + $y);
                $OverlayPixel = phpthumb_functions::GetPixelColor($src_im, $x, $y);
                $alphapct     = $OverlayPixel['alpha'] / 127;
                $overlaypct   = (1 - $alphapct) * $opacipct;

                $newcolor = phpthumb_functions::ImageColorAllocateAlphaSafe($dst_im, round($RealPixel['red'] * (1 - $overlaypct)) + ($OverlayPixel['red'] * $overlaypct),
                                                                            round($RealPixel['green'] * (1 - $overlaypct)) + ($OverlayPixel['green'] * $overlaypct),
                                                                            round($RealPixel['blue'] * (1 - $overlaypct)) + ($OverlayPixel['blue'] * $overlaypct), //$RealPixel['alpha']);
                                                                            0);

                imagesetpixel($dst_im, $dst_x + $x, $dst_y + $y, $newcolor);
            }
        }

        return true;
    }

    /**
     * @param             $old_width
     * @param             $old_height
     * @param  bool       $new_width
     * @param  bool       $new_height
     * @return array|bool
     */
    public static function ProportionalResize($old_width, $old_height, $new_width = false, $new_height = false)
    {
        $old_aspect_ratio = $old_width / $old_height;
        if (($new_width === false) && ($new_height === false)) {
            return false;
        } elseif ($new_width === false) {
            $new_width = $new_height * $old_aspect_ratio;
        } elseif ($new_height === false) {
            $new_height = $new_width / $old_aspect_ratio;
        }
        $new_aspect_ratio = $new_width / $new_height;
        if ($new_aspect_ratio == $old_aspect_ratio) {
            // great, done
        } elseif ($new_aspect_ratio < $old_aspect_ratio) {
            // limited by width
            $new_height = $new_width / $old_aspect_ratio;
        } elseif ($new_aspect_ratio > $old_aspect_ratio) {
            // limited by height
            $new_width = $new_height * $old_aspect_ratio;
        }

        return array((int)round($new_width), (int)round($new_height));
    }

    /**
     * @param $function
     * @return bool
     */
    public static function FunctionIsDisabled($function)
    {
        static $DisabledFunctions = null;
        if (is_null($DisabledFunctions)) {
            $disable_functions_local  = explode(',', strtolower(@ini_get('disable_functions')));
            $disable_functions_global = explode(',', strtolower(@get_cfg_var('disable_functions')));
            foreach ($disable_functions_local as $key => $value) {
                $DisabledFunctions[trim($value)] = 'local';
            }
            foreach ($disable_functions_global as $key => $value) {
                $DisabledFunctions[trim($value)] = 'global';
            }
            if (@ini_get('safe_mode')) {
                $DisabledFunctions['shell_exec']     = 'local';
                $DisabledFunctions['set_time_limit'] = 'local';
            }
        }

        return isset($DisabledFunctions[strtolower($function)]);
    }

    /**
     * @param $command
     * @return bool|string
     */
    public static function SafeExec($command)
    {
        static $AllowedExecFunctions = array();
        if (empty($AllowedExecFunctions)) {
            $AllowedExecFunctions = array('shell_exec' => true, 'passthru' => true, 'system' => true, 'exec' => true);
            foreach ($AllowedExecFunctions as $key => $value) {
                $AllowedExecFunctions[$key] = !phpthumb_functions::FunctionIsDisabled($key);
            }
        }
        $command .= ' 2>&1'; // force redirect stderr to stdout
        foreach ($AllowedExecFunctions as $execfunction => $is_allowed) {
            if (!$is_allowed) {
                continue;
            }
            $returnvalue = false;
            switch ($execfunction) {
                case 'passthru':
                case 'system':
                    ob_start();
                    $execfunction($command);
                    $returnvalue = ob_get_contents();
                    ob_end_clean();
                    break;

                case 'exec':
                    $output      = array();
                    $lastline    = $execfunction($command, $output);
                    $returnvalue = implode("\n", $output);
                    break;

                case 'shell_exec':
                    ob_start();
                    $returnvalue = $execfunction($command);
                    ob_end_clean();
                    break;
            }

            return $returnvalue;
        }

        return false;
    }

    /**
     * @param $filename
     * @return array|bool
     */
    public static function ApacheLookupURIarray($filename)
    {
        // apache_lookup_uri() only works when PHP is installed as an Apache module.
        if (php_sapi_name() == 'apache') {
            //$property_exists_exists = function_exists('property_exists');
            $keys = array(
                'status',
                'the_request',
                'status_line',
                'method',
                'content_type',
                'handler',
                'uri',
                'filename',
                'path_info',
                'args',
                'boundary',
                'no_cache',
                'no_local_copy',
                'allowed',
                'send_bodyct',
                'bytes_sent',
                'byterange',
                'clength',
                'unparsed_uri',
                'mtime',
                'request_time'
            );
            if ($apacheLookupURIobject = @apache_lookup_uri($filename)) {
                $apacheLookupURIarray = array();
                foreach ($keys as $key) {
                    $apacheLookupURIarray[$key] = @$apacheLookupURIobject->$key;
                }

                return $apacheLookupURIarray;
            }
        }

        return false;
    }

    /**
     * @return bool|null
     */
    public static function gd_is_bundled()
    {
        static $isbundled = null;
        if (is_null($isbundled)) {
            $gd_info   = gd_info();
            $isbundled = (strpos($gd_info['GD Version'], 'bundled') !== false);
        }

        return $isbundled;
    }

    /**
     * @param  bool $fullstring
     * @return mixed
     */
    public static function gd_version($fullstring = false)
    {
        static $cache_gd_version = array();
        if (empty($cache_gd_version)) {
            $gd_info = gd_info();
            if (preg_match('#bundled \((.+)\)$#i', $gd_info['GD Version'], $matches)) {
                $cache_gd_version[1] = $gd_info['GD Version'];  // e.g. "bundled (2.0.15 compatible)"
                $cache_gd_version[0] = (float)$matches[1];     // e.g. "2.0" (not "bundled (2.0.15 compatible)")
            } else {
                $cache_gd_version[1] = $gd_info['GD Version'];                       // e.g. "1.6.2 or higher"
                $cache_gd_version[0] = (float)substr($gd_info['GD Version'], 0, 3); // e.g. "1.6" (not "1.6.2 or higher")
            }
        }

        return $cache_gd_version[(int)$fullstring];
    }

    /**
     * @param           $remotefile
     * @param  int      $timeout
     * @return bool|int
     */
    public static function filesize_remote($remotefile, $timeout = 10)
    {
        $size = false;
        $url  = phpthumb_functions::ParseURLbetter($remotefile);
        if ($fp = @fsockopen($url['host'], ($url['port'] ?: 80), $errno, $errstr, $timeout)) {
            fwrite($fp, 'HEAD ' . @$url['path'] . @$url['query'] . ' HTTP/1.0' . "\r\n" . 'Host: ' . @$url['host'] . "\r\n\r\n");
            if (phpthumb_functions::version_compare_replacement(PHP_VERSION, '4.3.0', '>=')) {
                stream_set_timeout($fp, $timeout);
            }
            while (!feof($fp)) {
                $headerline = fgets($fp, 4096);
                if (preg_match('#^Content-Length: (.*)#i', $headerline, $matches)) {
                    $size = (int)$matches[1];
                    break;
                }
            }
            fclose($fp);
        }

        return $size;
    }

    /**
     * @param           $remotefile
     * @param  int      $timeout
     * @return bool|int
     */
    public static function filedate_remote($remotefile, $timeout = 10)
    {
        $date = false;
        $url  = phpthumb_functions::ParseURLbetter($remotefile);
        if ($fp = @fsockopen($url['host'], ($url['port'] ?: 80), $errno, $errstr, $timeout)) {
            fwrite($fp, 'HEAD ' . @$url['path'] . @$url['query'] . ' HTTP/1.0' . "\r\n" . 'Host: ' . @$url['host'] . "\r\n\r\n");
            if (phpthumb_functions::version_compare_replacement(PHP_VERSION, '4.3.0', '>=')) {
                stream_set_timeout($fp, $timeout);
            }
            while (!feof($fp)) {
                $headerline = fgets($fp, 4096);
                if (preg_match('#^Last-Modified: (.*)#i', $headerline, $matches)) {
                    $date = strtotime($matches[1]) - date('Z');
                    break;
                }
            }
            fclose($fp);
        }

        return $date;
    }

    /**
     * @param $filename
     * @return bool|string
     */
    public static function md5_file_safe($filename)
    {
        // md5_file() doesn't exist in PHP < 4.2.0
        if (function_exists('md5_file')) {
            return md5_file($filename);
        }
        if ($fp = @fopen($filename, 'rb')) {
            $rawData = '';
            do {
                $buffer  = fread($fp, 8192);
                $rawData .= $buffer;
            } while (strlen($buffer) > 0);
            fclose($fp);

            return md5($rawData);
        }

        return false;
    }

    /**
     * @return mixed
     */
    public static function nonempty_min()
    {
        $arg_list   = func_get_args();
        $acceptable = array();
        foreach ($arg_list as $arg) {
            if ($arg) {
                $acceptable[] = $arg;
            }
        }

        return min($acceptable);
    }

    /**
     * @param         $number
     * @param  int    $minbytes
     * @return string
     */
    public static function LittleEndian2String($number, $minbytes = 1)
    {
        $intstring = '';
        while ($number > 0) {
            $intstring .= chr($number & 255);
            $number    >>= 8;
        }

        return str_pad($intstring, $minbytes, "\x00", STR_PAD_RIGHT);
    }

    /**
     * @return bool
     */
    public static function OneOfThese()
    {
        // return the first useful (non-empty/non-zero/non-false) value from those passed
        $arg_list = func_get_args();
        foreach ($arg_list as $key => $value) {
            if ($value) {
                return $value;
            }
        }

        return false;
    }

    /**
     * @param $needle
     * @param $haystack
     * @return bool
     */
    public static function CaseInsensitiveInArray($needle, $haystack)
    {
        $needle = strtolower($needle);
        foreach ($haystack as $key => $value) {
            if (is_array($value)) {
                // skip?
            } elseif ($needle == strtolower($value)) {
                return true;
            }
        }

        return false;
    }

    /**
     * @param                   $host
     * @param                   $file
     * @param                   $errstr
     * @param  bool             $successonly
     * @param  int              $port
     * @param  int              $timeout
     * @return bool|null|string
     */
    public static function URLreadFsock($host, $file, &$errstr, $successonly = true, $port = 80, $timeout = 10)
    {
        if (!function_exists('fsockopen') || phpthumb_functions::FunctionIsDisabled('fsockopen')) {
            $errstr = 'fsockopen() unavailable';

            return false;
        }
        //if ($fp = @fsockopen($host, $port, $errno, $errstr, $timeout)) {
        if ($fp = @fsockopen((($port == 443) ? 'ssl://' : '') . $host, $port, $errno, $errstr, $timeout)) { // https://github.com/JamesHeinrich/phpThumb/issues/39
            $out = 'GET ' . $file . ' HTTP/1.0' . "\r\n";
            $out .= 'Host: ' . $host . "\r\n";
            $out .= 'Connection: Close' . "\r\n\r\n";
            fwrite($fp, $out);

            $isHeader           = true;
            $Data_header        = '';
            $Data_body          = '';
            $header_newlocation = '';
            while (!feof($fp)) {
                $line = fgets($fp, 1024);
                if ($isHeader) {
                    $Data_header .= $line;
                } else {
                    $Data_body .= $line;
                }
                if (preg_match('#^HTTP/[\\.0-9]+ ([0-9]+) (.+)$#i', rtrim($line), $matches)) {
                    list($dummy, $errno, $errstr) = $matches;
                    $errno = (int)$errno;
                } elseif (preg_match('#^Location: (.*)$#i', rtrim($line), $matches)) {
                    $header_newlocation = $matches[1];
                }
                if ($isHeader && ($line == "\r\n")) {
                    $isHeader = false;
                    if ($successonly) {
                        switch ($errno) {
                            case 200:
                                // great, continue
                                break;

                            default:
                                $errstr = $errno . ' ' . $errstr . ($header_newlocation ? '; Location: ' . $header_newlocation : '');
                                fclose($fp);

                                return false;
                                break;
                        }
                    }
                }
            }
            fclose($fp);

            return $Data_body;
        }

        return null;
    }

    /**
     * @param         $url
     * @param  string $queryseperator
     * @return string
     */
    public static function CleanUpURLencoding($url, $queryseperator = '&')
    {
        if (!preg_match('#^http#i', $url)) {
            return $url;
        }
        $parse_url         = phpthumb_functions::ParseURLbetter($url);
        $pathelements      = explode('/', $parse_url['path']);
        $CleanPathElements = array();
        $TranslationMatrix = array(' ' => '%20');
        foreach ($pathelements as $key => $pathelement) {
            $CleanPathElements[] = strtr($pathelement, $TranslationMatrix);
        }
        foreach ($CleanPathElements as $key => $value) {
            if ($value === '') {
                unset($CleanPathElements[$key]);
            }
        }

        $queries      = explode($queryseperator, (isset($parse_url['query']) ? $parse_url['query'] : ''));
        $CleanQueries = array();
        foreach ($queries as $key => $query) {
            @list($param, $value) = explode('=', $query);
            $CleanQueries[] = strtr($param, $TranslationMatrix) . ($value ? '=' . strtr($value, $TranslationMatrix) : '');
        }
        foreach ($CleanQueries as $key => $value) {
            if ($value === '') {
                unset($CleanQueries[$key]);
            }
        }

        $cleaned_url = $parse_url['scheme'] . '://';
        $cleaned_url .= (@$parse_url['username'] ? $parse_url['host'] . (@$parse_url['password'] ? ':' . $parse_url['password'] : '') . '@' : '');
        $cleaned_url .= $parse_url['host'];
        $cleaned_url .= ((!empty($parse_url['port']) && ($parse_url['port'] != 80)) ? ':' . $parse_url['port'] : '');
        $cleaned_url .= '/' . implode('/', $CleanPathElements);
        $cleaned_url .= (@$CleanQueries ? '?' . implode($queryseperator, $CleanQueries) : '');

        return $cleaned_url;
    }

    /**
     * @param $url
     * @return mixed
     */
    public static function ParseURLbetter($url)
    {
        $parsedURL = @parse_url($url);
        if (!@$parsedURL['port']) {
            switch (strtolower(@$parsedURL['scheme'])) {
                case 'ftp':
                    $parsedURL['port'] = 21;
                    break;
                case 'https':
                    $parsedURL['port'] = 443;
                    break;
                case 'http':
                    $parsedURL['port'] = 80;
                    break;
            }
        }

        return $parsedURL;
    }

    /**
     * @param                         $url
     * @param                         $error
     * @param  int                    $timeout
     * @param  bool                   $followredirects
     * @return bool|mixed|null|string
     */
    public static function SafeURLread($url, &$error, $timeout = 10, $followredirects = true)
    {
        $error = '';

        $parsed_url                      = phpthumb_functions::ParseURLbetter($url);
        $alreadyLookedAtURLs[trim($url)] = true;

$alreadyLookedAtURLs was never initialized. Although not strictly required by PHP, it is generally a good practice to add $alreadyLookedAtURLs = array(); before regardless.

        while (true) {
            $tryagain = false;
            $rawData  = phpthumb_functions::URLreadFsock(@$parsed_url['host'], @$parsed_url['path'] . '?' . @$parsed_url['query'], $errstr, true, (@$parsed_url['port'] ?: 80), $timeout);
            if (preg_match('#302 [a-z ]+; Location\\: (http.*)#i', $errstr, $matches)) {
                $matches[1] = trim(@$matches[1]);
                if (!@$alreadyLookedAtURLs[$matches[1]]) {
                    // loop through and examine new URL
                    $error .= 'URL "' . $url . '" redirected to "' . $matches[1] . '"';

                    $tryagain                         = true;
                    $alreadyLookedAtURLs[$matches[1]] = true;
                    $parsed_url                       = phpthumb_functions::ParseURLbetter($matches[1]);
                }
            }
            if (!$tryagain) {
                break;
            }
        }

        if ($rawData === false) {
            $error .= 'Error opening "' . $url . '":' . "\n\n" . $errstr;

            return false;
        } elseif ($rawData === null) {
            // fall through
            $error .= 'Error opening "' . $url . '":' . "\n\n" . $errstr;
        } else {
            return $rawData;
        }

        if (function_exists('curl_version') && !phpthumb_functions::FunctionIsDisabled('curl_exec')) {
            $ch = curl_init();
            curl_setopt($ch, CURLOPT_URL, $url);
            curl_setopt($ch, CURLOPT_HEADER, false);
            curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
            curl_setopt($ch, CURLOPT_BINARYTRANSFER, true);
            curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 2);    // changed for XOOPS
            curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, true); // changed for XOOPS
            curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
            $rawData = curl_exec($ch);
            curl_close($ch);
            if (strlen($rawData) > 0) {
                $error .= 'CURL succeeded (' . strlen($rawData) . ' bytes); ';

                return $rawData;
            }
            $error .= 'CURL available but returned no data; ';
        } else {
            $error .= 'CURL unavailable; ';
        }

        $BrokenURLfopenPHPversions = array('4.4.2');
        if (in_array(PHP_VERSION, $BrokenURLfopenPHPversions)) {
            $error .= 'fopen(URL) broken in PHP v' . PHP_VERSION . '; ';
        } elseif (@ini_get('allow_url_fopen')) {
            $rawData     = '';
            $error_fopen = '';
            ob_start();
            if ($fp = fopen($url, 'rb')) {
                do {
                    $buffer  = fread($fp, 8192);
                    $rawData .= $buffer;
                } while (strlen($buffer) > 0);
                fclose($fp);
            } else {
                $error_fopen .= trim(strip_tags(ob_get_contents()));
            }
            ob_end_clean();
            $error .= $error_fopen;
            if (!$error_fopen) {
                $error .= '; "allow_url_fopen" succeeded (' . strlen($rawData) . ' bytes); ';

                return $rawData;
            }
            $error .= '; "allow_url_fopen" enabled but returned no data (' . $error_fopen . '); ';
        } else {
            $error .= '"allow_url_fopen" disabled; ';
        }

        return false;
    }

    /**
     * @param $dirname
     * @return bool
     */
    public static function EnsureDirectoryExists($dirname)
    {
        $directory_elements = explode(DIRECTORY_SEPARATOR, $dirname);
        $startoffset        = (!$directory_elements[0] ? 2 : 1);  // unix with leading "/" then start with 2nd element; Windows with leading "c:\" then start with 1st element
        $open_basedirs      = preg_split('#[;:]#', ini_get('open_basedir'));
        foreach ($open_basedirs as $key => $open_basedir) {
            if (preg_match('#^' . preg_quote($open_basedir) . '#', $dirname)
                && (strlen($dirname) > strlen($open_basedir))
            ) {
                $startoffset = count(explode(DIRECTORY_SEPARATOR, $open_basedir));
                break;
            }
        }
        $i         = $startoffset;
        $endoffset = count($directory_elements);
        for ($i = $startoffset; $i <= $endoffset; $i++) {
            $test_directory = implode(DIRECTORY_SEPARATOR, array_slice($directory_elements, 0, $i));
            if (!$test_directory) {
                continue;
            }
            if (!@is_dir($test_directory)) {
                if (@file_exists($test_directory)) {
                    // directory name already exists as a file
                    return false;
                }
                @mkdir($test_directory, 0755);
                @chmod($test_directory, 0755);
                if (!@is_dir($test_directory) || !@is_writable($test_directory)) {
                    return false;
                }
            }
        }

        return true;
    }

    /**
     * @param $dirname
     * @return array
     */
    public static function GetAllFilesInSubfolders($dirname)
    {
        $AllFiles = array();
        $dirname  = rtrim(realpath($dirname), '/\\');
        if ($dirhandle = @opendir($dirname)) {
            while (($file = readdir($dirhandle)) !== false) {
                $fullfilename = $dirname . DIRECTORY_SEPARATOR . $file;
                if (is_file($fullfilename)) {
                    $AllFiles[] = $fullfilename;
                } elseif (is_dir($fullfilename)) {
                    switch ($file) {
                        case '.':
                        case '..':
                            break;

                        default:
                            $AllFiles[] = $fullfilename;
                            $subfiles   = phpthumb_functions::GetAllFilesInSubfolders($fullfilename);
                            foreach ($subfiles as $filename) {
                                $AllFiles[] = $filename;
                            }
                            break;
                    }
                } else {
                    // ignore?
                }
            }
            closedir($dirhandle);
        }
        sort($AllFiles);

        return array_unique($AllFiles);
    }

    /**
     * @param $filename
     * @return mixed|string
     */
    public static function SanitizeFilename($filename)
    {
        $filename = preg_replace('/[^' . preg_quote(' !#$%^()+,-.;<>=@[]_{}') . 'a-zA-Z0-9]/', '_', $filename);
        if (phpthumb_functions::version_compare_replacement(PHP_VERSION, '4.1.0', '>=')) {
            $filename = trim($filename, '.');
        }

        return $filename;
    }

    /**
     * @param $password
     * @return int
     */
    public static function PasswordStrength($password)
    {
        $strength = 0;
        $strength += strlen(preg_replace('#[^a-z]#', '', $password)) * 0.5; // lowercase characters are weak
        $strength += strlen(preg_replace('#[^A-Z]#', '', $password)) * 0.8; // uppercase characters are somewhat better
        $strength += strlen(preg_replace('#[^0-9]#', '', $password)) * 1.0; // numbers are somewhat better
        $strength += strlen(preg_replace('#[a-zA-Z0-9]#', '', $password)) * 2.0; // other non-alphanumeric characters are best
        return $strength;
    }
}

////////////// END: class phpthumb_functions //////////////

if (!function_exists('gd_info')) {
    // built into PHP v4.3.0+ (with bundled GD2 library)
    /**
     * @return array
     */
    function gd_info()
    {
        static $gd_info = array();
        if (empty($gd_info)) {
            // based on code by johnschaefer at gmx dot de
            // from PHP help on gd_info()
            $gd_info       = array(
                'GD Version'         => '',
                'FreeType Support'   => false,
                'FreeType Linkage'   => '',
                'T1Lib Support'      => false,
                'GIF Read Support'   => false,
                'GIF Create Support' => false,
                'JPG Support'        => false,
                'PNG Support'        => false,
                'WBMP Support'       => false,
                'XBM Support'        => false
            );
            $phpinfo_array = phpthumb_functions::phpinfo_array();
            foreach ($phpinfo_array as $line) {
                $line = trim(strip_tags($line));
                foreach ($gd_info as $key => $value) {
                    //if (strpos($line, $key) !== false) {
                    if (strpos($line, $key) === 0) {
                        $newvalue      = trim(str_replace($key, '', $line));
                        $gd_info[$key] = $newvalue;
                    }
                }
            }
            if (empty($gd_info['GD Version'])) {
                // probable cause: "phpinfo() disabled for security reasons"
                if (function_exists('ImageTypes')) {
                    $imagetypes = imagetypes();
                    if ($imagetypes & IMG_PNG) {
                        $gd_info['PNG Support'] = true;
                    }
                    if ($imagetypes & IMG_GIF) {
                        $gd_info['GIF Create Support'] = true;
                    }
                    if ($imagetypes & IMG_JPG) {
                        $gd_info['JPG Support'] = true;
                    }
                    if ($imagetypes & IMG_WBMP) {
                        $gd_info['WBMP Support'] = true;
                    }
                }
                // to determine capability of GIF creation, try to use ImageCreateFromGIF on a 1px GIF
                if (function_exists('ImageCreateFromGIF')) {
                    if ($tempfilename = phpthumb::phpThumb_tempnam()) {
                        if ($fp_tempfile = @fopen($tempfilename, 'wb')) {
                            fwrite($fp_tempfile, base64_decode('R0lGODlhAQABAIAAAH//AP///ywAAAAAAQABAAACAUQAOw==')); // very simple 1px GIF file base64-encoded as string
                            fclose($fp_tempfile);

                            // if we can convert the GIF file to a GD image then GIF create support must be enabled, otherwise it's not
                            $gd_info['GIF Read Support'] = (bool)@imagecreatefromgif($tempfilename);
                        }
                        unlink($tempfilename);
                    }
                }
                if (function_exists('ImageCreateTrueColor') && @imagecreatetruecolor(1, 1)) {
                    $gd_info['GD Version'] = '2.0.1 or higher (assumed)';
                } elseif (function_exists('ImageCreate') && @imagecreate(1, 1)) {
                    $gd_info['GD Version'] = '1.6.0 or higher (assumed)';
                }
            }
        }

        return $gd_info;
    }
}

if (!function_exists('is_executable')) {
    // in PHP v3+, but v5.0+ for Windows
    /**
     * @param $filename
     * @return bool
     */
    function is_executable($filename)
    {
        // poor substitute, but better than nothing
        return file_exists($filename);
    }
}

if (!function_exists('preg_quote')) {
    // included in PHP v3.0.9+, but may be unavailable if not compiled in
    /**
     * @param         $string
     * @param  string $delimiter
     * @return string
     */
    function preg_quote($string, $delimiter = '\\')
    {
        static $preg_quote_array = array();
        if (empty($preg_quote_array)) {
            $escapeables = '.\\+*?[^]$(){}=!<>|:';
            for ($i = 0, $iMax = strlen($escapeables); $i < $iMax; $i++) {
                $strtr_preg_quote[$escapeables{$i}] = $delimiter . $escapeables{$i};

$strtr_preg_quote was never initialized. Although not strictly required by PHP, it is generally a good practice to add $strtr_preg_quote = array(); before regardless.

            }
        }

        return strtr($string, $strtr_preg_quote);
    }
}

if (!function_exists('file_get_contents')) {
    // included in PHP v4.3.0+
    /**
     * @param $filename
     * @return bool|string
     */
    function file_get_contents($filename)
    {
        if (preg_match('#^(f|ht)tp\://#i', $filename)) {
            return SafeURLread($filename, $error);
        }
        if ($fp = @fopen($filename, 'rb')) {
            $rawData = '';
            do {
                $buffer  = fread($fp, 8192);
                $rawData .= $buffer;
            } while (strlen($buffer) > 0);
            fclose($fp);

            return $rawData;
        }

        return false;
    }
}

if (!function_exists('file_put_contents')) {
    // included in PHP v5.0.0+
    /**
     * @param $filename
     * @param $filedata
     * @return bool
     */
    function file_put_contents($filename, $filedata)
    {
        if ($fp = @fopen($filename, 'wb')) {
            fwrite($fp, $filedata);
            fclose($fp);

            return true;
        }

        return false;
    }
}

if (!function_exists('imagealphablending')) {
    // built-in function requires PHP v4.0.6+ *and* GD v2.0.1+
    /**
     * @param       $img
     * @param  bool $blendmode
     * @return bool
     */
    function imagealphablending(&$img, $blendmode = true)
    {
        // do nothing, this function is declared here just to
        // prevent runtime errors if GD2 is not available
        return true;
    }
}

if (!function_exists('imagesavealpha')) {
    // built-in function requires PHP v4.3.2+ *and* GD v2.0.1+
    /**
     * @param       $img
     * @param  bool $blendmode
     * @return bool
     */
    function imagesavealpha(&$img, $blendmode = true)
    {
        // do nothing, this function is declared here just to
        // prevent runtime errors if GD2 is not available
        return true;
    }
}