#!/usr/bin/ksh
#whatundo ()
#------------------------------------------------------------------------------#
#    Module Name:  whatundo                                                    #
#                                                                              #
#    Purpose:      Report on the UnDo Tablespace Contents.                     #
#    Support Note: 420525.1 Automatic Tuning of Undo_retention Space Problems  #
#    Resolution:   ALTER DATABASE DATAFILE '<datafile_name>'                   #
#                        AUTOEXTEND ON MAXSIZE <current_size>                  #
#                                                                              #
#    Maintenance                                                               #
#    Date          Author        Description                                   #
#    -----------   ------------  --------------------------------------------  #
#    10-Oct-2009   D.Channell    Module design/creation                        #
#                  M.Barone      Module design/creation                        #
#------------------------------------------------------------------------------#
{
        DIRNAM=$(dirname $0)
        ORASID=$(echo $CONTEXT_NAME | cut -f1 -d'_')
        HNAME=$(uname -n)

        #----------------------------------------------------------------------#
        #  TEST:  Number ($#) of arguments passed to this function?            #
        #----------------------------------------------------------------------#
        if      [ $# = 0 ]
        then
            clear
            echo
            echo  " #--------------------------------------------------------#"
            echo  " # whatundo:                         Oracle UnDo Contents #"
            echo  " #--------------------------------------------------------#"
            echo
            echo  " Connecting as SYSDBA"
            sleep 2

            clear
        else
            PASSWD=$1
            clear
        fi

#------------------------------------------------------------------------------#
#  Initialize                                                                  #
#------------------------------------------------------------------------------#
        SPOOLNM=/tmp/whatundo_$$.txt

#------------------------------------------------------------------------------#
#  SQL*Plus ("Here-Document")                                                  #
#------------------------------------------------------------------------------#
sqlplus  -s  /nolog  <<-END_FILE

        CONNECT /  AS SYSDBA

        SPOOL ${SPOOLNM}

        clear   BREAKS
        clear   BUFFER
        clear   COLUMNS
        clear   COMPUTES
        clear   SCREEN
        clear   SQL
        clear   TIMING

        set     feedback        off
        set     flush           on
        set     heading         on
        set     pause           off
        set     space           1
        set     termout         on
        set     verify          on
        set     linesize        80
        set     pagesize        999

        prompt #---------------------------------------------------------------#
        prompt #- What (whatundo)                                             -#
        prompt #---------------------------------------------------------------#

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN  undocnt	FORMAT  999999999999 Heading 'Apps_UnDoTS1|Segments'
        COLUMN  undobyt	FORMAT  999999999999 Heading 'Apps_UnDoTS1|Bytes'
        COLUMN  status	FORMAT  A10 Heading 'Undo|Extent|Status'

        TTITLE  LEFT    DATEVAR                                         -
                RIGHT   'Page:'         FORMAT 999 SQL.pno              -
                CENTER  'Tablespace AutoExtend DBA Report'      skip 1  -
                LEFT    TIMEVAR                                         -
                CENTER  'Oracle Tablespace/File Name'           skip 2

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')   datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
		COUNT(segment_name)	undocnt,
		sum(bytes/1024/1024)	undobyt,
		status
	FROM	dba_undo_extents group by status;

	prompt
	prompt
	prompt


        prompt #----------------------------------------------------------#
        prompt #- Oracle Database Freespace              (whatfreespace) -#
        prompt #----------------------------------------------------------#

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

	COLUMN tsname   FORMAT A17		HEADING  "TableSpace"
	COLUMN nfiles   FORMAT 990		HEADING  "Num|DBFs"
	COLUMN nfrags   FORMAT 9990		HEADING  "Free|Frag"
	COLUMN mxfrag   FORMAT 9,999,990	HEADING  "Largest|Frag (Kb)"
	COLUMN usedsize FORMAT 999,999,999,990	HEADING  "Used|Space(Kb)"
	COLUMN freesize FORMAT 999,999,990	HEADING  "Free|Space(Kb)"
	COLUMN totsize  FORMAT 999,999,999,990	HEADING  "Total|Space(Kb)"
	COLUMN pctusd   FORMAT 990		HEADING  "Pct|Used"

	BREAK  on REPORT

        TTITLE  CENTER  '${ORASID} (${HNAME}) eBusiness Report '          -
                LEFT    DATEVAR                                   skip 1  -
                CENTER  'eBusiness 12 eBusiness Database Freespace'       -
                LEFT    TIMEVAR                                   skip 2

	COMPUTE sum of nfiles nfrags totsize usedsize freesize on report

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')		datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')		timevalue,
                total.tablespace_name			tsname,
                total.nfiles,
                free.nfrags,
                total.totsize,
                (total.totsize - free.freesize)	usedsize,
                free.freesize,
                round(((1-(free.freesize/total.totsize))*100 ),0) pctusd
        FROM    (SELECT    tablespace_name,
	          count(*)	nfiles,
                 round((sum(bytes)/(1024)),0)	totsize
                 FROM      dba_data_files
                 GROUP     by tablespace_name ) total,
                (SELECT    tablespace_name,
                           count(*)		nfrags,
                 round(nvl((sum(bytes)/(1024)),0),0)        freesize
                 FROM    dba_free_space
                 WHERE   tablespace_name = 'APPS_UNDOTS1'
                 GROUP BY tablespace_name
        UNION
        (SELECT  tablespace_name, 0, 0 from dba_data_files
          MINUS
         SELECT  tablespace_name, 0, 0 from dba_free_space)) free
          WHERE  total.tablespace_name = free.tablespace_name
            AND  total.tablespace_name like upper('%')
	 ORDER  BY 7 ;

END_FILE

print
print  "Please see  /tmp/whatundo_$$.txt"
print
}
