makeDbDepends.pl and makeIocCdCommands.pl moved to base/configure/tools.

src/makeBaseApp/top/configure/RULES.ioc

@@ -2,8 +2,8 @@
 include $(EPICS_BASE)/configure/RULES_DIRS
 buildInstall: cdCommands
 
-cdCommands: Makefile $(TOP)/configure/makeIocCdCommands.pl $(TOP)/configure/CONFIG
-	$(PERL) $(TOP)/configure/makeIocCdCommands.pl $(ARCH) $(IOCS_APPL_TOP)
+cdCommands: Makefile $(TOOLS)/makeIocCdCommands.pl $(TOP)/configure/CONFIG
+	$(PERL) $(TOOLS)/makeIocCdCommands.pl $(ARCH) $(IOCS_APPL_TOP)
 
 clean:
 	@$(RM) cdCommands

src/makeBaseApp/top/configure/makeDbDepends.pl

@@ -1,23 +0,0 @@
-eval 'exec perl -S $0 ${1+"$@"}'  # -*- Mode: perl -*-
-    if $running_under_some_shell; # makeDbDepends.pl
-
-# Called from within the object directory.
-# Searches the .substitutions files (from the command line) for
-# "file xxx {" entries to create a DEPENDS file
-
-open(OUT, ">DEPENDS") or die "Cannot open DEPENDS: $!";
-
-foreach $file (@ARGV) {
-    open(IN, "<$file") or die "Cannot open $file: $!";
-    @substfile = <IN>;
-    close IN or die "Cannot close $file: $!";
-
-    @depends = grep { s/^\s*file\s*(.*)\s*\{.*$/\1/ } @substfile;
-    chomp @depends;
-
-    if (@depends) {
-	$file =~ s/\.substitutions/\.t.db.raw/;
-	print OUT "${file}:: @depends\n";
-    }
-}
-close OUT or die "Cannot close $file: $!";

src/makeBaseApp/top/configure/makeIocCdCommands.pl

@@ -1,69 +0,0 @@
-eval 'exec perl -S $0 ${1+"$@"}'  # -*- Mode: perl -*-
-    if $running_under_some_shell; # makeIocCdCommands.pl
-
-use Cwd;
-
-$cwd  = cwd();
-#hack for sun4
-$cwd =~ s|/tmp_mnt||;
-#hack for win32
-$cwd =~ s|\\|\/|g;
-$arch = $ARGV[0];
-$iocsApplTop = $ARGV[1];
-#remove top parts of current working directory
-#and add ioc's appl top alias (if supplied)
-if ( $iocsApplTop ne "" ) {
-    $cwd =~ s|.*(/iocBoot.*)|$1|;
-    $cwd = $iocsApplTop . $cwd;
-}
-
-unlink("cdCommands");
-open(OUT,">cdCommands") or die "$! opening cdCommands";
-print OUT "startup = \"$cwd\"\n";
-
-#appbin is kept for compatibility with 3.13.1 
-$appbin = $cwd;
-$appbin =~ s/iocBoot.*//;
-$appbin = $appbin . "/bin/${arch}";
-print OUT "appbin = \"$appbin\"\n";
-
-$top = $cwd;
-$top =~ s/\/iocBoot.*//;
-print OUT "top = \"$top\"\n";
-$topbin = "${top}/bin/${arch}";
-#skip check that top/bin/${arch} exists; src may not have been builT
-print OUT "topbin = \"$topbin\"\n";
-$release = "$top/config/RELEASE";
-if (-r "$release") {
-    open(IN, "$release") or die "Cannot open $release\n";
-    while ($line = <IN>) {
-        next if ( $line =~ /\s*#/ );
-	chomp($line);
-        $_ = $line;
-        #the following looks for
-        # prefix = $(macro)post
-        ($prefix,$macro,$post) = /(.*)\s*=\s*\$\((.*)\)(.*)/;
-        if ($macro eq "") { # true if no macro is present
-            # the following looks for
-            # prefix = post
-            ($prefix,$post) = /(.*)\s*=\s*(.*)/;
-        } else {
-            $base = $applications{$macro};
-            if ($base eq "") {
-                print "error: $macro was not previously defined\n";
-            } else {
-                $post = $base . $post;
-            }
-        }
-        $applications{$prefix} = $post;
-        $app = lc($prefix);
-        if ( -d "$post") { #check that directory exists
-            print OUT "$app = \"$post\"\n";
-        }
-        if ( -d "$post/bin/$arch") { #check that directory exists
-            print OUT "${app}bin = \"$post/bin/$arch\"\n";
-        }
-    }
-    close IN;
-}
-close OUT;