mirror of
git://git.code.sf.net/p/zsh/code
synced 2024-11-20 14:04:03 +01:00
b3e51a037e
option description to `_cvs' and fix typo in _diff_options.
812 lines
24 KiB
Plaintext
812 lines
24 KiB
Plaintext
#compdef cvs
|
|
|
|
# redefine _cvs.
|
|
|
|
_cvs () {
|
|
# "+Qqrwtnlvb:T:e:d:Hfz:s:xa"
|
|
_arguments -s \
|
|
'-a[authenticate]' \
|
|
'-f[disable .cvsrc]' \
|
|
'(-n)-l[disable logging]' \
|
|
'(-l)-n[no change]' \
|
|
'(-q)-Q[really quiet]' \
|
|
'(-Q)-q[somewhat quiet]' \
|
|
'(-w)-r[make new working file read only]' \
|
|
'-t[trace]' \
|
|
'(-r)-w[make new working file read-write]' \
|
|
'-x[encrypt client/server communication]' \
|
|
'(--version)-v[print version]' \
|
|
'(-v)--version[print version]' \
|
|
'( --help --help-commands --help-synonyms --help-options)-H[print help]' \
|
|
'(-H --help-commands --help-synonyms --help-options)--help[print help]' \
|
|
'(-H --help --help-synonyms --help-options)--help-commands[command help]' \
|
|
'(-H --help --help-commands --help-options)--help-synonyms[command synonyms help]' \
|
|
'(-H --help --help-commands --help-synonyms )--help-options[global options help]' \
|
|
'*--allow-root=[allowable root for pserver]:rootdir:_files -/' \
|
|
'-b+[binary directory]:bindir:_cvs_bindir' \
|
|
'-T+[temporary directory]:temporary directory:_cvs_tempdir' \
|
|
'-d+[cvs root directory]:cvsroot:_cvs_root' \
|
|
'-e+[editor]:editor:_cvs_editor' \
|
|
'-s+[user variable]:user variable:_cvs_user_variable' \
|
|
'-z+[gzip level]:gzip level:_cvs_gzip_level' \
|
|
'*::cvs command:_cvs_command'
|
|
}
|
|
|
|
# define cvs command dispatch function.
|
|
|
|
(( $+functions[_cvs_command] )) ||
|
|
_cvs_command () {
|
|
local cmd
|
|
typeset -A cmds
|
|
cmds=(add " ad new " admin " adm rcs " annotate " ann "
|
|
checkout " co get " commit " ci com " diff " di dif "
|
|
edit "" editors "" export " exp ex "
|
|
history " hi his " import " im imp " init ""
|
|
log " lo rlog " login " logon lgn " logout ""
|
|
rdiff " patch pa " release " re rel " remove " rm delete "
|
|
status " st stat " rtag " rt rfreeze " tag " ta freeze "
|
|
unedit "" update " up upd " watch ""
|
|
watchers "")
|
|
|
|
if (( CURRENT == 1 )); then
|
|
_tags commands && { compadd "$@" ${(k)cmds} || compadd "$@" ${(kv)=cmds} }
|
|
else
|
|
local curcontext="$curcontext"
|
|
|
|
cmd="${${(k)cmds[(R)* $words[1] *]}:-${(k)cmds[(i)$words[1]]}}"
|
|
if (( $#cmd )); then
|
|
curcontext="${curcontext%:*:*}:cvs-${cmd}:"
|
|
_cvs_$cmd
|
|
else
|
|
_message "unknown cvs command: $words[1]"
|
|
fi
|
|
fi
|
|
}
|
|
|
|
# define completion functions for each cvs command
|
|
|
|
(( $+functions[_cvs_add] )) ||
|
|
_cvs_add () {
|
|
# "+k:m:"
|
|
_arguments -s \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'-m+[message]:message:_cvs_m' \
|
|
'*:file:_cvs_files_unmaintained' \
|
|
}
|
|
|
|
(( $+functions[_cvs_admin] )) ||
|
|
_cvs_admin () {
|
|
# "+ib::c:a:A:e:l::u::LUn:N:m:o:s:t::IqxV:k:"
|
|
_arguments -s \
|
|
-{i,x} \
|
|
'(-U)-L[set lock strict]' \
|
|
'(-L)-U[set locl non-strict]' \
|
|
'-I[interactive]' \
|
|
'-q[quiet]' \
|
|
'-b-[default branch]:default branch:(1.1.1)' \
|
|
'-c+:comment leader (not used):' \
|
|
'-a+:login names (not work with CVS):' \
|
|
'-A+:access list to append (not work with CVS):' \
|
|
'-e+:access list to erase (not work with CVS):' \
|
|
'-l-[lock]:revision to lock:' \
|
|
'-u-[unlock]:revision to unlock:' \
|
|
'-n+[name revision]:symbolic-name(\:revision):' \
|
|
'-N+[force to name revision]:symbolic-name(\:revision):' \
|
|
'-m+[replace log]:revision\:msg:' \
|
|
'-o+[delete revision]:range to delete:' \
|
|
'-s+[replace state attribute]:state(\:revision):' \
|
|
'-t-[replace descriptive text]:descriptive text:_cvs_admin_t' \
|
|
'-V+:version (obsolete):' \
|
|
'-k+[set keyword substitution]:keyword substitution:_cvs_k' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_admin_t] )) ||
|
|
_cvs_admin_t () {
|
|
if compset -P -; then
|
|
_message 'descriptive text'
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_annotate] )) ||
|
|
_cvs_annotate () {
|
|
# "+lr:D:fR"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'-f[use head revision]' \
|
|
'(-l)-R[recursive]' \
|
|
'(-f -D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-f -r)-D+[specify date]:date:_cvs_D' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_checkout] )) ||
|
|
_cvs_checkout () {
|
|
# "+ANnk:d:flRpQqcsr:D:j:P"
|
|
_arguments -s \
|
|
'-A[reset sticky tags, dates and -k]' \
|
|
'-N[don'\''t shorten module paths]' \
|
|
'-n[disable checkout program]' \
|
|
'-f[use most recent revision if -D/-r is not matched]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'(-s)-c[module database]' \
|
|
'(-c)-s[module database with status]' \
|
|
'-P[prune empty directory]' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'-d+[directory]:directory:_files -/' \
|
|
'(-D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-r)-D+[specify date]:date:_cvs_D' \
|
|
'-j+[merge]:tag:_cvs_revisions' \
|
|
'-j+[merge]:tag:_cvs_revisions' \
|
|
'*:module:_cvs_modules'
|
|
}
|
|
|
|
(( $+functions[_cvs_commit] )) ||
|
|
_cvs_commit () {
|
|
# "+nlRm:fF:r:"
|
|
_arguments -s \
|
|
'-n[disable module program]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-f[force to commit]' \
|
|
'(-F)-m+[message]:message:_cvs_m' \
|
|
'(-m)-F+[message file]:log message file:_files' \
|
|
'-r+[specify revision]:tag:_cvs_revisions' \
|
|
'*:file:_cvs_files_modified'
|
|
}
|
|
|
|
(( $+functions[_cvs_diff] )) ||
|
|
_cvs_diff () {
|
|
local of ofwuc ouc oss ofwy ofwg ofwl
|
|
# output formats
|
|
of="-y --side-by-side -n --rcs -e -f --ed -q --brief -c -C --context -u -U \
|
|
--unified --old-group-format --new-group-format --changed-group-format \
|
|
--unchanged-group-format --line-format --old-line-format --new-line-format \
|
|
--unchanged-line-format"
|
|
|
|
# output formats w/o unified and context
|
|
ofwuc="-y --side-by-side -n --rcs -e -f --ed -q --brief --old-group-format \
|
|
--new-group-format --changed-group-format --unchanged-group-format \
|
|
--line-format --old-line-format --new-line-format --unchanged-line-format"
|
|
|
|
# option specific to unified or context diff
|
|
ouc='-L --label -p --show-c-function -F --show-function-line'
|
|
|
|
# option specific to side by side
|
|
oss='-W --width --left-column --suppress-common-lines'
|
|
|
|
# output formats w/o side by side
|
|
ofwy="-n --rcs -e -f --ed -q --brief -c -C --context -u -U --unified \
|
|
--old-group-format --new-group-format --changed-group-format \
|
|
--unchanged-group-format --line-format --old-line-format \
|
|
--new-line-format --unchanged-line-format"
|
|
|
|
# output formats w/o group format
|
|
ofwg="-n --rcs -e -f --ed -q --brief -c -C --context -u -U --unified \
|
|
--line-format --old-line-format --new-line-format --unchanged-line-format"
|
|
|
|
# output formats w/o line format
|
|
ofwl="-n --rcs -e -f --ed -q --brief -c -C --context -u -U --unified \
|
|
--old-group-format --new-group-format --changed-group-format \
|
|
--unchanged-group-format"
|
|
|
|
# "+abcdefhilnpstuw0123456789BHNRC:D:F:I:L:U:V:W:k:r:"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'(-r)-D+[specify date]:date:_cvs_D' \
|
|
'(-r)-D+[specify date]:date:_cvs_D' \
|
|
'(-D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
-{h,0,1,2,3,4,5,6,7,8,9} \
|
|
'--binary[binary mode]' \
|
|
'--ifdef=[set macro name for merged if-then-else format]:name:' \
|
|
'(-i)--ignore-case[case insensitive]' \
|
|
'(--ignore-case)-i[case insensitive]' \
|
|
'(-w)--ignore-all-space[ignore all white space]' \
|
|
'(--ignore-all-space)-w[ignore all white space]' \
|
|
'(-b)--ignore-space-change[ignore changes in the amount of white space]' \
|
|
'(--ignore-space-change)-b[ignore changes in the amount of white space]' \
|
|
'(-B)--ignore-blank-lines[ignore lines that are all blank]' \
|
|
'(--ignore-blank-lines)-B[ignore lines that are all blank]' \
|
|
'(-I)--ignore-matching-lines=[ignore lines that match regex]:line exclusion regex:' \
|
|
'(--ignore-matching-lines)-I+[ignore lines that match regex]:line exclusion regex:' \
|
|
'(-a)--text[treat all files as text]' \
|
|
'(--text)-a[treat all files as text]' \
|
|
"($of $oss)--context=-[context diff]:number of lines of copied context:" \
|
|
"($of $oss)-C+[output a context diff]:number of lines of copied context:" \
|
|
"($of $oss)-c[output a context diff]" \
|
|
"($of $oss)--unified=-[output a unified diff]:number of lines of unified context:" \
|
|
"($of $oss)-U+[output a unified diff]:number of lines of unified context:" \
|
|
"($of $oss)-u[output a unified diff]" \
|
|
"($ofwuc $oss -L)--label=[set label to use instead of file name]:label:" \
|
|
"($ofwuc $oss --label)-L+[set label to use instead of file name]:label:" \
|
|
"($ofwuc $oss -L)--label=[set label to use instead of file name]:label:" \
|
|
"($ofwuc $oss --label)-L+[set label to use instead of file name]:label:" \
|
|
"($ofwuc $oss -p)--show-c-function[show C function of each change]" \
|
|
"($ofwuc $oss --show-c-function)-p[show C function of each change]" \
|
|
"($ofwuc $oss -F)--show-function-line=[show the most recent line matching regex]:regex:" \
|
|
"($ofwuc $oss --show-function-line)-F+[show the most recent line matching regex]:regex:" \
|
|
"($of $ouc $oss)--brief[output only whether files differ]" \
|
|
"($of $ouc $oss)--ed[output an ed script]" \
|
|
"($of $ouc $oss)-e[output an ed script]" \
|
|
"($of $ouc $oss)--forward-ed[output a reversed ed script]" \
|
|
"($of $ouc $oss)-f[output a reversed ed script]" \
|
|
"($of $ouc $oss)--rcs[RCS format diff]" \
|
|
"($of $ouc $oss)-n[RCS format diff]" \
|
|
"($of $ouc)--side-by-side[output in two columns]" \
|
|
"($of $ouc)-y[output in two columns]" \
|
|
"($ofwy $ouc -W)--width=[set size of line]:number of characters per line:" \
|
|
"($ofwy $ouc --width)-W+[set size of line]:number of characters per line:" \
|
|
"($ofwy $ouc)--left-column[output only left column of common lines]" \
|
|
"($ofwy $ouc)--suppress-common-lines[do not output common lines]" \
|
|
"($ofwg $ouc $oss)--old-group-format=[set old group format]:old group format:" \
|
|
"($ofwg $ouc $oss)--new-group-format=[set new group format]:new group format:" \
|
|
"($ofwg $ouc $oss)--changed-group-format=[set changed group format]:changed group format:" \
|
|
"($ofwg $ouc $oss)--unchanged-group-format=[set unchanged group format]:unchanged group format:" \
|
|
"($ofwl $ouc $oss)--line-format=[set line format]:line format:" \
|
|
"($ofwl $ouc $oss)--old-line-format=[set old line format]:old line format:" \
|
|
"($ofwl $ouc $oss)--new-line-format=[set new line format]:new line format:" \
|
|
"($ofwl $ouc $oss)--unchanged-line-format=[set unchanged line format]:unchanged line format:" \
|
|
'--paginate[output through pr]' \
|
|
'(-t)--expand-tabs[expand tabs to spaces]' \
|
|
'(--expand-tabs)-t[expand tabs to spaces]' \
|
|
'--initial-tab[prepend a tab]' \
|
|
'(-N)--new-file[treat absent files as empty]' \
|
|
'(--new-file)-N[treat absent files as empty]' \
|
|
'(-s)--report-identical-files[report when two files are the same]' \
|
|
'(--report-identical-files)-s[report when two files are the same]' \
|
|
'--horizon-lines=[set number of lines to keep in prefix and suffix]:number of horizon lines:' \
|
|
'(-d)--minimal[try to find a smaller set of changes]' \
|
|
'(--minimal)-d[try to find a smaller set of changes]' \
|
|
'(-H)--speed-large-files[assume large files and many small changes]' \
|
|
'(--speed-large-files)-H[assume large files and many small changes]' \
|
|
'*:file:_cvs_diff_arg'
|
|
}
|
|
|
|
(( $+functions[_cvs_diff_arg] )) ||
|
|
_cvs_diff_arg () {
|
|
_cvs_files_modified || _cvs_files
|
|
}
|
|
|
|
(( $+functions[_cvs_edit] )) ||
|
|
_cvs_edit () {
|
|
# "+lRa:"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-a+[specify action]:action:(edit unedit commit all none)' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_editors] )) ||
|
|
_cvs_editors () {
|
|
# "+lR"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_export] )) ||
|
|
_cvs_export () {
|
|
# "+Nnk:d:flRQqr:D:"
|
|
_arguments -s \
|
|
'-N[don'\''t shorten module paths]' \
|
|
'-n[disable checkout program]' \
|
|
'-f[use most recent revision if -D/-r is not matched]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'-d+[directory]:directory:_files -/' \
|
|
'(-D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-r)-D+[specify date]:date:_cvs_D' \
|
|
'*:module:_cvs_modules'
|
|
}
|
|
|
|
(( $+functions[_cvs_history] )) ||
|
|
_cvs_history () {
|
|
# "+Tacelow?D:b:f:m:n:p:r:t:u:x:X:z:"
|
|
_arguments -s \
|
|
'-T[all tags]' \
|
|
'-a[all users]' \
|
|
'-c[modified files]' \
|
|
'-e[everything]' \
|
|
'-l[last modification]' \
|
|
'-o[check-outed modules]' \
|
|
'-w[working directory]' \
|
|
'-D+[since date]:date:_cvs_D' \
|
|
'-b+[back to record]:string:' \
|
|
'-f+[specify file]:file:_cvs_files' \
|
|
'-m+[specify module]:module:_cvs_modules' \
|
|
'*-n+[in module]:module:_cvs_modules' \
|
|
'*-p+[in repository]:repository:' \
|
|
'-r+[since revision]:rev:' \
|
|
'-t+[since tag]:tag:' \
|
|
'*-u+[specify user]:user name:' \
|
|
'-x+[specify type]:type:_cvs_history_x' \
|
|
'-X+[debugging]:arg:' \
|
|
'-z+[specify timezone]:timezone:' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_history_x] )) ||
|
|
_cvs_history_x () {
|
|
_values -s '' 'type' \
|
|
'F[release]' \
|
|
'O[checkout]' \
|
|
'E[export]' \
|
|
'T[rtag]' \
|
|
'C[merge collision-detected]' \
|
|
'G[merge succeed]' \
|
|
'U[working file was copied]' \
|
|
'W[working file was deleted]' \
|
|
'A[A file was added]' \
|
|
'M[A file was modified]' \
|
|
'R[A file was removed]'
|
|
}
|
|
|
|
(( $+functions[_cvs_import] )) ||
|
|
_cvs_import () {
|
|
# "+Qqdb:m:I:k:W:"
|
|
_arguments -s \
|
|
'-d[use file modification time]' \
|
|
'-b+[specify vendor branch]:branch:' \
|
|
'-m+[message]:message:_cvs_m' \
|
|
'*-I+[ignore files]:name:_files' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'*-W+[wrapper specification]:spec:_files' \
|
|
':repository:_cvs_modules' \
|
|
':vendor tag:' \
|
|
':release tag:'
|
|
}
|
|
|
|
(( $+functions[_cvs_init] )) ||
|
|
_cvs_init () {
|
|
false
|
|
}
|
|
|
|
(( $+functions[_cvs_log] )) ||
|
|
_cvs_log () {
|
|
# "+bd:hlNRr::s:tw::"
|
|
_arguments -s \
|
|
'-b[default branch]' \
|
|
'(-t)-h[header]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-N[don'\''t list tags]' \
|
|
'(-h)-t[header with descriptive text]' \
|
|
'-d+[specify dates]:dates:' \
|
|
'-r-[specify revisions]:revisions:' \
|
|
'-s+[specify states]:states:(Exp Stab Rel dead)' \
|
|
'-w-[specify logins]:logins:' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_login] )) ||
|
|
_cvs_login () {
|
|
false
|
|
}
|
|
|
|
(( $+functions[_cvs_logout] )) ||
|
|
_cvs_logout () {
|
|
false
|
|
}
|
|
|
|
(( $+functions[_cvs_rdiff] )) ||
|
|
_cvs_rdiff () {
|
|
# "+V:k:cuftsQqlRD:r:"
|
|
_arguments -s \
|
|
'-c[output a context diff]' \
|
|
'-u[output a unified diff]' \
|
|
'-f[use most recent revision if -D/-r is not matched]' \
|
|
'-s[short patch]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-V+[specify version]:version:' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'(-D -D -r -r)-t[top two differences]' \
|
|
'(-t -r)-D+[specify date]:date:_cvs_D' \
|
|
'(-t -r)-D+[specify date]:date:_cvs_D' \
|
|
'(-t -D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-t -D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'*:module:_cvs_modules'
|
|
}
|
|
|
|
(( $+functions[_cvs_release] )) ||
|
|
_cvs_release () {
|
|
# "+Qdq"
|
|
_arguments -s \
|
|
'-d[delete]' \
|
|
'*:directory:_files -/'
|
|
}
|
|
|
|
(( $+functions[_cvs_remove] )) ||
|
|
_cvs_remove () {
|
|
# "+flR"
|
|
_arguments -s \
|
|
'-f[force to remove]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*:file:_cvs_files_removed'
|
|
}
|
|
|
|
(( $+functions[_cvs_rtag] )) ||
|
|
_cvs_rtag () {
|
|
# "+FanfQqlRdbr:D:"
|
|
_arguments -s \
|
|
'(-d)-F[move tag if already exists]' \
|
|
'(-d)-a[clear tag from removed files]' \
|
|
'-n[disable tag program]' \
|
|
'(-d)-f[force a head revision]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'(-b)-d[delete tag]' \
|
|
'(-d)-b[create branch]' \
|
|
'-D+[specify date]:date:_cvs_D' \
|
|
'-r+[specify revision]:tag:_cvs_revisions' \
|
|
':tag:' \
|
|
'*:module:_cvs_modules'
|
|
}
|
|
|
|
(( $+functions[_cvs_status] )) ||
|
|
_cvs_status () {
|
|
# "+vlR"
|
|
_arguments -s \
|
|
'-v[verbose]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_tag] )) ||
|
|
_cvs_tag () {
|
|
# "+FQqlRcdr:D:bf"
|
|
_arguments -s \
|
|
'(-d)-F[move tag if already exists]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-c[check that working files unmodified]' \
|
|
'(-b)-d[delete tag]' \
|
|
'(-d)-b[create branch]' \
|
|
'(-d)-f[force a head revision]' \
|
|
'-r+[specify revision]:tag:_cvs_revisions' \
|
|
'-D+[specify date]:date:_cvs_D' \
|
|
':tag:' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_unedit] )) ||
|
|
_cvs_unedit () {
|
|
# "+lR"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_update] )) ||
|
|
_cvs_update () {
|
|
# "+ApCPflRQqduk:r:D:j:I:W:"
|
|
_arguments -s \
|
|
'-A[reset sticky tags, dates and -k]' \
|
|
'-C[overwrite local modification]' \
|
|
'-p[check out to standard output]' \
|
|
'-P[prune empty directory]' \
|
|
'-f[use head revision]' \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'-d[create directories]' \
|
|
'-k+[keyword]:keyword substitution:_cvs_k' \
|
|
'(-D)-r+[specify revision]:tag:_cvs_revisions' \
|
|
'(-r)-D+[specify date]:date:_cvs_D' \
|
|
'-j+[merge]:tag:_cvs_revisions' \
|
|
'*-I+[ignore files]:name:_files' \
|
|
'*-W+[wrapper specification]:spec:_files' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_watch] )) ||
|
|
_cvs_watch () {
|
|
local expl
|
|
|
|
if (( CURRENT == 2 )); then
|
|
_wanted values expl 'watch command' compadd on off add remove
|
|
else
|
|
case "$words[2]" in
|
|
on|off) # "+lR"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
':watch command:' \
|
|
'*:file:_cvs_files'
|
|
;;
|
|
add|remove) # "+lRa:"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*-a+[specify action]:action:(edit unedit commit all none)' \
|
|
':watch command:' \
|
|
'*:file:_cvs_files'
|
|
;;
|
|
esac
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_watchers] )) ||
|
|
_cvs_watchers () {
|
|
# "+lR"
|
|
_arguments -s \
|
|
'(-R)-l[don'\''t recursive]' \
|
|
'(-l)-R[recursive]' \
|
|
'*:file:_cvs_files'
|
|
}
|
|
|
|
(( $+functions[_cvs_loadstat] )) ||
|
|
_cvs_loadstat () {
|
|
zstyle -t ":completion:${curcontext}:" disable-stat && return
|
|
(( $+_cvs_loadstat_tried )) && return
|
|
_cvs_loadstat_tried=yes
|
|
|
|
zmodload -i zsh/stat 2>/dev/null
|
|
}
|
|
|
|
(( $+functions[_cvs_root] )) ||
|
|
_cvs_root () {
|
|
local cvspassfile id
|
|
|
|
typeset -gU _cvs_roots
|
|
|
|
if [[ -f "${cvspassfile::=${CVS_PASSFILE:-$HOME/.cvspass}}" ]]; then
|
|
_cvs_loadstat
|
|
if (( $+builtins[stat] )); then
|
|
id="$(LC_ALL=C builtin stat -g +mtime -F '%Y/%m/%d-%T' "$cvspassfile")"
|
|
else
|
|
id="$(LC_ALL=C ls -l "$cvspassfile")"
|
|
fi
|
|
if [[ "$id" != "$_cvs_pass_id" ]]; then
|
|
_cvs_roots=($_cvs_roots ${${(f)"$(<$cvspassfile)"}%% *})
|
|
_cvs_pass_id="$id"
|
|
fi
|
|
fi
|
|
|
|
_tags files && {
|
|
compadd -M 'r:|[:@./]=* r:|=*' "$@" $_cvs_roots || _files "$@" -/
|
|
}
|
|
}
|
|
|
|
(( $+functions[_cvs_tempdir] )) ||
|
|
_cvs_tempdir () {
|
|
_tags directories && compadd "$@" $TMPPREFIX:h $TMPDIR /tmp
|
|
}
|
|
|
|
(( $+functions[_cvs_user_variable] )) ||
|
|
_cvs_user_variable () {
|
|
if compset -P '*='; then
|
|
_default
|
|
else
|
|
_message "variable=value"
|
|
fi
|
|
}
|
|
|
|
# define completion functions for cvs global options.
|
|
|
|
(( $+functions[_cvs_bindir] )) ||
|
|
_cvs_bindir () {
|
|
_tags directories && { compadd "$@" /usr/local/bin || _files "$@" -/ }
|
|
}
|
|
|
|
(( $+functions[_cvs_editor] )) ||
|
|
_cvs_editor () {
|
|
_tags commands && compadd "$@" vi
|
|
}
|
|
|
|
(( $+functions[_cvs_gzip_level] )) ||
|
|
_cvs_gzip_level () {
|
|
_tags values && compadd "$@" 9
|
|
}
|
|
|
|
# define completion functions for cvs common options and arguments.
|
|
|
|
(( $+functions[_cvs_D] )) ||
|
|
_cvs_D () {
|
|
_tags values && compadd "$@" today yesterday week\ ago month\ ago
|
|
}
|
|
|
|
(( $+functions[_cvs_k] )) ||
|
|
_cvs_k () {
|
|
_tags values && compadd "$@" kv kvl k o b v
|
|
}
|
|
|
|
(( $+functions[_cvs_m] )) ||
|
|
_cvs_m () {
|
|
_message "log message"
|
|
}
|
|
|
|
(( $+functions[_cvs_modules] )) ||
|
|
_cvs_modules () {
|
|
local root=$CVSROOT expl
|
|
|
|
[[ -f CVS/Root ]] && root=$(<CVS/Root)
|
|
|
|
if [[ $root = :* || ! -d $root ]]; then
|
|
_message "module name"
|
|
else
|
|
_wanted modules expl module \
|
|
compadd - $root/^CVSROOT(:t) \
|
|
${${(M)${(f)"$(<$root/CVSROOT/modules)"}:#[^#]*}%%[ ]*}
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_revisions] )) ||
|
|
_cvs_revisions () {
|
|
local expl
|
|
|
|
_wanted values expl revision \
|
|
compadd - ${${${(M)${(f)"$(cvs -q status -vl .)"}:# *}##[ ]##(No Tags Exist)#}%%[ ]*}
|
|
}
|
|
|
|
# define completion functions for files maintained by cvs.
|
|
|
|
(( $+functions[_cvs_setup_prefix] )) ||
|
|
_cvs_setup_prefix () {
|
|
if [[ -prefix */ ]]; then
|
|
qpref="${PREFIX%/*}/"
|
|
pref=$~qpref
|
|
else
|
|
qpref=
|
|
pref=./
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_extract_directory_entries] )) ||
|
|
_cvs_extract_directory_entries () {
|
|
entries=($entries ${${${(M)rawentries:#D/*}#D/}%%/*})
|
|
}
|
|
|
|
(( $+functions[_cvs_extract_file_entries] )) ||
|
|
_cvs_extract_file_entries () {
|
|
entries=($entries ${${${(M)rawentries:#/*}#/}%%/*})
|
|
}
|
|
|
|
(( $+functions[_cvs_extract_modifiedfile_entries] )) ||
|
|
_cvs_extract_modifiedfile_entries () {
|
|
_cvs_loadstat
|
|
if (( ! $+builtins[stat] )); then
|
|
_cvs_extract_file_entries
|
|
return
|
|
fi
|
|
|
|
local ents pats
|
|
ents=(${${${${(M)rawentries:#/*}#/}/\\/[^\\/]#\\///}%/[^/]#/[^/]#})
|
|
pats=(${${${(f)"$(LC_ALL=C builtin stat -gn +mtime -F '%a %b %e %T %Y' ${pref}*(D))"}##*/}/ //})
|
|
eval 'ents=(${ents:#('${(j:|:)${(@)pats:q}}')})'
|
|
entries=($entries ${ents%%/*})
|
|
}
|
|
|
|
(( $+functions[_cvs_setup_allentries] )) ||
|
|
_cvs_setup_allentries () {
|
|
entries=()
|
|
if [[ -f ${pref}CVS/Entries ]]; then
|
|
local rawentries
|
|
rawentries=(${(f)"$(<${pref}CVS/Entries)"})
|
|
_cvs_extract_file_entries
|
|
_cvs_extract_directory_entries
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_setup_direntries] )) ||
|
|
_cvs_setup_direntries () {
|
|
entries=()
|
|
if [[ -f ${pref}CVS/Entries ]]; then
|
|
local rawentries
|
|
rawentries=(${(f)"$(<${pref}CVS/Entries)"})
|
|
_cvs_extract_directory_entries
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_setup_modentries] )) ||
|
|
_cvs_setup_modentries () {
|
|
entries=()
|
|
if [[ -f ${pref}CVS/Entries ]]; then
|
|
local rawentries
|
|
rawentries=(${(f)"$(<${pref}CVS/Entries)"})
|
|
_cvs_extract_modifiedfile_entries
|
|
_cvs_extract_directory_entries
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_directories] )) ||
|
|
_cvs_directories () {
|
|
if [[ -d ${pref}CVS ]]; then
|
|
_cvs_setup_direntries
|
|
(( $#entries )) && _path_files "$@" -g "${(j:|:)${(@)entries:q}}" ||
|
|
_path_files -g '*~(*/|)CVS(/)'
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_files] )) ||
|
|
_cvs_files () {
|
|
local qpref pref entries
|
|
_cvs_setup_prefix
|
|
if [[ -d ${pref}CVS ]]; then
|
|
_cvs_setup_allentries
|
|
(( $#entries )) && _files "$@" -g "${(j:|:)${(@)entries:q}}"
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_files_modified] )) ||
|
|
_cvs_files_modified () {
|
|
local qpref pref entries
|
|
_cvs_setup_prefix
|
|
if [[ -d ${pref}CVS ]]; then
|
|
_cvs_setup_modentries
|
|
setopt localoptions unset
|
|
local omit
|
|
omit=($line)
|
|
eval 'entries=(${entries:#('${(j:|:)${(@)omit:q}}')})'
|
|
(( $#entries )) && _files "$@" -g "${(j:|:)${(@)entries:q}}"
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_files_removed] )) ||
|
|
_cvs_files_removed () {
|
|
local qpref pref entries
|
|
_cvs_setup_prefix
|
|
if [[ -d ${pref}CVS ]]; then
|
|
_cvs_setup_allentries
|
|
setopt localoptions unset
|
|
local omit
|
|
omit=(${pref}*(D:t) $line)
|
|
eval 'entries=(${entries:#('${(j:|:)${(@)omit:q}}')})'
|
|
_tags directories && compadd "$@" -P "$qpref" - ${entries:q} ||
|
|
_cvs_directories "$@"
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
(( $+functions[_cvs_files_unmaintained] )) ||
|
|
_cvs_files_unmaintained () {
|
|
local qpref pref entries
|
|
_cvs_setup_prefix
|
|
if [[ -d ${pref}CVS ]]; then
|
|
_cvs_setup_allentries
|
|
setopt localoptions unset
|
|
local omit
|
|
omit=($_cvs_ignore_default ${entries:q} ${=cvsignore} $line)
|
|
[[ -r ~/.cvsignore ]] && omit=($omit $(<~/.cvsignore))
|
|
[[ -r ${pref}.cvsignore ]] && omit=($omit $(<${pref}.cvsignore))
|
|
entries=($entries CVS)
|
|
_path_files "$@" -g '*~(*/|)('${(j:|:)omit}')(D)' ||
|
|
_path_files "$@" -g '*~(*/|)('${(j:|:)${(@)entries:q}}')(D)' ||
|
|
_cvs_directories "$@"
|
|
else
|
|
_files "$@"
|
|
fi
|
|
}
|
|
|
|
# define configuration variables.
|
|
|
|
(( $+_cvs_ignore_default )) ||
|
|
_cvs_ignore_default=(
|
|
RCS SCCS CVS CVS.adm RCSLOG 'cvslog.*' tags TAGS .make.state .nse_depinfo
|
|
'*\~' '\#*' '.\#*' ',*' '_$*' '*$' '*.old' '*.bak' '*.BAK' '*.orig' '*.rej'
|
|
'.del-*' '*.a' '*.olb' '*.o' '*.obj' '*.so' '*.exe' '*.Z' '*.elc' '*.ln'
|
|
core
|
|
)
|
|
|
|
# call real _cvs.
|
|
|
|
[[ -o kshautoload ]] || _cvs "$@"
|