mirror of
https://github.com/Gator96100/ProxSpace.git
synced 2025-03-12 04:36:22 -07:00
86 lines
2.5 KiB
Bash
86 lines
2.5 KiB
Bash
# module completion by Ted Stern <stern@cray.com> -*- shell-script -*-
|
|
#
|
|
# Use of this file is deprecated, upstream completion is available in
|
|
# modules >= 3.2.7, use that instead.
|
|
#
|
|
# Completion for Environment Modules `module' alias.
|
|
#
|
|
# See https://sourceforge.net/projects/modules/
|
|
# https://modules.sourceforge.net/
|
|
#
|
|
# There are several versions of modules that are commonly used. Older
|
|
# Cray UNICOS systems and many other sites use 2.2.2b. The latest GPL'd
|
|
# version is 3.1.6. But the module alias is somewhat self-documenting
|
|
# via the `module help' command, so use that to print the options.
|
|
#
|
|
# Programmable completion might be more difficult under tcsh since the
|
|
# module command is an alias, and the `module avail' command returns
|
|
# its output as stderr.
|
|
|
|
# Test for existence of /etc/profile.d/modules.sh too because we may end up
|
|
# being sourced before it and thus before the `module' alias has been defined.
|
|
[ -f /etc/profile.d/modules.sh ] || return 1
|
|
|
|
_module_list()
|
|
{
|
|
local modules="$(command sed 's/:/ /g' <<<$LOADEDMODULES | sort)"
|
|
compgen -W "$modules" -- $1
|
|
}
|
|
|
|
_module_path()
|
|
{
|
|
local modules="$(command sed 's/:/ /g' <<<$MODULEPATH | sort)"
|
|
compgen -W "$modules" -- $1
|
|
}
|
|
|
|
_module_avail()
|
|
{
|
|
local modules="$(
|
|
module avail 2>&1 |
|
|
command grep -E -v '^(-|$)' |
|
|
xargs printf '%s\n' | command sed -e 's/(default)//g' | sort
|
|
)"
|
|
|
|
compgen -W "$modules" -- $1
|
|
}
|
|
|
|
# A completion function for the module alias
|
|
_module()
|
|
{
|
|
local cur prev words cword
|
|
_init_completion || return
|
|
|
|
if ((cword == 1)); then
|
|
# First parameter on line -- we expect it to be a mode selection
|
|
|
|
local options
|
|
options="$(module help 2>&1 | command grep -E '^[[:space:]]*\+' |
|
|
awk '{print $2}' | command sed -e 's/|/ /g' | sort)"
|
|
|
|
COMPREPLY=($(compgen -W "$options" -- "$cur"))
|
|
|
|
elif ((cword == 2)); then
|
|
case $prev in
|
|
add | display | help | load | show | whatis)
|
|
COMPREPLY=($(_module_avail "$cur"))
|
|
;;
|
|
rm | switch | swap | unload | update)
|
|
COMPREPLY=($(_module_list "$cur"))
|
|
;;
|
|
unuse)
|
|
COMPREPLY=($(_module_path "$cur"))
|
|
;;
|
|
esac
|
|
elif ((cword == 3)); then
|
|
case ${words[1]} in
|
|
swap | switch)
|
|
COMPREPLY=($(_module_avail "$cur"))
|
|
;;
|
|
esac
|
|
fi
|
|
|
|
} &&
|
|
complete -F _module -o default module
|
|
|
|
# ex: filetype=sh
|