2026-03-12 20:23:15

idev/dba_file_use_7.sql

@@ -0,0 +1,174 @@
+-- +----------------------------------------------------------------------------+
+-- |                          Jeffrey M. Hunter                                 |
+-- |                      jhunter@idevelopment.info                             |
+-- |                         www.idevelopment.info                              |
+-- |----------------------------------------------------------------------------|
+-- |      Copyright (c) 1998-2012 Jeffrey M. Hunter. All rights reserved.       |
+-- |----------------------------------------------------------------------------|
+-- | DATABASE : Oracle                                                          |
+-- | FILE     : dba_file_use_7.sql                                              |
+-- | CLASS    : Database Administration                                         |
+-- | PURPOSE  : Reports on all datafiles/controlfiles/redo log files. This      |
+-- |            script was designed to work with Oracle7 and Oracle8. This      |
+-- |            script can be run against higher database versions (i.e.        |
+-- |            Oracle8i) but will not return information about true TEMPORARY  |
+-- |            tablespaces. (i.e. use of "tempfiles")                          |
+-- | NOTE     : As with any code, ensure to test this script in a development   |
+-- |            environment before attempting to run it in production.          |
+-- +----------------------------------------------------------------------------+
+
+SET TERMOUT OFF;
+COLUMN current_instance NEW_VALUE current_instance NOPRINT;
+SELECT rpad(instance_name, 17) current_instance FROM v$instance;
+SET TERMOUT ON;
+
+PROMPT 
+PROMPT +------------------------------------------------------------------------+
+PROMPT | Report   : File Usage                                                  |
+PROMPT | Instance : &current_instance                                           |
+PROMPT +------------------------------------------------------------------------+
+
+SET ECHO        OFF
+SET FEEDBACK    6
+SET HEADING     ON
+SET LINESIZE    180
+SET PAGESIZE    50000
+SET TERMOUT     ON
+SET TIMING      OFF
+SET TRIMOUT     ON
+SET TRIMSPOOL   ON
+SET VERIFY      OFF
+
+CLEAR COLUMNS
+CLEAR BREAKS
+CLEAR COMPUTES
+
+COLUMN db NEW_VALUE xdb NOPRINT FORMAT a1
+
+COLUMN type        FORMAT a8                  HEADING 'Type'
+COLUMN tablespace  FORMAT a30                 HEADING 'Tablspace'
+COLUMN filename    FORMAT a55                 HEADING 'Filename'
+COLUMN filesize    FORMAT 9,999,999,999,999   HEADING 'File Size'
+COLUMN stat        FORMAT a10                 HEADING 'Status'
+COLUMN seq         FORMAT 9999                HEADING 'Sequence'
+COLUMN arc         FORMAT a4                  HEADING 'Archived'
+
+SET TERMOUT OFF
+SELECT name db
+FROM   v$database;
+SET TERMOUT ON
+
+SELECT
+    'Data'                        type
+  , tablespace_name               tablespace
+  , REPLACE(file_name,'?','&xdb') filename
+  , bytes                         filesize
+  , DECODE(status,'AVAILABLE','Available','INVALID','Invalid','****') stat
+  , 0                              seq
+  , ''                             arc
+FROM dba_data_files
+UNION
+SELECT
+    'Redo'
+  , 'Grp ' || a.group#
+  , member
+  , bytes
+  , DECODE(b.status,'CURRENT','Current','INACTIVE','Inactive','UNUSED','Unused','****')
+  , sequence#
+  , archived
+FROM
+    v$logfile  a
+  , v$log      b
+WHERE
+    a.group# = b.group#
+UNION
+SELECT
+    'Parm'
+  , 'Ctrl 1'
+  , REPLACE(NVL(LTRIM(SUBSTR(value,1,instr(value||',',',',1,1)-1)),'  (none)'),
+   '?','&xdb') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter
+WHERE
+    name = 'control_files'
+UNION
+SELECT
+    'Parm'
+  , 'Ctrl 2'
+  , REPLACE(nvl(ltrim(substr(value,instr(value||',',',',1,1)+1,
+    instr(value||',',',',1,2)-instr(value||',',',',1,1)-1)),'  (none)'),
+    '?' ,'&xdb') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter
+WHERE
+    name = 'control_files'
+UNION
+SELECT
+    'Parm'
+  , 'Ctrl 3'
+  , REPLACE(nvl(ltrim(substr(value,instr(value||',',',',1,2)+1,
+    instr(value||',',',',1,3)-instr(value||',',',',1,2)-1)),'  (none)'),
+    '?','&xdb') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter
+WHERE
+    name = 'control_files'
+UNION
+SELECT
+    'Parm'
+  , 'Ctrl 4'
+  , REPLACE(nvl(ltrim(substr(value,instr(value||',',',',1,3)+1,
+    instr(value||',',',',1,4)-instr(value||',',',',1,3)-1)),'  (none)'),
+    '?','&xdb') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter
+WHERE
+    name = 'control_files'
+UNION
+SELECT
+    'Parm'
+  , 'Ifile'
+  , REPLACE(value,'?','&xdb') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter
+WHERE
+    name = 'ifile'
+UNION
+SELECT
+    'Parm'
+  , 'Archive'
+  , DECODE(d.log_mode, 'ARCHIVELOG',
+                       REPLACE(p.value,'?','&xdb') || ' - ENABLED',
+                       REPLACE(p.value,'?','&xdb') || ' - Disabled') file_name
+  , 0
+  , ''
+  , 0
+  , ''
+FROM
+    v$parameter p
+  , v$database  d
+WHERE
+    p.name = 'log_archive_dest'
+ORDER BY 1,2,3
+/
+