<?
/* 
 * File:
 *
 *  show_image.php
 *
 * Concept:
 *
 *  This PHP script is intended to serve image files from the people table of
 *  imagedb when called with URLs like these:
 *
 *    show_image.php?csename=rose
 *    show_image.php?uwname=rose
 *    show_image.php?fname=Scott&lname=Rose
 *    show_image.php?id=15
 *    show_image.php?csename=rose&thumb=1
 *    show_image.php?message=string
 *
 *  To do that, it runs a query to get the corresponding id, then opens the
 *  image file and emits the data. If if fails, it emits an error graphic.
 *
 *  This is a port of show_image.cgi to PHP4, which we did for the purpose
 *  of getting the persistant database connection functionality of PHP4. That's
 *  needed for the class enrollment list tool, which might ask for fifty images
 *  in one go.
 *
 * Author:
 *
 *  Scott Rose, rose@cs.washington.edu, 9 Feb 2001
 *
 *  $Id: show_image.php,v 1.4 2013/05/06 13:49:20 rose Exp $
 */

if(strlen($message)) {

  /* There will be no SQL query because we are just going to generate a graphic
   * with a string in it. */

  error($message);
}

$dbname = (strstr($REQUEST_URI, 'tshow')) ? 'timagedb' : 'imagedb';
$idir = (strstr($REQUEST_URI, 'tshow')) 
   ? '/var/u0/rose/www/images/community'
   : '/www/htdocs/images/community';

if(strlen($thumb)) {
    $field = 'thumbnail';
} else {
    $field = 'photo';
}

/* Build an SQL query. */

$query = '';
if(strlen($csename)) {
  if(strlen($query)) {
    $query .= ' and ';
  }
  $query .= "csename = '$csename'";
}
if(strlen($uwname)) {
  if(strlen($query)) {
    $query .= ' and ';
  }
  $query .= "uwname = '$uwname'";
}
if(strlen($id)) {
  if(strlen($query)) {
    $query .= ' and ';
  }
  $query .= "id = '$id'";
}
if(strlen($fname)) {
  $fname = strtolower($fname);
  if(strlen($query)) {
    $query .= ' and ';
  }
  $query .= "lower(fname) = '$fname'";
}
if(strlen($lname)) {
  $lname = strtolower($lname);
  if(strlen($query)) {
    $query .= ' and ';
  }
  $query .= "lower(lname) = '$lname'";
}
if(! strlen($query)) {
  error('Bogus URL.');
}

/* Connect to the database. */

if(!($dbh = pg_pconnect("dbname=$dbname user=rose password=doggy"))) {
  error('pg_pconnect failed');
}

/* Execute the query. */

if(!($result = pg_exec($dbh, "select * from people where $query"))) {
  error('pg_exec: ' . pg_ErrorMessage($dbh));
}

/* We expect precisely one row in the result set. */

if(pg_numrows($result) <= 0) {
  error('No match on:', $query);
} elseif(pg_numrows($result) > 1) {
  error('Multiple matches on:', $query);
}

/* Fetch the result as an object. */

$esta = pg_fetch_object($result, 0);
if(! $esta) {
  error('pg_fetch_object: ' . pg_ErrorMessage($dbh));
}
pg_close($dbh);

$file = $idir . '/' . 
	(($field == 'thumbnail') ? 'th' : '') .
	$esta->id . '.jpg';

if(!file_exists($file)) {
  error('No photo:', $query);
}
if(!($fd = fopen($file, 'r'))) {
  error('file open failed');
}

/* We expect to succeed now. Emit the MIME type. */

header('Content-type: image/jpeg');

/* Emit the image data. */

$content = fread($fd, filesize($file));
echo($content);

/* Close up shop. */

exit;


/* error()
 *
 *  Emit an error graphic in GIF format.
 */

function error() 
{
  $msg = func_get_arg(0);
  $detail = (func_num_args() >= 2) ? func_get_arg(1) : '';
  global $thumb;

  if(strlen($thumb)) {
    $width = 100;
    $height = 150;
    $size = 9;
    $size2 = 6;
    $x = 2;
    $y = 12;
    $x2 = 4;
    $y2 = 22;
  } else {
    $width = 300;
    $height = 450;
    $size = 20;
    $size2 = 15;
    $x = 15;
    $y = 35;
    $x2 = 24;
    $y2 = 55;
  }
  $im = ImageCreate($width, $height);
  $backgroundColor = ImageColorAllocate($im, 204, 204, 255);
  $textColor = ImageColorAllocate($im, 0, 0, 51);
  /* (image, size, angle, x, y, color, font, message) */
  ImageTTFText($im, $size, 0, $x, $y, $textColor, 'verdana.ttf', 
               $msg);
  if(strlen($detail)) {
    ImageTTFText($im, $size, 0, $x2, $y2, $textColor, 'verdana.ttf', 
                 $detail);
  }
  header('Content-type: image/gif');
  ImageGif($im);
  exit;
    
} /* end error() */