trick/libexec/trick/depend_cp
Alex Lin 19025d77ad Standardize directory names
Reorganized.  Created a new top level include directory that will hold all of Trick's header files. Moved all of the Trick headers to this directory.  Created a libexec directory that holds all of the executables that users don't need to execute directly.  Changed all of the executables remaining in bin to start with "trick-".  In the sim_services directories changed all source files to find the Trick headers in their new location.  Since all of the include files are gone in sim_services, removed the src directories as well, moving all of the source files up a level.  Moved the makefiles, docs, man, and other architecture independent files into a top level share directory.  Renamed lib_${TRICK_HOST_CPU} to lib64 or lib depending on the platform we're currently on.

refs #63
2015-06-09 08:44:42 -05:00

53 lines
1.2 KiB
Perl
Executable File

#!/usr/bin/perl
use Cwd ;
use File::Basename;
use strict ;
my $dir ;
my $dir_no_src ;
my $word ;
my $cont ;
open FILE, "@ARGV[0]" or die "Could not open @ARGV[0]" ;
while ( <FILE> ) {
if ( /^# Dependencies for/ ) {
($dir) = $_ =~ /(\/.*)$/ ;
($dir_no_src = $dir) =~ s/src\/// ;
print ;
next ;
}
elsif ( /^#/ ) {
next ;
}
$cont = 0 ;
foreach $word ( split ) {
if ( $word =~ /:/ ) {
if ( $word =~ /S_[Ss]ource/ ) {
$word = "lib_\${TRICK_HOST_CPU}/$word" ;
}
else {
$word = "${dir_no_src}object_\${TRICK_HOST_CPU}/$word"
}
}
elsif ( $word eq "\\" ) {
$word = "\\\n" ;
$cont = 1 ;
}
else {
if ( $word !~ /^\// and $dir ne "\/" ) {
$word = "$dir$word" ;
}
while ( $word =~ s,/[^/]+/\.\.,, ) {} # remove ..
}
# Substitute beginning of full path with an environment variable.
$word =~ s/$ENV{"TRICK_HOME"}/\${TRICK_HOME}/gs ;
print "$word " ;
}
if ( $cont == 0 ) {
print "\n" ;
}
}