<?
require_once '../ipv6status/auth.php' ;
mysql_connect('localhost', $db_user, $db_password)
        or die("Cannot connect to the database:".mysql_error()) ;

mysql_select_db($db_db) ;
if (isset($_REQUEST['site']) and $_REQUEST['site'] != '') {
        $site = addslashes(trim($_REQUEST['site'])) ;
	$sql = "select date, sum(n) as n, sum(n4) as n4, sum(n6) as n6, sum(n46) as n46, sum(n6_preferred) as n6_preferred from brokeness
        where site = '$site'
        group by site, date
        order by date asc" ;
	$title = "IPv6 Brokenness for $site" ;
} else {
	$sql = "select date, sum(n) as n, sum(n4) as n4, sum(n6) as n6, sum(n46) as n46, sum(n6_preferred) as n6_preferred from brokeness
        group by date
        order by date asc" ;
	$title = "IPv6 Brokenness" ;
}

require 'phplot.php';

header("Content-type: image/png"); // Send the mime header to the browser.

$data=array() ;
$result=mysql_query($sql) or die("Select historique:".mysql_error()) ;
$count=0 ;
$labelinterval=round(mysql_num_rows($result) / 20)  ;
if ($labelinterval <= 0) $labelinterval = 1 ;
while ($ligne=mysql_fetch_array($result)) {
	if ($ligne['n'] > 0) {
		$brokenness = round(100 * ($ligne['n4'] - $ligne['n46']) / $ligne['n'], 1) ;
	} else {
		$brokenness = 0 ;
	}

	if ($count ++ % $labelinterval == 0)
		$data[]=array($ligne['date'], $brokenness) ;
	else
		$data[]=array('', $brokenness) ;
}


$plot =& new PHPlot(1024, 700);
$plot->SetImageBorderType('plain');

$plot->SetPlotType('lines');
$plot->SetDataType('text-data');
$plot->SetDataValues($data);
$plot->SetLineWidths(3) ;
// Set enough different colors;
$plot->SetDataColors(array('red', 'blue', 'green', 'orange', 'cyan',
                        'magenta', 'brown', 'lavender', 'pink',
                        'gray', 'yellow'));


# Main plot title:
$plot->SetTitle($title);
$plot->SetYTitle("% of broken customers") ;
$plot->SetXLabelAngle(90) ;
$plot->SetDrawDashedGrid(true) ;

# Legend
# $plot->SetLegend(array("Allocated","Alive","Announced individually","Announced as aggregated")) ;

# Make sure Y axis starts at 0:
$plot->SetPlotAreaWorld(NULL, 0, NULL, NULL);

# Labels
$plot->SetXTickIncrement($labelinterval); // One tick every week
$plot->SetXTickLabelPos('none') ;
$plot->SetDrawXGrid(true) ;
$plot->SetDrawYGrid(true) ;
$plot->SetIsInline(true) ;
$plot->DrawGraph();

?>