mirror of
https://github.com/envmodules/modules.git
synced 2026-06-10 00:56:30 +08:00
1cd8a67b52
When TESTSUITE_ENABLE_MODULECACHE environment variable is set, cache file is built for all modulepaths of the testsuite. Tests are run using the cache files to resolve available modules.
100 lines
3.0 KiB
Plaintext
100 lines
3.0 KiB
Plaintext
##############################################################################
|
|
# Modules Revision 3.0
|
|
# Providing a flexible user environment
|
|
#
|
|
# File: modules.30-cache/%M%
|
|
# Revision: %I%
|
|
# First Edition: 2022/12/06
|
|
# Last Mod.: %U%, %G%
|
|
#
|
|
# Authors: Xavier Delaruelle, xavier.delaruelle@cea.fr
|
|
#
|
|
# Description: Testuite testsequence
|
|
# Command: avail, whatis, load
|
|
# Modulefiles:
|
|
# Sub-Command:
|
|
#
|
|
# Comment: %C{
|
|
# Test cache_buffer_bytes configuration option
|
|
# }C%
|
|
#
|
|
##############################################################################
|
|
|
|
skip_if_quick_mode
|
|
|
|
# unset buffer size variable that may be set if module cache are prebuilt
|
|
unsetenv_var MODULES_CACHE_BUFFER_BYTES
|
|
|
|
# ensure avail tests are made using in depth mode
|
|
setenv_var MODULES_AVAIL_INDEPTH 1
|
|
|
|
# generate content in modulepaths
|
|
lassign [create_simple_module_setup $mp1] dir_list file_list
|
|
array set file_arr $file_list
|
|
|
|
setenv_var MODULEPATH $mp1
|
|
|
|
# create cache file
|
|
set tserr [msg_create $mp1cache]
|
|
testouterr_cmd sh cachebuild OK $tserr
|
|
|
|
set tserr_avail "$mp1:
|
|
bar/1.0
|
|
bar/2.0
|
|
foo/1.0"
|
|
set ans_load [list]
|
|
lappend ans_load [list set _LMFILES_ $mp1/bar/1.0]
|
|
lappend ans_load [list set LOADEDMODULES bar/1.0]
|
|
set tserr_load_debug1 ".*
|
|
DEBUG \\\[cache:[escre $mp1cache]\\\] setConf: cache_buffer_bytes set to '1000000'
|
|
.*"
|
|
set tserr_load_debug2 ".*
|
|
DEBUG \\\[cache:[escre $mp1cache]\\\] setConf: cache_buffer_bytes set to '32768'
|
|
.*"
|
|
|
|
|
|
# test small buffer size
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 4096
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd sh {load bar/1.0} $ans_load {}
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 8192
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd sh {load bar/1.0} $ans_load {}
|
|
|
|
# test large buffer size
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 262144
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd sh {load bar/1.0} $ans_load {}
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 1000000
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug1
|
|
|
|
# test erroneous buffer size
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES -1000
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug2
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 1024
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug2
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES 10000000
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug2
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES foo
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug2
|
|
setenv_var MODULES_CACHE_BUFFER_BYTES {}
|
|
testouterr_cmd sh {avail -t} OK $tserr_avail
|
|
testouterr_cmd_re sh {load -D bar/1.0} $ans_load $tserr_load_debug2
|
|
|
|
|
|
#
|
|
# Cleanup
|
|
#
|
|
|
|
file delete $mp1cache
|
|
|
|
# delete created files and dirs
|
|
delete_module_setup $mp1 [array names file_arr] $dir_list
|
|
|
|
reset_test_env
|