gdb/.Sanitize

   1 # .Sanitize for devo/gdb.
   2
   3 # Each directory to survive its way into a release will need a file
   4 # like this one called "./.Sanitize".  All keyword lines must exist,
   5 # and must exist in the order specified by this file.  Each directory
   6 # in the tree will be processed, top down, in the following order.
   7
   8 # Hash started lines like this one are comments and will be deleted
   9 # before anything else is done.  Blank lines will also be squashed
  10 # out.
  11
  12 # The lines between the "Do-first:" line and the "Things-to-keep:"
  13 # line are executed as a /bin/sh shell script before anything else is
  14 # done in this directory.
  15
  16 Do-first:
  17
  18 gdbtk_files="ChangeLog-gdbtk README.GDBTK gdbtk.c gdbtk.h gdbtk-cmds.c gdbtk-hooks.c gdbtcl2 gdb.rc gdbtool.ico"
  19
  20 if ( echo $* | grep lose\-gdbtk > /dev/null ) ; then
  21         lose_these_too="${gdbtk_files} ${lose_these_too}"
  22         if [ -n "${verbose}" ] ; then
  23                 echo Deleting ${gdbtk_files}
  24         fi
  25 else
  26         keep_these_too="${gdbtk_files} ${keep_these_too}"
  27         if [ -n "${verbose}" ] ; then
  28                 echo Keeping ${gdbtk_files}
  29         fi
  30 fi
  31
  32 tic80_files="tic80-tdep.c"
  33
  34 if ( echo $* | grep keep\-tic80 > /dev/null ) ; then
  35         keep_these_too="${tic80_files} ${keep_these_too}"
  36         if [ -n "${verbose}" ] ; then
  37                 echo Keeping ${tic80_files}
  38         fi
  39 else
  40         lose_these_too="${tic80_files} ${lose_these_too}"
  41         if [ -n "${verbose}" ] ; then
  42                 echo Deleting ${tic80_files}
  43         fi
  44 fi
  45
  46 sky_files="txvu-tdep.c"
  47
  48 if ( echo $* | grep keep\-sky > /dev/null ) ; then
  49         keep_these_too="${sky_files} ${keep_these_too}"
  50         if [ -n "${verbose}" ] ; then
  51                 echo Keeping ${sky_files}
  52         fi
  53 else
  54         lose_these_too="${sky_files} ${lose_these_too}"
  55         if [ -n "${verbose}" ] ; then
  56                 echo Deleting ${sky_files}
  57         fi
  58 fi
  59
  60 java_files="jv-exp.y jv-lang.c jv-lang.h jv-typeprint.c jv-valprint.c"
  61
  62 if ( echo $* | grep keep\-java > /dev/null ) ; then
  63         keep_these_too="${java_files} ${keep_these_too}"
  64         if [ -n "${verbose}" ] ; then
  65                 echo Keeping ${java_files}
  66         fi
  67 else
  68         lose_these_too="${java_files} ${lose_these_too}"
  69         if [ -n "${verbose}" ] ; then
  70                 echo Deleting ${java_files}
  71         fi
  72 fi
  73
  74 vr4111_files="nec4102rom.c"
  75
  76 if ( echo $* | grep keep\-vr4111 > /dev/null ) ; then
  77         keep_these_too="${vr4111_files} ${keep_these_too}"
  78         if [ -n "${verbose}" ] ; then
  79                 echo Keeping ${vr4111_files}
  80         fi
  81 else
  82         lose_these_too="${vr4111_files} ${lose_these_too}"
  83         if [ -n "${verbose}" ] ; then
  84                 echo Deleting ${vr4111_files}
  85         fi
  86 fi
  87
  88 carp_files="carp-tdep.c"
  89
  90 if ( echo $* | grep keep\-carp > /dev/null ) ; then
  91         keep_these_too="${carp_files} ${keep_these_too}"
  92         if [ -n "${verbose}" ] ; then
  93                 echo Keeping ${carp_files}
  94         fi
  95 else
  96         lose_these_too="${carp_files} ${lose_these_too}"
  97         if [ -n "${verbose}" ] ; then
  98                 echo Deleting ${carp_files}
  99         fi
 100 fi
 101
 102 # All files listed between the "Things-to-keep:" line and the
 103 # "Files-to-sed:" line will be kept.  All other files will be removed.
 104 # Directories listed in this section will have their own Sanitize
 105 # called.  Directories not listed will be removed in their entirety
 106 # with rm -rf.
 107
 108 Things-to-keep:
 109
 110 29k-share
 111 COPYING
 112 ChangeLog
 113 ChangeLog-3.x
 114 ChangeLog-9091
 115 ChangeLog-92
 116 ChangeLog-93
 117 ChangeLog-94
 118 ChangeLog-95
 119 ChangeLog-96
 120 ChangeLog-97
 121 Makefile.in
 122 NEWS
 123 README
 124 TODO
 125 a29k-tdep.c
 126 a68v-nat.c
 127 abug-rom.c
 128 acconfig.h
 129 aclocal.m4
 130 alpha-nat.c
 131 alpha-tdep.c
 132 altos-xdep.c
 133 annotate.c
 134 annotate.h
 135 arc-tdep.c
 136 arm-convert.s
 137 arm-tdep.c
 138 arm-xdep.c
 139 ax-gdb.c
 140 ax-gdb.h
 141 ax-general.c
 142 ax.h
 143 bcache.c
 144 bcache.h
 145 blockframe.c
 146 breakpoint.c
 147 breakpoint.h
 148 buildsym.c
 149 buildsym.h
 150 c-exp.y
 151 c-lang.c
 152 c-lang.h
 153 c-typeprint.c
 154 c-valprint.c
 155 call-cmds.h
 156 ch-exp.c
 157 ch-lang.c
 158 ch-lang.h
 159 ch-typeprint.c
 160 ch-valprint.c
 161 coff-solib.c
 162 coff-solib.h
 163 coffread.c
 164 command.c
 165 command.h
 166 complaints.c
 167 complaints.h
 168 config
 169 config.in
 170 configure
 171 configure.host
 172 configure.in
 173 configure.tgt
 174 convex-tdep.c
 175 convex-xdep.c
 176 copying.awk
 177 copying.c
 178 core-aout.c
 179 core-regset.c
 180 core-sol2.c
 181 corefile.c
 182 corelow.c
 183 cp-valprint.c
 184 cpu32bug-rom.c
 185 cxux-nat.c
 186 d10v-tdep.c
 187 d30v-tdep.c
 188 dbug-rom.c
 189 dbxread.c
 190 dcache.c
 191 dcache.h
 192 debugify.c
 193 debugify.h
 194 defs.h
 195 delta68-nat.c
 196 demangle.c
 197 dink32-rom.c
 198 doc
 199 dpx2-nat.c
 200 dsrec.c
 201 dst.h
 202 dstread.c
 203 dve3900-rom.c
 204 dwarf2read.c
 205 dwarfread.c
 206 elfread.c
 207 environ.c
 208 environ.h
 209 eval.c
 210 exc_request.defs
 211 exec.c
 212 expprint.c
 213 expression.h
 214 f-exp.y
 215 f-lang.c
 216 f-lang.h
 217 f-typeprint.c
 218 f-valprint.c
 219 findvar.c
 220 fork-child.c
 221 fr30-tdep.c
 222 frame.h
 223 gdb-stabs.h
 224 gdb.1
 225 gdb.gdb
 226 gdb_stat.h
 227 gdb_string.h
 228 gdba.el
 229 gdbcmd.h
 230 gdbcore.h
 231 gdbinit.in
 232 gdbserver
 233 gdbthread.h
 234 gdbtypes.c
 235 gdbtypes.h
 236 gnu-nat.c
 237 gnu-nat.h
 238 gnu-regex.c
 239 gnu-regex.h
 240 go32-xdep.c
 241 gould-tdep.c
 242 gould-xdep.c
 243 h8300-tdep.c
 244 h8500-tdep.c
 245 hp300ux-nat.c
 246 hppa-tdep.c
 247 hppab-nat.c
 248 hppah-nat.c
 249 hppam3-nat.c
 250 hpread.c
 251 hpux-thread.c
 252 i386-stub.c
 253 i386-tdep.c
 254 i386aix-nat.c
 255 i386b-nat.c
 256 i386gnu-nat.c
 257 i386ly-tdep.c
 258 i386m3-nat.c
 259 i386mach-nat.c
 260 i386v-nat.c
 261 i386v4-nat.c
 262 i387-tdep.c
 263 i960-tdep.c
 264 infcmd.c
 265 inferior.h
 266 inflow.c
 267 infptrace.c
 268 infrun.c
 269 inftarg.c
 270 irix4-nat.c
 271 irix5-nat.c
 272 isi-xdep.c
 273 kdb-start.c
 274 language.c
 275 language.h
 276 lynx-nat.c
 277 m2-exp.y
 278 m2-lang.c
 279 m2-lang.h
 280 m2-typeprint.c
 281 m2-valprint.c
 282 m3-nat.c
 283 m32r-rom.c
 284 m32r-stub.c
 285 m32r-tdep.c
 286 m68k-stub.c
 287 m68k-tdep.c
 288 m68knbsd-nat.c
 289 m88k-nat.c
 290 m88k-tdep.c
 291 mac-defs.h
 292 mac-gdb.r
 293 mac-nat.c
 294 mac-xdep.c
 295 main.c
 296 maint.c
 297 mdebugread.c
 298 mem-break.c
 299 minimon.h
 300 minsyms.c
 301 mips-nat.c
 302 mips-tdep.c
 303 mipsm3-nat.c
 304 mipsread.c
 305 mipsv4-nat.c
 306 mn10200-tdep.c
 307 mn10300-tdep.c
 308 mon960-rom.c
 309 monitor.c
 310 monitor.h
 311 mpw-config.in
 312 mpw-make.sed
 313 msg.defs
 314 msg_reply.defs
 315 news-xdep.c
 316 nindy-share
 317 nindy-tdep.c
 318 nlm
 319 nlmread.c
 320 notify.defs
 321 ns32k-tdep.c
 322 ns32km3-nat.c
 323 ns32knbsd-nat.c
 324 objfiles.c
 325 objfiles.h
 326 ocd.c
 327 ocd.h
 328 op50-rom.c
 329 os9kread.c
 330 osf-share
 331 osfsolib.c
 332 parse.c
 333 parser-defs.h
 334 partial-stab.h
 335 ppc-bdm.c
 336 ppcbug-rom.c
 337 printcmd.c
 338 process_reply.defs
 339 procfs.c
 340 ptx4-nat.c
 341 pyr-tdep.c
 342 pyr-xdep.c
 343 rdi-share
 344 remote-adapt.c
 345 remote-array.c
 346 remote-bug.c
 347 remote-d10v.c
 348 remote-e7000.c
 349 remote-eb.c
 350 remote-es.c
 351 remote-est.c
 352 remote-hms.c
 353 remote-mips.c
 354 remote-mm.c
 355 remote-nindy.c
 356 remote-nrom.c
 357 remote-os9k.c
 358 remote-rdi.c
 359 remote-rdp.c
 360 remote-sds.c
 361 remote-sim.c
 362 remote-st.c
 363 remote-udi.c
 364 remote-utils.c
 365 remote-utils.h
 366 remote-vx.c
 367 remote-vx29k.c
 368 remote-vx68.c
 369 remote-vx960.c
 370 remote-vxmips.c
 371 remote-vxsparc.c
 372 remote.c
 373 reply_mig_hack.awk
 374 rom68k-rom.c
 375 rs6000-nat.c
 376 rs6000-tdep.c
 377 saber.suppress
 378 scm-exp.c
 379 scm-lang.c
 380 scm-lang.h
 381 scm-tags.h
 382 scm-valprint.c
 383 ser-e7kpc.c
 384 ser-go32.c
 385 ser-mac.c
 386 ser-ocd.c
 387 ser-tcp.c
 388 ser-unix.c
 389 serial.c
 390 serial.h
 391 sh-stub.c
 392 sh-tdep.c
 393 sh3-rom.c
 394 signals.h
 395 sol-thread.c
 396 solib.c
 397 solib.h
 398 somread.c
 399 somsolib.c
 400 somsolib.h
 401 source.c
 402 sparc-nat.c
 403 sparc-stub.c
 404 sparc-tdep.c
 405 sparcl-stub.c
 406 sparcl-tdep.c
 407 sparclet-rom.c
 408 sparclet-stub.c
 409 srec.h
 410 stabsread.c
 411 stabsread.h
 412 stack.c
 413 standalone.c
 414 stop-gdb.c
 415 stuff.c
 416 sun3-nat.c
 417 sun386-nat.c
 418 symfile.c
 419 symfile.h
 420 symm-nat.c
 421 symm-tdep.c
 422 symmisc.c
 423 symtab.c
 424 symtab.h
 425 tahoe-tdep.c
 426 target.c
 427 target.h
 428 terminal.h
 429 testsuite
 430 thread.c
 431 top.c
 432 top.h
 433 tracepoint.c
 434 tracepoint.h
 435 typeprint.c
 436 typeprint.h
 437 ultra3-nat.c
 438 ultra3-xdep.c
 439 umax-xdep.c
 440 utils.c
 441 v850-tdep.c
 442 v850ice.c
 443 valarith.c
 444 valops.c
 445 valprint.c
 446 valprint.h
 447 value.h
 448 values.c
 449 vax-tdep.c
 450 vx-share
 451 w65-tdep.c
 452 w89k-rom.c
 453 win32-nat.c
 454 xcoffread.c
 455 xcoffsolib.c
 456 xcoffsolib.h
 457 xmodem.c
 458 xmodem.h
 459 z8k-tdep.c
 460
 461 # Things which are explicitly *not* kept, for now.
 462
 463 Things-to-lose:
 464
 465 GDB-HACK-RULES
 466 HOW_TO_RELEASE
 467 gdbcfgxref
 468
 469 Do-last:
 470
 471 # Don't try to clean directories here, as the 'mv' command will fail.
 472 # Also, grep fails on NFS mounted directories.
 473 if ( echo $* | grep lose\-gdbtk > /dev/null ) ; then
 474         echo Catering to RMS by removing traces of \"gdbtk\"...
 475         for i in * ; do
 476                 if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then
 477                         echo Removing traces of \"gdbtk\" out of $i...
 478                         cp $i new
 479                         sed '/start\-sanitize\-gdbtk/,/end-\sanitize\-gdbtk/d' < $i > new
 480                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 481                                 echo Caching $i in .Recover...
 482                                 mv $i .Recover
 483                         fi
 484                         mv new $i
 485                 fi
 486         done
 487 else
 488         echo Leaving \"gdbtk\" in the sources...
 489         for i in * ; do
 490                 if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then
 491                         echo Keeping \"gdbtk\" stuff in $i, but editing out sanitize lines...
 492                         cp $i new
 493                         sed -e '/start\-sanitize\-gdbtk/d' -e '/end\-sanitize\-gdbtk/d' < $i > new
 494                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 495                                 echo Caching $i in .Recover...
 496                                 mv $i .Recover
 497                         fi
 498                         mv new $i
 499                 fi
 500         done
 501 fi
 502
 503 if ( echo $* | grep keep\-v850e > /dev/null ) ; then
 504         for i in * ; do
 505                 if test ! -d $i && (grep sanitize-v850e $i > /dev/null) ; then
 506                         if [ -n "${verbose}" ] ; then
 507                                 echo Keeping v850e stuff in $i
 508                         fi
 509                 fi
 510         done
 511 else
 512         for i in * ; do
 513                 if test ! -d $i && (grep sanitize-v850e $i > /dev/null) ; then
 514                         if [ -n "${verbose}" ] ; then
 515                                 echo Removing traces of \"v850e\" from $i...
 516                         fi
 517                         cp $i new
 518                         sed '/start\-sanitize\-v850e/,/end-\sanitize\-v850e/d' < $i > new
 519                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 520                                 if [ -n "${verbose}" ] ; then
 521                                         echo Caching $i in .Recover...
 522                                 fi
 523                                 mv $i .Recover
 524                         fi
 525                         mv new $i
 526                 fi
 527         done
 528 fi
 529
 530 if ( echo $* | grep keep\-vr4320 > /dev/null ) ; then
 531         for i in * ; do
 532                 if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then
 533                         if [ -n "${verbose}" ] ; then
 534                                 echo Keeping vr4320 stuff in $i
 535                         fi
 536                 fi
 537         done
 538 else
 539         for i in * ; do
 540                 if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then
 541                         if [ -n "${verbose}" ] ; then
 542                                 echo Removing traces of \"vr4320\" from $i...
 543                         fi
 544                         cp $i new
 545                         sed '/start\-sanitize\-vr4320/,/end-\sanitize\-vr4320/d' < $i > new
 546                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 547                                 if [ -n "${verbose}" ] ; then
 548                                         echo Caching $i in .Recover...
 549                                 fi
 550                                 mv $i .Recover
 551                         fi
 552                         mv new $i
 553                 fi
 554         done
 555 fi
 556
 557 if ( echo $* | grep keep\-r5900 > /dev/null ) ; then
 558         for i in * ; do
 559                 if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then
 560                         if [ -n "${verbose}" ] ; then
 561                                 echo Keeping r5900 stuff in $i
 562                         fi
 563                 fi
 564         done
 565 else
 566         for i in * ; do
 567                 if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then
 568                         if [ -n "${verbose}" ] ; then
 569                                 echo Removing traces of \"r5900\" from $i...
 570                         fi
 571                         cp $i new
 572                         sed '/start\-sanitize\-r5900/,/end-\sanitize\-r5900/d' < $i > new
 573                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 574                                 if [ -n "${verbose}" ] ; then
 575                                         echo Caching $i in .Recover...
 576                                 fi
 577                                 mv $i .Recover
 578                         fi
 579                         mv new $i
 580                 fi
 581         done
 582 fi
 583
 584 if ( echo $* | grep keep\-tx19 > /dev/null ) ; then
 585         for i in * ; do
 586                 if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
 587                         if [ -n "${verbose}" ] ; then
 588                                 echo Keeping tx19 stuff in $i
 589                         fi
 590                 fi
 591         done
 592 else
 593         for i in * ; do
 594                 if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
 595                         if [ -n "${verbose}" ] ; then
 596                                 echo Removing traces of \"tx19\" from $i...
 597                         fi
 598                         cp $i new
 599                         sed '/start\-sanitize\-tx19/,/end-\sanitize\-tx19/d' < $i > new
 600                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 601                                 if [ -n "${verbose}" ] ; then
 602                                         echo Caching $i in .Recover...
 603                                 fi
 604                                 mv $i .Recover
 605                         fi
 606                         mv new $i
 607                 fi
 608         done
 609 fi
 610
 611 if ( echo $* | grep keep\-tx49 > /dev/null ) ; then
 612         for i in * ; do
 613                 if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then
 614                         if [ -n "${verbose}" ] ; then
 615                                 echo Keeping tx49 stuff in $i
 616                         fi
 617                 fi
 618         done
 619 else
 620         for i in * ; do
 621                 if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then
 622                         if [ -n "${verbose}" ] ; then
 623                                 echo Removing traces of \"tx49\" from $i...
 624                         fi
 625                         cp $i new
 626                         sed '/start\-sanitize\-tx49/,/end-\sanitize\-tx49/d' < $i > new
 627                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 628                                 if [ -n "${verbose}" ] ; then
 629                                         echo Caching $i in .Recover...
 630                                 fi
 631                                 mv $i .Recover
 632                         fi
 633                         mv new $i
 634                 fi
 635         done
 636 fi
 637
 638 if ( echo $* | grep keep\-sky > /dev/null ) ; then
 639         for i in * ; do
 640                 if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
 641                         if [ -n "${verbose}" ] ; then
 642                                 echo Keeping sky stuff in $i
 643                         fi
 644                 fi
 645         done
 646 else
 647         for i in * ; do
 648                 if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
 649                         if [ -n "${verbose}" ] ; then
 650                                 echo Removing traces of \"sky\" from $i...
 651                         fi
 652                         cp $i new
 653                         sed '/start\-sanitize\-sky/,/end-\sanitize\-sky/d' < $i > new
 654                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 655                                 if [ -n "${verbose}" ] ; then
 656                                         echo Caching $i in .Recover...
 657                                 fi
 658                                 mv $i .Recover
 659                         fi
 660                         mv new $i
 661                 fi
 662         done
 663 fi
 664
 665 if ( echo $* | grep keep\-cygnus > /dev/null ) ; then
 666         for i in * ; do
 667                 if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then
 668                         if [ -n "${verbose}" ] ; then
 669                                 echo Keeping cygnus stuff in $i
 670                         fi
 671                 fi
 672         done
 673 else
 674         for i in * ; do
 675                 if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then
 676                         if [ -n "${verbose}" ] ; then
 677                                 echo Removing traces of \"cygnus\" from $i...
 678                         fi
 679                         cp $i new
 680                         sed '/start\-sanitize\-cygnus/,/end-\sanitize\-cygnus/d' < $i > new
 681                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 682                                 if [ -n "${verbose}" ] ; then
 683                                         echo Caching $i in .Recover...
 684                                 fi
 685                                 mv $i .Recover
 686                         fi
 687                         mv new $i
 688                 fi
 689         done
 690 fi
 691
 692 if ( echo $* | grep keep\-tic80 > /dev/null ) ; then
 693         for i in * ; do
 694                 if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
 695                         if [ -n "${verbose}" ] ; then
 696                                 echo Keeping tic80 stuff in $i
 697                         fi
 698                 fi
 699         done
 700 else
 701         for i in * ; do
 702                 if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
 703                         if [ -n "${verbose}" ] ; then
 704                                 echo Removing traces of \"tic80\" from $i...
 705                         fi
 706                         cp $i new
 707                         sed '/start\-sanitize\-tic80/,/end-\sanitize\-tic80/d' < $i > new
 708                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 709                                 if [ -n "${verbose}" ] ; then
 710                                         echo Caching $i in .Recover...
 711                                 fi
 712                                 mv $i .Recover
 713                         fi
 714                         mv new $i
 715                 fi
 716         done
 717 fi
 718
 719 if ( echo $* | grep keep\-am33 > /dev/null ) ; then
 720         for i in * ; do
 721                 if test ! -d $i && (grep sanitize-am33 $i > /dev/null) ; then
 722                         if [ -n "${verbose}" ] ; then
 723                                 echo Keeping am33 stuff in $i
 724                         fi
 725                 fi
 726         done
 727 else
 728         for i in * ; do
 729                 if test ! -d $i && (grep sanitize-am33 $i > /dev/null) ; then
 730                         if [ -n "${verbose}" ] ; then
 731                                 echo Removing traces of \"am33\" from $i...
 732                         fi
 733                         cp $i new
 734                         sed '/start\-sanitize\-am33/,/end-\sanitize\-am33/d' < $i > new
 735                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 736                                 if [ -n "${verbose}" ] ; then
 737                                         echo Caching $i in .Recover...
 738                                 fi
 739                                 mv $i .Recover
 740                         fi
 741                         mv new $i
 742                 fi
 743         done
 744 fi
 745
 746 if ( echo $* | grep keep\-vr4111 > /dev/null ) ; then
 747         for i in * ; do
 748                 if test ! -d $i && (grep sanitize-vr4111 $i > /dev/null) ; then
 749                         if [ -n "${verbose}" ] ; then
 750                                 echo Keeping vr4111 stuff in $i
 751                         fi
 752                 fi
 753         done
 754 else
 755         for i in * ; do
 756                 if test ! -d $i && (grep sanitize-vr4111 $i > /dev/null) ; then
 757                         if [ -n "${verbose}" ] ; then
 758                                 echo Removing traces of \"vr4111\" from $i...
 759                         fi
 760                         cp $i new
 761                         sed '/start\-sanitize\-vr4111/,/end-\sanitize\-vr4111/d' < $i > new
 762                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 763                                 if [ -n "${verbose}" ] ; then
 764                                         echo Caching $i in .Recover...
 765                                 fi
 766                                 mv $i .Recover
 767                         fi
 768                         mv new $i
 769                 fi
 770         done
 771 fi
 772
 773 if ( echo $* | grep keep\-ide > /dev/null ) ; then
 774         for i in * ; do
 775                 if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
 776                         if [ -n "${verbose}" ] ; then
 777                                 echo Keeping ide stuff in $i
 778                         fi
 779                 fi
 780         done
 781 else
 782         for i in * ; do
 783                 if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
 784                         if [ -n "${verbose}" ] ; then
 785                                 echo Removing traces of \"ide\" from $i...
 786                         fi
 787                         cp $i new
 788                         sed '/start\-sanitize\-ide/,/end-\sanitize\-ide/d' < $i > new
 789                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 790                                 if [ -n "${verbose}" ] ; then
 791                                         echo Caching $i in .Recover...
 792                                 fi
 793                                 mv $i .Recover
 794                         fi
 795                         mv new $i
 796                 fi
 797         done
 798 fi
 799
 800 # This is a temporary measure to sanitize out references to the
 801 # startup code need by the TclPro debugger.  When that goes out
 802 # of alpha, we can remove this.
 803
 804 if ( echo $* | grep keep\-tclpro > /dev/null ) ; then
 805         for i in * ; do
 806                 if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then
 807                         echo Keeping \"tclpro\" stuff in $i, but editing out sanitize lines...
 808                         cp $i new
 809                         sed -e '/start\-sanitize\-tclpro/d' -e '/end\-sanitize\-tclpro/d' < $i > new
 810                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 811                                 echo Caching $i in .Recover...
 812                                 mv $i .Recover
 813                         fi
 814                         mv new $i
 815                 fi
 816         done
 817 else
 818         for i in * ; do
 819                 if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then
 820                         if [ -n "${verbose}" ] ; then
 821                                 echo Removing traces of \"tclpro\" from $i...
 822                         fi
 823                         cp $i new
 824                         sed '/start\-sanitize\-tclpro/,/end-\sanitize\-tclpro/d' < $i > new
 825                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 826                                 if [ -n "${verbose}" ] ; then
 827                                         echo Caching $i in .Recover...
 828                                 fi
 829                                 mv $i .Recover
 830                         fi
 831                         mv new $i
 832                 fi
 833         done
 834 fi
 835
 836 if ( echo $* | grep keep\-java > /dev/null ) ; then
 837         for i in * ; do
 838                 if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then
 839                         if [ -n "${verbose}" ] ; then
 840                                 echo Keeping java stuff in $i
 841                         fi
 842                 fi
 843         done
 844 else
 845         for i in * ; do
 846                 if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then
 847                         if [ -n "${verbose}" ] ; then
 848                                 echo Removing traces of \"java\" from $i...
 849                         fi
 850                         cp $i new
 851                         sed '/start\-sanitize\-java/,/end-\sanitize\-java/d' < $i > new
 852                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 853                                 if [ -n "${verbose}" ] ; then
 854                                         echo Caching $i in .Recover...
 855                                 fi
 856                                 mv $i .Recover
 857                         fi
 858                         mv new $i
 859                 fi
 860         done
 861 fi
 862
 863 if ( echo $* | grep keep\-carp > /dev/null ) ; then
 864         for i in * ; do
 865                 if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then
 866                         if [ -n "${verbose}" ] ; then
 867                                 echo Keeping carp stuff in $i
 868                         fi
 869                 fi
 870         done
 871 else
 872         for i in * ; do
 873                 if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then
 874                         if [ -n "${verbose}" ] ; then
 875                                 echo Removing traces of \"carp\" from $i...
 876                         fi
 877                         cp $i new
 878                         sed '/start\-sanitize\-carp/,/end-\sanitize\-carp/d' < $i > new
 879                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 880                                 if [ -n "${verbose}" ] ; then
 881                                         echo Caching $i in .Recover...
 882                                 fi
 883                                 mv $i .Recover
 884                         fi
 885                         mv new $i
 886                 fi
 887         done
 888 fi
 889
 890 for i in * ; do
 891         if test ! -d $i && (grep sanitize $i > /dev/null) ; then
 892                 echo '***' Some mentions of Sanitize are still left in $i! 1>&2
 893         fi
 894 done
 895
 896 #
 897 # End of file.