本文为自己的总结,脚本来自于oracle sr技术工程师。
转载请注明出处http://blog.csdn.net/msdnchina/article/details/38404501
conn / as sysdba
set numwidth 17
set pages 1000
alter session set nls_date_format='DD/Mon/YYYY HH24:MI:SS';
with t1 as(
select time_dp , 24*60*60*(time_dp - lag(time_dp) over (order by time_dp)) timediff,
scn - lag(scn) over(order by time_dp) scndiff
from smon_scn_time
)
select time_dp , timediff, scndiff,
trunc(scndiff/timediff) rate_per_sec
from t1
order by 1;
set trimspool on
set pages 50000
set lines 132
set tab off
set feedback off
clear break compute;
repfooter off;
ttitle off;
btitle off;
set timing off veri off space 1 flush on pause off termout on numwidth 10;
set echo off feedback off pagesize 50000 linesize 1000 newpage 1 recsep off;
set trimspool on trimout on;
--
-- Request the DB Id and Instance Number, if they are not specified
column instt_num heading "Inst Num" format 99999;
column instt_name heading "Instance" format a12;
column dbb_name heading "DB Name" format a12;
column dbbid heading "DB Id" format a12 just c;
column host heading "Host" format a20;
prompt
prompt
prompt instances IN this workload repository SCHEMA
prompt ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
SELECT DISTINCT ( CASE
WHEN cd.dbid = wr.dbid
AND cd.name = wr.db_name
AND ci.instance_number = wr.instance_number
AND ci.instance_name = wr.instance_name THEN '* '
ELSE ' '
END )
|| wr.dbid dbbid,
wr.instance_number instt_num,
wr.db_name dbb_name,
wr.instance_name inst_name,
wr.host_name host
FROM dba_hist_database_instance wr,
v$database cd,
v$instance ci;
prompt
prompt USING &&dbid FOR DATABASE id
--
-- Set up the binds for dbid and instance_number
variable dbid NUMBER;
BEGIN
:dbid := &dbid;
END;
/
-- Error reporting
whenever SQLERROR EXIT;
variable max_snap_time CHAR(10);
DECLARE
CURSOR cidnum IS
SELECT 'X'
FROM dba_hist_database_instance
WHERE dbid = :dbid;
CURSOR csnapid IS
SELECT To_char(Max(end_interval_time), 'dd/mm/yyyy')
FROM dba_hist_snapshot
WHERE dbid = :dbid;
vx CHAR(1);
BEGIN
-- Check Database Id/Instance Number is a valid pair
OPEN cidnum;
FETCH cidnum INTO vx;
IF cidnum%NOTFOUND THEN
Raise_application_error(-20200, 'Database/Instance '
|| :dbid
|| '/'
||
' does not exist in DBA_HIST_DATABASE_INSTANCE');
END IF;
CLOSE cidnum;
-- Check Snapshots exist for Database Id/Instance Number
OPEN csnapid;
FETCH csnapid INTO :max_snap_time;
IF csnapid%NOTFOUND THEN
Raise_application_error(-20200,
'No snapshots exist for Database/Instance '
||:dbid
||'/');
END IF;
CLOSE csnapid;
END;
/
whenever SQLERROR CONTINUE;
--
-- Ask how many days of snapshots to display
set termout ON;
column instart_fmt noprint;
column inst_name format a12 heading 'Instance';
column db_name format a12 heading 'DB Name';
column snap_id format 99999990 heading 'Snap Id';
column snapdat format a18 heading 'Snap Started' just c;
column lvl format 99 heading 'Snap|Level';
prompt
prompt
prompt specify the NUMBER OF days OF snapshots TO choose FROM
prompt ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prompt entering the NUMBER OF days (n) will result IN the most recent
prompt (n) days OF snapshots being listed. pressing without
prompt specifying a NUMBER LISTS ALL completed snapshots.
prompt
prompt
set heading OFF;
column num_days new_value num_days noprint;
SELECT 'Listing '
|| Decode(Nvl('&&num_days', 3.14), 0, 'no snapshots',
3.14, 'all Completed Snapshots',
1,
'the last day''s Completed Snapshots',
'the last &num_days days of Completed Snapshots'
),
Nvl('&&num_days', 3.14) num_days
FROM sys.dual;
set heading ON;
--
-- List available snapshots
break ON inst_name ON db_name ON host ON instart_fmt skip 1;
ttitle OFF;
SELECT To_char(s.startup_time, 'dd Mon "at" HH24:mi:ss') instart_fmt,
di.instance_name inst_name,
di.db_name db_name,
s.snap_id snap_id,
To_char(s.end_interval_time, 'dd Mon YYYY HH24:mi') snapdat,
s.snap_level lvl
FROM dba_hist_snapshot s,
dba_hist_database_instance di
WHERE s.dbid = :dbid
AND di.dbid = :dbid
AND di.dbid = s.dbid
AND di.instance_number = s.instance_number
AND di.startup_time = s.startup_time
AND s.end_interval_time >= Decode(&num_days, 0, To_date('31-JAN-9999',
'DD-MON-YYYY'
),
3.14, s.end_interval_time,
To_date(:max_snap_time,
'dd/mm/yyyy')
- ( &num_days - 1 ))
ORDER BY db_name,
instance_name,
snap_id;
clear break;
ttitle OFF;
--
-- Ask for the snapshots Id's which are to be compared
prompt
prompt
prompt specify the BEGIN AND END SNAPSHOT ids
prompt ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prompt BEGIN SNAPSHOT id specified: &&begin_snap
prompt
prompt END SNAPSHOT id specified: &&end_snap
prompt
--
-- Set up the snapshot-related binds
--
variable bid NUMBER;
variable eid NUMBER;
BEGIN
:bid := &begin_snap;
:eid := &end_snap;
END;
/
prompt
--
-- Ask for Statistics Name Filter
--
prompt
prompt
prompt search statistic
prompt ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prompt search BY STATISTICS name. pressing without
prompt specifying anything show ALL STATISTICS.
set heading OFF;
column stat_search new_value stat_search noprint;
SELECT 'Statistic Name Filter: '
|| Nvl('&&stat_search', '%'),
Nvl('&&stat_search', '%') stat_search
FROM sys.dual;
set heading ON;
column stat_id heading "Statistic ID" format 9999999999999;
column name heading "Statistic Name" format a64;
column class_name heading "Statistic Class" format a10;
SELECT stat_id,
( CASE
WHEN class = 1 THEN 'USER'
WHEN class = 2 THEN 'REDO'
WHEN class = 4 THEN 'ENQUEUE'
WHEN class = 8 THEN 'CACHE'
WHEN class = 16 THEN 'OS'
WHEN class = 32 THEN 'RAC'
WHEN class = 40 THEN 'RAC-CACHE'
WHEN class = 64 THEN 'SQL'
WHEN class = 72 THEN 'SQL-CACHE'
WHEN class = 128 THEN 'DEBUG'
ELSE To_char(class)
END ) CLASS_NAME,
name
FROM v$sysstat
WHERE Upper(name) LIKE Trim(Upper('%&stat_search%'))
ORDER BY class,
name
/
--
-- Ask for the statistics
variable stat_filter_id NUMBER
variable stat_filter_name VARCHAR2(64)
prompt
prompt
prompt specify the STATISTICS
prompt ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prompt enter STATISTICS id OR STATISTICS name.
prompt
BEGIN
SELECT To_number('&&stat_input')
INTO :stat_filter_id
FROM dual;
EXCEPTION
WHEN invalid_number THEN
:stat_filter_name := '&stat_input';
END;
/
prompt STATISTICS specified : &&stat_input
column end_interval_time heading 'Snap Started' format a18 just c;
column dbid heading 'DB Id' format a12 just c;
column instance_number heading 'Inst|Num' format 99999;
column elapsed heading 'Elapsed' format 999999;
column stat_value heading 'Stat Value' format 999999999999
column stat_name heading 'Stat Name' format a64 just l;
SELECT snap_id,
To_char(dbid) DBID,
instance_number,
elapsed,
To_char(end_interval_time, 'dd Mon YYYY HH24:mi') END_INTERVAL_TIME,
--stat_name,
( CASE
WHEN stat_value > 0 THEN stat_value
ELSE 0
END ) STAT_VALUE
FROM (SELECT snap_id,
dbid,
instance_number,
elapsed,
end_interval_time,
stat_name,
( stat_value - Lag (stat_value, 1, stat_value)
over (
PARTITION BY dbid, instance_number
ORDER BY snap_id) ) AS STAT_VALUE
FROM (SELECT snap_id,
dbid,
instance_number,
elapsed,
end_interval_time,
stat_name,
SUM(stat_value) AS STAT_VALUE
FROM (SELECT X.snap_id,
X.dbid,
X.instance_number,
Trunc(SN.end_interval_time, 'mi')
END_INTERVAL_TIME,
X.stat_name,
Trunc(( Cast(SN.end_interval_time AS DATE) -
Cast(SN.begin_interval_time AS DATE) ) *
86400) ELAPSED,
( CASE
WHEN ( X.stat_name = :stat_filter_name
OR X.stat_id = :stat_filter_id ) THEN
X.value
ELSE 0
END ) AS STAT_VALUE
FROM dba_hist_sysstat X,
dba_hist_snapshot SN,
(SELECT instance_number,
Min(startup_time) STARTUP_TIME
FROM dba_hist_snapshot
WHERE snap_id BETWEEN :bid AND :eid
GROUP BY instance_number) MS
WHERE X.snap_id = sn.snap_id
AND X.dbid = sn.dbid
AND x.dbid = :dbid
AND x.snap_id BETWEEN :bid AND :eid
AND SN.startup_time = MS.startup_time
AND SN.instance_number = MS.instance_number
AND X.instance_number = sn.instance_number
AND ( X.stat_name = :stat_filter_name
OR X.stat_id = :stat_filter_id ))
GROUP BY snap_id,
dbid,
instance_number,
elapsed,
end_interval_time,
stat_name));
undefine dbid
undefine num_days
undefine begin_snap
undefine end_snap
undefine stat_id
undefine stat_search
undefine stat_filter_name
undefine stat_filter_id
undefine stat_input
---该脚本结束。
set numwidth 17
set pages 1000
alter session set nls_date_format='DD/Mon/YYYY HH24:MI:SS';
SELECT tim, gscn,
round(rate),
round((chk16kscn - gscn)/24/3600/16/1024,1) "Headroom"
FROM
(
select tim, gscn, rate,
((
((to_number(to_char(tim,'YYYY'))-1988)*12*31*24*60*60) +
((to_number(to_char(tim,'MM'))-1)*31*24*60*60) +
(((to_number(to_char(tim,'DD'))-1))*24*60*60) +
(to_number(to_char(tim,'HH24'))*60*60) +
(to_number(to_char(tim,'MI'))*60) +
(to_number(to_char(tim,'SS')))
) * (16*1024)) chk16kscn
from
(
select FIRST_TIME tim , FIRST_CHANGE# gscn,
((NEXT_CHANGE#-FIRST_CHANGE#)/
((NEXT_TIME-FIRST_TIME)*24*60*60)) rate
from v$archived_log
where (next_time > first_time)
)
)
order by 1,2
;