* Fixes for PR 18015, from customer.
[binutils-gdb.git] / 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 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.