<?php 
/*** 
 * @project Bar Graph Program 
 * @license GPL 
 * @package 
 * @file GrapBar.php 
 * @date 2007-4-3 
 * @version 1.0 
 * @last modified 
  
 * 定義 柱狀圖（柱形圖） 類 
 * 
 * 注意，使用前請(qǐng)確保字體路徑存在并允許訪問(wèn)，如果出錯(cuò)，還要檢查在php.ini配置中的open_basedir項(xiàng)，如果沒(méi)此路徑請(qǐng)?zhí)砑?，或在程序中設(shè)置包含 
 * 
 * 智能化的柱狀圖程序，用于報(bào)表等 
 * 
 ***/ 
  
define("DEFAULT_FONT_PATH", "c:/windows/fonts/simhei.ttf"); 
class SingleBar 
{ 
 private $_x; 
 private $_y; 
 private $_h; 
 public $_l = 50; 
 private $_w = null; 
 private $_srcPoints = array(); 
 private $_points = array(); 
  
 public function __construct($x, $y, $h, $l = 50, $w = null) 
 { 
 $this->_x = $x; 
 $this->_y = $y; 
 $this->_h = $h; 
 $this->_l = $l; 
 $this->_w = $w; 
 $this->_srcPoints = $this->getSrcPoints(); 
 $this->_points = $this->getPoints(); 
 } 
  
 public function getSrcPoints() 
 { 
 return array( 
  array($this->_x         , $this->_y), 
  array($this->_x+$this->_l    , $this->_y), 
  array($this->_x+(1.35*$this->_l), $this->_y-(0.35*$this->_l)), 
  array($this->_x+(0.35*$this->_l), $this->_y-(0.35*$this->_l)), 
  array($this->_x         , $this->_y+$this->_h), 
  array($this->_x+$this->_l    , $this->_y+$this->_h), 
  array($this->_x+(1.35*$this->_l), $this->_y+$this->_h-(0.35*$this->_l)) 
 ); 
 } 
  
 public function getPoints() 
 { 
 $points = array(); 
 foreach($this->_srcPoints as $key => $val) 
 { 
  $points[] = $val[0]; 
  $points[] = $val[1]; 
 } 
 return $points; 
 } 
  
 public function getTopPoints() 
 { 
 return array_slice($this->_points, 0, 8); //頂坐標(biāo) 
 } 
  
 public function getBelowPoints() 
 { 
 return array_merge(array_slice($this->_points, 0, 2), array_slice($this->_points, 8, 4), array_slice($this->_points, 2, 2)); //下坐標(biāo) 
 } 
  
 public function getRightSidePoints() 
 { 
 return array_merge(array_slice($this->_points, 2, 2), array_slice($this->_points, 10, 4), array_slice($this->_points, 4, 2)); //右側(cè)坐標(biāo) 
 } 
  
 public function draw($image, $topColor, $belowColor, $sideColor, $borderColor = null, $type = 'LEFT') 
 { 
 if (is_null($borderColor)) 
 { 
  $borderColor = 0xcccccc; 
 } 
   
 $top_rgb = $this->getRGB($topColor); 
 $below_rgb = $this->getRGB($belowColor); 
 $side_rgb = $this->getRGB($sideColor); 
 $top_color = imagecolorallocate($image, $top_rgb['R'], $top_rgb['G'], $top_rgb['B']); 
 $below_color = imagecolorallocate($image, $below_rgb['R'], $below_rgb['G'], $below_rgb['B']); 
 $side_color = imagecolorallocate($image, $side_rgb['R'], $side_rgb['G'], $side_rgb['B']); 
   
 imagefilledpolygon($image, $this->getTopPoints(), 4, $top_color); //畫(huà)頂面 
 imagepolygon($image, $this->getTopPoints(), 4, $borderColor); //畫(huà)頂面邊線 
   
 imagefilledpolygon($image, $this->getBelowPoints(), 4, $below_color); //畫(huà)下面 
 imagepolygon($image, $this->getBelowPoints(), 4, $borderColor); //畫(huà)下面邊線 
   
 if ($type == 'LEFT') 
 { 
  imagefilledpolygon($image, $this->getRightSidePoints(), 4, $side_color); //畫(huà)右側(cè)面 
  imagepolygon($image, $this->getRightSidePoints(), 4, $borderColor); //畫(huà)側(cè)面邊線 
 }  
 } 
  
 public function getRGB($color) 
 { 
 $ar = array(); 
 $color = hexdec($color); 
 $ar['R'] = ($color>>16) & 0xff; 
 $ar['G'] = ($color>>8) & 0xff; 
 $ar['B'] = ($color) & 0xff; 
 return $ar; 
 } 
} 
  
class Bar 
{ 
 private $_W; 
 private $_H; 
 private $_bgColor = "ffffff"; 
 private $_barHeights = array(); 
 private $_barTexts = array(); 
 private $_barColors = array(); 
 public $_title; 
 public $_paddingTop = 30; 
 public $_paddingBottom = 100; 
 public $_paddingLeft = 45; 
 public $_paddingRight = 2; 
 public $_barL = 50; 
 public $image; 
  
 public function __construct($imgW, $imgH, $barHeights, $barTexts = null, $barColors = null) 
 { 
 $this->_W = $imgW; 
 $this->_H = $imgH; 
 $this->_barHeights = $barHeights; 
 $this->_barTexts  = $barTexts; 
 $this->_barColors = $barColors; 
 $this->_paddingBottom = $this->resetPaddingBottom(); 
 $this->_H = $this->resetHeight(); 
 $this->image = imagecreatetruecolor($this->_W, $this->_H); 
 } 
  
 public function stroke() 
 { 
 $this->drawBg(); 
 $this->drawBars(); 
 $this->drawTitle(); 
 $this->drawLables(); 
 ob_start(); 
 //header("Content-type: image/png"); 
 //imagepng($this->image); 
 header("Content-type: " . image_type_to_mime_type(IMAGETYPE_JPEG)); 
    imagejpeg($this->image); 
 imagedestroy($this->image); 
 } 
  
 public function drawBg() 
 { 
 $img_w = $this->_W; 
 $img_h = $this->_H; 
 $paddingTop  = $this->_paddingTop; 
 $paddingBottom = $this->_paddingBottom; 
 $paddingLeft  = $this->_paddingLeft; 
 $paddingRight = $this->_paddingRight; 
 $rgb = $this->getRGB($this->_bgColor); 
 $bg = imagecolorallocate($this->image,$rgb['R'], $rgb['G'], $rgb['B']); 
 imagefilledrectangle($this->image, 0, 0, $img_w, $img_h, $bg); 
 $side_bg = imagecolorallocatealpha($this->image, 220, 220, 220, 75); 
 $side_bg2 = imagecolorallocate($this->image, 220, 220, 220); 
 $border_color = imagecolorallocate($this->image, 190, 190, 190); 
 $line_color = imagecolorallocate($this->image, 236, 236, 236); 
 $dial_color = imagecolorallocate($this->image, 131, 131, 131); 
   
 $x1 = $paddingLeft; 
 $y1 = $paddingTop; 
 $x2 = $img_w - $paddingRight; 
 $y2 = $img_h - $paddingBottom; 
 imagerectangle($this->image, $x1, $y1, $x2, $y2, $border_color); 
 imagefilledpolygon($this->image, array($x1-5,$y1+10, $x1-5,$y2+10, $x1,$y2, $x1,$y1), 4, $side_bg); 
    imagepolygon($this->image, array($x1-5,$y1+10, $x1-5,$y2+10, $x1,$y2, $x1,$y1), 4, $border_color); 
 imagefilledpolygon($this->image, array($x1-5,$y2+10, $x2-5,$y2+10, $x2,$y2, $x1,$y2), 4, $side_bg); 
    imagepolygon($this->image, array($x1-5,$y2+10, $x2-5,$y2+10, $x2,$y2, $x1,$y2), 4, $border_color); 
 imageline($this->image, $x1, $y2, $x2, $y2, $side_bg2); 
   
 $total_h = $img_h - $paddingTop - $paddingBottom; 
 $every_h = $total_h/11; 
 for($i=1; $i<=10; $i++) 
 { 
  imageline($this->image, $x1, $y1+($every_h*$i), $x2, $y1+($every_h*$i), $line_color); //畫(huà)網(wǎng)線 
 } 
   
 $max_h = max($this->_barHeights); 
 for($i=1; $i<=10; $i++) 
 { 
  $value = $max_h - (($max_h/10)*($i-1)); 
  $value = strval($value); 
  $str_w = strlen($value)*5; 
  imageline($this->image, $x1-5-3, $y1+10+($every_h*$i), $x1-3+1, $y1+10+($every_h*$i), $dial_color); //畫(huà)刻度線 
  imagestring($this->image, 3, $x1-5-3-$str_w-1, $y1+10+($every_h*$i)-5, $value, 0x000000); 
 } 
 } 
  
  
 public function drawBars() 
 { 
 $counts = count($this->_barHeights); 
 if (empty($this->_barColors)) 
 { 
  $color = $this->setColor(); 
  $this->_barColors = array_slice($color, 0, $counts); 
  //shuffle($this->_barColors); 
 } 
 $every_w = ($this->_W - $this->_paddingLeft - $this->_paddingRight)/$counts; //每一段寬 
 $barL = $every_w; 
 $barL = ($barL > $this->_barL*1.35+6) ? $this->_barL : $barL/1.35 - 6; 
 $max_h = max($this->_barHeights); 
 $ruler_h = $this->_H - $this->_paddingTop - $this->_paddingBottom; //標(biāo)尺總高度 
 $stander_h = $ruler_h - ($ruler_h/11); //標(biāo)尺10等分的高度 
 $i = 0; 
 foreach ($this->_barHeights as $val) 
 { 
  $h = ($stander_h/$max_h)*$val; 
  $x = $this->_paddingLeft + ($every_w*$i) + (($every_w - ($barL*1.35))/2);; 
  $y = $this->_H - $this->_paddingBottom + 10 - $h; 
  //$t_color = $this->_barColors[$i]; 
  $b_color = $this->_barColors[$i]; 
  //$s_color = $this->_barColors[$i]; 
  
   
  $rgb = $this->getRGB($this->_barColors[$i]); 
  $R = $rgb['R'] * 0.7; 
  $G = $rgb['G'] * 0.7; 
  $B = $rgb['B'] * 0.7; 
   
  $c1 = $R > 0 ? dechex($R) : '00'; 
  $c2 = $G > 0 ? dechex($G) : '00'; 
  $c3 = $B > 0 ? dechex($B) : '00'; 
  
  $t_color = $b_color; 
  $s_color = $c1. $c2 . $c3; 
  
  $SingleBar = new SingleBar($x, $y, $h, $barL); 
  $SingleBar->draw($this->image, $t_color, $b_color, $s_color); 
  $i++; 
 } 
 } 
  
 public function drawTitle() 
 { 
 if (empty($this->_title)) 
 { 
  return; 
 } 
 $font = 5; 
 $font_w = imagefontwidth($font); 
 $len = strlen($this->_title); 
 $x = ($this->_W + $this->_paddingLeft - $this->_paddingRight)/2; 
 $x -= ($len*$font_w)/2; 
 $y = ($this->_paddingTop - $font_w)/2 + 12; 
 //imagestring($this->image, $font, $x, $y, $title, 0x000000); 
 imagettftext($this->image, 12, 0, $x, $y, 0x000000, DEFAULT_FONT_PATH, $this->_title); 
 } 
  
 public function drawLables() 
 { 
 $x1 = $this->_paddingLeft - 5; 
 $y1 = $this->_H - $this->_paddingBottom + 20; 
 $x2 = $this->_W - $this->_paddingRight; 
 $y2 = $this->_H - 10; 
 //imagefilledrectangle($this->image, $x1, $y1, $x2, $y2, 0xffffff); 
 imagerectangle($this->image, $x1, $y1, $x2, $y2, 0x000000); 
 $space = 5; 
 $x = $x1 + 3; 
 $y = $y1 + 3; 
 foreach ($this->_barTexts as $key => $val) 
 { 
  $color = $this->_barColors[$key]; 
  $rgb = $this->getRGB($color); 
  $bg = imagecolorallocate($this->image,$rgb['R'], $rgb['G'], $rgb['B']); 
  imagefilledrectangle($this->image, $x, $y, $x+12, $y+12, $bg); //繪12*12的矩形 
     imagerectangle($this->image, $x, $y, $x+12, $y+12, 0x000000); //繪12*12的矩形框 
  imagettftext($this->image, 12, 0, $x+12+3, $y+12, 0x000000, DEFAULT_FONT_PATH, $val); 
  $x += 12 + $space + (strlen($val)*8) + $space; 
  if ($x + (strlen($val)*8) >= $this->_W - $this->_paddingLeft - $this->_paddingRight) 
  { 
  $x = $x1 + 3; 
  $y = $y + 12 + 3; 
  } 
 } 
 } 
  
 public function resetPaddingBottom() 
 { 
 $ruler_w = $this->_W - $this->_paddingLeft - $this->_paddingRight; 
 $label_w = $this->getLableTotalWidth(); 
 $lines = ceil($label_w / $ruler_w); 
 $h = 12 * $lines + (3 * ($lines + 1)) + 30; 
 return $h; 
 } 
  
 public function resetHeight() 
 { 
 $padding_bottom = $this->resetPaddingBottom(); 
 if ($this->_H - $padding_bottom < 222) 
 { 
  return 222 + $padding_bottom; 
 } 
 return $this->_H; 
 } 
  
  
 public function getLableTotalWidth() 
 { 
 $counts = count($this->_barTexts); 
 $space = 5; 
 $total_len = 0; 
 foreach ($this->_barTexts as $val) 
 { 
  $total_len += strlen($val); 
 } 
   
 $tx_w = ($total_len * 9) + ((12 + 3 + $space) * $counts); 
 return $tx_w; 
 } 
  
 public function setBg($color) 
 { 
 $this->_bgColor = $color; 
 } 
  
 public function setTitle($title) 
 { 
 $this->_title = $title; 
 } 
  
 public function setColor() 
 { 
 $ar = array('ff', '00', '33', '66', '99', 'cc'); 
 $color = array(); 
 for ($i=0; $i<6; $i++) 
 { 
  for ($j=0; $j<6; $j++) 
  { 
  for($k=0; $k<6; $k++) 
  { 
   $color[] = $ar[$i] . $ar[$j] . $ar[$k]; 
  } 
  } 
 } 
   
 $color2 = array(); 
 for ($i=1; $i<216; $i += 4) 
 { 
  $color2[] = $color[$i]; 
 } 
  
 return $color2; 
 } 
  
 public function getRGB($color) 
 { 
 $ar = array(); 
 $color = hexdec($color); 
 $ar['R'] = ($color>>16) & 0xff; 
 $ar['G'] = ($color>>8) & 0xff; 
 $ar['B'] = ($color) & 0xff; 
 return $ar; 
 } 
} 
  
/***/ 
$bar = new Bar(500, 300, array(600, 300, 30, 500, 400, 250, 350, 360), array('AAAAA', 'BBBBB', 'CCCCC', 'DDDDD', 'EEEEEE', 'FFFFFF', 'GGGGGGG', 'HHHHHHHHH')); 
$bar->setTitle('打造完美柱狀圖!'); 
$bar->stroke(); 
/***/ 
?>