function create_previews_using_im($ref, $thumbonly = false, $extension = "jpg", $previewonly = false, $previewbased = false, $alternative = -1, $ingested = false)
{
global $keep_for_hpr, $imagemagick_path, $imagemagick_preserve_profiles, $imagemagick_quality, $imagemagick_colorspace, $default_icc_file, $autorotate_no_ingest, $always_make_previews, $lean_preview_generation;
$icc_transform_complete = false;
debug("create_previews_using_im(ref={$ref},thumbonly={$thumbonly},extension={$extension},previewonly={$previewonly},previewbased={$previewbased},alternative={$alternative},ingested={$ingested})");
if (isset($imagemagick_path)) {
# ----------------------------------------
# Use ImageMagick to perform the resize
# ----------------------------------------
# For resource $ref, (re)create the various preview sizes listed in the table preview_sizes
# Set thumbonly=true to (re)generate thumbnails only.
if ($previewbased || $autorotate_no_ingest && !$ingested) {
$file = get_resource_path($ref, true, "lpr", false, "jpg", -1, 1, false, "");
if (!file_exists($file)) {
$file = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, false, "");
if (!file_exists($file)) {
$file = get_resource_path($ref, true, "pre", false, "jpg", -1, 1, false, "");
/* staged, but not needed in testing
if(!file_exists($file) && $autorotate_no_ingest && !$ingested)
{
$file=get_resource_path($ref,true,"",false,$extension,-1,1,false,"",$alternative);
}*/
}
}
if ($autorotate_no_ingest && !$ingested && !$previewonly) {
# extra check for !previewonly should there also be ingested resources in the system
$file = get_resource_path($ref, true, "", false, $extension, -1, 1, false, "", $alternative);
}
} else {
if (!$previewonly) {
$file = get_resource_path($ref, true, "", false, $extension, -1, 1, false, "", $alternative);
} else {
# We're generating based on a new preview (scr) image.
$file = get_resource_path($ref, true, "tmp", false, "jpg");
}
}
$hpr_path = get_resource_path($ref, true, "hpr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($hpr_path) && !$previewbased) {
unlink($hpr_path);
}
$lpr_path = get_resource_path($ref, true, "lpr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($lpr_path) && !$previewbased) {
unlink($lpr_path);
}
$scr_path = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($scr_path) && !$previewbased) {
unlink($scr_path);
}
$scr_wm_path = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, true, "", $alternative);
if (file_exists($scr_wm_path) && !$previewbased) {
unlink($scr_wm_path);
}
$prefix = '';
# Camera RAW images need prefix
if (preg_match('/^(dng|nef|x3f|cr2|crw|mrw|orf|raf|dcr)$/i', $extension, $rawext)) {
$prefix = $rawext[0] . ':';
}
# Locate imagemagick.
$identify_fullpath = get_utility_path("im-identify");
if ($identify_fullpath == false) {
debug("ERROR: Could not find ImageMagick 'identify' utility at location '{$imagemagick_path}'.");
return false;
}
# Get image's dimensions.
$identcommand = $identify_fullpath . ' -format %wx%h ' . escapeshellarg($prefix . $file) . '[0]';
$identoutput = run_command($identcommand);
if ($lean_preview_generation) {
$all_sizes = false;
if (!$thumbonly && !$previewonly) {
// seperate width and height
$all_sizes = true;
if (!empty($identoutput)) {
$wh = explode("x", $identoutput);
$o_width = $wh[0];
$o_height = $wh[1];
}
}
}
preg_match('/^([0-9]+)x([0-9]+)$/ims', $identoutput, $smatches);
if (@(list(, $sw, $sh) = $smatches) === false) {
return false;
}
$sizes = "";
if ($thumbonly) {
$sizes = " where id='thm' or id='col'";
}
if ($previewonly) {
$sizes = " where id='thm' or id='col' or id='pre' or id='scr'";
}
$ps = sql_query("select * from preview_size {$sizes} order by width desc, height desc");
if ($lean_preview_generation && $all_sizes) {
$force_make = array("pre", "thm", "col");
if ($extension != "jpg" || $extension != "jpeg") {
array_push($force_make, "hpr", "scr");
}
$count = count($ps) - 1;
$oversized = 0;
for ($s = $count; $s > 0; $s--) {
if (!in_array($ps[$s]['id'], $force_make) && !in_array($ps[$s]['id'], $always_make_previews) && (isset($o_width) && isset($o_height) && $ps[$s]['width'] > $o_width && $ps[$s]['height'] > $o_height)) {
$oversized++;
}
if ($oversized > 0) {
unset($ps[$s]);
}
}
$ps = array_values($ps);
}
$created_count = 0;
for ($n = 0; $n < count($ps); $n++) {
# If this is just a jpg resource, we avoid the hpr size because the resource itself is an original sized jpg.
# If preview_preprocessing indicates the intermediate jpg should be kept as the hpr image, do that.
if ($keep_for_hpr && $ps[$n]['id'] == "hpr") {
rename($file, $hpr_path);
// $keep_for_hpr is switched to false below
}
# If we've already made the LPR or SCR then use those for the remaining previews.
# As we start with the large and move to the small, this will speed things up.
if ($extension != "png" && $extension != "gif") {
if (file_exists($hpr_path)) {
$file = $hpr_path;
}
if (file_exists($lpr_path)) {
$file = $lpr_path;
}
if (file_exists($scr_path)) {
$file = $scr_path;
}
}
# Locate imagemagick.
$convert_fullpath = get_utility_path("im-convert");
if ($convert_fullpath == false) {
debug("ERROR: Could not find ImageMagick 'convert' utility at location '{$imagemagick_path}'.");
return false;
}
if ($prefix == "cr2:" || $prefix == "nef:" || $extension == "png" || $extension == "gif") {
$flatten = "";
} else {
$flatten = "-flatten";
}
$command = $convert_fullpath . ' ' . escapeshellarg($file) . ($extension != "png" && $extension != "gif" ? '[0] +matte ' : '') . $flatten . ' -quality ' . $imagemagick_quality;
# fetch target width and height
$tw = $ps[$n]["width"];
$th = $ps[$n]["height"];
$id = $ps[$n]["id"];
# Debug
debug("Contemplating " . $ps[$n]["id"] . " (sw={$sw}, tw={$tw}, sh={$sh}, th={$th}, extension={$extension})");
# Find the target path
if ($extension == "png" || $extension == "gif") {
$target_ext = $extension;
} else {
$target_ext = "jpg";
}
$path = get_resource_path($ref, true, $ps[$n]["id"], false, $target_ext, -1, 1, false, "", $alternative);
# Delete any file at the target path. Unless using the previewbased option, in which case we need it.
if (!hook("imagepskipdel") && !$keep_for_hpr) {
if (!$previewbased) {
if (file_exists($path)) {
unlink($path);
}
}
}
if ($keep_for_hpr) {
$keep_for_hpr = false;
}
# Also try the watermarked version.
$wpath = get_resource_path($ref, true, $ps[$n]["id"], false, $target_ext, -1, 1, true, "", $alternative);
if (file_exists($wpath)) {
unlink($wpath);
}
# Always make a screen size for non-JPEG extensions regardless of actual image size
# This is because the original file itself is not suitable for full screen preview, as it is with JPEG files.
#
# Always make preview sizes for smaller file sizes.
#
# Always make pre/thm/col sizes regardless of source image size.
if ($id == "hpr" && !($extension == "jpg" || $extension == "jpeg") || $id == "scr" && !($extension == "jpg" || $extension == "jpeg") || $sw > $tw || $sh > $th || $id == "pre" || $id == "thm" || $id == "col" || in_array($id, $always_make_previews)) {
# Debug
debug("Generating preview size " . $ps[$n]["id"] . " to " . $path);
# EXPERIMENTAL CODE TO USE EXISTING ICC PROFILE IF PRESENT
global $icc_extraction, $icc_preview_profile, $icc_preview_options, $ffmpeg_supported_extensions;
if ($icc_extraction) {
$iccpath = get_resource_path($ref, true, '', false, $extension) . '.icc';
if (!file_exists($iccpath) && !isset($iccfound) && $extension != "pdf" && !in_array($extension, $ffmpeg_supported_extensions)) {
// extracted profile doesn't exist. Try extracting.
if (extract_icc_profile($ref, $extension)) {
$iccfound = true;
} else {
$iccfound = false;
}
}
}
if ($icc_extraction && file_exists($iccpath) && !$icc_transform_complete) {
// we have an extracted ICC profile, so use it as source
$targetprofile = dirname(__FILE__) . '/../iccprofiles/' . $icc_preview_profile;
$profile = " -strip -profile {$iccpath} {$icc_preview_options} -profile {$targetprofile} -strip ";
// consider ICC transformation complete, if one of the sizes has been rendered that will be used for the smaller sizes
if ($id == 'hpr' || $id == 'lpr' || $id == 'scr') {
$icc_transform_complete = true;
}
} else {
// use existing strategy for color profiles
# Preserve colour profiles? (omit for smaller sizes)
if ($imagemagick_preserve_profiles && $id != "thm" && $id != "col" && $id != "pre" && $id != "scr") {
$profile = "";
} else {
if (!empty($default_icc_file)) {
$profile = "-profile {$default_icc_file} ";
} else {
# By default, strip the colour profiles ('+' is remove the profile, confusingly)
$profile = "-strip -colorspace " . $imagemagick_colorspace;
}
}
}
$runcommand = $command . " " . ($extension != "png" && $extension != "gif" ? " +matte {$profile} " : "") . " -resize " . $tw . "x" . $th . "\">\" " . escapeshellarg($path);
if (!hook("imagepskipthumb")) {
$output = run_command($runcommand);
$created_count++;
# if this is the first file generated for non-ingested resources check rotation
if ($autorotate_no_ingest && $created_count == 1 && !$ingested) {
# first preview created for non-ingested file...auto-rotate
if ($id == "thm" || $id == "col" || $id == "pre" || $id == "scr") {
AutoRotateImage($path, $ref);
} else {
AutoRotateImage($path);
}
}
}
// checkerboard
if ($extension == "png" || $extension == "gif") {
global $transparency_background;
$transparencyreal = dirname(__FILE__) . "/../" . $transparency_background;
$wait = run_command(str_replace("identify", "composite", $identify_fullpath) . " -compose Dst_Over -tile " . escapeshellarg($transparencyreal) . " " . escapeshellarg($path) . " " . escapeshellarg(str_replace($extension, "jpg", $path)), true);
unlink($path);
$path = str_replace($extension, "jpg", $path);
}
//echo $runcommand."<br /><br/>";
# echo $runcommand."<br>\n";
# Add a watermarked image too?
global $watermark;
if (!hook("replacewatermarkcreation", "", array($ref, $ps, $n, $alternative))) {
if ($alternative == -1 && isset($watermark) && ($ps[$n]["internal"] == 1 || $ps[$n]["allow_preview"] == 1)) {
$wmpath = get_resource_path($ref, true, $ps[$n]["id"], false, "jpg", -1, 1, true);
if (file_exists($wmpath)) {
unlink($wmpath);
}
$watermarkreal = dirname(__FILE__) . "/../" . $watermark;
$runcommand = $command . " +matte {$profile} -resize " . $tw . "x" . $th . "\">\" -tile " . escapeshellarg($watermarkreal) . " -draw \"rectangle 0,0 {$tw},{$th}\" " . escapeshellarg($wmpath);
// alternate command for png/gif using the path from above, and omitting resizing
if ($extension == "png" || $extension == "gif") {
$runcommand = $convert_fullpath . ' ' . escapeshellarg($path) . ($extension != "png" && $extension != "gif" ? '[0] +matte ' : '') . $flatten . ' -quality ' . $imagemagick_quality . " -tile " . escapeshellarg($watermarkreal) . " -draw \"rectangle 0,0 {$tw},{$th}\" " . escapeshellarg($wmpath);
}
#die($runcommand);
$output = run_command($runcommand);
//echo $runcommand."</br>";
}
}
// end hook replacewatermarkcreation
}
}
# For the thumbnail image, call extract_mean_colour() to save the colour/size information
$target = @imagecreatefromjpeg(get_resource_path($ref, true, "thm", false, "jpg", -1, 1, false, "", $alternative));
if ($target && $alternative == -1) {
extract_mean_colour($target, $ref);
# flag database so a thumbnail appears on the site
sql_query("update resource set has_image=1,preview_extension='jpg',preview_attempts=0,file_modified=now() where ref='{$ref}'");
} else {
if (!$target) {
sql_query("update resource set preview_attempts=ifnull(preview_attempts,0) + 1 where ref='{$ref}'");
}
}
return true;
} else {
return false;
}
}
function create_previews_using_im($ref, $thumbonly = false, $extension = "jpg", $previewonly = false, $previewbased = false, $alternative = -1)
{
global $imagemagick_path, $imagemagick_preserve_profiles, $imagemagick_quality;
$icc_transform_complete = false;
debug("create_previews_using_im(ref={$ref},thumbonly={$thumbonly},extension={$extension},previewonly={$previewonly},previewbased={$previewbased},alternative={$alternative})");
if (isset($imagemagick_path)) {
# ----------------------------------------
# Use ImageMagick to perform the resize
# ----------------------------------------
# For resource $ref, (re)create the various preview sizes listed in the table preview_sizes
# Set thumbonly=true to (re)generate thumbnails only.
if ($previewbased) {
$file = get_resource_path($ref, true, "lpr", false, "jpg", -1, 1, false, "");
if (!file_exists($file)) {
$file = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, false, "");
if (!file_exists($file)) {
$file = get_resource_path($ref, true, "pre", false, "jpg", -1, 1, false, "");
}
}
} else {
if (!$previewonly) {
$file = get_resource_path($ref, true, "", false, $extension, -1, 1, false, "", $alternative);
} else {
# We're generating based on a new preview (scr) image.
$file = get_resource_path($ref, true, "tmp", false, "jpg");
}
}
$hpr_path = get_resource_path($ref, true, "hpr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($hpr_path) && !$previewbased) {
unlink($hpr_path);
}
$lpr_path = get_resource_path($ref, true, "lpr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($lpr_path) && !$previewbased) {
unlink($lpr_path);
}
$scr_path = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, false, "", $alternative);
if (file_exists($scr_path) && !$previewbased) {
unlink($scr_path);
}
$scr_wm_path = get_resource_path($ref, true, "scr", false, "jpg", -1, 1, true, "", $alternative);
if (file_exists($scr_wm_path) && !$previewbased) {
unlink($scr_wm_path);
}
$prefix = '';
# Camera RAW images need prefix
if (preg_match('/^(dng|nef|x3f|cr2|crw|mrw|orf|raf|dcr)$/i', $extension, $rawext)) {
$prefix = $rawext[0] . ':';
}
# Locate imagemagick.
$identify_fullpath = get_utility_path("im-identify");
if ($identify_fullpath == false) {
exit("Could not find ImageMagick 'identify' utility at location '{$imagemagick_path}'.");
}
# Get image's dimensions.
$identcommand = $identify_fullpath . ' -format %wx%h ' . escapeshellarg($prefix . $file) . '[0]';
$identoutput = run_command($identcommand);
preg_match('/^([0-9]+)x([0-9]+)$/ims', $identoutput, $smatches);
if (@(list(, $sw, $sh) = $smatches) === false) {
return false;
}
$sizes = "";
if ($thumbonly) {
$sizes = " where id='thm' or id='col'";
}
if ($previewonly) {
$sizes = " where id='thm' or id='col' or id='pre' or id='scr'";
}
$ps = sql_query("select * from preview_size {$sizes} order by width desc, height desc");
for ($n = 0; $n < count($ps); $n++) {
# If we've already made the LPR or SCR then use those for the remaining previews.
# As we start with the large and move to the small, this will speed things up.
if (file_exists($hpr_path)) {
$file = $hpr_path;
}
if (file_exists($lpr_path)) {
$file = $lpr_path;
}
if (file_exists($scr_path)) {
$file = $scr_path;
}
# Locate imagemagick.
$convert_fullpath = get_utility_path("im-convert");
if ($convert_fullpath == false) {
exit("Could not find ImageMagick 'convert' utility at location '{$imagemagick_path}'.");
}
if ($prefix == "cr2:" || $prefix == "nef:") {
$flatten = "";
} else {
$flatten = "-flatten";
}
$command = $convert_fullpath . ' ' . escapeshellarg($file) . '[0] +matte ' . $flatten . ' -quality ' . $imagemagick_quality;
# fetch target width and height
$tw = $ps[$n]["width"];
$th = $ps[$n]["height"];
$id = $ps[$n]["id"];
# Debug
debug("Contemplating " . $ps[$n]["id"] . " (sw={$sw}, tw={$tw}, sh={$sh}, th={$th}, extension={$extension})");
# Always make a screen size for non-JPEG extensions regardless of actual image size
# This is because the original file itself is not suitable for full screen preview, as it is with JPEG files.
#
# Always make preview sizes for smaller file sizes.
#
# Always make pre/thm/col sizes regardless of source image size.
if ($id == "hpr" && !($extension == "jpg" || $extension == "jpeg") || $id == "scr" && !($extension == "jpg" || $extension == "jpeg") || $sw > $tw || $sh > $th || $id == "pre" || $id == "thm" || $id == "col") {
# Find the target path
$path = get_resource_path($ref, true, $ps[$n]["id"], false, "jpg", -1, 1, false, "", $alternative);
# Debug
debug("Generating preview size " . $ps[$n]["id"] . " to " . $path);
# Delete any file at the target path. Unless using the previewbased option, in which case we need it.
if (!hook("imagepskipdel")) {
if (!$previewbased) {
if (file_exists($path)) {
unlink($path);
}
}
}
# Also try the watermarked version.
$wpath = get_resource_path($ref, true, $ps[$n]["id"], false, "jpg", -1, 1, true, "", $alternative);
if (file_exists($wpath)) {
unlink($wpath);
}
# EXPERIMENTAL CODE TO USE EXISTING ICC PROFILE IF PRESENT
global $icc_extraction, $icc_preview_profile, $icc_preview_options, $ffmpeg_supported_extensions;
if ($icc_extraction) {
$iccpath = get_resource_path($ref, true, '', false, $extension . '.icc');
if (!file_exists($iccpath) && !isset($iccfound) && $extension != "pdf" && !in_array($extension, $ffmpeg_supported_extensions)) {
// extracted profile doesn't exist. Try extracting.
if (extract_icc_profile($ref, $extension)) {
$iccfound = true;
} else {
$iccfound = false;
}
}
}
if ($icc_extraction && file_exists($iccpath) && !$icc_transform_complete) {
// we have an extracted ICC profile, so use it as source
$targetprofile = dirname(__FILE__) . '/../iccprofiles/' . $icc_preview_profile;
$profile = " +profile \"*\" -profile {$iccpath} {$icc_preview_options} -profile {$targetprofile} +profile \"*\" ";
$icc_transform_complete = true;
} else {
// use existing strategy for color profiles
# Preserve colour profiles? (omit for smaller sizes)
$profile = "+profile \"*\" -colorspace sRGB";
# By default, strip the colour profiles ('+' is remove the profile, confusingly)
if ($imagemagick_preserve_profiles && $id != "thm" && $id != "col" && $id != "pre" && $id != "scr") {
$profile = "";
}
}
$runcommand = $command . " +matte {$profile} -resize " . $tw . "x" . $th . "\">\" " . escapeshellarg($path);
if (!hook("imagepskipthumb")) {
$output = run_command($runcommand);
}
//echo $runcommand."<br /><br/>";
# echo $runcommand."<br>\n";
# Add a watermarked image too?
global $watermark;
if ($alternative == -1 && isset($watermark) && ($ps[$n]["internal"] == 1 || $ps[$n]["allow_preview"] == 1)) {
$path = get_resource_path($ref, true, $ps[$n]["id"], false, "", -1, 1, true);
if (file_exists($path)) {
unlink($path);
}
$watermarkreal = dirname(__FILE__) . "/../" . $watermark;
$runcommand = $command . " +matte {$profile} -resize " . $tw . "x" . $th . "\">\" -tile " . escapeshellarg($watermarkreal) . " -draw \"rectangle 0,0 {$tw},{$th}\" " . escapeshellarg($path);
#die($runcommand);
$output = run_command($runcommand);
}
}
}
# For the thumbnail image, call extract_mean_colour() to save the colour/size information
$target = @imagecreatefromjpeg(get_resource_path($ref, true, "thm", false, "jpg", -1, 1, false, "", $alternative));
if ($target && $alternative == -1) {
extract_mean_colour($target, $ref);
# flag database so a thumbnail appears on the site
sql_query("update resource set has_image=1,preview_extension='jpg',preview_attempts=0,file_modified=now() where ref='{$ref}'");
} else {
if (!$target) {
$preview_attempts = sql_value("select preview_attempts as value from resource where ref=" . $ref, 0);
sql_query("update resource set preview_attempts=" . ($preview_attempts + 1) . " where ref='{$ref}'");
}
}
return true;
} else {
return false;
}
}