From 356f432985b76ce8a0fe71fef2ec433517605477 Mon Sep 17 00:00:00 2001 From: Oliver Kiddle Date: Wed, 14 Jan 2004 17:01:11 +0000 Subject: 19364: new completions for aptitude, getent and catcgsegv --- Completion/Unix/Command/.distfiles | 2 +- Completion/Unix/Command/_getent | 50 ++++++++++++++++++++++++++++++++++++++ 2 files changed, 51 insertions(+), 1 deletion(-) create mode 100755 Completion/Unix/Command/_getent (limited to 'Completion/Unix') diff --git a/Completion/Unix/Command/.distfiles b/Completion/Unix/Command/.distfiles index 04e83bead..d3ba38e00 100644 --- a/Completion/Unix/Command/.distfiles +++ b/Completion/Unix/Command/.distfiles @@ -21,6 +21,6 @@ _netcat _larch _texinfo _figlet _elinks _tidy _global _ant _lsof _mt _xmlsoft _perforce _python _antiword _screen _renice _apm _ecasound _gpg _subversion _aap _sablotron _nmap -_chmod _du +_chmod _du _getent _nice _rar _vorbis ' diff --git a/Completion/Unix/Command/_getent b/Completion/Unix/Command/_getent new file mode 100755 index 000000000..57d2ec256 --- /dev/null +++ b/Completion/Unix/Command/_getent @@ -0,0 +1,50 @@ +#compdef getent + +local curcontext="$curcontext" state line expl ret=1 +local services databases keys +local -a args +typeset -A opt_args + +if _pick_variant -r is_gnu gnu=GNU unix --version; then + args+=( + '(- 1 *)'{-\?,--help}'[display help information]' + '(- 1 *)--usage[display a short usage message]' + '(- 1 *)'{-V,--version}'[display version information]' + {-s,--service=}'[specify service configuration to use]:service:->services' + ) +fi + +_arguments -C "$args[@]" \ + '1:database:->databases' \ + '*:key:->keys' && ret=0 + +case $state in + services) + services=( /lib/libnss*(-.:fr:t:s/libnss_//) ) + _wanted services expl service compadd ${services%-*} && ret=0 + ;; + databases) + if [[ $is_gnu = gnu ]]; then + databases=( ${=${${(f)"$(_call_program databases $words[1] --help \ + 2>/dev/null)"}[(r)Supported*,-1]}[2,-1]} ) + else + databases=( passwd group hosts ipnodes services protocols ethers networks netmasks ) + fi + _wanted databases expl database compadd -a databases && ret=0 + ;; + keys) + keys=( ${(f)"$(_call_program keys $words[1] ${(kv)opt_args[(i)-s|--service]} $line[1] 2>/dev/null)"} ) + case $line[1] in + *hosts) _wanted keys expl key compadd ${=keys#* } && ret=0 ;; + networks|rpc|protocols|services) + _wanted keys expl key compadd ${=keys%% *} && ret=0 + ;; + aliases|passwd|shadow|group) + _wanted keys expl key compadd ${keys%%:*} && ret=0 + ;; + *) _message -e keys key;; + esac + ;; +esac + +return ret -- cgit 1.4.1