Sanitize Java.

[deliverable/binutils-gdb.git] / .Sanitize

diff --git a/.Sanitize b/.Sanitize
index 3de6800d5ce69112d7ba90c0ddb6bd9635457142..426cc4cd94ededfa4cc09f0b4f516d7c0e989c26 100644 (file)
--- a/.Sanitize
+++ b/.Sanitize
@@ -137,6 +137,15 @@ else
        lose_these_too="${lose_these_too} ${cgen_files}"
 fi
 
+# Java stuff
+java_files="boehm-gc libjava"
+
+if (echo $* | grep keep\-java > /dev/null); then
+       keep_these_too="${keep_these_too} ${java_files}"
+else
+       lose_these_too="${lose_these_too} ${java_files}"
+fi
+
 # This top-level directory is special.  We often check out only subsets
 # of this directory, and complaining about directories or files we didn't
 # check out just gets obnoxious.
@@ -655,6 +664,34 @@ else
        done
 fi
 
+java_files="ChangeLog Makefile.in configure.in"
+if ( echo $* | grep keep\-java > /dev/null ) ; then
+       for i in $java_files ; do
+               if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Keeping java stuff in $i
+                       fi
+               fi
+       done
+else
+       for i in * ; do
+               if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Removing traces of \"java\" from $i...
+                       fi
+                       cp $i new
+                       sed '/start\-sanitize\-java/,/end-\sanitize\-java/d' < $i > new
+                       if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
+                               if [ -n "${verbose}" ] ; then
+                                       echo Caching $i in .Recover...
+                               fi
+                               mv $i .Recover
+                       fi
+                       mv new $i
+               fi
+       done
+fi
+
 kcygnus_files="ChangeLog configure configure.in Makefile.in"
 if ( echo $* | grep keep\-cygnus > /dev/null ) ; then
        for i in $kcygnus_files ; do