~ubuntu-branches/ubuntu/maverick/krb5/maverick

#!/bin/sh

 

files=vg.*

 

logname() {

#       sed -n -e 7p $1 | awk '{print $2}'

#       head -7 $1 | tail -1 | awk '{print $2}'

        awk '{ if (NR == 9) { print $2; exit 0; } }' $1

}

 

show_names() {

        if test "$*" = "$files" ; then

                return

        fi

        for f in $* ; do

                echo $f : `logname $f`

        done

}

 

discard_list="/bin/ps /bin/sh /bin/stty /usr/bin/cmp awk cat chmod cmp cp env expr find grep kill mv rev rlogin rm sed sh sleep sort tail test touch wc whoami xargs"

discard_list="$discard_list tcsh tokens"

#discard_list="$discard_list ./rtest ./dbtest"

# The t_inetd program's logs seem to always wind up incomplete for some

# reason.  It's also not terribly important.

discard_list="$discard_list /path/to/.../t_inetd"

 

filter() {

        if test "$*" = "$files" ; then

                return

        fi

        for f in $* ; do

                n=`logname $f`

                for d in $discard_list; do

                        if test "$n" = "$d"; then

                                echo rm $f : $n

                                rm $f

                                break

                        fi

                done

        done

}

 

kill_error_free_logs() {

        if test "$*" = "$files" ; then

                return

        fi

        grep -l "ERROR SUMMARY: 0 errors" $* | while read name ; do

                echo rm $name : no errors in `logname $name`

                rm $name

        done

}

 

kill_no_leak_logs() {

        if test "$*" = "$files" ; then

            return

        fi

        grep -l "ERROR SUMMARY: 0 errors" $* | \

            grep -l "definitely lost: 0 bytes" $* | \

            xargs grep -l "possibly lost: 0 bytes" | \

            xargs grep -l "still reachable: 0 bytes in 0 blocks" | \

            while read name ; do

            echo rm $name : no leaks or errors in `logname $name`

            rm $name

        done

}

 

filter $files

kill_error_free_logs $files

#kill_no_leak_logs $files

echo Remaining files:

show_names $files