76b9c56110
Dotkit is being used only at a few sites and has been deprecated on new machines. This commit removes all the code that provide support for the generation of dotkit module files. A new validator named "deprecatedProperties" has been added to the jsonschema validators. It permits to prompt a warning message or exit with an error if a property that has been marked as deprecated is encountered. * Removed references to dotkit in the docs * Removed references to dotkit in setup-env-test.sh * Added a unit test for the 'deprecatedProperties' schema validator
149 lines
5.0 KiB
Tcsh
149 lines
5.0 KiB
Tcsh
# Copyright 2013-2019 Lawrence Livermore National Security, LLC and other
|
|
# Spack Project Developers. See the top-level COPYRIGHT file for details.
|
|
#
|
|
# SPDX-License-Identifier: (Apache-2.0 OR MIT)
|
|
|
|
########################################################################
|
|
# This is a wrapper around the spack command that forwards calls to
|
|
# 'spack load' and 'spack unload' to shell functions. This in turn
|
|
# allows them to be used to invoke environment-modules functions.
|
|
#
|
|
# 'spack load' is smarter than just 'load' because it converts its
|
|
# arguments into a unique Spack spec that is then passed to environment-modules
|
|
# commands. This allows the user to use packages without knowing all
|
|
# their installation details.
|
|
#
|
|
# e.g., rather than requiring a full spec for libelf, the user can type:
|
|
#
|
|
# spack load libelf
|
|
#
|
|
# This will first find the available libelf module file and use a
|
|
# matching one. If there are two versions of libelf, the user would
|
|
# need to be more specific, e.g.:
|
|
#
|
|
# spack load libelf@0.8.13
|
|
#
|
|
# This is very similar to how regular spack commands work and it
|
|
# avoids the need to come up with a user-friendly naming scheme for
|
|
# spack module files.
|
|
########################################################################
|
|
# accumulate initial flags for main spack command
|
|
set _sp_flags = ""
|
|
while ( $#_sp_args > 0 )
|
|
if ( "$_sp_args[1]" !~ "-*" ) break
|
|
set _sp_flags = "$_sp_flags $_sp_args[1]"
|
|
shift _sp_args
|
|
end
|
|
|
|
# h and V flags don't require further output parsing.
|
|
if ( "$_sp_flags" =~ *h* || "$_sp_flags" =~ *V* ) then
|
|
\spack $_sp_flags $_sp_args
|
|
goto _sp_end
|
|
endif
|
|
|
|
# Set up args -- we want a subcommand and a spec.
|
|
set _sp_subcommand=""
|
|
set _sp_spec=""
|
|
[ $#_sp_args -gt 0 ] && set _sp_subcommand = ($_sp_args[1])
|
|
[ $#_sp_args -gt 1 ] && set _sp_spec = ($_sp_args[2-])
|
|
|
|
# Figure out what type of module we're running here.
|
|
set _sp_modtype = ""
|
|
switch ($_sp_subcommand)
|
|
case cd:
|
|
shift _sp_args # get rid of 'cd'
|
|
|
|
set _sp_arg=""
|
|
[ $#_sp_args -gt 0 ] && set _sp_arg = ($_sp_args[1])
|
|
shift _sp_args
|
|
|
|
if ( "$_sp_arg" == "-h" ) then
|
|
\spack cd -h
|
|
else
|
|
cd `\spack location $_sp_arg $_sp_args`
|
|
endif
|
|
breaksw
|
|
case env:
|
|
shift _sp_args # get rid of 'env'
|
|
|
|
set _sp_arg=""
|
|
[ $#_sp_args -gt 0 ] && set _sp_arg = ($_sp_args[1])
|
|
|
|
if ( "$_sp_arg" == "-h" ) then
|
|
\spack env -h
|
|
else
|
|
switch ($_sp_arg)
|
|
case activate:
|
|
set _sp_env_arg=""
|
|
[ $#_sp_args -gt 1 ] && set _sp_env_arg = ($_sp_args[2])
|
|
|
|
if ( "$_sp_env_arg" == "" || "$_sp_args" =~ "*--sh*" || "$_sp_args" =~ "*--csh*" || "$_sp_args" =~ "*-h*" ) then
|
|
# no args or args contain -h/--help, --sh, or --csh: just execute
|
|
\spack $_sp_flags env $_sp_args
|
|
else
|
|
shift _sp_args # consume 'activate' or 'deactivate'
|
|
# actual call to activate: source the output
|
|
eval `\spack $_sp_flags env activate --csh $_sp_args`
|
|
endif
|
|
breaksw
|
|
case deactivate:
|
|
set _sp_env_arg=""
|
|
[ $#_sp_args -gt 1 ] && set _sp_env_arg = ($_sp_args[2])
|
|
|
|
if ( "$_sp_env_arg" != "" ) then
|
|
# with args: execute the command
|
|
\spack $_sp_flags env $_sp_args
|
|
else
|
|
# no args: source the output
|
|
eval `\spack $_sp_flags env deactivate --csh`
|
|
endif
|
|
breaksw
|
|
default:
|
|
echo default
|
|
\spack $_sp_flags env $_sp_args
|
|
breaksw
|
|
endsw
|
|
endif
|
|
case load:
|
|
case unload:
|
|
set _sp_module_args=""""
|
|
if ( "$_sp_spec" =~ "-*" ) then
|
|
set _sp_module_args = $_sp_spec[1]
|
|
shift _sp_spec
|
|
set _sp_spec = ($_sp_spec)
|
|
endif
|
|
|
|
# Here the user has run load or unload with a spec. Find a matching
|
|
# spec using 'spack module find', then use the appropriate module
|
|
# tool's commands to add/remove the result from the environment.
|
|
switch ($_sp_subcommand)
|
|
case "load":
|
|
# _sp_module_args may be "-r" for recursive spec retrieval
|
|
set _sp_full_spec = ( "`\spack $_sp_flags module tcl find $_sp_module_args $_sp_spec`" )
|
|
if ( "$_sp_module_args" == "-r" ) then
|
|
# module load can handle the list of modules to load and "-r" is not a valid option
|
|
set _sp_module_args = ""
|
|
endif
|
|
if ( $? == 0 ) then
|
|
module load $_sp_module_args $_sp_full_spec
|
|
endif
|
|
breaksw
|
|
case "unload":
|
|
set _sp_full_spec = ( "`\spack $_sp_flags module tcl find $_sp_spec`" )
|
|
if ( $? == 0 ) then
|
|
module unload $_sp_module_args $_sp_full_spec
|
|
endif
|
|
breaksw
|
|
endsw
|
|
breaksw
|
|
|
|
default:
|
|
\spack $_sp_flags $_sp_args
|
|
breaksw
|
|
endsw
|
|
|
|
_sp_end:
|
|
unset _sp_args _sp_full_spec _sp_modtype _sp_module_args
|
|
unset _sp_sh_cmd _sp_spec _sp_subcommand _sp_flags
|
|
unset _sp_arg _sp_env_arg
|