<?php

/* Generates and outputs a custom signature graphic, with overlaid real-time player statistics
 * Uses multi-level caching system for optimized performance
 * Uses PHP's GD graphics library
 */

require_once( 'Error.inc.php' );
require_once( 'Database.class.php' );
require_once( 'Util.class.php' );
require_once( 'Template.class.php' );
require_once( 'Tracker.class.php' );
require_once( 'php/Image.class.php' );

require_once( 'php/get_games.php' );
require_once( 'php/get_armyrank.php' );
require_once( 'php/grades.php' );
require_once( 'php/banners.php' );
require_once( 'php/player.php' );

$_USE_FULL_CACHING = true;  // "full" caching is the finished image
$_USE_BANNER_CACHING = true;  // use caching for resized & bevelled images
$_USE_BADGE_CACHING = true; // use caching for resized rank badges

$MINI = array_key_exists( 'mini', $_GET );

//* settings
    $_WIDTH = 500;
    $_HEIGHT = 75;

    $_RANK_MAX_WIDTH = 70;
    $_RANK_MAX_HEIGHT = 70;

    $_PADDING = 4;

    $_NAME_SIZE = 15;
    $_TEXT_SIZE = 10;
//*/

$_INSET_BEVEL = 4;

if( $MINI )
{

//*
    $_WIDTH = 300;
    $_HEIGHT = 46;

    $_RANK_MAX_WIDTH = 42;
    $_RANK_MAX_HEIGHT = 42;

    $_PADDING = 2;
	$_INSET_BEVEL = 2;

    $_NAME_SIZE = 13;
    $_TEXT_SIZE = 8;
//*/


}

if ( !array_key_exists( 'id', $_GET ) )
	die( 'Invalid ID' );

$img = false;

if ( array_key_exists( 'img', $_GET ) )
	$img = $_GET['img'];

$outline = array_key_exists( 'outline', $_GET ) ? 1 : 0;
$box = array_key_exists( 'box', $_GET ) ? 1 : 0;
$test = array_key_exists( 'test', $_GET ) ? 1 : 0;

$rnd = ( $img == 'rnd' );

// Grab player statistics
$pid = $_GET['id'];
$stats = get_player_stats( $pid );

if( !$stats )
	die( "Player ID: $pid does not exist." );


// Convert player name from Windows character set CP1252 to unicode
//$stats['name'] = iconv( "CP1252", "UTF-8", $stats['name'] );
$stats['name'] = iconv( "ISO-8859-1", "UTF-8", $stats['name'] );


// Load the background image
if ( $rnd )
{
	$banner = getBannerPathForPrefix( '' );
}
else
{
	$banner = getNamedBannerPath( $img );
}

// font initialization
$font_dir = '/usr/local/php/lib/fonts/truetype/';
$font = $font_dir . 'arial.ttf';
$header_font = $font_dir . 'arialb.ttf';
if( isset( $_GET['font'] ) )
{
    $user_font = $font_dir . $_GET['font'] . '.ttf';
    if( file_exists( $user_font ) )
        $header_font = $user_font;
}

// We have a valid banner
if ( $banner )
{
	// Signature cache handling
    $signature_hash = md5( $_GET['id'] . $stats['player_rating'] . $banner . filesize( $banner ) . 
		basename( $header_font ) . $stats['current_server_id'] . ( $MINI ? 'MINI' : '' ) );
    $signature_cache_file = "signature/$signature_hash.png";

    if ( $_USE_FULL_CACHING && file_exists( $signature_cache_file ) && ( time() - filemtime( $signature_cache_file ) < 3600 ) )
    {
        header( 'Content-type: image/png' );
        readfile( $signature_cache_file );
        exit;
    }

	// Banner cache handling
	$banner_hash = md5( $banner . filesize( $banner ) . ( $MINI ? 'MINI' : '' ) );
	$banner_cache_file = "signature/banner/$banner_hash.png";

	if( $_USE_BANNER_CACHING && file_exists( $banner_cache_file ) )
	{
		$im = imagecreatefrompng( $banner_cache_file );
	}
	else
	{
		// Load image
		$src_image = imagecreatefromjpeg( $banner );
	
		// Resize image
		$im = imagecreatetruecolor( $_WIDTH, $_HEIGHT );
		imagecopyresampled( $im, $src_image, 0, 0, 0, 0, $_WIDTH, $_HEIGHT, imagesx( $src_image ), imagesy( $src_image ) );

	    // Add bevel and round edges
    	Image::bevel( $im, 4, 'FFFFFF','000000' );
    	Image::round_edges( $im, 4, 'FF00FF', 0 );

		if( $_USE_BANNER_CACHING )
    	// Save the prepared background image to disk for later use (cache it)
    	imagepng( $im, $banner_cache_file );
	}
}

// No banner found. Display error
else
{
	$banner_cache_file = "signature/banner/invalid.png";
	$im = imagecreate( $_WIDTH, $_HEIGHT );
	imagecolorallocate( $im, 255, 255, 255 );
	imagestring( $im, 3, 400, 10, 'Invalid Background!', imagecolorallocate( $im, 0, 0, 0 ) );	
}

$rank_width = 0;

// get army insignia and best fit it to desired region
$path = "images/rank/badge/" . $stats[ "army_rank_image" ];

if( file_exists( $path ) )
{

	//*
	// look for cached version
	$badge_hash = md5( $path . filesize( $path ) . ( $MINI ? 'MINI' : '' ) );
	$badge_cache_file = "signature/badge/$badge_hash.png";

	if( $_USE_BADGE_CACHING & file_exists( $badge_cache_file ) )
	{
		// load
		$badge = imagecreatefrompng( $badge_cache_file );
	}
	else
	{
		// load full size
		$src = imagecreatefromgif( $path );
	
		// calc new size
	    $src_x = imagesx( $src );
	    $src_y = imagesy( $src );
	   	$aspect = $src_x / $src_y;
	
	    $max_x = $_RANK_MAX_WIDTH;
	    $max_y = $_RANK_MAX_HEIGHT;
	    $target_aspect = $max_x / $max_y;
	
	    if( $aspect < $target_aspect ) // narrow image, size to max y
	    {
	        $new_y = min( $src_y, $max_y );
	        $new_x = ( $new_y / $src_y ) * $src_x;
	    }
	    else  // wide image, size to max x
	    {
	        $new_x = min( $src_x, $max_x );
	        $new_y = ( $new_x / $src_x ) * $src_y;
	    }

		// create dest
		$badge = imagecreatetruecolor( $new_x, $new_y );
			
		// turn OFF alpha blending, to overwrite opaque black background with full alpha info from source img
		imagealphablending( $badge, false );
	
		// turn ON alpha saving, to save full alpha info to disk
		imagesavealpha( $badge, true );

		// resample source onto new badge image
		imagecopyresampled( $badge, $src, 0, 0, 0, 0, $new_x, $new_y, imagesx( $src ), imagesy( $src ) );

		// save resampled to disk
		if( $_USE_BADGE_CACHING )
			imagepng( $badge, $badge_cache_file );
	}

	// apply badge to image
	imagecopy( $im, $badge, 5, (imagesy($im)-imagesy($badge))/2, 0, 0, imagesx( $badge ), imagesy( $badge ) );

	$rank_width = imagesx($badge) + 3;
}


// create time-played string (H:MM)
$time = $stats['total_time'];
$playtimeStr = ( (int)( $time / 60 ) ) . ':';
$mins = ( $time % 60 );
if( $mins < 10 ) $mins = '0' . $mins;
$playtimeStr .= $mins;

// define text settings
$x = 9;
$y = 19;
$dark = '000000';
$light = 'ffffff';
$offset = 1; // for shadow and outline distance

// add text ////////////

$lines = array();

if( $stats['rank'] > 0 )
	$lines[] = ( $MINI ? '' : 'Rated ' ) . Util::ordinal( $stats['rank'] ) . ' / ' . number_format( $stats['total_ranked'] ) .
		' (Top ' . $stats['rank_percent'] . '%)';

$lines[] = 'K/D ' . round( $stats['kdr'], 1 ) . ' - Time ' . $playtimeStr;


if( $MINI )
	$lines[] = $_SERVER['HTTP_HOST'];

insetTextbox( $_WIDTH - $_PADDING, $_PADDING, $lines, 1, $_INSET_BEVEL, 0, $_TEXT_SIZE, $_TEXT_SIZE );


// name, rank
$lines = array();
$lines[] = $stats['name'];
if( !$MINI ) $lines[] = $stats['army_rank_title'] . ' [' . ucwords( $stats['grade_name'] ) . ']';

// Put all statistics in a box with inset borders
if( $MINI )
    insetTextbox( $_PADDING + $rank_width, $_PADDING, $lines, 0, $_INSET_BEVEL, 0, $_NAME_SIZE, $_NAME_SIZE, true );
else
    insetTextbox( $_PADDING + $rank_width, $_PADDING, $lines, 0, $_INSET_BEVEL, 0, $_TEXT_SIZE, $_NAME_SIZE, true );


// last seen
if( $stats['current_server_id'] == 0 )
{
	$line = "Last On: ";
	$line .= date( "M j", $stats['last_seen'] );
}
else
{  // online now
	$line = ( $MINI ? "ON: " : "ONLINE: " );
	$line .= iconv( "ISO-8859-1", "UTF-8", ( $MINI ? substr( $stats['servername'], 0, 20 ) . '...' : $stats['servername'] ) );
}
insetTextline( $_PADDING + $rank_width, $_HEIGHT - $_PADDING, $line, 2 );


// figure out width of hostname
//$bounds = imagettfbbox( $size, 0, $font, $_SERVER['HTTP_HOST'] );
if( !$MINI )
	insetTextline( $_WIDTH - $_PADDING, $_HEIGHT - $_PADDING, $_SERVER['HTTP_HOST'], 3, $_INSET_BEVEL );


// Draw host name
//drawText( $_SERVER['HTTP_HOST'], 583 - $bounds[2], 82 );

// Define the transparent color
imagecolortransparent( $im, imagecolorallocate( $im, 255, 0, 255 ) );

// Convert to 8-bit / 256 colors
imagetruecolortopalette( $im, true, 256 );

// Save the prepared signature image to disk for later use (cache)
//   Don't bother caching if the "random" flag is set.
// also don't cache if rank is zero, this means tracker is down
if ( !$rnd && $stats['rank']!=0 && isset( $signature_cache_file ) )
	imagepng( $im, $signature_cache_file );

// finally, output the image
header( 'Content-type: image/png' );
imagepng( $im );
imagedestroy( $im );


// functions //////////////////////////////////////////

// draw text in given font and size, at given co-ordinates
function drawText( $text, $font, $size, $x, $y )
{
	global $outline;
	global $im, $offset, $light, $dark;

	if( $outline )
		Image::draw_outlined_text( $im, $font, $text, $x, $y, $size, $light, $dark, $offset );
	else
		Image::draw_shadowed_text( $im, $font, $text, $x, $y, $size, $light, $dark, $offset );
}

// anchor refers to the corner of the text inset that x,y refers to.
// 0=TL, 1=TR, 2=BL, 3=BR
function insetTextline( $x, $y, $line, $anchor=0, $right_aligned=false, $bevel=0, $padding=0 )
{
	global $_INSET_BEVEL;
	if( $bevel == 0 ) $bevel = $_INSET_BEVEL;
	$arr = array( 0 => $line );
	insetTextbox( $x, $y, $arr, $anchor, $bevel, $padding );
}

// draw multi-line text, in an inset-bevelled box
function insetTextbox( $x, $y, $lineArray, $anchor=0, $bevel=0, $padding=0, $size=0, $header_size=0, $header=false )
{
	global $line_spacing, $im, $font, $header_font, $offset;

	global $_TEXT_SIZE, $_NAME_SIZE, $_INSET_BEVEL;

	if( $size == 0 ) $size = $_TEXT_SIZE;
	if( $header_size == 0 ) $header_size = $_NAME_SIZE;
	if( $bevel == 0 ) $bevel = $_INSET_BEVEL;

	$right_aligned = ( $anchor == 1 || $anchor == 3 );
	$bottom_aligned = ( $anchor == 2 || $anchor == 3 );

	$multi = sizeof( $lineArray ) > 1;

	// Determine widest bounding box and calculate height
	$width = 0;
	$bounds = 0;
	$height = 2*( $bevel + $padding );

	$xc = -1;
	$yc = -1;
	$line_pad = 1;

	$widths = array();
	$heights = array();
	$trailers = array();

	for( $i = 0; $i < count( $lineArray ); $i++ )
	{
		if( ( $header && $i == 0 ) )
			$bounds = imageftbbox( $header_size, 0, $header_font, $lineArray[0] );
		else
			$bounds = imageftbbox( $size, 0, $font, $lineArray[$i] );

		$widths[] = $bounds[2];
		$heights[] = $bounds[3]-$bounds[5]+$offset;
		$trailers[] = $bounds[3];
		if ( $bounds[2] > $width )
		{
			$width = $bounds[2];
		}
		$height += $heights[$i];
	}
	$height += ( ( count( $lineArray ) -1 ) * $line_pad );

	$widest_line = $width;
	$width += ( 2*( $padding + $bevel ) )+1;

	// now, correct co-ordinates based on anchor
	if( $right_aligned ) $x = $x - $width;
	if( $bottom_aligned ) $y = $y - $height;

	// Create alpha blended overlay to paint text on
	$overlay = imagecreate( $width, $height );
	imagecolorallocate( $overlay, 127, 127, 127 );
	Image::bevel( $overlay, $bevel, '000000', 'ffffff' );
	Image::merge( $im, $overlay, $x, $y, 40, '000000' );

	// Draw all text
	$cy = $y + $yc + $bevel + $padding;
	$text_x = $x + $xc + $bevel + $padding;
	for( $i = 0; $i < count( $lineArray ); $i++ )
	{
		$cy += $heights[$i]-$trailers[$i];
		$line_offset = ( $right_aligned & ( $widths[$i] < $widest_line ) ? ( $widest_line - $widths[$i] ) : 0 );

		if( $header & $i == 0 )
			drawText( $lineArray[0], $header_font, $header_size, $text_x + $line_offset, $cy );
		else
			drawText( $lineArray[$i], $font, $size, $text_x + $line_offset, $cy );

		$cy += $line_pad + $trailers[$i];
	}
}


?>