image_processing.php

php网页设计

<?

# Image processing functions
# Functions to allow upload and resizing of images

if (!function_exists("upload_file")){
function upload_file($ref)
	{
	# Process file upload for resource $ref
	
	# Work out which file has been posted (switch is necessary for SWFUpload)
	if (isset($_FILES['userfile'])) {$processfile=$_FILES['userfile'];} else {$processfile=$_FILES['Filedata'];}
	
    $filename=strtolower(str_replace(" ","_",$processfile['name']));
    
    # Work out extension
    $extension=explode(".",$filename);$extension=trim(strtolower($extension[count($extension)-1]));
    
    $status="Please provide a file name.";
    $filepath=get_resource_path($ref,"",true,$extension);
    if ($filename!="")
    	{
	    $result=move_uploaded_file($processfile['tmp_name'], $filepath);
    	if ($result==false)
       	 	{
       	 	$status="File upload error. Please check the size of the file you are trying to upload.";
       	 	}
     	else
     		{
     		chmod($filepath,0777);
			$status="Your file has been uploaded.";
    	 	}
    	}
    	
    # Store extension in the database
    sql_query("update resource set file_extension='$extension',preview_extension='$extension' where ref='$ref'");

	# Store original filename in field, if set
	global $filename_field;
	if (isset($filename_field))
		{
		update_field($ref,$filename_field,$filename);
		}
    
    # Clear any existing FLV file or multi-page previews.
	global $pdf_pages;
	for ($n=2;$n<=$pdf_pages;$n++)
		{
		# Remove preview page.
		$path=get_resource_path($ref,"scr",false,"jpg",-1,$n,false);
		if (file_exists($path)) {unlink($path);}
		# Also try the watermarked version.
		$path=get_resource_path($ref,"scr",false,"jpg",-1,$n,true);
		if (file_exists($path)) {unlink($path);}
		}
	# Remove any FLV video preview (except if the actual resource is an FLV file).
	if ($extension!="flv")
		{
		$path=get_resource_path($ref,"",false,"flv");
		if (file_exists($path)) {unlink($path);}
		}
    
	# Create previews
	create_previews($ref,false,$extension);

    return $status;
    }}
	
function extract_exif_comment($ref,$extension)
	{
	# Extract the EXIF comment from either the ImageDescription field or the UserComment
	# Also parse IPTC headers and insert
	
	# EXIF headers

	$image=get_resource_path($ref,"",false,$extension);
	if (!file_exists($image)) {return false;}

global $exiftool_path;
if (isset($exiftool_path))
	{
	if (file_exists(stripslashes($exiftool_path) . "/exiftool"))
		{
			#creating the exiftool command which will output the metadata array
			$command=$exiftool_path."/exiftool -p ' (";
			
			$read_from=get_exiftool_fields();
			for($i=0;$i< count($read_from);$i++)
				{
				$field=explode(",",$read_from[$i]['exiftool_field']);
				foreach ($field as $field){
				$command.="\"$".$field."\", " ;}
				}
				
			#-f and -m force empty output ("-") and avoid error messages	
			#-ScanforXMP allows tags to be extracted for unrecognized filetypes (INDD)
			#-fast avoids ScanforXMP if the filetype is a known one
			$command.=")' -f -m -ScanforXMP -fast $image";
			$metadata=shell_exec($command);
			
			if(isset($metadata)){
			#the printed output is evaluated into a php array
			eval('$'.'metadata_array=array'.$metadata.';');
	
			#this is a rather complex double loop to account for the one-to-many relationship
			
			#j increases as all the read_from values are exhausted, so it allows 
			#us to use all the values in the metadata array
			$j=0;	
			for($i=0;$i< count($read_from);$i++)
				{
				$field=explode(",",$read_from[$i]['exiftool_field']);			
				foreach ($field as $field){		
				#notice if two different values get mapped to the same field, the last one will be the winner
				#but if a previous field has a value and a subsequent field is empty, 
				#the one with the value should get entered into the database.
				#files that have come from RS will have the same value for each anyway.
				if (($metadata_array[$j]!="-") && ($metadata_array[$j]!="")){update_field($ref,$read_from[$i]['ref'],$metadata_array[$j]);}
				$j++;}
				}
			}
		}
	}
else
{
	$data=@exif_read_data($image);

	if ($data!==false)
		{
		$comment="";
		#echo "<pre>EXIF\n";print_r($data);exit();

		if (isset($data["ImageDescription"])) {$comment=$data["ImageDescription"];}
		if (($comment=="") && (isset($data["COMPUTED"]["UserComment"]))) {$comment=$data["COMPUTED"]["UserComment"];}
		if ($comment!="")
			{
			# Convert to UTF-8
			$comment=iptc_return_utf8($comment);
			
			# Save comment
			global $exif_comment;
			update_field($ref,$exif_comment,$comment);
			}
		if (isset($data["Model"]))
			{
			# Save camera make/model
			global $exif_model;
			update_field($ref,$exif_model,$data["Model"]);
			}
		if (isset($data["DateTimeOriginal"]))
			{
			# Save camera date/time
			global $exif_date;
			$date=$data["DateTimeOriginal"];
			# Reformat date to ISO standard
			$date=substr($date,0,4) . "-" . substr($date,5,2) . "-" . substr($date,8);
			update_field($ref,$exif_date,$date);
			}
		}
		
	# Try IPTC headers
	$size = getimagesize($image, $info);
	if (isset($info["APP13"]))
		{
		$iptc = iptcparse($info["APP13"]);
		#echo "<pre>IPTC\n";print_r($iptc);exit();

		# Look for iptc fields, and insert.
		$fields=sql_query("select * from resource_type_field where length(iptc_equiv)>0");
		for ($n=0;$n<count($fields);$n++)
			{
			$iptc_equiv=$fields[$n]["iptc_equiv"];
			if (isset($iptc[$iptc_equiv][0]))
				{
				# Found the field
				if (count($iptc[$iptc_equiv])>1)
					{
					# Multiple values (keywords)
					$value="";
					for ($m=0;$m<count($iptc[$iptc_equiv]);$m++)
						{
						if ($m>0) {$value.=", ";}
						$value.=$iptc[$iptc_equiv][$m];
						}
					}
				else
					{
					$value=$iptc[$iptc_equiv][0];
					}
					
				$value=iptc_return_utf8($value);
				
				# Date parsing
				if ($fields[$n]["type"]==4)
					{
					$value=substr($value,0,4) . "-" . substr($value,4,2) . "-" . substr($value,6,2);
					}
				
				if (trim($value)!="") {update_field($ref,$fields[$n]["ref"],$value);}
				}			
			}
		}
	}
	}

function iptc_return_utf8($text)
	{
	# For the given $text, return the utf-8 equiv.
	# Used for iptc headers to auto-detect the character encoding.
	global $iptc_expectedchars;
	
	# No inconv library? Return text as-is
	if (!function_exists("iconv")) {return $text;}
	
	$try=array("UTF-8","ISO-8859-1","Macintosh","Windows-1252");
	for ($n=0;$n<count($try);$n++)
		{
		if ($try[$n]=="UTF-8") {$trans=$text;} else {$trans=@iconv($try[$n], "UTF-8", $text);}
		for ($m=0;$m<strlen($iptc_expectedchars);$m++)
			{
			if (strpos($trans,substr($iptc_expectedchars,$m,1))!==false) {return $trans;}
			}
		}
	return $text;
	}
	
function create_previews($ref,$thumbonly=false,$extension="jpg")
	{
	# Always create file checksum (all types)
	generate_file_checksum($ref,$extension);
	if (($extension=="jpg") || ($extension=="jpeg") || ($extension=="png") || ($extension=="gif"))
 
	# Create image previews for built-in supported file types only (JPEG, PNG, GIF)
		{
		# For resource $ref, (re)create the various preview sizes listed in the table preview_sizes
		# Only create previews where the target size IS LESS THAN OR EQUAL TO the source size.
		# Set thumbonly=true to (re)generate thumbnails only.
		$file=get_resource_path($ref,"",false,$extension);	
		# fetch source image size, if we fail, exit this function (file not an image, or file not a valid jpg/png/gif).
		if ((list($sw,$sh) = @getimagesize($file))===false) {return false;}
		
		$ps=sql_query("select * from preview_size" . (($thumbonly)?" where id='thm' or id='col'":""));
		for ($n=0;$n<count($ps);$n++)
			{
			# fetch target width and height
			$tw=$ps[$n]["width"];$th=$ps[$n]["height"];
			$id=$ps[$n]["id"];
			
			# Find the target path and delete anything that's already there.
			$path=get_resource_path($ref,$ps[$n]["id"],false);
			if (file_exists($path)) {unlink($path);}
			# Also try the watermarked version.
			$wpath=get_resource_path($ref,$ps[$n]["id"],false,"jpg",-1,1,true);
			if (file_exists($wpath)) {unlink($wpath);}

            # only create previews where the target size IS LESS THAN OR EQUAL TO the source size.
			# or when producing a small thumbnail (to make sure we have that as a minimum
			if (($sw>$tw) || ($sh>$th) || ($id=="thm") || ($id=="col"))
				{
				# Calculate width and height.
				if ($sw>$sh) {$ratio = ($tw / $sw);} # Landscape
				else {$ratio = ($th / $sh);} # Portrait
				$tw=floor($sw*$ratio);
				$th=floor($sh*$ratio);

				global $imagemagick_path,$imagemagick_preserve_profiles,$imagemagick_quality;
				if (isset($imagemagick_path))
					{
					# ----------------------------------------
					# Use ImageMagick to perform the resize
					# ----------------------------------------
	
					# Locate imagemagick.
				    $command=$imagemagick_path . "/bin/convert";
				    if (!file_exists($command)) {$command=$imagemagick_path . "/convert";}
				    if (!file_exists($command)) {$command=$imagemagick_path . "\convert.exe";}
                    if (!file_exists($command)) {exit("Could not find ImageMagick 'convert' utility.'");}	
        
					# Preserve colour profiles? (omit for smaller sizes)   
					$profile="+profile icc +profile xmp +profile exif +profile iptc -colorspace RGB"; # By default, strip the colour profiles ('+' is remove the profile, confusingly)
					if ($imagemagick_preserve_profiles && $id!="thm" && $id!="col" && $id!="pre" && $id!="scr") {$profile="";}
    
				    $command2 = $command . " \"$file\"[0] $profile -quality $imagemagick_quality -resize " . $tw . "x" . $th . " \"$path\""; 
                    $output=shell_exec($command2); 

					if ($id=="thm")
						{
						# For the thumbnail image, call extract_mean_colour() to save the colour/size information
						$target=@imagecreatefromjpeg($path);
						extract_mean_colour($target,$ref);
						}

	   				# Add a watermarked image too?
    				global $watermark;
    				if (isset($watermark) && ($ps[$n]["internal"]==1 || $ps[$n]["allow_preview"]==1))
    					{
						$path=myrealpath(get_resource_path($ref,$ps[$n]["id"],false,"",-1,1,true));
						if (file_exists($path)) {unlink($path);}
	    				$watermarkreal=myrealpath($watermark);

					    $command2 = $command . " \"$file\"[0] $profile -quality $imagemagick_quality -resize " . $tw . "x" . $th . " -tile $watermarkreal -draw \"rectangle 0,0 $tw,$th\" \"$path\""; 
					    $output=shell_exec($command2); 
						}

					}
				else			
					{
					# ----------------------------------------
					# Use the GD library to perform the resize
					# ----------------------------------------
					
					$target = imagecreatetruecolor($tw,$th);
					
					if ($extension=="png")
						{
						$source = @imagecreatefrompng($file);
						if ($source===false) {return false;}
						}
					elseif ($extension=="gif")
						{
						$source = @imagecreatefromgif($file);
						if ($source===false) {return false;}
						}
					else
						{