mirror of
https://github.com/envmodules/modules.git
synced 2026-05-30 00:12:31 +08:00
ts: test --user/--group on module-tag
This commit is contained in:
@@ -177,3 +177,42 @@ if {[info exists env(TESTSUITE_STASH)]} {
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
# --user/--group tests in 50/440
|
||||
if {[info exists env(TESTSUITE_TAG_USER_GROUP)]} {
|
||||
switch -- $env(TESTSUITE_TAG_USER_GROUP) {
|
||||
user2 {
|
||||
module-tag --user [list unknown1 [module-info username] unknown2] foo tag
|
||||
}
|
||||
user3 {
|
||||
module-tag --user [list unknown1 unknown2] foo tag
|
||||
}
|
||||
user_notgroup3 {
|
||||
module-tag --user [module-info username] --not-group [module-info usergroups] foo tag
|
||||
}
|
||||
user_notgroup4 {
|
||||
module-tag --user unknown1 --not-group unknown1 foo tag
|
||||
}
|
||||
group2 {
|
||||
module-tag --group [concat [list unknown1 unknown2] [module-info usergroups]] foo tag
|
||||
}
|
||||
group3 {
|
||||
module-tag --group [list unknown1 unknown2] foo tag
|
||||
}
|
||||
group_notuser1 {
|
||||
module-tag --group [module-info usergroups] --not-user unknown1 foo tag
|
||||
}
|
||||
group_notuser2 {
|
||||
module-tag --group unknown1 --not-user [module-info username] foo tag
|
||||
}
|
||||
group_user1 {
|
||||
module-tag --group [module-info usergroups] --user unknown1 foo tag
|
||||
}
|
||||
group_user2 {
|
||||
module-tag --group unknown1 --user [module-info username] foo tag
|
||||
}
|
||||
group_user_notuser_notgroup2 {
|
||||
module-tag --group unknown1 --user unknown1 foo tag --not-user unknown1 --not-group unknown1 hide1
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -367,6 +367,47 @@ testouterr_cmd sh {load tag/5.0} $ans {}
|
||||
setenv_var MODULERCFILE $ORIG_MODULERCFILE
|
||||
|
||||
|
||||
#
|
||||
# --user/--group options test
|
||||
#
|
||||
|
||||
set tserr_wtag "$mp:\ntag/5.0 <foo>"
|
||||
set tserr_notag $mp:\ntag/5.0
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP user2
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP user3
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_notag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP user_notgroup3
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP user_notgroup4
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_notag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group2
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group3
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_notag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group_notuser1
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group_notuser2
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_notag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group_user1
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group_user2
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_wtag
|
||||
|
||||
setenv_var TESTSUITE_TAG_USER_GROUP group_user_notuser_notgroup2
|
||||
testouterr_cmd sh {avail -t tag/5.0} OK $tserr_notag
|
||||
|
||||
|
||||
#
|
||||
# Cleanup
|
||||
#
|
||||
|
||||
Reference in New Issue
Block a user