}
unload_modules() {
+ wait_exit_ST client # bug 12845
+
lsmod | grep lnet > /dev/null && $LCTL dl && $LCTL dk $TMP/debug
local MODULES=$($LCTL modules | awk '{ print $2 }')
$RMMOD $MODULES > /dev/null 2>&1 || true
echo "$LEAK_PORTALS" 1>&2
mv $TMP/debug $TMP/debug-leak.`date +%s` || true
echo "Memory leaks detected"
+ [ -n "$IGNORE_LEAK" ] && echo "ignoring leaks" && return 0
return 254
fi
echo "modules unloaded."
# umount should block, but we should wait for unrelated obd's
# like the MGS or MGC to also stop.
- local WAIT=0
- local INTERVAL=1
- # conf-sanity 31 takes a long time cleanup
- while [ $WAIT -lt 300 ]; do
- running=$(do_facet ${facet} "[ -e $LPROC ] && grep ST' ' $LPROC/devices") || true
- if [ -z "${running}" ]; then
- return 0
- fi
- echo "waited $WAIT for${running}"
- if [ $INTERVAL -lt 64 ]; then
- INTERVAL=$((INTERVAL + INTERVAL))
- fi
- sleep $INTERVAL
- WAIT=$((WAIT + INTERVAL))
- done
- echo "service didn't stop after $WAIT seconds. Still running:"
- echo ${running}
- exit 1
+ wait_exit_ST ${facet}
}
zconf_mount() {
return 0
}
+wait_delete_completed () {
+ local TOTALPREV=`awk 'BEGIN{total=0}; {total+=$1}; END{print total}' \
+ $LPROC/osc/*/kbytesavail`
+
+ local WAIT=0
+ local MAX_WAIT=20
+ while [ "$WAIT" -ne "$MAX_WAIT" ]; do
+ sleep 1
+ TOTAL=`awk 'BEGIN{total=0}; {total+=$1}; END{print total}' \
+ $LPROC/osc/*/kbytesavail`
+ [ "$TOTAL" -eq "$TOTALPREV" ] && break
+ echo "Waiting delete completed ... prev: $TOTALPREV current: $TOTAL "
+ TOTALPREV=$TOTAL
+ WAIT=$(( WAIT + 1))
+ done
+ echo "Delete completed."
+}
+
wait_for_host() {
HOST=$1
check_network "$HOST" 900
return 1
}
+wait_exit_ST () {
+ local facet=$1
+
+ local WAIT=0
+ local INTERVAL=1
+ # conf-sanity 31 takes a long time cleanup
+ while [ $WAIT -lt 300 ]; do
+ running=$(do_facet ${facet} "[ -e $LPROC ] && grep ST' ' $LPROC/devices") || true
+ [ -z "${running}" ] && return 0
+ echo "waited $WAIT for${running}"
+ [ $INTERVAL -lt 64 ] && INTERVAL=$((INTERVAL + INTERVAL))
+ sleep $INTERVAL
+ WAIT=$((WAIT + INTERVAL))
+ done
+ echo "service didn't stop after $WAIT seconds. Still running:"
+ echo ${running}
+ return 1
+}
+
client_df() {
# not every config has many clients
if [ ! -z "$CLIENTS" ]; then
check_and_cleanup_lustre() {
if [ "`mount | grep $MOUNT`" ]; then
rm -rf $DIR/[Rdfs][1-9]*
+ rm -f $DIR/${TESTSUITE}/[Rdfs][1-9]*
fi
if [ "$I_MOUNTED" = "yes" ]; then
cleanupall -f || error "cleanup failed"
DEBUGSAVE=""
}
-FAIL_ON_ERROR=true
##################################
# Test interface
+##################################
+
error() {
+ local FAIL_ON_ERROR=${FAIL_ON_ERROR:-true}
+ local TYPE=${TYPE:-"FAIL"}
local ERRLOG
sysctl -w lustre.fail_loc=0 2> /dev/null || true
- log "${TESTSUITE} ${TESTNAME}: **** FAIL:" $@
+ log " ${TESTSUITE} ${TESTNAME}: @@@@@@ ${TYPE}: $@ "
ERRLOG=$TMP/lustre_${TESTSUITE}_${TESTNAME}.$(date +%s)
echo "Dumping lctl log to $ERRLOG"
# We need to dump the logs on all nodes
- $LCTL dk $ERRLOG
- [ ! "$mds_HOST" = "$(hostname)" ] && do_node $mds_HOST $LCTL dk $ERRLOG
- [ ! "$ost_HOST" = "$(hostname)" -a ! "$ost_HOST" = "$mds_HOST" ] && do_node $ost_HOST $LCTL dk $ERRLOG
+ local NODES=$(nodes_list)
+ for NODE in $NODES; do
+ do_node $NODE $LCTL dk $ERRLOG
+ done
debugrestore
- [ "$TESTSUITELOG" ] && echo "$0: FAIL: $TESTNAME $@" >> $TESTSUITELOG
+ [ "$TESTSUITELOG" ] && echo "$0: ${TYPE}: $TESTNAME $@" >> $TESTSUITELOG
if $FAIL_ON_ERROR; then
exit 1
fi
}
+# use only if we are ignoring failures for this test, bugno required.
+# (like ALWAYS_EXCEPT, but run the test and ignore the results.)
+# e.g. error_ignore 5494 "your message"
+error_ignore() {
+ FAIL_ON_ERROR=false TYPE="IGNORE (bz$1)" error $2
+}
+
skip () {
log " SKIP: ${TESTSUITE} ${TESTNAME} $@"
[ "$TESTSUITELOG" ] && echo "${TESTSUITE}: SKIP: $TESTNAME $@" >> $TESTSUITELOG
local suffixlen=$((${#EQUALS} - ${#msg}))
[ $suffixlen -lt 5 ] && suffixlen=5
- printf '===== %s %.*s\n' "$msg" $suffixlen $EQUALS
+ log `echo $(printf '===== %s %.*s\n' "$msg" $suffixlen $EQUALS)`
}
log() {
echo "$*"
lsmod | grep lnet > /dev/null || load_modules
- $LCTL mark "$*" 2> /dev/null || true
+
+ local MSG="$*"
+ # Get rif of '
+ MSG=${MSG//\'/\\\'}
+ MSG=${MSG//\(/\\\(}
+ MSG=${MSG//\)/\\\)}
+ local NODES=$(nodes_list)
+ for NODE in $NODES; do
+ do_node $NODE $LCTL mark "$MSG" 2> /dev/null || true
+ done
}
trace() {
testnum=$1
message=$2
tfile=f${testnum}
- export tdir=d${base}
+ export tdir=d${TESTSUITE}/d${base}
+ local SAVE_UMASK=`umask`
+ umask 0022
+ mkdir -p $DIR/$tdir
BEFORE=`date +%s`
log "== test $testnum: $message ============ `date +%H:%M:%S` ($BEFORE)"
[ -f $CATASTROPHE ] && [ `cat $CATASTROPHE` -ne 0 ] && \
error "LBUG/LASSERT detected"
pass "($((`date +%s` - $BEFORE))s)"
+ rmdir ${DIR}/$tdir >/dev/null 2>&1 || true
unset TESTNAME
unset tdir
+ umask $SAVE_UMASK
cd $SAVE_PWD
$CLEANUP
}
[ $(grep -c obdfilter $LPROC/devices) -eq 0 ]
}
+mdts_nodes () {
+ local MDSNODES=$(facet_host $SINGLEMDS)
+
+ # FIXME: Currenly we use only $SINGLEMDS,
+ # should be fixed when we will start to test cmd.
+ echo $MDSNODES
+ return
+
+ for num in `seq $MDSCOUNT`; do
+ local myMDS=$(facet_host mds$num)
+ [[ ! '\ '"$MDSNODES"'\ ' = *'\ '"$myMDS"'\ '* ]] && MDSNODES="$MDSNODES $myMDS"
+ done
+
+ echo $MDSNODES
+}
+
+osts_nodes () {
+ local OSTNODES=$(facet_host ost1)
+
+ for num in `seq $OSTCOUNT`; do
+ local myOST=$(facet_host ost$num)
+ [[ ! '\ '"$OSTNODES"'\ ' = *'\ '"$myOST"'\ '* ]] && OSTNODES="$OSTNODES $myOST"
+ done
+
+ echo $OSTNODES
+}
+
+nodes_list () {
+ # FIXME. We need a list of clients
+ local myNODES=`hostname`
+
+ local OSTNODES=$(osts_nodes)
+ local myOSTNODES=`echo ' '"$OSTNODES"' ' | sed -e s/[\ ]$(hostname)[\ ]/\ /`
+ [ -n "$myOSTNODES" ] && myNODES="$myNODES $myOSTNODES"
+
+ local myNODES=${myNODES% }
+ # Add to list only not listed mds nodes
+ local MDSNODES=$(mdts_nodes)
+ for myMDS in $MDSNODES; do
+ [[ ! "'\ '$myNODES'\ '" = *'\ '"$myMDS"'\ '* ]] && myNODES="$myNODES $myMDS"
+ done
+
+ echo $myNODES
+}
+
is_patchless ()
{
grep -q patchless $LPROC/version