mirror of
https://github.com/seigler/neat-charts
synced 2025-07-27 01:16:09 +00:00
removed subfolder, use last_modified_time
This commit is contained in:
Joshua Seigler
parent
d7716f6e80
commit
0c8c06fdd2
6 changed files with 195 additions and 722 deletions
2
Util.php
2
Util.php
|
|
@ -35,4 +35,6 @@ class Util {
|
||||||
}
|
}
|
||||||
return $median;
|
return $median;
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
24
buffer.php
24
buffer.php
|
|
@ -3,6 +3,8 @@
|
||||||
// Based on PHP code by Dennis Pallett: www.phpit.net
|
// Based on PHP code by Dennis Pallett: www.phpit.net
|
||||||
// Please acknowledge use of this code by including this header.
|
// Please acknowledge use of this code by including this header.
|
||||||
|
|
||||||
|
// Updated to include and use last-modified and etag headers
|
||||||
|
|
||||||
// location and prefix for cache files
|
// location and prefix for cache files
|
||||||
define('CACHE_PATH', "/tmp/cache_");
|
define('CACHE_PATH', "/tmp/cache_");
|
||||||
|
|
||||||
|
|
@ -22,7 +24,20 @@
|
||||||
|
|
||||||
// check that cache file exists and is not too old
|
// check that cache file exists and is not too old
|
||||||
if(!file_exists($file)) return;
|
if(!file_exists($file)) return;
|
||||||
if(filemtime($file) < time() - CACHE_TIME) return;
|
$last_modified_time = filemtime($file);
|
||||||
|
if($last_modified_time < time() - CACHE_TIME) return;
|
||||||
|
$etag = md5_file($file);
|
||||||
|
|
||||||
|
// always send headers
|
||||||
|
header("Last-Modified: ".gmdate("D, d M Y H:i:s", $last_modified_time)." GMT");
|
||||||
|
header("Etag: $etag");
|
||||||
|
|
||||||
|
// exit if not modified
|
||||||
|
if (@strtotime($_SERVER['HTTP_IF_MODIFIED_SINCE']) == $last_modified_time ||
|
||||||
|
@trim($_SERVER['HTTP_IF_NONE_MATCH']) == $etag) {
|
||||||
|
header("HTTP/1.1 304 Not Modified");
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
// if so, display cache file and stop processing
|
// if so, display cache file and stop processing
|
||||||
readfile($file);
|
readfile($file);
|
||||||
|
|
@ -36,6 +51,13 @@
|
||||||
fwrite($f, $content);
|
fwrite($f, $content);
|
||||||
fclose($f);
|
fclose($f);
|
||||||
}
|
}
|
||||||
|
$last_modified_time = filemtime($file);
|
||||||
|
$etag = md5_file($file);
|
||||||
|
|
||||||
|
// always send headers
|
||||||
|
header("Last-Modified: ".gmdate("D, d M Y H:i:s", $last_modified_time)." GMT");
|
||||||
|
header("Etag: $etag");
|
||||||
|
|
||||||
return $content;
|
return $content;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
676
cms_chart.php
676
cms_chart.php
|
|
@ -1,676 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* Method 1 - you can call this file directly to display chart eg.
|
|
||||||
* chart.php?data=X,Y;Jan,10;Feb,15;Mar,20;Apr,25;May,30&valShow=1
|
|
||||||
* chart.php?data=Serial,X,Y;SIDU,Jan,10;SIDU,Feb,20;BSB,Jan,15;BSB,Feb,25
|
|
||||||
if (isset($_GET['data'])) {
|
|
||||||
$init = $_GET;
|
|
||||||
unset($init['data']);
|
|
||||||
if (!isset($init['fmt'])) $init['fmt'] = 'str';
|
|
||||||
if (!isset($init['css'])) $init['css'] = 1;
|
|
||||||
// you can add ip or referrer limit here ...
|
|
||||||
//if ($_SERVER['REMOTE_ADDR'] <> '1.2.3.4') exit;
|
|
||||||
//if ($_SERVER['HTTP_REFERER'] <> 'topnew.net') exit; // etc
|
|
||||||
cms_chart($_GET['data'], $init);
|
|
||||||
}
|
|
||||||
**** disabled for security reasons
|
|
||||||
*/
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Topnew CMS Chart v5.5.5 - Released on 2016.05.05
|
|
||||||
* The MIT License (MIT) Copyright (c) 1998-2015, Topnew Geo, topnew.net/chart
|
|
||||||
* Draw an SVG chart (bar, barV, barS, line or pie), responsive to parent box
|
|
||||||
*
|
|
||||||
* Method 2 - include this file and call cms_chart() in your php file
|
|
||||||
*
|
|
||||||
* @param array $data = array() or string -- check cms_chart_data() for details
|
|
||||||
* @param array $init = array() as following:
|
|
||||||
* chart = bar [default], line, pie, barV, barS
|
|
||||||
* w = px of SVG width default 480px. Tip: bigger w will produce fine charts
|
|
||||||
* w = fix : will auto set w according to number of bar/line
|
|
||||||
* h = px of SVG height default 250px. Pie chart will auto set h according to w
|
|
||||||
* gapT, gapR, gapB, gapL = px of gaps on Top, Right, Bottom and Left
|
|
||||||
* title = title of the chart
|
|
||||||
* xTitle = title on axisX
|
|
||||||
* yTitle = title on axisY
|
|
||||||
* titleAlign, xTitleAlign, yTitleAlign = 1 Left 2 Center [default] 3 Right
|
|
||||||
* xSkip = 5 means skip 5 labels between each two
|
|
||||||
* xSkipMax = 50 means skip floor(xNum / 50)
|
|
||||||
* xSkip = -5 when negative it means substr(xKey,-2) % -5 is true eg 5 10 15 ...
|
|
||||||
* legend = T(op), R(ight) [default], B(ottom), 0 none
|
|
||||||
* legendW = px of legend width
|
|
||||||
* yUnit = additional text after axisY label
|
|
||||||
* xFormat, yFormat = php . substr|fm|to or format|decimal|,|. or date|M
|
|
||||||
* xKey = year, month, week, day, hour
|
|
||||||
* xMin, xMax default to data min and max
|
|
||||||
* sort = y (sort on axisY labels, or yVal for only one serial chart)
|
|
||||||
* sort = x (sort on axisX labels), '' default none
|
|
||||||
* color = fffccc,cccfff : add 2 color at front
|
|
||||||
* colorAdd = fffccc,cccfff : add 2 color at end
|
|
||||||
* colorDel = 0,2 : delete color #0 and #2
|
|
||||||
* ySum = 1 : sum up yVal while x moves, default 0
|
|
||||||
* xSum = 8 (substr(xAxis,0,8)) or 5,2 or -2 to call php::substr
|
|
||||||
* pieArc = 0 ~ 360 for pie : start Arc
|
|
||||||
* pieStripe = 0 / 1 for pie
|
|
||||||
* piePct = 0 / 1 for pie to include %
|
|
||||||
* pieDonut = 0 / 1 pie or donut
|
|
||||||
* css = 0 / 1 to cout default chart css style
|
|
||||||
* style = '...' : to include customized css style to over-write default css
|
|
||||||
* fmt = '' sxy xsy sxx xss, str str_***, sql sql_*** please check chart_data()
|
|
||||||
* sepCol = , : data seperator to cut columns for str_*** data
|
|
||||||
* sepRow = ; : data seperator to cut rows for str_*** data
|
|
||||||
* valShow = 0 / 1 : show value
|
|
||||||
* valAngle = -90 ~ 90
|
|
||||||
* xAngle = -90 ~ 90
|
|
||||||
*
|
|
||||||
* TODO: barV with negative values, it is confusing and not displaying correctly
|
|
||||||
* legendW looks like buggy
|
|
||||||
* &init looks horrible -- need redesign
|
|
||||||
* also negative value for pie is ignored
|
|
||||||
* other para tobe added = font fontSize yAxis=2
|
|
||||||
*/
|
|
||||||
function cms_chart(&$data = null, $init = null) {
|
|
||||||
$ceil = array('w', 'h', 'gapT', 'gapR', 'gapB', 'gapL', 'legendW', 'titleAlign', 'xTitleAlign', 'yTitleAlign', 'xSkip', 'xSkipMax', 'xAngle', 'ySum', 'pieArc', 'pieStripe', 'piePct', 'pieDonut', 'css', 'valAngle', 'valShow');
|
|
||||||
$trim = array('chart', 'fmt', 'title', 'legend', 'style', 'sepCol', 'sepRow', 'xTitle', 'yTitle', 'yUnit', 'xFormat', 'yFormat', 'xMin', 'xMax', 'xKey', 'sort', 'xSum');
|
|
||||||
foreach ($ceil as $k) $arr[$k] = isset($init[$k]) ? ceil($init[$k]) : 0;
|
|
||||||
foreach ($trim as $k) $arr[$k] = isset($init[$k]) ? trim($init[$k]) : '';
|
|
||||||
$data = cms_chart_data($data, $arr['fmt'], $arr['sort'], $arr['xKey'], $arr['xMin'], $arr['xMax'], $arr['sepRow'], $arr['sepCol'], $arr['ySum'], 'barS' === $arr['chart']);
|
|
||||||
if (!$data) return;
|
|
||||||
$color = cms_chart_color($init);
|
|
||||||
$init = cms_chart_init($arr, $data, 'fix' === (isset($init['w']) ? $init['w'] : ''));
|
|
||||||
extract($init);
|
|
||||||
$init['color'] = $color;
|
|
||||||
echo "\n" . '<svg viewBox="0 0 '. "$w $h" .'" class="chart" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink= "http://www.w3.org/1999/xlink">';
|
|
||||||
cms_chart_css($css, $style);
|
|
||||||
echo "\n" . ' <rect width="'. $w .'" height="'. $h .'" class="chart-bg"></rect>';
|
|
||||||
echo "\n" . ' <rect x="'. $x1 .'" y="'. $y1 .'" width="'. $x2 .'" height="'. $y2 .'" class="chart-box"></rect>';
|
|
||||||
$is_pie = ('pie' === $chart);
|
|
||||||
if (!$is_pie) {
|
|
||||||
$is_bar = ('bar' === substr($chart, 0, 3));
|
|
||||||
$is_barV = ('barV' === $chart);
|
|
||||||
cms_chart_axisX($data, $x1, $y1, $x2, $y2, $xVal, $xSkip, $xFormat, $is_bar, $xAngle, $yUnit, $yFormat, $color, $mouseInfo);
|
|
||||||
cms_chart_axisY($data, $x1, $y1, $x2, $y2, $yVal, $yUnit, $yFormat, $is_barV);
|
|
||||||
$zoom = $y2 / abs($yVal[0] - end($yVal));
|
|
||||||
$init['xVal'] = $xVal;
|
|
||||||
$init['yVal'] = $yVal;
|
|
||||||
}
|
|
||||||
cms_chart_title($y1, $y2, $w, $title, $titleAlign, $xTitle, $xTitleAlign, $yTitle, $yTitleAlign, $is_pie);
|
|
||||||
if ($is_pie) {
|
|
||||||
$data = reset($data);
|
|
||||||
foreach ($data as $k => $v) {
|
|
||||||
if ($v < 0 || !$v) unset($data[$k]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
cms_chart_legend($data, $color, $legend, $legendW, $x1, $y1, $x2, $y2, $xTitle, $is_pie, $piePct);
|
|
||||||
echo "\n <!-- the chart -->\n" . ' <g transform="translate('. "$x1,$y1" .')">';
|
|
||||||
if ('line' == $chart) cms_chart_line($data, $color, $zoom, $xVal, $yVal[0], $valShow, $valAngle, $yFormat);
|
|
||||||
elseif ('pie' == $chart) cms_chart_pie($data, $color, round($y2 / 2, 5), $pieArc, $pieStripe, $piePct, $pieDonut, $valShow, $yFormat);
|
|
||||||
else cms_chart_bar($data, $color, $zoom, $xVal, $yVal[0], $is_barV, 'barS' === $chart, $valShow, $valAngle, $yFormat);
|
|
||||||
echo "\n </g>";
|
|
||||||
if (!$is_pie) echo $mouseInfo;
|
|
||||||
echo "\n</svg>\n";
|
|
||||||
}
|
|
||||||
/**
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* data fmt = '' || sxy, xsy, xss, sxx (all as array)
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* fmt = '' or sxy (default) : col1 = serial, col2 = xAxis, col3 = yVal
|
|
||||||
* max 3 cols, col4+ will be ignored
|
|
||||||
* eg. select manager,month,count(*) qty from sales group by 1,2
|
|
||||||
* Tom Jan 123
|
|
||||||
* Sam May 234
|
|
||||||
* data = cms_arr(sql,2) dirty or cms_arr(sql,2,1) clean
|
|
||||||
*
|
|
||||||
* fmt = xsy : col1 = xAxis, col2 = serial, col3 = yVal
|
|
||||||
* max 3 cols, col4+ will be ignored
|
|
||||||
* eg. select month,manager,count(*) qty from sales group by 1,2
|
|
||||||
* Jan Tom 123
|
|
||||||
* May Sam 234
|
|
||||||
* data = cms_arr(sql,2) dirty or cms_arr(sql,2,1) clean
|
|
||||||
* -- as a result this data same as xss
|
|
||||||
*
|
|
||||||
* fmt = xss : col1 = xAxis, col2...x = serial, yVal in the grid
|
|
||||||
* eg. select month,count(*) qty,sum(amt) amt from sales group by 1
|
|
||||||
* Jan 123 956 789 ...
|
|
||||||
* Feb 222 933 444 ...
|
|
||||||
* data = cms_arr(sql,1) -- only this need to convert to default sxy
|
|
||||||
*
|
|
||||||
* fmt = sxx : col1 = serial, col2...x = xAxis, yVal in the grid
|
|
||||||
* very rarely when the col name is xAxis
|
|
||||||
* eg. select manager,jan,feb,march from rep_sales
|
|
||||||
* Tom 123 456 789 ...
|
|
||||||
* Sam 222 333 444 ...
|
|
||||||
* data = cms_arr(sql,1) -- data same as default sxy
|
|
||||||
*
|
|
||||||
* when there is only 2 cols, which means only 1 serial
|
|
||||||
* no matter which fmt : col1 = xAxis, col2 = yVal
|
|
||||||
* eg. select month,count(*) qty from sales group by 1
|
|
||||||
* Jan 123
|
|
||||||
* Feb 234
|
|
||||||
* data = cms_row(sql,2) = cms_arr(sql,1,1) or dirty cms_arr(sql,1)
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* as a result, if you can not remember which func to get data, remember this:
|
|
||||||
* data = cms_arr(sql,2) : when fmt got 3 different chars eg xsy sxy
|
|
||||||
* data = cms_arr(sql,1) : when fmt only has 2 different chars eg xss sxx
|
|
||||||
*
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* fmt = str || str_sxy, str_xsy, str_xss, str_sxx (all as string)
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* default sepCol = , sepRow = ;
|
|
||||||
*
|
|
||||||
* str_sxy = 'Staff,month,Qty;Tom,Feb,12;Tom,Mar,34;Sam,Jan,112;...'
|
|
||||||
* str_xsy = 'month,Staff,Qty;Feb,Tom,12;Mar,Tom,34;Jan,Sam,112;...'
|
|
||||||
* str_xss = 'month,Qty,Vol;Feb,22,12;Mar,31,34;May,12,112;...'
|
|
||||||
* str_sxx = 'Staff,Jan,Feb,Mar;Tom,1,2,3;Sam,2,3,4;...'
|
|
||||||
*
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* fmt = sql || sql_sxy, sql_xsy, sql_xss, sql_sxx (all as SQL)
|
|
||||||
* ---------------------------------------------------------------------------
|
|
||||||
* you need cms_arr() and cms_row() etc cms db function plugin to run this
|
|
||||||
*
|
|
||||||
* sql_sxy cms_arr(sql,2) select staff,year,count(*) from sales group by 1,2;
|
|
||||||
* sql_xsy cms_arr(sql,2) select year,staff,count(*) from sales group by 1,2;
|
|
||||||
* sql_xss cms_arr(sql,1) select year,count(*) qty,sum(amt) vol from sales group by 1;
|
|
||||||
* sql_sxx cms_arr(sql,1) select staff,jan,feb,mar from rep_sales;
|
|
||||||
*
|
|
||||||
* if you only have 2 cols in sql, you have to set fmt = sql_sxx or sql_xss!!!
|
|
||||||
* sql_*** cms_arr(sql,1) select a,b from tab -- only 2 cols
|
|
||||||
*/
|
|
||||||
function cms_chart_data($data, $fmt, $sort, $xKey, $xMin, $xMax, $sepRow, $sepCol, $ySum, $is_barS) {
|
|
||||||
$fmt3 = substr($fmt, 0, 3);
|
|
||||||
if ('sql' === $fmt3) {
|
|
||||||
$fmt = substr($fmt, 4);
|
|
||||||
$data = cms_arr($data, ('sxx' === $fmt || 'xss' === $fmt ? 1 : 2));
|
|
||||||
} elseif ('str' === $fmt3) {
|
|
||||||
$fmt = substr($fmt, 4);
|
|
||||||
$data = cms_chart_data_str($data, $fmt, $sepRow, $sepCol);
|
|
||||||
} elseif ('jso' === $fmt3) {
|
|
||||||
$data = json_decode($data, 1);
|
|
||||||
}
|
|
||||||
$num = count($data);
|
|
||||||
if (!$num) return;
|
|
||||||
if (!is_array(reset($data))) {
|
|
||||||
$data = array($data); // only 2 cols
|
|
||||||
$num = 1;
|
|
||||||
} elseif ('xss' === $fmt || 'xsy' === $fmt) {
|
|
||||||
foreach ($data as $x => $arr) {
|
|
||||||
foreach ($arr as $s => $y) $sxy[$s][$x] = $y;
|
|
||||||
}
|
|
||||||
$data = $sxy;
|
|
||||||
}
|
|
||||||
$keys = array(); // x labels
|
|
||||||
foreach ($data as $s => $arr) {
|
|
||||||
foreach ($arr as $x => $y) {
|
|
||||||
if (!in_array($x, $keys)) $keys[] = $x;
|
|
||||||
if (is_array($y)) $data[$s][$x] = reset($y); // clean dirty data
|
|
||||||
}
|
|
||||||
}
|
|
||||||
if (in_array($xKey, array('year','month','week','day','hour'))) {
|
|
||||||
$keys = cms_chart_data_ymdH($xKey, $keys, $xMin, $xMax);
|
|
||||||
} elseif ('x' === $sort) {
|
|
||||||
sort($keys);
|
|
||||||
}
|
|
||||||
if ('y' === $sort && $num > 1) ksort($data);
|
|
||||||
foreach ($data as $k => $arr) {
|
|
||||||
foreach ($keys as $k2) $res[$k][$k2] = isset($arr[$k2]) ? $arr[$k2] + 0 : 0;
|
|
||||||
}
|
|
||||||
if ('y' === $sort && 1 == $num) { // if pie make sure only 1 array
|
|
||||||
$pie = reset($res);
|
|
||||||
arsort($pie);
|
|
||||||
$res = array($pie);
|
|
||||||
}
|
|
||||||
if ($ySum) {
|
|
||||||
foreach ($res as $k => $arr) {
|
|
||||||
$j = $hold = 0;
|
|
||||||
foreach ($arr as $k2 => $v) {
|
|
||||||
if ($j++) $res[$k][$k2] += $hold;
|
|
||||||
$hold += $v;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
if ($is_barS) {
|
|
||||||
foreach ($res as $k => $arr) $sortS[$k] = array_sum($arr);
|
|
||||||
array_multisort($sortS, SORT_DESC, $res);
|
|
||||||
}
|
|
||||||
return $res;
|
|
||||||
}
|
|
||||||
function cms_chart_data_str($str, $fmt, $sepRow, $sepCol) {
|
|
||||||
if (!$sepRow) $sepRow = ';';
|
|
||||||
if (!$sepCol) $sepCol = ',';
|
|
||||||
$rows = explode($sepRow, trim($str));
|
|
||||||
$head = explode($sepCol, trim(array_shift($rows)));
|
|
||||||
foreach ($head as $v) $cols[] = trim($v);
|
|
||||||
unset($cols[0]);
|
|
||||||
if (1 === count($cols)) {
|
|
||||||
foreach ($rows as $i => $r) {
|
|
||||||
$r = explode($sepCol, trim($r));
|
|
||||||
$data[trim($r[0])] = trim($r[1]);
|
|
||||||
}
|
|
||||||
return $data;
|
|
||||||
}
|
|
||||||
foreach ($rows as $i => $r) {
|
|
||||||
$r = explode($sepCol, trim($r));
|
|
||||||
foreach ($r as $j => $v) $r[$j] = trim($v);
|
|
||||||
if ('xss' === $fmt || 'sxx' === $fmt) {
|
|
||||||
foreach ($r as $j => $v) {
|
|
||||||
if ($j) $data[$r[0]][$cols[$j]] = $v;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
$data[$r[0]][$r[1]] = isset($r[2]) ? $r[2] : 0;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return $data;
|
|
||||||
}
|
|
||||||
function cms_chart_data_ymdH($xKey, $keys, $xMin, $xMax) {
|
|
||||||
if (!$xMin) $xMin = min($keys);
|
|
||||||
if (!$xMax) $xMax = max($keys);
|
|
||||||
$y1 = substr($xMin, 0, 4); $y2 = substr($xMax, 0, 4);
|
|
||||||
if ('year' === $xKey) return range($y1, $y2);
|
|
||||||
$keys = array();
|
|
||||||
if ('week' === $xKey) {
|
|
||||||
$xMin = substr($xMin, 0, 6); $xMax = substr($xMax, 0, 6);
|
|
||||||
for ($Y = $y1; $Y <= $y2; $Y++) { for ($W = 1; $W < 54; $W++) {
|
|
||||||
$yw = $Y . str_pad($W, 2, 0, STR_PAD_LEFT);
|
|
||||||
if ($yw >= $xMin && $yw <= $xMax) $keys[] = $yw;
|
|
||||||
}} // year week
|
|
||||||
return $keys;
|
|
||||||
}
|
|
||||||
$m1 = substr($xMin, 0, 7); $d1 = substr($xMin, 0, 10);
|
|
||||||
$m2 = substr($xMax, 0, 7); $d2 = substr($xMax, 0, 10);
|
|
||||||
for ($Y = $y1; $Y <= $y2; $Y++) { for ($M = 1; $M < 13; $M++) {
|
|
||||||
$ym = $Y .'-'. str_pad($M, 2, 0, STR_PAD_LEFT);
|
|
||||||
if ($ym >= $m1 && $ym <= $m2) {
|
|
||||||
if ('month' === $xKey) $keys[] = $ym;
|
|
||||||
else { for ($D = 1; $D < 32; $D++) {
|
|
||||||
$ymd = $ym .'-'. str_pad($D, 2, 0, STR_PAD_LEFT);
|
|
||||||
if (checkdate($M, $D, $Y) && $ymd >= $d1 && $ymd <= $d2) {
|
|
||||||
if ('day' === $xKey) $keys[] = $ymd;
|
|
||||||
else { for ($H = 0; $H < 24; $H++) {
|
|
||||||
$keys[] = $ymd .' '. str_pad($H, 2, 0, STR_PAD_LEFT);
|
|
||||||
}} // hour
|
|
||||||
} // valid day
|
|
||||||
}} // day
|
|
||||||
} // valid m
|
|
||||||
}} // y m
|
|
||||||
return $keys;
|
|
||||||
}
|
|
||||||
function cms_chart_init($arr, $data, $wFix = 0) {
|
|
||||||
$num = count($data);
|
|
||||||
$xNum = count(reset($data));
|
|
||||||
if (!$arr['xSkip'] && $arr['xSkipMax'] > 0) $arr['xSkip'] = floor($xNum / $arr['xSkipMax']);
|
|
||||||
if (!$arr['chart'] || !in_array($arr['chart'], array('line','pie','barV','barS'))) $arr['chart'] = 'bar';
|
|
||||||
$is_pie = ('pie' === $arr['chart']);
|
|
||||||
$arr['gapL'] += 9; // default box margin 9px each side
|
|
||||||
$arr['gapT'] += 9;
|
|
||||||
$arr['gapR'] += 9;
|
|
||||||
$arr['gapB'] += 9;
|
|
||||||
if ($arr['title']) $arr['gapT'] += 15;
|
|
||||||
if ($arr['xTitle']) $arr['gapB'] += 15;
|
|
||||||
if ($arr['yTitle']) $arr['gapL'] += 15;
|
|
||||||
if (!strlen($arr['legend'])) $arr['legend'] = ($num > 1 || $is_pie) ? 'R' : '0';
|
|
||||||
if ($arr['legendW'] < 1) $arr['legendW'] = 80;
|
|
||||||
if ($arr['legend']) { // 0 T B R
|
|
||||||
if ('T' === $arr['legend']) $arr['gapT'] += 15;
|
|
||||||
elseif ('B' === $arr['legend']) $arr['gapB'] += 15;
|
|
||||||
elseif ('L' === $arr['legend']) $arr['gapL'] += $arr['legendW'];
|
|
||||||
else $arr['gapR'] += $arr['legendW'];
|
|
||||||
}
|
|
||||||
if ($is_pie) {
|
|
||||||
if ($arr['yTitle']) $arr['gapL'] += 3;
|
|
||||||
if ('L' === $arr['legend']) $arr['gapL'] += 51;
|
|
||||||
elseif ('R' === $arr['legend']) $arr['gapR'] += 51;
|
|
||||||
} else {
|
|
||||||
$arr['gapL'] += 51; // default yLabel
|
|
||||||
$arr['gapB'] += 16; // default xLabel
|
|
||||||
}
|
|
||||||
$arr['x1'] = $arr['gapL'];
|
|
||||||
$arr['y1'] = $arr['gapT'];
|
|
||||||
if ($arr['x1'] < 0) $arr['x1'] = 0;
|
|
||||||
if ($arr['y1'] < 0) $arr['y1'] = 0;
|
|
||||||
|
|
||||||
if (!$is_pie && $wFix) {
|
|
||||||
$arr['x2'] = 10 * $num * $xNum + $xNum + 1;
|
|
||||||
$arr['w'] = $arr['x1'] + $arr['x2'] + $arr['gapR'];
|
|
||||||
} else {
|
|
||||||
if ($arr['w'] < 1) $arr['w'] = 480;
|
|
||||||
$arr['x2'] = $arr['w'] - $arr['x1'] - $arr['gapR'];
|
|
||||||
if ($arr['x2'] > $arr['w'] || $arr['x2'] < $arr['x1']) $arr['x2'] = $arr['w'];
|
|
||||||
}
|
|
||||||
if ($arr['h'] < 1) $arr['h'] = 250;
|
|
||||||
if ($arr['h'] > $arr['w']) $arr['h'] = $arr['w'];
|
|
||||||
if ($is_pie) {
|
|
||||||
$arr['y2'] = $arr['x2'];
|
|
||||||
$arr['h'] = $arr['y1'] + $arr['y2'] + $arr['gapB']; // pie h auto calculated
|
|
||||||
} else {
|
|
||||||
$arr['y2'] = $arr['h'] - $arr['y1'] - $arr['gapB'];
|
|
||||||
if ($arr['y2'] > $arr['h'] || $arr['y2'] < $arr['y1']) $arr['y2'] = $arr['h'];
|
|
||||||
}
|
|
||||||
return $arr;
|
|
||||||
}
|
|
||||||
function cms_chart_color($init) {
|
|
||||||
// the following are default 11 colors
|
|
||||||
$defa = array('d9534f', 'f0ad4e', '5bc0de', '5cb85c', '337ab7', 'f26522', '754c24', 'd9ce00', '0e2e42', 'ce1797','672d8b');
|
|
||||||
// add colors at front
|
|
||||||
if (isset($init['color']) && !is_array($init['color'])) {
|
|
||||||
$col = explode(',', $init['color']);
|
|
||||||
if (is_array($col)) {
|
|
||||||
foreach ($col as $c) {
|
|
||||||
$c = trim(substr(trim($c), 0, 6));
|
|
||||||
if (strlen($c) > 2) $color[] = $c;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
// del colors
|
|
||||||
if (isset($init['colorDel'])) {
|
|
||||||
$col = explode(',', $init['colorDel']);
|
|
||||||
if (is_array($col)) {
|
|
||||||
foreach ($col as $c) {
|
|
||||||
unset($defa[ceil($c)]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
foreach ($defa as $c) $color[] = $c;
|
|
||||||
// add colors at end
|
|
||||||
if (isset($init['colorAdd'])) {
|
|
||||||
$col = explode(',', $init['colorAdd']);
|
|
||||||
if (is_array($col)) {
|
|
||||||
foreach ($col as $c) {
|
|
||||||
$c = trim(substr(trim($c), 0, 6));
|
|
||||||
if (strlen($c) > 2) $color[] = $c;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return $color;
|
|
||||||
}
|
|
||||||
function cms_chart_axisX($data, $x1, $y1, $x2, $y2, &$xVal, $xSkip, $xFormat, $is_bar, $xAngle, $yUnit, $yFormat, $color, &$mouseInfo) {
|
|
||||||
$xNum = count(reset($data));
|
|
||||||
if ($is_bar) {
|
|
||||||
$xDiv = ($x2 - $xNum - 1) / $xNum;
|
|
||||||
$xVal[0] = round($xDiv / 2 + 1, 5);
|
|
||||||
$xDiv++;
|
|
||||||
$xLeft = 0;
|
|
||||||
} else {
|
|
||||||
$xDiv = $x2 / ($xNum - 1);
|
|
||||||
$xVal[0] = 0;
|
|
||||||
$xLeft = $xDiv / 2;
|
|
||||||
}
|
|
||||||
$xLabel = array_keys(reset($data));
|
|
||||||
if ($xAngle) {
|
|
||||||
$angle1 = '<g transform="translate(5) rotate('. $xAngle .')">';// best for 45
|
|
||||||
$angle2 = '</g>';
|
|
||||||
$angleCSS = ' xAngle';
|
|
||||||
} else {
|
|
||||||
$angle1 = $angle2 = $angleCSS = '';
|
|
||||||
}
|
|
||||||
echo "\n" . ' <g class="chart-tick axisX'. $angleCSS .'" transform="translate('. $x1 .','. ($y1 + $y2) .')">';
|
|
||||||
if ($yUnit) $yUnit = ' ' . $yUnit;
|
|
||||||
$cNum = count($color);
|
|
||||||
$j = 0;
|
|
||||||
foreach ($data as $k => $arr) {
|
|
||||||
$i = 0;
|
|
||||||
foreach ($arr as $k2 => $v) {
|
|
||||||
if ($i) $xVal[$i] = round($xVal[$i - 1] + $xDiv, 5);
|
|
||||||
if (!isset($labelTxt[$i])) $labelTxt[$i] = '<tspan x="'. $xVal[$i] .'" dy="15">'. $k2 .'</tspan>';
|
|
||||||
$labelTxt[$i] .= '<tspan x="'. $xVal[$i] .'" dy="15" fill="#'. $color[$j % $cNum] .'">'. ($k ? $k .' : ' : '') . cms_chart_axis_format($v, $yFormat) . $yUnit .'</tspan>';
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
$j++;
|
|
||||||
}
|
|
||||||
$mouseInfo = "\n" .' <g class="chartInfo" transform="translate('. $x1 .','. $y1 .')">';
|
|
||||||
$mouseInfoH= (count($data) + 1) * 15 + 7;
|
|
||||||
for ($i = 0, $skip = 0; $i < $xNum; $i++) {
|
|
||||||
$rect = '<rect x="'. round($i * $xDiv - $xLeft, 5) .'" width="'. round($xDiv, 5) .'" ';
|
|
||||||
$mouseInfo .= "\n" .' <g>'. $rect .'height="'. $y2 .'" fill="#000" opacity="0"/>'. $rect .'height="'. $mouseInfoH .'"/><text>'. $labelTxt[$i] .'</text></g>';
|
|
||||||
if (!$xSkip || ($xSkip > 0 && $i == ($xSkip + 1) * $skip)
|
|
||||||
|| ($xSkip < 0 && !(substr($xLabel[$i], -2) % $xSkip))) {
|
|
||||||
$skip++;
|
|
||||||
echo "\n" . ' <g transform="translate('. $xVal[$i] .')"><line y2="-'. $y2 .'"></line>';
|
|
||||||
echo $angle1 . '<text y="3" dy=".71em">'. cms_chart_axis_format($xLabel[$i], $xFormat) .'</text>' . $angle2;
|
|
||||||
echo '</g>';
|
|
||||||
}
|
|
||||||
}
|
|
||||||
$mouseInfo .= "\n </g>";
|
|
||||||
echo "\n" . ' </g>';
|
|
||||||
}
|
|
||||||
function cms_chart_axisY($data, $x1, $y1, $x2, $y2, &$yVal, $yUnit, $yFormat, $is_barV) {
|
|
||||||
$max_min = reset($data);
|
|
||||||
$max = $min = reset($max_min);
|
|
||||||
if ($is_barV) {
|
|
||||||
foreach ($data as $arr) {
|
|
||||||
foreach ($arr as $k => $v) $TTL[0][$k] = $v + (isset($TTL[0][$k]) ? $TTL[0][$k] : 0);
|
|
||||||
}
|
|
||||||
} else $TTL = $data;
|
|
||||||
foreach ($TTL as $arr) {
|
|
||||||
$min = min(min($arr), $min);
|
|
||||||
$max = max(max($arr), $max);
|
|
||||||
}
|
|
||||||
if ($max < 0 && $min < 0) $ttl = $min;
|
|
||||||
elseif ($max < 0 || $min < 0) $ttl = $max - $min;
|
|
||||||
else $ttl = $max;
|
|
||||||
if ($ttl < 0) $ttl = abs($ttl);
|
|
||||||
$zoom = pow(10, floor(log10($ttl)));
|
|
||||||
$ttl /= $zoom;
|
|
||||||
if ($ttl == 1) $step = 0.2;
|
|
||||||
elseif ($ttl > 6) $step = 2;
|
|
||||||
elseif ($ttl > 5) $step = 1.2;
|
|
||||||
elseif ($ttl > 4) $step = 1;
|
|
||||||
elseif ($ttl > 3) $step = 0.8;
|
|
||||||
elseif ($ttl > 2) $step = 0.6;
|
|
||||||
else $step = 0.4;
|
|
||||||
if ($max <= 0 && $min < 0) {
|
|
||||||
for ($i = 0; $i < 6; $i++) $yVal[] = 0 - $i * $zoom * $step;
|
|
||||||
} else {
|
|
||||||
for ($i = 5; $i >- 1; $i--) $yVal[] = $i * $zoom * $step;
|
|
||||||
if ($max <= 0 || $min < 0) cms_chart_axisY_audit($max, $min, $step, $zoom, $yVal);
|
|
||||||
}
|
|
||||||
if ($max > 0 && $yVal[1] >= $max) array_shift($yVal);
|
|
||||||
elseif ($min < 0 && $yVal[4] <= $min) array_pop($yVal);
|
|
||||||
$step = count($yVal);
|
|
||||||
if ($min < $yVal[$step-1]) $yVal[] = $yVal[$step-1] - abs($yVal[$step-2] - $yVal[$step-3]);
|
|
||||||
$step = $y2 / (count($yVal) - 1);
|
|
||||||
|
|
||||||
echo "\n" . ' <g class="chart-tick axisY" transform="translate('. "$x1,$y1" .')">';
|
|
||||||
$yDiv = count($yVal);
|
|
||||||
$last_not_zero = end($yVal);
|
|
||||||
if ($yUnit) $yUnit = ' ' . $yUnit;
|
|
||||||
for ($i = 0; $i < $yDiv; $i++) {
|
|
||||||
echo "\n" . ' <g transform="translate(0,'. $i * $step .')"><line x2="'. $x2 .'"></line>';
|
|
||||||
if ($yVal[$i] || $last_not_zero) {
|
|
||||||
echo '<text x="-3" dy=".32em">'. cms_chart_axis_format($yVal[$i], $yFormat) . $yUnit . '</text>';
|
|
||||||
}
|
|
||||||
echo '</g>';
|
|
||||||
}
|
|
||||||
echo "\n" . ' </g>';
|
|
||||||
}
|
|
||||||
function cms_chart_axisY_audit($max, $min, $step, $zoom, &$yVal, $count = 0) {
|
|
||||||
if ($count > 5) return;
|
|
||||||
if ($yVal[1] > $max && $yVal[5] > $min) {
|
|
||||||
$yVal[] = $yVal[5] - $zoom * $step;
|
|
||||||
array_shift($yVal);
|
|
||||||
cms_chart_axisY_audit($max, $min, $step, $zoom, $yVal, $count++);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
function cms_chart_axis_format($v, $format) {
|
|
||||||
if (!$format) return $v;
|
|
||||||
$format = explode('|', $format, 4); // eg substr|6 or format|0|.|, or data|M
|
|
||||||
if ('format' == $format[0]) return number_format($v, isset($format[1]) ? ceil($format[1]) : 0, isset($format[2]) ? $format[2] : null, isset($format[3]) ? $format[3] : null);
|
|
||||||
if ('substr' == $format[0]){
|
|
||||||
if (isset($format[2])) return substr($v, ceil($format[1]), ceil($format[2]));
|
|
||||||
return substr($v, isset($format[1]) ? ceil($format[1]) : 0);
|
|
||||||
}
|
|
||||||
if ('date' == $format[0]) return date($format[1], strtotime($v));
|
|
||||||
return $v;
|
|
||||||
}
|
|
||||||
function cms_chart_title($y1, $y2, $w, $title, $titleAlign, $xTitle, $xTitleAlign, $yTitle, $yTitleAlign, $is_pie) {
|
|
||||||
if ($title) {
|
|
||||||
echo "\n" . ' <text y="15" x="';
|
|
||||||
if (1 == $titleAlign) echo 5 . '"'; // left
|
|
||||||
elseif (3 == $titleAlign) echo $w - 5 . '" text-anchor="end"'; // right
|
|
||||||
else echo $w / 2 . '" text-anchor="middle"'; // default center
|
|
||||||
echo '>'. $title .'</text>';
|
|
||||||
}
|
|
||||||
$y = $y1 + $y2;
|
|
||||||
if ($xTitle) {
|
|
||||||
echo "\n".' <text y="'. ($y + ($is_pie ? 15 : 37)) .'" x="';
|
|
||||||
if (1 == $xTitleAlign) echo 5 . '"'; // left
|
|
||||||
elseif (3 == $xTitleAlign) echo $w - 5 . '" text-anchor="end"'; // right
|
|
||||||
else echo $w / 2 . '" text-anchor="middle"'; // default center
|
|
||||||
echo '>'. $xTitle .'</text>';
|
|
||||||
}
|
|
||||||
if ($yTitle) {
|
|
||||||
echo "\n".' <g transform="translate(15,'. $y .')"><text x="';
|
|
||||||
if (1 == $yTitleAlign) echo 0 . '"'; // left
|
|
||||||
elseif (3 == $yTitleAlign) echo $y2 . '" text-anchor="end"'; // right
|
|
||||||
else echo $y2 / 2 . '" text-anchor="middle"'; // default center
|
|
||||||
echo ' transform="rotate(-90)">'. $yTitle .'</text></g>';
|
|
||||||
}
|
|
||||||
}
|
|
||||||
function cms_chart_legend($data, $color, $legend, $legendW, $x1, $y1, $x2, $y2, $xTitle, $is_pie, $piePct) {
|
|
||||||
if (!$legend || (count($data) < 2 && !$is_pie)) return;
|
|
||||||
$i = 0;
|
|
||||||
if ('T' === $legend || 'B' === $legend) {
|
|
||||||
$x = $legendW;
|
|
||||||
$y = 0;
|
|
||||||
if ('B' === $legend) $y1 += $y2 + ($is_pie ? 25 : 40) + ($xTitle ? 15 : 0);
|
|
||||||
} else {
|
|
||||||
$x = 0;
|
|
||||||
$y = 16;
|
|
||||||
$y1 += 15;
|
|
||||||
if ('L' === $legend) $x1 = 9;
|
|
||||||
else $x1 += $x2 + 8;
|
|
||||||
}
|
|
||||||
echo "\n" . ' <!-- legend -->';
|
|
||||||
$cNum = count($color);
|
|
||||||
foreach ($data as $k => $arr) {
|
|
||||||
echo "\n" . ' <g fill="#'. $color[$i % $cNum] .'">';
|
|
||||||
$cx = $x1 + 6 + $i * $x;
|
|
||||||
$cy = $y1 - 10 + $i * $y;
|
|
||||||
echo '<circle cx="'. $cx .'" cy="'. $cy .'" r="6"/><text x="'. ($cx + 12) .'" y="'. ($cy + 4) .'">'. $k .'</text>';
|
|
||||||
echo '</g>';
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
function cms_chart_bar($data, $color, $zoom, $xVal, $yVal0, $is_barV, $is_barS, $valShow, $valAngle, $yFormat) {
|
|
||||||
$i = 0;
|
|
||||||
$w1 = $xDiv = abs((isset($xVal[1]) ? $xVal[1] : 0) - $xVal[0] - 1);
|
|
||||||
$half = $xDiv / 2;
|
|
||||||
if (!$is_barV && !$is_barS) $w1 /= count($data);
|
|
||||||
$w1 = round($w1, 5);
|
|
||||||
$cNum = count($color);
|
|
||||||
$is_barVS = $is_barV || $is_barS;
|
|
||||||
$opacity = $is_barS ? ' opacity=".8"' : '';
|
|
||||||
if ($valShow) {
|
|
||||||
if (-90 == $valAngle) $xMove = 4;
|
|
||||||
elseif ($valAngle > 0) $xMove = -3;
|
|
||||||
else $xMove = 0;
|
|
||||||
$yMove = (45 == $valAngle) ? 5 : 0;
|
|
||||||
$valClass = ' class="valShow"';
|
|
||||||
} else {
|
|
||||||
$valClass = '';
|
|
||||||
}
|
|
||||||
foreach ($data as $arr) {
|
|
||||||
echo "\n" . ' <g fill="#'. $color[$i % $cNum] .'"'. $valClass .'>';
|
|
||||||
$j = 0;
|
|
||||||
foreach ($arr as $v) {
|
|
||||||
$hold[$i][$j] = $v;
|
|
||||||
if ($is_barV) {
|
|
||||||
// when more than 1 negative bar, barV does not work--fix later
|
|
||||||
if ($i) $Y[$j] = (isset($Y[$j]) ? $Y[$j] : 0) + ($hold[$i-1][$j] > 0 ? $hold[$i-1][$j] : 0);
|
|
||||||
} else $Y[$j] = 0;
|
|
||||||
//if ($is_barV && $i) $Y[$j] += $hold[$i-1][$j];
|
|
||||||
//else $Y[$j] = 0;
|
|
||||||
$x = $xVal[$j] - $half + ($is_barVS ? 0 : $i * $w1);
|
|
||||||
$y = $yVal0 - (isset($Y[$j]) ? $Y[$j] : 0);
|
|
||||||
if ($v > 0) $y -= $v;
|
|
||||||
$x = round($x, 5);
|
|
||||||
$y = round($y * $zoom, 5);
|
|
||||||
echo "\n".' <rect'. $opacity .' x="'. $x .'" y="'. $y .'" width="'. $w1 .'" height="'. round(abs($v) * $zoom, 5) .'"/>';//remove inside rect: <title>'. $v .'</title>
|
|
||||||
if ($valShow && $v) echo cms_chart_val($valAngle, $x + $w1 /2, $y, $xMove, $yMove, cms_chart_axis_format($v, $yFormat));
|
|
||||||
$j++;
|
|
||||||
}
|
|
||||||
echo "\n" . ' </g>';
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
function cms_chart_val($valAngle, $x, $y, $xMove, $yMove, $v) {
|
|
||||||
if (!$valAngle) return '<text x="'. $x .'" y="'. ($y + 10) .'" text-anchor="middle">'. $v .'</text>';
|
|
||||||
return "\n" .' <g transform="translate('. ($x + $xMove) .','. ($y + $yMove) .') rotate('. $valAngle .')"><text>'. $v .'</text></g>';
|
|
||||||
}
|
|
||||||
function cms_chart_line($data, $color, $zoom, $xVal, $yVal0, $valShow, $valAngle, $yFormat) {
|
|
||||||
$i = 0;
|
|
||||||
$cNum = count($color);
|
|
||||||
foreach ($data as $arr) {
|
|
||||||
$j = 0;
|
|
||||||
$line = $dot = '';
|
|
||||||
foreach ($arr as $v) {
|
|
||||||
$x = round($xVal[$j++], 5);
|
|
||||||
$y = round(($yVal0 - $v) * $zoom, 5);
|
|
||||||
$line .= ' '. $x .','. $y;
|
|
||||||
$dot .= "\n" . ' <circle cx="'. $x .'" cy="'. $y .'" r="3"/>';//removed: <title>'. $v .'</title>
|
|
||||||
if ($valShow) $dot .= cms_chart_val($valAngle, $x, $y - 15, 0, 0, cms_chart_axis_format($v, $yFormat));
|
|
||||||
}
|
|
||||||
echo "\n" . ' <g fill="#'. $color[$i % $cNum] .'">';
|
|
||||||
echo "\n" . ' <path d="M'. substr($line, 1) .'" class="line" stroke-linejoin="round" stroke="#' . $color[$i++ % $cNum] .'"/>';
|
|
||||||
// echo $dot;
|
|
||||||
echo "\n" . ' </g>';
|
|
||||||
}
|
|
||||||
}
|
|
||||||
function cms_chart_pie($data, $color, $R, $Arc, $stripe, $piePct, $pieDonut, $valShow, $yFormat) {
|
|
||||||
$sum = array_sum($data);
|
|
||||||
foreach ($data as $k => $v) $pct[$k] = round($v / $sum, 5);
|
|
||||||
echo "\n" . ' <g transform="translate('. "$R,$R" .')" class="pie">';
|
|
||||||
echo "\n" . ' <circle r="'. $R .'" class="pieBg"/>';
|
|
||||||
$i = 0;
|
|
||||||
$cNum = count($color);
|
|
||||||
foreach ($pct as $k => $v) {
|
|
||||||
$a = round($v * 360, 5);
|
|
||||||
if (360 == $a) echo "\n" . ' <circle r="'. $R .'" fill="#' . $color[$i % $cNum] . '"/>';
|
|
||||||
elseif ($a) {
|
|
||||||
echo "\n" . ' <g' . ($Arc ? ' transform="rotate('. $Arc .')"' : '') . ' fill="#' . $color[$i % $cNum] . '" stroke="#fff" stroke-width="1">';
|
|
||||||
$r = deg2rad($a);
|
|
||||||
$x = round(cos($r) * $R, 5);
|
|
||||||
$y = round(sin($r) * $R, 5);
|
|
||||||
echo '<path d="M0,0 L'. "$R,0 A$R,$R 0 " . ($a > 180 ? 1 : 0) . ",1 $x,$y z\"/>";
|
|
||||||
if ($valShow) echo '<g transform="rotate('. ($a / 2) .')">'. cms_chart_val(0, round($R * 3 / 4, 2), 0, 0, 0, cms_chart_axis_format($data[$k], $yFormat) . ($piePct ? ' ( '. round($v * 100) .' % )' : '')) .'</g>';
|
|
||||||
echo '</g>';
|
|
||||||
$Arc += $a;
|
|
||||||
}
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
if ($stripe) {
|
|
||||||
$stripeCSS = 'style="fill:none;stroke:#fff;stroke-width:'. round($R * 2 / 11, 5) .';opacity:0.2"';
|
|
||||||
echo "\n <!-- stripes -->\n " . '<circle r="'. round($R * 8 / 11, 5) .'" '. $stripeCSS .'/><circle r="'. round($R * 4 / 11, 5) .'" '. $stripeCSS .'/>';
|
|
||||||
echo "\n " . '<circle r="'. round($R / 11, 5) .'" style="fill:#fff;stroke:0;opacity:0.2"/>';
|
|
||||||
}
|
|
||||||
if ($pieDonut) echo "\n" . ' <circle r="'. round($R / 2) .'" class="pieBg"/>';//donus
|
|
||||||
echo "\n" . ' </g>';
|
|
||||||
}
|
|
||||||
function cms_chart_css($css, $style) {
|
|
||||||
if (!$css && !$style) return;
|
|
||||||
echo '<style>';
|
|
||||||
if ($css) echo '
|
|
||||||
<![CDATA[
|
|
||||||
svg.chart{display:block}
|
|
||||||
.chart-bg{fill:transparent;opacity:1}
|
|
||||||
.chart-box{fill:transparent;opacity:1}
|
|
||||||
.chart-tick line{stroke:#000;stroke-width:1;opacity:0.1}
|
|
||||||
.chart text{font-family:Helvetica,Arial,Verdana,sans-serif;font-size:12px;fill:#666}
|
|
||||||
.axisX text{text-anchor:middle}
|
|
||||||
.xAngle text{text-anchor:start}
|
|
||||||
.axisY text{text-anchor:end}
|
|
||||||
.chart circle{stroke-width:2px;stroke:#eee}
|
|
||||||
.chart .line{fill:none;stroke-width:3}
|
|
||||||
.chart .fill{stroke-width:0}
|
|
||||||
.valShow text,.pie text{fill:#fed;opacity:.8;font-size:10px}
|
|
||||||
.pie text{font-size:15px}
|
|
||||||
.chartInfo g{opacity:0}
|
|
||||||
.chartInfo g:hover{opacity:1}
|
|
||||||
.chartInfo .textBg{fill:#000;opacity:.9}
|
|
||||||
.chartInfo text{text-anchor:middle;fill:#887}
|
|
||||||
.chartInfo g rect:nth-child(even){fill:#eee;opacity:.8;stroke:#eed;stroke-width:1}
|
|
||||||
.pieBg{fill:#eee}
|
|
||||||
]]>
|
|
||||||
';
|
|
||||||
if ($style) echo $style . "\n";
|
|
||||||
echo '</style>' . "\n";
|
|
||||||
}
|
|
||||||
|
|
@ -1,44 +0,0 @@
|
||||||
<?php
|
|
||||||
//ini_set('display_errors', 1);
|
|
||||||
include '../../buffer.php';
|
|
||||||
include '../../cms_chart.php';
|
|
||||||
|
|
||||||
spl_autoload_register(function ($class_name) {
|
|
||||||
include '../../' . $class_name . '.php';
|
|
||||||
});
|
|
||||||
|
|
||||||
$yesterday = time() - (24 * 60 * 60);
|
|
||||||
$poloniex_url = 'https://poloniex.com/public?command=returnChartData¤cyPair=BTC_DASH&start=' . $yesterday . '&end=9999999999&period=' .
|
|
||||||
//300
|
|
||||||
//900
|
|
||||||
1800
|
|
||||||
//7200
|
|
||||||
//14400
|
|
||||||
//86400
|
|
||||||
;
|
|
||||||
//print $poloniex_url;
|
|
||||||
|
|
||||||
$dateformat = 'gA';
|
|
||||||
$last24h = Util::getJson($poloniex_url);
|
|
||||||
$averages = [];
|
|
||||||
|
|
||||||
foreach ($last24h as $datum) {
|
|
||||||
$averages[date($dateformat, $datum->date)] = $datum->weightedAverage;
|
|
||||||
}
|
|
||||||
|
|
||||||
$chartConfig = array(
|
|
||||||
'chart' => 'line',
|
|
||||||
'css' => '1',
|
|
||||||
'xKey' => 'Hour',
|
|
||||||
'xFormat' => 'date|' . $dateformat,
|
|
||||||
'xSkip' => '1',
|
|
||||||
'yFormat' => 'format|6|.',
|
|
||||||
'yKey' => 'BTC',
|
|
||||||
);
|
|
||||||
|
|
||||||
Header('Content-type: image/svg+xml; charset=utf-8');
|
|
||||||
print '<?xml version="1.0" standalone="no"?>
|
|
||||||
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
|
|
||||||
"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">';
|
|
||||||
cms_chart($averages, $chartConfig);
|
|
||||||
|
|
||||||
|
|
@ -1 +0,0 @@
|
||||||
Under development
|
|
||||||
170
index.php
Normal file
170
index.php
Normal file
|
|
@ -0,0 +1,170 @@
|
||||||
|
<?php
|
||||||
|
//ini_set('display_errors', 1);
|
||||||
|
|
||||||
|
Header('Content-type: image/svg+xml; charset=utf-8');
|
||||||
|
Header('Content-Disposition: inline; filename="Dash-24h-chart-' . date('Y-m-d\THisT') . '.svg"');
|
||||||
|
include 'buffer.php';
|
||||||
|
|
||||||
|
spl_autoload_register(function ($class_name) {
|
||||||
|
include $class_name . '.php';
|
||||||
|
});
|
||||||
|
|
||||||
|
$yesterday = time() - (24 * 60 * 60);
|
||||||
|
$poloniex_url = 'https://poloniex.com/public?command=returnChartData¤cyPair=BTC_DASH&start=' . $yesterday . '&end=9999999999&period=' .
|
||||||
|
//300 //5 min
|
||||||
|
900 //15 min
|
||||||
|
//1800 //30 min
|
||||||
|
//7200 //3h
|
||||||
|
//14400 //6h
|
||||||
|
//86400 //1d
|
||||||
|
;
|
||||||
|
|
||||||
|
$dateformat = 'gA';
|
||||||
|
$last24h = Util::getJson($poloniex_url);
|
||||||
|
$chartData = [];
|
||||||
|
$absoluteDeltas = [];
|
||||||
|
$previousValue = null;
|
||||||
|
$yMin = $xMin = INF;
|
||||||
|
$yMax = $xMax = -INF;
|
||||||
|
|
||||||
|
foreach ($last24h as $datum) {
|
||||||
|
$thisX = $datum->date;
|
||||||
|
$thisY = $datum->weightedAverage;
|
||||||
|
$chartData[$thisX] = $thisY;
|
||||||
|
if (!is_null($previousValue)) {
|
||||||
|
$absoluteDeltas[] = abs($thisY - $previousValue);
|
||||||
|
}
|
||||||
|
if ($thisY < $yMin) {
|
||||||
|
$yMin = $thisY;
|
||||||
|
$yMinX = $thisX;
|
||||||
|
}
|
||||||
|
if ($thisY > $yMax) {
|
||||||
|
$yMax = $thisY;
|
||||||
|
$yMaxX = $thisX;
|
||||||
|
}
|
||||||
|
$previousValue = $thisY;
|
||||||
|
}
|
||||||
|
end($chartData); // already at end, not needed
|
||||||
|
$yRange = $yMax - $yMin;
|
||||||
|
$xMax = key($chartData);
|
||||||
|
reset($chartData);
|
||||||
|
$xMin = key($chartData);
|
||||||
|
$xRange = $xMax - $xMin;
|
||||||
|
$count = count($chartData);
|
||||||
|
$medianDelta = abs(Util::median($absoluteDeltas));
|
||||||
|
$width = 700;
|
||||||
|
|
||||||
|
/*
|
||||||
|
We want the height of the median y-delta to be the same as
|
||||||
|
the width of one x-delta, which puts the median slope at
|
||||||
|
45 degrees. This improves comprehension.
|
||||||
|
http://vis4.net/blog/posts/doing-the-line-charts-right/
|
||||||
|
*/
|
||||||
|
$aspectRatio = $yRange / $medianDelta / $count;
|
||||||
|
$height = floor($aspectRatio * $width);
|
||||||
|
|
||||||
|
function labelFormat($float, $sigFigs = 4, $minPlaces = 1) {
|
||||||
|
return number_format($float, max(
|
||||||
|
$minPlaces,
|
||||||
|
$sigFigs + floor(-log($float, 10)))
|
||||||
|
/* this floor(log) thing is the first significant place value */
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Transform data coords to chart coords */
|
||||||
|
function transformX($x) {
|
||||||
|
global $xMin, $xRange, $width;
|
||||||
|
return round(
|
||||||
|
($x - $xMin) / $xRange * $width
|
||||||
|
, 2);
|
||||||
|
}
|
||||||
|
function transformY($y) {
|
||||||
|
global $yMax, $yRange, $height;
|
||||||
|
return round(
|
||||||
|
// SVG has y axis reversed, 0 is at the top
|
||||||
|
($yMax - $y) / $yRange * $height
|
||||||
|
, 2);
|
||||||
|
}
|
||||||
|
|
||||||
|
$chartPoints = "M";
|
||||||
|
foreach ($chartData as $x => $y) {
|
||||||
|
$chartPoints .= transformX($x) . ',' . transformY($y) . '
|
||||||
|
';
|
||||||
|
}
|
||||||
|
|
||||||
|
$numLabels = floor($height / 50);
|
||||||
|
$labelModulation = 2 * 10 ** (1 + floor(-log($yRange / $numLabels, 10)));
|
||||||
|
$labelInterval = round($yRange / $numLabels * $labelModulation) / $labelModulation;
|
||||||
|
|
||||||
|
$gridLines =
|
||||||
|
"M0,0 ".$width.",0
|
||||||
|
M0,".$height.",".$width.",".$height."
|
||||||
|
";
|
||||||
|
|
||||||
|
$gridText =
|
||||||
|
'<text x="-4" y="4">'.labelFormat($yMax).'</text>' .
|
||||||
|
'<text x="-4" y="'.($height + 4).'">'.labelFormat($yMin).'</text>';
|
||||||
|
|
||||||
|
for (
|
||||||
|
$labelY = $yMin + 0.5 * $labelInterval - fmod($yMin + 0.5 * $labelInterval , $labelInterval) + $labelInterval;
|
||||||
|
$labelY < $yMax - 0.5 * $labelInterval;
|
||||||
|
$labelY += $labelInterval
|
||||||
|
) {
|
||||||
|
|
||||||
|
$labelHeight = transformY($labelY);
|
||||||
|
$gridLines .= "M0,".$labelHeight." ".$width.",".$labelHeight."
|
||||||
|
";
|
||||||
|
$gridText .= '<text x="-4" y="'.($labelHeight + 4).'">'.labelFormat($labelY).'</text>';
|
||||||
|
}
|
||||||
|
|
||||||
|
// in case some dingbat has PHP short tags enabled
|
||||||
|
echo '<'.'?xml version="1.0" standalone="no"?'.'>';
|
||||||
|
|
||||||
|
?>
|
||||||
|
<svg
|
||||||
|
viewBox="-90 -10 <?= $width + 100 ?> <?= $height + 20 ?>"
|
||||||
|
width="<?= $width + 100 ?>"
|
||||||
|
height="<?= $height + 20 ?>"
|
||||||
|
version="1.1"
|
||||||
|
xmlns="http://www.w3.org/2000/svg"
|
||||||
|
xmlns:xlink="http://www.w3.org/1999/xlink">
|
||||||
|
<defs>
|
||||||
|
<marker id="markerCircle" markerWidth="2" markerHeight="2" refX="1" refY="1" markerUnits="strokeWidth">
|
||||||
|
<circle cx="1" cy="1" r="1" style="stroke: none; fill:#000000;"/>
|
||||||
|
</marker>
|
||||||
|
<linearGradient id="fadeFromNothing" x1="0%" y1="0%" x2="100%" y2="0%">
|
||||||
|
<stop offset="0%" stop-color="#1C75BC" stop-opacity="0"></stop>
|
||||||
|
<stop offset="2.5%" stop-color="#1C75BC" stop-opacity="1"></stop>
|
||||||
|
<stop offset="100%" stop-color="#1C75BC" stop-opacity="1"></stop>
|
||||||
|
</linearGradient>
|
||||||
|
<style type="text/css"><![CDATA[
|
||||||
|
.chart__gridLines {
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-size: 10;
|
||||||
|
fill: #7f7f7f;
|
||||||
|
text-anchor:end;
|
||||||
|
}
|
||||||
|
.chart__gridLinePaths {
|
||||||
|
fill: none;
|
||||||
|
stroke: #000000;
|
||||||
|
stroke-width: 1;
|
||||||
|
stroke-dasharray: 2,2;
|
||||||
|
stroke-opacity: 0.25;
|
||||||
|
}
|
||||||
|
.chart__plotLine {
|
||||||
|
fill: none;
|
||||||
|
stroke-width: 5;
|
||||||
|
stroke-linejoin: round;
|
||||||
|
stroke-linecap: round;
|
||||||
|
stroke: url(#fadeFromNothing);
|
||||||
|
marker-end: url(#markerCircle);
|
||||||
|
}
|
||||||
|
]]></style>
|
||||||
|
</defs>
|
||||||
|
<g class="chart__gridLines">
|
||||||
|
<path class="chart__gridLinePaths" d="<?= $gridLines ?>" />
|
||||||
|
<?= $gridText ?>
|
||||||
|
</g>
|
||||||
|
<path class="chart__plotLine" d="<?= $chartPoints ?>" />
|
||||||
|
</svg>
|
||||||
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue