usr/glenda/bin/rc/pull

   1 #!/bin/rc
   2
   3 rfork e
   4 flags=()
   5 while(! ~ $#* 0 && ~ $1 -*){
   6         if(~ $1 -c -s){
   7                 flags=($flags $1)
   8                 shift
   9         }
  10         flags=($flags $1)
  11         shift
  12 }
  13 if(test -f /srv/kfs.cmd)
  14         disk/kfscmd allow
  15 replica/pull -v $flags /dist/replica/network $*
  16 if(test -f /srv/kfs.cmd)
  17         disk/kfscmd disallow