adodb 최신버전으로 변경
<? 를 <?php 로 변경
This commit is contained in:
@@ -1,15 +1,17 @@
|
||||
<?php
|
||||
/*
|
||||
V5.09 25 June 2009 (c) 2000-2009 John Lim (jlim#natsoft.com). All rights reserved.
|
||||
Released under both BSD license and Lesser GPL library license.
|
||||
Whenever there is any discrepancy between the two licenses,
|
||||
the BSD license will take precedence. See License.txt.
|
||||
/*
|
||||
@version v5.20.9 21-Dec-2016
|
||||
@copyright (c) 2000-2013 John Lim (jlim#natsoft.com). All rights reserved.
|
||||
@copyright (c) 2014 Damien Regad, Mark Newnham and the ADOdb community
|
||||
Released under both BSD license and Lesser GPL library license.
|
||||
Whenever there is any discrepancy between the two licenses,
|
||||
the BSD license will take precedence. See License.txt.
|
||||
Set tabs to 4 for best viewing.
|
||||
|
||||
|
||||
Latest version is available at http://adodb.sourceforge.net
|
||||
|
||||
Library for basic performance monitoring and tuning
|
||||
|
||||
|
||||
Library for basic performance monitoring and tuning
|
||||
|
||||
*/
|
||||
|
||||
// security - hide paths
|
||||
@@ -27,16 +29,16 @@ class perf_db2 extends adodb_perf{
|
||||
tracer varchar(500) NOT NULL,
|
||||
timer decimal(16,6) NOT NULL
|
||||
)";
|
||||
|
||||
|
||||
var $settings = array(
|
||||
'Ratios',
|
||||
'data cache hit ratio' => array('RATIO',
|
||||
"SELECT
|
||||
case when sum(POOL_DATA_L_READS+POOL_INDEX_L_READS)=0 then 0
|
||||
else 100*(1-sum(POOL_DATA_P_READS+POOL_INDEX_P_READS)/sum(POOL_DATA_L_READS+POOL_INDEX_L_READS)) end
|
||||
"SELECT
|
||||
case when sum(POOL_DATA_L_READS+POOL_INDEX_L_READS)=0 then 0
|
||||
else 100*(1-sum(POOL_DATA_P_READS+POOL_INDEX_P_READS)/sum(POOL_DATA_L_READS+POOL_INDEX_L_READS)) end
|
||||
FROM TABLE(SNAPSHOT_APPL('',-2)) as t",
|
||||
'=WarnCacheRatio'),
|
||||
|
||||
|
||||
'Data Cache',
|
||||
'data cache buffers' => array('DATAC',
|
||||
'select sum(npages) from SYSCAT.BUFFERPOOLS',
|
||||
@@ -56,11 +58,11 @@ class perf_db2 extends adodb_perf{
|
||||
);
|
||||
|
||||
|
||||
function perf_db2(&$conn)
|
||||
function __construct(&$conn)
|
||||
{
|
||||
$this->conn = $conn;
|
||||
}
|
||||
|
||||
|
||||
function Explain($sql,$partial=false)
|
||||
{
|
||||
$save = $this->conn->LogSQL(false);
|
||||
@@ -85,18 +87,22 @@ class perf_db2 extends adodb_perf{
|
||||
$s = ob_get_contents();
|
||||
ob_end_clean();
|
||||
$this->conn->LogSQL($save);
|
||||
|
||||
|
||||
$s .= $this->Tracer($sql);
|
||||
return $s;
|
||||
}
|
||||
|
||||
|
||||
function Tables()
|
||||
|
||||
/**
|
||||
* Gets a list of tables
|
||||
*
|
||||
* @param int $throwaway discarded variable to match the parent method
|
||||
* @return string The formatted table list
|
||||
*/
|
||||
function Tables($throwaway=0)
|
||||
{
|
||||
$rs = $this->conn->Execute("select tabschema,tabname,card as rows,
|
||||
npages pages_used,fpages pages_allocated, tbspace tablespace
|
||||
npages pages_used,fpages pages_allocated, tbspace tablespace
|
||||
from syscat.tables where tabschema not in ('SYSCAT','SYSIBM','SYSSTAT') order by 1,2");
|
||||
return rs2html($rs,false,false,false,false);
|
||||
}
|
||||
}
|
||||
?>
|
||||
|
||||
Reference in New Issue
Block a user