分析索引的碎片化程度，并重建索引

-- 分析索引的碎片化程度

ANALYZE INDEX &index_name VALIDATE STRUCTURE;   
col name heading 'Index Name' format a30   
col del_lf_rows heading 'Deleted|Leaf Rows' format 99999999   
col lf_rows_used heading 'Used|Leaf Rows' format 99999999   
col ratio heading '% Deleted|Leaf Rows' format 999.99999   
SELECT name,   
del_lf_rows,   
lf_rows - del_lf_rows lf_rows_used,   
to_char(del_lf_rows / (lf_rows)*100,'999.99999') ratio   
FROM index_stats where name = upper('&index_name');

-- 重建索引

SET ECHO OFF;   
SET FEEDBACK OFF;   
SET VERIFY OFF;   
SET PAGESIZE 0;   
SET TERMOUT ON;   
SET HEADING OFF;   
ACCEPT username CHAR PROMPT 'Enter the index username: ';   
spool /oracle/rebuild_&username.sql;   
SELECT   
'REM +-----------------------------------------------+' || chr(10) ||   
'REM | INDEX NAME : ' || owner || '.' || segment_name   
|| lpad('|', 33 - (length(owner) + length(segment_name)) )   
|| chr(10) ||   
'REM | BYTES : ' || bytes   
|| lpad ('|', 34-(length(bytes)) ) || chr(10) ||   
'REM | EXTENTS : ' || extents   
|| lpad ('|', 34-(length(extents)) ) || chr(10) ||   
'REM +-----------------------------------------------+' || chr(10) ||   
'ALTER INDEX ' || owner || '.' || segment_name || chr(10) ||   
'REBUILD ' || chr(10) ||   
'TABLESPACE ' || tablespace_name || chr(10) ||   
'STORAGE ( ' || chr(10) ||   
' INITIAL ' || initial_extent || chr(10) ||   
' NEXT ' || next_extent || chr(10) ||   
' MINEXTENTS ' || min_extents || chr(10) ||   
' MAXEXTENTS ' || max_extents || chr(10) ||   
' PCTINCREASE ' || pct_increase || chr(10) ||   
');' || chr(10) || chr(10)   
FROM dba_segments   
WHERE segment_type = 'INDEX'   
AND owner='&username'   
ORDER BY owner, bytes DESC;   
spool off;