Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
zfanon	1.86 KB	-rw-r--r--
zfautocheck	1.29 KB	-rw-r--r--
zfcd	1.89 KB	-rw-r--r--
zfcd_match	1.37 KB	-rw-r--r--
zfcget	2.01 KB	-rw-r--r--
zfclose	90 B	-rw-r--r--
zfcput	2.4 KB	-rw-r--r--
zfdir	3.25 KB	-rw-r--r--
zffcache	662 B	-rw-r--r--
zfgcp	1.91 KB	-rw-r--r--
zfget	1.73 KB	-rw-r--r--
zfget_match	1.5 KB	-rw-r--r--
zfgoto	2.2 KB	-rw-r--r--
zfhere	181 B	-rw-r--r--
zfinit	2.49 KB	-rw-r--r--
zfls	208 B	-rw-r--r--
zfmark	1.41 KB	-rw-r--r--
zfopen	1.16 KB	-rw-r--r--
zfparams	687 B	-rw-r--r--
zfpcp	1.27 KB	-rw-r--r--
zfput	1.41 KB	-rw-r--r--
zfrglob	2.09 KB	-rw-r--r--
zfrtime	1.33 KB	-rw-r--r--
zfsession	1.61 KB	-rw-r--r--
zfstat	1.98 KB	-rw-r--r--
zftp_chpwd	1.35 KB	-rw-r--r--
zftp_progress	2.03 KB	-rw-r--r--
zftransfer	1.53 KB	-rw-r--r--
zftype	553 B	-rw-r--r--
zfuget	3.81 KB	-rw-r--r--
zfuput	2.59 KB	-rw-r--r--

Code Editor : zfcget

# function zfcget {
# Continuation get of files from remote server.
# For each file, if it's shorter here, try to get the remainder from
# over there.  This requires the server to support the REST command
# in the way many do but RFC959 doesn't specify.
# Options:
#   -G   don't to remote globbing, else do
#   -t   update the local file times to the same time as the remote.
#        Currently this only works if you have the `perl' command,
#        and that perl is version 5 with the standard library.
#        See the function zfrtime for more gory details.

emulate -L zsh

[[ $curcontext = :zf* ]] || local curcontext=:zfcget
local loc rem stat=0 opt opt_G opt_t remlist locst remst
local rstat tsize

while getopts :Gt opt; do
  [[ $opt = '?' ]] && print "zfcget: bad option: -$OPTARG" && return 1
  eval "opt_$opt=1"
done
(( OPTIND > 1 )) && shift $(( OPTIND - 1 ))

for remlist in $*; do
  # zfcd directory hack to put the front back to ~
  if [[ $remlist = $HOME || $remlist = $HOME/* ]]; then
    remlist="~${remlist#$HOME}"
  fi
  if [[ $opt_G != 1 ]]; then
    zfrglob remlist
  fi
  if (( $#remlist )); then
    for rem in $remlist; do
      loc=${rem:t}
      if [[ ! -f $loc ]]; then
	# File does not yet exist
	zftp get $rem >$loc || stat=$?
      else
	# Compare the sizes.
	locst=($(zftp local $loc))
	() {
	  zftp remote $rem >|$1
	  rstat=$?
	  remst=($(<$1))
	} =(<<<'temporary file')
	if [[ $rstat = 2 ]]; then
	  print "Server does not support SIZE command.\n" \
	  "Assuming you know what you're doing..." 2>&1
	  zftp getat $rem $locst[1] >>$loc || stat=$?
	  continue
	elif [[ $rstat = 1 ]]; then
	  print "Remote file not found: $rem" 2>&1
	  continue
	fi
	if [[ $locst[1] -gt $remst[1] ]]; then
	  print "Local file is larger!" 2>&1
	  continue;
	elif [[ $locst[1] == $remst[1] ]]; then
	  print "Files are already the same size." 2>&1
	  continue
	else
	  if zftp getat $rem $locst[1] >>$loc; then
	    [[ $opt_t = 1 ]] && zfrtime $loc $rem $remst[2]
	  else
	    stat=1
	  fi
	fi
      fi
    done
  fi
done

return $stat
# }

${this.title}

Code Editor : zfcget