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 : zfinit

emulate -L zsh

if [[ $1 != -n ]]; then
   zmodload -i zsh/net/tcp || return 1
   zmodload -ia zsh/zftp zftp || return 1
fi

if zmodload -i zsh/zutil; then
  local arr
  # Set defaults for styles if none set.
  zstyle -g arr ':zftp:*' progress || zstyle ':zftp:*' progress bar
  zstyle -g arr ':zftp:*' update   || zstyle ':zftp:*' update   1
  zstyle -g arr ':zftp:*' titlebar || zstyle ':zftp:*' titlebar true
  if functions chpwd >&/dev/null && ! zstyle -g arr ':zftp:*' chpwd; then
    zstyle ':zftp:*' chpwd true
  fi

typeset -gA zfconfig
  zfconfig=(lastsession default)
fi

alias zfcd='noglob zfcd'
alias zfget='noglob zfget'
alias zfls='noglob zfls'
alias zfdir='noglob zfdir'
alias zfuget='noglob zfuget'

autoload -Uz zfanon zfautocheck zfcd zfcd_match zfcget zfclose zfcput
autoload -Uz zfdir zffcache zfgcp zfget zfget_match zfgoto zfhere zfinit zfls
autoload -Uz zfmark zfopen zfparams zfpcp zfput zfrglob zfrtime zfsession
autoload -Uz zfstat zftp_chpwd zftp_progress zftransfer zftype zfuget zfuput

#
# zftp completions: only use these if new-style completion is not
# active.
#
if [[ ${#_patcomps} -eq 0 || -z ${_patcomps[(r)_zf*]} ]] &&
  (compctl >/dev/null 2>&1); then
  # only way of getting that noglob out of the way: this is unnecessary with
  # widget-based completion
  setopt completealiases

compctl -f -x 'p[1]' \
    -k '(open params user login type ascii binary mode put putat
    get getat append appendat ls dir local remote mkdir rmdir delete
    close quit)'  - \
    'w[1,cd][1,ls][1,dir][1,rmdir]' -K zfcd_match -S/ -q - \
    'W[1,get*]' -K zfget_match - 'w[1,delete][1,remote]' -K zfget_match - \
    'w[1,open][1,params]' -k hosts - \
    'w[1,session]' -s '${$(zftp session):#$ZFTP_SESSION}' -- zftp
  compctl -K zfcd_match -S/ -q zfcd zfdir zfls
  compctl -K zfget_match zfget zfgcp zfuget zfcget
  compctl -k hosts zfanon zfopen zfparams
  compctl -s \
    '$(awk '\''{print $1}'\'' ${ZFTP_BMFILE:-${ZDOTDIR:-$HOME}/.zfbkmarks})' \
    -x 'W[1,-*n*]' \
    -s '$(awk -F, '\''NR > 2 { print $1 }'\'' ~/.ncftp/bookmarks)' -- \
    zfgoto zfmark
  compctl -s '${$(zftp session):#$ZFTP_SESSION}' zfsession
  # in _zftp for new completion, but hard to inline into a compctl
  zftransfer_match() {
    local sess=${1%%:*} oldsess=$ZFTP_SESSION
    [[ -n $sess ]] && zftp session $sess
    zfget_match ${1#*:} $2
    [[ -n $sess && -n $oldsess ]] && zftp session $oldsess
    reply=(${sess}:${^reply})
  }
  compctl -s '$(zftp session)' -S : -x 'C[0,*:*]' \
    -K zftransfer_match -- zftransfer
fi

return 0

${this.title}

Code Editor : zfinit