| 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 | frame.h |
| 222 | gdb-stabs.h |
| 223 | gdb.1 |
| 224 | gdb.gdb |
| 225 | gdb_stat.h |
| 226 | gdb_string.h |
| 227 | gdba.el |
| 228 | gdbcmd.h |
| 229 | gdbcore.h |
| 230 | gdbinit.in |
| 231 | gdbserver |
| 232 | gdbthread.h |
| 233 | gdbtypes.c |
| 234 | gdbtypes.h |
| 235 | gnu-nat.c |
| 236 | gnu-nat.h |
| 237 | gnu-regex.c |
| 238 | gnu-regex.h |
| 239 | go32-xdep.c |
| 240 | gould-tdep.c |
| 241 | gould-xdep.c |
| 242 | h8300-tdep.c |
| 243 | h8500-tdep.c |
| 244 | hp300ux-nat.c |
| 245 | hppa-tdep.c |
| 246 | hppab-nat.c |
| 247 | hppah-nat.c |
| 248 | hppam3-nat.c |
| 249 | hpread.c |
| 250 | hpux-thread.c |
| 251 | i386-stub.c |
| 252 | i386-tdep.c |
| 253 | i386aix-nat.c |
| 254 | i386b-nat.c |
| 255 | i386gnu-nat.c |
| 256 | i386ly-tdep.c |
| 257 | i386m3-nat.c |
| 258 | i386mach-nat.c |
| 259 | i386v-nat.c |
| 260 | i386v4-nat.c |
| 261 | i387-tdep.c |
| 262 | i960-tdep.c |
| 263 | infcmd.c |
| 264 | inferior.h |
| 265 | inflow.c |
| 266 | infptrace.c |
| 267 | infrun.c |
| 268 | inftarg.c |
| 269 | irix4-nat.c |
| 270 | irix5-nat.c |
| 271 | isi-xdep.c |
| 272 | kdb-start.c |
| 273 | language.c |
| 274 | language.h |
| 275 | lynx-nat.c |
| 276 | m2-exp.y |
| 277 | m2-lang.c |
| 278 | m2-lang.h |
| 279 | m2-typeprint.c |
| 280 | m2-valprint.c |
| 281 | m3-nat.c |
| 282 | m32r-rom.c |
| 283 | m32r-stub.c |
| 284 | m32r-tdep.c |
| 285 | m68k-stub.c |
| 286 | m68k-tdep.c |
| 287 | m68knbsd-nat.c |
| 288 | m88k-nat.c |
| 289 | m88k-tdep.c |
| 290 | mac-defs.h |
| 291 | mac-gdb.r |
| 292 | mac-nat.c |
| 293 | mac-xdep.c |
| 294 | main.c |
| 295 | maint.c |
| 296 | mdebugread.c |
| 297 | mem-break.c |
| 298 | minimon.h |
| 299 | minsyms.c |
| 300 | mips-nat.c |
| 301 | mips-tdep.c |
| 302 | mipsm3-nat.c |
| 303 | mipsread.c |
| 304 | mipsv4-nat.c |
| 305 | mn10200-tdep.c |
| 306 | mn10300-tdep.c |
| 307 | mon960-rom.c |
| 308 | monitor.c |
| 309 | monitor.h |
| 310 | mpw-config.in |
| 311 | mpw-make.sed |
| 312 | msg.defs |
| 313 | msg_reply.defs |
| 314 | news-xdep.c |
| 315 | nindy-share |
| 316 | nindy-tdep.c |
| 317 | nlm |
| 318 | nlmread.c |
| 319 | notify.defs |
| 320 | ns32k-tdep.c |
| 321 | ns32km3-nat.c |
| 322 | ns32knbsd-nat.c |
| 323 | objfiles.c |
| 324 | objfiles.h |
| 325 | ocd.c |
| 326 | ocd.h |
| 327 | op50-rom.c |
| 328 | os9kread.c |
| 329 | osf-share |
| 330 | osfsolib.c |
| 331 | parse.c |
| 332 | parser-defs.h |
| 333 | partial-stab.h |
| 334 | ppc-bdm.c |
| 335 | ppcbug-rom.c |
| 336 | printcmd.c |
| 337 | process_reply.defs |
| 338 | procfs.c |
| 339 | ptx4-nat.c |
| 340 | pyr-tdep.c |
| 341 | pyr-xdep.c |
| 342 | rdi-share |
| 343 | remote-adapt.c |
| 344 | remote-array.c |
| 345 | remote-bug.c |
| 346 | remote-d10v.c |
| 347 | remote-e7000.c |
| 348 | remote-eb.c |
| 349 | remote-es.c |
| 350 | remote-est.c |
| 351 | remote-hms.c |
| 352 | remote-mips.c |
| 353 | remote-mm.c |
| 354 | remote-nindy.c |
| 355 | remote-nrom.c |
| 356 | remote-os9k.c |
| 357 | remote-rdi.c |
| 358 | remote-rdp.c |
| 359 | remote-sds.c |
| 360 | remote-sim.c |
| 361 | remote-st.c |
| 362 | remote-udi.c |
| 363 | remote-utils.c |
| 364 | remote-utils.h |
| 365 | remote-vx.c |
| 366 | remote-vx29k.c |
| 367 | remote-vx68.c |
| 368 | remote-vx960.c |
| 369 | remote-vxmips.c |
| 370 | remote-vxsparc.c |
| 371 | remote.c |
| 372 | reply_mig_hack.awk |
| 373 | rom68k-rom.c |
| 374 | rs6000-nat.c |
| 375 | rs6000-tdep.c |
| 376 | saber.suppress |
| 377 | scm-exp.c |
| 378 | scm-lang.c |
| 379 | scm-lang.h |
| 380 | scm-tags.h |
| 381 | scm-valprint.c |
| 382 | ser-e7kpc.c |
| 383 | ser-go32.c |
| 384 | ser-mac.c |
| 385 | ser-ocd.c |
| 386 | ser-tcp.c |
| 387 | ser-unix.c |
| 388 | serial.c |
| 389 | serial.h |
| 390 | sh-stub.c |
| 391 | sh-tdep.c |
| 392 | sh3-rom.c |
| 393 | signals.h |
| 394 | sol-thread.c |
| 395 | solib.c |
| 396 | solib.h |
| 397 | somread.c |
| 398 | somsolib.c |
| 399 | somsolib.h |
| 400 | source.c |
| 401 | sparc-nat.c |
| 402 | sparc-stub.c |
| 403 | sparc-tdep.c |
| 404 | sparcl-stub.c |
| 405 | sparcl-tdep.c |
| 406 | sparclet-rom.c |
| 407 | sparclet-stub.c |
| 408 | srec.h |
| 409 | stabsread.c |
| 410 | stabsread.h |
| 411 | stack.c |
| 412 | standalone.c |
| 413 | stop-gdb.c |
| 414 | stuff.c |
| 415 | sun3-nat.c |
| 416 | sun386-nat.c |
| 417 | symfile.c |
| 418 | symfile.h |
| 419 | symm-nat.c |
| 420 | symm-tdep.c |
| 421 | symmisc.c |
| 422 | symtab.c |
| 423 | symtab.h |
| 424 | tahoe-tdep.c |
| 425 | target.c |
| 426 | target.h |
| 427 | terminal.h |
| 428 | testsuite |
| 429 | thread.c |
| 430 | top.c |
| 431 | top.h |
| 432 | tracepoint.c |
| 433 | tracepoint.h |
| 434 | typeprint.c |
| 435 | typeprint.h |
| 436 | ultra3-nat.c |
| 437 | ultra3-xdep.c |
| 438 | umax-xdep.c |
| 439 | utils.c |
| 440 | v850-tdep.c |
| 441 | v850ice.c |
| 442 | valarith.c |
| 443 | valops.c |
| 444 | valprint.c |
| 445 | valprint.h |
| 446 | value.h |
| 447 | values.c |
| 448 | vax-tdep.c |
| 449 | vx-share |
| 450 | w65-tdep.c |
| 451 | w89k-rom.c |
| 452 | win32-nat.c |
| 453 | xcoffread.c |
| 454 | xcoffsolib.c |
| 455 | xcoffsolib.h |
| 456 | xmodem.c |
| 457 | xmodem.h |
| 458 | z8k-tdep.c |
| 459 | |
| 460 | # Things which are explicitly *not* kept, for now. |
| 461 | |
| 462 | Things-to-lose: |
| 463 | |
| 464 | GDB-HACK-RULES |
| 465 | HOW_TO_RELEASE |
| 466 | gdbcfgxref |
| 467 | |
| 468 | Do-last: |
| 469 | |
| 470 | # Don't try to clean directories here, as the 'mv' command will fail. |
| 471 | # Also, grep fails on NFS mounted directories. |
| 472 | if ( echo $* | grep lose\-gdbtk > /dev/null ) ; then |
| 473 | echo Catering to RMS by removing traces of \"gdbtk\"... |
| 474 | for i in * ; do |
| 475 | if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then |
| 476 | echo Removing traces of \"gdbtk\" out of $i... |
| 477 | cp $i new |
| 478 | sed '/start\-sanitize\-gdbtk/,/end-\sanitize\-gdbtk/d' < $i > new |
| 479 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 480 | echo Caching $i in .Recover... |
| 481 | mv $i .Recover |
| 482 | fi |
| 483 | mv new $i |
| 484 | fi |
| 485 | done |
| 486 | else |
| 487 | echo Leaving \"gdbtk\" in the sources... |
| 488 | for i in * ; do |
| 489 | if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then |
| 490 | echo Keeping \"gdbtk\" stuff in $i, but editing out sanitize lines... |
| 491 | cp $i new |
| 492 | sed -e '/start\-sanitize\-gdbtk/d' -e '/end\-sanitize\-gdbtk/d' < $i > new |
| 493 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 494 | echo Caching $i in .Recover... |
| 495 | mv $i .Recover |
| 496 | fi |
| 497 | mv new $i |
| 498 | fi |
| 499 | done |
| 500 | fi |
| 501 | |
| 502 | if ( echo $* | grep keep\-v850e > /dev/null ) ; then |
| 503 | for i in * ; do |
| 504 | if test ! -d $i && (grep sanitize-v850e $i > /dev/null) ; then |
| 505 | if [ -n "${verbose}" ] ; then |
| 506 | echo Keeping v850e stuff in $i |
| 507 | fi |
| 508 | fi |
| 509 | done |
| 510 | else |
| 511 | for i in * ; do |
| 512 | if test ! -d $i && (grep sanitize-v850e $i > /dev/null) ; then |
| 513 | if [ -n "${verbose}" ] ; then |
| 514 | echo Removing traces of \"v850e\" from $i... |
| 515 | fi |
| 516 | cp $i new |
| 517 | sed '/start\-sanitize\-v850e/,/end-\sanitize\-v850e/d' < $i > new |
| 518 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 519 | if [ -n "${verbose}" ] ; then |
| 520 | echo Caching $i in .Recover... |
| 521 | fi |
| 522 | mv $i .Recover |
| 523 | fi |
| 524 | mv new $i |
| 525 | fi |
| 526 | done |
| 527 | fi |
| 528 | |
| 529 | if ( echo $* | grep keep\-vr4320 > /dev/null ) ; then |
| 530 | for i in * ; do |
| 531 | if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then |
| 532 | if [ -n "${verbose}" ] ; then |
| 533 | echo Keeping vr4320 stuff in $i |
| 534 | fi |
| 535 | fi |
| 536 | done |
| 537 | else |
| 538 | for i in * ; do |
| 539 | if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then |
| 540 | if [ -n "${verbose}" ] ; then |
| 541 | echo Removing traces of \"vr4320\" from $i... |
| 542 | fi |
| 543 | cp $i new |
| 544 | sed '/start\-sanitize\-vr4320/,/end-\sanitize\-vr4320/d' < $i > new |
| 545 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 546 | if [ -n "${verbose}" ] ; then |
| 547 | echo Caching $i in .Recover... |
| 548 | fi |
| 549 | mv $i .Recover |
| 550 | fi |
| 551 | mv new $i |
| 552 | fi |
| 553 | done |
| 554 | fi |
| 555 | |
| 556 | if ( echo $* | grep keep\-r5900 > /dev/null ) ; then |
| 557 | for i in * ; do |
| 558 | if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then |
| 559 | if [ -n "${verbose}" ] ; then |
| 560 | echo Keeping r5900 stuff in $i |
| 561 | fi |
| 562 | fi |
| 563 | done |
| 564 | else |
| 565 | for i in * ; do |
| 566 | if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then |
| 567 | if [ -n "${verbose}" ] ; then |
| 568 | echo Removing traces of \"r5900\" from $i... |
| 569 | fi |
| 570 | cp $i new |
| 571 | sed '/start\-sanitize\-r5900/,/end-\sanitize\-r5900/d' < $i > new |
| 572 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 573 | if [ -n "${verbose}" ] ; then |
| 574 | echo Caching $i in .Recover... |
| 575 | fi |
| 576 | mv $i .Recover |
| 577 | fi |
| 578 | mv new $i |
| 579 | fi |
| 580 | done |
| 581 | fi |
| 582 | |
| 583 | if ( echo $* | grep keep\-tx19 > /dev/null ) ; then |
| 584 | for i in * ; do |
| 585 | if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then |
| 586 | if [ -n "${verbose}" ] ; then |
| 587 | echo Keeping tx19 stuff in $i |
| 588 | fi |
| 589 | fi |
| 590 | done |
| 591 | else |
| 592 | for i in * ; do |
| 593 | if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then |
| 594 | if [ -n "${verbose}" ] ; then |
| 595 | echo Removing traces of \"tx19\" from $i... |
| 596 | fi |
| 597 | cp $i new |
| 598 | sed '/start\-sanitize\-tx19/,/end-\sanitize\-tx19/d' < $i > new |
| 599 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 600 | if [ -n "${verbose}" ] ; then |
| 601 | echo Caching $i in .Recover... |
| 602 | fi |
| 603 | mv $i .Recover |
| 604 | fi |
| 605 | mv new $i |
| 606 | fi |
| 607 | done |
| 608 | fi |
| 609 | |
| 610 | if ( echo $* | grep keep\-tx49 > /dev/null ) ; then |
| 611 | for i in * ; do |
| 612 | if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then |
| 613 | if [ -n "${verbose}" ] ; then |
| 614 | echo Keeping tx49 stuff in $i |
| 615 | fi |
| 616 | fi |
| 617 | done |
| 618 | else |
| 619 | for i in * ; do |
| 620 | if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then |
| 621 | if [ -n "${verbose}" ] ; then |
| 622 | echo Removing traces of \"tx49\" from $i... |
| 623 | fi |
| 624 | cp $i new |
| 625 | sed '/start\-sanitize\-tx49/,/end-\sanitize\-tx49/d' < $i > new |
| 626 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 627 | if [ -n "${verbose}" ] ; then |
| 628 | echo Caching $i in .Recover... |
| 629 | fi |
| 630 | mv $i .Recover |
| 631 | fi |
| 632 | mv new $i |
| 633 | fi |
| 634 | done |
| 635 | fi |
| 636 | |
| 637 | if ( echo $* | grep keep\-sky > /dev/null ) ; then |
| 638 | for i in * ; do |
| 639 | if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then |
| 640 | if [ -n "${verbose}" ] ; then |
| 641 | echo Keeping sky stuff in $i |
| 642 | fi |
| 643 | fi |
| 644 | done |
| 645 | else |
| 646 | for i in * ; do |
| 647 | if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then |
| 648 | if [ -n "${verbose}" ] ; then |
| 649 | echo Removing traces of \"sky\" from $i... |
| 650 | fi |
| 651 | cp $i new |
| 652 | sed '/start\-sanitize\-sky/,/end-\sanitize\-sky/d' < $i > new |
| 653 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 654 | if [ -n "${verbose}" ] ; then |
| 655 | echo Caching $i in .Recover... |
| 656 | fi |
| 657 | mv $i .Recover |
| 658 | fi |
| 659 | mv new $i |
| 660 | fi |
| 661 | done |
| 662 | fi |
| 663 | |
| 664 | if ( echo $* | grep keep\-cygnus > /dev/null ) ; then |
| 665 | for i in * ; do |
| 666 | if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then |
| 667 | if [ -n "${verbose}" ] ; then |
| 668 | echo Keeping cygnus stuff in $i |
| 669 | fi |
| 670 | fi |
| 671 | done |
| 672 | else |
| 673 | for i in * ; do |
| 674 | if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then |
| 675 | if [ -n "${verbose}" ] ; then |
| 676 | echo Removing traces of \"cygnus\" from $i... |
| 677 | fi |
| 678 | cp $i new |
| 679 | sed '/start\-sanitize\-cygnus/,/end-\sanitize\-cygnus/d' < $i > new |
| 680 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 681 | if [ -n "${verbose}" ] ; then |
| 682 | echo Caching $i in .Recover... |
| 683 | fi |
| 684 | mv $i .Recover |
| 685 | fi |
| 686 | mv new $i |
| 687 | fi |
| 688 | done |
| 689 | fi |
| 690 | |
| 691 | if ( echo $* | grep keep\-tic80 > /dev/null ) ; then |
| 692 | for i in * ; do |
| 693 | if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then |
| 694 | if [ -n "${verbose}" ] ; then |
| 695 | echo Keeping tic80 stuff in $i |
| 696 | fi |
| 697 | fi |
| 698 | done |
| 699 | else |
| 700 | for i in * ; do |
| 701 | if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then |
| 702 | if [ -n "${verbose}" ] ; then |
| 703 | echo Removing traces of \"tic80\" from $i... |
| 704 | fi |
| 705 | cp $i new |
| 706 | sed '/start\-sanitize\-tic80/,/end-\sanitize\-tic80/d' < $i > new |
| 707 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 708 | if [ -n "${verbose}" ] ; then |
| 709 | echo Caching $i in .Recover... |
| 710 | fi |
| 711 | mv $i .Recover |
| 712 | fi |
| 713 | mv new $i |
| 714 | fi |
| 715 | done |
| 716 | fi |
| 717 | |
| 718 | if ( echo $* | grep keep\-am33 > /dev/null ) ; then |
| 719 | for i in * ; do |
| 720 | if test ! -d $i && (grep sanitize-am33 $i > /dev/null) ; then |
| 721 | if [ -n "${verbose}" ] ; then |
| 722 | echo Keeping am33 stuff in $i |
| 723 | fi |
| 724 | fi |
| 725 | done |
| 726 | else |
| 727 | for i in * ; do |
| 728 | if test ! -d $i && (grep sanitize-am33 $i > /dev/null) ; then |
| 729 | if [ -n "${verbose}" ] ; then |
| 730 | echo Removing traces of \"am33\" from $i... |
| 731 | fi |
| 732 | cp $i new |
| 733 | sed '/start\-sanitize\-am33/,/end-\sanitize\-am33/d' < $i > new |
| 734 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 735 | if [ -n "${verbose}" ] ; then |
| 736 | echo Caching $i in .Recover... |
| 737 | fi |
| 738 | mv $i .Recover |
| 739 | fi |
| 740 | mv new $i |
| 741 | fi |
| 742 | done |
| 743 | fi |
| 744 | |
| 745 | if ( echo $* | grep keep\-vr4111 > /dev/null ) ; then |
| 746 | for i in * ; do |
| 747 | if test ! -d $i && (grep sanitize-vr4111 $i > /dev/null) ; then |
| 748 | if [ -n "${verbose}" ] ; then |
| 749 | echo Keeping vr4111 stuff in $i |
| 750 | fi |
| 751 | fi |
| 752 | done |
| 753 | else |
| 754 | for i in * ; do |
| 755 | if test ! -d $i && (grep sanitize-vr4111 $i > /dev/null) ; then |
| 756 | if [ -n "${verbose}" ] ; then |
| 757 | echo Removing traces of \"vr4111\" from $i... |
| 758 | fi |
| 759 | cp $i new |
| 760 | sed '/start\-sanitize\-vr4111/,/end-\sanitize\-vr4111/d' < $i > new |
| 761 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 762 | if [ -n "${verbose}" ] ; then |
| 763 | echo Caching $i in .Recover... |
| 764 | fi |
| 765 | mv $i .Recover |
| 766 | fi |
| 767 | mv new $i |
| 768 | fi |
| 769 | done |
| 770 | fi |
| 771 | |
| 772 | if ( echo $* | grep keep\-ide > /dev/null ) ; then |
| 773 | for i in * ; do |
| 774 | if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then |
| 775 | if [ -n "${verbose}" ] ; then |
| 776 | echo Keeping ide stuff in $i |
| 777 | fi |
| 778 | fi |
| 779 | done |
| 780 | else |
| 781 | for i in * ; do |
| 782 | if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then |
| 783 | if [ -n "${verbose}" ] ; then |
| 784 | echo Removing traces of \"ide\" from $i... |
| 785 | fi |
| 786 | cp $i new |
| 787 | sed '/start\-sanitize\-ide/,/end-\sanitize\-ide/d' < $i > new |
| 788 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 789 | if [ -n "${verbose}" ] ; then |
| 790 | echo Caching $i in .Recover... |
| 791 | fi |
| 792 | mv $i .Recover |
| 793 | fi |
| 794 | mv new $i |
| 795 | fi |
| 796 | done |
| 797 | fi |
| 798 | |
| 799 | # This is a temporary measure to sanitize out references to the |
| 800 | # startup code need by the TclPro debugger. When that goes out |
| 801 | # of alpha, we can remove this. |
| 802 | |
| 803 | if ( echo $* | grep keep\-tclpro > /dev/null ) ; then |
| 804 | for i in * ; do |
| 805 | if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then |
| 806 | echo Keeping \"tclpro\" stuff in $i, but editing out sanitize lines... |
| 807 | cp $i new |
| 808 | sed -e '/start\-sanitize\-tclpro/d' -e '/end\-sanitize\-tclpro/d' < $i > new |
| 809 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 810 | echo Caching $i in .Recover... |
| 811 | mv $i .Recover |
| 812 | fi |
| 813 | mv new $i |
| 814 | fi |
| 815 | done |
| 816 | else |
| 817 | for i in * ; do |
| 818 | if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then |
| 819 | if [ -n "${verbose}" ] ; then |
| 820 | echo Removing traces of \"tclpro\" from $i... |
| 821 | fi |
| 822 | cp $i new |
| 823 | sed '/start\-sanitize\-tclpro/,/end-\sanitize\-tclpro/d' < $i > new |
| 824 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 825 | if [ -n "${verbose}" ] ; then |
| 826 | echo Caching $i in .Recover... |
| 827 | fi |
| 828 | mv $i .Recover |
| 829 | fi |
| 830 | mv new $i |
| 831 | fi |
| 832 | done |
| 833 | fi |
| 834 | |
| 835 | if ( echo $* | grep keep\-java > /dev/null ) ; then |
| 836 | for i in * ; do |
| 837 | if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then |
| 838 | if [ -n "${verbose}" ] ; then |
| 839 | echo Keeping java stuff in $i |
| 840 | fi |
| 841 | fi |
| 842 | done |
| 843 | else |
| 844 | for i in * ; do |
| 845 | if test ! -d $i && (grep sanitize-java $i > /dev/null) ; then |
| 846 | if [ -n "${verbose}" ] ; then |
| 847 | echo Removing traces of \"java\" from $i... |
| 848 | fi |
| 849 | cp $i new |
| 850 | sed '/start\-sanitize\-java/,/end-\sanitize\-java/d' < $i > new |
| 851 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 852 | if [ -n "${verbose}" ] ; then |
| 853 | echo Caching $i in .Recover... |
| 854 | fi |
| 855 | mv $i .Recover |
| 856 | fi |
| 857 | mv new $i |
| 858 | fi |
| 859 | done |
| 860 | fi |
| 861 | |
| 862 | if ( echo $* | grep keep\-carp > /dev/null ) ; then |
| 863 | for i in * ; do |
| 864 | if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then |
| 865 | if [ -n "${verbose}" ] ; then |
| 866 | echo Keeping carp stuff in $i |
| 867 | fi |
| 868 | fi |
| 869 | done |
| 870 | else |
| 871 | for i in * ; do |
| 872 | if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then |
| 873 | if [ -n "${verbose}" ] ; then |
| 874 | echo Removing traces of \"carp\" from $i... |
| 875 | fi |
| 876 | cp $i new |
| 877 | sed '/start\-sanitize\-carp/,/end-\sanitize\-carp/d' < $i > new |
| 878 | if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
| 879 | if [ -n "${verbose}" ] ; then |
| 880 | echo Caching $i in .Recover... |
| 881 | fi |
| 882 | mv $i .Recover |
| 883 | fi |
| 884 | mv new $i |
| 885 | fi |
| 886 | done |
| 887 | fi |
| 888 | |
| 889 | for i in * ; do |
| 890 | if test ! -d $i && (grep sanitize $i > /dev/null) ; then |
| 891 | echo '***' Some mentions of Sanitize are still left in $i! 1>&2 |
| 892 | fi |
| 893 | done |
| 894 | |
| 895 | # |
| 896 | # End of file. |