#!/usr/pkg/bin/perl
#  (1) This short perl script is called from Makefile
#  (2) The calling sequence:
#        ./files  ARCH
#     where ARCH is the name of the architecture
#  (3) Result:
#        
# ----------------------------
# C U S T O M I Z E   P A R T 
# ----------------------------

# src file directory
$SRC = '/tftpboot/20060807/';
$SRC = '/e/st4200/20060821/';

# ARCH -> conf directory special 
%HASH = qw( 

);


# ARCH -> conf file name conversion  ( currently one to one )
%CONF = qw(
evbppc    WALNUT
amigappc  NULL
);

# ----------------------------
# F I X E D       P A R T 
# ----------------------------

$basename = $ARGV[0];
$basename =~ s/\..*$//;

# ----------------------------------
#    D E C I D E   $ dir = directory
# ----------------------------------
if   ( $path = $HASH{$basename} ) {   # if defined in %HASH, use it
    $dir  = $HASH{$basename};}
else {	
    if ( $basename =~ /tnf/ ) { $basename =~ s/tnf//;}  # tnf = TNF original
    $dir = $SRC.'sys/arch/'.$basename.'/conf';
}
# --------------------------------
#    D E C I D E  $conf = filename
# -------------------------------

if   ( $conf = $CONF{$basename} ){ # if defined, do nothing
}
else { $conf = 'GENERIC'}

print "$dir/files.$basename $dir/$conf\n";