1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
#!/bin/sh
test_description='pdsh dynamic module support'
TEST_MODULE_PATH="$(pwd)/test-modules/.libs"
. ${srcdir:-.}/test-lib.sh
if ! test_have_prereq DYNAMIC_MODULES; then
skip_all='skipping dynamic module tests, pdsh built with static modules'
test_done
fi
if ! test -f $TEST_MODULE_PATH/a.so -a -f $TEST_MODULE_PATH/b.so; then
echo "$0: Test modules A & B not built, please run \"make check.\"" >&2
exit 1
fi
module_list () {
pdsh -L "$EXTRA_PDSH_ARGS" 2>&1 | \
perl -n -e '\
chomp; ($k,$v) = split(/: */);
$m = $v if ($k eq "Module");
print "$m $v\n" if ($k eq "Active");'
}
loaded_modules() {
module_list | awk '$2 == "yes" {print $1}'
}
conflicting_modules() {
module_list | awk '$2 == "no" {print $1}'
}
module_is_active() {
loaded_modules | while read m; do
if [ "$m" = "$1" ]; then
return 0
fi
done
}
module_is_inactive() {
conflicting_modules | while read m; do
if [ "$m" = "$1" ]; then
return 0
fi
done
}
test_output_matches() {
OUTPUT="$1"
PATTERN="$2"
if ! echo "$OUTPUT" | grep -q "$PATTERN" ; then
say_color error "Error: Didn't find pattern \"$PATTERN\""
say_color info "OUTPUT=$OUTPUT"
false
fi
}
unset EXTRA_PDSH_ARGS
test_expect_success NOTROOT 'PDSH_MODULE_DIR functionality' '
PDSH_MODULE_DIR=$TEST_DIRECTORY/test-modules/.libs
module_is_active A && module_is_active B
'
export PDSH_MODULE_DIR="$TEST_DIRECTORY/test-modules/.libs"
test_expect_success NOTROOT 'module A takes precedence over B' '
module_is_active misc/A && module_is_inactive misc/B
'
test_expect_success NOTROOT 'pdsh -M B ativates module B' '
EXTRA_PDSH_ARGS="-M B"
module_is_active misc/B && module_is_inactive misc/A
'
test_expect_success NOTROOT 'PDSH_MISC_MODULES option works' '
PDSH_MISC_MODULES=B
module_is_active misc/B && module_is_inactive misc/A
'
test_expect_success NOTROOT '-M option overrides PDSH_MISC_MODULES environment var' '
OUTPUT=$(PDSH_MISC_MODULES=B pdsh -MA -L 2>&1)
say_color error "$OUTPUT"
'
test_expect_success NOTROOT 'pdsh help string correctly displays options of loaded modules' '
OUTPUT=$(pdsh -h 2>&1 | grep ^-a) &&
test_output_matches "$OUTPUT" "Module A" &&
OUTPUT=$(pdsh -M B -h 2>&1 | grep ^-a) &&
test_output_matches "$OUTPUT" "Module B"
'
test_expect_success NOTROOT 'Loading conflicting module with -M causes error' '
OUTPUT=$(pdsh -MA,B 2>&1 | grep Warning)
test_output_matches "$OUTPUT" \
"Failed to initialize requested module \"misc/B\""
'
test_expect_success NOTROOT 'Conflicting modules dont run init()' '
if pdsh -q 2>&1 | grep "B: in init"; then
say_color error "Error: init routine for module B run unexpectedly"
false
fi
'
test_expect_success NOTROOT 'Force loaded module runs init()' '
if ! pdsh -q -MB 2>&1 | grep "B: in init"; then
say_color error "Error: init routine for module B not run with -M B"
false
fi
'
test_expect_success NOTROOT 'New conflicting module does not run init() with -M' '
PDSH_MODULE_DIR=$TEST_DIRECTORY/test-modules
if pdsh -q -MB 2>&1 | grep "A: in init"; then
say_color error "Error: A init routine run with -M B"
false
fi
'
test_done
|
