1 7c709434 2005-03-18 devnull #!/usr/local/plan9/bin/rc
 2 7c709434 2005-03-18 devnull 
 3 7c709434 2005-03-18 devnull f=getfile
 4 7c709434 2005-03-18 devnull if(~ $1 -d){
 5 7c709434 2005-03-18 devnull 	f=getdir
 6 7c709434 2005-03-18 devnull 	shift
 7 7c709434 2005-03-18 devnull }
 8 7c709434 2005-03-18 devnull 
 9 7c709434 2005-03-18 devnull if(! ~ $#* 2){
10 baf7825e 2005-03-20 devnull 	echo 'usage: netfileget [-d] system path' >[1=2]
11 7c709434 2005-03-18 devnull 	exit usage
12 7c709434 2005-03-18 devnull }
13 7c709434 2005-03-18 devnull 
14 b8c9f317 2005-03-21 devnull . netfilelib.rc $1
15 7c709434 2005-03-18 devnull 
16 7c709434 2005-03-18 devnull fn getfile9p {
17 7c709434 2005-03-18 devnull 	if(! 9p read $1/$2)
18 7c709434 2005-03-18 devnull 		exit 1
19 7c709434 2005-03-18 devnull }
20 7c709434 2005-03-18 devnull 
21 7c709434 2005-03-18 devnull fn getdir9p {
22 7c709434 2005-03-18 devnull 	9p ls -l $1/$2 | awk '{s=$NF; if($0 ~ /^d/) s=s"/"; print s}'
23 7c709434 2005-03-18 devnull }
24 7c709434 2005-03-18 devnull 
25 65fb6fb7 2005-03-24 devnull fn getfile {
26 65fb6fb7 2005-03-24 devnull 	rm -f $t
27 65fb6fb7 2005-03-24 devnull 	echo get $2 $t | runsftp -e $1
28 65fb6fb7 2005-03-24 devnull 	cat $t
29 65fb6fb7 2005-03-24 devnull }
30 65fb6fb7 2005-03-24 devnull 
31 65fb6fb7 2005-03-24 devnull fn getdir {
32 65fb6fb7 2005-03-24 devnull 	{echo cd $2; echo ls -l} | runsftp $1
33 65fb6fb7 2005-03-24 devnull 	awk '
34 65fb6fb7 2005-03-24 devnull 		$NF == "." || $NF == ".." { next } 
35 65fb6fb7 2005-03-24 devnull 		{
36 65fb6fb7 2005-03-24 devnull 			s = $NF
37 65fb6fb7 2005-03-24 devnull 			if($0 ~ /^d/)
38 65fb6fb7 2005-03-24 devnull 				s = s "/"
39 65fb6fb7 2005-03-24 devnull 			print s
40 65fb6fb7 2005-03-24 devnull 		}
41 65fb6fb7 2005-03-24 devnull 	' $t.sftp
42 65fb6fb7 2005-03-24 devnull }
43 65fb6fb7 2005-03-24 devnull 
44 7c709434 2005-03-18 devnull $f $1 $2
45 7c709434 2005-03-18 devnull exit 0
46 7c709434 2005-03-18 devnull