mirror of
https://github.com/envmodules/modules.git
synced 2026-05-30 00:12:31 +08:00
Introduce the __MODULES_QUARANTINE_SET environment variable to put back when starting modulecmd.tcl run the environment set on hold by initialization script (for autoinit calls) or by module shell function (for regular calls). This new environment variable is tested to apply quarantine unhold mechanism instead of checking if the run_quarantine configuration option is set and shell accurately supports the mecanishm. With this change it is possible to enable or disable the quarantine support at module initialization time (through initrc configuration file) instead of freezing this configuration when building the modulecmd.tcl script.
28 lines
1.1 KiB
Python
28 lines
1.1 KiB
Python
import os, re, subprocess
|
|
|
|
# define modules runtine quarantine configuration
|
|
@setquarvars@os.environ['MODULES_RUN_QUARANTINE'] = '@RUN_QUARANTINE@'
|
|
@setquarvars@@os.environ['RUNENV_VAR'] = 'RUNENV_VAL'@
|
|
@notsetquarvars@#os.environ['MODULES_RUN_QUARANTINE'] = 'ENVVARNAME'
|
|
@notsetquarvars@
|
|
# setup quarantine if defined
|
|
_mlre = os.environ.copy()
|
|
if 'MODULES_RUN_QUARANTINE' in os.environ:
|
|
for _mlv in os.environ['MODULES_RUN_QUARANTINE'].split():
|
|
if re.match('^[A-Za-z_][A-Za-z0-9_]*$', _mlv):
|
|
if _mlv in os.environ:
|
|
_mlre['__MODULES_QUAR_' + _mlv] = os.environ[_mlv]
|
|
_mlrv = 'MODULES_RUNENV_' + _mlv
|
|
if _mlrv in os.environ:
|
|
_mlre[_mlv] = os.environ[_mlrv]
|
|
else:
|
|
_mlre[_mlv] = ''
|
|
_mlre['__MODULES_QUARANTINE_SET'] = '1'
|
|
|
|
# define module command and surrounding initial environment (default value
|
|
# for MODULESHOME, MODULEPATH, LOADEDMODULES and parse of init config files)
|
|
exec(subprocess.Popen(['@TCLSH@', '@libexecdir@/modulecmd.tcl', 'python', 'autoinit'], stdout=subprocess.PIPE, env=_mlre).communicate()[0])
|
|
|
|
# clean temp variable used to setup quarantine
|
|
del _mlre
|