<?php
 /* File:    border.php
  * Author:  Paul E. Zaremba III
  * Date:    2004-12-17
  * License: Do what you will, just leave this header intact
  * Parameters:
  *   color            = hex RGB value (default 000000)
  *   red, green, blue = hex representations of the respective colors (00,00,00)
  *   x, y             = width, height (8, 8)
  *   ty               = fi (filler), tl (top-left), br (bottom-right), tr, bl
  */

include_once "cache_ctl.phpi";

/*********************
 * Forward declarations
 *********************/
$ok_to_draw = true;
$is_ellipse = true;
$type       = ( $_REQUEST['ty'] ? $_REQUEST['ty'] : 'fi' ); // filler by default
$cloc       = array( 'x' => 0, 'y' => 0 ); // center at 00 by default
$color      = array( 'red'   => 0,
                     'green' => 0,
                     'blue'  => 0 );
$size       = array( 'x' => 8, 'y' => 8 );
$arcstart   = 0;

if ( $_REQUEST['color'] )
{
   $pm = '[a-fA-F0-9]{2}';
   if ( preg_match( "/($pm)($pm)($pm)/", $_REQUEST['color'], $matches ) )
   {
      list( $color['red'], $color['green'], $color['blue'] ) =
         array_map( hexdec, array_slice($matches, 1, 3) );
   }
   else
   {
      printf( "Invalid color '%s' passed in.", $_REQUEST['color'] );
      $ok_to_draw = false;
   }
}

foreach ( array_keys( $color ) as $col )
{
   // allow individual overrides
   if ( $_REQUEST[$col] )
   {
      $color[$col] = hexdec($_REQUEST[$col]);
   }
   
   if ( $color[$col] < 0 || $color[$col] > 255 )
   {
      printf("Invalid '%s' color given: %s", $col, $color[$col] );
      $ok_to_draw = false;
   }
}

// see if we need to override
foreach ( array_keys($size) as $axis )
{
   if ( $_REQUEST[$axis] )
   {
      if ( $_REQUEST[$axis] > 0 && $_REQUEST[$axis] <= 64)
      {
         $size[$axis] = $_REQUEST[$axis];
      }
      else
      {
         printf("Invalid '%s' range given: %s", $axis, $_REQUEST[$axis]);
         $ok_to_draw = false;
      }
   }
}

switch ( $type )
{
case 'fi': // filler (solid box)
   $is_ellipse = false;
   break;

case 'tl':
   // move center to bottom right
   $cloc = array ( 'x' => $size['x'] - 1, 'y' => $size['y'] - 1 );
   $arcstart = 180;
   break;

case 'tr':
   // move center to bottom left
   $cloc['y'] = $size['y'] - 1;
   $arcstart = 270;
   break;

case 'br':
   // do nothing
   $arcstart = 0;
   break;

case 'bl':
   // move center to top right
   $cloc['x'] = $size['x'] - 1;
   $arcstart = 90;
   break;

default:
   printf( "Invalid type '%s' given", $type );
   $ok_to_draw = false;
   break;
}

/**************
 * Helper func
 **************/
function scaleSize( $size )
{
   return ($size * 2) - 1;
}


// $ok_to_draw is used as a guard so we can check all parameters
// at once (instead of check, reload, check reload) then not draw
// if we found a problem
if ( $ok_to_draw )
{
   // create the image
   $image      = imagecreate( $size['x'], $size['y'] );
   //imageantialias( $image, true );
   // allocate the background color
   imagecolorallocatealpha( $image, 255, 255, 255, 0 );

    
   // filler user a solid box fill, the rest use ellipse
   $icol = imagecolorallocate( $image, $color['red'], $color['green'],
                                 $color['blue'] );

   if ( $type == 'fi' )
   {
      $ok_to_draw = imagefill( $image, 0, 0, $icol );
   }
   else
   {
      $ok_to_draw = imagefilledarc( $image,
                                    $cloc['x'], $cloc['y'],
                                    scaleSize($size['x']), scaleSize($size['y']),
                                    $arcstart, $arcstart + 90,
                                    $icol,
                                    IMG_ARC_PIE );
   }

   if ( $ok_to_draw )
   {
      header("Content-type: image/png");
      imagepng($image);
   }
   else
   {
      print( "Unable to draw image!" );
   }
   
   imagedestroy($image);
}


 ?>