/usr/bin/Fdescr is in ferret-vis 6.6.2-3.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 | #! /bin/csh -f
# Fdescr file_template
# determine if FERRET descriptor files matching template are currently on-line
# by searching the paths in FER_DESCR
# 8/92 bug fix: on SUNs /bin/test can accept only one arg. Use nonomatch
# to resolve the list of files matching template and pass only one name to test
# 21mar94 *kob* Solaris port -----
# /bin/test doesn't exist on solaris (sunos 5.x) so had to
# do a check for that OS and then point it to /usr/ucb/test
# 30may97 *kob* Linux port - test is in /usr/bin/test
# 23oct10 *amck* Add paths used in Debian
ferret_paths
if ($#argv == 0 ) then
echo "usage: Fdescr descriptor_file_template"
exit
endif
#check for sunos 5.x
if (`uname` =~ *Sun* && `uname -r` =~ *5.*) then
set TEST = /usr/ucb/test
else if (`uname` =~ *inux* ) then
set TEST = /usr/bin/test
else
set TEST = /bin/test
endif
set nonomatch
set found = 0
foreach path ($FER_DESCR)
cd $path
set flist = *$argv*
$TEST -f $flist[1] >& /dev/null
if ($status == 0) then
echo "* * * * * * * * in $path"
/bin/ls -l *$argv*
set found = 1
echo " "
endif
end
if ( $found == 0 ) then
echo "No files matching $argv are on line"
endif
|