Resize Any Image (API for adding an image resizer to your site)

Over 33,008,516 images resized

Your upload script

The Resize Any Image API replaces the File Select on your form by set a hidden form fields containing all the information about the resized image.

The RAI_resized_image_url field will contain the location of your resized image on our servers.

In your upload script you will fetch the resized image from our servers using HTTP.

For example:

<?php
$result_image_url = urldecode( $_POST["RAI_resized_image_url"] );
$image_content    = file_get_contents($result_image_url);

$found = preg_match( "/([^\/?]+)\??[^\/]*$/", $result_image_url,  $matches );
$result_image_filename = $matches[1];
$image_file            = $_SERVER['DOCUMENT_ROOT'] . "/images/" . $result_image_filename;

$filehandle = fopen($image_file,'w') or die ("can't open file $image_file");
fwrite($filehandle,$image_content);
fclose($filehandle);
?>

#!/usr/bin/perl

use URI::Escape;
use CGI;
my $cgi = new CGI();

my $result_image_url = uri_unescape( $cgi->param("RAI_resized_image_url") );
open( FILEHANDLE, "wget $result_image_url --quiet -O - |" ) or die "Cannot open wget: $!";
my $image_content = join '', <FILEHANDLE>;
close FILEHANDLE;

my ( $result_image_filename ) = ( $resized_image_url =~ m|([^/?]+)\??[^/]*$| );
my $image_file            = $ENV{'DOCUMENT_ROOT'} . '/images/' . $result_image_filename;
open( FILEHANDLE, ">$image_file" ) or die "Can't open file $image_file";
print FILEHANDLE $image_content;
close FILEHANDLE;

This code is a simple and none secure example.

Note: make sure that the upload directory is writable by your webserver.

To make the upload script a bit more fool proof you may want to consider the following situations:

Use unique filenames

Instead of saving the file with the filename that was provided by the user you will want to use filename unique to your system

No file was selected by the user

Resize Any Image will not have done anything and your form will be sent as-is.

A file was selected, but not resized

There are several reasons why this might happen:

The resizer window is closed by user
The user has a non-compatible browser

Resize Any Image will not have done anything. Your form will be sent as-is.

The image resizer is not available

There are several reasons why this might happen:

Javascript is disabled in the browser
The ResizeAnyImage servers are not available - this should not happen off course

Resize Any Image will not have done anything. Your form will be sent as-is, including the default file select.

Result parameters sent by Resize Any Image

These are the parameters that are included in your form:

RAI_resized_image_url	the location of the resized image on our servers
RAI_original_image_url	the filename of the resized image as used on our servers
last_selection_top	position of the cropped image in the original image
last_selection_left
last_selection_width
last_selection_height
last_zoom	zoom factor of the original image. A zoom factor of 1000 equals 100%
last_rotate	rotation of the original image
last_page_no	number of the used layer in multi layered originals like PDF

A more complete example

#!/usr/bin/perl

# configuration
my $upload_dir               = qq(./upload);      # your upload directory, i.e. where do you save your uploaded images
my $safe_filename_characters = qq(a-zA-Z0-9_.-);  # accepted characters in a filename

# set the modules to use
use CGI;
use URI::Escape;
use File::Basename;

my $cgi = new CGI();

# the url of the resized image is send as a form value
my $cgi = new CGI();
my $RAI_resized_image_url      = uri_unescape( $cgi->param("RAI_resized_image_url") );
my ( $RAI_resized_image_filename ) = ( $RAI_resized_image_url =~ m|([^/?]+)\??[^/]*$| );

my $imagefile;
my $filename;

# if there is a resized image fetch it from the Resize Any Image servers
# if there is no resized image get the file uploaded with the form
if ( $RAI_resized_image_url ) {

  ( $filename ) = ( $RAI_resized_image_filename );

  # fetch the resized image using wget
  open( FILEHANDLE, "wget $RAI_resized_image_url --quiet -O - |" ) or die "Cannot open wget: $!";
  $imagefile = join '', <FILEHANDLE>;
  close FILEHANDLE;

} else {

  # ResizeAnyImage has not given us a resized image - either generate an error or upload the original image

  # upload the original image: get the image from the CGI module
  my $upload_filehandle = $cgi->upload('imagefile');
  $imagefile = join '', <$upload_filehandle>;

  # get the filename from the CGI module
  $filename = $cgi->param( "imagefile" );
  my ( $name, $path, $extension ) = fileparse( $filename, '\..*' );
  $filename  = $name . $extension;

}

if ( $imagefile && $filename ) {

  # make sure the filename is safe
  $filename =~ tr/ /_/;
  $filename =~ s/[^$safe_filename_characters]/x/g;
  if ( $filename =~ /^([$safe_filename_characters]+)$/ ) {
    $filename = $1;
  } else {
    die "Filename contains invalid characters";
  }

  # and save it to disk - this uses the filename as it was sent back by resize your image; you may want to make sure that you don't overwrite existing files
  open( FILEHANDLE, ">$upload_dir/$filename" ) or die "Unable to save file $filename";
  print FILEHANDLE $imagefile;
  close FILEHANDLE;

  # here you can save the extra information about the image to a database or cms system.
  # you can use these to create the form again if you want users to be able to edit the file again after upload.
  # if you want to make it possible to re-edit the image you'll want to save the original image as well.
  my $html = '';
  foreach my $key qw(last_selection_top last_selection_left last_selection_width last_selection_height last_zoom last_rotate last_page_no) {
    $html .= "$key=" . $cgi->param( "RAI_$key" ) . '<br/>';
  }

  # back to the form
  # print qq(Location: $ENV{'IGOR'}{'FORM'}{'referer'}?${vars}uploaded_image=$ENV{'IGOR'}{'CONFIG'}{'image_upload_url'}/$filename\n\n);
  print "Content-type: text/html; charset=utf-8\n\n";
  print qq(
<img src="$upload_dir/$filename"/><br/>
<br/>
$html
);

} else {

  print "Content-type: text/html; charset=utf-8\n\n";
  print qq(No image uploaded);

}