moved perl scripts here

src/tools/Makefile.Host

@@ -6,17 +6,7 @@ include $(TOP)/config/CONFIG_BASE
 
 #	install these scripts:
 #
-#	WIN32 also uses rm.pl, cp.pl, mkdir.pl, rmdir.pl
-#	byt they are called from here, not installed
-SCRIPTS       := installEpics.pl makeBaseApp.pl makeBaseApp installEpics
-
-#	Before anything is done, installEpics has to be in place.
-#	The first action in a full build & install is 'make inc.host',
-#	that's where we hook into:
-inc:: $(INSTALL_BIN)/installEpics.pl
-
-$(INSTALL_BIN)/installEpics.pl: ../installEpics.pl
-	$(PERL) ../installEpics.pl -d -m 555 ../installEpics.pl $(INSTALL_BIN)
+SCRIPTS       := makeBaseApp installEpics
 
 include $(TOP)/config/RULES.Host
 

src/tools/findBase.pl

@@ -0,0 +1,13 @@
+#!/usr/local/bin/perl
+ 
+use Cwd;
+ 
+$dir=cwd();
+#   make sure $dir ends with '/'
+#
+$dir="$dir/" unless ($dir =~ m'/$');
+ 
+if ($dir =~ m'(.*(/|\\)base)(/|\\)')
+{
+    print "$1";
+}

src/tools/makeMakefile.pl

@@ -0,0 +1,30 @@
+#!/usr/local/bin/perl
+#
+#	makeMakefile.pl
+#
+#	called from RULES_ARCHS
+#
+#
+#	Usage: perl makeMakefile.pl O.*-dir Makefile-Type
+
+$dir = $ARGV[0];
+$type= $ARGV[1];
+$makefile="$dir/Makefile";
+
+if ($dir =~ m'O.(.+)')
+{
+	$t_a = $1;
+}
+else
+{
+	die "Cannot extract T_A from $dir";
+}
+
+mkdir ($dir, 0777)  unless -d $dir;
+
+open OUT, "> $makefile"  or die "Cannot create $makefile";
+print OUT "T_A=$t_a\n";
+print OUT "include ../Makefile.$type\n";
+close OUT;
+
+#	EOF makeMakefile.pl