home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a522 / 19.ddi / ESTAT.SQL < prev    next >
Encoding:
Text File  |  1989-04-04  |  4.7 KB  |  141 lines
  1. Rem Copyright (c) 1988 by Oracle Corporation
  2. Rem NAME
  3. Rem    ESTAT.SQL - collect Ending STATistics
  4. Rem  FUNCTION
  5. Rem    This script will generate a report (in "report.txt") which will contain
  6. Rem    usefull information for performance monitoring.  In particular
  7. Rem    information from v$sysstat, v$latch, and v$rollstat.
  8. Rem  NOTES
  9. Rem    Don't worry about errors during "drop table"s, they are normal.
  10. Rem  MODIFIED
  11. Rem   Loaiza     04/04/89 - fix run dates to do minutes instead of months
  12. Rem   Loaiza     03/31/89 - add kqrst usage column
  13. Rem   Jloaiza    03/16/89 - improve names and formats
  14. Rem   Jloaiza    03/09/89 - make kqrst columns intelligible
  15. Rem   Jloaiza    02/23/89 - changed table names, added dates
  16. Rem   Martin     02/22/89 - Creation
  17. set echo on;
  18. connect internal;
  19.  
  20. drop table stats$stats;
  21. drop table stats$latches;
  22. drop table stats$roll;
  23. drop table stats$files;
  24. drop table stats$kqrst;
  25. drop table stats$end_stats;
  26. drop table stats$end_latch;
  27. drop table stats$end_roll;
  28. drop table stats$end_file;
  29. drop table stats$end_kqrst;
  30. create table stats$end_stats as select * from v$sysstat;
  31. create table stats$end_latch as select * from v$latch;
  32. create table stats$end_roll as select rownum undo#,rssize,gets,waits,writes from v$rollstat;
  33. create table stats$end_file as select * from stats$file_view;
  34. create table stats$end_kqrst as select * from x$kqrst;
  35.  
  36. create table stats$stats as
  37. select  e.value-b.value change , n.name
  38.     from v$statname n ,  stats$begin_stats b , stats$end_stats e
  39.     where n.statistic# = b.statistic# and n.statistic# = e.statistic#;
  40.  
  41. create table stats$latches as
  42. select 
  43.     e.waits-b.waits waits, 
  44.     e.immediates-b.immediates immediates,
  45.     e.timeouts-b.timeouts timeouts,
  46.     e.nowaits-b.nowaits nowaits,
  47.     e.successes-b.successes successes ,
  48.     n.name
  49.     from v$latchname n ,  stats$begin_latch b , stats$end_latch e
  50.     where n.latch# = b.latch# and n.latch# = e.latch#;
  51.  
  52. create table stats$roll as
  53. select  e.gets-b.gets trans_tbl_gets, 
  54.     e.waits-b.waits trans_tbl_waits, 
  55.     e.writes-b.writes undo_bytes_written,
  56.     e.rssize segment_size_bytes
  57.     from stats$begin_roll b , stats$end_roll e
  58.         where e.undo# = b.undo#;
  59.  
  60. create table stats$files as
  61. select b.ts table_space,
  62.        b.name file_name,
  63.        e.pyr-b.pyr phys_reads,
  64.        e.pbr-b.pbr phys_blks_rd,
  65.        e.prt-b.prt phys_rd_time,
  66.        e.pyw-b.pyw phys_writes,
  67.        e.pbw-b.pbw phys_blks_wr,
  68.        e.pwt-b.pwt phys_wrt_tim
  69.   from stats$begin_file b, stats$end_file e
  70.  where b.name=e.name;
  71.  
  72. create table stats$kqrst as
  73. select 
  74.        b.kqrsttxt name,
  75.        e.kqrstgrq-b.kqrstgrq get_reqs,
  76.        e.kqrstgmi-b.kqrstgmi get_miss,
  77.        e.kqrstsrq-b.kqrstsrq scan_reqs,
  78.        e.kqrstsmi-b.kqrstsmi scan_miss,
  79.        e.kqrstmrq-b.kqrstmrq mod_reqs,
  80.        e.kqrstusg cur_usage
  81. from stats$begin_kqrst b, stats$end_kqrst e
  82. where b.indx=e.indx;
  83.  
  84. insert into stats$dates 
  85.    select to_char(sysdate, 'dd-mon-yy hh:mi:ss') from stats$dual;
  86.  
  87. spool report.txt;
  88. set charwidth 30;
  89. set numwidth 11;
  90. rem The total is the total value of the statistic between the time
  91. rem bstat was run and the time estat was run.
  92. select n1.name "Statistic", 
  93.        n1.change "Total", 
  94.        trunc(n1.change/n2.change,2) "Per Trans" 
  95.    from stats$stats n1, stats$stats n2
  96.    where n2.name='user commits'
  97.    order by n1.name;
  98. set charwidth 48;
  99. set numwidth 12;
  100. rem I/O should be spread evenly accross drives. A big difference between
  101. rem phys_reads and phys_blks_rd implies table scans are going on.
  102. select * from stats$files;
  103. set charwidth 26;
  104. set numwidth 9;
  105. rem Timeouts should be low.  Successes should be very close to nowaits.
  106. select name, waits, immediates, timeouts, nowaits, successes from stats$latches order by name;
  107. set numwidth 19;
  108. rem Waits_for_trans_tbl high implies you should add rollback segments.
  109. select * from stats$roll;
  110. set charwidth 20;
  111. set numwidth 8;
  112. rem get_miss and scan_miss should be very low compared to the requests.
  113. rem cur_usage is the number of entries in the cache that are being used.
  114. select * from stats$kqrst;
  115. rem The init.ora parameters currently in effect:
  116. show parameters;
  117. rem The times that bstat and estat were run.
  118. select * from stats$dates;
  119. spool off;
  120.  
  121. drop table stats$dual;
  122. drop table stats$dates;
  123. drop table stats$begin_stats;
  124. drop table stats$begin_latch;
  125. drop table stats$begin_roll;
  126. drop table stats$begin_file;
  127. drop table stats$begin_kqrst;
  128. drop view stats$file_view;
  129. drop table stats$stats;
  130. drop table stats$latches;
  131. drop table stats$roll;
  132. drop table stats$files;
  133. drop table stats$kqrst;
  134. drop table stats$end_stats;
  135. drop table stats$end_latch;
  136. drop table stats$end_roll;
  137. drop table stats$end_file;
  138. drop table stats$end_kqrst;
  139. disconnect;
  140.  
  141.