plan9port/src/cmd/netfiles/netfileget

#!/usr/local/plan9/bin/rc

f=getfile
if(~ $1 -d){
	f=getdir
	shift
}

if(! ~ $#* 2){
	echo 'usage: netfileget [-d] system path' >[1=2]
	exit usage
}

. netfilelib.rc $1

fn getfile {
	rm -f $t
	if(! 9 echo -get $2 $t | mysftp $1 >$t.e >[2=1])
		exit 1
	egrep -v '^Fetching' $t.e >$t.e2
	if(test -s $t.e2){
		cat $t.e >[1=2]
		exit 1
	}
	cat $t
}

fn getfile9p {
	if(! 9p read $1/$2)
		exit 1
}

fn getdir {
	if(! {echo cd $2; echo ls -l} | mysftp $1 | sed '1,2d; s/sftp> //g; /^$/d' >$t)
		exit 1
	cat $t | awk '$NF == "." || $NF == ".." { next } {s = $NF; if($0 ~ /^d/) s = s "/"; print s}'
}

fn getdir9p {
	9p ls -l $1/$2 | awk '{s=$NF; if($0 ~ /^d/) s=s"/"; print s}'
}

$f $1 $2
exit 0