1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-01-11 20:31:11 +01:00

11739: _dpkg improvements

This commit is contained in:
Clint Adams 2000-06-04 18:32:19 +00:00
parent 360abc7d0f
commit bac12ab6ff
2 changed files with 68 additions and 34 deletions

View file

@ -1,3 +1,9 @@
2000-06-04 Clint Adams <schizo@debian.org>
* 11739: Completion/Debian/_dpkg: complete multiple arguments
for -i, -r, -P, -l, -L, -s, -S. _funcalls for the
newly-introduced states.
2000-06-03 Bart Schaefer <schaefer@zsh.org>
* 11737: Src/Makefile.in: Remove modules.index and modules-bltin

View file

@ -1,6 +1,10 @@
#compdef dpkg dpkg-deb
_dpkg_deb_args=('(--build)-b[build archive]:directory:_files -/' \
local _dpkg_deb_actions _dpkg_common_actions _dpkg_actions _dpkg_options
local curcontext="$curcontext" state line expl ret
typeset -A opt_args
_dpkg_deb_actions=('(--build)-b[build archive]:directory:_files -/' \
'(-b)--build:directory:_files -/' \
'(--contents)-c[list contents]:Debian package:_files -g \*.deb' \
'(-c)--contents:Debian package:_files -g \*.deb' \
@ -16,45 +20,46 @@ _dpkg_deb_args=('(--build)-b[build archive]:directory:_files -/' \
'(-X)--vextract[extract and list]:Debian package:_files -g \*.deb' \
'--fsys-tarfile[output fs tarfile]:Debian package:_files -g \*.deb')
_dpkg_common_args=('--help[show help]' \
_dpkg_common_actions=('--help[show help]' \
'--version[show version]' \
'--licence[show licensing]')
'(--license)--licence[show licencing]' \
'(--licence)--license[show licensing]')
case "${words[1]:t}" in
dpkg)
_arguments -s '(--install)-i[install packages]:Debian package:_files -g \*.deb' \
'(-i)--install:Debian package:_files -g \*.deb' \
_dpkg_actions=('(--install)-i[install packages]:*:Debian packages:->install' \
'(-i)--install:*:Debian packages:->install' \
'--unpack[unpack package]:Debian package:_files -g \*.deb' \
'(--record-avail)-A[record available]:package file:_files' \
'(-A)--record-avail:package file:_files' \
'--configure:package:_deb_packages installed' \
'(--remove)-r[remove package]:package:_deb_packages installed' \
'(-r)--remove:package:_deb_packages installed' \
'(--purge)-P[purge package]:package:_deb_packages installed' \
'(-P)--purge:package:_deb_packages installed' \
'--get-selections[get selections]:pattern:' \
'--set-selections[set selections]' \
'--update-avail[update available]:package file:_files' \
'--merge-avail[merge available]:package file:_files' \
'--clear-avail[clear available]' \
'--forget-old-unavail[forget uninstalled unavailable]' \
'(--status)-s[display package status]:packages:_deb_packages installed' \
'(-s)--status:packages:_deb_packages installed' \
'(--remove)-r[remove package]:*:package:->remove' \
'(-r)--remove:*:package:->remove' \
'(--purge)-P[purge package]:*:package:->purge' \
'(-P)--purge:*:package:->purge' \
'(--print-avail)-p[display available details]:packages:_deb_packages avail' \
'(-p)--print-avail:packages:_deb_packages avail' \
'(--listfiles)-L[list owned files]:packages:_deb_packages installed' \
'(-L)--listfiles:packages:_deb_packages installed' \
'(--list)-l[list packages]:packages:_deb_packages avail' \
'(-l)--list:packages:_deb_packages avail' \
'(--search)-S[search for file owner]:pattern:_files' \
'(-S)--search:pattern:_files' \
'--update-avail[update available]:package file:_files' \
'--merge-avail[merge available]:package file:_files' \
'(--record-avail)-A[record available]:package file:_files' \
'(-A)--record-avail:package file:_files' \
'--forget-old-unavail[forget uninstalled unavailable]' \
'--clear-avail[clear available]' \
'(--list)-l[list packages]:*:packages:->list' \
'(-l)--list:*:packages:->list' \
'(--status)-s[display package status]:*:packages:->status' \
'(-s)--status:*:packages:->status' \
'(--audit)-C[check for broken pkgs]' \
'(-C)--audit' \
'--abort-after[abort after errors]:number of errors:' \
'--get-selections[get selections]:pattern:' \
'--set-selections[set selections]' \
'--yet-to-unpack[list uninstalled]' \
'(--listfiles)-L[list owned files]:*:packages:->listfiles' \
'(-L)--listfiles:*:packages:->listfiles' \
'(--search)-S[search for file owner]:*:pattern:->search' \
'(-S)--search:*:pattern:->search' \
'--print-architecture[print target architecture]' \
'--print-gnu-build-architecture[print GNU version of target architecture]' \
'--print-installation-architecture[print host architecture]' \
'--compare-versions[compare version numbers]:expression:' \
'--compare-versions[compare version numbers]:expression:')
_dpkg_options=('--abort-after[abort after errors]:number of errors:' \
'--admindir=[data directory]:directory:_files -/' \
'--root=[alternative root]:root:_files -/' \
'--instdir=[change inst root but not data dir]:_files -/' \
@ -72,15 +77,38 @@ _arguments -s '(--install)-i[install packages]:Debian package:_files -g \*.deb'
'-D+[debug options]:debug options:(h 1 2 3)' \
'--debug=[debug options]:debug options:(help 1 2 3)' \
'--ignore-depends=[ignore depends involving package]:package:_deb_packages avail' \
--{force,refuse,no-force}'--[forcing options]:what:(auto-select downgrade configure-any hold bad-path not-root overwrite overwrite-diverted depends-version depends confnew confold confdef confmiss conflicts architecture overwrite-dir remove-reinstreq remove-essential)' \
"$_dpkg_deb_args[@]" \
"$_dpkg_common_args[@]"
--{force,refuse,no-force}'--[forcing options]:what:(auto-select downgrade configure-any hold bad-path not-root overwrite overwrite-diverted depends-version depends confnew confold confdef confmiss conflicts architecture overwrite-dir remove-reinstreq remove-essential)')
case "${words[1]:t}" in
dpkg)
_arguments -C -s "$_dpkg_actions[@]" \
"$_dpkg_deb_actions[@]" \
"$_dpkg_common_actions[@]" \
"$_dpkg_options[@]"
;;
dpkg-deb)
_arguments "$_dpkg_deb_args[@]" \
"$_dpkg_common_args[@]"
_arguments "$_dpkg_deb_actions[@]" \
"$_dpkg_common_actions[@]"
;;
esac
case "$state" in
install)
_funcall ret _dpkg_$state && return ret
_arguments -C -s "$_dpkg_options[@]" \
'*:Debian package:_files -g \*.deb'
;;
remove|purge|status|listfiles)
_funcall ret _dpkg_$state && return ret
_arguments -C -s "$_dpkg_options[@]" \
'*:package:_deb_packages installed'
;;
list)
_funcall ret _dpkg_$state && return ret
_arguments -C -s "$_dpkg_options[@]" \
'*:packages:_deb_packages avail' \
;;
esac