<?php
/*    create_watermark.php : add recursively watermarks to all images 

      1.0, 27/01/2013 - Vincent Detzel - Accrosys
	       - Initial Version
 */

// HERE
$HERE = dirname(__FILE__);

// directory to scan
$IMAGE_DIR = $HERE . "/images/image";	

// backup directory
$BACKUP_DIR = $HERE . "/images.sans_logos";

// watermark
$WATERMARK_FILE = $HERE . "/images/image/logo/lp_filigrane_875x861.png";

// when set to 1, no images are processed (debug mode)
$SIMULATE = 0;

// when set to 1, no images are processed (debug mode)
$VERBOSE = 1;

// meta data comment to be added
$VERSION = "LinderPartner - 1.0";

// filenames repositories for reports
$ALL_OK_PROCESSED = array();
$ALL_OK_ALREADY_PROCESSED = array();
$ALL_ERR = array();

// echo verbose 
function echo_info($txt)
{
    global $VERBOSE;
    if ( $VERBOSE == 1 ) { echo $txt; }
}


// process a single directory
function process_directory($dirname)
{
    global $SIMULATE;
    if ( $SIMULATE == 1 )
    {
        echo "Processing directory $dirname\n";
    }
    if ($handle = opendir($dirname)) 
    {
        while (false !== ($entry = readdir($handle))) 
        {
            $filename = $dirname . '/' . $entry;
            if ( is_file($filename) )
            {
                $path_parts = pathinfo($filename);
                if (       strcasecmp($path_parts['extension'], 'jpg') == 0 
                        || strcasecmp($path_parts['extension'], 'jpeg') == 0 
                        || strcasecmp($path_parts['extension'], 'gif') == 0 
                        || strcasecmp($path_parts['extension'], 'bmp') == 0 
                   )
                {
                    process_image($filename);
                }
            }
            elseif ( is_dir($filename) 
                    && $entry !== "."
                    && $entry !== ".."
                    && $entry !== "logo"
                   )
            {
                process_directory($filename);
            }
        }
        closedir($handle);
    }
}

// process a single image file
function process_image($filename)
{
    global $SIMULATE;
    global $BACKUP_DIR;
    global $VERSION;
    global $ALL_OK_PROCESSED;
    global $ALL_OK_ALREADY_PROCESSED;
    global $ALL_ERR;
    global $WATERMARK_FILE;
    if ( $SIMULATE == 1 )
    {
        echo "$filename ...\n";
        return;
    }
    try
    {
        $image = new Imagick();
        $image->readImage($filename);
        echo_info("$filename - comment property = <" . $image->getImageProperty("comment") . ">" . "\n");
        if ( strstr($image->getImageProperty("comment"), 'LinderPartner - ') === FALSE )
        {
            // file has not been processed yet, let's continue
            $backup_filename = $BACKUP_DIR . '/' . $filename;
            $backup_dirname = dirname($backup_filename);
            if ( !is_dir($backup_dirname) ) { mkdir($backup_dirname, 0755, true); }
            if ( is_file($backup_filename) )
            {
                echo_info("$filename - backup $backup_filename already exists, nothing to do\n");
                $ALL_ERR["$filename"] = "fichier dÃ©ja prÃ©sent dans la zone de sauvegarde";
            }
            else if ( copy($filename, $backup_filename) )  // ensure we can make a backup before working on the image
            {
                $watermark = new Imagick();
                $watermark->readImage($WATERMARK_FILE);

				if ( $image->getNumberImages() > 1 ) // animated gif ?
				{
					// need to split images into frames to get the proper width/height
					$image = $image->coalesceImages();
				}

                // how big are the images?
                $iWidth = $image->getImageWidth();
                $iHeight = $image->getImageHeight();

                // resize the watermark
                if ( $iHeight < $iWidth ) { $wSize = $iHeight * 0.3; }
                else                      { $wSize = $iWidth * 0.3; }
                $watermark->scaleImage($wSize, $wSize);

                // get new size
                $wWidth = $watermark->getImageWidth();
                $wHeight = $watermark->getImageHeight();

                // calculate the position
                $x = ($iWidth - $wWidth);
                $y = ($iHeight - $wHeight);

				// add copyright as meta data (not supported by .gif, .bmp, and ... ?)
                $image->commentImage($VERSION);

				if ( $image->getNumberImages() > 1 ) // animated gif ?
				{
					// draw watermark on all frames
                    foreach ($image as $frame) { 
                         $frame->compositeImage($watermark, imagick::COMPOSITE_OVER, $x, $y);
					} 
					$image->optimizeImageLayers();
					$image = $image->deconstructImages();
                    $image->writeImages($filename, true);
				}
				else
				{
					// draw watermark 
                    $image->compositeImage($watermark, imagick::COMPOSITE_OVER, $x, $y);
                    $image->writeImage($filename);
				}

                $image->clear();
                $image->destroy();
                $ALL_OK_PROCESSED["$filename"] = 1;
                echo_info("$filename - PROCESSED\n");
            }
            else
            {
                echo_info("$filename - cannot copy backup $backup_filename\n");
                $ALL_ERR['$filename'] = "fichier sans logo mais dÃ©ja prÃ©sent dans la zone de sauvegarde";
            }
        }
        else
        {
            echo_info("$filename - already processed, nothing to do\n");
            $ALL_OK_ALREADY_PROCESSED["$filename"] = 1;
        }
    }
    catch(ImagickException $e)
    {
        echo "$filename - exception" . $e->getMessage() . "\n";
        $ALL_ERR["$filename"] = "erreur de format de fichier : " . $e->getMessage();
    }
}

// process main directory
process_directory($IMAGE_DIR);

// generate report ...
echo "Nouveaux fichiers traitÃ©s : " . strval(sizeof($ALL_OK_PROCESSED)) . "\n";
foreach ( $ALL_OK_PROCESSED as $filename => $dummy )
{
    echo " - $filename" . "\n";
}

echo "Fichiers dÃ©ja traitÃ©s : " . strval(sizeof($ALL_OK_ALREADY_PROCESSED)) . "\n";

echo "Erreurs : " . strval(sizeof($ALL_ERR)) . "\n";
foreach ( $ALL_ERR as $filename => $txt )
{
    echo " - $filename : " . $txt . "\n";
}
?>