export REFORMAT=${REFORMAT:-""}
+export WRITECONF=${WRITECONF:-""}
export VERBOSE=false
export GMNALNID=${GMNALNID:-/usr/sbin/gmlndnid}
export CATASTROPHE=${CATASTROPHE:-/proc/sys/lnet/catastrophe}
export GSS=false
export GSS_KRB5=false
export GSS_PIPEFS=false
+export IDENTITY_UPCALL=default
+
#export PDSH="pdsh -S -Rssh -w"
# eg, assert_env LUSTRE MDSNODES OSTNODES CLIENTS
[ $failed ] && exit 1 || true
}
+assert_DIR () {
+ local failed=""
+ [[ $DIR/ = $MOUNT/* ]] || \
+ { failed=1 && echo "DIR=$DIR not in $MOUNT. Aborting."; }
+ [[ $DIR1/ = $MOUNT1/* ]] || \
+ { failed=1 && echo "DIR1=$DIR1 not in $MOUNT1. Aborting."; }
+ [[ $DIR2/ = $MOUNT2/* ]] || \
+ { failed=1 && echo "DIR2=$DIR2 not in $MOUNT2. Aborting"; }
+
+ [ -n "$failed" ] && exit 99 || true
+}
+
usage() {
echo "usage: $0 [-r] [-f cfgfile]"
echo " -r: reformat"
}
print_summary () {
+ [ "$TESTSUITE" == "lfscktest" ] && return 0
[ -n "$ONLY" ] && echo "WARNING: ONLY is set to ${ONLY}."
local form="%-13s %-17s %s\n"
- echo "$(printf "$form" "status" "script" "skipped tests")"
+ printf "$form" "status" "script" "skipped tests E(xcluded) S(low)"
echo "------------------------------------------------------------------------------------"
for O in $TESTSUITE_LIST; do
local skipped=""
+ local slow=""
local o=$(echo $O | tr "[:upper:]" "[:lower:]")
o=${o//_/-}
o=${o//tyn/tyN}
- local log=${TMP}/${o}.log
- [ -f $log ] && skipped=$(cat $log | awk '{ printf " %s", $3 }' | sed 's/test_//g')
+ local log=${TMP}/${o}.log
+ [ -f $log ] && skipped=$(grep excluded $log | awk '{ printf " %s", $3 }' | sed 's/test_//g')
+ [ -f $log ] && slow=$(grep SLOW $log | awk '{ printf " %s", $3 }' | sed 's/test_//g')
[ "${!O}" = "done" ] && \
- echo "$(printf "$form" "Done" "$O" "$skipped")"
+ printf "$form" "Done" "$O" "E=$skipped" && \
+ [ -n "$slow" ] && printf "$form" "-" "-" "S=$slow"
+
done
for O in $TESTSUITE_LIST; do
[ "${!O}" = "no" ] && \
- echo "$(printf "$form" "Skipped" "$O" "")"
+ printf "$form" "Skipped" "$O" ""
done
for O in $TESTSUITE_LIST; do
[ "${!O}" = "done" -o "${!O}" = "no" ] || \
- echo "$(printf "$form" "UNFINISHED" "$O" "")"
+ printf "$form" "UNFINISHED" "$O" ""
done
}
init_test_env() {
export LUSTRE=`absolute_path $LUSTRE`
export TESTSUITE=`basename $0 .sh`
- export LTESTDIR=${LTESTDIR:-$LUSTRE/../ltest}
- [ -d /r ] && export ROOT=${ROOT:-/r}
+ #[ -d /r ] && export ROOT=${ROOT:-/r}
export TMP=${TMP:-$ROOT/tmp}
export TESTSUITELOG=${TMP}/${TESTSUITE}.log
-
- export PATH=:$PATH:$LUSTRE/utils:$LUSTRE/utils/gss:$LUSTRE/tests
+ export HOSTNAME=${HOSTNAME:-`hostname`}
+ if ! echo $PATH | grep -q $LUSTRE/utils; then
+ export PATH=$PATH:$LUSTRE/utils
+ fi
+ if ! echo $PATH | grep -q $LUSTRE/utils/gss; then
+ export PATH=$PATH:$LUSTRE/utils/gss
+ fi
+ if ! echo $PATH | grep -q $LUSTRE/tests; then
+ export PATH=$PATH:$LUSTRE/tests
+ fi
+ export MDSRATE=${MDSRATE:-"$LUSTRE/tests/mdsrate"}
+ [ ! -f "$MDSRATE" ] && export MDSRATE=$(which mdsrate 2> /dev/null)
+ if ! echo $PATH | grep -q $LUSTRE/test/racer; then
+ export PATH=$PATH:$LUSTRE/tests/racer
+ fi
export LCTL=${LCTL:-"$LUSTRE/utils/lctl"}
+ [ ! -f "$LCTL" ] && export LCTL=$(which lctl)
export LFS=${LFS:-"$LUSTRE/utils/lfs"}
- [ ! -f "$LCTL" ] && export LCTL=$(which lctl)
- export LFS=${LFS:-"$LUSTRE/utils/lfs"}
- [ ! -f "$LFS" ] && export LFS=$(which lfs)
+ [ ! -f "$LFS" ] && export LFS=$(which lfs)
+ export L_GETIDENTITY=${L_GETIDENTITY:-"$LUSTRE/utils/l_getidentity"}
+ if [ ! -f "$L_GETIDENTITY" ]; then
+ if `which l_getidentity > /dev/null 2>&1`; then
+ export L_GETIDENTITY=$(which l_getidentity)
+ else
+ export L_GETIDENTITY=NONE
+ fi
+ fi
export MKFS=${MKFS:-"$LUSTRE/utils/mkfs.lustre"}
- [ ! -f "$MKFS" ] && export MKFS=$(which mkfs.lustre)
+ [ ! -f "$MKFS" ] && export MKFS=$(which mkfs.lustre)
export TUNEFS=${TUNEFS:-"$LUSTRE/utils/tunefs.lustre"}
- [ ! -f "$TUNEFS" ] && export TUNEFS=$(which tunefs.lustre)
+ [ ! -f "$TUNEFS" ] && export TUNEFS=$(which tunefs.lustre)
export CHECKSTAT="${CHECKSTAT:-"checkstat -v"} "
export FSYTPE=${FSTYPE:-"ldiskfs"}
export NAME=${NAME:-local}
- export LPROC=/proc/fs/lustre
export LGSSD=${LGSSD:-"$LUSTRE/utils/gss/lgssd"}
+ [ "$GSS_PIPEFS" = "true" ] && [ ! -f "$LGSSD" ] && \
+ export LGSSD=$(which lgssd)
export LSVCGSSD=${LSVCGSSD:-"$LUSTRE/utils/gss/lsvcgssd"}
+ [ ! -f "$LSVCGSSD" ] && export LSVCGSSD=$(which lsvcgssd)
export KRB5DIR=${KRB5DIR:-"/usr/kerberos"}
export DIR2
+ export SAVE_PWD=${SAVE_PWD:-$LUSTRE/tests}
+ export AT_MAX_PATH
if [ "$ACCEPTOR_PORT" ]; then
export PORT_OPT="--port $ACCEPTOR_PORT"
case "x$SEC" in
xkrb5*)
echo "Using GSS/krb5 ptlrpc security flavor"
+ which lgss_keyring > /dev/null 2>&1 || \
+ error "built with gss disabled! SEC=$SEC"
GSS=true
GSS_KRB5=true
;;
esac
- # Paths on remote nodes, if different
+ case "x$IDUP" in
+ xtrue)
+ IDENTITY_UPCALL=true
+ ;;
+ xfalse)
+ IDENTITY_UPCALL=false
+ ;;
+ esac
+
+ # Paths on remote nodes, if different
export RLUSTRE=${RLUSTRE:-$LUSTRE}
export RPWD=${RPWD:-$PWD}
export I_MOUNTED=${I_MOUNTED:-"no"}
# command line
-
- while getopts "rvf:" opt $*; do
+
+ while getopts "rvwf:" opt $*; do
case $opt in
f) CONFIG=$OPTARG;;
r) REFORMAT=--reformat;;
v) VERBOSE=true;;
+ w) WRITECONF=writeconf;;
\?) usage;;
esac
done
ONLY=${ONLY:-$*}
[ "$TESTSUITELOG" ] && rm -f $TESTSUITELOG || true
+ rm -f $TMP/*active
}
+case `uname -r` in
+2.4.*) EXT=".o"; USE_QUOTA=no; [ ! "$CLIENTONLY" ] && FSTYPE=ext3;;
+ *) EXT=".ko"; USE_QUOTA=yes;;
+esac
+
load_module() {
EXT=".ko"
module=$1
HAVE_MODULES=true
echo Loading modules from $LUSTRE
- load_module ../lnet/libcfs/libcfs
- [ -z "$LNETOPTS" ] && \
- LNETOPTS=$(awk '/^options lnet/ { print $0}' /etc/modprobe.conf | sed 's/^options lnet //g')
+ load_module ../libcfs/libcfs/libcfs
+ [ "$PTLDEBUG" ] && lctl set_param debug=$PTLDEBUG
+ [ "$SUBSYSTEM" ] && lctl set_param subsystem_debug=${SUBSYSTEM# }
+ local MODPROBECONF=
+ [ -f /etc/modprobe.conf ] && MODPROBECONF=/etc/modprobe.conf
+ [ ! "$MODPROBECONF" -a -d /etc/modprobe.d ] && MODPROBECONF=/etc/modprobe.d/Lustre
+ [ -z "$LNETOPTS" -a "$MODPROBECONF" ] && \
+ LNETOPTS=$(awk '/^options lnet/ { print $0}' $MODPROBECONF | sed 's/^options lnet //g')
+ echo $LNETOPTS | grep -q "accept=all" || LNETOPTS="$LNETOPTS accept=all";
echo "lnet options: '$LNETOPTS'"
# note that insmod will ignore anything in modprobe.conf
load_module ../lnet/lnet/lnet $LNETOPTS
LNETLND=${LNETLND:-"socklnd/ksocklnd"}
load_module ../lnet/klnds/$LNETLND
- [ "$FSTYPE" = "ldiskfs" ] && load_module ../ldiskfs/ldiskfs/ldiskfs
load_module lvfs/lvfs
load_module obdclass/obdclass
- load_module lvfs/fsfilt_$FSTYPE
load_module ptlrpc/ptlrpc
load_module ptlrpc/gss/ptlrpc_gss
- # Now, some modules depend on lquota without USE_QUOTA check,
- # will fix later. Disable check "$USE_QUOTA" = "yes" temporary.
- #[ "$USE_QUOTA" = "yes" ] && load_module quota/lquota
- load_module quota/lquota
+ [ "$USE_QUOTA" = "yes" -a "$LQUOTA" != "no" ] && load_module quota/lquota
load_module fid/fid
load_module fld/fld
load_module lmv/lmv
load_module mdc/mdc
load_module osc/osc
load_module lov/lov
- load_module mds/mds
- load_module mdd/mdd
- load_module mdt/mdt
- load_module cmm/cmm
- load_module osd/osd
- load_module ost/ost
- load_module obdfilter/obdfilter
+ load_module mgc/mgc
+ if [ -z "$CLIENTONLY" ] && [ -z "$CLIENTMODSONLY" ]; then
+ grep -q crc16 /proc/kallsyms || { modprobe crc16 2>/dev/null || true; }
+ [ "$FSTYPE" = "ldiskfs" ] && load_module ../ldiskfs/ldiskfs/ldiskfs
+ load_module mgs/mgs
+ load_module mds/mds
+ load_module mdd/mdd
+ load_module mdt/mdt
+ load_module lvfs/fsfilt_$FSTYPE
+ load_module cmm/cmm
+ load_module osd/osd
+ load_module ost/ost
+ load_module obdfilter/obdfilter
+ fi
+
load_module llite/lustre
load_module llite/llite_lloop
- load_module mgc/mgc
- load_module mgs/mgs
- rm -f $TMP/ogdb-`hostname`
- $LCTL modules > $TMP/ogdb-`hostname`
+ OGDB=${OGDB:-$TMP}
+ rm -f $OGDB/ogdb-$HOSTNAME
+ [ -d /r ] && OGDB="/r/tmp"
+ $LCTL modules > $OGDB/ogdb-$HOSTNAME
+
# 'mount' doesn't look in $PATH, just sbin
[ -f $LUSTRE/utils/mount.lustre ] && cp $LUSTRE/utils/mount.lustre /sbin/. || true
}
done
}
-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
- # do it again, in case we tried to unload ksocklnd too early
- MODULES=$($LCTL modules | awk '{ print $2 }')
- [ -n "$MODULES" ] && $RMMOD $MODULES > /dev/null 2>&1 || true
- MODULES=$($LCTL modules | awk '{ print $2 }')
- if [ -n "$MODULES" ]; then
- echo "Modules still loaded: "
- echo $MODULES
- if [ -e $LPROC ]; then
- echo "Lustre still loaded"
- cat $LPROC/devices || true
- lsmod
- return 2
- else
- echo "Lustre stopped but LNET is still loaded, waiting..."
- wait_for_lnet || return 3
- fi
- fi
- HAVE_MODULES=false
+unload_dep_module() {
+ #lsmod output
+ #libcfs 107852 17 llite_lloop,lustre,obdfilter,ost,...
+ local MODULE=$1
+ local DEPS=$(lsmod | awk '($1 == "'$MODULE'") { print $4 }' | tr ',' ' ')
+ for SUBMOD in $DEPS; do
+ unload_dep_module $SUBMOD
+ done
+ [ "$MODULE" = "libcfs" ] && $LCTL dk $TMP/debug || true
+ $RMMOD $MODULE || true
+}
- LEAK_LUSTRE=$(dmesg | tail -n 30 | grep "obd mem.*leaked" || true)
+check_mem_leak () {
+ LEAK_LUSTRE=$(dmesg | tail -n 30 | grep "obd_memory.*leaked" || true)
LEAK_PORTALS=$(dmesg | tail -n 20 | grep "Portals memory leaked" || true)
if [ "$LEAK_LUSTRE" -o "$LEAK_PORTALS" ]; then
echo "$LEAK_LUSTRE" 1>&2
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
+ [ -n "$IGNORE_LEAK" ] && { echo "ignoring leaks" && return 0; } || true
+ return 1
fi
+}
+
+unload_modules() {
+ wait_exit_ST client # bug 12845
+
+ lsmod | grep libcfs > /dev/null && $LCTL dl
+ unload_dep_module $FSTYPE
+ unload_dep_module libcfs
+
+ local MODULES=$($LCTL modules | awk '{ print $2 }')
+ if [ -n "$MODULES" ]; then
+ echo "Modules still loaded: "
+ echo $MODULES
+ if [ "$(lctl dl)" ]; then
+ echo "Lustre still loaded"
+ lctl dl || true
+ lsmod
+ return 2
+ else
+ echo "Lustre stopped but LNET is still loaded, waiting..."
+ wait_for_lnet || return 3
+ fi
+
+ fi
+ HAVE_MODULES=false
+
+ check_mem_leak || return 254
+
echo "modules unloaded."
return 0
}
send_sigint client lgssd
}
-init_krb5_env() {
- if [ ! -z $SEC ]; then
- MDS_MOUNT_OPTS=$MDS_MOUNT_OPTS,sec=$SEC
- OST_MOUNT_OPTS=$OST_MOUNT_OPTS,sec=$SEC
- fi
-
+init_gss() {
if $GSS; then
start_gss_daemons
fi
}
-cleanup_krb5_env() {
+cleanup_gss() {
if $GSS; then
stop_gss_daemons
# maybe cleanup credential cache?
}
# Facet functions
-# start facet device options
-start() {
- facet=$1
- shift
- device=$1
+mount_facet() {
+ local facet=$1
shift
- echo "Starting ${facet}: $@ ${device} ${MOUNT%/*}/${facet}"
- do_facet ${facet} mkdir -p ${MOUNT%/*}/${facet}
- do_facet ${facet} mount -t lustre $@ ${device} ${MOUNT%/*}/${facet}
+ local dev=${facet}_dev
+ local opt=${facet}_opt
+ echo "Starting ${facet}: ${!opt} $@ ${!dev} ${MOUNT%/*}/${facet}"
+ do_facet ${facet} mount -t lustre ${!opt} $@ ${!dev} ${MOUNT%/*}/${facet}
RC=${PIPESTATUS[0]}
if [ $RC -ne 0 ]; then
- echo mount -t lustre $@ ${device} ${MOUNT%/*}/${facet}
- echo Start of ${device} on ${facet} failed ${RC}
- else
- do_facet ${facet} "sysctl -w lnet.debug=$PTLDEBUG; \
- sysctl -w lnet.subsystem_debug=${SUBSYSTEM# }; \
- sysctl -w lnet.debug_mb=${DEBUG_SIZE}"
-
- do_facet ${facet} sync
- label=$(do_facet ${facet} "e2label ${device}")
- [ -z "$label" ] && echo no label for ${device} && exit 1
+ echo "mount -t lustre $@ ${!dev} ${MOUNT%/*}/${facet}"
+ echo "Start of ${!dev} on ${facet} failed ${RC}"
+ else
+ do_facet ${facet} "lctl set_param debug=$PTLDEBUG; \
+ lctl set_param subsystem_debug=${SUBSYSTEM# }; \
+ lctl set_param debug_mb=${DEBUG_SIZE}; \
+ sync"
+
+ label=$(do_facet ${facet} "e2label ${!dev}")
+ [ -z "$label" ] && echo no label for ${!dev} && exit 1
eval export ${facet}_svc=${label}
- eval export ${facet}_dev=${device}
- eval export ${facet}_opt=\"$@\"
echo Started ${label}
fi
return $RC
}
+# start facet device options
+start() {
+ local facet=$1
+ shift
+ local device=$1
+ shift
+ eval export ${facet}_dev=${device}
+ eval export ${facet}_opt=\"$@\"
+ do_facet ${facet} mkdir -p ${MOUNT%/*}/${facet}
+ mount_facet ${facet}
+ RC=$?
+ return $RC
+}
+
stop() {
local running
- facet=$1
+ local facet=$1
shift
HOST=`facet_active_host $facet`
[ -z $HOST ] && echo stop: no host for $facet && return 0
exit 1
fi
- echo "Starting client: $OPTIONS $device $mnt"
+ echo "Starting client: $client: $OPTIONS $device $mnt"
do_node $client mkdir -p $mnt
do_node $client mount -t lustre $OPTIONS $device $mnt || return 1
- do_node $client "sysctl -w lnet.debug=$PTLDEBUG;
- sysctl -w lnet.subsystem_debug=${SUBSYSTEM# };
- sysctl -w lnet.debug_mb=${DEBUG_SIZE}"
- [ -d /r ] && $LCTL modules > /r/tmp/ogdb-`hostname`
+ do_node $client "lctl set_param debug=$PTLDEBUG;
+ lctl set_param subsystem_debug=${SUBSYSTEM# };
+ lctl set_param debug_mb=${DEBUG_SIZE}"
+
return 0
}
zconf_umount() {
- client=$1
- mnt=$2
+ local client=$1
+ local mnt=$2
[ "$3" ] && force=-f
local running=$(do_node $client "grep -c $mnt' ' /proc/mounts") || true
if [ $running -ne 0 ]; then
- echo "Stopping client $mnt (opts:$force)"
+ echo "Stopping client $client $mnt (opts:$force)"
+ lsof | grep "$mnt" || true
do_node $client umount $force $mnt
fi
}
+# mount clients if not mouted
+zconf_mount_clients() {
+ local OPTIONS
+ local clients=$1
+ local mnt=$2
+
+
+ # Only supply -o to mount if we have options
+ if [ -n "$MOUNTOPT" ]; then
+ OPTIONS="-o $MOUNTOPT"
+ fi
+ local device=$MGSNID:/$FSNAME
+ if [ -z "$mnt" -o -z "$FSNAME" ]; then
+ echo Bad zconf mount command: opt=$OPTIONS dev=$device mnt=$mnt
+ exit 1
+ fi
+
+ echo "Starting client $clients: $OPTIONS $device $mnt"
+ do_nodes $clients "mount | grep $mnt || { mkdir -p $mnt && mount -t lustre $OPTIONS $device $mnt || false; }"
+
+ echo "Started clients $clients: "
+ do_nodes $clients "mount | grep $mnt"
+
+ do_nodes $clients "lctl set_param debug=$PTLDEBUG;
+ lctl set_param subsystem_debug=${SUBSYSTEM# };
+ lctl set_param debug_mb=${DEBUG_SIZE};"
+
+ return 0
+}
+
+zconf_umount_clients() {
+ local clients=$1
+ local mnt=$2
+ [ "$3" ] && force=-f
+
+ echo "Umounting clients: $clients"
+ echo "Stopping clients: $clients $mnt (opts:$force)"
+ do_nodes $clients umount $force $mnt
+}
+
shutdown_facet() {
facet=$1
if [ "$FAILURE_MODE" = HARD ]; then
$POWER_DOWN `facet_active_host $facet`
- sleep 2
+ sleep 2
elif [ "$FAILURE_MODE" = SOFT ]; then
stop $facet
fi
fi
}
+boot_node() {
+ local node=$1
+ if [ "$FAILURE_MODE" = HARD ]; then
+ $POWER_UP $node
+ fi
+}
+
# verify that lustre actually cleaned up properly
cleanup_check() {
[ -f $CATASTROPHE ] && [ `cat $CATASTROPHE` -ne 0 ] && \
[ -e $TMP/debug ] && mv $TMP/debug $TMP/debug-busy.`date +%s`
exit 205
fi
- LEAK_LUSTRE=`dmesg | tail -n 30 | grep "obd mem.*leaked" || true`
- LEAK_PORTALS=`dmesg | tail -n 20 | grep "Portals memory leaked" || true`
- if [ "$LEAK_LUSTRE" -o "$LEAK_PORTALS" ]; then
- echo "$0: $LEAK_LUSTRE" 1>&2
- echo "$0: $LEAK_PORTALS" 1>&2
- echo "$0: Memory leak(s) detected..." 1>&2
- mv $TMP/debug $TMP/debug-leak.`date +%s`
- exit 204
- fi
+
+ check_mem_leak || exit 204
[ "`lctl dl 2> /dev/null | wc -l`" -gt 0 ] && lctl dl && \
echo "$0: lustre didn't clean up..." 1>&2 && return 202 || true
}
wait_delete_completed () {
- local TOTALPREV=`awk 'BEGIN{total=0}; {total+=$1}; END{print total}' \
- $LPROC/osc/*/kbytesavail`
+ local TOTALPREV=`lctl get_param -n osc.*.kbytesavail | \
+ awk 'BEGIN{total=0}; {total+=$1}; END{print total}'`
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=`lctl get_param -n osc.*.kbytesavail | \
+ awk 'BEGIN{total=0}; {total+=$1}; END{print total}'`
[ "$TOTAL" -eq "$TOTALPREV" ] && break
echo "Waiting delete completed ... prev: $TOTALPREV current: $TOTAL "
TOTALPREV=$TOTAL
}
wait_mds_recovery_done () {
- local timeout=`do_facet mds cat /proc/sys/lustre/timeout`
+ local timeout=`do_facet $SINGLEMDS lctl get_param -n timeout`
#define OBD_RECOVERY_TIMEOUT (obd_timeout * 5 / 2)
# as we are in process of changing obd_timeout in different ways
# let's set MAX longer than that
MAX=$(( timeout * 4 ))
WAIT=0
while [ $WAIT -lt $MAX ]; do
- STATUS=`do_facet mds grep status /proc/fs/lustre/mdt/*-MDT*/recovery_status`
+ STATUS=`do_facet $SINGLEMDS "lctl get_param -n mdt.*-MDT0000.recovery_status | grep status"`
echo $STATUS | grep COMPLETE && return 0
sleep 5
WAIT=$((WAIT + 5))
echo "Waiting $(($MAX - $WAIT)) secs for MDS recovery done"
done
echo "MDS recovery not done in $MAX sec"
- return 1
+ return 1
}
wait_exit_ST () {
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
+ running=$(do_facet ${facet} "lsmod | grep lnet > /dev/null && lctl dl | grep ' ST '") || true
[ -z "${running}" ] && return 0
echo "waited $WAIT for${running}"
[ $INTERVAL -lt 64 ] && INTERVAL=$((INTERVAL + INTERVAL))
return 1
}
+wait_remote_prog () {
+ local prog=$1
+ local WAIT=0
+ local INTERVAL=5
+ local rc=0
+
+ [ "$PDSH" = "no_dsh" ] && return 0
+
+ while [ $WAIT -lt $2 ]; do
+ running=$(ps uax | grep "$PDSH.*$prog.*$MOUNT" | grep -v grep) || true
+ [ -z "${running}" ] && return 0 || true
+ echo "waited $WAIT for: "
+ echo "$running"
+ [ $INTERVAL -lt 60 ] && INTERVAL=$((INTERVAL + INTERVAL))
+ sleep $INTERVAL
+ WAIT=$((WAIT + INTERVAL))
+ done
+ local pids=$(ps uax | grep "$PDSH.*$prog.*$MOUNT" | grep -v grep | awk '{print $2}')
+ [ -z "$pids" ] && return 0
+ echo "$PDSH processes still exists after $WAIT seconds. Still running: $pids"
+ for pid in $pids; do
+ cat /proc/${pid}/status || true
+ cat /proc/${pid}/wchan || true
+ echo "Killing $pid"
+ kill -9 $pid || true
+ sleep 1
+ ps -P $pid && rc=1
+ done
+
+ return $rc
+}
+
client_df() {
# not every config has many clients
if [ ! -z "$CLIENTS" ]; then
$PDSH $CLIENTS "df $MOUNT" > /dev/null
+ else
+ df $MOUNT > /dev/null
fi
}
client_reconnect() {
uname -n >> $MOUNT/recon
- if [ ! -z "$CLIENTS" ]; then
- $PDSH $CLIENTS "df $MOUNT; uname -n >> $MOUNT/recon" > /dev/null
+ if [ -z "$CLIENTS" ]; then
+ df $MOUNT; uname -n >> $MOUNT/recon
+ else
+ do_nodes $CLIENTS "df $MOUNT; uname -n >> $MOUNT/recon" > /dev/null
fi
echo Connected clients:
cat $MOUNT/recon
facet_failover() {
facet=$1
+ sleep_time=$2
echo "Failing $facet on node `facet_active_host $facet`"
shutdown_facet $facet
+ [ -n "$sleep_time" ] && sleep $sleep_time
reboot_facet $facet
client_df &
DFPID=$!
TO=`facet_active_host $facet`
echo "Failover $facet to $TO"
wait_for $facet
- local dev=${facet}_dev
- local opt=${facet}_opt
- start $facet ${!dev} ${!opt} || error "Restart of $facet failed"
+ mount_facet $facet || error "Restart of $facet failed"
}
obd_name() {
$LCTL mark "local REPLAY BARRIER on ${!svc}"
}
+replay_barrier_nosync() {
+ local facet=$1 echo running=${running}
+ local svc=${facet}_svc
+ echo Replay barrier on ${!svc}
+ do_facet $facet $LCTL --device %${!svc} readonly
+ do_facet $facet $LCTL --device %${!svc} notransno
+ do_facet $facet $LCTL mark "$facet REPLAY BARRIER on ${!svc}"
+ $LCTL mark "local REPLAY BARRIER on ${!svc}"
+}
+
mds_evict_client() {
- UUID=`cat /proc/fs/lustre/mdc/${mds1_svc}-mdc-*/uuid`
- do_facet mds1 "echo $UUID > /proc/fs/lustre/mdt/${mds1_svc}/evict_client"
+ UUID=`lctl get_param -n mdc.${mds1_svc}-mdc-*.uuid`
+ do_facet mds1 "lctl set_param -n mdt.${mds1_svc}.evict_client $UUID"
}
ost_evict_client() {
- UUID=`grep ${ost1_svc}-osc- $LPROC/devices | egrep -v 'MDT' | awk '{print $5}'`
- do_facet ost1 "echo $UUID > /proc/fs/lustre/obdfilter/${ost1_svc}/evict_client"
+ UUID=`lctl get_param -n devices| grep ${ost1_svc}-osc- | egrep -v 'MDT' | awk '{print $5}'`
+ do_facet ost1 "lctl set_param -n obdfilter.${ost1_svc}.evict_client $UUID"
}
fail() {
df $MOUNT || error "post-failover df: $?"
}
+fail_nodf() {
+ local facet=$1
+ facet_failover $facet
+}
+
fail_abort() {
local facet=$1
stop $facet
change_active $facet
- local svc=${facet}_svc
- local dev=${facet}_dev
- local opt=${facet}_opt
- start $facet ${!dev} ${!opt}
- do_facet $facet lctl --device %${!svc} abort_recovery
+ mount_facet $facet -o abort_recovery
df $MOUNT || echo "first df failed: $?"
sleep 1
df $MOUNT || error "post-failover df: $?"
h2name_or_ip() {
if [ "$1" = "client" -o "$1" = "'*'" ]; then echo \'*\'; else
- echo $1"@$2"
+ echo $1"@$2"
fi
}
local facet=$1
local activevar=${facet}active
- if [ -f ./${facet}active ] ; then
- source ./${facet}active
+ if [ -f $TMP/${facet}active ] ; then
+ source $TMP/${facet}active
fi
active=${!activevar}
- if [ -z "$active" ] ; then
+ if [ -z "$active" ] ; then
echo -n ${facet}
else
echo -n ${active}
local facet=$1
local active=`facet_active $facet`
if [ "$facet" == client ]; then
- hostname
+ echo $HOSTNAME
else
echo `facet_host $active`
fi
change_active() {
local facet=$1
- failover=${facet}failover
+ failover=${facet}failover
host=`facet_host $failover`
[ -z "$host" ] && return
curactive=`facet_active $facet`
fi
# save the active host for this facet
activevar=${facet}active
- echo "$activevar=${!activevar}" > ./$activevar
+ echo "$activevar=${!activevar}" > $TMP/$activevar
}
do_node() {
HOST=$1
shift
local myPDSH=$PDSH
- if [ "$HOST" = "$(hostname)" ]; then
+ if [ "$HOST" = "$HOSTNAME" ]; then
myPDSH="no_dsh"
+ elif [ -z "$myPDSH" -o "$myPDSH" = "no_dsh" ]; then
+ echo "cannot run remote command on $HOST with $myPDSH"
+ return 128
fi
if $VERBOSE; then
echo "CMD: $HOST $@" >&2
$myPDSH $HOST $LCTL mark "$@" > /dev/null 2>&1 || :
fi
+
+ if [ "$myPDSH" = "rsh" ]; then
+# we need this because rsh does not return exit code of an executed command
+ local command_status="$TMP/cs"
+ rsh $HOST ":> $command_status"
+ rsh $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin;
+ cd $RPWD; sh -c \"$@\") ||
+ echo command failed >$command_status"
+ [ -n "$($myPDSH $HOST cat $command_status)" ] && return 1 || true
+ return 0
+ fi
$myPDSH $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; sh -c \"$@\")" | sed "s/^${HOST}: //"
return ${PIPESTATUS[0]}
}
+single_local_node () {
+ [ "$1" = "$HOSTNAME" ]
+}
+
+do_nodes() {
+ local rnodes=$1
+ shift
+
+ if $(single_local_node $rnodes); then
+ do_node $rnodes $@
+ return $?
+ fi
+
+ # This is part from do_node
+ local myPDSH=$PDSH
+
+ [ -z "$myPDSH" -o "$myPDSH" = "no_dsh" -o "$myPDSH" = "rsh" ] && \
+ echo "cannot run remote command on $rnodes with $myPDSH" && return 128
+
+ if $VERBOSE; then
+ echo "CMD: $rnodes $@" >&2
+ $myPDSH $rnodes $LCTL mark "$@" > /dev/null 2>&1 || :
+ fi
+
+ $myPDSH $rnodes "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; sh -c \"$@\")" | sed -re "s/\w+:\s//g"
+ return ${PIPESTATUS[0]}
+}
+
do_facet() {
facet=$1
shift
HOST=`facet_active_host $facet`
[ -z $HOST ] && echo No host defined for facet ${facet} && exit 1
- do_node $HOST $@
+ do_node $HOST "$@"
}
add() {
shift
# make sure its not already running
stop ${facet} -f
- rm -f ${facet}active
+ rm -f $TMP/${facet}active
do_facet ${facet} $MKFS $*
}
if [ $activemds != "mds1" ]; then
fail mds1
fi
-
- # assume client mount is local
- grep " $MOUNT " /proc/mounts && zconf_umount `hostname` $MOUNT $*
- grep " $MOUNT2 " /proc/mounts && zconf_umount `hostname` $MOUNT2 $*
+
+ # assume client mount is local
+ grep " $MOUNT " /proc/mounts && zconf_umount $HOSTNAME $MOUNT $*
+ grep " $MOUNT2 " /proc/mounts && zconf_umount $HOSTNAME $MOUNT2 $*
+
+ if [ -n "$CLIENTS" ]; then
+ zconf_umount_clients $CLIENTS $MOUNT "$*" || true
+ [ -n "$MOUNT2" ] && zconf_umount_clients $CLIENTS $MOUNT2 "$*" || true
+ fi
+
+ [ "$CLIENTONLY" ] && return
+ # The add fn does rm ${facet}active file, this would be enough
+ # if we use do_facet <facet> only after the facet added, but
+ # currently we use do_facet mds in local.sh
for num in `seq $MDSCOUNT`; do
stop mds$num -f
+ rm -f ${TMP}/mds${num}active
done
+
for num in `seq $OSTCOUNT`; do
stop ost$num -f
+ rm -f $TMP/ost${num}active
done
+
return 0
}
cleanupall() {
stopall $*
unload_modules
- cleanup_krb5_env
+ cleanup_gss
}
mdsmkfsopts()
}
formatall() {
+ if [ "$IAMDIR" == "yes" ]; then
+ MDS_MKFS_OPTS="$MDS_MKFS_OPTS --iam-dir"
+ MDSn_MKFS_OPTS="$MDSn_MKFS_OPTS --iam-dir"
+ fi
+
[ "$FSTYPE" ] && FSTYPE_OPT="--backfstype $FSTYPE"
+ if [ ! -z $SEC ]; then
+ MDS_MKFS_OPTS="$MDS_MKFS_OPTS --param srpc.flavor.default=$SEC"
+ MDSn_MKFS_OPTS="$MDSn_MKFS_OPTS --param srpc.flavor.default=$SEC"
+ OST_MKFS_OPTS="$OST_MKFS_OPTS --param srpc.flavor.default=$SEC"
+ fi
+
stopall
# We need ldiskfs here, may as well load them all
load_modules
}
mount_client() {
- grep " $1 " /proc/mounts || zconf_mount `hostname` $*
+ grep " $1 " /proc/mounts || zconf_mount $HOSTNAME $*
+}
+
+umount_client() {
+ grep " $1 " /proc/mounts && zconf_umount `hostname` $*
+}
+
+# return value:
+# 0: success, the old identity set already.
+# 1: success, the old identity does not set.
+# 2: fail.
+switch_identity() {
+ local num=$1
+ local switch=$2
+ local j=`expr $num - 1`
+ local MDT="`(do_facet mds$num lctl get_param -N mdt.*MDT*$j 2>/dev/null | cut -d"." -f2 2>/dev/null) || true`"
+
+ if [ -z "$MDT" ]; then
+ return 2
+ fi
+
+ local old="`do_facet mds$num "lctl get_param -n mdt.$MDT.identity_upcall"`"
+
+ if $switch; then
+ do_facet mds$num "lctl set_param -n mdt.$MDT.identity_upcall \"$L_GETIDENTITY\""
+ else
+ do_facet mds$num "lctl set_param -n mdt.$MDT.identity_upcall \"NONE\""
+ fi
+
+ do_facet mds$num "lctl set_param -n mdt/$MDT/identity_flush \"-1\""
+
+ if [ $old = "NONE" ]; then
+ return 1
+ else
+ return 0
+ fi
+}
+
+remount_client()
+{
+ zconf_umount `hostname` $1 || error "umount failed"
+ zconf_mount `hostname` $1 || error "mount failed"
+}
+
+set_obd_timeout() {
+ local facet=$1
+ local timeout=$2
+
+ do_facet $facet lsmod | grep -q obdclass || \
+ do_facet $facet "modprobe obdclass"
+
+ do_facet $facet "lctl set_param timeout=$timeout"
+}
+
+writeconf_facet () {
+ local facet=$1
+ local dev=$2
+
+ do_facet $facet "$TUNEFS --writeconf $dev"
+}
+
+writeconf_all () {
+ for num in `seq $MDSCOUNT`; do
+ DEVNAME=$(mdsdevname $num)
+ writeconf_facet mds$num $DEVNAME
+ done
+
+ for num in `seq $OSTCOUNT`; do
+ DEVNAME=$(ostdevname $num)
+ writeconf_facet ost$num $DEVNAME
+ done
}
setupall() {
load_modules
- init_krb5_env
+ init_gss
if [ -z "$CLIENTONLY" ]; then
echo "Setup mdts, osts"
+ echo $WRITECONF | grep -q "writeconf" && \
+ writeconf_all
for num in `seq $MDSCOUNT`; do
DEVNAME=$(mdsdevname $num)
- echo $REFORMAT | grep -q "reformat" \
- || do_facet mds$num "$TUNEFS --writeconf $DEVNAME"
+ set_obd_timeout mds$num $TIMEOUT
start mds$num $DEVNAME $MDS_MOUNT_OPTS
+
+ # We started mds, now we should set failover variables properly.
+ # Set mds${num}failover_HOST if it is not set (the default failnode).
+ local varname=mds${num}failover_HOST
+ if [ -z "${!varname}" ]; then
+ eval mds${num}failover_HOST=$(facet_host mds$num)
+ fi
+
+ if [ $IDENTITY_UPCALL != "default" ]; then
+ switch_identity $num $IDENTITY_UPCALL
+ fi
done
for num in `seq $OSTCOUNT`; do
DEVNAME=$(ostdevname $num)
+ set_obd_timeout ost$num $TIMEOUT
start ost$num $DEVNAME $OST_MOUNT_OPTS
+
+ # We started ost$num, now we should set ost${num}failover variable properly.
+ # Set ost${num}failover_HOST if it is not set (the default failnode).
+ varname=ost${num}failover_HOST
+ if [ -z "${!varname}" ]; then
+ eval ost${num}failover_HOST=$(facet_host ost${num})
+ fi
+
done
fi
+ # wait a while to allow sptlrpc configuration be propogated to targets,
+ # only needed when mounting new target devices.
+ $GSS && sleep 10
+
[ "$DAEMONFILE" ] && $LCTL debug_daemon start $DAEMONFILE $DAEMONSIZE
mount_client $MOUNT
+ [ -n "$CLIENTS" ] && zconf_mount_clients $CLIENTS $MOUNT
+
if [ "$MOUNT_2" ]; then
mount_client $MOUNT2
+ [ -n "$CLIENTS" ] && zconf_mount_clients $CLIENTS $MOUNT2
+ fi
+
+ # by remounting mdt before ost, initial connect from mdt to ost might
+ # timeout because ost is not ready yet. wait some time to its fully
+ # recovery. initial obd_connect timeout is 5s; in GSS case it's preceeded
+ # by a context negotiation rpc with $TIMEOUT.
+ # FIXME better by monitoring import status.
+ if $GSS; then
+ sleep $((TIMEOUT + 5))
+ else
+ sleep 5
fi
- sleep 5
}
mounted_lustre_filesystems() {
awk '($3 ~ "lustre" && $1 ~ ":") { print $2 }' /proc/mounts
}
+init_facet_vars () {
+ local facet=$1
+ shift
+ local device=$1
+
+ shift
+
+ eval export ${facet}_dev=${device}
+ eval export ${facet}_opt=\"$@\"
+
+ local dev=${facet}_dev
+ local label=$(do_facet ${facet} "e2label ${!dev}")
+ [ -z "$label" ] && echo no label for ${!dev} && exit 1
+
+ eval export ${facet}_svc=${label}
+
+ local varname=${facet}failover_HOST
+ if [ -z "${!varname}" ]; then
+ eval $varname=$(facet_host $facet)
+ fi
+}
+
+init_facets_vars () {
+ local DEVNAME
+
+ for num in `seq $MDSCOUNT`; do
+ DEVNAME=`mdsdevname $num`
+ init_facet_vars mds$num $DEVNAME $MDS_MOUNT_OPTS
+ done
+
+ for num in `seq $OSTCOUNT`; do
+ DEVNAME=`ostdevname $num`
+ init_facet_vars ost$num $DEVNAME $OST_MOUNT_OPTS
+ done
+}
+
+check_config () {
+ local mntpt=$1
+
+ echo Checking config lustre mounted on $mntpt
+ local mgshost=$(mount | grep " $mntpt " | awk -F@ '{print $1}')
+ mgshost=$(echo $mgshost | awk -F: '{print $1}')
+ if [ "$mgshost" != "$mgs_HOST" ]; then
+ FAIL_ON_ERROR=true \
+ error "Bad config file: lustre is mounted with mgs $mgshost, but mgs_HOST=$mgs_HOST
+ Please use correct config or set mds_HOST correctly!"
+ fi
+}
+
check_and_setup_lustre() {
- MOUNTED="`mounted_lustre_filesystems`"
- if [ -z "$MOUNTED" ]; then
+ local MOUNTED=$(mounted_lustre_filesystems)
+ if [ -z "$MOUNTED" ] || ! $(echo $MOUNTED | grep -w -q $MOUNT); then
[ "$REFORMAT" ] && formatall
setupall
- MOUNTED="`mounted_lustre_filesystems`"
+ MOUNTED=$(mounted_lustre_filesystems | head -1)
[ -z "$MOUNTED" ] && error "NAME=$NAME not mounted"
export I_MOUNTED=yes
+ else
+ check_config $MOUNT
+ init_facets_vars
fi
if [ "$ONLY" == "setup" ]; then
exit 0
cleanup_and_setup_lustre() {
if [ "$ONLY" == "cleanup" -o "`mount | grep $MOUNT`" ]; then
- sysctl -w lnet.debug=0 || true
+ lctl set_param debug=0 || true
cleanupall
- if [ "$ONLY" == "cleanup" ]; then
+ if [ "$ONLY" == "cleanup" ]; then
exit 0
fi
fi
check_and_cleanup_lustre() {
if [ "`mount | grep $MOUNT`" ]; then
- rm -rf $DIR/[Rdfs][1-9]*
- rm -f $DIR/${TESTSUITE}/[Rdfs][1-9]*
+ [ -n "$DIR" ] && rm -rf $DIR/[Rdfs][0-9]*
fi
if [ "$I_MOUNTED" = "yes" ]; then
cleanupall -f || error "cleanup failed"
unset I_MOUNTED
}
-#######
+#######
# General functions
check_network() {
}
##################################
+# Adaptive Timeouts funcs
+
+at_is_valid() {
+ if [ -z "$AT_MAX_PATH" ]; then
+ AT_MAX_PATH=$(do_facet $SINGLEMDS "find /sys/ -name at_max")
+ [ -z "$AT_MAX_PATH" ] && echo "missing /sys/.../at_max " && return 1
+ fi
+ return 0
+}
+
+at_is_enabled() {
+ at_is_valid || error "invalid call"
+
+ # only check mds, we assume at_max is the same on all nodes
+ local at_max=$(do_facet $SINGLEMDS "cat $AT_MAX_PATH")
+ if [ $at_max -eq 0 ]; then
+ return 1
+ else
+ return 0
+ fi
+}
+
+at_max_get() {
+ local facet=$1
+
+ at_is_valid || error "invalid call"
+
+ # suppose that all ost-s has the same at_max set
+ if [ $facet == "ost" ]; then
+ do_facet ost1 "cat $AT_MAX_PATH"
+ else
+ do_facet $facet "cat $AT_MAX_PATH"
+ fi
+}
+
+at_max_set() {
+ local at_max=$1
+ shift
+
+ at_is_valid || error "invalid call"
+
+ local facet
+ for facet in $@; do
+ if [ $facet == "ost" ]; then
+ for i in `seq $OSTCOUNT`; do
+ do_facet ost$i "echo $at_max > $AT_MAX_PATH"
+ done
+ elif [ $facet == "mds" ]; then
+ for i in `seq $MDSCOUNT`; do
+ do_facet mds$i "echo $at_max > $AT_MAX_PATH"
+ done
+ else
+ do_facet $facet "echo $at_max > $AT_MAX_PATH"
+ fi
+ done
+}
+
+##################################
# OBD_FAIL funcs
drop_request() {
# OBD_FAIL_MDS_ALL_REQUEST_NET
RC=0
- do_facet mds sysctl -w lustre.fail_loc=0x123
+ do_facet $SINGLEMDS lctl set_param fail_loc=0x123
do_facet client "$1" || RC=$?
- do_facet mds sysctl -w lustre.fail_loc=0
+ do_facet $SINGLEMDS lctl set_param fail_loc=0
return $RC
}
drop_reply() {
# OBD_FAIL_MDS_ALL_REPLY_NET
RC=0
- do_facet mds sysctl -w lustre.fail_loc=0x122
+ do_facet $SINGLEMDS lctl set_param fail_loc=0x122
do_facet client "$@" || RC=$?
- do_facet mds sysctl -w lustre.fail_loc=0
+ do_facet $SINGLEMDS lctl set_param fail_loc=0
return $RC
}
drop_reint_reply() {
# OBD_FAIL_MDS_REINT_NET_REP
RC=0
- do_facet mds sysctl -w lustre.fail_loc=0x119
+ do_facet $SINGLEMDS lctl set_param fail_loc=0x119
do_facet client "$@" || RC=$?
- do_facet mds sysctl -w lustre.fail_loc=0
+ do_facet $SINGLEMDS lctl set_param fail_loc=0
return $RC
}
pause_bulk() {
#define OBD_FAIL_OST_BRW_PAUSE_BULK 0x214
RC=0
- do_facet ost1 sysctl -w lustre.fail_loc=0x214
+ do_facet ost1 lctl set_param fail_loc=0x214
do_facet client "$1" || RC=$?
do_facet client "sync"
- do_facet ost1 sysctl -w lustre.fail_loc=0
+ do_facet ost1 lctl set_param fail_loc=0
return $RC
}
drop_ldlm_cancel() {
#define OBD_FAIL_LDLM_CANCEL 0x304
RC=0
- do_facet client sysctl -w lustre.fail_loc=0x304
+ do_facet client lctl set_param fail_loc=0x304
do_facet client "$@" || RC=$?
- do_facet client sysctl -w lustre.fail_loc=0
+ do_facet client lctl set_param fail_loc=0
return $RC
}
drop_bl_callback() {
#define OBD_FAIL_LDLM_BL_CALLBACK 0x305
RC=0
- do_facet client sysctl -w lustre.fail_loc=0x305
+ do_facet client lctl set_param fail_loc=0x305
do_facet client "$@" || RC=$?
- do_facet client sysctl -w lustre.fail_loc=0
+ do_facet client lctl set_param fail_loc=0
return $RC
}
drop_ldlm_reply() {
#define OBD_FAIL_LDLM_REPLY 0x30c
RC=0
- do_facet mds sysctl -w lustre.fail_loc=0x30c
+ do_facet $SINGLEMDS lctl set_param fail_loc=0x30c
do_facet client "$@" || RC=$?
- do_facet mds sysctl -w lustre.fail_loc=0
+ do_facet $SINGLEMDS lctl set_param fail_loc=0
return $RC
}
pause=$2
sleep $pause
echo "clearing fail_loc on $facet"
- do_facet $facet "sysctl -w lustre.fail_loc=0"
+ do_facet $facet "lctl set_param fail_loc=0 2>/dev/null || true"
+}
+
+set_nodes_failloc () {
+ local nodes=$1
+ local node
+
+ for node in $nodes ; do
+ do_node $node lctl set_param fail_loc=$2
+ done
}
cancel_lru_locks() {
$LCTL mark "cancel_lru_locks $1 start"
- for d in `find $LPROC/ldlm/namespaces | egrep -i $1`; do
- [ -f $d/lru_size ] && echo clear > $d/lru_size
- [ -f $d/lock_unused_count ] && grep [1-9] $d/lock_unused_count /dev/null
+ for d in `lctl get_param -N ldlm.namespaces.*.lru_size | egrep -i $1`; do
+ $LCTL set_param -n $d=clear
done
+ $LCTL get_param ldlm.namespaces.*.lock_unused_count | egrep -i $1 | grep -v '=0'
$LCTL mark "cancel_lru_locks $1 stop"
}
+default_lru_size()
+{
+ NR_CPU=$(grep -c "processor" /proc/cpuinfo)
+ DEFAULT_LRU_SIZE=$((100 * NR_CPU))
+ echo "$DEFAULT_LRU_SIZE"
+}
+
+lru_resize_enable()
+{
+ lctl set_param ldlm.namespaces.*$1*.lru_size=0
+}
+
+lru_resize_disable()
+{
+ lctl set_param ldlm.namespaces.*$1*.lru_size $(default_lru_size)
+}
pgcache_empty() {
- for a in /proc/fs/lustre/llite/*/dump_page_cache; do
- if [ `wc -l $a | awk '{print $1}'` -gt 1 ]; then
- echo there is still data in page cache $a ?
- cat $a;
- return 1;
+ local FILE
+ for FILE in `lctl get_param -N "llite.*.dump_page_cache"`; do
+ if [ `lctl get_param -n $FILE | wc -l` -gt 1 ]; then
+ echo there is still data in page cache $FILE ?
+ lctl get_param -n $FILE
+ return 1
fi
done
return 0
}
debugsave() {
- DEBUGSAVE="$(sysctl -n lnet.debug)"
+ DEBUGSAVE="$(lctl get_param -n debug)"
}
debugrestore() {
- [ -n "$DEBUGSAVE" ] && sysctl -w lnet.debug="${DEBUGSAVE}"
+ [ -n "$DEBUGSAVE" ] && lctl set_param debug="${DEBUGSAVE}"
DEBUGSAVE=""
}
##################################
-# Test interface
+# Test interface
##################################
-error() {
- local FAIL_ON_ERROR=${FAIL_ON_ERROR:-true}
+error_noexit() {
local TYPE=${TYPE:-"FAIL"}
local ERRLOG
- sysctl -w lustre.fail_loc=0 2> /dev/null || true
+ lctl set_param fail_loc=0 2>/dev/null || true
log " ${TESTSUITE} ${TESTNAME}: @@@@@@ ${TYPE}: $@ "
ERRLOG=$TMP/lustre_${TESTSUITE}_${TESTNAME}.$(date +%s)
echo "Dumping lctl log to $ERRLOG"
done
debugrestore
[ "$TESTSUITELOG" ] && echo "$0: ${TYPE}: $TESTNAME $@" >> $TESTSUITELOG
- if $FAIL_ON_ERROR; then
- exit 1
- fi
+}
+
+error() {
+ error_noexit "$@"
+ $FAIL_ON_ERROR && exit 1 || true
+}
+
+error_exit() {
+ error_noexit "$@"
+ exit 1
}
# 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
+ local TYPE="IGNORE (bz$1)"
+ shift
+ error_noexit "$@"
}
skip () {
log " SKIP: ${TESTSUITE} ${TESTNAME} $@"
- [ "$TESTSUITELOG" ] && echo "${TESTSUITE}: SKIP: $TESTNAME $@" >> $TESTSUITELOG
+ [ "$TESTSUITELOG" ] && \
+ echo "${TESTSUITE}: SKIP: $TESTNAME $@" >> $TESTSUITELOG || true
}
build_test_filter() {
eval ONLY_${O}=true
done
[ "$EXCEPT$ALWAYS_EXCEPT" ] && \
- log "skipping tests: `echo $EXCEPT $ALWAYS_EXCEPT`"
+ log "excepting tests: `echo $EXCEPT $ALWAYS_EXCEPT`"
+ [ "$EXCEPT_SLOW" ] && \
+ log "skipping tests SLOW=no: `echo $EXCEPT_SLOW`"
for E in $EXCEPT $ALWAYS_EXCEPT; do
eval EXCEPT_${E}=true
done
+ for E in $EXCEPT_SLOW; do
+ eval EXCEPT_SLOW_${E}=true
+ done
for G in $GRANT_CHECK_LIST; do
eval GCHECK_ONLY_${G}=true
done
IFS=abcdefghijklmnopqrstuvwxyz _basetest $1
}
+# print a newline if the last test was skipped
+export LAST_SKIPPED=
run_test() {
+ assert_DIR
+
export base=`basetest $1`
if [ ! -z "$ONLY" ]; then
testname=ONLY_$1
if [ ${!testname}x != x ]; then
+ [ "$LAST_SKIPPED" ] && echo "" && LAST_SKIPPED=
run_one $1 "$2"
return $?
fi
testname=ONLY_$base
if [ ${!testname}x != x ]; then
+ [ "$LAST_SKIPPED" ] && echo "" && LAST_SKIPPED=
run_one $1 "$2"
return $?
fi
+ LAST_SKIPPED="y"
echo -n "."
return 0
fi
testname=EXCEPT_$1
if [ ${!testname}x != x ]; then
+ LAST_SKIPPED="y"
TESTNAME=test_$1 skip "skipping excluded test $1"
return 0
fi
testname=EXCEPT_$base
if [ ${!testname}x != x ]; then
+ LAST_SKIPPED="y"
TESTNAME=test_$1 skip "skipping excluded test $1 (base $base)"
return 0
fi
+ testname=EXCEPT_SLOW_$1
+ if [ ${!testname}x != x ]; then
+ LAST_SKIPPED="y"
+ TESTNAME=test_$1 skip "skipping SLOW test $1"
+ return 0
+ fi
+ testname=EXCEPT_SLOW_$base
+ if [ ${!testname}x != x ]; then
+ LAST_SKIPPED="y"
+ TESTNAME=test_$1 skip "skipping SLOW test $1 (base $base)"
+ return 0
+ fi
+
+ LAST_SKIPPED=
run_one $1 "$2"
-
+
return $?
}
MSG=${MSG//\(/\\\(}
MSG=${MSG//\)/\\\)}
MSG=${MSG//\;/\\\;}
+ MSG=${MSG//\|/\\\|}
+ 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
}
check_mds() {
- FFREE=`cat /proc/fs/lustre/mds/*/filesfree`
- FTOTAL=`cat /proc/fs/lustre/mds/*/filestotal`
+ FFREE=$(do_node $SINGLEMDS lctl get_param -n osd.*MDT*.filesfree | awk 'BEGIN{avail=0}; {avail+=$1}; END{print avail}')
+ FTOTAL=$(do_node $SINGLEMDS lctl get_param -n osd.*MDT*.filestotal | awk 'BEGIN{avail=0}; {avail+=$1}; END{print avail}')
[ $FFREE -ge $FTOTAL ] && error "files free $FFREE > total $FTOTAL" || true
}
+reset_fail_loc () {
+ local myNODES=$(nodes_list)
+ local NODE
+
+ for NODE in $myNODES; do
+ do_node $NODE "lctl set_param fail_loc=0 2>/dev/null || true"
+ done
+}
+
run_one() {
testnum=$1
message=$2
tfile=f${testnum}
- export tdir=d${TESTSUITE}/d${base}
+ export tdir=d0.${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)"
export TESTNAME=test_$testnum
test_${testnum} || error "test_$testnum failed with $?"
#check_mds
+ cd $SAVE_PWD
+ reset_fail_loc
check_grant ${testnum} || error "check_grant $testnum failed with $?"
- [ -f $CATASTROPHE ] && [ `cat $CATASTROPHE` -ne 0 ] && \
- error "LBUG/LASSERT detected"
+ check_catastrophe || error "LBUG/LASSERT detected"
+ ps auxww | grep -v grep | grep -q multiop && error "multiop still running"
pass "($((`date +%s` - $BEFORE))s)"
- rmdir ${DIR}/$tdir >/dev/null 2>&1 || true
unset TESTNAME
unset tdir
umask $SAVE_UMASK
- cd $SAVE_PWD
- $CLEANUP
}
canonical_path() {
}
sync_clients() {
- [ -d $DIR1 ] && cd $DIR1 && sync; sleep 1; sync
- [ -d $DIR2 ] && cd $DIR2 && sync; sleep 1; sync
+ [ -d $DIR1 ] && cd $DIR1 && sync; sleep 1; sync
+ [ -d $DIR2 ] && cd $DIR2 && sync; sleep 1; sync
cd $SAVE_PWD
}
testname=GCHECK_ONLY_${base}
[ ${!testname}x == x ] && return 0
- echo -n "checking grant......"
+ echo -n "checking grant......"
cd $SAVE_PWD
# write some data to sync client lost_grant
rm -f $DIR1/${tfile}_check_grant_* 2>&1
for i in `seq $OSTCOUNT`; do
- $LFS setstripe $DIR1/${tfile}_check_grant_$i 0 $(($i -1)) 1
+ $LFS setstripe $DIR1/${tfile}_check_grant_$i -i $(($i -1)) -c 1
dd if=/dev/zero of=$DIR1/${tfile}_check_grant_$i bs=4k \
- count=1 > /dev/null 2>&1
+ count=1 > /dev/null 2>&1
done
# sync all the data and make sure no pending data on server
sync_clients
- #get client grant and server grant
+ #get client grant and server grant
client_grant=0
- for d in ${LPROC}/osc/*/cur_grant_bytes; do
- client_grant=$((client_grant + `cat $d`))
+ for d in `lctl get_param -n osc.*.cur_grant_bytes`; do
+ client_grant=$((client_grant + $d))
done
server_grant=0
- for d in ${LPROC}/obdfilter/*/tot_granted; do
- server_grant=$((server_grant + `cat $d`))
+ for d in `lctl get_param -n obdfilter.*.tot_granted`; do
+ server_grant=$((server_grant + $d))
done
# cleanup the check_grant file
rm $DIR1/${tfile}_check_grant_$i
done
- #check whether client grant == server grant
+ #check whether client grant == server grant
if [ $client_grant != $server_grant ]; then
echo "failed: client:${client_grant} server: ${server_grant}"
return 1
echo $ost
}
+remote_node () {
+ local node=$1
+ [ "$node" != "$(hostname)" ]
+}
+
remote_mds ()
{
- [ ! -e /proc/fs/lustre/mdt/*MDT* ]
+ local node
+ for node in $(mdts_nodes); do
+ remote_node $node && return 0
+ done
+ return 1
}
-remote_ost ()
+remote_mds_nodsh()
{
- [ $(grep -c obdfilter $LPROC/devices) -eq 0 ]
+ remote_mds && [ "$PDSH" = "no_dsh" -o -z "$PDSH" -o -z "$mds_HOST" ]
}
-mdts_nodes () {
- local MDSNODES=$(facet_host $SINGLEMDS)
+remote_ost ()
+{
+ local node
+ for node in $(osts_nodes) ; do
+ remote_node $node && return 0
+ done
+ return 1
+}
- # FIXME: Currenly we use only $SINGLEMDS,
- # should be fixed when we will start to test cmd.
- echo $MDSNODES
- return
+remote_ost_nodsh()
+{
+ remote_ost && [ "$PDSH" = "no_dsh" -o -z "$PDSH" -o -z "$ost_HOST" ]
+}
+mdts_nodes () {
+ local MDSNODES
+ local NODES_sort
for num in `seq $MDSCOUNT`; do
- local myMDS=$(facet_host mds$num)
- [[ ! '\ '"$MDSNODES"'\ ' = *'\ '"$myMDS"'\ '* ]] && MDSNODES="$MDSNODES $myMDS"
+ MDSNODES="$MDSNODES $(facet_host mds$num)"
done
+ NODES_sort=$(for i in $MDSNODES; do echo $i; done | sort -u)
- echo $MDSNODES
+ echo $NODES_sort
+}
+
+remote_servers () {
+ remote_ost && remote_mds
}
osts_nodes () {
local OSTNODES=$(facet_host ost1)
+ local NODES_sort
for num in `seq $OSTCOUNT`; do
local myOST=$(facet_host ost$num)
- [[ ! '\ '"$OSTNODES"'\ ' = *'\ '"$myOST"'\ '* ]] && OSTNODES="$OSTNODES $myOST"
+ OSTNODES="$OSTNODES $myOST"
done
+ NODES_sort=$(for i in $OSTNODES; do echo $i; done | sort -u)
- echo $OSTNODES
+ echo $NODES_sort
}
nodes_list () {
# FIXME. We need a list of clients
- local myNODES=`hostname`
+ local myNODES=$HOSTNAME
+ local myNODES_sort
+
+ # CLIENTS (if specified) contains the local client
+ [ -n "$CLIENTS" ] && myNODES=${CLIENTS//,/ }
- local OSTNODES=$(osts_nodes)
- local myOSTNODES=`echo ' '"$OSTNODES"' ' | sed -e s/[\ ]$(hostname)[\ ]/\ /`
- [ -n "$myOSTNODES" ] && myNODES="$myNODES $myOSTNODES"
+ if [ "$PDSH" -a "$PDSH" != "no_dsh" ]; then
+ myNODES="$myNODES $(osts_nodes) $(mdts_nodes)"
+ fi
+
+ myNODES_sort=$(for i in $myNODES; do echo $i; done | sort -u)
+
+ echo $myNODES_sort
+}
+
+remote_nodes_list () {
+ local rnodes=$(nodes_list)
+ rnodes=$(echo " $rnodes " | sed -re "s/\s+$HOSTNAME\s+/ /g")
+ echo $rnodes
+}
- 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"
+init_clients_lists () {
+ # Sanity check: exclude the local client from RCLIENTS
+ local rclients=$(echo " $RCLIENTS " | sed -re "s/\s+$HOSTNAME\s+/ /g")
+
+ # Sanity check: exclude the dup entries
+ rclients=$(for i in $rclients; do echo $i; done | sort -u)
+
+ local clients="$SINGLECLIENT $HOSTNAME $rclients"
+
+ # Sanity check: exclude the dup entries from CLIENTS
+ # for those configs which has SINGLCLIENT set to local client
+ clients=$(for i in $clients; do echo $i; done | sort -u)
+
+ CLIENTS=`comma_list $clients`
+ local -a remoteclients=($rclients)
+ for ((i=0; $i<${#remoteclients[@]}; i++)); do
+ varname=CLIENT$((i + 2))
+ eval $varname=${remoteclients[i]}
done
- echo $myNODES
+ CLIENTCOUNT=$((${#remoteclients[@]} + 1))
}
is_patchless ()
{
- grep -q patchless $LPROC/version
+ lctl get_param version | grep -q patchless
+}
+
+get_node_count() {
+ local nodes="$@"
+ echo $nodes | wc -w || true
+}
+
+mixed_ost_devs () {
+ local nodes=$(osts_nodes)
+ local osscount=$(get_node_count "$nodes")
+ [ ! "$OSTCOUNT" = "$osscount" ]
+}
+
+mixed_mdt_devs () {
+ local nodes=$(mdts_nodes)
+ local mdtcount=$(get_node_count "$nodes")
+ [ ! "$MDSCOUNT" = "$mdtcount" ]
+}
+
+generate_machine_file() {
+ local nodes=${1//,/ }
+ local machinefile=$2
+ rm -f $machinefile || error "can't rm $machinefile"
+ for node in $nodes; do
+ echo $node >>$machinefile
+ done
+}
+
+get_stripe () {
+ local file=$1/stripe
+ touch $file
+ $LFS getstripe -v $file || error
+ rm -f $file
+}
+
+check_runas_id_ret() {
+ local myRC=0
+ local myRUNAS_ID=$1
+ shift
+ local myRUNAS=$@
+ if [ -z "$myRUNAS" ]; then
+ error_exit "myRUNAS command must be specified for check_runas_id"
+ fi
+ if $GSS_KRB5; then
+ $myRUNAS krb5_login.sh || \
+ error "Failed to refresh Kerberos V5 TGT for UID $myRUNAS_ID."
+ fi
+ mkdir $DIR/d0_runas_test
+ chmod 0755 $DIR
+ chown $myRUNAS_ID:$myRUNAS_ID $DIR/d0_runas_test
+ $myRUNAS touch $DIR/d0_runas_test/f$$ || myRC=$?
+ rm -rf $DIR/d0_runas_test
+ return $myRC
+}
+
+check_runas_id() {
+ local myRUNAS_ID=$1
+ shift
+ local myRUNAS=$@
+ check_runas_id_ret $myRUNAS_ID $myRUNAS || \
+ error "unable to write to $DIR/d0_runas_test as UID $myRUNAS_ID.
+ Please set RUNAS_ID to some UID which exists on MDS and client or
+ add user $myRUNAS_ID:$myRUNAS_ID on these nodes."
+}
+
+# Run multiop in the background, but wait for it to print
+# "PAUSING" to its stdout before returning from this function.
+multiop_bg_pause() {
+ MULTIOP_PROG=${MULTIOP_PROG:-multiop}
+ FILE=$1
+ ARGS=$2
+
+ TMPPIPE=/tmp/multiop_open_wait_pipe.$$
+ mkfifo $TMPPIPE
+
+ echo "$MULTIOP_PROG $FILE v$ARGS"
+ $MULTIOP_PROG $FILE v$ARGS > $TMPPIPE &
+
+ echo "TMPPIPE=${TMPPIPE}"
+ read -t 60 multiop_output < $TMPPIPE
+ if [ $? -ne 0 ]; then
+ rm -f $TMPPIPE
+ return 1
+ fi
+ rm -f $TMPPIPE
+ if [ "$multiop_output" != "PAUSING" ]; then
+ echo "Incorrect multiop output: $multiop_output"
+ kill -9 $PID
+ return 1
+ fi
+
+ return 0
+}
+
+check_rate() {
+ local OP=$1
+ local TARGET_RATE=$2
+ local NUM_CLIENTS=$3
+ local LOG=$4
+
+ local RATE=$(awk '/^Rate: [0-9\.]+ '"${OP}"'s\/sec/ { print $2}' ${LOG})
+
+ # We need to use bc since the rate is a floating point number
+ local RES=$(echo "${RATE} < ${TARGET_RATE}" | bc -l )
+ if [ ${RES} -eq 0 ]; then
+ echo "Success: ${RATE} ${OP}s/sec met target rate" \
+ "${TARGET_RATE} ${OP}s/sec for ${NUM_CLIENTS} client(s)."
+ return 0
+ else
+ echo "Failure: ${RATE} ${OP}s/sec did not meet target rate" \
+ "${TARGET_RATE} ${OP}s/sec for ${NUM_CLIENTS} client(s)."
+ return 1
+ fi
+}
+
+# reset llite stat counters
+clear_llite_stats(){
+ lctl set_param -n llite.*.stats 0
+}
+
+# sum llite stat items
+calc_llite_stats() {
+ local res=$(lctl get_param -n llite.*.stats |
+ awk 'BEGIN {s = 0} END {print s} /^'"$1"'/ {s += $2}')
+ echo $res
+}
+
+# reset osc stat counters
+clear_osc_stats(){
+ lctl set_param -n osc.*.osc_stats 0
+}
+
+# sum osc stat items
+calc_osc_stats() {
+ local res=$(lctl get_param -n osc.*.osc_stats |
+ awk 'BEGIN {s = 0} END {print s} /^'"$1"'/ {s += $2}')
+ echo $res
+}
+
+calc_sum () {
+ awk 'BEGIN {s = 0}; {s += $1}; END {print s}'
+}
+
+calc_osc_kbytes () {
+ $LCTL get_param -n osc.*[oO][sS][cC][-_][0-9a-f]*.$1 | calc_sum
+}
+
+# save_lustre_params(node, parameter_mask)
+# generate a stream of formatted strings (<node> <param name>=<param value>)
+save_lustre_params() {
+ local s
+ do_node $1 "lctl get_param $2" | while read s; do echo "$1 $s"; done
+}
+
+# restore lustre parameters from input stream, produces by save_lustre_params
+restore_lustre_params() {
+ local node
+ local name
+ local val
+ while IFS=" =" read node name val; do
+ do_node $node "lctl set_param -n $name $val"
+ done
+}
+
+check_catastrophe () {
+ local rnodes=$(comma_list $(remote_nodes_list))
+
+ [ -f $CATASTROPHE ] && [ `cat $CATASTROPHE` -ne 0 ] && return 1
+ if [ $rnodes ]; then
+ do_nodes $rnodes "[ -f $CATASTROPHE ] && { [ \`cat $CATASTROPHE\` -eq 0 ] || false; } || true"
+ fi
+}
+
+# $1 node
+# $2 file
+get_stripe_info() {
+ local tmp_file
+
+ stripe_size=0
+ stripe_count=0
+ stripe_index=0
+ tmp_file=$(mktemp)
+
+ do_facet $1 lfs getstripe -v $2 > $tmp_file
+
+ stripe_size=`awk '$1 ~ /size/ {print $2}' $tmp_file`
+ stripe_count=`awk '$1 ~ /count/ {print $2}' $tmp_file`
+ stripe_index=`awk '/obdidx/ {start = 1; getline; print $1; exit}' $tmp_file`
+ rm -f $tmp_file
}
git://git.whamcloud.com / fs / lustre-release.git / blobdiff