From 72fd2f881907db5e367ffee1fcecb737c44a0090 Mon Sep 17 00:00:00 2001 From: rsc Date: Fri, 18 Mar 2005 19:29:47 +0000 Subject: will install from src dir --- bin/netfileget | 45 --------------------------------------------- 1 file changed, 45 deletions(-) delete mode 100755 bin/netfileget (limited to 'bin/netfileget') diff --git a/bin/netfileget b/bin/netfileget deleted file mode 100755 index c621482d..00000000 --- a/bin/netfileget +++ /dev/null @@ -1,45 +0,0 @@ -#!/usr/local/plan9/bin/rc - -f=getfile -if(~ $1 -d){ - f=getdir - shift -} - -if(! ~ $#* 2){ - echo 'usage: netget [-d] system path' >[1=2] - exit usage -} - -ns=`{namespace} -if(u test -S $ns/$1) - f=$f^9p - -t=/tmp/netget.$pid.$USER -fn sigexit { rm -f $t } - -fn getfile { - rm -f $t - if(! echo get $2 $t | sftp -b - $1 >/dev/null) - exit 1 - cat $t -} - -fn getfile9p { - if(! 9p read $1/$2) - exit 1 -} - -fn getdir { - if(! {echo cd $2; echo ls -l} | sftp -b - $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 - -- cgit v1.2.3