3 LUSTRE=${LUSTRE:-$(dirname $0)/..}
4 . $LUSTRE/tests/test-framework.sh
8 ALWAYS_EXCEPT="$LNET_SELFTEST_EXCEPT"
9 if (( $LINUX_VERSION_CODE >= $(version_code 4.4.0) )); then
10 # bug number for skipped test: LU-10073
11 ALWAYS_EXCEPT+=" smoke "
14 if [[ $(uname -m) = ppc64 ]]; then
15 # bug number for skipped test: LU-10073
16 ALWAYS_EXCEPT+=" smoke "
21 [ x$LST = x ] && skip_env "lst not found LST=$LST"
23 # FIXME: what is the reasonable value here?
24 lst_LOOP=${lst_LOOP:-100000}
25 lst_CONCR=${lst_CONCR:-"1 2 4 8"}
26 lst_SIZES=${lst_SIZES:-"4k 8k 256k 1M"}
27 if [ "$SLOW" = no ]; then
33 smoke_DURATION=${smoke_DURATION:-1800}
34 if [ "$SLOW" = no ]; then
35 [ $smoke_DURATION -le 300 ] || smoke_DURATION=300
38 lst_TESTS=${lst_TESTS:-"write read ping"}
40 # "none" -> LST_BRW_CHECK_NONE
41 # "full" -> LST_BRW_CHECK_FULL
42 # "simple" -> LST_BRW_CHECK_SIMPLE
43 lst_CHECK=${lst_CHECK:-"full"}
45 lst_FROM=${lst_FROM:-"cs"}
48 full|simple) check="check=$lst_CHECK";;
50 *) error Unknown flag $lst_CHECK;;
53 LOAD_MODULES_REMOTE=true load_modules
55 nodes=$(comma_list "$(osts_nodes) $(mdts_nodes)")
56 lst_SERVERS=${lst_SERVERS:-$(comma_list "$(host_nids_address $nodes $NETTYPE)")}
57 lst_CLIENTS=${lst_CLIENTS:-$(comma_list "$(host_nids_address $CLIENTS $NETTYPE)")}
62 # _restore_mount(): This function calls restore_mount function for "MOUNT" and
63 # "MOUNT2" paths to mount clients if they were not mounted and were umounted
64 # in this file earlier.
66 # Returns: None. Exit with error if client mount fails.
69 if $interim_umount && ! is_mounted $MOUNT; then
70 restore_mount $MOUNT || error "Restore $MOUNT failed"
73 if $interim_umount1 && ! is_mounted $MOUNT2; then
74 restore_mount $MOUNT2 || error "Restore $MOUNT2 failed"
79 lst_SERVERS=`hostname`
80 lst_CLIENTS=`hostname`
83 # FIXME: do we really need to unload lustre modules on all nodes?
84 # bug 19387, comment 9
85 # unloading lustre modules is not strictly necessary but unmounting
86 # /mnt/lustre before running lst would be useful:
87 # 1) because lustre messages clutter logs - we needn't them for testing LNET
88 # 2) it's theoretically possible that lst tests congest comm paths so tightly
89 # that mounted lustre wouldn't able to perform some of its background activities
90 if is_mounted $MOUNT; then
91 cleanup_mount $MOUNT || error "Fail to unmount client $MOUNT"
95 if is_mounted $MOUNT2; then
96 cleanup_mount $MOUNT2 || error "Fail to unmount client $MOUNT2"
101 # Workaround for bug 15619
111 local nc=$(echo ${clients//,/ } | wc -w)
112 local ns=$(echo ${servers//,/ } | wc -w)
116 echo 'cleanup () { trap 0; echo killing $1 ... ; kill -9 $1 || true; }'
118 echo "$LST new_session --timeo 100000 hh"
119 echo "$LST add_group c $(nids_list $clients)"
120 echo "$LST add_group s $(nids_list $servers)"
121 echo "$LST add_batch b"
126 c) tests[0]="${nc}:${ns} --from c --to s";;
127 s) tests[0]="${ns}:${nc} --from s --to c";;
128 cs)tests[0]="${nc}:${ns} --from c --to s"
129 tests[1]="${ns}:${nc} --from s --to c";;
130 *) error Unknown flag $lst_FROM;;
133 pre="$LST add_test --batch b --loop $lst_LOOP "
134 for t in $lst_TESTS; do
135 for s in $lst_SIZES; do
136 for c in $lst_CONCR; do
137 for ((i=0; i<${#tests[@]}; i++)); do
138 echo -n "$pre --concurrency $c"\
139 " --distribute ${tests[i]} "
146 *) error Unknonwn LST test;;
156 echo "$LST stat --delay 10 --timeout 10 c s &"
158 echo 'trap "cleanup $pid" INT TERM'
159 echo sleep $smoke_DURATION
167 export LST_SESSION=$$
178 if awk '/^Total.*nodes/ {print $2}' $log | grep -vq '^0$'; then
180 error 'lst Error found'
187 local servers=$lst_SERVERS
188 local clients=$lst_CLIENTS
190 local runlst=$TMP/smoke.sh
192 local log=$TMP/$tfile.log
195 test_smoke_sub $servers $clients 2>&1 > $runlst
199 run_lst $runlst | tee $log
201 [ $rc = 0 ] || { _restore_mount; error "$runlst failed: $rc"; }
203 lst_end_session --verbose | tee -a $log
205 # error counters in "lst show_error" should be checked
209 run_test smoke "lst regression test"
213 check_and_cleanup_lustre