Add ZSH completion function

This commit is contained in:
Robert David
2011-07-09 22:29:55 +02:00
committed by Fabio Erculiani
parent f722912dd2
commit db68dff3fe
2 changed files with 106 additions and 0 deletions

View File

@@ -88,6 +88,10 @@ equo-install:
# copy man page
install -m 644 docs/man/man1/equo.1 $(DESTDIR)$(PREFIX)/share/man/man1/
# copy zsh completion
mkdir -p $(DESTDIR)$(PREFIX)/share/zsh/site-functions
install -m 644 conf/_equo $(DESTDIR)$(PREFIX)/share/zsh/site-functions/
updates-daemon-install:

102
conf/_equo Normal file
View File

@@ -0,0 +1,102 @@
#compdef equo
local curcontext="$curcontext" state line cmds packages mirrors
typeset -A opt_args
_equo_get_mirrors()
{
mirrors=( ${(f)"$(equo status | grep Repository\ name | cut -d: -f2 | sed 's/^\ *//')"} )
_describe -t packages 'mirrors' mirrors
}
_equo_get_cmds()
{
cmds=( ${(f)"$(equo $1 --help | tr "\t" ":" | grep "^:[^:]" | sed 's/^:\([^:\ ]*\)[^:]*:*/\1:/')"} )
_describe -t commands 'command params' cmds
}
_equo_get_installed_packages()
{
packages=( ${(f)"$(equo query list installed | equo query list installed | sed 's/.*\///')"} )
_describe -t packages 'installed packages' packages
}
_equo_get_available_packages()
{
packages=( ${(f)"$(equo search $1 | grep Package |sed 's/.*\/\([^\ ]*\).*/\1/')"} )
_describe -t packages 'available packages' packages
}
_arguments -C \
"--help[print help]" \
"--version[print version]" \
"--nocolor[dont use colors]" \
"--color[use colors(default)]" \
"--bashcomp[print bash completion script]"\
'1:command:->cmds' \
'*:subcommand:->args'
case $state in
cmds)
cmds=( ${(f)"$(equo --help |tr "\t" ":" | grep "^:[^:-]" | sed 's/^:\(\w*\).*:\+/\1:/')"} )
_describe -t commands 'equo command' cmds
;;
args)
case $line[1] in
remove|config)
_equo_get_cmds $line[1] && return 0
_equo_get_installed_packages
;;
install|fetch|search|source|mask|unmask)
_equo_get_cmds $line[1] && return 0
_equo_get_available_packages $line[-1]
;;
repo)
case $line[2] in
enable|disable|remove|mirrorsort)
_equo_get_mirrors
;;
add|merge)
;;
*)
_equo_get_cmds $line[1]
;;
esac
;;
query)
case $line[2] in
changelog|revdeps|files|needed|removal|graph|revgraph)
_equo_get_installed_packages
;;
list)
case $line[3] in
available)
_equo_get_mirrors
;;
installed)
;;
*)
cmds=( ${(f)"$(equo query list --help |tr "\t" ":" | grep "^::[^:]" | sed 's/^::\([^:\ ]*\)[^:]*:*/\1:/')"} )
_describe -t commands 'command params' cmds
;;
esac
;;
belongs|description|license|mimetype|asociate|orphans|required|sets|slots|tags)
;;
*)
_equo_get_cmds $line[1]
;;
esac
;;
notice)
_equo_get_mirrors
;;
cleanup|status)
;;
*)
_equo_get_cmds $line[1]
;;
esac
;;
esac