blob: be13371301b8c5d2e4e6a44b26e0eb71562b7284 (
plain)
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
|
#!/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 getfile9p {
if(! 9p read $1/$2)
exit 1
}
fn getdir9p {
9p ls -l $1/$2 | awk '{s=$NF; if($0 ~ /^d/) s=s"/"; print s}'
}
fn getfile {
rm -f $t
echo get $2 $t | runsftp -e $1
cat $t
}
fn getdir {
{echo cd $2; echo ls -l} | runsftp $1
awk '
$NF == "." || $NF == ".." { next }
{
s = $NF
if($0 ~ /^d/)
s = s "/"
print s
}
' $t.sftp
}
$f $1 $2
exit 0
|