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;
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};
}
}
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;
}
}