remove ssam: it is included in 9base, frontbase, and plan9port (thanks, sl)

This commit is contained in:
stanley lieber 2020-06-11 23:25:45 -04:00
parent 265133b28e
commit a56b2b255d

View File

@ -1,56 +0,0 @@
#!/bin/rc
# ssam - stream interface to sam
rfork e
fn enosam { echo ssam: sam not found >[1=2] }
for(i in `{whatis sam}){
if(test -x $i)
j=1
}
if(~ $#j 0){
enosam
exit enosam
}
flagfmt='n,e script,f sfile'
args='[ file ... ]'
argv0=$0
fn usage { echo usage: $argv0 '[ -n ] [ -e script ] [ -f sfile ] [ file ... ]' >[1=2] }
if(! ifs=() eval `{aux/getflags $*}){
usage
exit usage
}
if(~ $#flage 0 && ~ $#flagf 0) {
if(~ $#* 0) {
usage
exit usage
}
flage=$1
shift
}
if(~ $#TMPDIR 0)
TMPDIR=/tmp
if(~ $#user 0)
user=$USER
tmp=$TMPDIR/ssam.tmp.$user.$pid
cat $* >$tmp
{
# select entire file
echo ',{'
echo k
echo '}'
echo 0k
# run scripts, print
if(! ~ $#flagf 0)
cat $flagf
if(! ~ $#flage 0)
echo $flage
if(~ $#flagn 0)
echo ,
} | sam -d $tmp >[2]/dev/null
rm -f $tmp